Create macro var Today minus 1 or Today minus 2

[Ronein]

Hello

I want to create a macro variable that calculate YYYY-MM-DD value by the following rule:

If today is Sunday-Friday then 

%let YYYYMMDD =%sysfunc(putn(%sysevalf(%sysfunc(today())-1), YYMMDD10.));
 

If today is Saturday then 
%let YYYYMMDD =%sysfunc(putn(%sysevalf(%sysfunc(today())-2), YYMMDD10.));
 

What is the way to do it please?

[LinusH]

You can use the weekday() function together with %IF logic.

[yabwon]

Try this:

%let yyyymmdd = %sysfunc(int(%sysevalf(%sysfunc(today())-1-(%sysfunc(weekday(%sysfunc(today())))=1))),yymmdd10.);

%put &=yyyymmdd.;

Bart

[yabwon]

Or with FCMP, which is easier to read and modify:

proc FCMP outlib=work.f.p;
  function fff();
    return( today()-1-(weekday(today())=1) );
  endsub;
run;
options append=(cmplib=work.f);

%let yyyymmdd=%sysfunc(fff(),yymmdd10.);
%put &=yyyymmdd.;

Bart

[ballardw]

Generic style comment: If the macro variable is to ever be used in comparisons with date values or calculations then do not format it.

The time to use formatted macro date values is for text that humans read such as title statements or possibly filenames.