标准简单SP模板(oracle)

/*
-- @author:    Lijy
-- @function: 员工入职的信息检查程序
-- @parr: P_URID 为workshop操作账号的ID，前台通过 {U_URID} 全局参数获取
*/

CREATE OR REPLACE Procedure eSP_StaffCheck
(
    P_ID  integer,
    P_URID integer,
    P_Retval Out integer
)
As
    P_compid integer;
    P_i Integer;
    e_exception  Exception;

Begin

   P_RetVal:=0;
   P_i:=0;

   Select compid into P_compid From eStaff_Register where id = P_id;

  --数据已经确认！
    Select Count(1) Into P_i From dual
    Where
    Exists(Select 1 From eStaff_Register
            Where ID=P_ID And Nvl(Initialized,0)=1) ;

    If P_i = 1 Then
          P_Retval:=910000;
          raise e_exception;
    End if ;

  -- savepoint 
  Update eStaff_Register
  Set  Initialized = 1,
       InitializedBy = P_URID,
       InitializedTime =  sysdate
  Where ID=P_ID;
  
  commit;

Exception
    When e_exception then
        Null;
    When others then
        P_RetVal := -1;
        dbms_output.put_line(SQLERRM);

End eSP_StaffCheck1;