%macro rerun; %do j =1 %to 5;
  data prac;
  y = 0;
  %do i= 1 %to 10;
  %syscall rannor (seed,e); diff=&e; 
  y = y + &e;  put @10 Y=  ;
  output;
  %end;
  run;
  proc print data =prac;
  run;
  %end;
  %mend rerun;

  * %let e=0; %let seed=123;
  ** create a macro variable &e to hold the random number **; 
  %rerun;
  run;