1 PACKAGE BODY EGO_Default_Catalog_Group AS
2 /* $Header: EGODCAGB.pls 120.1 2005/06/29 00:08:44 lkapoor noship $ */
3 /****************************************************************************
4 --
5 -- Copyright (c) 1996 Oracle Corporation, Redwood Shores, CA, USA
6 -- All rights reserved.
7 --
8 -- FILENAME
9 --
10 -- EGODCAGB.pls
11 --
12 -- DESCRIPTION
13 --
14 -- Body of package EGO_Default_Catalog_Group
15 --
16 -- NOTES
17 --
18 -- HISTORY
19 -- 20-SEP-2002 Rahul Chitko Initial Creation
20 --
21 ****************************************************************************/
22 G_PKG_NAME CONSTANT VARCHAR2(30) := 'EGO_Default_Catalog_Group';
23
24 PROCEDURE Get_Flex_Catalog_Group
25 IS
26 BEGIN
27
28 -- In the future call Flex APIs for defaults
29 EGO_Globals.G_Catalog_Group_Rec := EGO_Globals.G_Catalog_Group_Rec;
30
31 IF EGO_Globals.G_Catalog_Group_Rec.attribute_category =FND_API.G_MISS_CHAR THEN
32 EGO_Globals.G_Catalog_Group_Rec.attribute_category := NULL;
33 END IF;
34
35 IF EGO_Globals.G_Catalog_Group_Rec.attribute2 = FND_API.G_MISS_CHAR THEN
36 EGO_Globals.G_Catalog_Group_Rec.attribute2 := NULL;
37 END IF;
38
39 IF EGO_Globals.G_Catalog_Group_Rec.attribute3 = FND_API.G_MISS_CHAR THEN
40 EGO_Globals.G_Catalog_Group_Rec.attribute3 := NULL;
41 END IF;
42
43 IF EGO_Globals.G_Catalog_Group_Rec.attribute4 = FND_API.G_MISS_CHAR THEN
44 EGO_Globals.G_Catalog_Group_Rec.attribute4 := NULL;
45 END IF;
46
47 IF EGO_Globals.G_Catalog_Group_Rec.attribute5 = FND_API.G_MISS_CHAR THEN
48 EGO_Globals.G_Catalog_Group_Rec.attribute5 := NULL;
49 END IF;
50
51 IF EGO_Globals.G_Catalog_Group_Rec.attribute7 = FND_API.G_MISS_CHAR THEN
52 EGO_Globals.G_Catalog_Group_Rec.attribute7 := NULL;
53 END IF;
54
55 IF EGO_Globals.G_Catalog_Group_Rec.attribute8 = FND_API.G_MISS_CHAR THEN
56 EGO_Globals.G_Catalog_Group_Rec.attribute8 := NULL;
57 END IF;
58
59 IF EGO_Globals.G_Catalog_Group_Rec.attribute9 = FND_API.G_MISS_CHAR THEN
60 EGO_Globals.G_Catalog_Group_Rec.attribute9 := NULL;
61 END IF;
62
63 IF EGO_Globals.G_Catalog_Group_Rec.attribute11 = FND_API.G_MISS_CHAR THEN
64 EGO_Globals.G_Catalog_Group_Rec.attribute11 := NULL;
65 END IF;
66
67 IF EGO_Globals.G_Catalog_Group_Rec.attribute12 = FND_API.G_MISS_CHAR THEN
68 EGO_Globals.G_Catalog_Group_Rec.attribute12 := NULL;
69 END IF;
70
71 IF EGO_Globals.G_Catalog_Group_Rec.attribute13 = FND_API.G_MISS_CHAR THEN
72 EGO_Globals.G_Catalog_Group_Rec.attribute13 := NULL;
73 END IF;
74
75 IF EGO_Globals.G_Catalog_Group_Rec.attribute14 = FND_API.G_MISS_CHAR THEN
76 EGO_Globals.G_Catalog_Group_Rec.attribute14 := NULL;
77 END IF;
78
79 IF EGO_Globals.G_Catalog_Group_Rec.attribute15 = FND_API.G_MISS_CHAR THEN
80 EGO_Globals.G_Catalog_Group_Rec.attribute15 := NULL;
81 END IF;
82
83 IF EGO_Globals.G_Catalog_Group_Rec.attribute1 = FND_API.G_MISS_CHAR THEN
84 EGO_Globals.G_Catalog_Group_Rec.attribute1 := NULL;
85 END IF;
86
87 IF EGO_Globals.G_Catalog_Group_Rec.attribute6 = FND_API.G_MISS_CHAR THEN
88 EGO_Globals.G_Catalog_Group_Rec.attribute6 := NULL;
89 END IF;
90
91 IF EGO_Globals.G_Catalog_Group_Rec.attribute10 = FND_API.G_MISS_CHAR THEN
92 EGO_Globals.G_Catalog_Group_Rec.attribute10 := NULL;
93 END IF;
94
95 END Get_Flex_Catalog_Group;
96
97
98
99 /*********************************************************************
100 * Procedure : Attribute_Defaulting
101 * Parameter OUT : Mesg_Token_Table
102 * Return_Status
103 * Purpose : Attribute Defaulting will default the necessary null
104 * attribute with appropriate values.
105 **********************************************************************/
106 PROCEDURE Attribute_Defaulting
107 ( x_mesg_token_tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
108 , x_return_status OUT NOCOPY VARCHAR2
109 )
110 IS
111 BEGIN
112
113 x_return_status := FND_API.G_RET_STS_SUCCESS;
114
115 Get_Flex_Catalog_Group;
116
117 if (EGO_Globals.G_Catalog_Group_Rec.Summary_Flag IS NULL OR
118 EGO_Globals.G_Catalog_Group_Rec.Summary_Flag = FND_API.G_MISS_CHAR)
119 then
120 if fnd_flex_keyval.summary_flag then
121 EGO_Globals.G_Catalog_Group_Rec.Summary_Flag := 'Y';
122 else
123 EGO_Globals.G_Catalog_Group_Rec.Summary_Flag := 'N';
124 end if;
125 end if;
126
127 if (EGO_Globals.G_Catalog_Group_Rec.Enabled_Flag IS NULL OR
128 EGO_Globals.G_Catalog_Group_Rec.Enabled_Flag = FND_API.G_MISS_CHAR)
129 then
130 EGO_Globals.G_Catalog_Group_Rec.Enabled_flag := 'Y';
131 end if;
132
133 if (EGO_Globals.G_Catalog_Group_Rec.Item_Creation_Allowed_Flag = FND_API.G_MISS_CHAR)
134 then
135 EGO_Globals.G_Catalog_Group_Rec.Item_Creation_Allowed_Flag := NULL;
136 end if;
137
138 if (EGO_Globals.G_Catalog_Group_Rec.Inactive_Date = FND_API.G_MISS_DATE)
139 then
140 EGO_Globals.G_Catalog_Group_Rec.Inactive_Date := NULL;
141 end if;
142
143 if (EGO_Globals.G_Catalog_Group_Rec.Start_Effective_Date = FND_API.G_MISS_DATE)
144 then
145 EGO_Globals.G_Catalog_Group_Rec.Start_Effective_Date := NULL;
146 end if;
147
148 IF EGO_Globals.G_Catalog_Group_Rec.parent_catalog_group_id = FND_API.G_MISS_NUM
149 THEN
150 EGO_Globals.G_Catalog_Group_Rec.parent_catalog_group_id := null;
151 END IF;
152
153 IF (EGO_Globals.G_Catalog_Group_Rec.segment1 = FND_API.G_MISS_CHAR)
154 THEN
155 EGO_Globals.G_Catalog_Group_Rec.segment1 := NULL;
156 END IF;
157 IF (EGO_Globals.G_Catalog_Group_Rec.segment2 = FND_API.G_MISS_CHAR)
158 THEN
159 EGO_Globals.G_Catalog_Group_Rec.segment2 := NULL;
160 END IF;
161 IF (EGO_Globals.G_Catalog_Group_Rec.segment3 = FND_API.G_MISS_CHAR)
162 THEN
163 EGO_Globals.G_Catalog_Group_Rec.segment3 := NULL;
164 END IF;
165 IF (EGO_Globals.G_Catalog_Group_Rec.segment4 = FND_API.G_MISS_CHAR)
166 THEN
167 EGO_Globals.G_Catalog_Group_Rec.segment4 := NULL;
168 END IF;
169 IF (EGO_Globals.G_Catalog_Group_Rec.segment5 = FND_API.G_MISS_CHAR)
170 THEN
171 EGO_Globals.G_Catalog_Group_Rec.segment5 := NULL;
172 END IF;
173 IF (EGO_Globals.G_Catalog_Group_Rec.segment6 = FND_API.G_MISS_CHAR)
174 THEN
175 EGO_Globals.G_Catalog_Group_Rec.segment6 := NULL;
176 END IF;
177 IF (EGO_Globals.G_Catalog_Group_Rec.segment7 = FND_API.G_MISS_CHAR)
178 THEN
179 EGO_Globals.G_Catalog_Group_Rec.segment7 := NULL;
180 END IF;
181 IF (EGO_Globals.G_Catalog_Group_Rec.segment8 = FND_API.G_MISS_CHAR)
182 THEN
183 EGO_Globals.G_Catalog_Group_Rec.segment8 := NULL;
184 END IF;
185 IF (EGO_Globals.G_Catalog_Group_Rec.segment9 = FND_API.G_MISS_CHAR)
186 THEN
187 EGO_Globals.G_Catalog_Group_Rec.segment9 := NULL;
188 END IF;
189 IF (EGO_Globals.G_Catalog_Group_Rec.segment10 = FND_API.G_MISS_CHAR)
190 THEN
191 EGO_Globals.G_Catalog_Group_Rec.segment10 := NULL;
192 END IF;
193 IF (EGO_Globals.G_Catalog_Group_Rec.segment11 = FND_API.G_MISS_CHAR)
194 THEN
195 EGO_Globals.G_Catalog_Group_Rec.segment11 := NULL;
196 END IF;
197 IF (EGO_Globals.G_Catalog_Group_Rec.segment12 = FND_API.G_MISS_CHAR)
198 THEN
199 EGO_Globals.G_Catalog_Group_Rec.segment12 := NULL;
200 END IF;
201 IF (EGO_Globals.G_Catalog_Group_Rec.segment13 = FND_API.G_MISS_CHAR)
202 THEN
203 EGO_Globals.G_Catalog_Group_Rec.segment13 := NULL;
204 END IF;
205 IF (EGO_Globals.G_Catalog_Group_Rec.segment14 = FND_API.G_MISS_CHAR)
206 THEN
207 EGO_Globals.G_Catalog_Group_Rec.segment14 := NULL;
208 END IF;
209 IF (EGO_Globals.G_Catalog_Group_Rec.segment15 = FND_API.G_MISS_CHAR)
210 THEN
211 EGO_Globals.G_Catalog_Group_Rec.segment15 := NULL;
212 END IF;
213 IF (EGO_Globals.G_Catalog_Group_Rec.segment16 = FND_API.G_MISS_CHAR)
214 THEN
215 EGO_Globals.G_Catalog_Group_Rec.segment16 := NULL;
216 END IF;
217 IF (EGO_Globals.G_Catalog_Group_Rec.segment17 = FND_API.G_MISS_CHAR)
218 THEN
219 EGO_Globals.G_Catalog_Group_Rec.segment17 := NULL;
220 END IF;
221 IF (EGO_Globals.G_Catalog_Group_Rec.segment18 = FND_API.G_MISS_CHAR)
222 THEN
223 EGO_Globals.G_Catalog_Group_Rec.segment18 := NULL;
224 END IF;
225 IF (EGO_Globals.G_Catalog_Group_Rec.segment19 = FND_API.G_MISS_CHAR)
226 THEN
227 EGO_Globals.G_Catalog_Group_Rec.segment19 := NULL;
228 END IF;
229 IF (EGO_Globals.G_Catalog_Group_Rec.segment20 = FND_API.G_MISS_CHAR)
230 THEN
231 EGO_Globals.G_Catalog_Group_Rec.segment20 := NULL;
232 END IF;
233
234 --fix for bug 2822776
235 IF EGO_Globals.G_Catalog_Group_Rec.description = FND_API.G_MISS_CHAR
236 THEN
237 EGO_Globals.G_Catalog_Group_Rec.description := NULL;
238 END IF;
239
240
241 END Attribute_Defaulting;
242
243 /******************************************************************
244 * Procedure : Populate_Null_Columns
245 * Purpose : This procedure will look at the columns that the user
246 * has not filled in and will assign those columns a
247 * value from the database record.
248 * This procedure is not called for CREATE
249 ********************************************************************/
250 PROCEDURE Populate_Null_Columns
251 IS
252 BEGIN
253
254 IF EGO_Globals.G_Catalog_Group_Rec.attribute_category IS NULL OR
255 EGO_Globals.G_Catalog_Group_Rec.attribute_category = FND_API.G_MISS_CHAR
256 THEN
257 EGO_Globals.G_Catalog_Group_Rec.attribute_category :=
258 EGO_Globals.G_Old_Catalog_Group_Rec.attribute_category;
259
260 END IF;
261
262 IF EGO_Globals.G_Catalog_Group_Rec.attribute2 = FND_API.G_MISS_CHAR OR
263 EGO_Globals.G_Catalog_Group_Rec.attribute2 IS NULL
264 THEN
265 EGO_Globals.G_Catalog_Group_Rec.attribute2 :=
266 EGO_Globals.G_Old_Catalog_Group_Rec.attribute2;
267 END IF;
268
269 IF EGO_Globals.G_Catalog_Group_Rec.attribute3 = FND_API.G_MISS_CHAR OR
270 EGO_Globals.G_Catalog_Group_Rec.attribute3 IS NULL
271 THEN
272 EGO_Globals.G_Catalog_Group_Rec.attribute3 :=
273 EGO_Globals.G_Old_Catalog_Group_Rec.attribute3;
274 END IF;
275
276 IF EGO_Globals.G_Catalog_Group_Rec.attribute4 = FND_API.G_MISS_CHAR OR
277 EGO_Globals.G_Catalog_Group_Rec.attribute4 IS NULL
278 THEN
279 EGO_Globals.G_Catalog_Group_Rec.attribute4 :=
280 EGO_Globals.G_Old_Catalog_Group_Rec.attribute4;
281 END IF;
282
283 IF EGO_Globals.G_Catalog_Group_Rec.attribute5 = FND_API.G_MISS_CHAR OR
284 EGO_Globals.G_Catalog_Group_Rec.attribute5 IS NULL
285 THEN
286 EGO_Globals.G_Catalog_Group_Rec.attribute5 :=
287 EGO_Globals.G_Old_Catalog_Group_Rec.attribute5;
288 END IF;
289
290 IF EGO_Globals.G_Catalog_Group_Rec.attribute7 = FND_API.G_MISS_CHAR OR
291 EGO_Globals.G_Catalog_Group_Rec.attribute7 IS NULL
292 THEN
293 EGO_Globals.G_Catalog_Group_Rec.attribute7 :=
294 EGO_Globals.G_Old_Catalog_Group_Rec.attribute7;
295 END IF;
296
297 IF EGO_Globals.G_Catalog_Group_Rec.attribute8 = FND_API.G_MISS_CHAR OR
298 EGO_Globals.G_Catalog_Group_Rec.attribute8 IS NULL
299 THEN
300 EGO_Globals.G_Catalog_Group_Rec.attribute8 :=
301 EGO_Globals.G_Old_Catalog_Group_Rec.attribute8;
302 END IF;
303
304 IF EGO_Globals.G_Catalog_Group_Rec.attribute9 = FND_API.G_MISS_CHAR OR
305 EGO_Globals.G_Catalog_Group_Rec.attribute9 IS NULL
306 THEN
307 EGO_Globals.G_Catalog_Group_Rec.attribute9 :=
308 EGO_Globals.G_Old_Catalog_Group_Rec.attribute9;
309 END IF;
310
311 IF EGO_Globals.G_Catalog_Group_Rec.attribute11 = FND_API.G_MISS_CHAR OR
312 EGO_Globals.G_Catalog_Group_Rec.attribute11 IS NULL
313 THEN
314 EGO_Globals.G_Catalog_Group_Rec.attribute11 :=
315 EGO_Globals.G_Old_Catalog_Group_Rec.attribute11;
316 END IF;
317
318 IF EGO_Globals.G_Catalog_Group_Rec.attribute12 = FND_API.G_MISS_CHAR OR
319 EGO_Globals.G_Catalog_Group_Rec.attribute12 IS NULL
320 THEN
321 EGO_Globals.G_Catalog_Group_Rec.attribute12 :=
322 EGO_Globals.G_Old_Catalog_Group_Rec.attribute12;
323 END IF;
324
325 IF EGO_Globals.G_Catalog_Group_Rec.attribute13 = FND_API.G_MISS_CHAR OR
326 EGO_Globals.G_Catalog_Group_Rec.attribute13 IS NULL
327 THEN
328 EGO_Globals.G_Catalog_Group_Rec.attribute13 :=
329 EGO_Globals.G_Old_Catalog_Group_Rec.attribute13;
330 END IF;
331
332 IF EGO_Globals.G_Catalog_Group_Rec.attribute14 = FND_API.G_MISS_CHAR OR
333 EGO_Globals.G_Catalog_Group_Rec.attribute14 IS NULL
334 THEN
335 EGO_Globals.G_Catalog_Group_Rec.attribute14 :=
336 EGO_Globals.G_Old_Catalog_Group_Rec.attribute14;
337 END IF;
338
339 IF EGO_Globals.G_Catalog_Group_Rec.attribute15 = FND_API.G_MISS_CHAR OR
340 EGO_Globals.G_Catalog_Group_Rec.attribute15 IS NULL
341 THEN
342 EGO_Globals.G_Catalog_Group_Rec.attribute15 :=
343 EGO_Globals.G_Old_Catalog_Group_Rec.attribute15;
344 END IF;
345
346 IF EGO_Globals.G_Catalog_Group_Rec.attribute1 = FND_API.G_MISS_CHAR OR
347 EGO_Globals.G_Catalog_Group_Rec.attribute1 IS NULL
348 THEN
349 EGO_Globals.G_Catalog_Group_Rec.attribute1 :=
350 EGO_Globals.G_Old_Catalog_Group_Rec.attribute1;
351 END IF;
352
353 IF EGO_Globals.G_Catalog_Group_Rec.attribute6 = FND_API.G_MISS_CHAR OR
354 EGO_Globals.G_Catalog_Group_Rec.attribute6 IS NULL
355 THEN
356 EGO_Globals.G_Catalog_Group_Rec.attribute6 :=
357 EGO_Globals.G_Old_Catalog_Group_Rec.attribute6;
358 END IF;
359
360 IF EGO_Globals.G_Catalog_Group_Rec.attribute10 = FND_API.G_MISS_CHAR OR
361 EGO_Globals.G_Catalog_Group_Rec.attribute10 IS NULL
362 THEN
363 EGO_Globals.G_Catalog_Group_Rec.attribute10 :=
364 EGO_Globals.G_Old_Catalog_Group_Rec.attribute10;
365 END IF;
366
367 IF EGO_Globals.G_Catalog_Group_Rec.description IS NULL
368 THEN
369 EGO_Globals.G_Catalog_Group_Rec.description := EGO_Globals.G_Old_Catalog_Group_Rec.Description;
370 END IF;
371
372 IF EGO_Globals.G_Catalog_Group_Rec.summary_flag IS NULL OR
373 EGO_Globals.G_Catalog_Group_Rec.summary_flag = FND_API.G_MISS_CHAR
374 THEN
375 EGO_Globals.G_Catalog_Group_Rec.summary_flag := EGO_Globals.G_Old_Catalog_Group_Rec.Summary_Flag;
376 END IF;
377
378 IF EGO_Globals.G_Catalog_Group_Rec.enabled_flag IS NULL OR
379 EGO_Globals.G_Catalog_Group_Rec.enabled_flag = FND_API.G_MISS_CHAR
380 THEN
381 EGO_Globals.G_Catalog_Group_Rec.enabled_flag := EGO_Globals.G_Old_Catalog_Group_Rec.Enabled_flag;
382 END IF;
383
384 IF EGO_Globals.G_Catalog_Group_Rec.inactive_date IS NULL
385 THEN
386 EGO_Globals.G_Catalog_Group_Rec.inactive_date := EGO_Globals.G_Old_Catalog_Group_Rec.inactive_date;
387 END IF;
388
389 IF EGO_Globals.G_Catalog_Group_Rec.start_effective_date IS NULL
390 THEN
394 IF EGO_Globals.G_Catalog_Group_Rec.description = FND_API.G_MISS_CHAR
391 EGO_Globals.G_Catalog_Group_Rec.start_effective_date := EGO_Globals.G_Old_Catalog_Group_Rec.start_effective_date;
392 END IF;
393
395 THEN
396 EGO_Globals.G_Catalog_Group_Rec.description := NULL;
397 END IF;
398
399 IF EGO_Globals.G_Catalog_Group_Rec.inactive_date = FND_API.G_MISS_DATE
400 THEN
401 EGO_Globals.G_Catalog_Group_Rec.inactive_date := NULL;
402 END IF;
403
404 IF EGO_Globals.G_Catalog_Group_Rec.start_effective_date = FND_API.G_MISS_DATE
405 THEN
406 EGO_Globals.G_Catalog_Group_Rec.start_effective_date := NULL;
407 END IF;
408
409 --
410 -- Get the unexposed columns from the database and return
411 -- them as the unexposed columns for the current record.
412 --
413
414 EGO_Globals.G_Catalog_Group_Rec.catalog_group_id := EGO_Globals.G_Old_Catalog_Group_Rec.catalog_group_id;
415 IF EGO_Globals.G_Catalog_Group_Rec.parent_catalog_group_id IS NULL OR
416 EGO_Globals.G_Catalog_Group_Rec.parent_catalog_group_id = FND_API.G_MISS_NUM
417 THEN
418 EGO_Globals.G_Catalog_Group_Rec.parent_catalog_group_id := EGO_Globals.G_Old_Catalog_Group_Rec.parent_catalog_group_id;
419 END IF;
420
421 END Populate_Null_Columns;
422
423 END EGO_Default_Catalog_Group;