![]() |
#5 |
Участник
|
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; |
|