[Corleone]

Цитата:

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

в конце приведенного вами кода

DELETE(TRUE);
// UNTIL NEXT(-1) = 0;
UNTIL FIND('+');
END;
END;

не совсем понятна строчка UNTIL FIND('+'); - как мне кажется при таком раскладе корректно работать не будет ....

неправильно немного ответил - этот ответ относится к последнему сообщения Gmc

DELETE(TRUE);
UNTIL FIND('+');

Так там же удаление идет, цикл просто пока все не удалится...