关于时间函数

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

求问：
sas里哪个函数能算出一个月有多少天数啊？
格式如200808,
谢谢

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

1. data _null_;
   
2.         do i=1 to 24 by 1;
   
3.                 date=intnx("MONTH","01Jan2008"d,i-1);
   
4.                 str=put(date,yymmn6.);
   
5.                 ndays=intnx("MONTH",input(str,yymmn6.),0,"END")-intnx("MONTH",input(str,yymmn6.),0,"BEGINNING")+1;
   
6.                 put str= ndays=;
   
7.         end;
   
8. run;

复制代码

很繁琐......
期待好办法

我也是这么写的，以为有个函数可以直接解决的，期待简单方法

proc format;
    invalue days "01","03","05","07","08","10","12"=31
                             "04","06","09","11"=30
                             "02"=28;
run;

data test;
    input yymm $;
        cards;
200808
200802
200002
201002
198712
200304
;

data wanted;
     set test;
    y=substr(yymm,1,4);
    m=substr(yymm,5);
    d=input(m,days.);
    if mod(y,400)=0  or (mod(y,4)=0 and mod(y,100)^=0) then d=ifn(m="02",d+1,d);
run;

proc format;
    invalue days "01","03","05","07","08","10","12"=31
                             "04","06","09","11"=30
                             "02"=28;
run;

data test;
    input yymm $;
        cards;
200808
200802
200002
201002
198712
200304
;

data wanted;
     set test;
    y=substr(yymm,1,4);
    m=substr(yymm,5);
    d=input(m,days.);
    if m="02" and (mdy(12,31,y)-mdy(1,1,y)+1=366) then d=d+1;
run;