%let d=3600;
data b(drop=x y tmp i);
set a;
x=lag(datetime);
y=dif(datetime);
if _n_=1 then do;x=datetime-&d;y=&d;end;
if y=&d then output;
else do;
tmp=num;
do i=x+&d to x+y by &d;
datetime=i;
date=datepart(datetime);
time=timepart(datetime);
if datetime^=(x+y) then num=.;
else num=tmp;
output;
end;
end;
format datetime:datetime16. date date7. time time8.;
run;
[/code:22wbvb8c]作者: shiyiming 时间: 2008-3-14 02:16 标题: 多谢byes的帮助! 多谢byes!
用update已经实现,再和您这种方法比较看看。