Try this out.   Your Holiday list can be an external file (SAS, csv, txt), it will always grow or constant when you enter a new year.   data holiday; input date date9.; datalines; 30AUG2018 21DEC2018 15AUG2018 16AUG2018 ; run; data datain; input date date9.; datalines; 03may2018 06may2018 26may2018 30may2018 08jul2018 19oct2018 30aug2018 31aug2018 ; run; %macro max(data=holiday); %global cnt; proc sql noprint; select count(*) into :OBScnt from &data; quit; %let cnt=&OBScnt; %mend max; %max; run; proc transpose data=holiday out=outdata (drop=_name_) prefix=dte; run; data test (drop=q i cust dte1-dte&cnt); set datain; if _n_=1 then set outdata; q=0; array hol{*} dte1-dte&cnt; if weekday(date)=1 then q+1; do i=1 to &cnt; if date=hol(i) then q+1; end; if q>0 then new_date=intnx('weekday',date,+1); else new_date=intnx('weekday',date,+1); run; proc print data=test; format date new_date date9.; run;   Data Holiday will contain all your holidays. Datain is your input file. You can Transpose your Holiday file and apply it to every record (may not be the most efficient way) Then apply your new_date logic. I thought you wanted the next Business day and not the day after? You can change this where you see fit.   Based on the above code, you should see this: Obs date new_date 1 03MAY2018 04MAY2018 2 06MAY2018 07MAY2018 3 26MAY2018 28MAY2018 4 30MAY2018 31MAY2018 5 08JUL2018 09JUL2018 6 19OCT2018 22OCT2018 7 30AUG2018 31AUG2018 8 31AUG2018 03SEP2018 ... View more

Hello, like I said earlier I wasn't sure what you wanted to do if it did not meet your criteria. You add this line after:   if q>0 then new_date=intnx('weekday',date,+1); else new_date=intnx('weekday',date,+1);   Code has been updated. This should get you what you needed. ... View more

Corrected the Sat1 and Sat2 ... View more

Sorry the Saturday function are not working correctly. ... View more

You can try something like this, I wasn't sure what you wanted if the date did not meet your criteria.   %let tday = %sysfunc(today()); %macro custom; %global custom1 custom2 custom3 custom4 custom5 custom6 custom7 sat1 sat2;   data _null_; custom1='03feb2018'd; custom2='10apr2018'd; custom3='15may2018'd; custom4='23jul2018'd; custom5='30aug2018'd; custom6='19oct2018'd; custom7='21dec2018'd; sat1=intnx('week',intnx('month',&tday,-0,'begin'),+0,'end'); sat2=intnx('week',intnx('month',&tday,-0,'begin'),+1,'end'); call symput('custom1',put(custom1,mmddyy10.)); call symput('custom2',put(custom2,mmddyy10.)); call symput('custom3',put(custom3,mmddyy10.)); call symput('custom4',put(custom4,mmddyy10.)); call symput('custom5',put(custom5,mmddyy10.)); call symput('custom6',put(custom6,mmddyy10.)); call symput('custom7',put(custom7,mmddyy10.)); call symput('sat1',put(sat1,mmddyy10.)); call symput('sat2',put(sat2,mmddyy10.)); %mend custom;   %custom; run; data xxxx; input date date9.; datalines;   03may2018 06may2018 08jul2018 19oct2018 30aug2018 31aug2018 ; data zzzz (drop=q cust); set xxxx; q=0; if weekday(date)=1 then q+1; do cust="&custom1","&custom2","&custom3","&custom4","&custom5","&custom6","&custom7","&sat1","&sat2"; if input(cust,mmddyy10.)=date then q+1; end; if q>0 then new_date=intnx('weekday',date,+1); else new_date=intnx('weekday',date,+1); run; proc print data=zzzz; format date new_date mmddyy10.; run;   Obs date new_date Obs date new_date 1 05/03/2018 05/04/2018 2 05/06/2018 05/07/2018 3 05/30/2018 05/31/2018 4 07/08/2018 07/09/2018 5 10/19/2018 10/22/2018 6 08/30/2018 08/31/2018 7 08/31/2018 09/03/2018   Ignore below...not sure how to remove 1 05/03/2018 . 2 05/06/2018 05/07/2018 3 07/08/2018 07/09/2018 4 10/19/2018 10/22/2018 5 08/30/2018 08/31/2018 6 08/31/2018 . ... View more

You don't want to use SYSCC?   You can add this in the beginning of your code %Let syscc=0; ** Operating Environment Condition Code **;   And after each macro, you can add this into your code: if &syscc>0 then your log message.   From SAS notes (Usage Note 35553) : SYSCC is a read/write automatic macro variable that enables you to reset the job condition code and to recover from conditions that prevent subsequent steps from running. The values for SYSCC are: 0 is no errors no warnings 4 is warnings > 4 is an error occurred ... View more

I just saw that you don't want Sat & Sun. Then this all you need: %let rptdt = %sysfunc(intnx(weekday, %sysfunc(today()), -1), mmddyy10.); ... View more