Показать сообщение отдельно
Старый 26.09.2014, 14:36   #5  
Constantine_imported is offline
Constantine_imported
Участник
 
126 / 10 (1) +
Регистрация: 28.04.2011
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;
В данном случае модификация данных не нужна, т.к. вы сразу по товару все посчитаете.