Операции со строкой

Zidan

Нужно покрамсать строку, но при этом сдвиг и число букв неизвестно заранее.
Пробывал так:

Code:

concatenate '-' dengi+' count '(' divv ') ',' dengi+18(2) into dengi.

Ну в процессе выполнения проги должно былдо получиться так:

Code:

concatenate '-' dengi+16(1) ',' dengi+18(2) into dengi.

Но оно меня не поняло

Так как сделать чтоб сдвиг был переменным :?:

sibrin

Code:

data: i type i, j type i, s1(100), s2(100).
i = 16.
j = 1.
s2 = s1+i(j).

Zidan

Действительно, нодо было тупо писать:

Code:

concatenate '-' dengi+count(divv) ',' dengi+18(2) into dengi.

А я всё усложняю :oops:

Спасибо, sibrin