常规方式保存测试信息
创建相关数据表
创建数据表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 ;
卸载脚本