AL Code - Phys. Invt. Order; Calculate Total Amount (Quantity x Unit Amount)

(0) Share

Report

Posted on by Breefer

I would like to calculate a new field in table "Phys. Invt. Order Line" called "EQ_Value (Base)":

This field should be calculated every time the Physical Inventory Order got finished.

Can anybody assist me how to fill this new field (EQValue__Base) with the automated calculation (Unit_Cost * Quantity__Base_) on finishing the Inventory Order.

Thanks for your support!

All responses (9)

Answers (1)

Suggested answer

DAnny3211 9,272 Super User 2024 Season 1 on at

Like (0)

Report

RE: AL Code - Phys. Invt. Order; Calculate Total Amount (Quantity x Unit Amount)

hi

look this

learn.microsoft.com/.../devenv-permissionset-object

but I recommend you also study this new solution

learn.microsoft.com/.../devenv-inherent-permissions

check my answer if it helped you, thanks

DAniele
Breefer 5 on at

Like (0)

Report

RE: AL Code - Phys. Invt. Order; Calculate Total Amount (Quantity x Unit Amount)

Thank you for your support!

One last question Daniele;

In my Production Environment it's causing an error, that I am not authorized to run the new CodeUnit with my License. I am owning the Business Central Essentials License - is that a problem?

In my Test Environment everything runs perfectly.
Suggested answer

DAnny3211 9,272 Super User 2024 Season 1 on at

Like (0)

Report

RE: AL Code - Phys. Invt. Order; Calculate Total Amount (Quantity x Unit Amount)

yes

great! this is the right solution!

Thank you

Daniele
Breefer 5 on at

Like (0)

Report

RE: AL Code - Phys. Invt. Order; Calculate Total Amount (Quantity x Unit Amount)

Hi Daniele

Thank you so much for your support!

I defined a CodeUnit, the EQValue__Base_ reference needed a 'Rec.' before it.
And now it works perfectly!

Am I right?
Verified answer

DAnny3211 9,272 Super User 2024 Season 1 on at

Like (0)

Report

RE: AL Code - Phys. Invt. Order; Calculate Total Amount (Quantity x Unit Amount)

Hi

I didn't mean it that way!

define a codeunit and use this code:

[EventSubscriber(ObjectType::table, 5876 , 'OnAfterValidateEvent', 'Unit Amount', false, false)]

local procedure Set_EQValue_BaseFromAmount(var Rec: Record "Phys. Invt. Order Line")

begin

EQValue_Base:=rec."Quantity (Base)"*rec."Unit Amount";

end;

[EventSubscriber(ObjectType::table, 5876 , 'OnAfterValidateEvent', 'Quantity (Base)', false, false)]

local procedure Set_EQValue_BaseFromQuantity(var Rec: Record "Phys. Invt. Order Line")

begin

EQValue_Base:=rec."Quantity (Base)"*rec."Unit Amount";

end;

check my answer if it helped you, thanks

DAniele
Breefer 5 on at

Like (0)

Report

RE: AL Code - Phys. Invt. Order; Calculate Total Amount (Quantity x Unit Amount)

Hi Daniela

Also thank you for your response.

I am so sorry, I couldn't resolve my problem with your assistance.

Where am I wrong?
Suggested answer

DAnny3211 9,272 Super User 2024 Season 1 on at

Like (0)

Report

RE: AL Code - Phys. Invt. Order; Calculate Total Amount (Quantity x Unit Amount)

Hi

you must enter the calculation of your new field in two places:

in the onvalidate of the Unit_Cost field and in the onvalidate of the Quantity__Base_ field.

this way you ensure that when you validate both of the above fields, your custom field will also be updated

check my answer if it helped you, thanks

DAniele
Breefer 5 on at

Like (0)

Report

RE: AL Code - Phys. Invt. Order; Calculate Total Amount (Quantity x Unit Amount)

Hi ZHU

Thanks for your response.

I tried to implement your assistance in different ways, unfortunately the field wouldn't calculate, actually.

Even if I am reopening / closing the Phys Inventory Order:
Suggested answer

YUN ZHU 74,141 Super User 2024 Season 2 on at

Like (0)

Report

RE: AL Code - Phys. Invt. Order; Calculate Total Amount (Quantity x Unit Amount)

Hi, It looks like you are only missing the code for the calculation.
You can add it to the OnValidate Trigger of the Quantity__Base_ field, or the OnInsert Trigger and OnModify Trigger of the "Phys. Invt. Order Line" table, which should meet your needs.

Hope this helps.

Thanks.

ZHU