Codeunit "VendEntry-Apply Posted Entries"

ID 227

Namespace: Microsoft.Purchases.Payables

Properties

Name	Value
EventSubscriberInstance	Manual
Permissions	TableData "Vendor Ledger Entry" = rimd
TableNo	Table Microsoft.Purchases.Payables."Vendor Ledger Entry"

Methods

Apply

procedure Apply(VendLedgEntry: Record "Vendor Ledger Entry", ApplyUnapplyParameters: Record "Apply Unapply Parameters" temporary): Boolean

Parameters

Name	Type	Description
VendLedgEntry	Table Microsoft.Purchases.Payables."Vendor Ledger Entry"
ApplyUnapplyParameters	Table Microsoft.Finance.ReceivablesPayables."Apply Unapply Parameters"

Returns

Type	Description
Boolean

GetApplicationDate

procedure GetApplicationDate(VendLedgEntry: Record "Vendor Ledger Entry"): Date

Parameters

Name	Type	Description
VendLedgEntry	Table Microsoft.Purchases.Payables."Vendor Ledger Entry"

Returns

Type	Description
Date

FindLastApplEntry

procedure FindLastApplEntry(VendLedgEntryNo: Integer): Integer

Parameters

Name	Type	Description
VendLedgEntryNo	Integer

Returns

Type	Description
Integer

UnApplyDtldVendLedgEntry

procedure UnApplyDtldVendLedgEntry(DtldVendLedgEntry: Record "Detailed Vendor Ledg. Entry")

Parameters

Name	Type	Description
DtldVendLedgEntry	Table Microsoft.Purchases.Payables."Detailed Vendor Ledg. Entry"

UnApplyVendLedgEntry

procedure UnApplyVendLedgEntry(VendLedgEntryNo: Integer)

Parameters

Name	Type	Description
VendLedgEntryNo	Integer

CheckVendorLedgerEntryToUnapply

procedure CheckVendorLedgerEntryToUnapply(VendorLedgerEntryNo: Integer, var DetailedVendorLedgEntry: Record "Detailed Vendor Ledg. Entry")

Parameters

Name	Type	Description
VendorLedgerEntryNo	Integer
DetailedVendorLedgEntry	Table Microsoft.Purchases.Payables."Detailed Vendor Ledg. Entry"

PostUnApplyVendor

procedure PostUnApplyVendor(DtldVendLedgEntry2: Record "Detailed Vendor Ledg. Entry", ApplyUnapplyParameters: Record "Apply Unapply Parameters" temporary)

Parameters

Name	Type	Description
DtldVendLedgEntry2	Table Microsoft.Purchases.Payables."Detailed Vendor Ledg. Entry"
ApplyUnapplyParameters	Table Microsoft.Finance.ReceivablesPayables."Apply Unapply Parameters"

PostUnApplyVendorCommit

procedure PostUnApplyVendorCommit(DtldVendLedgEntry2: Record "Detailed Vendor Ledg. Entry", ApplyUnapplyParameters: Record "Apply Unapply Parameters" temporary, CommitChanges: Boolean)

Parameters

Name	Type	Description
DtldVendLedgEntry2	Table Microsoft.Purchases.Payables."Detailed Vendor Ledg. Entry"
ApplyUnapplyParameters	Table Microsoft.Finance.ReceivablesPayables."Apply Unapply Parameters"
CommitChanges	Boolean

CheckReversal

procedure CheckReversal(VendLedgEntryNo: Integer)

Parameters

Name	Type	Description
VendLedgEntryNo	Integer

ApplyVendEntryFormEntry

procedure ApplyVendEntryFormEntry(var ApplyingVendLedgEntry: Record "Vendor Ledger Entry")

Parameters

Name	Type	Description
ApplyingVendLedgEntry	Table Microsoft.Purchases.Payables."Vendor Ledger Entry"

PreviewApply

procedure PreviewApply(VendorLedgerEntry: Record "Vendor Ledger Entry", ApplyUnapplyParameters: Record "Apply Unapply Parameters" temporary)

Parameters

Name	Type	Description
VendorLedgerEntry	Table Microsoft.Purchases.Payables."Vendor Ledger Entry"
ApplyUnapplyParameters	Table Microsoft.Finance.ReceivablesPayables."Apply Unapply Parameters"

PreviewUnapply

procedure PreviewUnapply(DetailedVendorLedgEntry: Record "Detailed Vendor Ledg. Entry", ApplyUnapplyParameters: Record "Apply Unapply Parameters" temporary)

Parameters

Name	Type	Description
DetailedVendorLedgEntry	Table Microsoft.Purchases.Payables."Detailed Vendor Ledg. Entry"
ApplyUnapplyParameters	Table Microsoft.Finance.ReceivablesPayables."Apply Unapply Parameters"

SetApplyContext

procedure SetApplyContext(ApplyUnapplyParameters: Record "Apply Unapply Parameters" temporary)

Parameters

Name	Type	Description
ApplyUnapplyParameters	Table Microsoft.Finance.ReceivablesPayables."Apply Unapply Parameters"

SetUnapplyContext

procedure SetUnapplyContext(var DetailedVendorLedgEntry: Record "Detailed Vendor Ledg. Entry", ApplyUnapplyParameters: Record "Apply Unapply Parameters" temporary)

Parameters

Name	Type	Description
DetailedVendorLedgEntry	Table Microsoft.Purchases.Payables."Detailed Vendor Ledg. Entry"
ApplyUnapplyParameters	Table Microsoft.Finance.ReceivablesPayables."Apply Unapply Parameters"

GetAppliedVendLedgerEntries

procedure GetAppliedVendLedgerEntries(var TempAppliedVendLedgerEntry: Record "Vendor Ledger Entry" temporary, VendLedgerEntryNo: Integer)

Parameters

Name	Type	Description
TempAppliedVendLedgerEntry	Table Microsoft.Purchases.Payables."Vendor Ledger Entry"
VendLedgerEntryNo	Integer

Events

OnAfterCheckReversal

[IntegrationEvent(False,False)]
local procedure OnAfterCheckReversal(VendLedgerEntry: Record "Vendor Ledger Entry")

Parameters

Name	Type	Description
VendLedgerEntry	Table Microsoft.Purchases.Payables."Vendor Ledger Entry"

OnAfterPostApplyVendLedgEntry

[IntegrationEvent(False,False)]
local procedure OnAfterPostApplyVendLedgEntry(GenJournalLine: Record "Gen. Journal Line", VendorLedgerEntry: Record "Vendor Ledger Entry", var GenJnlPostLine: Codeunit "Gen. Jnl.-Post Line")

Parameters

Name	Type	Description
GenJournalLine	Table Microsoft.Finance.GeneralLedger.Journal."Gen. Journal Line"
VendorLedgerEntry	Table Microsoft.Purchases.Payables."Vendor Ledger Entry"
GenJnlPostLine	Codeunit Microsoft.Finance.GeneralLedger.Posting."Gen. Jnl.-Post Line"

OnAfterPostUnapplyVendLedgEntry

[IntegrationEvent(False,False)]
local procedure OnAfterPostUnapplyVendLedgEntry(GenJournalLine: Record "Gen. Journal Line", VendorLedgerEntry: Record "Vendor Ledger Entry", DetailedVendorLedgEntry: Record "Detailed Vendor Ledg. Entry", var GenJnlPostLine: Codeunit "Gen. Jnl.-Post Line", var TempVendorLedgerEntry: Record "Vendor Ledger Entry" temporary)

Parameters

Name	Type	Description
GenJournalLine	Table Microsoft.Finance.GeneralLedger.Journal."Gen. Journal Line"
VendorLedgerEntry	Table Microsoft.Purchases.Payables."Vendor Ledger Entry"
DetailedVendorLedgEntry	Table Microsoft.Purchases.Payables."Detailed Vendor Ledg. Entry"
GenJnlPostLine	Codeunit Microsoft.Finance.GeneralLedger.Posting."Gen. Jnl.-Post Line"
TempVendorLedgerEntry	Table Microsoft.Purchases.Payables."Vendor Ledger Entry"

OnAfterUnApplyVendor

[IntegrationEvent(False,False)]
local procedure OnAfterUnApplyVendor(DtldVendLedgEntry: Record "Detailed Vendor Ledg. Entry")

Parameters

Name	Type	Description
DtldVendLedgEntry	Table Microsoft.Purchases.Payables."Detailed Vendor Ledg. Entry"

OnApplyVendEntryFormEntryOnAfterCheckEntryOpen

[IntegrationEvent(False,False)]
local procedure OnApplyVendEntryFormEntryOnAfterCheckEntryOpen(ApplyingVendLedgEntry: Record "Vendor Ledger Entry")

Parameters

Name	Type	Description
ApplyingVendLedgEntry	Table Microsoft.Purchases.Payables."Vendor Ledger Entry"

OnApplyVendEntryFormEntryOnBeforeRunVendEntryEdit

[IntegrationEvent(False,False)]
local procedure OnApplyVendEntryFormEntryOnBeforeRunVendEntryEdit(var ApplyingVendLedgEntry: Record "Vendor Ledger Entry")

Parameters

Name	Type	Description
ApplyingVendLedgEntry	Table Microsoft.Purchases.Payables."Vendor Ledger Entry"

OnApplyVendEntryFormEntryOnAfterVendLedgEntrySetFilters

[IntegrationEvent(False,False)]
local procedure OnApplyVendEntryFormEntryOnAfterVendLedgEntrySetFilters(var VendorLedgEntry: Record "Vendor Ledger Entry", var ApplyToVendLedgEntry: Record "Vendor Ledger Entry", var IsHandled: Boolean, var VendEntryApplID: Code[50])

Parameters

Name	Type	Description
VendorLedgEntry	Table Microsoft.Purchases.Payables."Vendor Ledger Entry"
ApplyToVendLedgEntry	Table Microsoft.Purchases.Payables."Vendor Ledger Entry"
IsHandled	Boolean
VendEntryApplID	Code[50]

OnBeforeApply

[IntegrationEvent(False,False)]
local procedure OnBeforeApply(var VendorLedgerEntry: Record "Vendor Ledger Entry", var DocumentNo: Code[20], var ApplicationDate: Date)

Parameters

Name	Type	Description
VendorLedgerEntry	Table Microsoft.Purchases.Payables."Vendor Ledger Entry"
DocumentNo	Code[20]
ApplicationDate	Date

OnBeforeApplyVendEntryFormEntry

[IntegrationEvent(False,False)]
local procedure OnBeforeApplyVendEntryFormEntry(var ApplyingVendLedgEntry: Record "Vendor Ledger Entry", var IsHandled: Boolean)

Parameters

Name	Type	Description
ApplyingVendLedgEntry	Table Microsoft.Purchases.Payables."Vendor Ledger Entry"
IsHandled	Boolean

OnBeforeGetApplicationDate

[IntegrationEvent(False,False)]
local procedure OnBeforeGetApplicationDate(VendorLedgEntry: Record "Vendor Ledger Entry", var ApplicationDate: Date, var IsHandled: Boolean)

Parameters

Name	Type	Description
VendorLedgEntry	Table Microsoft.Purchases.Payables."Vendor Ledger Entry"
ApplicationDate	Date
IsHandled	Boolean

OnBeforePostApplyVendLedgEntry

[IntegrationEvent(False,False)]
local procedure OnBeforePostApplyVendLedgEntry(var GenJournalLine: Record "Gen. Journal Line", VendorLedgerEntry: Record "Vendor Ledger Entry", var GenJnlPostLine: Codeunit "Gen. Jnl.-Post Line", ApplyUnapplyParameters: Record "Apply Unapply Parameters" temporary)

Parameters

Name	Type	Description
GenJournalLine	Table Microsoft.Finance.GeneralLedger.Journal."Gen. Journal Line"
VendorLedgerEntry	Table Microsoft.Purchases.Payables."Vendor Ledger Entry"
GenJnlPostLine	Codeunit Microsoft.Finance.GeneralLedger.Posting."Gen. Jnl.-Post Line"
ApplyUnapplyParameters	Table Microsoft.Finance.ReceivablesPayables."Apply Unapply Parameters"

OnBeforePostUnapplyVendLedgEntry

[IntegrationEvent(False,False)]
local procedure OnBeforePostUnapplyVendLedgEntry(var GenJournalLine: Record "Gen. Journal Line", VendorLedgerEntry: Record "Vendor Ledger Entry", DetailedVendorLedgEntry: Record "Detailed Vendor Ledg. Entry", var GenJnlPostLine: Codeunit "Gen. Jnl.-Post Line", ApplyUnapplyParameters: Record "Apply Unapply Parameters" temporary)

Parameters

Name	Type	Description
GenJournalLine	Table Microsoft.Finance.GeneralLedger.Journal."Gen. Journal Line"
VendorLedgerEntry	Table Microsoft.Purchases.Payables."Vendor Ledger Entry"
DetailedVendorLedgEntry	Table Microsoft.Purchases.Payables."Detailed Vendor Ledg. Entry"
GenJnlPostLine	Codeunit Microsoft.Finance.GeneralLedger.Posting."Gen. Jnl.-Post Line"
ApplyUnapplyParameters	Table Microsoft.Finance.ReceivablesPayables."Apply Unapply Parameters"

OnCollectAffectedLedgerEntriesOnAfterSetFilters

[IntegrationEvent(False,False)]
local procedure OnCollectAffectedLedgerEntriesOnAfterSetFilters(var DetailedVendorLedgEntry: Record "Detailed Vendor Ledg. Entry", DetailedVendorLedgEntry2: Record "Detailed Vendor Ledg. Entry")

Parameters

Name	Type	Description
DetailedVendorLedgEntry	Table Microsoft.Purchases.Payables."Detailed Vendor Ledg. Entry"
DetailedVendorLedgEntry2	Table Microsoft.Purchases.Payables."Detailed Vendor Ledg. Entry"

OnFindLastApplEntryOnAfterSetFilters

[IntegrationEvent(False,False)]
local procedure OnFindLastApplEntryOnAfterSetFilters(var DetailedVendLedgEntry: Record "Detailed Vendor Ledg. Entry")

Parameters

Name	Type	Description
DetailedVendLedgEntry	Table Microsoft.Purchases.Payables."Detailed Vendor Ledg. Entry"

OnBeforeVendPostApplyVendLedgEntry

[IntegrationEvent(False,False)]
local procedure OnBeforeVendPostApplyVendLedgEntry(var HideProgressWindow: Boolean, VendLedgEntry: Record "Vendor Ledger Entry", var IsHandled: Boolean)

Parameters

Name	Type	Description
HideProgressWindow	Boolean
VendLedgEntry	Table Microsoft.Purchases.Payables."Vendor Ledger Entry"
IsHandled	Boolean

OnGetApplicationDateOnAfterSetFilters

[IntegrationEvent(False,False)]
local procedure OnGetApplicationDateOnAfterSetFilters(var ApplyToVendLedgEntry: Record "Vendor Ledger Entry", VendorLedgEntry: Record "Vendor Ledger Entry")

Parameters

Name	Type	Description
ApplyToVendLedgEntry	Table Microsoft.Purchases.Payables."Vendor Ledger Entry"
VendorLedgEntry	Table Microsoft.Purchases.Payables."Vendor Ledger Entry"

OnBeforeRunUpdateAnalysisView

[IntegrationEvent(False,False)]
local procedure OnBeforeRunUpdateAnalysisView(var IsHandled: Boolean)

Parameters

Name	Type	Description
IsHandled	Boolean

OnBeforeRunVendExchRateAdjustment

[IntegrationEvent(False,False)]
local procedure OnBeforeRunVendExchRateAdjustment(var GenJnlLine: Record "Gen. Journal Line", var TempVendorLedgerEntry: Record "Vendor Ledger Entry" temporary, var IsHandled: Boolean)

Parameters

Name	Type	Description
GenJnlLine	Table Microsoft.Finance.GeneralLedger.Journal."Gen. Journal Line"
TempVendorLedgerEntry	Table Microsoft.Purchases.Payables."Vendor Ledger Entry"
IsHandled	Boolean

OnBeforePostUnApplyVendorCommit

[IntegrationEvent(False,False)]
local procedure OnBeforePostUnApplyVendorCommit(var HideProgressWindow: Boolean, PreviewMode: Boolean, DetailedVendLedgEntry2: Record "Detailed Vendor Ledg. Entry", DocNo: Code[20], PostingDate: Date, CommitChanges: Boolean, var IsHandled: Boolean)

Parameters

Name	Type	Description
HideProgressWindow	Boolean
PreviewMode	Boolean
DetailedVendLedgEntry2	Table Microsoft.Purchases.Payables."Detailed Vendor Ledg. Entry"
DocNo	Code[20]
PostingDate	Date
CommitChanges	Boolean
IsHandled	Boolean

OnCheckUnappliedEntriesOnBeforeUnapplyAllEntriesError

[IntegrationEvent(False,False)]
local procedure OnCheckUnappliedEntriesOnBeforeUnapplyAllEntriesError(DtldVendLedgEntry: Record "Detailed Vendor Ledg. Entry", LastTransactionNo: Integer, var IsHandled: Boolean)

Parameters

Name	Type	Description
DtldVendLedgEntry	Table Microsoft.Purchases.Payables."Detailed Vendor Ledg. Entry"
LastTransactionNo	Integer
IsHandled	Boolean

OnVendPostApplyVendLedgEntryOnBeforeCommit

[IntegrationEvent(False,False)]
local procedure OnVendPostApplyVendLedgEntryOnBeforeCommit(var VendLedgerEntry: Record "Vendor Ledger Entry", var SuppressCommit: Boolean)

Parameters

Name	Type	Description
VendLedgerEntry	Table Microsoft.Purchases.Payables."Vendor Ledger Entry"
SuppressCommit	Boolean

OnBeforeUnApplyVendor

[IntegrationEvent(False,False)]
local procedure OnBeforeUnApplyVendor(DtldVendLedgEntry: Record "Detailed Vendor Ledg. Entry", var IsHandled: Boolean)

Parameters

Name	Type	Description
DtldVendLedgEntry	Table Microsoft.Purchases.Payables."Detailed Vendor Ledg. Entry"
IsHandled	Boolean

OnPostUnApplyVendorOnAfterDtldVendLedgEntrySetFilters

[IntegrationEvent(False,False)]
local procedure OnPostUnApplyVendorOnAfterDtldVendLedgEntrySetFilters(var DetailedVendorLedgEntry: Record "Detailed Vendor Ledg. Entry", DetailedVendorLedgEntry2: Record "Detailed Vendor Ledg. Entry")

Parameters

Name	Type	Description
DetailedVendorLedgEntry	Table Microsoft.Purchases.Payables."Detailed Vendor Ledg. Entry"
DetailedVendorLedgEntry2	Table Microsoft.Purchases.Payables."Detailed Vendor Ledg. Entry"

OnPostUnApplyVendorOnAfterGetVendLedgEntry

[IntegrationEvent(False,False)]
local procedure OnPostUnApplyVendorOnAfterGetVendLedgEntry(var VendorLedgerEntry: Record "Vendor Ledger Entry")

Parameters

Name	Type	Description
VendorLedgerEntry	Table Microsoft.Purchases.Payables."Vendor Ledger Entry"

OnApplyOnBeforePmtTolVend

[IntegrationEvent(False,False)]
local procedure OnApplyOnBeforePmtTolVend(VendLedgEntry: Record "Vendor Ledger Entry", var PaymentToleranceMgt: Codeunit "Payment Tolerance Management", PreviewMode: Boolean, var IsHandled: Boolean)

Parameters

Name	Type	Description
VendLedgEntry	Table Microsoft.Purchases.Payables."Vendor Ledger Entry"
PaymentToleranceMgt	Codeunit Microsoft.Finance.ReceivablesPayables."Payment Tolerance Management"
PreviewMode	Boolean
IsHandled	Boolean

OnPostUnApplyVendorCommitOnBeforeFilterDtldVendLedgEntry

[IntegrationEvent(False,False)]
local procedure OnPostUnApplyVendorCommitOnBeforeFilterDtldVendLedgEntry(DetailedVendorLedgEntry2: Record "Detailed Vendor Ledg. Entry", ApplyUnapplyParameters: Record "Apply Unapply Parameters" temporary)

Parameters

Name	Type	Description
DetailedVendorLedgEntry2	Table Microsoft.Purchases.Payables."Detailed Vendor Ledg. Entry"
ApplyUnapplyParameters	Table Microsoft.Finance.ReceivablesPayables."Apply Unapply Parameters"

OnApplyOnBeforeVendPostApplyVendLedgEntry

[IntegrationEvent(False,False)]
local procedure OnApplyOnBeforeVendPostApplyVendLedgEntry(VendorLedgerEntry: Record "Vendor Ledger Entry", var ApplyUnapplyParameters: Record "Apply Unapply Parameters" temporary)

Parameters

Name	Type	Description
VendorLedgerEntry	Table Microsoft.Purchases.Payables."Vendor Ledger Entry"
ApplyUnapplyParameters	Table Microsoft.Finance.ReceivablesPayables."Apply Unapply Parameters"

OnApplyOnBeforePostingDateMustNotBeBeforeError

[IntegrationEvent(False,False)]
local procedure OnApplyOnBeforePostingDateMustNotBeBeforeError(var ApplyUnapplyParameters: Record "Apply Unapply Parameters" temporary, var VendorLedgerEntry: Record "Vendor Ledger Entry", PreviewMode: Boolean, var IsHandled: Boolean)

Parameters

Name	Type	Description
ApplyUnapplyParameters	Table Microsoft.Finance.ReceivablesPayables."Apply Unapply Parameters"
VendorLedgerEntry	Table Microsoft.Purchases.Payables."Vendor Ledger Entry"
PreviewMode	Boolean
IsHandled	Boolean

OnPostUnApplyVendorCommitOnBeforePostingDateMustNotBeBeforeError

[IntegrationEvent(False,False)]
local procedure OnPostUnApplyVendorCommitOnBeforePostingDateMustNotBeBeforeError(var ApplyUnapplyParameters: Record "Apply Unapply Parameters" temporary, var DetailedVendorLedgEntry2: Record "Detailed Vendor Ledg. Entry", PreviewMode: Boolean, var IsHandled: Boolean)

Parameters

Name	Type	Description
ApplyUnapplyParameters	Table Microsoft.Finance.ReceivablesPayables."Apply Unapply Parameters"
DetailedVendorLedgEntry2	Table Microsoft.Purchases.Payables."Detailed Vendor Ledg. Entry"
PreviewMode	Boolean
IsHandled	Boolean