SAS编程中日期处理与计算方法.pdfVIP

关于日期的问题

•如何显示日期？

•比较两个日期－哪个更早？

•如何求出两个日期之间相差的天数？

•ndays=date2-date1，这样计算行吗?

问题：日期的用普通的减法不行

例如:date2=03/02/2003

date108/02/2002

-05/00/0001

DATAdates;

INFILEDATALINES;

INPUTbrthdatemmddyy10.;

DATALINES;

03/03/1971

02/14/1956

01/01/1960

;

PROCPRINT;VARbrthdate;

PROCPRINT;VARbrthdate;FORMATbrthdatemmddyy10.;

Obsbrthdate

14079

2-1417

30Jan1,1960

Obsbrthdate

103/03/1971

202/14/1956

301/01/1960

当你用日期informat读入数据时

•SAS把日期变量变成数值

•SAS给定的数值是后的天数

这使得两个日期的相减容易了。

注意:一旦读入，SAS就不再把该变量当作日期。

*关于日期;

DATAage;

INFILE/home/ph5420/data/tomhs.data;

INPUT

@14randdatemmddyy10.

@34brthdatemmddyy10.@74date12mmddyy10.;

agedaysranddate-brthdate;

ageyrs(randdate-brthdate)/365.25;

ageintINT((randdate-brthdate)/365.25);

agetoday(TODAY()-brthdate)/365.25;

ageendst(MDY(02,28,1992)-brthdate)/365.25;

daysv12date12-randdate;

ifABS(daysv12-365).thenwindow12.;else

ifABS(daysv12-365)31thenwindow121;else

ifABS(daysv12-365)31thenwindow122;

yrrandYEAR(randdate);

PROCPRINTDATA=age(obs10);

VARbrthdateranddateagedaysageyrs

ageintagetoday;

TITLE‘显示不加日期Format的数据;

RUN;

PROCPRINTDATA=age(obs10);

VARbrthdateranddateagedaysageyrs

ageintagetoday;

FORMATbrthdatemmddyy10.randdatemmddyy10.;

TITLE‘显示加了日期Format的数据;

RUN;

显示不加日期Format的数据

Obsbrthdateranddateagedaysageyrsageintagetoday

1-8589101751