Skip to content

KVSPSANonDeductVATPurchaseMgt#

Procedures#

FillPurchLineDeductVATDimValuesFromDimSetID(Record Purchase Line) :#

Summary: Non-Deductible Dimension values and VAT % are recalculated.

procedure FillPurchLineDeductVATDimValuesFromDimSetID(var PurchaseLine: Record "Purchase Line"): 

Parameters:

  • PurchaseLine: VAR Record "Purchase Line".

FillPurchLineDeductVATWithNonDeductDimOfLine(Record Purchase Line) : Boolean#

Summary: Already filled Non-Deductible VAT Dimension values of the purchase line are used to determine the Non-Deductible VAT %

procedure FillPurchLineDeductVATWithNonDeductDimOfLine(var PurchaseLine: Record "Purchase Line"): Boolean

Parameters:

  • PurchaseLine: VAR Record "Purchase Line".

Returns: Return variable ValidNonDeductDimValue of type Boolean.

SetNonDeductibleVATPerDimension(Record Purchase Line, Decimal) : Boolean#

procedure SetNonDeductibleVATPerDimension(var PurchaseLine: Record "Purchase Line"; var NonDeductibleVATPct: Decimal): Boolean

SetNonDeductibleVATPerDimension(Record Purchase Line, Record Purchase Header, Decimal) : Boolean#

procedure SetNonDeductibleVATPerDimension(var PurchaseLine: Record "Purchase Line"; PurchaseHeader: Record "Purchase Header"; var NonDeductibleVATPct: Decimal): Boolean

SetNonDeductVATDimValues(Record Purchase Line, Record Purchase Header, Decimal, Boolean) : Boolean#

procedure SetNonDeductVATDimValues(var PurchaseLine: Record "Purchase Line"; PurchaseHeader: Record "Purchase Header"; var NonDeductibleVATPct: Decimal; ValidateLine: Boolean): Boolean

UpdatePurchLineNonDeductibleVATDimFields(Record Purchase Header, Record Purchase Header, Integer) :#

procedure UpdatePurchLineNonDeductibleVATDimFields(var PurchaseHeader: Record "Purchase Header"; xPurchaseHeader: Record "Purchase Header"; PurchHeaderFieldNo: Integer): 

EmptyNonDeductVATDimValues(Record Purchase Line) :#

procedure EmptyNonDeductVATDimValues(var PurchaseLine: Record "Purchase Line"): 

GetNonDeductVATDimEndDate(Record Purchase Header) : Date#

Summary: Returns the Date dependent on the date field of the VAT Setup

procedure GetNonDeductVATDimEndDate(PurchaseHeader: Record "Purchase Header"): Date

Parameters:

  • PurchaseHeader: Record "Purchase Header".

Returns: Return variable EndDate of type Date.

IsNonDeductVATUpdatePurchaseLine(Record Purchase Line, Record Purchase Line) : Boolean#

procedure IsNonDeductVATUpdatePurchaseLine(var PurchaseLine: Record "Purchase Line"; xPurchaseLine: Record "Purchase Line"): Boolean

IsPurchaseLineNonDeductVATSupported(Record Purchase Line) : Boolean#

procedure IsPurchaseLineNonDeductVATSupported(PurchaseLine: Record "Purchase Line"): Boolean

SetSuppressNonDeductVATNotification(Boolean) :#

procedure SetSuppressNonDeductVATNotification(SuppressNonDeductVATNotification: Boolean): 

SetJobLedgEntryNonDeductVATFieldsFromJobJnlLine(Record Job Ledger Entry, Record Job Journal Line) :#

procedure SetJobLedgEntryNonDeductVATFieldsFromJobJnlLine(var JobLedgerEntry: Record "Job Ledger Entry"; JobJournalLine: Record "Job Journal Line"): 

Events#

KVSPSAOnAfterCopyJobJournalLineNonDeductibleVATFieldsFromPurchaseLine(Record Job Journal Line, Record Purchase Line, Record Item, Decimal, Decimal) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnAfterCopyJobJournalLineNonDeductibleVATFieldsFromPurchaseLine(var JobJournalLine: Record "Job Journal Line"; PurchaseLine: Record "Purchase Line"; Item: Record "Item"; NonDeductibleVATAmtPerUnitLCY: Decimal; NonDeductibleVATAmtPerUnit: Decimal): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSANonDeductVATPurchaseMgt", 'KVSPSAOnAfterCopyJobJournalLineNonDeductibleVATFieldsFromPurchaseLine', '', false, false)]
local procedure DoSomethingKVSPSAOnAfterCopyJobJournalLineNonDeductibleVATFieldsFromPurchaseLine(var JobJournalLine: Record "Job Journal Line"; PurchaseLine: Record "Purchase Line"; Item: Record "Item"; NonDeductibleVATAmtPerUnitLCY: Decimal; NonDeductibleVATAmtPerUnit: Decimal)
begin
end;

KVSPSAOnAfterEmptyNonDeductVATDimValues(Record Purchase Line, Record VAT Setup) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnAfterEmptyNonDeductVATDimValues(var PurchaseLine: Record "Purchase Line"; VATSetup: Record "VAT Setup"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSANonDeductVATPurchaseMgt", 'KVSPSAOnAfterEmptyNonDeductVATDimValues', '', false, false)]
local procedure DoSomethingKVSPSAOnAfterEmptyNonDeductVATDimValues(var PurchaseLine: Record "Purchase Line"; VATSetup: Record "VAT Setup")
begin
end;

KVSPSAOnAfterGetNonDeductVATDimInfosFromDimensionSetIDBeforeValidNonDeductDimValue(Record Purchase Line, Date, Code[20], Code[20], Decimal, Boolean) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnAfterGetNonDeductVATDimInfosFromDimensionSetIDBeforeValidNonDeductDimValue(var PurchaseLine: Record "Purchase Line"; EndDate: Date; var NonDeductVATDimCode: Code[20]; var NonDeductVATDimValue: Code[20]; var NonDeductibleVATPct: Decimal; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSANonDeductVATPurchaseMgt", 'KVSPSAOnAfterGetNonDeductVATDimInfosFromDimensionSetIDBeforeValidNonDeductDimValue', '', false, false)]
local procedure DoSomethingKVSPSAOnAfterGetNonDeductVATDimInfosFromDimensionSetIDBeforeValidNonDeductDimValue(var PurchaseLine: Record "Purchase Line"; EndDate: Date; var NonDeductVATDimCode: Code[20]; var NonDeductVATDimValue: Code[20]; var NonDeductibleVATPct: Decimal; var IsHandled: Boolean)
begin
end;

KVSPSAOnAfterSetJobJnlLineNonDeductVATFieldsFromFALedgerEntry(Record Job Journal Line, Record FA Ledger Entry, Option) :#

[IntegrationEvent(false, false)]
procedure KVSPSAOnAfterSetJobJnlLineNonDeductVATFieldsFromFALedgerEntry(var JobJournalLine: Record "Job Journal Line"; FALedgerEntry: Record "FA Ledger Entry"; PostingMode: Option): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSANonDeductVATPurchaseMgt", 'KVSPSAOnAfterSetJobJnlLineNonDeductVATFieldsFromFALedgerEntry', '', false, false)]
local procedure DoSomethingKVSPSAOnAfterSetJobJnlLineNonDeductVATFieldsFromFALedgerEntry(var JobJournalLine: Record "Job Journal Line"; FALedgerEntry: Record "FA Ledger Entry"; PostingMode: Option)
begin
end;

KVSPSAOnAfterSetJobJnlLineNonDeductVATFieldsFromJobLedgerEntry(Record Job Journal Line, Record Job Ledger Entry) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnAfterSetJobJnlLineNonDeductVATFieldsFromJobLedgerEntry(var JobJournalLine: Record "Job Journal Line"; JobLedgerEntry: Record "Job Ledger Entry"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSANonDeductVATPurchaseMgt", 'KVSPSAOnAfterSetJobJnlLineNonDeductVATFieldsFromJobLedgerEntry', '', false, false)]
local procedure DoSomethingKVSPSAOnAfterSetJobJnlLineNonDeductVATFieldsFromJobLedgerEntry(var JobJournalLine: Record "Job Journal Line"; JobLedgerEntry: Record "Job Ledger Entry")
begin
end;

KVSPSAOnAfterSetJobLedgEntryNonDeductVATFieldsFromJobJnlLine(Record Job Ledger Entry, Record Job Journal Line) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnAfterSetJobLedgEntryNonDeductVATFieldsFromJobJnlLine(var JobLedgerEntry: Record "Job Ledger Entry"; JobJournalLine: Record "Job Journal Line"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSANonDeductVATPurchaseMgt", 'KVSPSAOnAfterSetJobLedgEntryNonDeductVATFieldsFromJobJnlLine', '', false, false)]
local procedure DoSomethingKVSPSAOnAfterSetJobLedgEntryNonDeductVATFieldsFromJobJnlLine(var JobLedgerEntry: Record "Job Ledger Entry"; JobJournalLine: Record "Job Journal Line")
begin
end;

KVSPSAOnAfterSetNonDeductibleVATPerDimension(Record Purchase Line, Record Purchase Header, Decimal) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnAfterSetNonDeductibleVATPerDimension(var PurchaseLine: Record "Purchase Line"; PurchaseHeader: Record "Purchase Header"; var NonDeductibleVATPct: Decimal): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSANonDeductVATPurchaseMgt", 'KVSPSAOnAfterSetNonDeductibleVATPerDimension', '', false, false)]
local procedure DoSomethingKVSPSAOnAfterSetNonDeductibleVATPerDimension(var PurchaseLine: Record "Purchase Line"; PurchaseHeader: Record "Purchase Header"; var NonDeductibleVATPct: Decimal)
begin
end;

KVSPSAOnBeforeCheckPurchDocHasMissingNonDeductVATDimPosting(Record Purchase Header, Boolean, Boolean, Boolean) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeCheckPurchDocHasMissingNonDeductVATDimPosting(var PurchaseHeader: Record "Purchase Header"; PreviewMode: Boolean; ManualRelease: Boolean; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSANonDeductVATPurchaseMgt", 'KVSPSAOnBeforeCheckPurchDocHasMissingNonDeductVATDimPosting', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeCheckPurchDocHasMissingNonDeductVATDimPosting(var PurchaseHeader: Record "Purchase Header"; PreviewMode: Boolean; ManualRelease: Boolean; var IsHandled: Boolean)
begin
end;

KVSPSAOnBeforeCopyJobJournalLineNonDeductibleVATFieldsFromPurchaseLine(Record Job Journal Line, Record Purchase Line, Record Item, Decimal, Decimal, Boolean) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeCopyJobJournalLineNonDeductibleVATFieldsFromPurchaseLine(var JobJournalLine: Record "Job Journal Line"; PurchaseLine: Record "Purchase Line"; Item: Record "Item"; NonDeductibleVATAmtPerUnitLCY: Decimal; NonDeductibleVATAmtPerUnit: Decimal; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSANonDeductVATPurchaseMgt", 'KVSPSAOnBeforeCopyJobJournalLineNonDeductibleVATFieldsFromPurchaseLine', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeCopyJobJournalLineNonDeductibleVATFieldsFromPurchaseLine(var JobJournalLine: Record "Job Journal Line"; PurchaseLine: Record "Purchase Line"; Item: Record "Item"; NonDeductibleVATAmtPerUnitLCY: Decimal; NonDeductibleVATAmtPerUnit: Decimal; var IsHandled: Boolean)
begin
end;

KVSPSAOnBeforeFillPurchLineDeductibleVATDimValuesFromDimSetID(Record Purchase Line, Boolean) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeFillPurchLineDeductibleVATDimValuesFromDimSetID(var PurchaseLine: Record "Purchase Line"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSANonDeductVATPurchaseMgt", 'KVSPSAOnBeforeFillPurchLineDeductibleVATDimValuesFromDimSetID', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeFillPurchLineDeductibleVATDimValuesFromDimSetID(var PurchaseLine: Record "Purchase Line"; var IsHandled: Boolean)
begin
end;

KVSPSAOnBeforeFillPurchLineDeductVATDimValuesFromDimSetID(Record Purchase Line, Boolean) :#

Obsolete

This Element will be removed or changed with a future Version of the App.

[Obsolete('Use KVSPSAOnBeforeFillPurchLineDeductibleVATDimValuesFromDimSetID instead', '23.2')]
[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeFillPurchLineDeductVATDimValuesFromDimSetID(var PurchaseLine: Record "Purchase Line"; IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSANonDeductVATPurchaseMgt", 'KVSPSAOnBeforeFillPurchLineDeductVATDimValuesFromDimSetID', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeFillPurchLineDeductVATDimValuesFromDimSetID(var PurchaseLine: Record "Purchase Line"; IsHandled: Boolean)
begin
end;

KVSPSAOnBeforeFillPurchLineDeductVATWithNonDeductDimOfLine(Record Purchase Line, Boolean, Boolean) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeFillPurchLineDeductVATWithNonDeductDimOfLine(var PurchaseLine: Record "Purchase Line"; var ValidNonDeductDimValue: Boolean; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSANonDeductVATPurchaseMgt", 'KVSPSAOnBeforeFillPurchLineDeductVATWithNonDeductDimOfLine', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeFillPurchLineDeductVATWithNonDeductDimOfLine(var PurchaseLine: Record "Purchase Line"; var ValidNonDeductDimValue: Boolean; var IsHandled: Boolean)
begin
end;

KVSPSAOnBeforeGetNonDeductVATDimEndDate(Record Purchase Header, Date, Boolean) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeGetNonDeductVATDimEndDate(PurchaseHeader: Record "Purchase Header"; var EndDate: Date; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSANonDeductVATPurchaseMgt", 'KVSPSAOnBeforeGetNonDeductVATDimEndDate', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeGetNonDeductVATDimEndDate(PurchaseHeader: Record "Purchase Header"; var EndDate: Date; var IsHandled: Boolean)
begin
end;

KVSPSAOnBeforeIsNonDeductVATUpdatePurchaseLine(Record Purchase Line, Record Purchase Line, Boolean, Boolean) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeIsNonDeductVATUpdatePurchaseLine(PurchaseLine: Record "Purchase Line"; xPurchaseLine: Record "Purchase Line"; var IsHandled: Boolean; var Result: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSANonDeductVATPurchaseMgt", 'KVSPSAOnBeforeIsNonDeductVATUpdatePurchaseLine', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeIsNonDeductVATUpdatePurchaseLine(PurchaseLine: Record "Purchase Line"; xPurchaseLine: Record "Purchase Line"; var IsHandled: Boolean; var Result: Boolean)
begin
end;

KVSPSAOnBeforeIsPurchaseLineNonDeductVATSupported(Record Purchase Line, Boolean, Boolean) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeIsPurchaseLineNonDeductVATSupported(PurchaseLine: Record "Purchase Line"; var IsHandled: Boolean; var Result: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSANonDeductVATPurchaseMgt", 'KVSPSAOnBeforeIsPurchaseLineNonDeductVATSupported', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeIsPurchaseLineNonDeductVATSupported(PurchaseLine: Record "Purchase Line"; var IsHandled: Boolean; var Result: Boolean)
begin
end;

KVSPSAOnBeforeOnAfterValidateNonDeductibleVATPctPurchLine(Record Purchase Line, Record Purchase Line, Integer, Boolean) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeOnAfterValidateNonDeductibleVATPctPurchLine(var PurchaseLine: Record "Purchase Line"; var xPurchaseLine: Record "Purchase Line"; CurrFieldNo: Integer; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSANonDeductVATPurchaseMgt", 'KVSPSAOnBeforeOnAfterValidateNonDeductibleVATPctPurchLine', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeOnAfterValidateNonDeductibleVATPctPurchLine(var PurchaseLine: Record "Purchase Line"; var xPurchaseLine: Record "Purchase Line"; CurrFieldNo: Integer; var IsHandled: Boolean)
begin
end;

KVSPSAOnBeforePurchLineHasMissingVATDedPosting(Record Purchase Line, Boolean, Boolean, Boolean) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforePurchLineHasMissingVATDedPosting(PurchaseLine: Record "Purchase Line"; var MissingDimSetup: Boolean; var Result: Boolean; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSANonDeductVATPurchaseMgt", 'KVSPSAOnBeforePurchLineHasMissingVATDedPosting', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforePurchLineHasMissingVATDedPosting(PurchaseLine: Record "Purchase Line"; var MissingDimSetup: Boolean; var Result: Boolean; var IsHandled: Boolean)
begin
end;

KVSPSAOnBeforePurchLineHasMissingVATDeductiblePosting(Record Purchase Line, Boolean, Boolean, Boolean) :#

Obsolete

This Element will be removed or changed with a future Version of the App.

[Obsolete('Use KVSPSAOnBeforePurchLineHasMissingVATDedPosting instead', '23.2')]
[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforePurchLineHasMissingVATDeductiblePosting(PurchaseLine: Record "Purchase Line"; var MissingDimSetup: Boolean; var Result: Boolean; IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSANonDeductVATPurchaseMgt", 'KVSPSAOnBeforePurchLineHasMissingVATDeductiblePosting', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforePurchLineHasMissingVATDeductiblePosting(PurchaseLine: Record "Purchase Line"; var MissingDimSetup: Boolean; var Result: Boolean; IsHandled: Boolean)
begin
end;

KVSPSAOnBeforeSetNonDeductibleVATPerDimension(Record Purchase Line, Record Purchase Header, Decimal, Boolean, Boolean) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeSetNonDeductibleVATPerDimension(var PurchaseLine: Record "Purchase Line"; PurchaseHeader: Record "Purchase Header"; var NonDeductibleVATPct: Decimal; var IsHandledFunction: Boolean; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSANonDeductVATPurchaseMgt", 'KVSPSAOnBeforeSetNonDeductibleVATPerDimension', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeSetNonDeductibleVATPerDimension(var PurchaseLine: Record "Purchase Line"; PurchaseHeader: Record "Purchase Header"; var NonDeductibleVATPct: Decimal; var IsHandledFunction: Boolean; var IsHandled: Boolean)
begin
end;

KVSPSAOnBeforeSetNonDeductVATDimValues(Record Purchase Line, Record Purchase Header, Decimal, Boolean, Boolean, Boolean) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeSetNonDeductVATDimValues(var PurchaseLine: Record "Purchase Line"; PurchaseHeader: Record "Purchase Header"; var NonDeductibleVATPct: Decimal; var ValidNonDeductDimValue: Boolean; var ValidateLine: Boolean; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSANonDeductVATPurchaseMgt", 'KVSPSAOnBeforeSetNonDeductVATDimValues', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeSetNonDeductVATDimValues(var PurchaseLine: Record "Purchase Line"; PurchaseHeader: Record "Purchase Header"; var NonDeductibleVATPct: Decimal; var ValidNonDeductDimValue: Boolean; var ValidateLine: Boolean; var IsHandled: Boolean)
begin
end;

KVSPSAOnBeforeUpdateLineSetNonDeductVATDimValues(Record Purchase Line, Record Purchase Header, Decimal, Boolean, Boolean, Boolean, Boolean) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeUpdateLineSetNonDeductVATDimValues(var PurchaseLine: Record "Purchase Line"; PurchaseHeader: Record "Purchase Header"; var NonDeductibleVATPct: Decimal; var ValidNonDeductDimValue: Boolean; var ValidateLine: Boolean; var UpdateLine: Boolean; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSANonDeductVATPurchaseMgt", 'KVSPSAOnBeforeUpdateLineSetNonDeductVATDimValues', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeUpdateLineSetNonDeductVATDimValues(var PurchaseLine: Record "Purchase Line"; PurchaseHeader: Record "Purchase Header"; var NonDeductibleVATPct: Decimal; var ValidNonDeductDimValue: Boolean; var ValidateLine: Boolean; var UpdateLine: Boolean; var IsHandled: Boolean)
begin
end;

KVSPSAOnBeforeUpdatePurchLineNonDeductibleVATDimFields(Record Purchase Header, Record Purchase Header, Integer, Boolean) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeUpdatePurchLineNonDeductibleVATDimFields(PurchaseHeader: Record "Purchase Header"; xPurchaseHeader: Record "Purchase Header"; PurchHeaderFieldNo: Integer; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSANonDeductVATPurchaseMgt", 'KVSPSAOnBeforeUpdatePurchLineNonDeductibleVATDimFields', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeUpdatePurchLineNonDeductibleVATDimFields(PurchaseHeader: Record "Purchase Header"; xPurchaseHeader: Record "Purchase Header"; PurchHeaderFieldNo: Integer; var IsHandled: Boolean)
begin
end;

KVSPSAOnGetNonDeductVATDimEndDatePurchHeaderOnBeforeStatusElse(Record VAT Setup, Record Purchase Header, Date, Boolean) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnGetNonDeductVATDimEndDatePurchHeaderOnBeforeStatusElse(VATSetup: Record "VAT Setup"; PurchaseHeader: Record "Purchase Header"; var EndDate: Date; var IsCaseHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSANonDeductVATPurchaseMgt", 'KVSPSAOnGetNonDeductVATDimEndDatePurchHeaderOnBeforeStatusElse', '', false, false)]
local procedure DoSomethingKVSPSAOnGetNonDeductVATDimEndDatePurchHeaderOnBeforeStatusElse(VATSetup: Record "VAT Setup"; PurchaseHeader: Record "Purchase Header"; var EndDate: Date; var IsCaseHandled: Boolean)
begin
end;

KVSPSAOnUpdatePurchLineNonDeductibleVATDimFieldsOnBeforeStatusElse(Record VAT Setup, Record Purchase Header, Boolean, Boolean) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnUpdatePurchLineNonDeductibleVATDimFieldsOnBeforeStatusElse(VATSetup: Record "VAT Setup"; PurchaseHeader: Record "Purchase Header"; var IsUpdate: Boolean; var IsCaseHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSANonDeductVATPurchaseMgt", 'KVSPSAOnUpdatePurchLineNonDeductibleVATDimFieldsOnBeforeStatusElse', '', false, false)]
local procedure DoSomethingKVSPSAOnUpdatePurchLineNonDeductibleVATDimFieldsOnBeforeStatusElse(VATSetup: Record "VAT Setup"; PurchaseHeader: Record "Purchase Header"; var IsUpdate: Boolean; var IsCaseHandled: Boolean)
begin
end;