Oracle 调用存储过程

1. 数据库 Package 包头声明

create or replace package ACHG_ORG is
  PROCEDURE sp_rca_cons(in_no varchar2, in_flag varchar2);
end ACHG_ORG;

2. 定义储存过程

PROCEDURE sp_rca_cons(in_no varchar2, in_flag varchar2) IS
BEGIN
  begin
    insert into C_RCA_CONS_MID_ARC
      select * from C_RCA_CONS_MID;
  exception
    when others then
      null;
  end;
  delete from C_RCA_CONS_MID;
  commit;
  if in_flag = '01' then
    insert into C_RCA_CONS_MID
      (row_no, cons_id, cons_no, cons_name, cons_addr)
      select rownum + 1, cons_id, cons_no, cons_name, elec_addr
        from c_cons
       where cons_no = in_no;
  elsif in_flag = '02' then
    insert into C_RCA_CONS_MID
      (row_no, cons_id, cons_no, cons_name, cons_addr)
      select rownum + 1, cons_id, cons_no, cons_name, elec_addr
        from c_cons
       where mr_sect_no = in_no;
  else
    null;
  end if;
  upda