如何对宏进行循环

请教一下，我现在有一个宏
%macro a（x,y,z）;
   data a;
     ……
   run;

    proc ...;
    ……
    quit;
   data b;
   ……
   run;
%mend;
%a (1,2,3);


数据集b输出的就是我需要的表
a     b      c
1     2      3

现在想将这个宏循环1000次，得到
i       a       b       c
1      1      2      3
2       3      1      3
3       1       8      7
……
……
1000   1       1       4
类似这样的结果

%macro a(x,y,z);
%do i=1 %to 1000;
  ....
  data b;
    ...;
  run;
  %if &i.=1 %then %do;
   data c;
     set b;
   run;
  %end;
  %else %do;
  proc append base=c data=b;
  run;
  %end;
%end;
%mend;

{:3_61:}{:3_61:}