|
![]() |
#1 |
Участник
|
Цитата:
Сообщение от Constantine
![]() 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; TmpItem.SETRANGE("No.", 'No.'); - одинарные ковычки и TmpItem."inventory" := Qty; - вместо поля типа Unit Price теперь никак понять не могу почему там где я все поля в коде для tmpitem заполняю (после TmpItem.INIT ![]() |
|
![]() |
#2 |
Участник
|
Цитата:
- строка с TmpItem."Vendor Name":=Item."Vendor Name" не нужна (т.к. и TmpItem и Item одна и та же таблица) - в том месте, где печатаете содержимое TmpItem надо прописать Код: TmpItem.CALCFIELDS("Vendor Name"); |
|
![]() |
#3 |
Участник
|
Да, вы правы, думал calcfields для вычислений только используется.. всем спасибо за помощь.
|
|