PACKAGE: APPS.EGO_GLOBALS

Source

1 PACKAGE EGO_Globals AUTHID CURRENT_USER AS
2 /* $Header: EGOSGLBS.pls 120.1 2005/06/29 00:13:03 lkapoor noship $ */
3 /**************************************************************************
4 --
5 --  FILENAME
6 --
7 --      EGOSGLBS.pls
8 --
9 --  DESCRIPTION
10 --
11 --      Spec of package EGO_Globals
12 --
13 --  NOTES
14 --
15 --  HISTORY
16 --
17 -- 19-SEP-2002	Rahul Chitko	Initial Creation
18 --
19 ****************************************************************************/
20 	G_OPR_CREATE        CONSTANT    VARCHAR2(30) := 'CREATE';
21 	G_OPR_UPDATE        CONSTANT    VARCHAR2(30) := 'UPDATE';
22 	G_OPR_DELETE        CONSTANT    VARCHAR2(30) := 'DELETE';
23 	G_OPR_LOCK          CONSTANT    VARCHAR2(30) := 'LOCK';
24 	G_OPR_NONE          CONSTANT    VARCHAR2(30) := NULL;
25 	G_OPR_CANCEL        CONSTANT    VARCHAR2(30) := 'CANCEL';
26 	G_RECORD_FOUND      CONSTANT    VARCHAR2(1)  := 'F';
27 	G_RECORD_NOT_FOUND  CONSTANT    VARCHAR2(1)  := 'N';
28 	G_ITEM_BO	    CONSTANT	VARCHAR2(3)  := 'ITM';
29 	G_ITEM_CATALOG_BO   CONSTANT	VARCHAR2(3)  := 'CAT';
30 
31 	--
32 	-- Entity Id
33 	--
34 
35 	G_ITEM_CATALOG_GROUP		CONSTANT VARCHAR2(30) := 'ITEM_CATALOG_GROUP';
36 	G_ITEM_CATALOG_GROUP_LEVEL	CONSTANT NUMBER := 1;
37 
38 	--
39 	-- central objects which will hold the data at all for the other procedures
40 	-- that need the business object.
41 	--
42 	G_CATALOG_GROUP_TBL  EGO_ITEM_CATALOG_PUB.Catalog_Group_Tbl_Type;
43 	G_CATALOG_GROUP_REC  EGO_ITEM_CATALOG_PUB.Catalog_Group_Rec_Type;
44 	G_OLD_CATALOG_GROUP_REC  EGO_ITEM_CATALOG_PUB.Catalog_Group_Rec_Type;
45 
46 	--
47 	-- Global definition of the exceptions used by the business object processes
48 	--
49 	G_EXC_SEV_QUIT_OBJECT     EXCEPTION;
50 	G_EXC_UNEXP_SKIP_OBJECT   EXCEPTION;
51 	G_EXC_QUIT_IMPORT         EXCEPTION;
52 	G_EXC_SEV_QUIT_RECORD     EXCEPTION;
53 	G_EXC_SEV_QUIT_BRANCH     EXCEPTION;
54 	G_EXC_SEV_SKIP_BRANCH     EXCEPTION;
55 	G_EXC_FAT_QUIT_OBJECT     EXCEPTION;
56 	G_EXC_SEV_QUIT_SIBLINGS   EXCEPTION;
57 	G_EXC_FAT_QUIT_SIBLINGS   EXCEPTION;
58 	G_EXC_FAT_QUIT_BRANCH     EXCEPTION;
59 
60 
61 	TYPE SYSTEM_INFORMATION_REC_TYPE IS RECORD
62 	(  Entity               VARCHAR2(30)    := NULL
63 	 , org_id               NUMBER          := NULL
64 	 , User_Id              NUMBER          := NULL
65 	 , BO_Identifier        VARCHAR2(3)     := 'CAT'
66 	 , debug_flag		VARCHAR2(1)	:= 'N'
67 	 , language_code	VARCHAR2(4)	:= 'US'
68 	 , calling_mode		VARCHAR2(240)   := 'JSP'
69 	);
70 
71 	G_System_Information SYSTEM_INFORMATION_REC_TYPE;
72 
73 	PROCEDURE Set_Language_Code(p_language_code VARCHAR2);
74 	FUNCTION Get_Language_Code RETURN VARCHAR2;
75 
76 	PROCEDURE Set_User_Id
77           ( p_user_id   IN  NUMBER);
78 	FUNCTION Get_User_ID RETURN NUMBER;
79 	PRAGMA RESTRICT_REFERENCES(Get_User_Id, WNDS);
80 	FUNCTION Get_BO_Identifier RETURN VARCHAR2;
81 
82 	PROCEDURE Transaction_Type_Validity
83 	(   p_transaction_type          IN  VARCHAR2
84 	,   p_entity                    IN  VARCHAR2
85 	,   p_entity_id                 IN  VARCHAR2
86 	,   x_valid                     OUT NOCOPY BOOLEAN
87 	,   x_Mesg_Token_Tbl            OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
88 	);
89 
90 END EGO_Globals;