Skip to content

KVSPSACustSubscriptionContract#

Extends #3099ffc74cf74df69b967e4bc2bb587c#Customer Subscription Contract

Fields#

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

Events#

KVSPSAFOnAfterFillShipToAddressFromBillToAddress(Record Customer Subscription Contract, Record KVSPSABill-to Address) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAFOnAfterFillShipToAddressFromBillToAddress(var CustomerSubscriptionContract: Record "Customer Subscription Contract"; BillToAddress: Record "KVSPSABill-to Address"): 
[EventSubscriber(ObjectType::TableExtension, TableExtension::"KVSPSACustSubscriptionContract", 'KVSPSAFOnAfterFillShipToAddressFromBillToAddress', '', false, false)]
local procedure DoSomethingKVSPSAFOnAfterFillShipToAddressFromBillToAddress(var CustomerSubscriptionContract: Record "Customer Subscription Contract"; BillToAddress: Record "KVSPSABill-to Address")
begin
end;

KVSPSAOnAfterKVSPSAFillShipToAddressFromCustomer(Record Customer Subscription Contract, Record Customer) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnAfterKVSPSAFillShipToAddressFromCustomer(var CustomerSubscriptionContract: Record "Customer Subscription Contract"; Customer: Record "Customer"): 
[EventSubscriber(ObjectType::TableExtension, TableExtension::"KVSPSACustSubscriptionContract", 'KVSPSAOnAfterKVSPSAFillShipToAddressFromCustomer', '', false, false)]
local procedure DoSomethingKVSPSAOnAfterKVSPSAFillShipToAddressFromCustomer(var CustomerSubscriptionContract: Record "Customer Subscription Contract"; Customer: Record "Customer")
begin
end;

KVSPSAOnBeforeCheckCustomerInJob(Record Customer Subscription Contract, Boolean) :#

Summary: Allows Skipping the customer in the project

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeCheckCustomerInJob(var CustomerSubscriptionContract: Record "Customer Subscription Contract"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::TableExtension, TableExtension::"KVSPSACustSubscriptionContract", 'KVSPSAOnBeforeCheckCustomerInJob', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeCheckCustomerInJob(var CustomerSubscriptionContract: Record "Customer Subscription Contract"; var IsHandled: Boolean)
begin
end;

Parameters:

  • CustomerSubscriptionContract:
  • IsHandled:

KVSPSAOnBeforeCheckJob(Record Customer Subscription Contract, Boolean) :#

Summary: Allows skipping the check if the project is blocked or closed.

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

Parameters:

  • CustomerSubscriptionContract:
  • IsHandled: