自定义SAS函数:将中国农历日期转换成公历日期的函数

Functions and CALL Routines

DNTOG Function


将中国农历日期转换成公历日期

Category: 日期函数 Date


Syntax

DNTOG(NYEAR,NMONTH,NDAY,YUNYUE);

Arguments

NYEAR 中国农历年份,赋值范围:1968-2031

NONTH 中国农历月份,赋值范围:1-12

NDAY 中国农历日期,赋值范围:1-30

YUNYUE 是否农历闰月,赋值范围:0 or1 ,0表示否,1表示是。

Details

Examples

代码示例1,把中国农历日期转化为公历日期

options cmplib=(sasuser.datetr);
proc fcmp;
Gday= dNtoG(1968,7,11,1);
Gday2=dNtoG(1968,7,11,0);
put  Gday= date9.;
put  Gday2= date9.;
run;
quit;

结果:

                                      The FCMP Procedure

Transfered date : 03SEP1968
Transfered date : 04AUG1968
Gday=03SEP1968
Gday2=04AUG1968

代码例2,想知道2009年中国农历春节是哪一天吗?

options cmplib=(sasuser.datetr);
data _null_;
Gday=dNtoG(2009,1,1,0);
put  "2009 Chinese Spring Festival day is " Gday date9.;
put  "GONG XI FA CAI !";
run;

LOG中显示:

Transfered date : 26JAN2009
2009 Chinese Spring Festival day is 26JAN2009
GONG XI FA CAI !

注:如对此函数感兴趣,请邮件索取自定义函数DNTOG()。


相关博文

《自定义SAS函数:将中国农历日期转换成公历日期的函数》上的4个想法

  1. 博主,你好!看了你的日志,对你的农历转阳历自定义函数很感兴趣,正好我的数据处理需要用到,还希望你不吝赐教,发给我一份,非常感谢!我的邮箱wuyu84@gmail.com

  2. 博主,你好!看了你的日志,对你的农历转阳历自定义函数很感兴趣,正好我的数据处理需要用到,还希望你不吝赐教,发给我一份,非常感谢!我的邮箱jiwenli007@163.com

    谢谢!!!

  3. Hi,能否拜读一下你的这段代码,以前没写过自定义函数,都是用宏实现,感觉挺好玩的。haiyangzhang83@yahoo.com.cn

发表评论

邮箱地址不会被公开。 必填项已用*标注