怎么找到覆盖掉的存储过程---PROCEDURE

最新推荐文章于 2025-06-11 07:18:13 发布

gisinfo

最新推荐文章于 2025-06-11 07:18:13 发布

阅读量967

点赞数

CC 4.0 BY-SA版权

本文链接：https://blog.youkuaiyun.com/gisinfo/article/details/8570142

本文介绍了如何在Oracle中通过时间点查询找回被`OR REPLACE`覆盖的存储过程。通过示例展示了如何利用SCN（系统改变号）创建历史版本的表，从而找回旧的存储过程代码。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

一般由于使用的方便建立存储过程的时候我们经常使用or replace 关键字，这样就会经常出现覆盖的情况
那么怎么解决呢？我们先介绍涉及技术的演示（基于时间点查询）
C:\>sqlplus /nolog

SQL*Plus: Release 11.2.0.1.0 Production on 星期一 2月 4 21:05:04 2013

Copyright (c) 1982, 2010, Oracle.  All rights reserved.

SQL> conn /as sysdba;
已连接。
SQL> conn ywbz/ywbzwater
已连接。

SQL> create table t as select rownum rm from dual connect by rownum<10;

表已创建。

SQL> select * from t;

        RM
----------
         1
         2
         3
         4
         5
         6
         7
         8
         9

已选择9行。

SQL> set timing on
SQL> set time on
21:11:14 SQL>
21:11:25 SQL>
21:11:25 SQL> delete from t where rm<4;

已删除3行。

已用时间:  00: 00: 00.03
21:12:20 SQL> commit;

提交完成。

已用时间:  00: 00: 00.00
--除了是自己操作记下SCN（最准确）但是一般都是用户的误操作
21:12:22 SQL> select * from t as of timestamp sysdate-2/1440;

        RM
----------
         1
         2
         3
         4
         5
         6
         7
         8
         9

已选择9行。

已用时间:  00: 00: 00.04
21:14:20 SQL> select * from t as of timestamp sysdate-1/1440;

        RM
----------
         4
         5
         6
         7
         8
         9

已选择6行。

已用时间:  00: 00: 00.02

21:14:41 SQL> conn /as sysdba;
已连接。
--注意此处无需开启归档
21:14:47 SQL> archive log list;
数据库日志模式            存档模式
自动存档             启用
存档终点            USE_DB_RECOVERY_FILE_DEST
最早的联机日志序列     399
下一个存档日志序列   401
当前日志序列           401
21:14:48 SQL>




具体演示
SQL> create or replace procedure find_proc as
   2  begin
   3  execute immediate 'select 1 from dual';
   4  end;
   5  /

Procedure created.

SQL> select * from dba_source where name='FIND_PROC';

 OWNER      NAME                           TYPE               LINE TEXT
 ---------- ------------------------------ ------------ ---------- --------------------------------------------------
 SYS        FIND_PROC                   PROCEDURE             1 procedure FIND_PROC as
 SYS        FIND_PROC                   PROCEDURE             2 begin
 SYS        FIND_PROC                   PROCEDURE             3 execute immediate 'select 1 from dual';
 SYS        FIND_PROC                   PROCEDURE             4 end;

SQL> select current_scn from v$database;

 CURRENT_SCN
 -----------
     1560098

create or replace procedure FIND_PROC as
begin
-- I am new procedure
execute immediate 'select 2 from dual';
end;
/

Procedure created.

SQL> select current_scn from v$database;

 CURRENT_SCN
 -----------
     1660113

 SQL> select * from dba_source where name='FIND_PROC';

 OWNER      NAME                           TYPE               LINE TEXT
 ---------- ------------------------------ ------------ ---------- --------------------------------------------------
 SYS        FIND_PROC                   PROCEDURE             1 procedure find_proc as
 SYS        FIND_PROC                   PROCEDURE             2 begin
 SYS        FIND_PROC                   PROCEDURE             3 -- I am new procedure
 SYS        FIND_PROC                   PROCEDURE             4 execute immediate 'select 2 from dual';
 SYS        FIND_PROC                   PROCEDURE             5 end;

SQL> create table old_source as select * from dba_source as of scn 1560098 where name='FIND_PROC';

Table created.

SQL> select * from old_source where name='FIND_PROC';

 OWNER      NAME                           TYPE               LINE TEXT
 ---------- ------------------------------ ------------ ---------- --------------------------------------------------
 SYS        FIND_PROC                   PROCEDURE             1 procedure find_proc as
 SYS        FIND_PROC                   PROCEDURE             2 begin
 SYS        FIND_PROC                   PROCEDURE             3 execute immediate 'select 1 from dual';
 SYS        FIND_PROC                   PROCEDURE             4 end;