create or replace procedure yuchuli_recovery is
begin

-------恢复企业
    -----------不需要恢复央企、财政、全部退休人员的企业(建会状态 in 1 3 11 12 19 20 26)
    -----------不满足剔除条件
    -----------不是个体工商户
    declare
        cursor cur is
            select qy.*, tcls.jhzt as oldjhzt
              from (select t.* ,qyghgx.GHDM,
                           qyghgx.GHMC,
                           qyghgx.GHLX,
                           qyghgx.ZHLX,
                           qyghgx.QYGHRS,
                           qyghgx.JHZT,
                           qyghgx.JHSJ,
                           qyghgx.SHSJ,
                           qyghgx.JFLCBL,
                           qyghgx.GHDM1,
                           qyghgx.BL1,
                           qyghgx.GHDM2,
                           qyghgx.BL2,
                           qyghgx.GHDM3,
                           qyghgx.BL3,
                           qyghgx.GHDM4,
                           qyghgx.BL4,
                           qyghgx.GHDM5,
                           qyghgx.BL5,
                           qyghgx.GHDM6,
                           qyghgx.BL6,
                           qyghgx.QYJC,
                           qyghgx.sffq
                      from GH_QYXX t
                      left join GH_QYGHGX qyghgx
                        on t.qybm = qyghgx.qybm
                     where t.djzclxdm
                     ! = '410'
                       and t.istc = '1'
                       and t.istccondition = '0'
                       and qyghgx.jhzt not in
                           ('1', '3', '11', '12', '19', '20', '26')) qy,
                   (select *
                      from GH_QYTC_LS t
                     where czsj = (select max(czsj)
                                     from GH_QYTC_LS
                                    where qybm = t.qybm)) tcls
             where tcls.qybm = qy.qybm;
    begin
        insert into gh_qyhf_ls
            select * from gh_qyhf; --往期放到历史
        delete from gh_qyhf; ---删除掉恢复数据
        for rc in cur loop
            if (rc.jhzt = rc.oldjhzt) then
                insert into GH_QYHF
                    (YWLSDM, QYBM, QYSQZT, QYBQZT, CZYYDM, CZRYDM, CZSJ)
                values
                    (SEQ_QYHF.NEXTVAL,
                     rc.qybm,
                     '0',
                     '1',
                     '符合条件' , '系统' ,sysdate);
            else
                insert into GH_QYHF
                    (YWLSDM, QYBM, QYSQZT, QYBQZT, CZYYDM, CZRYDM, CZSJ)
                values
                    (SEQ_QYHF.NEXTVAL,
                     rc.qybm,
                     '0',
                     '1',
                     '符合条件' , '系统' ,sysdate);
                update gh_qyghgx
                   set jhzt = rc.oldjhzt
                 where qybm = rc.qybm; ----修改建会状态
                -----增加到变更历史表中
                insert into GH_QYBG_LS
                    (ID,
                     YWLSDM,
                     QYBM,
                     BGXXZ,
                     BGXJZ,
                     SPZT,
                     CZRYDM,
                     CZSJ,
                     BGXDM,
                     GHDM,
                     GHMC,
                     GHLX,
                     ZHLX,
                     QYGHRS,
                     JHZT,
                     JHSJ,
                     SHSJ,
                     JFLCBL,
                     GHDM1,
                     BL1,
                     GHDM2,
                     BL2,
                     GHDM3,
                     BL3,
                     GHDM4,
                     BL4,
                     GHDM5,
                     BL5,
                     GHDM6,
                     BL6,
                     QYJC,
                     DRRQ,
                     QYMC,
                     SJJYDZ,
                     LXR,
                     LXDH,
                     KHH,
                     KHZH,
                     KHMC,
                     JSJDM,
                     TYSHXYDM,
                     DJZCLXDM,
                     ZZJGDM,
                     JYDZ,
                     JYDZYB,
                     ZCDZ,
                     ZCDZYB,
                     JYDZLXDM,
                     SWJGZZJGDM,
                     SCJXDM,
                     NSRZTMC,
                     GJBZHYDM,
                     KYDJRQ,
                     SWDJLXMC,
                     SJQYMC,
                     SJJYDZYB,
                     QYZT,
                     QYFR,
                     JHH,
                     XEZFH,
                     GSRS,
                     SSGLYDM,
                     ISTC,
                     NSRSBH,
                     XGRQ,
                     SFFQ)
                values
                    (SEQ_YWLS.NEXTVAL,
                     SEQ_YWLS.NEXTVAL,
                     rc.QYBM,
                     rc.oldjhzt,
                     rc.jhzt,
                     '0',
                     '预处理',
                     sysdate,
                     'jhzt',
                     rc.GHDM,
                     rc.GHMC,
                     rc.GHLX,
                     rc.ZHLX,
                     rc.QYGHRS,
                     rc.JHZT,
                     rc.JHSJ,
                     rc.SHSJ,
                     rc.JFLCBL,
                     rc.GHDM1,
                     rc.BL1,
                     rc.GHDM2,
                     rc.BL2,
                     rc.GHDM3,
                     rc.BL3,
                     rc.GHDM4,
                     rc.BL4,
                     rc.GHDM5,
                     rc.BL5,
                     rc.GHDM6,
                     rc.BL6,
                     rc.QYJC,
                     rc.DRRQ,
                     rc.QYMC,
                     rc.SJJYDZ,
                     rc.LXR,
                     rc.LXDH,
                     rc.KHH,
                     rc.KHZH,
                     rc.KHMC,
                     rc.JSJDM,
                     rc.TYSHXYDM,
                     rc.DJZCLXDM,
                     rc.ZZJGDM,
                     rc.JYDZ,
                     rc.JYDZYB,
                     rc.ZCDZ,
                     rc.ZCDZYB,
                     rc.JYDZLXDM,
                     rc.SWJGZZJGDM,
                     rc.SCJXDM,
                     rc.NSRZTMC,
                     rc.GJBZHYDM,
                     rc.KYDJRQ,
                     rc.SWDJLXMC,
                     rc.SJQYMC,
                     rc.SJJYDZYB,
                     rc.QYZT,
                     rc.QYFR,
                     rc.JHH,
                     rc.XEZFH,
                     rc.GSRS,
                     rc.SSGLYDM,
                     rc.ISTC,
                     rc.NSRSBH,
                     rc.XGRQ,
                     rc.SFFQ);
            end if;
        end loop;
    
        ----把剔除条件更新
        update gh_qyxx
           set istc = '1'
         where istccondition = '1'
           and istc = '0';
    
        insert into YUCHULI_MARK values (SYS_GUID(), 'recover', sysdate);
        commit;
    end;

end yuchuli_recovery;

转载于:https://www.cnblogs.com/523823-wu/p/7768220.html

sql_recover_2017/11/1相关推荐

  1. Redis 笔记(11)— 文本协议 RESP(单行、多行字符串、整数、错误、数组、空值、空串格式、telnet 登录 redis)

    RESP 是 Redis 序列化协议Redis Serialization Protocol 的简写.它是一种直观的文本协议,优势在于实现异常简单,解析性能极好. ​ Redis 协议将传输的结构数据 ...

  2. Linux shell 学习笔记(11)— 理解输入和输出(标准输入、输出、错误以及临时重定向和永久重定向)

    1. 理解输入和输出 1.1 标准文件描述符 Linux 系统将每个对象当作文件处理.这包括输入和输出进程.Linux 用文件描述符(file descriptor)来标识每个文件对象.文件描述符是一 ...

  3. 只要5分钟用数据可视化带你看遍11月份新闻热点事件

    2017年11月份已经离我们而去,在过去的11月份我们也许经历了双十一的剁手,也可能亲眼看见了别人剁手.11月份的北京大兴区发生了"11·18"重大火灾,国内多家幼儿园也多次上了头 ...

  4. 1-1 机器学习和深度学习综述-paddle

    课程>我的课程>百度架构师手把手教深度学习>1-1 机器学习和深度学习综述> 1-1 机器学习和深度学习综述 paddle初级课程 王然(学生) Notebook 教育 初级深 ...

  5. CUDA 11功能清单

    CUDA 11功能清单 基于NVIDIA Ampere GPU架构的新型NVIDIA A100 GPU在加速计算方面实现了最大的飞跃.A100 GPU具有革命性的硬件功能,CUDA 11与A100一起 ...

  6. 保护嵌入式802.11 Wi-Fi设备时需要考虑的10件事

    保护嵌入式802.11 Wi-Fi设备时需要考虑的10件事 10 things to consider when securing an embedded 802.11 Wi-Fi device 随着 ...

  7. CUDA 11功能展示

    CUDA 11功能展示 CUDA 11 Features Revealed 新的NVIDIA A100 GPU基于NVIDIA安培GPU架构,实现了加速计算的最大一代飞跃.A100 GPU具有革命性的 ...

  8. 深度学习11个实用技巧

    深度学习11个实用技巧 深度学习工程师George Seif发表了一篇博文,总结了7个深度学习的技巧,本文增加了几个技巧,总结了11个深度学习的技巧,主要从提高深度学习模型的准确性和速度两个角度来分析 ...

  9. 【CV】吴恩达机器学习课程笔记第11章

    本系列文章如果没有特殊说明,正文内容均解释的是文字上方的图片 机器学习 | Coursera 吴恩达机器学习系列课程_bilibili 目录 11 机器学习系统设计 11-1 确定执行的优先级:以垃圾 ...

最新文章

  1. xshell 6和xftp 6的下载和使用
  2. 使用python重命名某个文件下的所有的文件
  3. java intfunction_Java IntFunction類代碼示例
  4. seer文献_文献解读 | 师兄带你读一篇免疫浸润3分文章!
  5. 机器学习-关联之Apriori算法原理及实战
  6. 命令行下安装的tensorflow怎么打开_CourseMaker微课制作教程18:录ppt一直“正在打开……”及WPS下ppt满屏放映怎么办?...
  7. php做一个微信退款,PHP实现微信退款功能
  8. window10 mysql5.7 解压版 安装
  9. C# 设置当前程序调用的dll文件以及其他文件的寻址路径
  10. tensorflow,Anaconda和 vscode 如何连接以及问题解决
  11. js中的继承1--类继承
  12. 理解iOS 8中的Self Sizing Cells和Dynamic Type
  13. 基于python的网易云音乐下载器
  14. 一个基于jquery的周日历,简单易懂
  15. 如何将html改成mht格式,如何编辑mht格式的文件,什么是mht?
  16. 计算机之父的童年故事教案,《计算机之父的童年故事》教学设计
  17. Mongodb 按照时间进行分组统计查询
  18. 苹果如何不显示云服务器照片,iPhone12如何隐藏照片 iPhone12不显示照片的三种方法...
  19. C++强制类型转化:reinterpret_cast
  20. 聚类篇——(四)有序样品聚类

热门文章

  1. android 气球菜单,jQuery实现气球弹出框式的侧边导航菜单效果
  2. Anaconda创建虚拟环境
  3. 广西壮族自治区14个地级市行政区划 (2023)
  4. shell和Zsh和ohmyzsh
  5. 腹肌撕裂者x高清中文字幕
  6. 古老的基于亮度平均值的自动Gamma校正算法。
  7. 失去英格兰,欧洲杯会失色?
  8. 病态的加拿大保守党政府
  9. 中国大陆省市县区域代码javaScript实现
  10. step7 professional v11 sp2 sp1详细安装方法