data have;
input day id1 - id4;
cards;
1 4 . . .
2 . . . .
3 . . . .
4 . . . .
5 . 2 . .
6 . . 2 .
7 . . . .
8 . . . .
9 . . . 2
10 . . . .
11 . . . .
12 . . . .
;
run;
data _null_;
if _n_=1 then do;
dcl hash H (dataset:'have',ordered:'y') ;
h.definekey ('day') ;
h.definedata ('day',"id1",'id2','id3','id4') ;
h.definedone () ;
end;
set have end=last;
array t(*) id:;
if n(of id: )>0 then do;
do i=1 to dim(t);
if not missing(t(i)) then do;
_k=t(i);
do day=day to day + 2;
h.find();
t(I)=_k;
h.replace();
end;
end;
end;
end;
if last then h.output(dataset:'want');
run;
... View more