data a;
input id startyear;
cards;
1 2005
2 2003
2 2005
3 2002
;
run;
data b;
input id country $ startyear;
cards;
1 032 2004
1 056 2006
1 018 2003
2 013 2001
2 057 2003
2 025 2005
3 018 2003
3 025 2004
;
data test;
set a;
ex=0;
exnumber=0;
do i=1 to nobs;
set b(rename=(id=id1 startyear=startyear1)) nobs=nobs point=i;
if id=id1 and startyear>startyear1 then do;
ex=1;
exnumber+1;
end;
end;
drop startyear1 id1;
run;
|