%macro fenbao(data=);
data a0;
set &data nobs=a;
b=a;
run;
proc sql;
select b into : total from a0;
quit;
%let i=1;
%let n=0;
%do %while (&n <= &total);
data _null_;
flie "C:\Users\xiaochun\Desktop\a\ID1_&i.txt";
set &data;
%if &n <_n_<= %eval(&n+100000) %then put ID;
run;
%let i=%eval(&i+1);
%let n=%eval(&n+100000);
%end;
%mend;
% fenbao(data=t);



雷达卡




京公网安备 11010802022788号







