--- id: object/codeunit/699 type: object title: Codeunit 699 "Exch. Rate Adjmt. Process" summary: Codeunit 699 "Exch. Rate Adjmt. Process" in Base Application (Microsoft.Finance.Currency). 5 public procedures, 62 events, 1 event subscribers. Present since at least BC23, still in BC30, changed in BC24-26, BC28. tier: official language: en tags: - codeunit - base application versions: introduced: null last_changed: "28" deprecated: null review: state: derived by: null at: null flags: [] generated: at: "2026-10-11T00:31:51.816Z" pipeline: 0.2.0 prompts: {} input_hash: 84d54a483897e0e9dc429657f387d83e8a0f46c017a31031364f1fd56cd9fdbe evidence: - kind: code url: https://github.com/microsoft/BCApps/blob/ea08af5ef2d6a9b5c5af4a029288abbe2c883220/src/Layers/W1/BaseApp/Finance/Currency/ExchRateAdjmtProcess.Codeunit.al title: src/Layers/W1/BaseApp/Finance/Currency/ExchRateAdjmtProcess.Codeunit.al (releases/29.x) date: null commit: ea08af5ef2d6a9b5c5af4a029288abbe2c883220 t: null quote: null links: learn: [] objects: [] features: [] topics: [] localizations: - localization/ru videos: [] posts: [] guidelines: [] changes: - change/bcapps/11163 - change/bcapps/10808 - change/bcapps/9254 object_type: codeunit object_id: 699 name: Exch. Rate Adjmt. Process namespace: Microsoft.Finance.Currency app: Base Application extends: null first_version: "23" last_version: "30" present_in: - "23" - "24" - "25" - "26" - "27" - "28" - "29" - "30" changed_in: - "24" - "25" - "26" - "28" source_major: "29" obsolete: null countries: - ru ms_search_form_ids: [] counts: fields: 0 procedures: 173 events: 62 subscribers: 1 relations: out: 1 referenced_by: 0 pages: 0 extended_by: 0 event_subscribers: 0 calls: 6 called_by: 2 implements: 0 --- # Codeunit 699 "Exch. Rate Adjmt. Process" > Codeunit 699 "Exch. Rate Adjmt. Process" in Base Application (Microsoft.Finance.Currency). 5 public procedures, 62 events, 1 event subscribers. Present since at least BC23, still in BC30, changed in BC24-26, BC28. Base Application · Microsoft.Finance.Currency · BC23-30 · [source at ea08af5e](https://github.com/microsoft/BCApps/blob/ea08af5ef2d6a9b5c5af4a029288abbe2c883220/src/Layers/W1/BaseApp/Finance/Currency/ExchRateAdjmtProcess.Codeunit.al) · facts from BC29 ## Properties | Property | Value | |---|---| | TableNo | Exch. Rate Adjmt. Parameters | | Permissions | TableData "Cust. Ledger Entry" = rimd, TableData "Vendor Ledger Entry" = rimd, TableData "Employee Ledger Entry" = rimd, TableData "Exch. Rate Adjmt. Reg." = rimd, TableData "Exch. Rate Adjmt. Ledg. Entry" = rimd, TableData Currency = rim, TableData "VAT Entry" = rimd, TableData "Detailed Cust. Ledg... | ## Events published - `OnAfterInitDtldCustLedgerEntry(var DetailedCustLedgEntry: Record "Detailed Cust. Ledg. Entry")` (integration) - `OnAfterInitDtldVendLedgerEntry(var DetailedVendorLedgEntry: Record "Detailed Vendor Ledg. Entry")` (integration) - `OnAfterInitDtldEmplLedgerEntry(var DetailedEmployeeLedgEntry: Record "Detailed Employee Ledger Entry")` (integration) - `OnAfterInitVariablesForSetLedgEntry(var ExchRateAdjmtParameters: Record "Exch. Rate Adjmt. Parameters"; GenJournalLine: Record "Gen. Journal Line")` (integration) - `OnAfterSetDtldCustLedgEntryFilters(var DtldCustLedgEntry: Record "Detailed Cust. Ledg. Entry"; CustLedgEntry: Record "Cust. Ledger Entry")` (integration) - `OnAfterSetDtldVendLedgEntryFilters(var DtldVendLedgEntry: Record "Detailed Vendor Ledg. Entry"; VendLedgEntry: Record "Vendor Ledger Entry")` (integration) - `OnAfterSetDtldEmplLedgEntryFilters(var DtldEmplLedgEntry: Record "Detailed Employee Ledger Entry"; EmplLedgEntry: Record "Employee Ledger Entry")` (integration) - `OnAfterShouldAdjustCurrency(Currency: Record Currency; var ShouldAdjust: Boolean)` (integration) - `OnAfterShouldAdjustCustLedgEntry(CustLedgEntry: Record "Cust. Ledger Entry"; var ShouldAdjust: Boolean)` (integration) - `OnAfterShouldAdjustVendLedgEntry(VendLedgEntry: Record "Vendor Ledger Entry"; var ShouldAdjust: Boolean)` (integration) - `OnAfterShouldAdjustEmplLedgEntry(EmplLedgEntry: Record "Employee Ledger Entry"; var ShouldAdjust: Boolean)` (integration) - `OnAfterSetVATEntryFilters(var VATEntry: Record "VAT Entry")` (integration) - `OnAdjustCustomerLedgerEntryOnBeforeInitDtldCustLedgEntry(var Customer: Record Customer; CusLedgerEntry: Record "Cust. Ledger Entry")` (integration) - `OnAdjustCustomerLedgerEntryOnAfterPrepareAdjust(var CustLedgerEntry: Record "Cust. Ledger Entry"; CurrAdjAmount: Decimal; OldAdjAmount: Decimal)` (integration) - `OnAfterAdjustCustomerLedgerEntryOnAfterCalcAdjmtAmount(CustLedgerEntry: Record "Cust. Ledger Entry"; var ExchRateAdjmtParameters: Record "Exch. Rate Adjmt. Parameters"; AdjmtAmount: Decimal; Application: Boolean; var ShouldExit: Boolean)` (integration) - `OnAdjustVendorLedgerEntryOnBeforeInitDtldVendLedgEntry(var Vendor: Record Vendor; VendLedgerEntry: Record "Vendor Ledger Entry")` (integration) - `OnAdjustVendorLedgerEntryOnAfterPrepareAdjust(var VendorLedgerEntry: Record "Vendor Ledger Entry"; CurrAdjAmount: Decimal; OldAdjAmount: Decimal)` (integration) - `OnAfterAdjustVendorLedgerEntryOnAfterCalcAdjmtAmount(VendLedgerEntry: Record "Vendor Ledger Entry"; var ExchRateAdjmtParameters: Record "Exch. Rate Adjmt. Parameters"; AdjmtAmount: Decimal; Application: Boolean; var ShouldExit: Boolean)` (integration) - `OnAdjustEmployeeLedgerEntryOnBeforeInitDtldEmplLedgEntry(var Employe: Record Employee; EmplLedgerEntry: Record "Employee Ledger Entry")` (integration) - `OnAdjustEmployeeLedgerEntryOnAfterPrepareAdjust(var EmployeeLedgerEntry: Record "Employee Ledger Entry"; CurrAdjAmount: Decimal; OldAdjAmount: Decimal)` (integration) - `OnAfterAdjustEmployeeLedgerEntryOnAfterCalcAdjmtAmount(EmplLedgerEntry: Record "Employee Ledger Entry"; var ExchRateAdjmtParameters: Record "Exch. Rate Adjmt. Parameters"; AdjmtAmount: Decimal; Application: Boolean; var ShouldExit: Boolean)` (integration) - `OnAfterProcessCustomerAdjustment(var TempCustLedgerEntry: Record "Cust. Ledger Entry" temporary)` (integration) - `OnAfterProcessVendorAdjustment(var TempVendorLedgerEntry: Record "Vendor Ledger Entry" temporary)` (integration) - `OnAfterProcessEmployeeAdjustment(var TempEmployeeLedgerEntry: Record "Employee Ledger Entry" temporary)` (integration) - `OnAfterRunAdjustment(var ExchRateAdjmtParameters: Record "Exch. Rate Adjmt. Parameters" temporary)` (integration) - `OnBeforeGetBankAccountNo(BankAccount: Record "Bank Account"; var AccountNo: Code[20]; var IsHandled: Boolean)` (integration) - `OnBeforeGetCustAccountNo(CustLedgerEntry: Record "Cust. Ledger Entry"; var AccountNo: Code[20]; var IsHandled: Boolean)` (integration) - `OnBeforeGetLocalCustAccountNo(CustLedgerEntry: Record "Cust. Ledger Entry"; var AccountNo: Code[20]; var IsHandled: Boolean)` (integration) - `OnBeforeGetVendAccountNo(VendLedgerEntry: Record "Vendor Ledger Entry"; var AccountNo: Code[20]; var IsHandled: Boolean)` (integration) - `OnBeforeGetLocalVendAccountNo(VendLedgerEntry: Record "Vendor Ledger Entry"; var AccountNo: Code[20]; var IsHandled: Boolean)` (integration) - `OnBeforeGetEmplAccountNo(EmplLedgerEntry: Record "Employee Ledger Entry"; var AccountNo: Code[20]; var IsHandled: Boolean)` (integration) - `OnBeforeGetRealizedGainsAccount(Currency: Record Currency; var AccountNo: Code[20]; var IsHandled: Boolean)` (integration) - `OnBeforeGetRealizedLossesAccount(Currency: Record Currency; var AccountNo: Code[20]; var IsHandled: Boolean)` (integration) - `OnBeforeGetUnrealizedGainsAccount(Currency: Record Currency; var AccountNo: Code[20]; var IsHandled: Boolean)` (integration) - `OnBeforeGetUnrealizedLossesAccount(Currency: Record Currency; var AccountNo: Code[20]; var IsHandled: Boolean)` (integration) - `OnPostGenJnlLineOnAfterGenJnlPostLineRun(var GenJnlLine: Record "Gen. Journal Line"; var GenJnlPostLine: Codeunit "Gen. Jnl.-Post Line")` (integration) - `OnProcessBankAccountOnAfterCalcFields(var BankAccount: Record "Bank Account"; Currency: Record Currency)` (integration) - `OnPostGenJnlLineOnBeforeGenJnlPostLineRun(var GenJnlLine: Record "Gen. Journal Line"; var ExchRateAdjmtParameters: Record "Exch. Rate Adjmt. Parameters")` (integration) - `OnBeforeAdjustGLAccountsAndVATEntries(var ExchRateAdjmtParameters: Record "Exch. Rate Adjmt. Parameters"; var Currency: Record Currency; var GenJnlPostLine: Codeunit "Gen. Jnl.-Post Line")` (integration) - `OnSetPostingDimensionsElseCase(var GenJournalLine: Record "Gen. Journal Line"; var DimensionSetEntry: Record "Dimension Set Entry"; var ExchRateAdjmtParameters: Record "Exch. Rate Adjmt. Parameters" temporary)` (integration) - `OnAdjustCurrencyOnAfterSetBankAccountFilters(var BankAccount: Record "Bank Account")` (integration) - `OnAdjustCurrencyOnAfterSetBankAccountFiltersInLoop(var BankAccount: Record "Bank Account")` (integration) - `OnPrepareTempCustLedgEntryOnAfterSetCustLedgerEntryFilters(var CustLedgerEntry: Record "Cust. Ledger Entry")` (integration) - `OnPrepareTempCustLedgEntryOnAfterSetDtldCustLedgerEntryFilters(var DetailedCustLedgEntry: Record "Detailed Cust. Ledg. Entry")` (integration) - `OnPrepareTempVendLedgEntryOnAfterSetVendLedgerEntryFilters(var VendorLedgerEntry: Record "Vendor Ledger Entry")` (integration) - `OnPrepareTempVendLedgEntryOnAfterSetDtldVendLedgerEntryFilters(var DetailedVendorLedgEntry: Record "Detailed Vendor Ledg. Entry")` (integration) - `OnPrepareTempEmplLedgEntryOnAfterSetEmplLedgerEntryFilters(var EmployeeLedgerEntry: Record "Employee Ledger Entry")` (integration) - `OnPrepareTempEmplLedgEntryOnAfterSetDtldEmplLedgerEntryFilters(var DetailedEmployeeLedgerEntry: Record "Detailed Employee Ledger Entry")` (integration) - `OnSetPostingDimensionsOnCaseSourceEntryDimensions(var GenJournalLine: Record "Gen. Journal Line"; var DimensionSetEntry: Record "Dimension Set Entry")` (integration) - `OnBeforePrepareTempCustLedgEntry(var CustLedgerEntry: Record "Cust. Ledger Entry"; var TempCustLedgerEntry: Record "Cust. Ledger Entry" temporary; Customer: Record Customer; var IsHandled: Boolean)` (integration) - `OnBeforePrepareTempVendLedgEntry(var VendorLedgerEntry: Record "Vendor Ledger Entry"; var TempVendorLedgerEntry: Record "Vendor Ledger Entry" temporary; Vendor: Record Vendor; var IsHandled: Boolean)` (integration) - `OnAdjustExchRateCustOnAfterCalcFields(var CustomerLedgerEntry: Record "Cust. Ledger Entry")` (integration) - `OnAdjustCustomerLedgerEntryOnAfterCalcFields(var CustomerLedgerEntry: Record "Cust. Ledger Entry")` (integration) - `OnAdjustExchRateVendOnAfterCalcFields(var VendorLedgerEntry: Record "Vendor Ledger Entry")` (integration) - `OnProcessGLAccountAdjustmentOnBeforePostGLAccAdjmt(var GLAccount: Record "G/L Account")` (integration) - `OnAdjustVendorLedgerEntryOnAfterCalcFields(var VendorLedgerEntry: Record "Vendor Ledger Entry")` (integration) - `OnHandlePostAdjmtOnBeforePostAdjmt(var TempExchRateAdjmtBuffer2: Record "Exch. Rate Adjmt. Buffer" temporary; var Currency: Record Currency; var DimensionSetEntry: Record "Dimension Set Entry"; var AdjustAccType: Enum "Exch. Rate Adjmt. Account Type")` (integration) - `OnAfterExchRateAdjmtBufferUpdate(var ExchRateAdjmtParameters: Record "Exch. Rate Adjmt. Parameters"; var TempExchRateAdjmtBuffer: Record "Exch. Rate Adjmt. Buffer" temporary)` (integration) - `OnBeforePostAdjmt(var ExchRateAdjmtBuffer: Record "Exch. Rate Adjmt. Buffer"; var TempDimSetEntry: Record "Dimension Set Entry" temporary)` (integration) - `OnPostAdjmtOnBeforePostGenJnlLine(var GenJnlLine: Record "Gen. Journal Line"; var TempDimSetEntry: Record "Dimension Set Entry" temporary)` (integration) - `OnSetAdditionalReportingCurrencyOnBeforeCheckTaxJurisdiction(var TaxJurisdiction: Record "Tax Jurisdiction"; var IsHandled: Boolean)` (integration) - `OnSummarizeExchRateAdjmtBufferOnAfterExchRateAdjmtBuffer2SetFilters(var TempExchRateAdjmtBuffer2: Record "Exch. Rate Adjmt. Buffer" temporary; var TempExchRateAdjmtBuffer: Record "Exch. Rate Adjmt. Buffer" temporary; var ExchRateAdjmtParameters: Record "Exch. Rate Adjmt. Parameters")` (integration) ## Event subscriptions - OnRunPreview subscribes to Codeunit "Gen. Jnl.-Post Preview" OnRunPreview ## Procedures - `GetGlobalDimVal(GlobalDimCode: Code[20]; var DimSetEntry: Record "Dimension Set Entry"): Code[20]` - `Preview(var ExchRateAdjmtParameters: Record "Exch. Rate Adjmt. Parameters" temporary)` - `AdjustExchRateCust(GenJournalLine: Record "Gen. Journal Line"; var TempCustLedgerEntry: Record "Cust. Ledger Entry" temporary)` - `AdjustExchRateVend(GenJournalLine: Record "Gen. Journal Line"; var TempVendLedgerEntry: Record "Vendor Ledger Entry" temporary)` - `AdjustExchRateEmpl(GenJournalLine: Record "Gen. Journal Line"; var TempEmplLedgerEntry: Record "Employee Ledger Entry" temporary)` Plus 105 local procedures. ## Triggers OnRun ## Relations - runs on [Table 596 "Exch. Rate Adjmt. Parameters"](../table/596.md) ## Calls From the extracted call graph of BC29 (graphify-al on the snapshot checkout): calls whose target is known from a declared type or an `Object::"Name"` argument. Interface dispatch and calls through events are not counted, so the list is not complete. - [Codeunit 408 "DimensionManagement"](../codeunit/408.md) (8 calls: `GetDimSetEntry → CopyDimBufToDimSetEntry`, `GetJnlLineDefDim → AddDimSource`, `GetJnlLineDefDim → GetDefaultDimID`, …) - [Codeunit 12 "Gen. Jnl.-Post Line"](../codeunit/12.md) (4 calls: `OnRun → IsGLEntryInconsistent`, `OnRun → ShowInconsistentEntries`, `PostGenJnlLine → (object)`, …) - [Codeunit 411 "Dimension Buffer Management"](../codeunit/411.md) (3 calls: `GetDimCombID → FindDimensions`, `GetDimCombID → InsertDimensions`, `GetDimSetEntry → GetDimensions`) - [Codeunit 19 "Gen. Jnl.-Post Preview"](../codeunit/19.md) (2 calls: `OnRun → ThrowError`, `Preview → Preview`) - [Codeunit 410 "Update Analysis View"](../codeunit/410.md) (1 call: `OnRun → UpdateAll`) - [Codeunit 9500 "Sequence No. Mgt."](../codeunit/9500.md) (1 call: `OnRun → SetPreviewMode`) ## Called by - [Codeunit 599 "Exch. Rate Adjmt. Run Handler"](../codeunit/599.md) (3 calls: `RunCustExchRateAdjustment → AdjustExchRateCust`, `RunEmplExchRateAdjustment → AdjustExchRateEmpl`, `RunVendExchRateAdjustment → AdjustExchRateVend`) - [Report 596 "Exch. Rate Adjustment"](../report/596.md) (2 calls: `RunAdjustmentProcess → (object)`, `RunAdjustmentProcess → Preview`) ## Recent changes - 2026-09-11 [#11163 [29.x]Adjustment Amount is not accurate in the Exch. Rate Adjmt. Ledger Entries page if an Unrealized Gain gest registered and a second adjustment turns into a Loss.](../../changes/bcapps/11163.md) (releases/29.x, BC29, fix) - 2026-09-07 [#10808 [master] Adjustment Amount is not accurate in the Exch. Rate Adjmt. Ledger Entries page if an Unrealized Gain gest registered and a second adjustment turns into a Loss.](../../changes/bcapps/10808.md) (main, BC30, fix) - 2026-07-15 [#9254 [Master] Exchange Rate Adjustment filter not working](../../changes/bcapps/9254.md) (main, BC30, fix) ## Across versions - Present in: BC23-30 - Changed (declaration) in: BC24-26, BC28 ## Countries that replace it [RU](../../localizations/ru.md) Source: AL metadata extracted from the code (names, ids, signatures, properties); no code bodies (D10). ## Ask your agent Procedure bodies are not stored here (D10). The call sections above are our own, per object, from the BC29 call graph. For a procedure body or the calls of one procedure, ask bc-code-atlas (external, by Stefan Maron, MIT; default corpus w1-28), which the bc-observatory plugin connects: `bcatlas_resolve_node(object_type: "codeunit", object_name: "Exch. Rate Adjmt. Process")`, then `bcatlas_get_procedure_body` or `bcatlas_get_neighbors` on the returned id.