Why do you need this change?
You added the OnGetFAAddCurrExchRateOnBeforeFADeprBookTestField Event from one of my previous request: Internal work item: AB#582388
It turns out our client now need another modification that would required the Gen. Journal Line variable to be accessible in the Event
Can you please change this:
if UseFAAddCurrExchRate then begin
FADeprBook.Get(FANo, "Depreciation Book Code");
IsHandled := false;
OnGetFAAddCurrExchRateOnBeforeFADeprBookTestField(FADeprBook, IsHandled);
if IsHandled then
exit;
FADeprBook.TestField("FA Add.-Currency Factor");
"FA Add.-Currency Factor" := FADeprBook."FA Add.-Currency Factor";
end;
[IntegrationEvent(false, false)]
local procedure OnGetFAAddCurrExchRateOnBeforeFADeprBookTestField(var FADeprBook: Record "FA Depreciation Book"; var IsHandled: Boolean);
begin
end;
To this:
if UseFAAddCurrExchRate then begin
FADeprBook.Get(FANo, "Depreciation Book Code");
IsHandled := false;
OnGetFAAddCurrExchRateOnBeforeFADeprBookTestField(FADeprBook, Rec, IsHandled);
if IsHandled then
exit;
FADeprBook.TestField("FA Add.-Currency Factor");
"FA Add.-Currency Factor" := FADeprBook."FA Add.-Currency Factor";
end;
[IntegrationEvent(false, false)]
local procedure OnGetFAAddCurrExchRateOnBeforeFADeprBookTestField(var FADeprBook: Record "FA Depreciation Book"; var GenJnlLine: Record "Gen. Journal Line"; var IsHandled: Boolean);
begin
end;
Describe the request
Needed for client migration from NAV to BC
Why do you need this change?
You added the OnGetFAAddCurrExchRateOnBeforeFADeprBookTestField Event from one of my previous request: Internal work item: AB#582388
It turns out our client now need another modification that would required the Gen. Journal Line variable to be accessible in the Event
Can you please change this:
if UseFAAddCurrExchRate then begin
FADeprBook.Get(FANo, "Depreciation Book Code");
[IntegrationEvent(false, false)]
local procedure OnGetFAAddCurrExchRateOnBeforeFADeprBookTestField(var FADeprBook: Record "FA Depreciation Book"; var IsHandled: Boolean);
begin
end;
To this:
if UseFAAddCurrExchRate then begin
FADeprBook.Get(FANo, "Depreciation Book Code");
[IntegrationEvent(false, false)]
local procedure OnGetFAAddCurrExchRateOnBeforeFADeprBookTestField(var FADeprBook: Record "FA Depreciation Book"; var GenJnlLine: Record "Gen. Journal Line"; var IsHandled: Boolean);
begin
end;
Describe the request
Needed for client migration from NAV to BC