如何判断存储过程没有成功完成？

Oracle的stored procedure,SUCCESS由外面傳過來
CREATE PROCEDURE PROFCAL(xCOMPID IN VARCHAR2,CURDATE IN VARCHAR2,SUCCESS OUT VARCHAR2)
IS
BEGIN
    --Other Codes
    COMMIT;
    SUCCESS:='Y';--'Y'表示算成功
  EXCEPTION
  WHEN OTHERS THEN
    ROLLBACK;
    SUCCESS:='N';--'N'表示失敗
END PROFCAL;