data a1;
input id $ b ;
cards;
a01 10
a02 16
a03 20
a03 20
a03 300
;
run;
data a2;
input id $ c $;
cards;
a01 f
a02 m
a02 f
a03 m
a03 ff
;
run;
data a1;
set a1;
by id;
if first.id then a=1;
else a+1;
run;
data a2;
set a2;
by id;
if first.id then a=1;
else a+1;
run;
proc sql;
create table a3 as
select distinct a1.*,c
from a1 left join a2
on a1.id=a2.id and a1.a=a2.a;
quit;
data a3;
set a3;
drop a;
run;
|