SAS宏在临床试验中应用－年龄计算

shiyiming

[code:24e8c]%macro age(data=,  /*原始数据集*/
            bday=, /*出生日期变量*/
            out= /*输出年龄的数据集*/ );

data &out;
  set &data;
  current=today();
  age=int(intck('month',&bday,current)/12);
  if month(&bday)=month(current) then age=age-(day(&bday)>day(current));
run;
%mend;

data kkk;
input bday mmddyy10.;
datalines;
12/31/1973
;
run;

%age(data=kkk,bday=bday,out=out)[/code:24e8c]

shiyiming

谢谢了