看看

这个汇总出来做什么呢？？

用附件中的数据计算的，自己试验正确

proc sql;
create table temp1 as
select Stamager as time,'min' as code
from temp
union
select Clsmager as time,'max' as code
from temp;
quit;
proc sql;
create table temp2 as
select distinct *
from temp1;
quit;
proc sort data=temp2;
by time descending code;
run;
data temp2;
set temp2;
time1=lag(time);
code1=lag(code);
if code1='min' and code='min' then do;t1=time1;t2=time-1;end;
if code1='min' and code='max' then do;t1=time1;t2=time;end;
if code1='max' and code='min' then do;t1=time1+1;t2=time-1;end;
if code1='max' and code='max' then do;t1=time1+1;t2=time;end;
keep t1 t2;
if t1^=.;
run;
proc sql;
create table temp3 as
select distinct temp2.*,Fdcd,Funmager
from temp2 left join temp
on Stamager<=t1 and clsmager>=t2;
quit;
proc sort data=Temp3 out=temp3;
   by T1 T2 FDCD Funmager;
run;
proc transpose data=temp3 out=temp4 PREFIX=COL NAME=_SOURCE_;
   by T1 T2 FDCD;
   var FUNMAGER;
run;
data temp4;
set temp4;
Funmager=compress(col1||','||col2);  
run;
proc sort data=temp4;
by FDCD Funmager t1 t2;
run;
data temp4;
set temp4;
cls=t1-lag(t2);
run;
data temp4;
set temp4;
by FDCD Funmager;
if _n_=1 then flag=1;
else if first.FDCD or first.Funmager or cls^=1 then flag+1;
run;
proc sql;
create table temp5 as
select distinct FDCD,FUNMAGER,min(t1) as tmin,max(t2) as tmax
from temp4 group by flag;
quit;
data temp5;
set temp5;
format tmin yymmdd10. tmax yymmdd10.;
run;
proc sort data=temp5;
by fdcd tmin;
run;

哇，牛人，谢谢，太感谢了