[.Quattro.]

А вы в циклах не запутались? Где происходит поиск записей в SIL?
Явно не хватает цикла по SIL.

Цитата:

Сообщение от lobster

SIL.RESET;
SIL.SETRANGE(SIL."Document No.", SIH."No.");
IF SIH.FIND('-') THEN REPEAT // Может по SIL цикл должен быть?

IF SIL."Unit of Measure Code" ='ЧАС' THEN BEGIN;
IF SIH."Invoice Key"= 'П1' THEN BEGIN
clt+=SIL.Quantity;
cost+=SIL."Unit Cost (LCY)";
END;
end;
UNTIL SIH.NEXT = 0;