关于Oracle存储过程测试

80酷酷网    80kuku.com

  

  常规方式保存测试信息

  创建相关数据表

  创建数据表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 ;

  卸载脚本



分享到
  • 微信分享
  • 新浪微博
  • QQ好友
  • QQ空间
点击: