帮忙写个存储过程（有测试数据）谢谢

Question

本帖最后由 xuangxing 于 2011-07-30 14:42:55 编辑

Answer 1

create or replace procedure A_TEST isSTATUS_FAILURE varchar2(1000);----------异常日志
v_name  varchar2(1000); ------存储过程名字
begin
   v_name:= 'P_TEST1';
   P_TEST1();
  commit;   v_name:= 'P_TEST2';
  P_TEST2();
  commit;   v_name:= 'P_TEST3';
  P_TEST3();
  commit;   exception
    when others then
      STATUS_FAILURE := to_char(sqlcode) || ': ' || substr(sqlerrm, 1, 980);      insert into FASP_ERR_LOG(CREATE_DATE,FUNCNAME,NOTE) values(sysdate,v_name,STATUS_FAILURE);
      commit;
end A_TEST;