关于Oracle存储过程测试

核心提示：常规方式保存测试信息创建相关数据表创建数据表TestInfoLog，和序列号SEQ_TestInfoLog参考当前目录下的 TestInfoLog.sql ,运行这部分脚本，关于Oracle存储过程测试，创建测试信息保存包创建一个测试信息保存的 Package参考当前目录下的 PKG_Test_Info.pck,编译这

常规方式保存测试信息

创建相关数据表

创建数据表TestInfoLog，和序列号SEQ_TestInfoLog

参考当前目录下的 TestInfoLog.sql ,运行这部分脚本。

创建测试信息保存包

创建一个测试信息保存的 Package

参考当前目录下的 PKG_Test_Info.pck,编译这个包。

具体例子

例子1

在一个PL/SQL块中使用测试包来保存测试信息，参考当前目录下的 example1.sql

-- 简单使用的一个例子，结果查询select * from TESTINFOLOG
　　declare
　　i integer :=1;
　　begin
　　PKG_Test_Info.clearAllLogInfo;
　　PKG_Test_Info.setLogContext('匿名块测试','无',1);
　　PKG_Test_Info.logInfo('i=1');
　　PKG_Test_Info.logInfo('当前日期='||To_char(sysdate,'yyyy-mm-dd'));
　　end;

例子2

在一个存储过程中保存测试信息

参考当前目录下的Test_PKG_Test_Info.prc

---在存储过程中保存测试信息，结果查询 select * from TESTINFOLOG

　　create or replace procedure Test_PKG_Test_Info(p_Param1 int,
　　p_Param2 int,
　　p_保存日志信息 int default 1) is
　　begin
　　if(p_保存日志信息)=1 then
　　PKG_Test_Info.clearAllLogInfo;
　　PKG_Test_Info.setLogContext('存储过程测试', 'Test_PKG_Test_Info', 1);
　　
　　PKG_Test_Info.logInfo('p_Param1='||to_char(p_Param1)||',p_Param2='
　　||to_char(p_Param2));
　　end if;
　　end ;

卸载脚本