![]() |
#11 |
Участник
|
Совсем правильно надо вот так.
Код: PurchHeader.RESET; PurchHeader.SETRANGE(PurchHeader.Posted,TRUE); IF PurchHeader.FINDSET THEN REPEAT PurchHeader2 := PurchHeader; PurchHeader2.DELETE(TRUE); COMMIT; UNTIL PurchHeader.NEXT = 0; |
|