请教如何改年日期为年月日？

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

原来的数据是四位数字的年度日期（比如2009）

现在想在每个日期后加上1231，就是每年的12月31日。希望仍然是日期格式，比如2009年，想改成2009年12月31日（20091231），不知道有办法改不？

就是把所有年度数据后面都加上1231，格式还是日期格式。

不知哪位有办法？
谢谢了！

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：年月日 年度数据 不知道 如何 年月日

1. data _null_;
   
2. /*        x=2009;*/
   
3.         x='2009';
   
4.         d=input(compress(x||"1231"),yymmdd8.);
   
5.         put d yymmdd10.;
   
6. run;

复制代码

谢谢LS，感觉应该是对的,因为run的时候log窗口里面出现了一堆日期格式的数字。但是不知道为什么，新的那个变量d，显示的是一个奇怪的数字？

1. data b;
   
2.         set a
   
3.         d=input(compress(x||"1231"),yymmdd8.);
   
4.         format d yymmdd10.;
   
5. run;

复制代码

改成如上就可以了
d就显式成日期的格式了，并且log中不显示
奇怪的数字是日期本来的样子
format成你想要它的样子就可以了

4# soporaeternus

果然可以了！谢谢LS！高手啊！

soporaeternus 发表于 2010-8-23 15:32

1. data _null_;
   
2. /*        x=2009;*/
   
3.         x='2009';
   
4.         d=input(compress(x||"1231"),yymmdd8.);
   
5.         put d yymmdd10.;
   
6. run;

复制代码

Using MYD function if the arguments are numeric.

18      data _null_;
19           x=2009;
20           *x='2009';
21           *d=input(compress(x||"1231"),yymmdd8.);
22           d=mdy(12,31,x);
23           put d yymmdd10.;
24           put d yymmddn8.;
25           put d date9.;
26
27   run;

2009-12-31
20091231
31DEC2009
NOTE: DATA statement used (Total process time):
      real time           0.01 seconds
      cpu time            0.01 seconds

6# bobguy
I got it,thank you!!

good good study!!!
day day up!!!
2# soporaeternus

学习啦！多谢！

soporaeternus
楼主能否解释下这里：compress(x||"1231")？

如果是反过来，要把年月日格式的日期转换成年份，怎么做？

谢谢！