博客
关于我
存储过程-数据位置调换demo
阅读量:635 次
发布时间:2019-03-14

本文共 3121 字,大约阅读时间需要 10 分钟。

-- 创建日志表

create table T_LOG_DATA_POSITION(  LOG_ID         NUMBER(12) not null,  ERROR_DESC     VARCHAR2(4000),  ERROR_POSITION VARCHAR2(4000),  OCCUR_TIME     DATE default SYSDATE not null,  TYPE           VARCHAR2(10))

--创建 序列

REATE SEQUENCE S_DATA_POSITION_IDSTART WITH 1MINVALUE 1MAXVALUE 999999999INCREMENT BY 1CACHE 20;

--设置主键

alter table T_LOG_DATA_POSITION add constraint PK_DATA_POSITION_ID primary key (LOG_ID)using index tablespace OTHER_INDX;

--账户授权 :

grant select, insert, update on SCORE_OPRS.T_LOG_DATA_POSITION to TP_SCORE_OPR_CC;grant select, insert, update on SCORE_OPRS.T_LOG_DATA_POSITION to SCORE_OPR_RAC_CC;grant select, insert, update on SCORE_OPRS.T_LOG_DATA_POSITION to TP_SCORE_OPR_RAC_CC;

--存储过程脚本:

CREATE OR REPLACE PACKAGE PKG_DATA_POSITION IS  -- 执行程序逻辑  PROCEDURE P_PR_DATA_POSITION;  -- 执行日志记录  PROCEDURE T_INSERT_LOG(P_ERROR_DESC T_LOG_DATA_POSITION.ERROR_DESC%TYPE,P_ERROR_POSITION T_LOG_DATA_POSITION.ERROR_POSITION%TYPE,P_TYPE T_LOG_DATA_POSITION.TYPE%TYPE);END PKG_DATA_POSITION;/CREATE OR REPLACE PACKAGE BODY PKG_DATA_POSITION IS  /**      修正数据存储位置      createdBy:2020/03/20  **/  PROCEDURE P_PR_DATA_POSITION  IS    --初始化数据赋值给游标    CURSOR CUR_PRICING_DATA(C_BEGIN_DATE DATE) IS      SELECT t.SCORERUNID,t.BAK6,t.BAK7,t.DUTY_RISK_PREMIUM FROM T_TABLENAME1 t       WHERE       DECODE(translate(t.DUTY_RISK_PREMIUM, '\1234567890 ', '\'),'','0') ='0'         AND t.DUTY_RISK_PREMIUM IS NOT NULL         AND t.CREATED_DATE >= C_BEGIN_DATE         AND t.CREATED_DATE < C_BEGIN_DATE + 1;    V_BEGIN_DATE        DATE;    V_END_DATE          DATE;    V_COMMIT_CNT        NUMBER(5);  BEGIN    --开始执行程序    V_BEGIN_DATE := trunc(to_date('2019-09-10 00:00:00','yyyy-MM-dd HH24:mi:ss'));    V_END_DATE   := trunc(to_date('2020-03-19 00:00:00','yyyy-MM-dd HH24:mi:ss'));    V_COMMIT_CNT := 0;    PKG_DATA_POSITION.T_INSERT_LOG('开始修正数据存储位置','PKG_DATA_POSITION.P_PR_DATA_POSITION','0');    LOOP      EXIT WHEN V_BEGIN_DATE = V_END_DATE;      --按天处理      FOR P_DATALIST IN CUR_PRICING_DATA(V_BEGIN_DATE) LOOP        BEGIN            --数据前进一位      UPDATE T_TABLENAME1  t        SET  t.BAK6=P_DATALIST.BAK7          ,t.BAK7=P_DATALIST.DUTY_RISK_PREMIUM          ,t.DUTY_RISK_PREMIUM=P_DATALIST.BAK6      WHERE t.SCORERUNID=P_DATALIST.SCORERUNID;        END;    PKG_DATA_POSITION.T_INSERT_LOG('Update_ScoreRunId - ' || P_DATALIST.SCORERUNID,'PKG_DATA_POSITION.P_PR_DATA_POSITION','1');        V_COMMIT_CNT := V_COMMIT_CNT + 1;        IF V_COMMIT_CNT = 1000 THEN          COMMIT;          V_COMMIT_CNT := 0;        END IF;      END LOOP;      V_BEGIN_DATE := V_BEGIN_DATE + 1;      COMMIT;    END LOOP;    PKG_DATA_POSITION.T_INSERT_LOG('修正数据存储位置完成','PKG_DATA_POSITION.P_PR_DATA_POSITION','0');  END P_PR_DATA_POSITION;  -- 记录日志  PROCEDURE T_INSERT_LOG(P_ERROR_DESC T_LOG_DATA_POSITION.ERROR_DESC%TYPE, P_ERROR_POSITION T_LOG_DATA_POSITION.ERROR_POSITION%TYPE, P_TYPE T_LOG_DATA_POSITION.TYPE%TYPE) IS  BEGIN    INSERT INTO T_LOG_DATA_POSITION (LOG_ID, ERROR_DESC, ERROR_POSITION ,TYPE)    VALUES (S_DATA_POSITION_ID.NEXTVAL,P_ERROR_DESC,P_ERROR_POSITION,P_TYPE);    COMMIT;  END;END PKG_DATA_POSITION;/

 

转载地址:http://jaooz.baihongyu.com/

你可能感兴趣的文章
Mac OS 12.0.1 如何安装柯美287打印机驱动,刷卡打印
查看>>
MangoDB4.0版本的安装与配置
查看>>
Manjaro 24.1 “Xahea” 发布!具有 KDE Plasma 6.1.5、GNOME 46 和最新的内核增强功能
查看>>
mapping文件目录生成修改
查看>>
MapReduce程序依赖的jar包
查看>>
mariadb multi-source replication(mariadb多主复制)
查看>>
MariaDB的简单使用
查看>>
MaterialForm对tab页进行隐藏
查看>>
Member var and Static var.
查看>>
memcached高速缓存学习笔记001---memcached介绍和安装以及基本使用
查看>>
memcached高速缓存学习笔记003---利用JAVA程序操作memcached crud操作
查看>>
Memcached:Node.js 高性能缓存解决方案
查看>>
memcache、redis原理对比
查看>>
memset初始化高维数组为-1/0
查看>>
Metasploit CGI网关接口渗透测试实战
查看>>
Metasploit Web服务器渗透测试实战
查看>>
MFC模态对话框和非模态对话框
查看>>
Moment.js常见用法总结
查看>>
MongoDB出现Error parsing command line: unrecognised option ‘--fork‘ 的解决方法
查看>>
mxGraph改变图形大小重置overlay位置
查看>>