data one;
input name $ Var1 $;
datalines;
Alex  a
Alex  b
Mary  c
Mary  d
; run;
proc sort data=one;
   by name;
run;
data two three;
   set one;
   if first.name then output two;
   if last.name then output three;
   by name;
run;
data four;
   merge two three (rename=(var1=var2));
run;
proc print data=four; run;

楼上可以测试这个

data a;
input name$ var$;
datalines;
Alex  a
Alex  b
Alex  c
Mary  d
Mary  e
kate  f
;
run;
proc transpose data=a out=b(drop=_name_);
by name;
var var;
run;

Thanks a lot!