如何多对个数据集进行横向合并？

shiyiming

可以用SQL，但不知前后一个月怎么定义
[code:1mufidsu]
proc sql;
create table out as
select data1.name,data1.date,data2.date as date2 ,data1.state,data2.remark
from data1,data2
where data1.name=data2.name and abs(data2.date-data1.date)<32;
quit;
[/code:1mufidsu]

shiyiming

[code:1fls36tk]data a;
input name $ data yymmdd9. state $;
format data date9.;
mon=month(data);
mon_1=mon-1;
mon_2=mon+1;
cards;
Jim 20051001 F
Jim 20050809 D
Tom 20030208 B
Kin 20081215 C
Kin 20020309 A
Kin 20080803 B
;
data b;
input name $ data yymmdd9. remark;
format data date9.;
rename data=data2;
mon=month(data);
cards;
Jim 20051010 12
Jim 20050801 34
Jim 20051209 34
Jim 20050709 34
Tom 20060203 11
Kin 20071120 44
Kin 20030212 33
;
run;
proc sql;
create table ab as
  select d1.name,d1.data,d2.data2,state,remark
    from a d1,b d2
   where d1.name=d2.name
     and mon_1<=d2.mon<=mon_2;
quit;[/code:1fls36tk]

shiyiming

谢谢！ <!-- s:) --><img src="{SMILIES_PATH}/icon_smile.gif" alt=":)" title="Smile" /><!-- s:) -->