Thanks Tom, it worked great!  This is a very nice solution for my task.  I made some slight modifications below.   This will save writing 100+ lines of code.   %macro increment_months(incrmt1_lag6=,end_month=,incrmt2_tzero=); %local sdate edate offset thismonth    ldate thismonth1 ; %let sdate=%sysfunc(inputn(&incrmt2_tzero.01,yymmdd8.)); %let edate=%sysfunc(inputn(&end_month.01,yymmdd8.)); %let ldate=%sysfunc(inputn(&incrmt1_lag6.01,yymmdd8.));     %do offset=0 %to %sysfunc(intck(month,&sdate,&edate));   %let thismonth=%sysfunc(intnx(month,&sdate,&offset));   %let thismonth1=%sysfunc(intnx(month,&ldate,&offset));   %put &=offset &=thismonth %sysfunc(putn(&thismonth,date9.)) %sysfunc(putn(&thismonth,yymmn6.));   %put &=offset &=thismonth1 %sysfunc(putn(&thismonth1,date9.)) %sysfunc(putn(&thismonth1,yymmn6.));     %PULLIT(BY=,WHERE=,CLASS=&SPLITTER,   TIMEZERO=%sysfunc(putn(&thismonth,yymmn6.)),   START_MONTH=%sysfunc(putn(&thismonth1,yymmn6.)),   STOP_MONTH=&EOP);   %end; %mend increment_months;   %increment_months(incrmt1_lag6=202109,end_month=202205,incrmt2_tzero=202204); ... View more

Apologies if this posts twice.   Thank you for your response and please accept my apologies for any confusion.  Please let me provide a little more background around the problem.    Basically I am creating a simple monthly report showing retail sales for 2021 and 2022 (all calendar based).  The problem is that simply comparing the month to a prior year can sometimes be skewed say if Mar-22 has 5 Saturdays vs. 4 Saturday’s in Mar-21.  Retail businesses deal with this problem where working days can be different for the same month in the current and prior year.   Currently my solution is not very elegant, and I was curious if there is a dynamic solution.  Starting with the 1st Monday of the year, I reclassify the month based on the actual date where needed so there is a consistent number of working days and thus weeks when looking at any given month.  The sample code belows shows how I handle this in May-21 and May-22.  There is no data reported for weekends (Sat – Sun reported on Monday).   Sample Code: DATA GRAPEAPE; INPUT DATE1 MMDDYY10. PMON PYEAR SALES ; FORMAT DATE1 MMDDYY10. PMON Z2.; DATALINES; 05 27 2021 05 2021 1000 05 28 2021 05 2021 2000 05 31 2021 05 2021 3000 06 01 2021 06 2021 1100 06 02 2021 06 2021 1200 06 03 2021 06 2021 1300 06 04 2021 06 2021 1400 05 27 2022 05 2022 1111 05 30 2022 05 2022 1111 05 31 2022 05 2022 1133 06 01 2022 06 2022 1155 06 02 2022 06 2022 1177 06 03 2022 06 2022 2311 06 04 2022 06 2022 2322 ; RUN; PROC PRINT DATA = GRAPEAPE; TITLE 'DAILY SALES'; RUN; DATA SPEEDRACER; SET GRAPEAPE; ATTRIB NEWMON FORMAT=Z2.; NEWMON=PMON; IF DATE1 IN('31MAY2021'D) THEN NEWMON=6; ELSE IF DATE1 IN('30MAY2022'D,'31MAY2022'D) THEN NEWMON=6; RUN; PROC PRINT DATA = SPEEDRACER; TITLE 'DAILY SALES'; RUN; TITLE1 'SALES BY MONTH'; PROC SQL; SELECT PYEAR ,PMON ,SUM(SALES) AS TOTSALES FROM SPEEDRACER GROUP BY PYEAR, PMON; SELECT PYEAR ,NEWMON ,SUM(SALES) AS TOTSALES FROM SPEEDRACER GROUP BY PYEAR, NEWMON; QUIT; RUN;     ... View more