/*
dbms_alert 用於生成並傳遞數據庫預警消息；
若某個數據庫用戶要用dbms_alert包，必須要用sys用戶登陸，並授權；
*/
–1 ,register
/*
註冊預警事件
*/
begin
dbms_alert.register(‘alert’);
end;
–2 ,remove
/*
刪除預警事件
*/
begin
dbms_alert.remove(‘alert’);
end;
–3,removeall
/*
刪除該會話的所有預警事件
*/
begin
dbms_alert.removeall;
end;
–4,set_defaults
/*
設置檢測預警事件的時間間隔
*/
begin
dbms_alert.set_defaults(20);
end;
–5,signal
/*
爲預警事件設置預警消息
*/
begin
dbms_alert.signal(‘alert’,’hello’);
end;
–6,waitany
/*
該過程等待當前對話的任何預警事件，並且在預警事件發生時，輸出相應的消息；
*/
dbms_alert.waitany(out name=>,out message => ,out status => ,in timeout );
–7,waitone
/*
該過程等待當前對話的某個特定預警事件，並且在預警事件發生時，輸出相應的消息；
*/
dbms_alert.waitone( in name =>,out message =>,out status => ,in timeout => );
–建立tr_update_sal 觸發器
create or replace trigger tr_upd_sal
after update of sal
on emp
declare
begin
dbms_alert.signal(‘upd_sal’,’修改員工工資了….’);
end;
—建立過程wait_event
create or replace procedure wait_event (name varchar2)
is
message varchar2(200);
status int ;
begin
dbms_alert.register(name);
dbms_alert.waitone(name,message,status );
if status =0 then
dbms_output.put_line(‘預警消息：’ || message);
end if;
dbms_alert.remove(name);
end;
–使用預警事件
update system.emp set sal = sal *2 where empno =8;commit;
begin
wait_event(‘upd_sal’);
end;