一个挺好的查看错误的方法

SQL> begin
  2      p_rowid(3,0);
  3  end;
  4  /
    p_rowid(3,0);
    *
ERROR at line 2:
ORA-06550: line 2, column 5:
PLS-00905: object SCOTT.P_ROWID is invalid
ORA-06550: line 2, column 5:
PL/SQL: Statement ignored


SQL> show errors;
Errors for PROCEDURE P_ROWID:

LINE/COL ERROR
-------- -----------------------------------------------------------------
27/38    PLS-00103: Encountered the symbol "CUR" when expecting one of the
         following:
         . ( * @ % & = - + ; < / > at in is mod remainder not rem
         return returning <an exponent (**)> <> or != or ~= >= <= <>
         and or like like2 like4 likec between into using || multiset
         bulk member submultiset
         The symbol "(" was substituted for "CUR" to continue.

27/59    PLS-00103: Encountered the symbol ";" when expecting one of the
         following:
         . ( ) , * @ % & = - + < / > at in is mod remainder not rem =>

LINE/COL ERROR
-------- -----------------------------------------------------------------
         <an exponent (**)> <> or != or ~= >= <= <> and or like like2
         like4 likec between || multiset member submultiset
         The symbol ")" was substituted for ";" to continue.

SQL> create or replace procedure p_rowid
  2                                     (
  3                                         range number
  4                                       ,id     number
  5                                     )
  6  is
  7      cursor cur_rowid is
  8          select
  9                 dbms_rowid.rowid_create(1, b.data_object_id, a.relative_fno, a.block_id, 0)            rowid1
 10               , dbms_rowid.rowid_create(1, b.data_object_id, a.relative_fno, a.block_id+blocks-1, 999) rowid2
 11          from
 12                 dba_extents a
 13               , dba_objects b
 14          where
 15                 a.segment_name            =b.object_name
 16                 and a.owner               =b.owner
 17                 and b.object_name         ='TEST'
 18                 and b.owner               ='SCOTT'
 19                 and mod(a.extent_id,range)=id
 20          ;
 21      
 22      v_sql varchar2(4000);
 23  begin
 24      for cur in cur_rowid
 25      loop
 26          v_sql:='delete test where object_id>5000 and rowid between :1 and :2';
 27          execute immediate v_sql using cur.rowid1,cur.rowid2;
 28          commit;
 29      end loop;
 30  end;
 31  /

Procedure created.

SQL> begin
  2      p_rowid(3,0);
  3  end;
  4  /

PL/SQL procedure successfully completed.

 

©️2020 CSDN 皮肤主题: 大白 设计师:CSDN官方博客 返回首页