KVSPSANonDeductVATSingleInst#

Procedures#

ClearVATSetup() :#

Summary: This procedure clear value of GlobalVATSetupRead.

Syntax

procedure ClearVATSetup():

IsNonDeductVATPerDimensionEnabled() : Boolean#

Summary: This procedure checks if Non-Deductible VAT Type is set to Dimension in VAT Setup.

Syntax

procedure IsNonDeductVATPerDimensionEnabled(): Boolean

Returns: Return resulf if Non-Deductible VAT Type is set to Dimension.

ClearNewNonDeductVATPctPurchaseLine() :#

Summary: This procedure clears the value of GlobalNewNonDeductVATPctPurchaseLine.

Syntax

procedure ClearNewNonDeductVATPctPurchaseLine():

ClearSkipNonDeductVATPctPurchaseLineValidate() :#

Summary: This procedure clears the value of GlobalSkipNonDeductVATPctPurchaseLineValidate.

Syntax

procedure ClearSkipNonDeductVATPctPurchaseLineValidate():

GetManualPurchReleaseFinished() : Boolean#

Summary: This procedure returns the value of GlobalManualPurchReleaseFinished. It also resets the value of GlobalManualPurchReleaseFinished to false.

Syntax

procedure GetManualPurchReleaseFinished(): Boolean

Returns: Returns the value of GlobalManualPurchReleaseFinished.

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

Summary: This procedure checks if GlobalNewNonDeductVATPctPurchaseLine has same RecordId with provided PurchaseLine. If it matches and Non-Deductible VAT Per Dimension is enabled, it make NewPurchaseLine equal to GlobalNewNonDeductVATPctPurchaseLine and clears GlobalNewNonDeductVATPctPurchaseLine.

Syntax

procedure GetNewNonDeductVATPctPurchaseLine(PurchaseLine: Record "Purchase Line"; var NewPurchaseLine: Record "Purchase Line"): Boolean

Parameters:

PurchaseLine: Record used to compare RecordId.
NewPurchaseLine: Record to be filled with GlobalNewNonDeductVATPctPurchaseLine if conditions are met.

Returns: Return result if GlobalNewNonDeductVATPctPurchaseLine has same RecordId with PurchaseLine or not.

SetManualPurchReleaseFinished(Boolean) :#

Summary: This procedure sets the value of GlobalManualPurchReleaseFinished to the provided ManualPurchReleaseFinished parameter.

Syntax

procedure SetManualPurchReleaseFinished(ManualPurchReleaseFinished: Boolean):

Parameters:

ManualPurchReleaseFinished: Boolean value to set GlobalManualPurchReleaseFinished.

SetNewNonDeductVATPctPurchaseLine(Record Purchase Line) :#

Summary: This procedure sets the value of GlobalNewNonDeductVATPctPurchaseLine to the provided PurchaseLine parameter if Non-Deductible VAT Per Dimension is enabled.

Syntax

procedure SetNewNonDeductVATPctPurchaseLine(PurchaseLine: Record "Purchase Line"):

Parameters:

PurchaseLine: Record used to set GlobalNewNonDeductVATPctPurchaseLine.

SetSkipNonDeductVATPctPurchaseLineValidate(Boolean) :#

Syntax

procedure SetSkipNonDeductVATPctPurchaseLineValidate(SkipNonDeductVATPctPurchaseLineValidate: Boolean):

ClearNewNonDeductVATPctGenJournalLine() :#

Summary: This procedure clears the value of GlobalNewNonDeductVATPctGenJournalLine.

Syntax

procedure ClearNewNonDeductVATPctGenJournalLine():

ClearSkipNonDeductVATPctGenJournalLineValidate() :#

Summary: This procedure clears the value of GlobalSkipNonDeductVATPctGenJournalLineValidate.

Syntax

procedure ClearSkipNonDeductVATPctGenJournalLineValidate():

GetNewNonDeductVATPctGenJournalLine(Record Gen. Journal Line, Record Gen. Journal Line) : Boolean#

Summary: This procedure checks if GlobalNewNonDeductVATPctGenJournalLine has same RecordId with provided GenJournalLine. If it matches and Non-Deductible VAT Per Dimension is enabled, it makes NewGenJournalLine equal to GlobalNewNonDeductVATPctGenJournalLine and clears GlobalNewNonDeductVATPctGenJournalLine.

Syntax

procedure GetNewNonDeductVATPctGenJournalLine(GenJournalLine: Record "Gen. Journal Line"; var NewGenJournalLine: Record "Gen. Journal Line"): Boolean

Parameters:

GenJournalLine: Record used to compare RecordId.
NewGenJournalLine: Record to be filled with GlobalNewNonDeductVATPctGenJournalLine if conditions are met.

Returns: Return result if GlobalNewNonDeductVATPctGenJournalLine has same RecordId with GenJournalLine or not.

SetNewNonDeductVATPctGenJournalLine(Record Gen. Journal Line) :#

Summary: This procedure sets the value of GlobalManualPurchReleaseFinished to the provided Gen. Journal Line if Non-Deductible VAT Per Dimension is enabled.

Syntax

procedure SetNewNonDeductVATPctGenJournalLine(GenJournalLine: Record "Gen. Journal Line"):

Parameters:

GenJournalLine: Record used to set GlobalNewNonDeductVATPctGenJournalLine.

SetSkipNonDeductVATPctGenJournalLineValidate(Boolean) :#

Summary: This procedure sets the value of GlobalSkipNonDeductVATPctGenJournalLineValidate to the provided SkipNonDeductVATPctGenJournalLineValidate parameter if Non-Deductible VAT Per Dimension is enabled. if not enabled, it sets GlobalSkipNonDeductVATPctGenJournalLineValidate to true.

Syntax

procedure SetSkipNonDeductVATPctGenJournalLineValidate(SkipNonDeductVATPctGenJournalLineValidate: Boolean):

Parameters:

SkipNonDeductVATPctGenJournalLineValidate: Boolean value to set GlobalSkipNonDeductVATPctGenJournalLineValidate.

ClearNewNonDeductVATPctDeferralGenJournalLine() :#

Summary: This procedure clears the value of GlobalNewNonDeductVATPctDeferralGenJournalLine.

Syntax

procedure ClearNewNonDeductVATPctDeferralGenJournalLine():

GetNonDeductVATDimDeferralGenJournalLine(Record Gen. Journal Line) : Boolean#

Summary: This procedure checks if Non-Deductible VAT Per Dimension is enabled and if so, it returns the value of GlobalNewNonDeductVATPctDeferralGenJournalLine. If not enabled, it clears GlobalNewNonDeductVATPctDeferralGenJournal

Syntax

procedure GetNonDeductVATDimDeferralGenJournalLine(var GenJournalLine: Record "Gen. Journal Line"): Boolean

Parameters:

GenJournalLine: Record used for get returning value.

Returns: Return result if Non-Deductible VAT Per Dimension is enabled or not.

SetNonDeductVATDimDeferralGenJournalLine(Record Gen. Journal Line) :#

Summary: This procedure sets the value of GlobalNewNonDeductVATPctDeferralGenJournalLine to the provided GenJournalLine parameter if Non-Deductible VAT Per Dimension is enabled. if not enabled, it clears GlobalNewNonDeductVATPctDeferralGenJournalLine.

Syntax

procedure SetNonDeductVATDimDeferralGenJournalLine(GenJournalLine: Record "Gen. Journal Line"):

Parameters:

GenJournalLine: Record used to set GlobalNewNonDeductVATPctDeferralGenJournalLine.

ClearFillFALedgerEntryNonDeductFields() :#

Summary: This procedure clears the value of GlobalFillFALedgerEntryNonDeductFields.

Syntax

procedure ClearFillFALedgerEntryNonDeductFields():

IsFillFALedgerEntryNonDeductFields() : Boolean#

Summary: This procedure checks if Non-Deductible VAT Per Dimension is enabled and returns the value of GlobalFillFALedgerEntryNonDeductFields.

Syntax

procedure IsFillFALedgerEntryNonDeductFields(): Boolean

Returns: Returns the value of GlobalFillFALedgerEntryNonDeductFields if Non-Deductible VAT Per Dimension is enabled, otherwise returns false.

SetFillFALedgerEntryNonDeductFields(Boolean) :#

Summary: This procedure sets the value of GlobalFillFALedgerEntryNonDeductFields to the provided FillFALedgerEntryNonDeductFields parameter if Non-Deductible VAT Per Dimension is enabled.

Syntax

procedure SetFillFALedgerEntryNonDeductFields(FillFALedgerEntryNonDeductFields: Boolean):

Parameters:

FillFALedgerEntryNonDeductFields: Boolean value to set GlobalFillFALedgerEntryNonDeductFields.

Events#

KVSPSAOnBeforeNonDeductVATPerDimensionEnabled(Record VAT Setup, Boolean, Boolean) :#

SyntaxSubscriber

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeNonDeductVATPerDimensionEnabled(VATSetup: Record "VAT Setup"; var IsHandled: Boolean; var Result: Boolean):

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSANonDeductVATSingleInst", 'KVSPSAOnBeforeNonDeductVATPerDimensionEnabled', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeNonDeductVATPerDimensionEnabled(VATSetup: Record "VAT Setup"; var IsHandled: Boolean; var Result: Boolean)
begin
end;