report 80000 InventoryByLocation
{
UsageCategory = ReportsAndAnalysis;
ApplicationArea = All;
DefaultRenderingLayout = LayoutName;
dataset
{
dataitem(Item; Item)
{
dataitem(Location; Location)
{
column("ItemNo"; Item."No.")
{
}
column("LocationCode"; Location.Code)
{
}
column("Inventory"; Inventory)
{
}
trigger OnAfterGetRecord()
var
ItemLRec: Record Item;
begin
Item.Reset();
if ItemLRec.Get(Item."No.") then begin
ItemLRec.SetFilter("Location Filter", Location.Code);
ItemLRec.CalcFields(Inventory);
Inventory := ItemLRec.Inventory;
end;
end;
}
}
}
rendering
{
layout(LayoutName)
{
Type = Excel;
LayoutFile = 'InventoryByLocation.xlsx';
}
}
var
Inventory: Integer;
}