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;