DBA Data[Home] [Help]

PACKAGE: APPS.QP_GLOBALS

Source


1 PACKAGE QP_Globals AUTHID CURRENT_USER AS
2 /* $Header: QPXSGLBS.pls 120.4 2006/02/22 10:24:28 shulin ship $ */
3 
4 --  Procedure Get_Entities_Tbl;
5 --
6 --  Used by generator to avoid overriding or duplicating existing
7 --  entity constants.
8 --
9 --  DO NOT MODIFY
10 
11 PROCEDURE Get_Entities_Tbl;
12 
13 --  Product entity constants.
14 
15 --  START GEN entities
16 G_ENTITY_PRICE_LIST			 CONSTANT VARCHAR2(30) := 'PRICE_LIST';
17 G_ENTITY_PRICE_LIST_LINE		 CONSTANT VARCHAR2(30) := 'PRICE_LIST_LINE';
18 G_ENTITY_ALL                   CONSTANT VARCHAR2(30) := 'ALL';
19 G_ENTITY_MODIFIER_LIST         CONSTANT VARCHAR2(30) := 'MODIFIER_LIST';
20 G_ENTITY_MODIFIERS             CONSTANT VARCHAR2(30) := 'MODIFIERS';
21 G_ENTITY_QUALIFIERS            CONSTANT VARCHAR2(30) := 'QUALIFIERS';
22 G_ENTITY_PRICING_ATTR          CONSTANT VARCHAR2(30) := 'PRICING_ATTR';
23 G_ENTITY_QUALIFIER_RULES       CONSTANT VARCHAR2(30) := 'QUALIFIER_RULES';
24 G_ENTITY_LINE_PRICING_PATTR    CONSTANT VARCHAR2(30) := 'LINE_PRICING_PATTR';
25 G_ENTITY_FORMULA               CONSTANT VARCHAR2(30) := 'FORMULA';
26 G_ENTITY_FORMULA_LINES         CONSTANT VARCHAR2(30) := 'FORMULA_LINES';
27 G_ENTITY_LIMITS                CONSTANT VARCHAR2(30) := 'LIMITS';
28 G_ENTITY_LIMIT_ATTRS           CONSTANT VARCHAR2(30) := 'LIMIT_ATTRS';
29 G_ENTITY_LIMIT_BALANCES        CONSTANT VARCHAR2(30) := 'LIMIT_BALANCES';
30 G_ENTITY_CURR_LISTS            CONSTANT VARCHAR2(30) := 'CURR_LISTS';
31 G_ENTITY_CURR_DETAILS          CONSTANT VARCHAR2(30) := 'CURR_DETAILS';
32 G_ENTITY_CON                   CONSTANT VARCHAR2(30) := 'CON';
33 G_ENTITY_SEG                   CONSTANT VARCHAR2(30) := 'SEG';
34 G_ENTITY_PTE                   CONSTANT VARCHAR2(30) := 'PTE';
35 G_ENTITY_RQT                   CONSTANT VARCHAR2(30) := 'RQT';
36 G_ENTITY_SSC                   CONSTANT VARCHAR2(30) := 'SSC';
37 G_ENTITY_PSG                   CONSTANT VARCHAR2(30) := 'PSG';
38 G_ENTITY_SOU                   CONSTANT VARCHAR2(30) := 'SOU';
39 G_ENTITY_BSO                   CONSTANT VARCHAR2(30) := 'BSO'; --Bug#3385041
40 G_ENTITY_FNA                   CONSTANT VARCHAR2(30) := 'FNA';
41 --  END GEN entities
42 
43 --  Operations.
44 
45 G_OPR_CREATE	    CONSTANT	VARCHAR2(30) := 'CREATE';
46 G_OPR_UPDATE	    CONSTANT	VARCHAR2(30) := 'UPDATE';
47 G_OPR_DELETE	    CONSTANT	VARCHAR2(30) := 'DELETE';
48 G_OPR_LOCK	    CONSTANT	VARCHAR2(30) := 'LOCK';
49 G_OPR_NONE	    CONSTANT	VARCHAR2(30) := FND_API.G_MISS_CHAR;
50 
51 --Maintaining list header phases
52 
53 G_MAINTAIN_LIST_HEADER_PHASES  CONSTANT Varchar2(30)  := 'MAINTAIN_LIST_HEADER_PHASES';
54 
55 --Delayed Request Types
56 -- start bug2091362
57 G_DUPLICATE_MODIFIER_LINES CONSTANT Varchar2(30) := 'DUPLICATE_MODIFIER_LINES';
58 -- end bug2091362
59 
60 G_DUPLICATE_QUALIFIERS CONSTANT Varchar2(30)  := 'DUPLICATE_QUALIFIERS';
61 G_DUPLICATE_LIST_LINES CONSTANT Varchar2(30)  := 'DUPLICATE_LIST_LINES';
62 G_UPDATE_CHILD_BREAKS  CONSTANT Varchar2(30)  := 'UPDATE_CHILD_BREAK_LINES';
63 G_UPDATE_CHILD_PRICING_ATTR  CONSTANT Varchar2(30)  := 'UPDATE_CHILD_PRICING_ATTR';
64 G_VALIDATE_LINES_FOR_CHILD CONSTANT Varchar2(30)  := 'VALIDATE_LINES_FOR_CHILD';
65 G_OVERLAPPING_PRICE_BREAKS CONSTANT Varchar2(30)  := 'OVERLAPPING_BREAKS';
66 G_SINGLE_PRICE_LIST CONSTANT Varchar2(30)  := 'SINGLE_PRICE_LIST';
67 G_UPDATE_LIST_QUAL_IND CONSTANT Varchar2(30) := 'UPDATE_LIST_QUALIFICATION_IND';
68 G_UPDATE_LINE_QUAL_IND CONSTANT Varchar2(30) := 'UPDATE_LINE_QUALIFICATION_IND';
69 G_UPDATE_PRICING_ATTR_PHASE CONSTANT Varchar2(30) := 'UPDATE_PRICING_ATTR_PHASE';
70 G_UPDATE_PRICING_PHASE CONSTANT Varchar2(30) := 'UPDATE_PRICING_PHASE';
71 G_WARN_SAME_QUALIFIER_GROUP CONSTANT Varchar2(30) := 'WARN_SAME_QUALIFIER_GROUP';
72 G_MAINTAIN_QUALIFIER_DEN_COLS Varchar2(30) := 'MAINTAIN_QUALIFIER_DEN_COLS';
73 G_MULTIPLE_PRICE_BREAK_ATTRS CONSTANT Varchar2(30) := 'MULTIPLE_PRICE_BREAK_ATTRS';
74 G_MIXED_QUAL_SEG_LEVELS CONSTANT Varchar2(30) := 'MIXED_QUAL_SEG_LEVELS';
75 G_UPDATE_LIMITS_COLUMNS CONSTANT Varchar2(30) := 'UPDATE_LIMITS_COLUMNS';
76 G_MAINTAIN_FACTOR_LIST_ATTRS Varchar2(30) := 'MAINTAIN_FACTOR_LIST_ATTRS';
77 G_VALIDATE_SELLING_ROUNDING Varchar2(30) := 'VALIDATE_SELLING_ROUNDING';
78 G_CHECK_SEGMENT_LEVEL_IN_GROUP Varchar2(30) := 'CHECK_SEGMENT_LEVEL_IN_GROUP';
79 G_CHECK_LINE_FOR_HEADER_QUAL Varchar2(30) := 'CHECK_LINE_FOR_HEADER_QUAL';
80 --hw
81 G_UPDATE_CHANGED_LINES_ADD varchar2(30) := 'UPDATE_CHANGED_LINES_ADD';
82 G_UPDATE_CHANGED_LINES_DEL varchar2(30) := 'UPDATE_CHANGED_LINES_DEL';
83 G_UPDATE_CHANGED_LINES_PH varchar2(30) := 'UPDATE_CHANGED_LINES_PHASE';
84 G_UPDATE_CHANGED_LINES_ACT varchar2(30) := 'UPDATE_CHANGED_LINES_ACTIVE';
85 -- New Delayed Request Types added for 11.5.10
86 G_UPDATE_QUALIFIER_STATUS varchar2(30) := 'UPDATE_QUALIFIER_STATUS';
87 G_UPDATE_ATTRIBUTE_STATUS varchar2(30) := 'UPDATE_ATTRIBUTE_STATUS';
88 G_CREATE_SECURITY_PRIVILEGE varchar2(30) := 'CREATE_SECURITY_PRIVILEGE';
89 -- Essilor Fix bug 2789138
90 G_UPDATE_MANUAL_MODIFIER_FLAG CONSTANT Varchar2(30) := 'UPDATE_MANUAL_MODIFIER_FLAG';
91 G_UPDATE_HVOP CONSTANT varchar2(30) := 'UPDATE_HVOP_PROFILE';
92 --Delayed request
93 G_MAINTAIN_HEADER_PATTERN varchar2(30)  := 'MAINTAIN_HEADER_PATTERN';
94 G_MAINTAIN_LINE_PATTERN varchar2(30)    := 'MAINTAIN_LINE_PATTERN';
95 G_MAINTAIN_PRODUCT_PATTERN varchar2(30) := 'MAINTAIN_PRODUCT_PATTERN';
96 --Delayed request
97 G_CHECK_ENABLED_FUNC_AREAS VARCHAR2(30) := 'CHECK_ENABLED_FUNC_AREAS';
98 
99 --Delayed request for upgrading price beaks
100 G_UPGRADE_PRICE_BREAKS VARCHAR2(30) := 'UPGRADE_PRICE_BREAKS';
101 
102 --  Max number of defaulting tterations.
103 
104 G_MAX_DEF_ITERATIONS          CONSTANT NUMBER:= 5;
105 
106 -- for bug 3531890
107 G_SPECIAL_ATTRIBUTE_TYPE varchar2(30) := 'ENGINE';
108 G_SPECIAL_CONTEXT varchar2(30) := 'GLOBAL_VARIABLES';
109 G_SPECIAL_ATTRIBUTE1 varchar2(30) := 'STEP_NUMBER';
110 --4949185, 5018856, 5024801, 5024919
111 G_CHECK_DUP_PRICELIST_LINES varchar2(1) := NULL;
112 
113 --  Index table type used by JVC controllers.
114 
115 TYPE Index_Tbl_Type IS TABLE OF BINARY_INTEGER
116     INDEX BY BINARY_INTEGER;
117 
118 --  API Operation control flags.
119 
120 TYPE Control_Rec_Type IS RECORD
121 (   controlled_operation          BOOLEAN := FALSE
122 ,   default_attributes            BOOLEAN := TRUE
123 ,   check_security                BOOLEAN := TRUE
124 ,   change_attributes             BOOLEAN := TRUE
125 ,   validate_entity               BOOLEAN := TRUE
126 ,   write_to_db                   BOOLEAN := TRUE
127 ,   process                       BOOLEAN := TRUE
128 ,   process_entity                VARCHAR2(30) := G_ENTITY_ALL
129 ,   clear_api_cache               BOOLEAN := TRUE
130 ,   clear_api_requests            BOOLEAN := TRUE
131 ,   request_category              VARCHAR2(30):= NULL
132 ,   request_name                  VARCHAR2(30):= NULL
133 ,   called_from_ui                VARCHAR2(1) := 'Y'
134 );
135 
136 --  Variable representing missing control record.
137 
138 G_MISS_CONTROL_REC            Control_Rec_Type;
139 
140 --  API request record type.
141 
142 TYPE Request_Rec_Type IS RECORD
143 (   entity                        VARCHAR2(30) := NULL
144 ,   step                          VARCHAR2(30) := NULL
145 ,   name                          VARCHAR2(30) := NULL
146 ,   category                      VARCHAR2(30) := NULL
147 ,   processed                     BOOLEAN := FALSE
148 ,   attribute1                    VARCHAR2(240) := NULL
149 ,   attribute2                    VARCHAR2(240) := NULL
150 ,   attribute3                    VARCHAR2(240) := NULL
151 ,   attribute4                    VARCHAR2(240) := NULL
152 ,   attribute5                    VARCHAR2(240) := NULL
153 );
154 
155 --  API Request table type.
156 
157 TYPE Request_Tbl_Type IS TABLE OF Request_Rec_Type
158     INDEX BY BINARY_INTEGER;
159 
160 TYPE Number_Tbl_Type IS TABLE OF NUMBER
161     INDEX BY BINARY_INTEGER;
162 
163 -- Variable representing a missing table
164 G_MISS_NUMBER_TBL  Number_Tbl_Type;
165 
166 --  Initialize control record.
167 
168 FUNCTION Init_Control_Rec
169 (   p_operation                     IN  VARCHAR2
170 ,   p_control_rec                   IN  Control_Rec_Type
171 )RETURN Control_Rec_Type;
172 
173 --  Function Equal
174 --  Number comparison.
175 
176 FUNCTION Equal
177 (   p_attribute1                    IN  NUMBER
178 ,   p_attribute2                    IN  NUMBER
179 )RETURN BOOLEAN;
180 
181 --  Varchar2 comparison.
182 
183 FUNCTION Equal
184 (   p_attribute1                    IN  VARCHAR2
185 ,   p_attribute2                    IN  VARCHAR2
186 )RETURN BOOLEAN;
187 
188 --  Date comparison.
189 
190 FUNCTION Equal
191 (   p_attribute1                    IN  DATE
192 ,   p_attribute2                    IN  DATE
193 )RETURN BOOLEAN;
194 
195 END QP_Globals;