work out previous month

[mlaunce]

Hi,

I'm using the following code to produce MMMYYYY as at today's date and it works fine.

%let monyear=%substr(%sysfunc(today(), date9.),3,7);
%put &monyear;
DEC2005

Trouble is, I need to modify the code to give the previous month in the macro output, so today it would give
NOV2005.

Any help would be much appreciated!

 

[klaz2002]

mlaunce,

I have a macro solution. its extremely messy, but here it is:

%let monyear =%sysfunc(putn(%sysfunc(mdy(%sysfunc(putn( %eval(%sysfunc(month(%sysfunc(date())) )-1),8.)),
            1,%sysfunc(putn(%sysfunc(year(%sysfunc(date())) ),8.)))),monyy7.));

Let me know if it works for you, you may have to adjust it.
Klaz

 

[klaz2002]

I have found an even shorter code string that should also work.

%let monyear = %sysfunc(putn(%sysfunc(intnx(month,%sysfunc(date()),-1)),monyy7.));

Klaz