Table of Contents

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

Summary: This procedure calls SetNonDeductibleVATPerDimension with Purchase Header from provided Purchase Line.

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

Parameters:

  • PurchaseLine: Record used to get Purchase Header.
  • NonDeductibleVATPct: Decimal used for procedure.

Returns: Return result if SetNonDeductibleVATPerDimension runs successfully or not.

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

Summary: This procedure checks if SetNonDeductVATDimValues should be called or not.

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

Parameters:

  • PurchaseLine: Record used for procedure.
  • PurchaseHeader: Record used for procedure.
  • NonDeductibleVATPct: Decimal used for procedure.

Returns: Return result if SetNonDeductVATDimValues has been called or not.

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

Summary: This procedure sets values of Non-Deductible VAT Dimension fields and it relates fields in the Purchase Line base on various conditions.

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

Parameters:

  • PurchaseLine: Record used for assigned values.
  • PurchaseHeader: Record used for assigned values.
  • NonDeductibleVATPct: Decimal used for assigned value.
  • ValidateLine: Boolean used for check conditions.

Returns: Return result if Non-Deductible VAT Dimension fields and it relates fields are set or not.

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

Summary: This procedure updates Non-Deductible VAT Dimension fields and it relates fields in the Purchase Line based on changes in the Purchase Header.

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

Parameters:

  • PurchaseHeader: Record used for checking changes.
  • xPurchaseHeader: Record used for comparing changes.
  • PurchHeaderFieldNo: Field number of the Purchase Header that has changed used for checking conditions.

EmptyNonDeductVATDimValues(Record Purchase Line) :

Summary: This procedure clears value of Non-Deductible VAT Dimension fields in the Purchase Line.

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

Parameters:

  • PurchaseLine: Record used for clearing values.

GetNonDeductVATDimEndDate(Record Purchase Header) : Date

OBSOLETE

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

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

[Obsolete('Use GetNonDeductVATDimEndDate with Purchaseline-parameter', '26.1')]
procedure GetNonDeductVATDimEndDate(PurchaseHeader: Record "Purchase Header"): Date

Parameters:

  • PurchaseHeader: Record "Purchase Header".

Returns: Return variable EndDate of type Date.

GetNonDeductVATDimEndDate(Record Purchase Header, Record Purchase Line) : Date

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

procedure GetNonDeductVATDimEndDate(PurchaseHeader: Record "Purchase Header"; PurchaseLine: Record "Purchase Line"): Date

Parameters:

  • PurchaseHeader: Record "Purchase Header".
  • PurchaseLine: Record Purchase Line

Returns: Return variable EndDate of type Date.

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

Summary: This procedure checks if the Non-Deductible VAT Dimension values have been changed in the Purchase Line.

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

Parameters:

  • PurchaseLine: Record used for checking changes.
  • xPurchaseLine: Record used for comparing changes.

Returns: Return result if Non-Deductible VAT Dimension values have been changed or not.

IsPurchaseLineNonDeductVATSupported(Record Purchase Line) : Boolean

Summary: This procedure checks if the provided Purchase Line supports Non-Deductible VAT.

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

Parameters:

  • PurchaseLine: Record used for checking.

Returns: Return result if Purchase Line supports Non-Deductible VAT or not.

SetSuppressNonDeductVATNotification(Boolean) :

Summary: This procedure sets value of GlobalSuppressNonDeductVATNotification.

procedure SetSuppressNonDeductVATNotification(SuppressNonDeductVATNotification: Boolean):

Parameters:

  • SuppressNonDeductVATNotification: Boolean used for assigning value.

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

Summary: This procedure sets Non-Deductible VAT fields in the Job Ledger Entry from the Job Journal Line if conditions are met.

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

Parameters:

  • JobLedgerEntry: Record used for assigned values.
  • JobJournalLine: Record used for assigned values.

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):

KVSPSAOnAfterEmptyNonDeductVATDimValues(Record Purchase Line, Record VAT Setup) :

[IntegrationEvent(false, false)]
local procedure KVSPSAOnAfterEmptyNonDeductVATDimValues(var PurchaseLine: Record "Purchase Line"; VATSetup: Record "VAT Setup"):

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):

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):

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"):

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"):

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):

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):

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):

KVSPSAOnBeforeFillPurchLineDeductibleVATDimValuesFromDimSetID(Record Purchase Line, Boolean) :

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeFillPurchLineDeductibleVATDimValuesFromDimSetID(var PurchaseLine: Record "Purchase Line"; var IsHandled: Boolean):

KVSPSAOnBeforeFillPurchLineDeductVATWithNonDeductDimOfLine(Record Purchase Line, Boolean, Boolean) :

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeFillPurchLineDeductVATWithNonDeductDimOfLine(var PurchaseLine: Record "Purchase Line"; var ValidNonDeductDimValue: Boolean; var IsHandled: Boolean):

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

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeGetNonDeductVATDimEndDate(PurchaseHeader: Record "Purchase Header"; var EndDate: Date; var IsHandled: Boolean; PurchaseLine: Record "Purchase Line"):

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):

KVSPSAOnBeforeIsPurchaseLineNonDeductVATSupported(Record Purchase Line, Boolean, Boolean) :

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeIsPurchaseLineNonDeductVATSupported(PurchaseLine: Record "Purchase Line"; var IsHandled: Boolean; var Result: Boolean):

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):

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):

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):

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):

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):

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):

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

[IntegrationEvent(false, false)]
local procedure KVSPSAOnGetNonDeductVATDimEndDatePurchHeaderOnBeforeStatusElse(VATSetup: Record "VAT Setup"; PurchaseHeader: Record "Purchase Header"; var EndDate: Date; var IsCaseHandled: Boolean; PurchaseLine: Record "Purchase Line"):

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):

KVSPSAOnBeforeGetDateFromPostedReceiptOrShipment(Record Purchase Line, Date, Date, Boolean, Boolean) :

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeGetDateFromPostedReceiptOrShipment(PurchaseLine: Record "Purchase Line"; var DocumentDate: Date; var PostingDate: Date; var ReturnValue: Boolean; var IsHandled: Boolean):