topic Re: Get previous day of week? in SAS Programming

Get previous day of week?

FrankE — Tue, 21 Sep 2010 16:34:54 GMT

Hi guys,

How would I do the date math to get last Wednesday based on today's date?

I know it's going to use INTNX somehow but I can't seem to think it through..

Thanks!

Re: Get previous day of week?

sbb — Tue, 21 Sep 2010 16:51:32 GMT

SAS numeric date variable is integer value, representing days since 1/1/1960. So if you use INTNX to get back to the start of the prior week (Sunday) and then count forward +3, you will have the Wednesday date.

Scott Barry
SBBWorks, Inc.

Suggested Google advanced search arguments, this topic / post:

documentation date introduction site:sas.com

intnx site:sas.com

Re: Get previous day of week?

polingjw — Tue, 21 Sep 2010 17:51:40 GMT

Since you are looking for a Wednesday, you could also use 'middle' as the alignment parameter instead of incrementing by three.

data _null_;
LastWednesday = intnx('week', today(), 0, 'middle');
if LastWednesday >= today() then LastWednesday + -7;
put LastWednesday = weekdate.;
run;

Re: Get previous day of week?

data_null__ — Tue, 21 Sep 2010 20:10:04 GMT

What answer do you expect tomorrow Wednesday Sep 22,2010?

Re: Get previous day of week?

FrankE — Tue, 21 Sep 2010 20:57:49 GMT

Hey guys,

thanks for all your help.. The actual requirement was to come up with a start date of 2 Saturdays ago and and end date of the previous Saturday. Both in DATE9. format. I needed to get them into macro vars so I used %let instead:

%let start_date = %sysfunc(putn(%eval(%sysfunc(intnx(week, "&SYSDATE"D, -1))-1),DATE9.));
%let end_date = %sysfunc(putn(%eval(%sysfunc(intnx(week, "&SYSDATE"D, 0))-1),DATE9.));

Re: Get previous day of week?

data_null__ — Wed, 22 Sep 2010 17:05:41 GMT

I think you can simplify this a bit with a shift index and SYSFUNC's little known format parameter.

INTNX(interval<.shift-index>, start-from, increment<, 'alignment'>)

[pre]
5006 %let start_date = %sysfunc(putn(%eval(%sysfunc(intnx(week, "&SYSDATE"D, -1))-1),DATE9.));
5007 %let end_date = %sysfunc(putn(%eval(%sysfunc(intnx(week, "&SYSDATE"D, 0))-1),DATE9.));
5008
5009
5010 %put &START_DATE &END_DATE;
11SEP2010 18SEP2010
5011
5012
5013 %let start_date = %sysfunc(intnx(week.7, "&SYSDATE"D, -1),date9.);
5014 %let end_date = %sysfunc(intnx(week.7, "&SYSDATE"D, 0),date9.);
5015
5016
5017 %put &START_DATE &END_DATE;
11SEP2010 18SEP2010
[/pre]

Re: Get previous day of week?

FrankE — Thu, 23 Sep 2010 15:05:02 GMT

ohhh much better! thanks for the tip!!

Re: Get previous day of week?

PatrickG — Mon, 13 Dec 2010 15:42:04 GMT

Lots of good info on using SAS dates here:

http://support.sas.com/documentation/cdl/en/lrcon/62955/HTML/default/viewer.htm#a002200738.htm

Re: Get previous day of week?

Ksharp — Tue, 14 Dec 2010 08:36:16 GMT

Or another choice.

[pre]
options mprint mlogic symbolgen;
%let start_date = %sysfunc(putn(%eval(%sysfunc(intnx(week, %sysfunc(today()), -1))-1),DATE9.));
%let end_date = %sysfunc(putn(%eval(%sysfunc(intnx(week, %sysfunc(today()), 0))-1),DATE9.));
%put _user_;
[/pre]

Ksharp