|
libname timu "f:/pp_sas_dataset";
proc import datafile="f:/pp_sas_dataset/shujuyuan.csv"
out=timu.shujuyuan1
DBMS=csv replace;
getnames=yes;
guessingrows=2000;
run;
data timu.shujuyuan2;
set timu.shujuyuan1;
format _date date7. _time time5. a time5. b time5. c time5. d time5. e time5. f time5. g time5.;
_date=datepart(transport_time);
_time=timepart(transport_time);
a=hms(0,0,0);
b=hms(9,30,0);
c=hms(11,30,0);
d=hms(14,30,0);
e=hms(16,30,0);
f=hms(18,30,0);
g=hms(23,59,0);
if a<=_time<b then flag=1;
else if b<=_time<c then flag=2;
else if c<=_time<d then flag=3;
else if d<=_time<e then flag=4;
else if e<=_time<f then flag=5;
else if f<=_time<g then flag=6;
drop transport_time a b c d e f g;
run;
proc sql;
select distinct flag ,count(*) from timu.shujuyuan2;
group by flag;
quit;
|