- data an;
- input id $ ti s_date yymmdd10.;
- format s_date yymmdd10.;
- datalines;
- aaaa 4 2011/8/24
- aaaa 3 2011/9/22
- aaaa 1 2012/2/21
- ffff 4 2011/11/10
- ffff 4 2011/12/8
- ; run;
- data bn;
- input id $ ti s_date yymmdd10. e_date yymmdd10.;
- format s_date e_date yymmdd10.;
- datalines;
- aaaa 7 2011/10/23 2012/4/20
- cccc 7 2011/9/3 2012/3/1
- eeee 7 2011/9/3 2012/3/1
- ffff 7 2012/1/7 2012/7/5
- gggg 7 2011/9/3 2012/3/1
- hhhh 7 2011/9/3 2012/3/1
- ; run;
- /*data new;
- set a b;
- run;
- proc sort data=new;by id;run;*/
- proc sort data=an;by id;run;
- proc sort data=bn;by id;run;
- data new;
- merge an(in=a1) bn(in=a2);
- by id;
- if a1=1;
- run;
- data final;
- set new bn;
- run;
- proc sort data=final;by id;run;