Hello,
data have;
infile cards dlm=",";
input subj var2 $ var3 var4 $;
cards;
1,time,12043,mark
1,jack,43535,steve
2,bob,52352,vsvgv
2,steve,24565,fbhdhn
3,kdire,2355,rtgeff
3,dfsde,63634,rwege
3,kjyytt,34235,fgsggsd
;
run;
data want;
set have;
array nums(*) _NUMERIC_;
array chars(*) _CHARACTER_;
format value $10. desc $4.;
keep subj value desc;
/* We exclude subj fom the loop */
do i=2 to dim(nums);
value=strip(put(nums(i),10.));
desc=vname(nums(i));
output;
end;
do i=1 to dim(chars);
value=chars(i);
desc=vname(chars(i));
output;
end;
run;
... View more