Oracle综合辅导：如何在Oracle的报警日志添加自定义的消息

会计考友

Oracle把所有的主要系统消息都写入Oracle报警日志里。要为所有的Oracle 系统消息创建唯一的一个存放地点，Oracle 专业人士必须学会一种方法来把应用程序的消息写入到报警日志里去。
　　
　　把所有的Oracle消息集中起来（不管是系统消息还是应用程序消息）确实能够简化数据库的管理，因为所有与Oracle相关的报警消息都存放在一个集中的文件里。
　　
8 Z- l, T9 L: D% v; f" `4 d9 L　　Oracle DBA可以创建一个全局的PL/SQL存储过程来处理与报警日志文件的交互过程，然后他们调用这个全局软件包，将合适的消息传递给这个存储过程。下面是这种调用的一个例子：
2 q# l5 n/ L% g* ~3 f$ }) j　　
　　when others then
　　
　　　 dbms_custom.write_alert
6 m, ]  ^, o. i% R( Q　　
　　　　(:p_sysdate||' Application error'||:var1||' encountered');
" \! u) K# @) Q4 {% o　　
; L6 z, V/ _6 N& d  \　　要完成写的过程，你可以使用Oracle的UTL_FILE 包，它允许Oracle SQL 和PL/SQL 直接从服务器的文本文件进行读写。
　　
　　要向Oracle 报警日志写入自定义的消息，应该遵循下面的步骤：
2 T4 n) ]5 P: ~0 v　　
) ~4 p+ x) N$ ], {: F　　1.　　　　 找到后台转储路径（报警日志的位置）。
% |1 R4 O* N+ ^1 J" J9 q" _, X/ a　　
　　2.　　　　 设置UTL_FILE_DIR 初始化参数。
+ O7 Q' D$ Y2 {' c( i/ ?　　
　　3.　　　　 执行UTL_FILE.FOPEN打开文件进行写访问。
/ V: L0 h) M) T5 Z" i6 h# k　　
8 T, r: P! f3 I5 M8 o- D　　4.　　　　 使用DBMS_OUTPUT.PUT_LINE向报警日志写入自定义的消息。
　　
　　5.　　　　 执行UTL_FILE.FCLOSE来关闭文件。
　　
* k& i6 L3 ]! ]( {　　下面是一个Oracle9i的程序例子：
　　
　　-- ******************************************************
　　
　　-- 取得报警日志文件的路径
　　
　　-- ******************************************************

会计考友

　　
7 n3 `4 q/ K$ j8 y. `. E　　select
　　
/ I: P4 q, N# d( K4 K8 I　　　 name into :alert_loc
　　
4 A6 j8 w- |5 e: i: a9 u　　from
6 z+ }3 A/ F/ z) V) v! \" W/ _　　
* F7 ~: [; |: j1 |　　　 v$parameter
　　
3 K1 X" `. L, t( ~4 @+ u0 ?6 s　　where
　　
3 v4 p* x( D$ T1 p9 X　　　 name = 'background_dump_destination';
5 j: |( ~1 Q1 F9 [7 `, d　　
　　-- ******************************************************
4 l2 Y+ |  I; G& d+ C　　
9 ^  k& l3 d7 Z$ x　　--　设置utl_file_dir
　　
# B% X( Q$ W( n. B( w2 p　　--　 (在Oracle9i 以前，你必须返回数据库)
　　
! a5 K. o# Q. H& u' d# X3 ^& P5 y　　-- ******************************************************
　　
　　alter system set utl_file_dir = ':alert_log');
　　
) A  P7 A1 ^' ]! j& w　　-- ******************************************************
　　
　　--　打开报警文件进行写操作
　　
9 T+ I! n  [! Q; M5 Z　　-- ******************************************************
　　
　　utl_file.fopen(':alert_loc','alertprod.log','W');
　　
　　-- ******************************************************
. X4 C+ I* k3 I4 z; }0 i) d1 K1 O　　
, b, }! O& J8 f# W1 l  l　　--　将自定义的消息写入报警日志文件里
　　
　　-- ******************************************************
3 F' c% g2 t* i　　
　　dbms_output.put_line('invalid_application_error');
, W* G- ~2 I' X( o9 `6 [" k: o: p　　
6 j$ W6 D2 q: s+ f; S) [" W　　-- ******************************************************
　　
  E2 m3 p! `* }8 y% a* K+ V1 n: y　　--　关闭报警日志文件
　　
, {* i+ y4 s+ E4 m' {# O　　-- ******************************************************
　　
　　utl_file.fclose(':alert_loc');