Sync Item Tracking Line with warehouse Receipt Line

Hi I have added new lines to warehouse receipt line using code and realize Item tracking line does not match with warehouse receipt line.

For example,
2d66ff8n3kma.png

Im using WhseRecLine for Warehouse reciept line record and reserveEnt for reservation entry record.

WhseRecLine."Source Document" := whseRecLine."Source Document"::"Purchase Order";
WhseRecLine."Source No." := JpnTranDet.THOPONO;
WhseRecLine."Item No." := JpnTranDet.Item;
WhseRecLine."Description" := purchLine."Description";
WhseRecLine."Bin Code" := WhseRecHead."Bin Code";
WhseRecLine."Invoice No." := JpnTranDet."TGINV1 & TGINV2";
Evaluate(whseQty, JpnTranDet.THQTY);
WhseRecLine.Quantity := whseQty;
WhseRecLine."Qty. to Receive" := whseQty;
WhseRecLine."Due Date" := purchHeader."Document Date";
WhseRecLine."Unit of Measure Code" := purchline."Unit of Measure Code";
whseRecLine."No." := WhseRecHead."No.";
//whseRecLine."Qty. (Base)" := PurchLine."Qty. to Receive (Base)";
WhseRecLine."Qty. (Base)" := PurchLine."Quantity (Base)";
WhseRecLine."Qty. Outstanding" := PurchLine."Quantity (Base)";

lastEntNo := reserveEnt.GetLastEntryNo();
reserveEnt.Validate("Entry No.", lastEntNo + 1);
reserveEnt.Validate("Creation Date", WorkDate());
reserveEnt.VALIDATE(Positive, true);
reserveEnt.Validate("Item No.", JpnTranDet."Item");
reserveEnt.Validate("Location Code", WhseRecLine."Location Code");
reserveEnt.Validate("Quantity (Base)", whseQty);
reserveEnt.Validate("Reservation Status", 2);
reserveEnt.Validate("Description", purchLine.Description);
reserveEnt.VALIDATE("Source ID", purchLine."Document No.");
reserveEnt.Validate("Source Ref. No.", purchLine."Line No.");
reserveEnt.Validate("Source Type", 39);
reserveEnt.Validate("Source Subtype", 1);
reserveEnt.Validate(Quantity, whseQty);
reserveEnt.Validate("Qty. to Handle (Base)", whseQty);
reserveEnt.Validate("Qty. to Invoice (Base)", whseQty);
reserveEnt.Validate("Created By", UserId);
reserveEnt.Validate("Item Tracking", 1);
reserveEnt.Validate("Lot No.", 'LOT');
reserveEnt.Validate("Carton No.", JpnTranDet.THCANO);

reserveEnt.Insert(true);
please help thank you

Answers

Sign In or Register to comment.