From df7947fd65dee34dc74526df03b0a915005c47a5 Mon Sep 17 00:00:00 2001 From: "Weidmann, Stephan" Date: Thu, 19 Mar 2026 13:35:44 +0100 Subject: [PATCH] #7110 - OnAfterInitFromSubscriptionLine --- .../Vendor Contracts/Tables/VendSubContractLine.Table.al | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/src/Apps/W1/Subscription Billing/App/Vendor Contracts/Tables/VendSubContractLine.Table.al b/src/Apps/W1/Subscription Billing/App/Vendor Contracts/Tables/VendSubContractLine.Table.al index 3753080ca1..2c3854d968 100644 --- a/src/Apps/W1/Subscription Billing/App/Vendor Contracts/Tables/VendSubContractLine.Table.al +++ b/src/Apps/W1/Subscription Billing/App/Vendor Contracts/Tables/VendSubContractLine.Table.al @@ -516,6 +516,7 @@ table 8065 "Vend. Sub. Contract Line" Rec."Subscription Description" := ServiceObject.Description; Rec."Subscription Line Entry No." := ServiceCommitment."Entry No."; Rec."Subscription Line Description" := ServiceCommitment.Description; + OnAfterInitFromSubscriptionLine(Rec, ServiceCommitment, ServiceObject); end; internal procedure IsCommentLine(): Boolean @@ -533,4 +534,9 @@ table 8065 "Vend. Sub. Contract Line" if not VendSubContractDeferral.IsEmpty() then Error(UnreleasedVendSubContractDeferralExistsErr); end; + + [IntegrationEvent(false, false)] + local procedure OnAfterInitFromSubscriptionLine(var VendSubContractLine: Record "Vend. Sub. Contract Line"; SubscriptionLine: Record "Subscription Line"; SubscriptionHeader: Record "Subscription Header") + begin + end; }