A small update to use the do over shrinks the code a bit. Doesn't of course answer the all missing question:
data test;
length names $200;
input TT TS TM JAG TL;
array v tt--tl;
do over v;
names=catx('/',names,ifc(v=max(of v{*}),vname(v),""));
end;
datalines;
450 789 850 789 745
145 523 854 125 452
356 896 785 452 896
523 589 846 475 145
632 521 452 785 452
1 1 1 1 1
. . . . .
;
run;
... View more
