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

  %let seed=123;
  %rerun;
  run;