Vasa, вы пытаетесь в темповую таблицу записать данные в поле Inventory, оно флоуфилдовое и ничего не получится. В общем виде код должен выглядеть примерно так:
Код:
Item.RESET;
IF Item.FINDEST then
REPEAT
TmpItem.RESET;
TmpItem.SETRANGE("No.", "No.");
IF NOT TmpItem.FINDFIRST then
BEGIN
Qty := 0;
ItemRecLine.RESET;
ItemRecLine.SETRANGE("Item No.", Item."No.");
// накладываем доп. фильтры по дате и т.п.
IF ItemRecLine.FINDFIRST then
REPEAT
Qty += ItemRecLine.Quantity;
UNTIL ItemRecLine = 0;
TmpItem.INIT;
TmpItem."No." := Item."No.";
TmpItem."Unit Price" := Qty; // используйте любое не флоуфилдовое поле DECIMAL
TmpItem.INSERT;
END
UNTIL Item.Next = 0;
В данном случае модификация данных не нужна, т.к. вы сразу по товару все посчитаете.