How to conditional delete a record?

[Moyosrie]

i need to delete the record after the record that has status ='y'

data out;
input source $2.  target $2. type $5.;
datalines;
a b temp
b c temp
c b temp
b d perm
;
run;

 

data out1( drop=type rename=(source=source1 target=target1));
set out(firstobs=2);
run;

data new;
merge out out1;
run;

 

data new1(keep=status source target type);
length status $10.  ;
set new ;
if target1=source and source1 =target and type ='temp'
then status = 'Y';
else status= 'n';
run;

[Moyosrie]

after every 'y' status

[Ksharp]

data want;
set new1;
if lag(status)='Y' then delete;
run;