1、PL/SQL警告分类
SEVERE:该种警告用于检查可能出现的不可预料结果或错误结果,例如参数的另外问题。PERFORMANCE:该类警告用于检查可能引起的性能问题,例如在执行INSERT操作时为NUMBER列提供了VARCHAR2类型的数据。
INFORMATIONAL:该类警告用于检查子程序中的死代码。
ALL:该关键字用于检查所有警告(SEVERE,PERFORMANCE,INFORMATIONAL)。
2、控制PL/SQL警告消息
为了使得数据库可以在编译PL/SQL子程序时发出警告消息,需要设置初始化参数PLSQL_WARNINGS。初始化参数PLSQL_WARNINGS不仅可以在系统级或会话级设置,也可以在ALTER PROCEDURE命令中进行设置。SQL> ALTER SYSTEM SET PLSQL_WARNINGS = 'ENABLE:ALL';SQL> ALTER SESSION SET PLSQL_WARNINGS = 'ENABLE:PERFORMANCE';SQL> ALTER PROCEDURE proc_raise_comm COMPILEPLSQL_WARNINGS='ENABLE:PERFORMANCE';SQL> ALTER SYSTEM SET PLSQL_WARNINGS = 'DISABLE:ALL';SQL> ALTER SESSION SET PLSQL_warnings = 'DISABLE:SERVER','ENABLE:PERFORMANCE','ERROR:06002';当激活或禁止PL/SQL编译警告时,不仅可以使用ALTER SYSTEM,ALTER SESSION和ALTER PROCEDURE命令,还可以使用PL/SQL系统包DBMS_WARNINGS。示例如下:
SQL> CALL dbms_warning.set_warning_setting_string(VALUE => 'ENABLE:ALL',scope => 'SESSION');
3、使用PL/SQL编译警告
(1)检测死代码CREATE OR REPLACE PROCEDURE proc_deadcode ASx NUMBER := 10;BEGIN IF x = 10 THEN x := 20; ELSE x := 100; --死代码(永远不会执行) END IF;END proc_deadcode;为了检测该子程序是否包含死代码,必须首先激活警告检查,然后重新编译子程序,最后使用SHOW ERRORS命令显示警告错误。示例如下:
SQL> ALTER SESSION SET PLSQL_WARNINGS = 'ENABLE:INFORMATIONAL';SQL> ALTER PROCEDURE proc_deadcode COMPILE;SQL> SHOW ERRORS;(2)检测引起性能问题的代码
CREATE OR REPLACE PROCEDURE proc_updatesql(NAME VARCHAR2,salary VARCHAR2)ASBEGIN UPDATE emp SET sal = salary WHERE ename = NAME;END;为了检测该子程序是否会引起性能问题,应首先激活警告检查,然后重新编译子程序,最后再使用SHOW ERRORS命令显示警告错误。示例如下:
SQL> ALTER SESSION SET PLSQL_WARNINGS = 'ENABLE:PERFORMANCE';SQL> ALTER PROCEDURE PROC_UPDATESQL COMPILE;SQL> SHOW ERRORS;