linuxsir首页 LinuxSir.Org | Linux、BSD、Solaris、Unix | 开源传万世,因有我参与欢迎您!
网站首页 | 设为首页 | 加入收藏
您所在的位置:主页 > Linux数据库 >

Oracle存储过程实现记录日志

时间:2020-07-18  来源:未知  作者:admin666

Oracle存储过程实现记录日志

create table
-- Create table
create table t_cem_proc_logs
(
  id      varchar2(32),
  proc_mc  varchar2(100),
  title    varchar2(4000),
  content  clob,
  log_type varchar2(10),
  log_time date default sysdate
)
;
-- Add comments to the table
comment on table t_cem_proc_logs
  is '日志';
-- Add comments to the columns
comment on column t_cem_proc_logs.id
  is 'id';
comment on column t_cem_proc_logs.proc_mc
  is '过程名';
comment on column t_cem_proc_logs.title
  is '标题';
comment on column t_cem_proc_logs.content
  is '内容';
comment on column t_cem_proc_logs.log_type
  is '日志级别:info,error,debug';
comment on column t_cem_proc_logs.log_time
  is '时间';
-- Create/Recreate primary, unique and foreign key constraints
alter table t_cem_proc_logs
  add constraint pri_proc_logs primary key (ID);


-- Create table
create table T_CEM_TASK_LOG
(
  id          VARCHAR2(32) not null,
  task_id      VARCHAR2(100),
  task_code    VARCHAR2(100),
  start_date  DATE,
  end_date    DATE,
  log_status  VARCHAR2(2),
  log_message  VARCHAR2(4000),
  createdate  DATE,
  requestdata  CLOB,
  responsedata CLOB,
  modifytime  DATE,
  corpid      VARCHAR2(32)
);
-- Add comments to the table
comment on table T_CEM_TASK_LOG
  is '调度日志';
-- Add comments to the columns
comment on column T_CEM_TASK_LOG.id
  is 'ID';
comment on column T_CEM_TASK_LOG.task_id
  is '调度标识';
comment on column T_CEM_TASK_LOG.task_code
  is '调度任务代码';
comment on column T_CEM_TASK_LOG.start_date
  is '开始执行时间';
comment on column T_CEM_TASK_LOG.end_date
  is '执行结束时间';
comment on column T_CEM_TASK_LOG.log_status
  is '状态 0:执行中 1:执行完成 2:执行错误';
comment on column T_CEM_TASK_LOG.log_message
  is '日志信息';
comment on column T_CEM_TASK_LOG.createdate
  is '创建日期';
comment on column T_CEM_TASK_LOG.requestdata
  is '请求报文';
comment on column T_CEM_TASK_LOG.responsedata
  is '返回报文';
comment on column T_CEM_TASK_LOG.modifytime
  is '修改时间';
comment on column T_CEM_TASK_LOG.corpid
  is '企业id';
-- Create/Recreate indexes
create index T_CEM_TASK_LOG_N1 on T_CEM_TASK_LOG (TASK_ID);
-- Create/Recreate primary, unique and foreign key constraints
alter table T_CEM_TASK_LOG
  add constraint T_CEM_TASK_LOG_PK primary key (ID);

 

 

Create sequence
-- Create sequence
create sequence seq_log
minvalue 1
maxvalue 99999999
start with 1
increment by 1
cache 20
cycle;


package
CREATE OR REPLACE PACKAGE LOGUTILS IS

 -- Author  : DYB
 -- Created : 2017/3/28 10:34:51
 -- Purpose : 日志记录工具类

 --日志
 PROCEDURE LOG(P_TASK_ID    VARCHAR2,
        P_TASK_CODE  VARCHAR2,
        P_START_DATE  DATE DEFAULT NULL,
        P_END_DATE    DATE DEFAULT NULL,
        P_LOG_STATUS  VARCHAR2 DEFAULT NULL,
        P_LOG_MESSAGE VARCHAR2 DEFAULT NULL);
 
  PROCEDURE INFO(p_proc_name varchar2, title varchar2, content clob);
 
  PROCEDURE DEBUG(p_proc_name varchar2, title varchar2, content clob);           
             
  PROCEDURE ERROR(p_proc_name varchar2, title varchar2, content clob);
END LOGUTILS;

 

body
CREATE OR REPLACE PACKAGE BODY LOGUTILS IS

 --日志
 PROCEDURE LOG(P_TASK_ID    VARCHAR2,
        P_TASK_CODE  VARCHAR2,
        P_START_DATE  DATE DEFAULT NULL,
        P_END_DATE    DATE DEFAULT NULL,
        P_LOG_STATUS  VARCHAR2 DEFAULT NULL,
        P_LOG_MESSAGE VARCHAR2 DEFAULT NULL) IS
  PRAGMA AUTONOMOUS_TRANSACTION;
  V_COUNT NUMBER;
 BEGIN
  SELECT COUNT(1)
   INTO V_COUNT
   FROM T_CEM_TASK_LOG T
  WHERE T.TASK_ID = P_TASK_ID
    AND T.TASK_CODE = P_TASK_CODE;
  IF V_COUNT = 0 THEN
   INSERT INTO T_CEM_TASK_LOG
    (ID,
    TASK_ID,
    TASK_CODE,
    START_DATE,
    END_DATE,
    LOG_STATUS,
    LOG_MESSAGE,
    CREATEDATE)
   VALUES
    (CEM_TASK_LOG_S.NEXTVAL,
    P_TASK_ID,
    P_TASK_CODE,
    P_START_DATE,
    P_END_DATE,
    P_LOG_STATUS,
    P_LOG_MESSAGE,
    SYSDATE);
  ELSE
   UPDATE T_CEM_TASK_LOG
    SET END_DATE    = P_END_DATE,
      LOG_STATUS  = P_LOG_STATUS,
      LOG_MESSAGE = P_LOG_MESSAGE
    WHERE TASK_ID = P_TASK_ID
    AND TASK_CODE = P_TASK_CODE;
 
  END IF;
  COMMIT;
 END LOG;
 
 
  /*记录消息*/
  PROCEDURE INFO(p_proc_name varchar2, title varchar2, content clob) is
    PRAGMA AUTONOMOUS_TRANSACTION;
  begin
    INSERT INTO t_cem_proc_logs(id,proc_mc,title,content, log_type,log_time)
    VALUES ('LOG'||to_char(sysdate,'YYYYMMDD')||lpad(SEQ_log.NEXTVAL,8,'0'), upper(p_proc_name), substr(title,1,4000), content, 'INFO',sysdate);
    COMMIT;
  EXCEPTION WHEN OTHERS THEN NULL;
  ROLLBACK;
  END;
  /*记录测试*/
  PROCEDURE DEBUG(p_proc_name varchar2, title varchar2, content clob) is
    PRAGMA AUTONOMOUS_TRANSACTION;
  begin
    INSERT INTO t_cem_proc_logs(id,proc_mc,title,content, log_type,log_time)
    VALUES ('LOG'||to_char(sysdate,'YYYYMMDD')||lpad(SEQ_log.NEXTVAL,8,'0'), upper(p_proc_name), substr(title,1,4000), content, 'DEBUG',sysdate);
    COMMIT;
  EXCEPTION WHEN OTHERS THEN NULL;
  ROLLBACK;
  END;
  /*记录错误*/
  PROCEDURE ERROR(p_proc_name varchar2, title varchar2, content clob) is
    PRAGMA AUTONOMOUS_TRANSACTION;
  begin
    INSERT INTO t_cem_proc_logs(id,proc_mc,title,content, log_type,log_time)
    VALUES ('LOG'||to_char(sysdate,'YYYYMMDD')||lpad(SEQ_log.NEXTVAL,8,'0'), upper(p_proc_name), substr(title,1,4000), content, 'ERROR',sysdate);
    COMMIT;
  EXCEPTION WHEN OTHERS THEN NULL;
  ROLLBACK;
  END;
 
 
END LOGUTILS;

Linux公社的RSS地址:https://www.linuxidc.com/rssFeed.aspx

友情链接
  • Mozilla发布Firefox 67.0.4,修复沙箱逃逸漏洞
  • 蚂蚁金服正式成为CNCF云原生计算基金会黄金会员
  • Firefox 68将采用Microsoft BITS安装更新
  • OpenSSH增加对存储在RAM中的私钥的保护
  • 谷歌想实现自己的curl,为什么?
  • Raspberry Pi 4发布:更快的CPU、更大的内存
  • Firefox的UA将移除CPU架构信息
  • Ubuntu放弃支持32位应用程序实属乌龙,Steam会否重回Ubuntu怀抱
  • Qt 5.13稳定版发布:引入glTF 2.0、改进Wayland以及支持Lottie动
  • 红帽企业Linux 7现已内置Redis 5最新版
  • Slack进入微软内部禁用服务清单,GitHub也在其列?
  • 安全的全新编程语言V发布首个可用版本
  • Windows Terminal已上架,快尝鲜
  • 阿里巴巴微服务开源生态报告No.1
  • 面世两年,Google地球将支持所有基于Chromium的浏览器
  • 推进企业容器化持续创新,Rancher ECIC千人盛典完美收官
  • CentOS 8.0最新构建状态公布,或于数周后发布
  • Debian移植RISC
  • 微软拆分操作系统的计划初现雏形
  • Oracle发布基于VS Code的开发者工具,轻松使用Oracle数据库
  • Ubuntu 19.10停止支持32位的x86架构
  • 微软为Windows Terminal推出全新logo
  • 联想ThinkPad P系列笔记本预装Ubuntu系统
  • 微软发布适用于Win7/8的Microsoft Edge预览版
  • 启智平台发布联邦学习开源数据协作项目OpenI纵横
  • 经过六个多月的延迟,微软终于推出Hyper
  • ZFS On Linux 0.8.1 发布,Python可移植性工作
  • DragonFly BSD 5.6.0 发布,HAMMER2状态良好
  • Linux Kernel 5.2
  • CentOS 8.0 看起来还需要几周的时间
  • 百度网盘Linux版正式发布
  • PCIe 6.0宣布:带宽翻倍 狂飙至256GB/s
  • PHP 7.4 Alpha 发布,FFI扩展,预加载Opcache以获得更好的性能
  • Canonical将在未来的Ubuntu版本中放弃对32位架构的支持
  • Scala 2.13 发布,改进的编译器性能
  • 微软的GitHub收购了Pull Panda,并且使所有订阅完全免费
  • Windows Subsystem for Linux 2 (WSL 2)现在适用于Windows 10用
  • Debian 10 “Buster”的RISC
  • MariaDB宣布发布MariaDB Enterprise Server 10.4
  • DXVK 1.2.2 发布,带来微小的CPU开销优化
  • DragonFlyBSD 5.6 RC1 发布,VM优化,默认为HAMMER2
  • PrimeNG 8.0.0 发布,支持Angular 8,FocusTrap等
  • GIMP 2.10.12 发布,一些有用的改进
  • 清华大学Anaconda 镜像服务即将恢复
  • Debian GNU/Linux 10 “Buster” 操作系统将于2019年7月6日发布
  • 时时彩论坛
  • 五星体育斯诺克
  • 北单比分直播
  • 河北11选5走势图
  • 福建体彩36选7开奖结果
  • 九龙图库下载