1 PACKAGE BODY ADI_Kiosk_Global AS
2 /* $Header: frmglobb.pls 120.0 2006/12/14 02:04:20 dvayro noship $ */
3 ----------------------------------------------------------------------------------------
4 -- PROCEDURE: ADI_Kiosk_Global --
5 -- --
6 -- DESCRIPTION: Contains a selection of global procedures which are required by --
7 -- multiple packages. --
8 -- --
9 -- PARAMETERS: None --
10 -- --
11 -- Modifications --
12 -- Date Username Description --
13 -- cclyde Initial creation --
14 -- 24-AUG-99 cclyde Added DebugMode function --
15 -- 31-AUG-99 cclyde Changed profile option ADI_DEBUG_MODE to FRM_DEBUG_MODE --
16 -- (Task: 3400) (DebugMode) --
17 -- 08-SEP-99 cclyde Added the NO_DATA_FOUND exception clause. This information --
18 -- is now called from the banner and the user may, or may not --
19 -- be logged into the Report Manager kiosk. (Task: 3381) --
20 -- (GetUserId) --
21 -- 08-SEP-99 cclyde Modified all the EXCEPTION clauses to include --
22 -- ICX_UTIL.Add_Error. --
23 -- 08-SEP-99 CCLYDE Modified the way the Help URL was generated. If the host- --
24 -- name has been defined with a '/' at the end, no trailing --
25 -- '/' is added. (Task: 3458) (getHelpURL) --
26 -- 03-DEC-99 CCLYDE Added GetOwnershipPrivilege to determine if the user can --
27 -- grant ownership privilege to any user, for any value. --
28 -- 16-FEB-00 cclyde Added Package_Revision procedure to see if we can capture --
29 -- the revision number of the package during runtime. --
30 -- (Task: 3858) --
31 -- 02-MAR-00 GSANAP Changed the select statement to change from 11.5 to 1.51 --
32 -- (Task: 3925) --
33 -- 04-APR-00 GSANAP Changed the select statement to take care of the spaces in --
34 -- the release name in ap323pc --
35 -- 16-MAY-00 GSANAP Moved the $Header comment from the top and replaced --
36 -- CREATE OR REPLACE PACKAGE IS TO AS --
37 -- 29-JUN-00 GSANAP Modified the debug stmts to include package names --
38 -- Task 4425 --
39 -- 07-DEC-00 CCLYDE Modified the getHelpURL procedure to build the Help URL --
40 -- correctly. (GetHelpURL) --
41 ----------------------------------------------------------------------------------------
42 END ADI_Kiosk_Global;