如何通过sas程序对日期进行补全？

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

将2013-05 补全为 2013-05-31.2013-06 补全为 2013-06- 30.等等。。。日期为当月的最后一天。2013-05此列为字符型。求解答。。。

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：sas程序 求解答 字符型 程序 如何

if substr(date,6,2) in ("01","03","05","07","08","10", "12") then date=strip(date)||'-31';
else if substr(date,6,2) in ("04","06","09","11") then date=strip(date)||'-30';
else do;
n= input(substr(date,1,4),best.);
if (mod(n,4) ne 0) or (mod(n,100)=0 and mod(n,400) ne 0) then date=strip(date)||'-28';
else date=strip(date)||'-29';
end;

wwang111 发表于 2013-11-27 17:08
if substr(date,6,2) in ("01","03","05","07","08","10", "12") then date=strip(date)||'-31';
else if  ...

还有没有更简洁的方法？

1. data ben;
   
2.     y=2013;
   
3.     do m=1 to 12;
   
4.         datec=catx('-',y,put(m,z2.));
   
5.         daten=intnx('month',input(cats(datec,'-01'),yymmdd10.),0,'e');
   
6.         output;
   
7.     end;
   
8.     format daten yymmdd10.;
   
9.     keep datec daten;
   
10. run;

复制代码