          
      

       

PROCEDURE Show_alearts (Alert_name varchar2,Message
Varchar2)IS
alert_id   ALERT := Find_Alert(Alert_name); 
dummy_var  NUMBER; 
BEGIN
Set_Alert_Property(alert_id,
ALERT_MESSAGE_TEXT,Message); 
dummy_var := Show_Alert(alert_id); 
  
END;

    Alert

    
Show_alearts('AlertName','Message');

--------------------------------------------------------------