Production Order

(0) Share

Report

Posted on by Community Member

Hi I have this code on the OnValidate Function. With the Set ranges at the start once I find the production order, when i try to find the prod order component, using the recprodorder."No." it's coming up blank in the debugger. How can I ammend this to find the right production order component?

//FIND production Order
recProdOrder.RESET;
recProdOrder.SETRANGE("No.", "Source No.");
recProdOrder.SETRANGE("Item No.", "Item No.");

// Find Production Order Component for Production order
recProdOrderComponent.RESET;
recProdOrderComponent.SETRANGE("Prod. Order No.",recProdOrder."No.");//This isn't finding anything
// Check If Items found are Customer Specific
IF recProdOrderComponent.FINDFIRST THEN BEGIN
recProdOrderComponent.CALCFIELDS(FixedVariant);
IF recProdOrderComponent.FixedVariant THEN
ItemVariant.GET("Item No.","Variant Code");
//Check if variant is customer specific, and if it matches prod Order No.
IF ItemVariant.CALCFIELDS("Customer Specific") THEN
//Find the Production Order
recProdOrder.SETRANGE("No.", recProdOrderComponent."Prod. Order No.");
IF recProdOrder."Customer No." <> ItemVariant.Manufacturer THEN
ERROR(Text024);
END;

*This post is locked for comments

I have the same question (0)

All responses (7)

Answers (1)

Sort by

Community Member on at

Like (0)

Report
Copy link

Link copied!

This is written on the Warehouse Activity Line table

Was this reply helpful? Yes No
Suggested answer

Amol Salvi 18,698 on at

Like (0)

Report
Copy link

Link copied!

recProdOrder.RESET;
recProdOrder.SETRANGE("No.", "Source No.");
recProdOrder.SETRANGE("Item No.", "Item No.");
If recProdOrder.FINDFIRST THEN ---> You forgot this line
// Find Production Order Component for Production order
recProdOrderComponent.RESET;
recProdOrderComponent.SETRANGE("Prod. Order No.",recProdOrder."No.");//This isn't finding anything
// Check If Items found are Customer Specific
IF recProdOrderComponent.FINDFIRST THEN BEGIN
recProdOrderComponent.CALCFIELDS(FixedVariant);
IF recProdOrderComponent.FixedVariant THEN
ItemVariant.GET("Item No.","Variant Code");
//Check if variant is customer specific, and if it matches prod Order No.
IF ItemVariant.CALCFIELDS("Customer Specific") THEN
//Find the Production Order
recProdOrder.SETRANGE("No.", recProdOrderComponent."Prod. Order No.");
IF recProdOrder."Customer No." <> ItemVariant.Manufacturer THEN
ERROR(Text024);
END;

Was this reply helpful? Yes No
Community Member on at

Like (0)

Report
Copy link

Link copied!

Thank you, my confusion is.. How can I get this SETRANGE to work properly essentially.

Was this reply helpful? Yes No
Suggested answer

Suresh Kulla 50,278 Super User 2026 Season 1 on at

Like (0)

Report
Copy link

Link copied!

Put the breakpoint on that line, only when the breakpoint is hit, i.e. when the cursor is inside the loop that value will be shown to you in the debugger. If you are trying to lookup the value before the execution of the loop you will see the blank value.

Was this reply helpful? Yes No
Community Member on at

Like (0)

Report
Copy link

Link copied!

Thanks, I've tried this but it's still not pickinh up any value for the

recProdOrderComponent.SETRANGE("Prod. Order No.",recProdOrder."No."); line

Was this reply helpful? Yes No
Suggested answer

Amol Salvi 18,698 on at

Like (0)

Report
Copy link

Link copied!

Hi

You need to write the code in block using begin end

As well as activate debugger and check

Was this reply helpful? Yes No
Verified answer

Suresh Kulla 50,278 Super User 2026 Season 1 on at

Like (1)

Report
Copy link

Link copied!

Replace your code with this

recProdOrder.RESET;

recProdOrder.SETRANGE("No.", "Source No.");

recProdOrder.SETRANGE("Item No.", "Item No.");

IF recProdOrder.FINDFIRST THEN BEGIN

// Find Production Order Component for Production order

recProdOrderComponent.RESET;

recProdOrderComponent.SETRANGE("Prod. Order No.",recProdOrder."No.");//This isn't finding anything

// Check If Items found are Customer Specific

IF recProdOrderComponent.FINDFIRST THEN BEGIN

recProdOrderComponent.CALCFIELDS(FixedVariant);

IF recProdOrderComponent.FixedVariant THEN BEGIN

ItemVariant.GET("Item No.","Variant Code");

//Check if variant is customer specific, and if it matches prod Order No.

IF ItemVariant.CALCFIELDS("Customer Specific") THEN BEGIN

//Find the Production Order

IF recProdOrder."Customer No." <> ItemVariant.Manufacturer THEN

ERROR(Text024);

END;

END;

END;

END;

Was this reply helpful? Yes No