General Journal Line

(0) Share

Report

Posted on by P V Sarath

130

when we add Fields in General Jounral line , once posted, the data in the field should have to take the value in the table Fixed Asset Ledgers, if you know can anybody help me. I am attaching my codeunit what I have done on this. I used the event in the codeunit Gen.Jnl.post but I didn't get the value

// [EventSubscriber(ObjectType::Codeunit, Codeunit::"Gen. Jnl.-Post Line", 'OnPostFixedAssetOnBeforeAssignGLEntry', '', false, false)]

// local procedure OnPostFixedAssetOnBeforeAssignGLEntry(var GenJournalLine: Record "Gen. Journal Line"; var GLEntry: Record "G/L Entry"; var IsHandled: Boolean; var TempFAGLPostBuf: Record "FA G/L Posting Buffer" temporary; GLEntry2: Record "G/L Entry"; NextEntyNo: Integer;FALedgerEntry: Record "FA Ledger Entry")

// begin

// FALedgerEntry."Product Name" := GenJournalLine."Product Name";

// end;

I have the same question (0)

All responses (1)

Answers (0)

Suggested answer

Vaishnavi J 3,094 on at

Like (0)

Report
Copy link

Link copied!

Hi,

You can use below logic to write the add your values from general journal line to FA ledger entries

codeunit 50125 PostFAProductNameCodeunit

{

Permissions = tabledata "FA Ledger Entry" = rimd;

[EventSubscriber(ObjectType::Codeunit, Codeunit::"Gen. Jnl.-Post Line", 'OnAfterPostGenJnlLine', '', false, false)]

local procedure OnAfterPostGenJnlLine(var GenJournalLine: Record "Gen. Journal Line")

var

Rec_FaLedgerEntries: Record "FA Ledger Entry";

begin

Clear(Rec_FaLedgerEntries);

Rec_FaLedgerEntries.Reset();

if (GenJournalLine."Product Name" <> '') or (GenJournalLine."Account Type" = GenJournalLine."Account Type"::"Fixed Asset") then begin

Rec_FaLedgerEntries.SetRange("Document No.", GenJournalLine."Document No.");

Rec_FaLedgerEntries.SetRange("FA No.", GenJournalLine."Account No.");

Rec_FaLedgerEntries.SetRange("Posting Date", GenJournalLine."Posting Date");

if Rec_FaLedgerEntries.FindFirst() then begin

Rec_FaLedgerEntries."Product Name" := GenJournalLine."Product Name";

Rec_FaLedgerEntries.Modify(true);

end;

end;

end;

}

If my answer was helpful to you, please verify it so that other users know it worked. Thank you very much

Was this reply helpful? Yes No