Skip to content

KVSPSAVendorSubscrContract#

Extends #3099ffc74cf74df69b967e4bc2bb587c#Vendor Subscription Contract

Fields#

Name Type Note
KVSPSAJobNo Code[20]
KVSPSAPersonResponsible Code[20] FlowField
KVSPSAPersonResponsibleName Text[100] FlowField

Procedures#

KVSPSAGetHideValidationDialog() : Boolean#

Summary: Returns the value of the global flag HideValidationDialog.

procedure KVSPSAGetHideValidationDialog(): Boolean

Returns: The value of the global flag HideValidationDialog.

Remarks: Global flag HideValidationDialog is used to hide various confirmation/message/other dialogs.

KVSPSASetHideValidationDialog(Boolean) :#

Summary: Sets the value of the global flag HideValidationDialog.

procedure KVSPSASetHideValidationDialog(NewHideValidationDialog: Boolean): 

Parameters:

  • NewHideValidationDialog: The new value to set.

Remarks: Global flag HideValidationDialog is used to hide various confirmation/message/other dialogs.

Events#

KVSPSAOnBeforeCaseFieldNoInUpdateVendorSubscriptionContractLines(Record Vendor Subscription Contract, Record Vend. Sub. Contract Line, Integer, Boolean, Record Vendor Subscription Contract, Integer) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeCaseFieldNoInUpdateVendorSubscriptionContractLines(var VendorSubscrContract: Record "Vendor Subscription Contract"; var VendorSubscrContractLine: Record "Vend. Sub. Contract Line"; ChangedFieldNo: Integer; var IsHandled: Boolean; xVendorSubscrContract: Record "Vendor Subscription Contract"; CurrentFieldNo: Integer): 
[EventSubscriber(ObjectType::TableExtension, TableExtension::"KVSPSAVendorSubscrContract", 'KVSPSAOnBeforeCaseFieldNoInUpdateVendorSubscriptionContractLines', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeCaseFieldNoInUpdateVendorSubscriptionContractLines(var VendorSubscrContract: Record "Vendor Subscription Contract"; var VendorSubscrContractLine: Record "Vend. Sub. Contract Line"; ChangedFieldNo: Integer; var IsHandled: Boolean; xVendorSubscrContract: Record "Vendor Subscription Contract"; CurrentFieldNo: Integer)
begin
end;

KVSPSAOnBeforeCheckJob(Record Vendor Subscription Contract, Boolean) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeCheckJob(var VendorSubscriptionContract: Record "Vendor Subscription Contract"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::TableExtension, TableExtension::"KVSPSAVendorSubscrContract", 'KVSPSAOnBeforeCheckJob', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeCheckJob(var VendorSubscriptionContract: Record "Vendor Subscription Contract"; var IsHandled: Boolean)
begin
end;

KVSPSAOnBeforeVendorSubscrContractLineModifyInUpdateVendorSubscriptionContractLines(Record Vend. Sub. Contract Line, Integer, Integer) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeVendorSubscrContractLineModifyInUpdateVendorSubscriptionContractLines(var VendorSubscrContractLine: Record "Vend. Sub. Contract Line"; ChangedFieldNo: Integer; CurrentFieldNo: Integer): 
[EventSubscriber(ObjectType::TableExtension, TableExtension::"KVSPSAVendorSubscrContract", 'KVSPSAOnBeforeVendorSubscrContractLineModifyInUpdateVendorSubscriptionContractLines', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeVendorSubscrContractLineModifyInUpdateVendorSubscriptionContractLines(var VendorSubscrContractLine: Record "Vend. Sub. Contract Line"; ChangedFieldNo: Integer; CurrentFieldNo: Integer)
begin
end;

KVSPSAOnUnknownFieldNoInUpdateVendorSubscriptionContractLines(Record Vendor Subscription Contract, Record Vend. Sub. Contract Line, Text[100], Integer, Record Vendor Subscription Contract) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnUnknownFieldNoInUpdateVendorSubscriptionContractLines(VendorSubscrContract: Record "Vendor Subscription Contract"; var VendorSubscrContractLine: Record "Vend. Sub. Contract Line"; ChangedFieldName: Text[100]; ChangedFieldNo: Integer; xVendorSubscriptionContract: Record "Vendor Subscription Contract"): 
[EventSubscriber(ObjectType::TableExtension, TableExtension::"KVSPSAVendorSubscrContract", 'KVSPSAOnUnknownFieldNoInUpdateVendorSubscriptionContractLines', '', false, false)]
local procedure DoSomethingKVSPSAOnUnknownFieldNoInUpdateVendorSubscriptionContractLines(VendorSubscrContract: Record "Vendor Subscription Contract"; var VendorSubscrContractLine: Record "Vend. Sub. Contract Line"; ChangedFieldName: Text[100]; ChangedFieldNo: Integer; xVendorSubscriptionContract: Record "Vendor Subscription Contract")
begin
end;