Using setrange in report.

IPGRuss · 2008-04-02

I have a report that uses the Item Ledger Entry line and I need to pull some information from the Item table at the same time. I'm trying to use setrange to accomplish this but I think I'm missing something:

"Item".SETRANGE("Item Ledger Entry"."Item No.");
IF "Item".FIND('-') THEN BEGIN
  rootcost := "Item"."Material Cost";
END;

Thanks in advance for any help.

ar4ijs · 2008-04-02

Use Item.GET instead of SETRANGE and FIND:

IF Item.GET("Item Ledger Entry"."Item No.") THEN 
  rootcost := Item."Material Cost";

JedrzejT · 2008-04-02

Hi,

If You do it in trigger - On AfterGetRecord in dataitem "Item ledger entry" then code should be:

IF "Item".GET("Item ledger entry"."Item No.") THEN
rootcost := "Item"."Material Cost"
ELSE
rootcost :=0; //probably never use - You can delete this line

There is more other solution to do this ,but this will work.
Regards

DaveT · 2008-04-02

Hi,

The setrange needs at least two parameters to work e.g. setrange( Onwhat, RangeValue,... )

Because you're looking up a table which the code is a primary key

the following code would be better

if item.get("Item Ledger Entry"."Item No.") then
  rootcost := Item."Material Cost"
else
  rootcost := 0;

Hope this helps

IPGRuss · 2008-04-02

It comes back saying Material Cost is not defined. I have Item defined in my globals as record of the Item table. Do I need to define this field somewhere else?

DaveT · 2008-04-02

I thought it was a field you added. Use Item."unit cost". To find out all fields on a record use the C/AL Symbol Menu (F5)

IPGRuss · 2008-04-02

I did create Material Cost, had a typo, it's working now, thanks.

IPGRuss · 2008-04-02

So it's now pulling the correct value for Material Cost but now, if Material Cost = 0 it should pull the Cost Amount from the Item Ledger Entry, this just returns 0:

IF item.GET("Item Ledger Entry"."Item No.") THEN
  rootcost := item."Material Cost (FYI)"
ELSE
  rootcost := "Item Ledger Entry"."Cost Amount (Actual)"

IPGRuss · 2008-04-02

I realized I wasn't checking to see if the Material Cost = 0, I am now, but this doesn't seem to be working:

IF item.GET("Item Ledger Entry"."Item No.") THEN
  IF item."Material Cost (FYI)" = 0 THEN
    rootcost := item."Material Cost (FYI)"
  ELSE
    rootcost := "Item Ledger Entry"."Cost Amount (Actual)";

roottotal := roottotal + rootcost;

DaveT · 2008-04-02

Hi

You have your "if" the wrong way around if cost = 0 then root = cost.

should be

if cost = 0 then
root := item ledger entry
else
root := cost;

ar4ijs · 2008-04-02

Did you call CALCFIELDS for "Item Ledger Entry"."Cost Amount (Actual)" ?

Using setrange in report.

Comments

Categories