procedure案例一

看点如下：

1.truncate不能够直接执行，必须使用动态sql

2.动态sql拼接范例

3.跳过出错，使用when others then

4.返回出错信息，使用sqlerrm

存储过程建立如下：

 

create or replace procedure ver_emlog

is

V_SQL VARCHAR2(1000);
BEGIN
  execute immediate 'truncate table dbmteam.result';
  FOR x IN (SELECT *
              FROM dbmteam.dbm_tmp813
             WHERE nilgdbid IN (127000000001696266,
                                127000000001696274,
                                127000000001696287,
                                127000000107667376,
                                127000000812172410)) LOOP


  V_SQL:= 'INSERT INTO dbmteam.result
  (tableid, owner, tablename, eid)
  (SELECT '|| x.nitbid||','''||x.lowner||''','''|| x.vctbname||''' ,'||'a.eid
     from '||x.lowner||'.'||x.vctbname||' a
     left join (select distinct recordid
                 FROM gm.emlog
                WHERE tableid = '||x.nitbid||') b
       on a.eid = b.recordid
    where b.recordid is null)';

  --DBMS_OUTPUT.put_line (V_SQL);
begin
  execute immediate V_SQL;
  commit;
exception
  when others then
    DBMS_OUTPUT.put_line(V_SQL);
    DBMS_OUTPUT.put_line(SQLERRM);
end;
  END LOOP;

END;

 

调用如下：

 

begin
  dbmteam.ver_emlog;
end;