SAS  /  PC

　

八、 範 例 八 : 日期輸入、運算及輸出

程式檔名稱  :  SAMPLE8
DATA　DATETEST; 　　　　　　　　　以月、日、年形式之 6-10
INPUT SDATE:MMDDYY8. SW 　　　　　　　　　位數字輸入開檢日期 、體重
　　　EDATE:MMDDYY8.　EW 　　　　　　　　　(SDATE、SW)及、完檢日期、
　　　BDATE:DATE7.; 　　　　　　　　　體重 (EDATE、EW) 以英文字
　　　　　　　　　輸入出生日期資料 (BDATE)

FORMAT SDATE MMDDYY6. EDATE DATE7. BDATE MMDDYY8.;    指定日期輸出的格式(表 8-1)

TESTDAY=EDATE-SDATE; ADG=(EW-SW)/TESTDAY; 　　　　　     檢定期間日期及日增重運算
TOTDAY=EDATE-BDATE; 　　　　　　　　　出生至檢定結束間之日期
CARDS;
4-5-87 22.3 4-6-88 111.0 01MAR87 　　　　　　　　　依 INPUT 指定格式輸入
4/5/87 22.3 4/6/88 112.0 01MAR87 　　　　　　　　　6-10 位之數字均可以
040587 22.3 040688 110.0 01MAR87 　　　　　　　　　DATE:8.　的形式輸入
10-14-87 22.3 10-14-88 111.0 11SEP87
10/14/87  22.3 10/14/88 112.0 11SEP87 　　　　　　　　　如 SDATE 及 EDATE 內

101487

 22.3 101488 110.0 11SEP87 　　　　　　　　　之任一格式
10-14-1987 22.3

10-14-1988

 111.0

11SEP87
10/14/1987 22.3 10/14/1988 112.0 11SEP87
10141987 22.3 10141988 110.0 11SEP87
;
RUN;
PROC PRINT;  　　　　　　　　　(表 8-1)
VAR SDATE EDATE BDATE ADG;  　　　　　　　　　依 FORMAT 指定格式輸出
RUN;  　　　　　　　　　各項日期欄位

　
表 8-1

OBS

 SDATE

 EDATE

 BDATE

 ADG
1 040587 06APR88 03/01/87 0.24169
2 040587 06APR88 03/01/87 0.24441
3 040587 06APR88 03/01/87 0.23896
4 101487 14OCT88 09/11/87 0.24235
5 101487 14OCT88 09/11/87 0.24508
6  101487 14OCT88 09/11/87 0.23962
7  101487 14OCT88 09/11/87 0.24235
8 101487 14OCT88 09/11/87 0.24508
9  101487 14OCT88 09/11/87 0.23962