Edit D:\app\Administrator\product\11.2.0\dbhome_1\owb\wf\sql\AFEXCEPS.pls
REM dbdrv: sql ~PROD ~PATH ~FILE none none none package &phase=pls \ REM dbdrv: checkfile:~PROD:~PATH:~FILE /*=======================================================================+ | Copyright (c) 1993 Oracle Corporation Redwood Shores, California, USA| | All rights reserved. | +=======================================================================+ | FILENAME | AFEXCEPS.pls | | DESCRIPTION | PL/SQL specification for package: APP_EXCEPTION | | PROCEDURES, FUNCTIONS | | PROCEDURE raise_exception | (exception_type varchar2 default null, | exception_code number default null, | exception_text varchar2 default null) | | PROCEDURE get_exception | (exception_type OUT varchar2, | exception_code OUT number, | exception_text OUT varchar2) | | FUNCTION get_type return varchar2 | FUNCTION get_code return number | FUNCTION get_text return varchar2 | | PROCEDURE invalid_argument | (procname varchar2, | argument varchar2, | value varchar2); | | NOTES | This module is called by AutoInstall (afplss.drv) on install and | upgrade. The WHENEVER SQLERROR and EXIT (at bottom) are required. *=======================================================================*/ set verify off; whenever sqlerror exit failure rollback; whenever oserror exit failure rollback; create or replace package app_exception as /* $Header: AFEXCEPS.pls 115.0 2003/01/30 11:42:15 smuruges noship $ */ -- -- Package -- app_exception -- Purpose -- Exception handling utilities -- History -- 08/09/93 K Brodersen Created -- -- -- PUBLIC VARIABLES -- -- Exceptions application_exception exception; record_lock_exception exception; -- Exception Pragmas pragma exception_init(application_exception, -20001); pragma exception_init(record_lock_exception, -0054); -- -- PUBLIC FUNCTIONS -- -- -- Name -- raise_exception -- Purpose -- Stores exception information and raises -- app_exception.application_exception. -- Arguments -- exception_type Exception type -- exception_code Exception code -- exception_text Additional context information -- procedure raise_exception(exception_type varchar2 default null, exception_code number default null, exception_text varchar2 default null); -- -- Name -- get_exception -- Purpose -- Returns stored exception information. -- Arguments -- exception_type Retrieved exception type -- exception_code Retrieved exception code -- exception_text Retrieved context information -- procedure get_exception(exception_type OUT NOCOPY varchar2, exception_code OUT NOCOPY number, exception_text OUT NOCOPY varchar2); pragma restrict_references(get_exception, WNDS, WNPS, RNDS); -- -- Name -- get_type -- Purpose -- Returns stored exception type. -- Arguments -- *None* -- function get_type return varchar2; pragma restrict_references(get_type, WNDS, WNPS, RNDS); -- -- Name -- get_code -- Purpose -- Returns stored exception code. -- Arguments -- *None* -- function get_code return number; pragma restrict_references(get_code, WNDS, WNPS, RNDS); -- -- Name -- get_text -- Purpose -- Returns stored exception text. -- Arguments -- *None* -- function get_text return varchar2; pragma restrict_references(get_text, WNDS, WNPS, RNDS); -- -- Name -- invalid_argument -- Purpose -- Display invalid argument error message and raise exception -- Arguments -- procname Name of procedure -- argument Name of argument -- value Value of argument -- procedure invalid_argument(procname varchar2, argument varchar2, value varchar2); end app_exception; / REM ================================================================ commit; exit;
Ms-Dos/Windows
Unix
Write backup
jsp File Browser version 1.2 by
www.vonloesch.de