Help : flowing data from "Warehouse Receipt" to posted purchase Receipt at line level

(0) Share

Report

Posted on by DineshM

238

Hello Experts,

I have taken 4 fields(supplier name , supplier date , Remark , QC inspector, on warehouse receipt line and same on Purch. Rcpt. Line as shown in image.I want to flow data from warehouse receipt line to purch receipt line when I click post receipt action on warehouse. I tried on event (on after insert) but did not work.

I Tried using Event subcriber but not Getting How and where to Wirte Code

Can you please Help experts

Thank in advance

Thanks in Advance

I have the same question (0)

All responses (4)

Answers (1)

NAV_with_Narang 2,320 Moderator on at

Like (0)

Report
Copy link

Link copied!

Can you please highlight which Event/Publisher you have tried using? Also maybe post the code you've written

Was this reply helpful? Yes No
Suggested answer

Nitin Verma 21,794 Moderator on at

Like (0)

Report
Copy link

Link copied!

You can try below Event from codeunit 5760 "Whse.-Post Receipt

OnPostSourceDocumentOnBeforePostPurchaseHeader(var PurchHeader: Record "Purchase Header"; WhseRcptHeader: Record "Warehouse Receipt Header"; SuppressCommit: Boolean; var CounterSourceDocOK: Integer; var IsHandled: Boolean)

Was this reply helpful? Yes No
DineshM 238 on at

Like (0)

Report
Copy link

Link copied!

Hi sir,

I have created saprate codunint and subscribe event as follw

[EventSubscriber(ObjectType::Codeunit, Codeunit::"Whse.-Post Receipt", 'OnAfterPostWhseJnlLine', '', true, true)]

local procedure OnAfterPostWhseJnlLine(var WarehouseReceiptLine: Record "Warehouse Receipt Line")

var
warehousereceiptLine: Record "Warehouse Receipt Line";

begin

warehousereceiptLine."Supllier Name" := Supllier Name" ;
warehousereceiptLine.Remark :=Remark;
warehousereceiptLine."QC Inspector":= "QC Inspector";

end;

also at page extension also tried but not Getting

modify("Post Receipt")

{

trigger OnAfterAction()

var

WRL:Record "Warehouse Receipt Line";

begin

wRl.Reset();

WRL.SetRange(WRL."No.",Rec."No.");

WRL.SetRange(WRL."Source No.",Rec.source);

WRL."Supllier Name" := Rec.?
WRL.Remark :=REc?
WRL."QC Inspector":= Rec?

rec.MODIFY;

end;

}

Was this reply helpful? Yes No
Verified answer

DAnny3211 11,417 Super User 2026 Season 1 on at

Like (1)

Report
Copy link

Link copied!

hi

try this function OnAfterPostedWhseRcptLineInsert

you have the two instances you are interested in: PostedWhseRcptLine, WhseRcptLine

then within the function you create you can assign the values

PostedWhseRcptLine. "Supllier Name". := WhseRcptLine.Supllier Name" ;

PostedWhseRcptLine.Remark :=WhseRcptLine.Remark;

PostedWhseRcptLine. "QC Inspector":=WhseRcptLine. "QC Inspector";

check my answer if it helped you, thanks

DAniele

Was this reply helpful? Yes No