@@怎么写呢?
[code:20fk1fj9]data have(keep=name x1-x10);
length string $50;
retain string;
infile 'd:\jingju.txt' truncover end=last;
input @;
if anyalpha(_infile_) then do;
temp=_infile_;
if not missing(string) then do;
_infile_=string;
input name $2. x1-x10;
output;
end;
string=temp;
end;
else string=catx(' ',string,_infile_);
if last then do;
_infile_=string;
input name $2. x1-x10;
output;
end;
run;[/code:20fk1fj9]