编译所有oracle无效的对象

最新推荐文章于 2021-04-13 14:22:34 发布

原创最新推荐文章于 2021-04-13 14:22:34 发布 · 1k 阅读

0 ·

CC 4.0 BY-SA版权

文章标签：

#oracle #object #exception #email #user #c

oracle 专栏收录该内容

64 篇文章

订阅专栏

本文提供了一段PL/SQL过程，用于自动编译Oracle数据库中所有无效的对象，包括过程、函数、触发器等，通过执行该过程可以快速解决因对象无效导致的问题。

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

-- 编译所有oracle无效的对象 by yanleigis Email:landgis@126.com
procedure compleall is
    cursor c1 is
      SELECT decode(object_type,
                    'PACKAGE BODY',
                    'alter package ' || object_name || ' compile body',
                    'alter ' || object_type || ' ' || object_name ||
                    ' compile;') op
        FROM user_objects
       WHERE status = 'INVALID';
    sqlstr varchar2(1024);
begin
    for rr in c1 LOOP
      begin
        sqlstr := rr.op;
        execute immediate sqlstr;
        dbms_output.put_line(sqlstr || '编译成功');
      exception
        when others then
          dbms_output.put_line(sqlstr || sqlcode || ':' || sqlerrm);
      end;
    end loop;
end;