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;

All responses (1)

Answers (0)

Suggested answer

Vaishnavi J 3,056 on at

Like (0)

Report

RE: General Journal Line

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