data a; set a1;                                                                                                                                                                                      

hh=mdy(substr (P4TIME1,5,2),substr(P4TIME1,7,2), substr(P4TIME1,1,4));                                                                                                                              

jj=mdy(substr (P2TIME,5,2),substr(P2TIME,7,2), substr(P2TIME,1,4));

type='month';                                                                                                                                                                                       

time=INTCK(type,hh,jj);                                                                                                                                                                              

run;                                                                                                                                                                                                
hh:中是提取时间变量 ，这样相减得出来的是月。。。