%macro try;
%if &sysday.= Monday %then %do;
        %let date=2021110%eval(%substr(&sysdate9.,1,2)-2);
%end;
%else %do;
        %let date=2021110%eval(%substr(&sysdate9.,1,2)-1);
%end;
%mend ;
%try;
%put &date.;

上面的程序跑不出结果，不知什么原因，请指教。