- data test;
- input code (name sex) ($);
- cards;
- 01 ddd male
- 02 jojo female
- 01 cc male
- 03 oljo female
- ;
- run;
- proc sort data=test;
- by code;
- run;
- data test1;
- length fullname fullsex $500.;
- set test;
- by code;
- retain fullname "" fullsex "";
- fullname=catx("、",fullname, name);
- fullsex=catx("、",fullsex, sex);
- if first.code then
- do;
- fullname=name;
- fullsex=sex;
- end;
- if last.code;
- run;


雷达卡







京公网安备 11010802022788号







