- data a;
- input code:$6. y1 y2 y3;
- label y1="2007TEST" y2="2008TE" y3="2009TE";
- datalines;
- 000001 1 2 3
- 000002 2 3 4
- 000003 3 4 5
- ;
- run;
- data b;
- set a;
- array _y y1-y3;
- do over _y;
- c=vlabel(_y);
- v=_y;
- output;
- end;
- keep code c v;
- run;