关于计算日期的问题

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

源数据表结构：
year        month
2008          1
...               ...
都是数值型的；
现在要根据year和month两个字段得出所在月的月初和月末。month_bg和month_ed都是SAS日期型数据。
结果：
year        month      month_bg        month_ed
2008          1            2008-1-1          2008-1-31
...               ...                ...                    ...
谢谢大家了。

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏1 回帖

关键词：month mont year Mon Nth 数据表

自己顶一下。

1. data have;
   
2. input year month;
   
3. month_bg=mdy(month,1,year);
   
4. month_ed=mdy(month,31,year);
   
5. format month_bg month_ed yymmdd10.;
   
6. cards;
   
7. 2008 1
   
8. ;

复制代码

月头没问题，月尾可能这样严密点

1. month_ed=intnx("month",month_bg,0,'end')

复制代码

soporaeternus 发表于 2011-4-26 16:57
月头没问题，月尾可能这样严密点

1. month_ed=intnx("month",month_bg,0,'end')

复制代码

说的是哈，忽略大小月了，多谢！

多谢各位，昨天想到了，基本上跟上面的一样，谢谢！

month_bg=mdy(month,1,year);
if month in (1,3,5,7,8,10,12) then month_ed=mdy(month,31,year);
else if month in (4,6,9,11) then month_ed=mdy(month,30,year);
else if mod(year,4)=0 then month_ed=mdy(month,29,year);
else if mod(year,4)^=0 then month_ed=mdy(month,28,year);
format month_bg month_ed yymmdd10.;

抱歉上面的有点不全，用这个：
month_bg=mdy(month,1,year);
if month in (1,3,5,7,8,10,12) then month_ed=mdy(month,31,year);
else if month in (4,6,9,11) then month_ed=mdy(month,30,year);
else if month=2 and mod(year,4)=0 then month_ed=mdy(month,29,year);
else if month=2 and mod(year,4)^=0 then month_ed=mdy(month,28,year);
format month_bg month_ed yymmdd10