40: --
41:
42: -- Every catalog group record is a business object.
43:
44: -- dbms_output.Put_Line('Records to Process: ' || EGO_Globals.G_Catalog_Group_Tbl.COUNT);
45:
46: FOR l_Table_Index IN 1..EGO_Globals.G_Catalog_Group_Tbl.COUNT
47: LOOP
48: BEGIN
42: -- Every catalog group record is a business object.
43:
44: -- dbms_output.Put_Line('Records to Process: ' || EGO_Globals.G_Catalog_Group_Tbl.COUNT);
45:
46: FOR l_Table_Index IN 1..EGO_Globals.G_Catalog_Group_Tbl.COUNT
47: LOOP
48: BEGIN
49:
50: l_return_status := 'S';
48: BEGIN
49:
50: l_return_status := 'S';
51:
52: EGO_Globals.G_Catalog_Group_Rec := EGO_Globals.G_Catalog_Group_Tbl(l_Table_Index);
53:
54: EGO_Item_Catalog_Pub.G_KF_Segment_Values(1) :=
55: EGO_Globals.G_Catalog_Group_Rec.Segment1;
56: EGO_Item_Catalog_Pub.G_KF_Segment_Values(2) :=
51:
52: EGO_Globals.G_Catalog_Group_Rec := EGO_Globals.G_Catalog_Group_Tbl(l_Table_Index);
53:
54: EGO_Item_Catalog_Pub.G_KF_Segment_Values(1) :=
55: EGO_Globals.G_Catalog_Group_Rec.Segment1;
56: EGO_Item_Catalog_Pub.G_KF_Segment_Values(2) :=
57: EGO_Globals.G_Catalog_Group_Rec.Segment2;
58: EGO_Item_Catalog_Pub.G_KF_Segment_Values(3) :=
59: EGO_Globals.G_Catalog_Group_Rec.Segment3;
53:
54: EGO_Item_Catalog_Pub.G_KF_Segment_Values(1) :=
55: EGO_Globals.G_Catalog_Group_Rec.Segment1;
56: EGO_Item_Catalog_Pub.G_KF_Segment_Values(2) :=
57: EGO_Globals.G_Catalog_Group_Rec.Segment2;
58: EGO_Item_Catalog_Pub.G_KF_Segment_Values(3) :=
59: EGO_Globals.G_Catalog_Group_Rec.Segment3;
60: EGO_Item_Catalog_Pub.G_KF_Segment_Values(4) :=
61: EGO_Globals.G_Catalog_Group_Rec.Segment4;
55: EGO_Globals.G_Catalog_Group_Rec.Segment1;
56: EGO_Item_Catalog_Pub.G_KF_Segment_Values(2) :=
57: EGO_Globals.G_Catalog_Group_Rec.Segment2;
58: EGO_Item_Catalog_Pub.G_KF_Segment_Values(3) :=
59: EGO_Globals.G_Catalog_Group_Rec.Segment3;
60: EGO_Item_Catalog_Pub.G_KF_Segment_Values(4) :=
61: EGO_Globals.G_Catalog_Group_Rec.Segment4;
62: EGO_Item_Catalog_Pub.G_KF_Segment_Values(5) :=
63: EGO_Globals.G_Catalog_Group_Rec.Segment5;
57: EGO_Globals.G_Catalog_Group_Rec.Segment2;
58: EGO_Item_Catalog_Pub.G_KF_Segment_Values(3) :=
59: EGO_Globals.G_Catalog_Group_Rec.Segment3;
60: EGO_Item_Catalog_Pub.G_KF_Segment_Values(4) :=
61: EGO_Globals.G_Catalog_Group_Rec.Segment4;
62: EGO_Item_Catalog_Pub.G_KF_Segment_Values(5) :=
63: EGO_Globals.G_Catalog_Group_Rec.Segment5;
64: EGO_Item_Catalog_Pub.G_KF_Segment_Values(6) :=
65: EGO_Globals.G_Catalog_Group_Rec.Segment6;
59: EGO_Globals.G_Catalog_Group_Rec.Segment3;
60: EGO_Item_Catalog_Pub.G_KF_Segment_Values(4) :=
61: EGO_Globals.G_Catalog_Group_Rec.Segment4;
62: EGO_Item_Catalog_Pub.G_KF_Segment_Values(5) :=
63: EGO_Globals.G_Catalog_Group_Rec.Segment5;
64: EGO_Item_Catalog_Pub.G_KF_Segment_Values(6) :=
65: EGO_Globals.G_Catalog_Group_Rec.Segment6;
66: EGO_Item_Catalog_Pub.G_KF_Segment_Values(7) :=
67: EGO_Globals.G_Catalog_Group_Rec.Segment7;
61: EGO_Globals.G_Catalog_Group_Rec.Segment4;
62: EGO_Item_Catalog_Pub.G_KF_Segment_Values(5) :=
63: EGO_Globals.G_Catalog_Group_Rec.Segment5;
64: EGO_Item_Catalog_Pub.G_KF_Segment_Values(6) :=
65: EGO_Globals.G_Catalog_Group_Rec.Segment6;
66: EGO_Item_Catalog_Pub.G_KF_Segment_Values(7) :=
67: EGO_Globals.G_Catalog_Group_Rec.Segment7;
68: EGO_Item_Catalog_Pub.G_KF_Segment_Values(8) :=
69: EGO_Globals.G_Catalog_Group_Rec.Segment8;
63: EGO_Globals.G_Catalog_Group_Rec.Segment5;
64: EGO_Item_Catalog_Pub.G_KF_Segment_Values(6) :=
65: EGO_Globals.G_Catalog_Group_Rec.Segment6;
66: EGO_Item_Catalog_Pub.G_KF_Segment_Values(7) :=
67: EGO_Globals.G_Catalog_Group_Rec.Segment7;
68: EGO_Item_Catalog_Pub.G_KF_Segment_Values(8) :=
69: EGO_Globals.G_Catalog_Group_Rec.Segment8;
70: EGO_Item_Catalog_Pub.G_KF_Segment_Values(9) :=
71: EGO_Globals.G_Catalog_Group_Rec.Segment9;
65: EGO_Globals.G_Catalog_Group_Rec.Segment6;
66: EGO_Item_Catalog_Pub.G_KF_Segment_Values(7) :=
67: EGO_Globals.G_Catalog_Group_Rec.Segment7;
68: EGO_Item_Catalog_Pub.G_KF_Segment_Values(8) :=
69: EGO_Globals.G_Catalog_Group_Rec.Segment8;
70: EGO_Item_Catalog_Pub.G_KF_Segment_Values(9) :=
71: EGO_Globals.G_Catalog_Group_Rec.Segment9;
72: EGO_Item_Catalog_Pub.G_KF_Segment_Values(10) :=
73: EGO_Globals.G_Catalog_Group_Rec.Segment10;
67: EGO_Globals.G_Catalog_Group_Rec.Segment7;
68: EGO_Item_Catalog_Pub.G_KF_Segment_Values(8) :=
69: EGO_Globals.G_Catalog_Group_Rec.Segment8;
70: EGO_Item_Catalog_Pub.G_KF_Segment_Values(9) :=
71: EGO_Globals.G_Catalog_Group_Rec.Segment9;
72: EGO_Item_Catalog_Pub.G_KF_Segment_Values(10) :=
73: EGO_Globals.G_Catalog_Group_Rec.Segment10;
74: EGO_Item_Catalog_Pub.G_KF_Segment_Values(11) :=
75: EGO_Globals.G_Catalog_Group_Rec.Segment11;
69: EGO_Globals.G_Catalog_Group_Rec.Segment8;
70: EGO_Item_Catalog_Pub.G_KF_Segment_Values(9) :=
71: EGO_Globals.G_Catalog_Group_Rec.Segment9;
72: EGO_Item_Catalog_Pub.G_KF_Segment_Values(10) :=
73: EGO_Globals.G_Catalog_Group_Rec.Segment10;
74: EGO_Item_Catalog_Pub.G_KF_Segment_Values(11) :=
75: EGO_Globals.G_Catalog_Group_Rec.Segment11;
76: EGO_Item_Catalog_Pub.G_KF_Segment_Values(12) :=
77: EGO_Globals.G_Catalog_Group_Rec.Segment12;
71: EGO_Globals.G_Catalog_Group_Rec.Segment9;
72: EGO_Item_Catalog_Pub.G_KF_Segment_Values(10) :=
73: EGO_Globals.G_Catalog_Group_Rec.Segment10;
74: EGO_Item_Catalog_Pub.G_KF_Segment_Values(11) :=
75: EGO_Globals.G_Catalog_Group_Rec.Segment11;
76: EGO_Item_Catalog_Pub.G_KF_Segment_Values(12) :=
77: EGO_Globals.G_Catalog_Group_Rec.Segment12;
78: EGO_Item_Catalog_Pub.G_KF_Segment_Values(13) :=
79: EGO_Globals.G_Catalog_Group_Rec.Segment13;
73: EGO_Globals.G_Catalog_Group_Rec.Segment10;
74: EGO_Item_Catalog_Pub.G_KF_Segment_Values(11) :=
75: EGO_Globals.G_Catalog_Group_Rec.Segment11;
76: EGO_Item_Catalog_Pub.G_KF_Segment_Values(12) :=
77: EGO_Globals.G_Catalog_Group_Rec.Segment12;
78: EGO_Item_Catalog_Pub.G_KF_Segment_Values(13) :=
79: EGO_Globals.G_Catalog_Group_Rec.Segment13;
80: EGO_Item_Catalog_Pub.G_KF_Segment_Values(14) :=
81: EGO_Globals.G_Catalog_Group_Rec.Segment14;
75: EGO_Globals.G_Catalog_Group_Rec.Segment11;
76: EGO_Item_Catalog_Pub.G_KF_Segment_Values(12) :=
77: EGO_Globals.G_Catalog_Group_Rec.Segment12;
78: EGO_Item_Catalog_Pub.G_KF_Segment_Values(13) :=
79: EGO_Globals.G_Catalog_Group_Rec.Segment13;
80: EGO_Item_Catalog_Pub.G_KF_Segment_Values(14) :=
81: EGO_Globals.G_Catalog_Group_Rec.Segment14;
82: EGO_Item_Catalog_Pub.G_KF_Segment_Values(15) :=
83: EGO_Globals.G_Catalog_Group_Rec.Segment15;
77: EGO_Globals.G_Catalog_Group_Rec.Segment12;
78: EGO_Item_Catalog_Pub.G_KF_Segment_Values(13) :=
79: EGO_Globals.G_Catalog_Group_Rec.Segment13;
80: EGO_Item_Catalog_Pub.G_KF_Segment_Values(14) :=
81: EGO_Globals.G_Catalog_Group_Rec.Segment14;
82: EGO_Item_Catalog_Pub.G_KF_Segment_Values(15) :=
83: EGO_Globals.G_Catalog_Group_Rec.Segment15;
84: EGO_Item_Catalog_Pub.G_KF_Segment_Values(16) :=
85: EGO_Globals.G_Catalog_Group_Rec.Segment16;
79: EGO_Globals.G_Catalog_Group_Rec.Segment13;
80: EGO_Item_Catalog_Pub.G_KF_Segment_Values(14) :=
81: EGO_Globals.G_Catalog_Group_Rec.Segment14;
82: EGO_Item_Catalog_Pub.G_KF_Segment_Values(15) :=
83: EGO_Globals.G_Catalog_Group_Rec.Segment15;
84: EGO_Item_Catalog_Pub.G_KF_Segment_Values(16) :=
85: EGO_Globals.G_Catalog_Group_Rec.Segment16;
86: EGO_Item_Catalog_Pub.G_KF_Segment_Values(17) :=
87: EGO_Globals.G_Catalog_Group_Rec.Segment17;
81: EGO_Globals.G_Catalog_Group_Rec.Segment14;
82: EGO_Item_Catalog_Pub.G_KF_Segment_Values(15) :=
83: EGO_Globals.G_Catalog_Group_Rec.Segment15;
84: EGO_Item_Catalog_Pub.G_KF_Segment_Values(16) :=
85: EGO_Globals.G_Catalog_Group_Rec.Segment16;
86: EGO_Item_Catalog_Pub.G_KF_Segment_Values(17) :=
87: EGO_Globals.G_Catalog_Group_Rec.Segment17;
88: EGO_Item_Catalog_Pub.G_KF_Segment_Values(18) :=
89: EGO_Globals.G_Catalog_Group_Rec.Segment18;
83: EGO_Globals.G_Catalog_Group_Rec.Segment15;
84: EGO_Item_Catalog_Pub.G_KF_Segment_Values(16) :=
85: EGO_Globals.G_Catalog_Group_Rec.Segment16;
86: EGO_Item_Catalog_Pub.G_KF_Segment_Values(17) :=
87: EGO_Globals.G_Catalog_Group_Rec.Segment17;
88: EGO_Item_Catalog_Pub.G_KF_Segment_Values(18) :=
89: EGO_Globals.G_Catalog_Group_Rec.Segment18;
90: EGO_Item_Catalog_Pub.G_KF_Segment_Values(19) :=
91: EGO_Globals.G_Catalog_Group_Rec.Segment19;
85: EGO_Globals.G_Catalog_Group_Rec.Segment16;
86: EGO_Item_Catalog_Pub.G_KF_Segment_Values(17) :=
87: EGO_Globals.G_Catalog_Group_Rec.Segment17;
88: EGO_Item_Catalog_Pub.G_KF_Segment_Values(18) :=
89: EGO_Globals.G_Catalog_Group_Rec.Segment18;
90: EGO_Item_Catalog_Pub.G_KF_Segment_Values(19) :=
91: EGO_Globals.G_Catalog_Group_Rec.Segment19;
92: EGO_Item_Catalog_Pub.G_KF_Segment_Values(20) :=
93: EGO_Globals.G_Catalog_Group_Rec.Segment20;
87: EGO_Globals.G_Catalog_Group_Rec.Segment17;
88: EGO_Item_Catalog_Pub.G_KF_Segment_Values(18) :=
89: EGO_Globals.G_Catalog_Group_Rec.Segment18;
90: EGO_Item_Catalog_Pub.G_KF_Segment_Values(19) :=
91: EGO_Globals.G_Catalog_Group_Rec.Segment19;
92: EGO_Item_Catalog_Pub.G_KF_Segment_Values(20) :=
93: EGO_Globals.G_Catalog_Group_Rec.Segment20;
94:
95:
89: EGO_Globals.G_Catalog_Group_Rec.Segment18;
90: EGO_Item_Catalog_Pub.G_KF_Segment_Values(19) :=
91: EGO_Globals.G_Catalog_Group_Rec.Segment19;
92: EGO_Item_Catalog_Pub.G_KF_Segment_Values(20) :=
93: EGO_Globals.G_Catalog_Group_Rec.Segment20;
94:
95:
96:
97: /* Assign null to the segments that are not used */
110:
111: Error_Handler.Write_Debug('Performing trasaction type validity ');
112: -- dbms_output.put_line('Performing trasaction type validity ');
113:
114: EGO_Globals.Transaction_Type_Validity
115: ( p_Entity_Id => EGO_Globals.G_ITEM_CATALOG_GROUP
116: , p_Entity => EGO_Globals.G_ITEM_CATALOG_GROUP
117: , p_transaction_type => EGO_Globals.G_Catalog_Group_Rec.Transaction_Type
118: , x_valid => l_valid
111: Error_Handler.Write_Debug('Performing trasaction type validity ');
112: -- dbms_output.put_line('Performing trasaction type validity ');
113:
114: EGO_Globals.Transaction_Type_Validity
115: ( p_Entity_Id => EGO_Globals.G_ITEM_CATALOG_GROUP
116: , p_Entity => EGO_Globals.G_ITEM_CATALOG_GROUP
117: , p_transaction_type => EGO_Globals.G_Catalog_Group_Rec.Transaction_Type
118: , x_valid => l_valid
119: , x_mesg_token_tbl => l_mesg_token_tbl
112: -- dbms_output.put_line('Performing trasaction type validity ');
113:
114: EGO_Globals.Transaction_Type_Validity
115: ( p_Entity_Id => EGO_Globals.G_ITEM_CATALOG_GROUP
116: , p_Entity => EGO_Globals.G_ITEM_CATALOG_GROUP
117: , p_transaction_type => EGO_Globals.G_Catalog_Group_Rec.Transaction_Type
118: , x_valid => l_valid
119: , x_mesg_token_tbl => l_mesg_token_tbl
120: );
113:
114: EGO_Globals.Transaction_Type_Validity
115: ( p_Entity_Id => EGO_Globals.G_ITEM_CATALOG_GROUP
116: , p_Entity => EGO_Globals.G_ITEM_CATALOG_GROUP
117: , p_transaction_type => EGO_Globals.G_Catalog_Group_Rec.Transaction_Type
118: , x_valid => l_valid
119: , x_mesg_token_tbl => l_mesg_token_tbl
120: );
121:
123: IF l_valid <> true
124: THEN
125: -- quit since the record does not have a valid transaction type.
126: l_return_status := FND_API.G_RET_STS_ERROR;
127: RAISE EGO_Globals.G_EXC_SEV_QUIT_RECORD;
128: END IF;
129:
130:
131: --
142: IF l_return_status = Error_Handler.G_STATUS_ERROR
143: THEN
144: Error_Handler.Write_Debug('Raising exception . . .QUIT_RECORD');
145: -- dbms_output.put_line('Raising exception . . .QUIT_RECORD');
146: RAISE EGO_Globals.G_EXC_SEV_QUIT_RECORD;
147: ELSIF l_return_status = Error_Handler.G_STATUS_UNEXPECTED
148: THEN
149: l_other_message := 'EGO_CATG_UUI_UNEXP_SKIP';
150: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
148: THEN
149: l_other_message := 'EGO_CATG_UUI_UNEXP_SKIP';
150: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
151: l_other_token_tbl(1).token_value :=
152: EGO_Globals.G_Catalog_Group_Rec.catalog_group_name;
153: RAISE EGO_Globals.G_EXC_UNEXP_SKIP_OBJECT;
154: END IF;
155:
156: --
149: l_other_message := 'EGO_CATG_UUI_UNEXP_SKIP';
150: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
151: l_other_token_tbl(1).token_value :=
152: EGO_Globals.G_Catalog_Group_Rec.catalog_group_name;
153: RAISE EGO_Globals.G_EXC_UNEXP_SKIP_OBJECT;
154: END IF;
155:
156: --
157: -- Process Flow step 4.b - User Unique index to Unique Index conversion II
170: );
171:
172: IF l_return_status = Error_Handler.G_STATUS_ERROR
173: THEN
174: RAISE EGO_Globals.G_EXC_SEV_QUIT_RECORD;
175: ELSIF l_return_status = Error_Handler.G_STATUS_UNEXPECTED
176: THEN
177: l_other_message := 'EGO_CATGRP_EXS_UNEXP_SKIP';
178: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
176: THEN
177: l_other_message := 'EGO_CATGRP_EXS_UNEXP_SKIP';
178: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
179: l_other_token_tbl(1).token_value :=
180: Ego_globals.G_Catalog_Group_Rec.Catalog_Group_Name;
181: RAISE EGO_Globals.G_EXC_UNEXP_SKIP_OBJECT;
182: END IF;
183:
184: --
177: l_other_message := 'EGO_CATGRP_EXS_UNEXP_SKIP';
178: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
179: l_other_token_tbl(1).token_value :=
180: Ego_globals.G_Catalog_Group_Rec.Catalog_Group_Name;
181: RAISE EGO_Globals.G_EXC_UNEXP_SKIP_OBJECT;
182: END IF;
183:
184: --
185: -- To support SYNC, copy the transaction type from the old record which will
184: --
185: -- To support SYNC, copy the transaction type from the old record which will
186: -- be set in check existence
187: --
188: IF Ego_Globals.G_Catalog_Group_Rec.transaction_type = 'SYNC'
189: THEN
190: Ego_Globals.G_Catalog_Group_Rec.transaction_type :=
191: Ego_Globals.G_Old_Catalog_Group_Rec.transaction_type;
192: END IF;
186: -- be set in check existence
187: --
188: IF Ego_Globals.G_Catalog_Group_Rec.transaction_type = 'SYNC'
189: THEN
190: Ego_Globals.G_Catalog_Group_Rec.transaction_type :=
191: Ego_Globals.G_Old_Catalog_Group_Rec.transaction_type;
192: END IF;
193:
194: --
187: --
188: IF Ego_Globals.G_Catalog_Group_Rec.transaction_type = 'SYNC'
189: THEN
190: Ego_Globals.G_Catalog_Group_Rec.transaction_type :=
191: Ego_Globals.G_Old_Catalog_Group_Rec.transaction_type;
192: END IF;
193:
194: --
195: -- Process Flow Step 7: Check Lineage not required for Catalog Groups
212: THEN
213: l_other_message := 'EGO_CATGRP_ACC_FAT_FATAL';
214: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
215: l_other_token_tbl(1).token_value :=
216: Ego_Globals.G_Catalog_Group_rec.Catalog_Group_Name;
217: l_return_status := 'F';
218: RAISE EGO_Globals.G_EXC_FAT_QUIT_SIBLINGS;
219: ELSIF l_return_status = Error_Handler.G_STATUS_UNEXPECTED
220: THEN
214: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
215: l_other_token_tbl(1).token_value :=
216: Ego_Globals.G_Catalog_Group_rec.Catalog_Group_Name;
217: l_return_status := 'F';
218: RAISE EGO_Globals.G_EXC_FAT_QUIT_SIBLINGS;
219: ELSIF l_return_status = Error_Handler.G_STATUS_UNEXPECTED
220: THEN
221: l_other_message := 'BOM_CATGRP_ACC_UNEXP_SKIP';
222: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
220: THEN
221: l_other_message := 'BOM_CATGRP_ACC_UNEXP_SKIP';
222: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
223: l_other_token_tbl(1).token_value :=
224: Ego_Globals.G_Catalog_Group_rec.Catalog_Group_Name;
225:
226: RAISE EGO_Globals.G_EXC_UNEXP_SKIP_OBJECT;
227: END IF;
228:
222: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
223: l_other_token_tbl(1).token_value :=
224: Ego_Globals.G_Catalog_Group_rec.Catalog_Group_Name;
225:
226: RAISE EGO_Globals.G_EXC_UNEXP_SKIP_OBJECT;
227: END IF;
228:
229: --
230: -- Process Flow step 9: Check Attributes
229: --
230: -- Process Flow step 9: Check Attributes
231: --
232:
233: IF EGO_Globals.G_Catalog_Group_Rec.transaction_type IN
234: (Ego_Globals.G_OPR_UPDATE, Ego_Globals.G_OPR_CREATE)
235: THEN
236: Error_Handler.Write_Debug('Performing check attributes');
237: -- dbms_output.put_line('Performing check attributes');
230: -- Process Flow step 9: Check Attributes
231: --
232:
233: IF EGO_Globals.G_Catalog_Group_Rec.transaction_type IN
234: (Ego_Globals.G_OPR_UPDATE, Ego_Globals.G_OPR_CREATE)
235: THEN
236: Error_Handler.Write_Debug('Performing check attributes');
237: -- dbms_output.put_line('Performing check attributes');
238: EGO_Validate_Catalog_Group.Check_Attributes
241: );
242:
243: IF l_return_status = Error_Handler.G_STATUS_ERROR
244: THEN
245: RAISE EGO_Globals.G_EXC_SEV_QUIT_RECORD;
246: ELSIF l_return_status = Error_Handler.G_STATUS_UNEXPECTED
247: THEN
248: RAISE EGO_Globals.G_EXC_UNEXP_SKIP_OBJECT;
249: END IF;
244: THEN
245: RAISE EGO_Globals.G_EXC_SEV_QUIT_RECORD;
246: ELSIF l_return_status = Error_Handler.G_STATUS_UNEXPECTED
247: THEN
248: RAISE EGO_Globals.G_EXC_UNEXP_SKIP_OBJECT;
249: END IF;
250:
251: END IF;
252:
254: -- Process Flow step 10: Populate null columns for UPDATE
255: -- OR Perform attribute defaulting for CREATE
256: --
257:
258: IF EGO_Globals.G_Catalog_Group_Rec.transaction_type IN
259: (EGO_Globals.G_OPR_UPDATE, EGO_Globals.G_OPR_DELETE)
260: THEN
261: Error_Handler.Write_Debug('Populate NULL columns . . .');
262:
255: -- OR Perform attribute defaulting for CREATE
256: --
257:
258: IF EGO_Globals.G_Catalog_Group_Rec.transaction_type IN
259: (EGO_Globals.G_OPR_UPDATE, EGO_Globals.G_OPR_DELETE)
260: THEN
261: Error_Handler.Write_Debug('Populate NULL columns . . .');
262:
263: Ego_Default_Catalog_Group.Populate_Null_Columns;
262:
263: Ego_Default_Catalog_Group.Populate_Null_Columns;
264:
265: -- Bug 3324531
266: -- changed the global Bom_Globals.G_OPR_CREATE to EGO_Globals.G_OPR_CREATE
267: ELSIF EGO_Globals.G_Catalog_Group_Rec.transaction_type = EGO_Globals.G_OPR_CREATE
268: THEN
269: Error_Handler.Write_Debug('Attribute Defaulting . . .');
270:
263: Ego_Default_Catalog_Group.Populate_Null_Columns;
264:
265: -- Bug 3324531
266: -- changed the global Bom_Globals.G_OPR_CREATE to EGO_Globals.G_OPR_CREATE
267: ELSIF EGO_Globals.G_Catalog_Group_Rec.transaction_type = EGO_Globals.G_OPR_CREATE
268: THEN
269: Error_Handler.Write_Debug('Attribute Defaulting . . .');
270:
271: Ego_Default_Catalog_Group.Attribute_Defaulting
277: THEN
278: l_other_message := 'EGO_CATGRP_ATTDEF_CSEV_SKIP';
279: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
280: l_other_token_tbl(1).token_value :=
281: EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Name;
282: RAISE EGO_Globals.G_EXC_SEV_SKIP_BRANCH;
283: ELSIF l_return_status = Error_Handler.G_STATUS_UNEXPECTED
284: THEN
285: l_other_message := 'EGO_CATGRP_ATTDEF_UNEXP_SKIP';
278: l_other_message := 'EGO_CATGRP_ATTDEF_CSEV_SKIP';
279: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
280: l_other_token_tbl(1).token_value :=
281: EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Name;
282: RAISE EGO_Globals.G_EXC_SEV_SKIP_BRANCH;
283: ELSIF l_return_status = Error_Handler.G_STATUS_UNEXPECTED
284: THEN
285: l_other_message := 'EGO_CATGRP_ATTDEF_UNEXP_SKIP';
286: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
284: THEN
285: l_other_message := 'EGO_CATGRP_ATTDEF_UNEXP_SKIP';
286: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
287: l_other_token_tbl(1).token_value :=
288: EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Name;
289: RAISE EGO_Globals.G_EXC_UNEXP_SKIP_OBJECT;
290: END IF;
291: END IF;
292:
285: l_other_message := 'EGO_CATGRP_ATTDEF_UNEXP_SKIP';
286: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
287: l_other_token_tbl(1).token_value :=
288: EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Name;
289: RAISE EGO_Globals.G_EXC_UNEXP_SKIP_OBJECT;
290: END IF;
291: END IF;
292:
293: Error_Handler.write_debug('Finished with attribute defaulting . . .');
293: Error_Handler.write_debug('Finished with attribute defaulting . . .');
294: Error_Handler.write_debug('Proceeding with entity validations . . .');
295: -- dbms_output.put_line('Proceeding with entity validations . . .');
296:
297: IF EGO_Globals.G_Catalog_Group_Rec.transaction_type <> EGO_Globals.G_OPR_DELETE
298: THEN
299: Ego_Validate_Catalog_Group.Check_Entity
300: ( x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
301: , x_return_status => l_Return_Status
302: );
303:
304: IF l_return_status = Error_Handler.G_STATUS_ERROR
305: THEN
306: RAISE EGO_Globals.G_EXC_SEV_QUIT_RECORD;
307: ELSIF l_return_status = Error_Handler.G_STATUS_UNEXPECTED
308: THEN
309: l_other_message := 'EGO_CATGRP_ENTVAL_UNEXP_SKIP';
310: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
308: THEN
309: l_other_message := 'EGO_CATGRP_ENTVAL_UNEXP_SKIP';
310: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
311: l_other_token_tbl(1).token_value :=
312: EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Name;
313: RAISE EGO_Globals.G_EXC_UNEXP_SKIP_OBJECT;
314: END IF;
315: ELSIF EGO_Globals.G_Catalog_Group_Rec.transaction_type = EGO_Globals.G_OPR_DELETE
316: THEN
309: l_other_message := 'EGO_CATGRP_ENTVAL_UNEXP_SKIP';
310: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
311: l_other_token_tbl(1).token_value :=
312: EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Name;
313: RAISE EGO_Globals.G_EXC_UNEXP_SKIP_OBJECT;
314: END IF;
315: ELSIF EGO_Globals.G_Catalog_Group_Rec.transaction_type = EGO_Globals.G_OPR_DELETE
316: THEN
317: Ego_Validate_Catalog_Group.Check_Entity_Delete
311: l_other_token_tbl(1).token_value :=
312: EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Name;
313: RAISE EGO_Globals.G_EXC_UNEXP_SKIP_OBJECT;
314: END IF;
315: ELSIF EGO_Globals.G_Catalog_Group_Rec.transaction_type = EGO_Globals.G_OPR_DELETE
316: THEN
317: Ego_Validate_Catalog_Group.Check_Entity_Delete
318: ( x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
319: , x_return_status => l_Return_Status
323:
324: IF l_return_status = Error_Handler.G_STATUS_ERROR
325: THEN
326: -- dbms_output.put_line('Raising exception in delete');
327: RAISE EGO_Globals.G_EXC_SEV_QUIT_RECORD;
328: ELSIF l_return_status = Error_Handler.G_STATUS_UNEXPECTED
329: THEN
330: l_other_message := 'EGO_CATGRP_ENTVAL_UNEXP_SKIP';
331: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
329: THEN
330: l_other_message := 'EGO_CATGRP_ENTVAL_UNEXP_SKIP';
331: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
332: l_other_token_tbl(1).token_value :=
333: EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Name;
334: RAISE EGO_Globals.G_EXC_UNEXP_SKIP_OBJECT;
335: END IF;
336:
337: END IF ;
330: l_other_message := 'EGO_CATGRP_ENTVAL_UNEXP_SKIP';
331: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
332: l_other_token_tbl(1).token_value :=
333: EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Name;
334: RAISE EGO_Globals.G_EXC_UNEXP_SKIP_OBJECT;
335: END IF;
336:
337: END IF ;
338:
350: );
351:
352: IF l_return_status = Error_Handler.G_STATUS_ERROR
353: THEN
354: RAISE EGO_Globals.G_EXC_SEV_QUIT_RECORD;
355: ELSIF l_return_status = Error_Handler.G_STATUS_UNEXPECTED
356: THEN
357: l_other_message := 'EGO_CATGRP_ENTVAL_UNEXP_SKIP';
358: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
356: THEN
357: l_other_message := 'EGO_CATGRP_ENTVAL_UNEXP_SKIP';
358: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
359: l_other_token_tbl(1).token_value :=
360: EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Name;
361: RAISE EGO_Globals.G_EXC_UNEXP_SKIP_OBJECT;
362: END IF;
363:
364: -- return the record back to the table after processing
357: l_other_message := 'EGO_CATGRP_ENTVAL_UNEXP_SKIP';
358: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
359: l_other_token_tbl(1).token_value :=
360: EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Name;
361: RAISE EGO_Globals.G_EXC_UNEXP_SKIP_OBJECT;
362: END IF;
363:
364: -- return the record back to the table after processing
365:
362: END IF;
363:
364: -- return the record back to the table after processing
365:
366: EGO_Globals.G_Catalog_Group_Tbl(l_Table_Index) := EGO_Globals.G_Catalog_Group_Rec;
367:
368: x_return_status := l_bo_return_status;
369:
370: Error_Handler.Write_Debug('Process Completed');
369:
370: Error_Handler.Write_Debug('Process Completed');
371:
372: EXCEPTION
373: WHEN EGO_Globals.G_EXC_SEV_QUIT_RECORD THEN
374: Error_Handler.Write_Debug('Handling exception G_EXC_SEV_QUIT_RECORD');
375: -- dbms_output.put_line('Handling exception G_EXC_SEV_QUIT_RECORD');
376: EGO_Catalog_Group_Err_Handler.Log_Error
377: ( p_mesg_token_tbl => l_mesg_token_tbl
376: EGO_Catalog_Group_Err_Handler.Log_Error
377: ( p_mesg_token_tbl => l_mesg_token_tbl
378: , p_error_status => Error_Handler.G_STATUS_ERROR
379: , p_error_scope => Error_Handler.G_SCOPE_RECORD
380: , p_error_level => EGO_Globals.G_ITEM_CATALOG_GROUP_LEVEL
381: , p_entity_index => l_Table_Index
382: );
383:
384: IF l_bo_return_status = 'S'
387: END IF;
388:
389: x_return_status := l_bo_return_status;
390:
391: WHEN EGO_Globals.G_EXC_SEV_QUIT_BRANCH THEN
392: EGO_Catalog_Group_Err_Handler.Log_Error
393: ( p_mesg_token_tbl => l_mesg_token_tbl
394: , p_error_status => Error_Handler.G_STATUS_ERROR
395: , p_error_scope => Error_Handler.G_SCOPE_CHILDREN
392: EGO_Catalog_Group_Err_Handler.Log_Error
393: ( p_mesg_token_tbl => l_mesg_token_tbl
394: , p_error_status => Error_Handler.G_STATUS_ERROR
395: , p_error_scope => Error_Handler.G_SCOPE_CHILDREN
396: , p_error_level => EGO_Globals.G_ITEM_CATALOG_GROUP_LEVEL
397: , p_entity_index => l_Table_Index
398: );
399:
400: IF l_bo_return_status = 'S'
403: END IF;
404:
405: x_return_status := l_bo_return_status;
406:
407: WHEN EGO_Globals.G_EXC_SEV_QUIT_SIBLINGS THEN
408: EGO_Catalog_Group_Err_Handler.Log_Error
409: ( p_mesg_token_tbl => l_mesg_token_tbl
410: , p_error_status => Error_Handler.G_STATUS_ERROR
411: , p_error_scope => Error_Handler.G_SCOPE_SIBLINGS
408: EGO_Catalog_Group_Err_Handler.Log_Error
409: ( p_mesg_token_tbl => l_mesg_token_tbl
410: , p_error_status => Error_Handler.G_STATUS_ERROR
411: , p_error_scope => Error_Handler.G_SCOPE_SIBLINGS
412: , p_error_level => EGO_Globals.G_ITEM_CATALOG_GROUP_LEVEL
413: , p_entity_index => l_Table_Index
414: );
415:
416: IF l_bo_return_status = 'S'
419: END IF;
420:
421: x_return_status := l_bo_return_status;
422:
423: WHEN EGO_Globals.G_EXC_FAT_QUIT_SIBLINGS THEN
424: EGO_Catalog_Group_Err_Handler.Log_Error
425: ( p_mesg_token_tbl => l_mesg_token_tbl
426: , p_error_status => Error_Handler.G_STATUS_FATAL
427: , p_error_scope => Error_Handler.G_SCOPE_SIBLINGS
424: EGO_Catalog_Group_Err_Handler.Log_Error
425: ( p_mesg_token_tbl => l_mesg_token_tbl
426: , p_error_status => Error_Handler.G_STATUS_FATAL
427: , p_error_scope => Error_Handler.G_SCOPE_SIBLINGS
428: , p_error_level => EGO_Globals.G_ITEM_CATALOG_GROUP_LEVEL
429: , p_entity_index => l_Table_Index
430: );
431:
432: IF l_bo_return_status = 'S'
435: END IF;
436:
437: x_return_status := l_bo_return_status;
438:
439: WHEN EGO_Globals.G_EXC_FAT_QUIT_OBJECT THEN
440: EGO_Catalog_Group_Err_Handler.Log_Error
441: ( p_mesg_token_tbl => l_mesg_token_tbl
442: , p_error_status => Error_Handler.G_STATUS_FATAL
443: , p_error_scope => Error_Handler.G_SCOPE_ALL
440: EGO_Catalog_Group_Err_Handler.Log_Error
441: ( p_mesg_token_tbl => l_mesg_token_tbl
442: , p_error_status => Error_Handler.G_STATUS_FATAL
443: , p_error_scope => Error_Handler.G_SCOPE_ALL
444: , p_error_level => EGO_Globals.G_ITEM_CATALOG_GROUP_LEVEL
445: , p_entity_index => l_Table_Index
446: );
447:
448: IF l_bo_return_status = 'S'
451: END IF;
452:
453: x_return_status := l_bo_return_status;
454:
455: WHEN EGO_Globals.G_EXC_UNEXP_SKIP_OBJECT THEN
456: EGO_Catalog_Group_Err_Handler.Log_Error
457: ( p_mesg_token_tbl => l_mesg_token_tbl
458: , p_error_status => Error_Handler.G_STATUS_UNEXPECTED
459: , p_other_status => Error_Handler.G_STATUS_NOT_PICKED
459: , p_other_status => Error_Handler.G_STATUS_NOT_PICKED
460: , p_other_message => l_other_message
461: , p_other_token_tbl => l_other_token_tbl
462: , p_error_scope => Error_Handler.G_SCOPE_ALL
463: , p_error_level => EGO_Globals.G_ITEM_CATALOG_GROUP_LEVEL
464: , p_entity_index => l_Table_Index
465: );
466:
467: IF l_bo_return_status = 'S'