reportextension 50100 MyExtension extends /Standard Sales - Invoice/
{
dataset
{
add(Line)
{
column(Line_Carton_Quantity; /Line Carton Quantity/) { }
column(Line_Gross_Weight; /Line Gross Weight/) { }
}
add(Header)
{
column(TotalLineCartonQuantity; TotalLineCartonQuantity) { }
column(TotalGrossWeight; TotalLineGrossWeight) { }
}
}
Local procedure AddToTotal(/Line Carton Quantity/: Integer; /Line Gross Weight/: Integer)
begin
LineCartonQuantity := /Line Carton Quantity/;
LineGrossWeight := /Line Gross Weight/;
PrevLineCartonQuantity += LineCartonQuantity;
PrevLineGrossWeight += /LineGrossWeight/;
TotalLineCartonQuantity += PrevLineCartonQuantity;
TotalLineGrossWeight += PrevLineGrossWeight;
end;
var
LineCartonQuantity: Integer;
LineGrossWeight: Integer;
TotalLineCartonQuantity: Integer;
PrevLineCartonQuantity: Integer;
TotalLineGrossWeight: Integer;
PrevLineGrossWeight: Integer;
}