DateTime

data mh;
input pid sdate stime edtime;
informat sdate date9.
         stime time8.
edtime datetime18.;
format sdate date9.
         stime time8.
edtime datetime18.;
cards;
101 13jan2003 10:23:45 19mar2003:13:45:23
102 15feb2003 11:24:27 24apr2003:14:22:22
;

data mh1;
set mh;
sday=day(sdate);
smn=month(sdate);
syr=year(sdate);
swk=weekday(sdate);
shr=hour(stime);
smt=minute(stime);
sc=second(stime);
edate=date part(edtime);
etime=time part(edtime);
run;

proc print data=mh1;
format edate date9.;
format etime time12.;
run;