CREATE OR REPLACE PACKAGE PKG_SYS_LOG IS
-- Author : Li Cong
-- Created : 2009-10-12
-- Purpose : 存放系统级别的日志信息,如,过程报错。
---系统报错日志记录
PROCEDURE ERROR_LOG(P_PACKAGE_NAME VARCHAR2,
P_PROC_NAME VARCHAR2,
P_EXCEP_DT DATE,
P_EXCEP_CODE VARCHAR2,
P_EXCEP_DESC VARCHAR2,
P_EXCEP_REMK VARCHAR2,
P_LINE_NO NUMBER);
---系统执行日志
PROCEDURE EXECUTE_LOG(P_PACKAGE_NAME VARCHAR2,
P_PROC_NAME VARCHAR2,
P_EXEC_START_TM DATE,
P_EXEC_END_TM DATE,
P_EXEC_PEND_TM NUMBER,
P_EXEC_REF_DATA_ROWS NUMBER,
P_EXEC_REMK VARCHAR2);
END PKG_SYS_LOG;
CREATE OR REPLACE PACKAGE BODY PKG_SYS_LOG IS
--*************************************************************
-- AUTHOR : KELIVEN LIU
-- CREATED : 2008-05-20
-- PURPOSE : 记录系统中存储过程运行日志
-- PARAMETER:
-- P_PACKAGE_NAME VARCHAR2 包名
-- P_PROC_NAME VARCHAR2, 过程名
-- P_EXCEP_DT DATE, 执行日期
-- P_EXCEP_CODE VARCHAR2, 异常代码
-- P_EXCEP_DESC VARCHAR2, 异常描述信息
-- P_EXCEP_REMK VARCHAR2, 备注,可能的值为'BEGIN','END','ERROR'
-- P_LINE_NO NUMBER 行号
-- MODIFY HISTORY
-- PERSON DATE COMMENTS
-- -------------------------------------------------------------
--*************************************************************
--*************************************************************
-- AUTHOR : KELIVEN LIU
-- CREATED : 2008-05-20
-- PURPOSE : 记录系统中存储过程运行日志
-- PARAMETER:
-- NAME TYPE DESC
-- P_SEQ_NO NUMBER 发生异常存储过程中主要sequence的当前值
-- P_PROC_NAME VARCHAR2 存储过程名
-- P_EXCEP_DT DATE 时间,包括开始时间,结束时间,异常发生时间
-- P_EXCEP_CODE VARCHAR2 异常代码
-- P_EXCEP_DESC VARCHAR2 异常描述信息
-- P_EXCEP_REMK VARCHAR2 备注,可能的值为'BEGIN','END','ERROR'
-- P_LINE_NO NUMBER 行号
-- P_PACKAGE_NAME VARCHAR2, 包名
-- P_PROC_NAME VARCHAR2, 过程名
-- P_EXEC_START_TM DATE, 执行开始时间
-- P_EXEC_END_TM DATE, 执行结束时间
-- P_EXEC_PEND_TM NUMBER, 执行花费时间
-- P_EXEC_REF_DATA_ROWS NUMBER, 涉及数据量
-- P_EXEC_REMK VARCHAR2 备注,可能的值为'BEGIN','END','ERROR'
-- MODIFY HISTORY
-- PERSON DATE COMMENTS
-- -------------------------------------------------------------
--*************************************************************
PROCEDURE ERROR_LOG(P_PACKAGE_NAME VARCHAR2,
P_PROC_NAME VARCHAR2,
P_EXCEP_DT DATE,
P_EXCEP_CODE VARCHAR2,
P_EXCEP_DESC VARCHAR2,
P_EXCEP_REMK VARCHAR2,
P_LINE_NO NUMBER) AS
PRAGMA AUTONOMOUS_TRANSACTION;
BEGIN
INSERT INTO TC_EXCEPTION_LOG
(LOG_ID,
PACKAGE_NAME,
PROC_NAME,
EXCEPTION_TM,
EXCEPTION_CODE,
EXCEPTION_DESC,
EXCEPTION_REMK,
LINE_NO)
VALUES
(SEQ_LOG.NEXTVAL,
SUBSTR(P_PACKAGE_NAME, 1, 120),
SUBSTR(P_PROC_NAME, 1, 120),
P_EXCEP_DT,
SUBSTR(P_EXCEP_CODE, 1, 200),
SUBSTR(P_EXCEP_DESC, 1, 1000),
SUBSTR(P_EXCEP_REMK, 1, 600),
P_LINE_NO);
COMMIT;
EXCEPTION
WHEN OTHERS THEN
DBMS_OUTPUT.PUT_LINE('STP_RUNNING_LOG' || SQLCODE || ':' || SQLERRM);
ROLLBACK;
END ERROR_LOG;
---系统执行日志
PROCEDURE EXECUTE_LOG(P_PACKAGE_NAME VARCHAR2,
P_PROC_NAME VARCHAR2,
P_EXEC_START_TM DATE,
P_EXEC_END_TM DATE,
P_EXEC_PEND_TM NUMBER,
P_EXEC_REF_DATA_ROWS NUMBER,
P_EXEC_REMK VARCHAR2) AS
PRAGMA AUTONOMOUS_TRANSACTION;
BEGIN
INSERT INTO TC_EXECUTE_LOG
(LOG_ID,
PACKAGE_NAME,
PROC_NAME,
STRAT_TM,
END_TM,
SPEND_TM,
REF_DATA_ROWS,
REMK)
VALUES
(SEQ_LOG.NEXTVAL,
SUBSTR(P_PACKAGE_NAME, 1, 120),
SUBSTR(P_PROC_NAME, 1, 120),
P_EXEC_START_TM,
P_EXEC_END_TM,
P_EXEC_PEND_TM,
P_EXEC_REF_DATA_ROWS,
SUBSTR(P_EXEC_REMK, 1, 1000));
COMMIT;
EXCEPTION
WHEN OTHERS THEN
DBMS_OUTPUT.PUT_LINE('TC_EXECUTE_LOG' || SQLCODE || ':' || SQLERRM);
ROLLBACK;
END EXECUTE_LOG;
END PKG_SYS_LOG;
SQL PKG示例的更多相关文章
-
SQL 2005示例库(转载)
sql2005数据库实例 从网上找还得麻烦,转了过来,点击就可以下载! 在学习SQL2005中离开不了SQL2005示例数据库,AdventureWorks数据库下载安装,,northwind数据库下 ...
-
mybatis的sql中使用$会出现sql注入示例
mybatis的sql中使用$会出现sql注入示例: 模拟简单登录场景: 页面代码: function login(){ //sql注入 var user = { username : "' ...
-
Mysql 使用命令及 sql 语句示例
Mysql 是数据库开发使用的主要平台之一.sql 的学习掌握与使用是数据库开发的基础,此处展示详细sql 语句的写法,及各种功能下的 sql 语句. 在此处有 sql 语句使用示例:在这里 此处插入 ...
-
sql注入示例
实验指导说明 实验环境 • 实验环境 o 操作机:Windows XP o 目标机:Windows 2003 o 目标网址:www.test.ichunqiu • 实验工具: Tools Path S ...
-
Spark SQL UDAF示例
UDAF:用户自定义聚合函数 Scala 2.10.7,spark 2.0.0 package UDF_UDAF import java.util import org.apache.spark.Sp ...
-
Spark SQL UDF示例
UDF即用户自定函数,注册之后,在sql语句中使用. 基于scala-sdk-2.10.7,Spark2.0.0. package UDF_UDAF import java.util import o ...
-
SQL XML示例
declare @xmlDoc xml,@id varchar(50); set @xmlDoc='<DocObjContent> <NewCtrl Id="0001&qu ...
-
oracle sql 语句 示例
--oracle 用户对象的导入导出 exp devimage/oracle@172.xx.x.xx/TESTDB owner='devimage' file=d:/devimage.dmp log= ...
-
mysql 简单的sql优化示例[不定时更新]
对于慢sql的分析步骤: 1) desc|explain sql 查看执行计划, 对于type很慢的, 分析是否建立了对应字段的索引 2) 进行排除法, 把子查询抽离出来, 单独执行,定位慢查询是哪个 ...
随机推荐
-
servlet中service() 和doGet() 、doPost() 学习笔记
Sevlet接口定义如下: 与Sevlet接口相关的结构图: service() 方法是 Servlet 的核心.每当一个客户请求一个HttpServlet 对象,该对象的service() 方法就要 ...
-
js获取屏幕大小
1.js获取屏幕大小 <html> <script> function a(){ document.write( "屏幕分辨率为:"+screen.widt ...
-
IOS开发/iphone开发多线程
有时候可能有很多功能要同时实现,例如每隔多长时间就会检测程序网络连接,又或者有时候需要从服务器下载一个不小的文件,如果用单线程几乎是不可想的事情,程序将会卡的无法使用,用到多线程和不用多线程,给用户的 ...
-
(六)WebRTC手记之WebRtcVideoEngine2模块
转自:http://www.cnblogs.com/fangkm/p/4401143.html 终于讲到视频数据的编码发送模块了,不容易.总体来说也看了不少时间WebRTC的源码了,最大的感触就是各个 ...
-
js的url中传递中文参数乱码,如何获取url中参数问题
一:Js的Url中传递中文参数乱码问题,重点:encodeURI编码,decodeURI解码: 1.传参页面Javascript代码: <script type=”text/javascript ...
-
sql server日志不能shrink或truncate
Backup log [dbxxx] with truncate_only sql server 2008之后不支持此操作,需要改为: BACKUP LOG dbxxx TO DISK='NUL:' ...
-
hadoop常见错误集锦
1 Hadoop namenode -format后Incompatible namespaceIDS 错误解决办法 重新格式话namenode后,会重新分配一个namespaceId, 这个nam ...
-
laravel小抄
原文地址:http://cheats.jesse-obrien.ca/ Artisan // Displays help for a given command php artisan --help ...
-
Django HTTP处理流程(自我总结)
Django中由wsgi模块接管http请求,核心处理方法为get_wsgi_application,其定义如下: def get_wsgi_application(): ""&q ...
-
spring cloud+dotnet core搭建微服务架构:服务发现(二)
前言 上篇文章实际上只讲了服务治理中的服务注册,服务与服务之间如何调用呢?传统的方式,服务A调用服务B,那么服务A访问的是服务B的负载均衡地址,通过负载均衡来指向到服务B的真实地址,上篇文章已经说了这 ...