data bbb;
if 0 then set aaa;
array tmp $ _ALL_;
if _N_=1 then do;
do i=1 to dim(tmp);
tmp(i)=vlabel(tmp(i));
end;
output;
end;
set aaa;
output;
drop i;
run;
data bbb;
if 0 then set aaa;
array tmp $ _ALL_;
if _N_=1 then do;
do i=1 to dim(tmp);
tmp(i)=vlabel(tmp(i));
end;
output;
end;
set aaa;
output;
drop i;
run;