Small and medium business | Business Central, N...

How to get value from temporay table in Business Central Extension AL language

(1) Share

Report

Posted on by Mark Lawrence

Hi,

I have an event EventSubscriber for SampleTable OnAfterInsertEvent to populate the tempSampleEnty temp table and another EventSubscriber to another Codeunit 20 (Posting Preview Event Handler) for the event "OnAfterFillDocumentEntry" to add new row in POSTING PREVIEW window but my temporary table is uninitialized or empty when Im using it in InsertDocumentEntry function.

Here is my code:

codeunit 99999 "SampleTableHandler"
{
var
tempSampleEnty : Record "Sample Table" temporary;
PostPrevHandler : Codeunit "Posting Preview Event Handler";

[EventSubscriber(ObjectType::Table, 99991, 'OnAfterInsertEvent', '', true, true)]
procedure OnInsertSampleEntry(VAR Rec: Record "SampleTable");
begin
if Rec.IsTemporary then
exit;
PostPrevHandler.PreventCommit();
tempSampleEnty := Rec;
tempSampleEnty."Document No." := '***';
tempSampleEnty.INSERT;
end;

[EventSubscriber(ObjectType::Codeunit, 20, 'OnAfterFillDocumentEntry', '', true, true)]
procedure InsertSampleDocumentEntry(VAR DocumentEntry: Record "Document Entry");
begin
PostPrevHandler.InsertDocumentEntry(tempSampleEnty, DocumentEntry);
end;
}

Thanks.

I have the same question (0)

All responses (6)

Answers (0)

Suggested answer

Marco Mels Microsoft Employee on at

Like (1)

Report
Copy link

Link copied!

Hello,

We currently do not have dedicated Dev support via the Dynamics 365 Business Central forums, but I wanted to provide you some additional resources to assist. If you need assistance with debugging or coding I would recommend discussing this on one of our communities.

www.yammer.com/dynamicsnavdev

dynamicsuser.net/.../developers

I will open this up to the community in case they have something to add.

Was this reply helpful? Yes No
Inge M. Bruvik 1,161 Moderator on at

Like (0)

Report
Copy link

Link copied!

I cant't see that you put any data into your tempSampleEnty anywhere?

Was this reply helpful? Yes No
Mark Lawrence 30 on at

Like (1)

Report
Copy link

Link copied!

[EventSubscriber(ObjectType::Table, 99991, 'OnAfterInsertEvent', '', true, true)]

procedure OnInsertSampleEntry(VAR Rec: Record "SampleTable");

begin

if Rec.IsTemporary then

exit;

PostPrevHandler.PreventCommit();

//code to put the data

tempSampleEnty := Rec;

tempSampleEnty."Document No." := '***';

tempSampleEnty.INSERT;

end;

Was this reply helpful? Yes No
Kenji Motomatsu 140 on at

Like (0)

Report
Copy link

Link copied!

HI Mark, did you ever find out how to handle your situation? We're faced with similar requirement, and wanted to understand how we can subscribe to "Posting Preview Event Handler" events to properly display document entries, when using Preview Posting.

Was this reply helpful? Yes No
jvillasin 30 on at

Like (0)

Report
Copy link

Link copied!

Does anyone have the answer for this on how to ? im having the same problem right now

Was this reply helpful? Yes No
Suggested answer

Mario Sopena 5 on at

Like (0)

Report
Copy link

Link copied!

Hi, try setting the 'SingleInstance' property of your Codeunit to true. Remember to 'clear' your temporary variable before starting the posting preview as it is instanciated once.

[EventSubscriber(ObjectType::Codeunit, Codeunit::"Gen. Jnl.-Post Preview", 'OnBeforeRunPreview', '', true, true)]

local procedure OnBeforeRunPreview(Subscriber: Variant; RecVar: Variant)

var

SampleTableHandler: Codeunit "SampleTableHandler";

begin

SampleTableHandler.ClearTempEntries();

end;

I said 'clear' because Clear(tempSampleEntry) is not enough. You must Delete all records from your temp variable.

Hope this help!

Was this reply helpful? Yes No