Alerta no tan alerta

No me funciona la alerta, pienso que puede ser porque no llamo al bloque. ¿Por qué otra cosa podría ser?
Procedure peli_alqui is
alerta_puñetera alert;
r number;
Begin
alert_puñetera:=find_alert('como_se_llame');
select campo into datoquequiero from mitabla where condiciones_varias;
if DATOQUEQUIERO=loquesea then
r:=show_alert(alerta_puñetera);
end if;
end;