BTW. If you decide to work with multilanguage data (in multi byte encoding like UTF-8) you should probably start using the K...() functions:
data names;
input a :$20. score;
cards;
ŻÓŁĆ 123
空手道 456
;
data want (drop=i);
set names;
length aNew $ 200;
do i = 1 to klength(a);
aNew=catx('*', aNew, ksubstr(a,i,1));
end;
run;
Bart
... View more