"Sergiy S. Tkachenko" ...
>
> Horsun Vlad пишет:
> > Не понял, или не настаиваешь ? :)
> >
> Не понял, да и настаивать уже бессмысленно.
> Всё равно пинают ногами.
Никто тебя не пинает. Смотри :
I = 1;
CL = CHAR_LENGTH(TRIM(:"iRef"));
WHILE (I < CL) DO
...
I = I + 1;
END
Твоё условие WHILE (I < CL) остановит цикл, не обработав
случай I = CL. Ты сделал
CL = CHAR_LENGTH(TRIM(:"iRef")) + 1
это дало ожидаемый эффект, но это совершенно не прибавило
твоему коду ясности. Намного лучше было бы лечить проблему,
а не её проявление. Для этого достаточно изменить условие цикла
WHILE (I <= CL) DO
--
Хорсун Влад
