proc sort data=a out=asort;
by stockcode descending date;
run;
proc expand data=asort out=amid method=none;
by stockcode;
convert nclose = max60_close / transformout= (movmax 60);
run;
proc sort data=amid out=afinal;
by stockcode date;
run;