just copy the following code into SAS, run it, and then open dataset s in your work library, then you would see straight away what my code does.
*========================;
%macro test1(n);
data s;
format x $10000.; x="";
format y $10000.; y="";
%do j=1 %to &n.;
x="%do i&j.=1 %"||"to 5;"||strip(x);
y="%end;"||strip(y);
%end;
call symputx("y",y);
call symputx("x",x);
run;
&x.;
&y.;
%mend;
%test1(n=100);
*========================;