Receiving sessiondeclare
name VARCHAR2(100);
message VARCHAR2(100);
status INTEGER := 0;
secs integer := 5;
begin
name := 'PIPPO';
DBMS_ALERT.register(name);
while status = 0 loop
DBMS_ALERT.WAITany (name, message, status, secs);
if status = 1 then
dbms_output.put_line('Time out occurred, no alerts received in the last ' || secs || ' seconds');
elsif status = 0 then
dbms_output.put_line('Alert ' || name || ' correctly received, message is '||message);
end if;
end loop;
end; |