dobetter
书上的一个例题 结果和书上的差异很大
程序如下:
*ex2-4-4;
data employee;
input id staring date7.@@;/*@@表示在一行上不换行连续读数据*/
w=intick('week',staring,'31dec05'd);
d=intick('day',staring,'31dec05'd);
wdays=d-w*2;
pay=wdays*80;
drop w d;
datalines;
0176 06jan05 0177 09jan05 0178 12jan05 0179 16jan05
0180 19jan05 0181 29jan05 0182 16feb05 0183 16may05
;
proc print;
run;
输出结果: 见附件
[s:11] [s:11]