Показать сообщение отдельно
Старый 14.07.2007, 11:02   #12  
Storkich is offline
Storkich
Участник
 
149 / 10 (1) +
Регистрация: 08.03.2007
Не всегда есть ключ по нужному полю.
Я делаю своды вот так:

Код:
...
REPEAT
  IF not TEMPтаблица.Get(Field1,Field1,) then begin
	 TEMPтаблица.Field1:=Rec.Свод1;
	 TEMPтаблица.Field2:=Rec.Свод2;
	 TEMPтаблица.Qty1:=0;
	 TEMPтаблица.INSERT;
  end;
  TEMPтаблица.Qty1+=Rec.Qty1;
  TEMPтаблица.MODIFY;
until Rec.NEXT=0;