1 PACKAGE JL_ZZ_FA_UTILITIES_PKG AUTHID CURRENT_USER AS
2 /* $Header: jlzzsuts.pls 115.1 99/09/03 13:16:54 porting shi $ */
3
4 ------------------------------------------------------------
5 -- Procedure raise_error --
6 -- --
7 -- Retrieves an application code and message and stops --
8 -- the execution of the program. --
9 ------------------------------------------------------------
10 PROCEDURE raise_error (p_app_name IN VARCHAR2
11 , p_msg_name IN VARCHAR2
12 , p_msg_type IN VARCHAR2);
13
14 ------------------------------------------------------------
15 -- Procedure raise_ora_error --
16 -- --
17 -- Retrieves an Oracle error and stops the execution of --
18 -- the program. --
19 ------------------------------------------------------------
20 PROCEDURE raise_ora_error;
21
22 ------------------------------------------------------------
23 -- Function get_app_errnum --
24 -- --
25 -- Retrieves the application error number, with the --
26 -- application short name and message name given. --
27 ------------------------------------------------------------
28 FUNCTION get_app_errnum(p_app_name IN VARCHAR2,
29 p_msg_name IN VARCHAR2)
30 return number;
31 PRAGMA RESTRICT_REFERENCES(get_app_errnum,WNDS);
32
33 ------------------------------------------------------------
34 -- Procedure do_commit --
35 -- --
36 -- Execute commit at server side, to be able to execute --
37 -- a "commit" in forms regardless of the trigger where --
38 -- the action is being executed. --
39 ------------------------------------------------------------
40 PROCEDURE do_commit;
41
42 END JL_ZZ_FA_UTILITIES_PKG;