The call routine SORTC() would do what you seem to want, but as I see the string, just REVERSE() is needed this time.
The call routine expects to operate on a list variables. The fastest way to split up the string into one char variables would use peekc() and poke(). Less advanced the following uses a 100element array of 1-byte variables.[pre] length_s = length( string );
array demo(100) $1 ;
do i= 1 to length_s ;
demo(i) = substr( string, i ) ;
end ;
call sortC( of demo(*) ) ;
do i= 1 to length_s ;
j = i +100 - length_s ;
substr( string, i,1 ) = demo(j) ;
end ;
drop demo: ; [/pre]
PeterC