134: --
135:
136: -- Every catalog group record is a business object.
137:
138: -- dbms_output.Put_Line('Records to Process: ' || EGO_Globals.G_Catalog_Group_Tbl.COUNT);
139:
140: FOR l_Table_Index IN 1..EGO_Globals.G_Catalog_Group_Tbl.COUNT
141: LOOP
142: BEGIN
136: -- Every catalog group record is a business object.
137:
138: -- dbms_output.Put_Line('Records to Process: ' || EGO_Globals.G_Catalog_Group_Tbl.COUNT);
139:
140: FOR l_Table_Index IN 1..EGO_Globals.G_Catalog_Group_Tbl.COUNT
141: LOOP
142: BEGIN
143:
144: l_return_status := 'S';
142: BEGIN
143:
144: l_return_status := 'S';
145:
146: EGO_Globals.G_Catalog_Group_Rec := EGO_Globals.G_Catalog_Group_Tbl(l_Table_Index);
147:
148: /*
149: -- CHECHAND - changes for pim for telco - bug # 8471604 - START
150:
147:
148: /*
149: -- CHECHAND - changes for pim for telco - bug # 8471604 - START
150:
151: if profile_value = 'Y' AND EGO_Globals.G_Catalog_Group_Rec.transaction_type = Ego_Globals.G_OPR_UPDATE THEN
152: SELECT Count(*) INTO version_count FROM EGO_MTL_CATALOG_GRP_VERS_B
153: WHERE
154: item_catalog_group_id = (SELECT item_catalog_group_id FROM mtl_item_catalog_groups_b WHERE segment1=EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Name)
155: AND version_seq_id>0;
150:
151: if profile_value = 'Y' AND EGO_Globals.G_Catalog_Group_Rec.transaction_type = Ego_Globals.G_OPR_UPDATE THEN
152: SELECT Count(*) INTO version_count FROM EGO_MTL_CATALOG_GRP_VERS_B
153: WHERE
154: item_catalog_group_id = (SELECT item_catalog_group_id FROM mtl_item_catalog_groups_b WHERE segment1=EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Name)
155: AND version_seq_id>0;
156: --dbms_output.put_line('Processing catalog group id: '||EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Name ||' version count: ' || version_count);
157: if VERSION_COUNT <> 0 THEN
158: x_return_status := 'U';
152: SELECT Count(*) INTO version_count FROM EGO_MTL_CATALOG_GRP_VERS_B
153: WHERE
154: item_catalog_group_id = (SELECT item_catalog_group_id FROM mtl_item_catalog_groups_b WHERE segment1=EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Name)
155: AND version_seq_id>0;
156: --dbms_output.put_line('Processing catalog group id: '||EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Name ||' version count: ' || version_count);
157: if VERSION_COUNT <> 0 THEN
158: x_return_status := 'U';
159: RETURN;
160: END IF;
172: -- Bug 12394675. Issue #3. Check the condition only if parent is actually getting updated.
173: -- sreharih. Mon Apr 25 16:27:38 PDT 2011.
174: --
175:
176: IF EGO_Globals.G_Catalog_Group_Rec.transaction_type = Ego_Globals.G_OPR_UPDATE THEN
177:
178: IF (EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Name IS NOT NULL OR
179: EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Name <> FND_API.G_MISS_CHAR) OR
180: (EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Id IS NOT NULL OR
174: --
175:
176: IF EGO_Globals.G_Catalog_Group_Rec.transaction_type = Ego_Globals.G_OPR_UPDATE THEN
177:
178: IF (EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Name IS NOT NULL OR
179: EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Name <> FND_API.G_MISS_CHAR) OR
180: (EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Id IS NOT NULL OR
181: EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Id <> FND_API.G_MISS_NUM) THEN
182:
175:
176: IF EGO_Globals.G_Catalog_Group_Rec.transaction_type = Ego_Globals.G_OPR_UPDATE THEN
177:
178: IF (EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Name IS NOT NULL OR
179: EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Name <> FND_API.G_MISS_CHAR) OR
180: (EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Id IS NOT NULL OR
181: EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Id <> FND_API.G_MISS_NUM) THEN
182:
183: IF is_parent_updated (p_catalog_group_id => EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Id,
176: IF EGO_Globals.G_Catalog_Group_Rec.transaction_type = Ego_Globals.G_OPR_UPDATE THEN
177:
178: IF (EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Name IS NOT NULL OR
179: EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Name <> FND_API.G_MISS_CHAR) OR
180: (EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Id IS NOT NULL OR
181: EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Id <> FND_API.G_MISS_NUM) THEN
182:
183: IF is_parent_updated (p_catalog_group_id => EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Id,
184: p_parent_group_id => EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Id,
177:
178: IF (EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Name IS NOT NULL OR
179: EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Name <> FND_API.G_MISS_CHAR) OR
180: (EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Id IS NOT NULL OR
181: EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Id <> FND_API.G_MISS_NUM) THEN
182:
183: IF is_parent_updated (p_catalog_group_id => EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Id,
184: p_parent_group_id => EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Id,
185: p_parent_group_name => EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Name) THEN
179: EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Name <> FND_API.G_MISS_CHAR) OR
180: (EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Id IS NOT NULL OR
181: EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Id <> FND_API.G_MISS_NUM) THEN
182:
183: IF is_parent_updated (p_catalog_group_id => EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Id,
184: p_parent_group_id => EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Id,
185: p_parent_group_name => EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Name) THEN
186:
187: IF (NOT is_parent_update_allowed(EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Id)) THEN
180: (EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Id IS NOT NULL OR
181: EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Id <> FND_API.G_MISS_NUM) THEN
182:
183: IF is_parent_updated (p_catalog_group_id => EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Id,
184: p_parent_group_id => EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Id,
185: p_parent_group_name => EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Name) THEN
186:
187: IF (NOT is_parent_update_allowed(EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Id)) THEN
188:
181: EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Id <> FND_API.G_MISS_NUM) THEN
182:
183: IF is_parent_updated (p_catalog_group_id => EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Id,
184: p_parent_group_id => EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Id,
185: p_parent_group_name => EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Name) THEN
186:
187: IF (NOT is_parent_update_allowed(EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Id)) THEN
188:
189: l_return_status := FND_API.G_RET_STS_ERROR;
183: IF is_parent_updated (p_catalog_group_id => EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Id,
184: p_parent_group_id => EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Id,
185: p_parent_group_name => EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Name) THEN
186:
187: IF (NOT is_parent_update_allowed(EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Id)) THEN
188:
189: l_return_status := FND_API.G_RET_STS_ERROR;
190: Error_Handler.Write_Debug('Raising exception as parent update is not allowed. . .QUIT_RECORD');
191: l_other_message := 'EGO_ICC_DIS_UPD';
188:
189: l_return_status := FND_API.G_RET_STS_ERROR;
190: Error_Handler.Write_Debug('Raising exception as parent update is not allowed. . .QUIT_RECORD');
191: l_other_message := 'EGO_ICC_DIS_UPD';
192: RAISE EGO_Globals.G_EXC_SEV_QUIT_RECORD;
193:
194: END IF; -- parent update allowed
195:
196: END IF; -- parent updated
199:
200: END IF; -- update
201:
202: EGO_Item_Catalog_Pub.G_KF_Segment_Values(1) :=
203: EGO_Globals.G_Catalog_Group_Rec.Segment1;
204: EGO_Item_Catalog_Pub.G_KF_Segment_Values(2) :=
205: EGO_Globals.G_Catalog_Group_Rec.Segment2;
206: EGO_Item_Catalog_Pub.G_KF_Segment_Values(3) :=
207: EGO_Globals.G_Catalog_Group_Rec.Segment3;
201:
202: EGO_Item_Catalog_Pub.G_KF_Segment_Values(1) :=
203: EGO_Globals.G_Catalog_Group_Rec.Segment1;
204: EGO_Item_Catalog_Pub.G_KF_Segment_Values(2) :=
205: EGO_Globals.G_Catalog_Group_Rec.Segment2;
206: EGO_Item_Catalog_Pub.G_KF_Segment_Values(3) :=
207: EGO_Globals.G_Catalog_Group_Rec.Segment3;
208: EGO_Item_Catalog_Pub.G_KF_Segment_Values(4) :=
209: EGO_Globals.G_Catalog_Group_Rec.Segment4;
203: EGO_Globals.G_Catalog_Group_Rec.Segment1;
204: EGO_Item_Catalog_Pub.G_KF_Segment_Values(2) :=
205: EGO_Globals.G_Catalog_Group_Rec.Segment2;
206: EGO_Item_Catalog_Pub.G_KF_Segment_Values(3) :=
207: EGO_Globals.G_Catalog_Group_Rec.Segment3;
208: EGO_Item_Catalog_Pub.G_KF_Segment_Values(4) :=
209: EGO_Globals.G_Catalog_Group_Rec.Segment4;
210: EGO_Item_Catalog_Pub.G_KF_Segment_Values(5) :=
211: EGO_Globals.G_Catalog_Group_Rec.Segment5;
205: EGO_Globals.G_Catalog_Group_Rec.Segment2;
206: EGO_Item_Catalog_Pub.G_KF_Segment_Values(3) :=
207: EGO_Globals.G_Catalog_Group_Rec.Segment3;
208: EGO_Item_Catalog_Pub.G_KF_Segment_Values(4) :=
209: EGO_Globals.G_Catalog_Group_Rec.Segment4;
210: EGO_Item_Catalog_Pub.G_KF_Segment_Values(5) :=
211: EGO_Globals.G_Catalog_Group_Rec.Segment5;
212: EGO_Item_Catalog_Pub.G_KF_Segment_Values(6) :=
213: EGO_Globals.G_Catalog_Group_Rec.Segment6;
207: EGO_Globals.G_Catalog_Group_Rec.Segment3;
208: EGO_Item_Catalog_Pub.G_KF_Segment_Values(4) :=
209: EGO_Globals.G_Catalog_Group_Rec.Segment4;
210: EGO_Item_Catalog_Pub.G_KF_Segment_Values(5) :=
211: EGO_Globals.G_Catalog_Group_Rec.Segment5;
212: EGO_Item_Catalog_Pub.G_KF_Segment_Values(6) :=
213: EGO_Globals.G_Catalog_Group_Rec.Segment6;
214: EGO_Item_Catalog_Pub.G_KF_Segment_Values(7) :=
215: EGO_Globals.G_Catalog_Group_Rec.Segment7;
209: EGO_Globals.G_Catalog_Group_Rec.Segment4;
210: EGO_Item_Catalog_Pub.G_KF_Segment_Values(5) :=
211: EGO_Globals.G_Catalog_Group_Rec.Segment5;
212: EGO_Item_Catalog_Pub.G_KF_Segment_Values(6) :=
213: EGO_Globals.G_Catalog_Group_Rec.Segment6;
214: EGO_Item_Catalog_Pub.G_KF_Segment_Values(7) :=
215: EGO_Globals.G_Catalog_Group_Rec.Segment7;
216: EGO_Item_Catalog_Pub.G_KF_Segment_Values(8) :=
217: EGO_Globals.G_Catalog_Group_Rec.Segment8;
211: EGO_Globals.G_Catalog_Group_Rec.Segment5;
212: EGO_Item_Catalog_Pub.G_KF_Segment_Values(6) :=
213: EGO_Globals.G_Catalog_Group_Rec.Segment6;
214: EGO_Item_Catalog_Pub.G_KF_Segment_Values(7) :=
215: EGO_Globals.G_Catalog_Group_Rec.Segment7;
216: EGO_Item_Catalog_Pub.G_KF_Segment_Values(8) :=
217: EGO_Globals.G_Catalog_Group_Rec.Segment8;
218: EGO_Item_Catalog_Pub.G_KF_Segment_Values(9) :=
219: EGO_Globals.G_Catalog_Group_Rec.Segment9;
213: EGO_Globals.G_Catalog_Group_Rec.Segment6;
214: EGO_Item_Catalog_Pub.G_KF_Segment_Values(7) :=
215: EGO_Globals.G_Catalog_Group_Rec.Segment7;
216: EGO_Item_Catalog_Pub.G_KF_Segment_Values(8) :=
217: EGO_Globals.G_Catalog_Group_Rec.Segment8;
218: EGO_Item_Catalog_Pub.G_KF_Segment_Values(9) :=
219: EGO_Globals.G_Catalog_Group_Rec.Segment9;
220: EGO_Item_Catalog_Pub.G_KF_Segment_Values(10) :=
221: EGO_Globals.G_Catalog_Group_Rec.Segment10;
215: EGO_Globals.G_Catalog_Group_Rec.Segment7;
216: EGO_Item_Catalog_Pub.G_KF_Segment_Values(8) :=
217: EGO_Globals.G_Catalog_Group_Rec.Segment8;
218: EGO_Item_Catalog_Pub.G_KF_Segment_Values(9) :=
219: EGO_Globals.G_Catalog_Group_Rec.Segment9;
220: EGO_Item_Catalog_Pub.G_KF_Segment_Values(10) :=
221: EGO_Globals.G_Catalog_Group_Rec.Segment10;
222: EGO_Item_Catalog_Pub.G_KF_Segment_Values(11) :=
223: EGO_Globals.G_Catalog_Group_Rec.Segment11;
217: EGO_Globals.G_Catalog_Group_Rec.Segment8;
218: EGO_Item_Catalog_Pub.G_KF_Segment_Values(9) :=
219: EGO_Globals.G_Catalog_Group_Rec.Segment9;
220: EGO_Item_Catalog_Pub.G_KF_Segment_Values(10) :=
221: EGO_Globals.G_Catalog_Group_Rec.Segment10;
222: EGO_Item_Catalog_Pub.G_KF_Segment_Values(11) :=
223: EGO_Globals.G_Catalog_Group_Rec.Segment11;
224: EGO_Item_Catalog_Pub.G_KF_Segment_Values(12) :=
225: EGO_Globals.G_Catalog_Group_Rec.Segment12;
219: EGO_Globals.G_Catalog_Group_Rec.Segment9;
220: EGO_Item_Catalog_Pub.G_KF_Segment_Values(10) :=
221: EGO_Globals.G_Catalog_Group_Rec.Segment10;
222: EGO_Item_Catalog_Pub.G_KF_Segment_Values(11) :=
223: EGO_Globals.G_Catalog_Group_Rec.Segment11;
224: EGO_Item_Catalog_Pub.G_KF_Segment_Values(12) :=
225: EGO_Globals.G_Catalog_Group_Rec.Segment12;
226: EGO_Item_Catalog_Pub.G_KF_Segment_Values(13) :=
227: EGO_Globals.G_Catalog_Group_Rec.Segment13;
221: EGO_Globals.G_Catalog_Group_Rec.Segment10;
222: EGO_Item_Catalog_Pub.G_KF_Segment_Values(11) :=
223: EGO_Globals.G_Catalog_Group_Rec.Segment11;
224: EGO_Item_Catalog_Pub.G_KF_Segment_Values(12) :=
225: EGO_Globals.G_Catalog_Group_Rec.Segment12;
226: EGO_Item_Catalog_Pub.G_KF_Segment_Values(13) :=
227: EGO_Globals.G_Catalog_Group_Rec.Segment13;
228: EGO_Item_Catalog_Pub.G_KF_Segment_Values(14) :=
229: EGO_Globals.G_Catalog_Group_Rec.Segment14;
223: EGO_Globals.G_Catalog_Group_Rec.Segment11;
224: EGO_Item_Catalog_Pub.G_KF_Segment_Values(12) :=
225: EGO_Globals.G_Catalog_Group_Rec.Segment12;
226: EGO_Item_Catalog_Pub.G_KF_Segment_Values(13) :=
227: EGO_Globals.G_Catalog_Group_Rec.Segment13;
228: EGO_Item_Catalog_Pub.G_KF_Segment_Values(14) :=
229: EGO_Globals.G_Catalog_Group_Rec.Segment14;
230: EGO_Item_Catalog_Pub.G_KF_Segment_Values(15) :=
231: EGO_Globals.G_Catalog_Group_Rec.Segment15;
225: EGO_Globals.G_Catalog_Group_Rec.Segment12;
226: EGO_Item_Catalog_Pub.G_KF_Segment_Values(13) :=
227: EGO_Globals.G_Catalog_Group_Rec.Segment13;
228: EGO_Item_Catalog_Pub.G_KF_Segment_Values(14) :=
229: EGO_Globals.G_Catalog_Group_Rec.Segment14;
230: EGO_Item_Catalog_Pub.G_KF_Segment_Values(15) :=
231: EGO_Globals.G_Catalog_Group_Rec.Segment15;
232: EGO_Item_Catalog_Pub.G_KF_Segment_Values(16) :=
233: EGO_Globals.G_Catalog_Group_Rec.Segment16;
227: EGO_Globals.G_Catalog_Group_Rec.Segment13;
228: EGO_Item_Catalog_Pub.G_KF_Segment_Values(14) :=
229: EGO_Globals.G_Catalog_Group_Rec.Segment14;
230: EGO_Item_Catalog_Pub.G_KF_Segment_Values(15) :=
231: EGO_Globals.G_Catalog_Group_Rec.Segment15;
232: EGO_Item_Catalog_Pub.G_KF_Segment_Values(16) :=
233: EGO_Globals.G_Catalog_Group_Rec.Segment16;
234: EGO_Item_Catalog_Pub.G_KF_Segment_Values(17) :=
235: EGO_Globals.G_Catalog_Group_Rec.Segment17;
229: EGO_Globals.G_Catalog_Group_Rec.Segment14;
230: EGO_Item_Catalog_Pub.G_KF_Segment_Values(15) :=
231: EGO_Globals.G_Catalog_Group_Rec.Segment15;
232: EGO_Item_Catalog_Pub.G_KF_Segment_Values(16) :=
233: EGO_Globals.G_Catalog_Group_Rec.Segment16;
234: EGO_Item_Catalog_Pub.G_KF_Segment_Values(17) :=
235: EGO_Globals.G_Catalog_Group_Rec.Segment17;
236: EGO_Item_Catalog_Pub.G_KF_Segment_Values(18) :=
237: EGO_Globals.G_Catalog_Group_Rec.Segment18;
231: EGO_Globals.G_Catalog_Group_Rec.Segment15;
232: EGO_Item_Catalog_Pub.G_KF_Segment_Values(16) :=
233: EGO_Globals.G_Catalog_Group_Rec.Segment16;
234: EGO_Item_Catalog_Pub.G_KF_Segment_Values(17) :=
235: EGO_Globals.G_Catalog_Group_Rec.Segment17;
236: EGO_Item_Catalog_Pub.G_KF_Segment_Values(18) :=
237: EGO_Globals.G_Catalog_Group_Rec.Segment18;
238: EGO_Item_Catalog_Pub.G_KF_Segment_Values(19) :=
239: EGO_Globals.G_Catalog_Group_Rec.Segment19;
233: EGO_Globals.G_Catalog_Group_Rec.Segment16;
234: EGO_Item_Catalog_Pub.G_KF_Segment_Values(17) :=
235: EGO_Globals.G_Catalog_Group_Rec.Segment17;
236: EGO_Item_Catalog_Pub.G_KF_Segment_Values(18) :=
237: EGO_Globals.G_Catalog_Group_Rec.Segment18;
238: EGO_Item_Catalog_Pub.G_KF_Segment_Values(19) :=
239: EGO_Globals.G_Catalog_Group_Rec.Segment19;
240: EGO_Item_Catalog_Pub.G_KF_Segment_Values(20) :=
241: EGO_Globals.G_Catalog_Group_Rec.Segment20;
235: EGO_Globals.G_Catalog_Group_Rec.Segment17;
236: EGO_Item_Catalog_Pub.G_KF_Segment_Values(18) :=
237: EGO_Globals.G_Catalog_Group_Rec.Segment18;
238: EGO_Item_Catalog_Pub.G_KF_Segment_Values(19) :=
239: EGO_Globals.G_Catalog_Group_Rec.Segment19;
240: EGO_Item_Catalog_Pub.G_KF_Segment_Values(20) :=
241: EGO_Globals.G_Catalog_Group_Rec.Segment20;
242:
243:
237: EGO_Globals.G_Catalog_Group_Rec.Segment18;
238: EGO_Item_Catalog_Pub.G_KF_Segment_Values(19) :=
239: EGO_Globals.G_Catalog_Group_Rec.Segment19;
240: EGO_Item_Catalog_Pub.G_KF_Segment_Values(20) :=
241: EGO_Globals.G_Catalog_Group_Rec.Segment20;
242:
243:
244:
245: /* Assign null to the segments that are not used */
258:
259: Error_Handler.Write_Debug('Performing trasaction type validity ');
260: -- dbms_output.put_line('Performing trasaction type validity ');
261:
262: EGO_Globals.Transaction_Type_Validity
263: ( p_Entity_Id => EGO_Globals.G_ITEM_CATALOG_GROUP
264: , p_Entity => EGO_Globals.G_ITEM_CATALOG_GROUP
265: , p_transaction_type => EGO_Globals.G_Catalog_Group_Rec.Transaction_Type
266: , x_valid => l_valid
259: Error_Handler.Write_Debug('Performing trasaction type validity ');
260: -- dbms_output.put_line('Performing trasaction type validity ');
261:
262: EGO_Globals.Transaction_Type_Validity
263: ( p_Entity_Id => EGO_Globals.G_ITEM_CATALOG_GROUP
264: , p_Entity => EGO_Globals.G_ITEM_CATALOG_GROUP
265: , p_transaction_type => EGO_Globals.G_Catalog_Group_Rec.Transaction_Type
266: , x_valid => l_valid
267: , x_mesg_token_tbl => l_mesg_token_tbl
260: -- dbms_output.put_line('Performing trasaction type validity ');
261:
262: EGO_Globals.Transaction_Type_Validity
263: ( p_Entity_Id => EGO_Globals.G_ITEM_CATALOG_GROUP
264: , p_Entity => EGO_Globals.G_ITEM_CATALOG_GROUP
265: , p_transaction_type => EGO_Globals.G_Catalog_Group_Rec.Transaction_Type
266: , x_valid => l_valid
267: , x_mesg_token_tbl => l_mesg_token_tbl
268: );
261:
262: EGO_Globals.Transaction_Type_Validity
263: ( p_Entity_Id => EGO_Globals.G_ITEM_CATALOG_GROUP
264: , p_Entity => EGO_Globals.G_ITEM_CATALOG_GROUP
265: , p_transaction_type => EGO_Globals.G_Catalog_Group_Rec.Transaction_Type
266: , x_valid => l_valid
267: , x_mesg_token_tbl => l_mesg_token_tbl
268: );
269:
271: IF l_valid <> true
272: THEN
273: -- quit since the record does not have a valid transaction type.
274: l_return_status := FND_API.G_RET_STS_ERROR;
275: RAISE EGO_Globals.G_EXC_SEV_QUIT_RECORD;
276: END IF;
277:
278:
279: --
290: IF l_return_status = Error_Handler.G_STATUS_ERROR
291: THEN
292: Error_Handler.Write_Debug('Raising exception . . .QUIT_RECORD');
293: -- dbms_output.put_line('Raising exception . . .QUIT_RECORD');
294: RAISE EGO_Globals.G_EXC_SEV_QUIT_RECORD;
295: ELSIF l_return_status = Error_Handler.G_STATUS_UNEXPECTED
296: THEN
297: l_other_message := 'EGO_CATG_UUI_UNEXP_SKIP';
298: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
296: THEN
297: l_other_message := 'EGO_CATG_UUI_UNEXP_SKIP';
298: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
299: l_other_token_tbl(1).token_value :=
300: EGO_Globals.G_Catalog_Group_Rec.catalog_group_name;
301: RAISE EGO_Globals.G_EXC_UNEXP_SKIP_OBJECT;
302: END IF;
303:
304: --
297: l_other_message := 'EGO_CATG_UUI_UNEXP_SKIP';
298: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
299: l_other_token_tbl(1).token_value :=
300: EGO_Globals.G_Catalog_Group_Rec.catalog_group_name;
301: RAISE EGO_Globals.G_EXC_UNEXP_SKIP_OBJECT;
302: END IF;
303:
304: --
305: -- Process Flow step 4.b - User Unique index to Unique Index conversion II
318: );
319:
320: IF l_return_status = Error_Handler.G_STATUS_ERROR
321: THEN
322: RAISE EGO_Globals.G_EXC_SEV_QUIT_RECORD;
323: ELSIF l_return_status = Error_Handler.G_STATUS_UNEXPECTED
324: THEN
325: l_other_message := 'EGO_CATGRP_EXS_UNEXP_SKIP';
326: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
324: THEN
325: l_other_message := 'EGO_CATGRP_EXS_UNEXP_SKIP';
326: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
327: l_other_token_tbl(1).token_value :=
328: Ego_globals.G_Catalog_Group_Rec.Catalog_Group_Name;
329: RAISE EGO_Globals.G_EXC_UNEXP_SKIP_OBJECT;
330: END IF;
331:
332: --
325: l_other_message := 'EGO_CATGRP_EXS_UNEXP_SKIP';
326: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
327: l_other_token_tbl(1).token_value :=
328: Ego_globals.G_Catalog_Group_Rec.Catalog_Group_Name;
329: RAISE EGO_Globals.G_EXC_UNEXP_SKIP_OBJECT;
330: END IF;
331:
332: --
333: -- To support SYNC, copy the transaction type from the old record which will
332: --
333: -- To support SYNC, copy the transaction type from the old record which will
334: -- be set in check existence
335: --
336: IF Ego_Globals.G_Catalog_Group_Rec.transaction_type = 'SYNC'
337: THEN
338: Ego_Globals.G_Catalog_Group_Rec.transaction_type :=
339: Ego_Globals.G_Old_Catalog_Group_Rec.transaction_type;
340: END IF;
334: -- be set in check existence
335: --
336: IF Ego_Globals.G_Catalog_Group_Rec.transaction_type = 'SYNC'
337: THEN
338: Ego_Globals.G_Catalog_Group_Rec.transaction_type :=
339: Ego_Globals.G_Old_Catalog_Group_Rec.transaction_type;
340: END IF;
341:
342: --
335: --
336: IF Ego_Globals.G_Catalog_Group_Rec.transaction_type = 'SYNC'
337: THEN
338: Ego_Globals.G_Catalog_Group_Rec.transaction_type :=
339: Ego_Globals.G_Old_Catalog_Group_Rec.transaction_type;
340: END IF;
341:
342: --
343: -- Process Flow Step 7: Check Lineage not required for Catalog Groups
360: THEN
361: l_other_message := 'EGO_CATGRP_ACC_FAT_FATAL';
362: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
363: l_other_token_tbl(1).token_value :=
364: Ego_Globals.G_Catalog_Group_rec.Catalog_Group_Name;
365: l_return_status := 'F';
366: RAISE EGO_Globals.G_EXC_FAT_QUIT_SIBLINGS;
367: ELSIF l_return_status = Error_Handler.G_STATUS_UNEXPECTED
368: THEN
362: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
363: l_other_token_tbl(1).token_value :=
364: Ego_Globals.G_Catalog_Group_rec.Catalog_Group_Name;
365: l_return_status := 'F';
366: RAISE EGO_Globals.G_EXC_FAT_QUIT_SIBLINGS;
367: ELSIF l_return_status = Error_Handler.G_STATUS_UNEXPECTED
368: THEN
369: l_other_message := 'BOM_CATGRP_ACC_UNEXP_SKIP';
370: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
368: THEN
369: l_other_message := 'BOM_CATGRP_ACC_UNEXP_SKIP';
370: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
371: l_other_token_tbl(1).token_value :=
372: Ego_Globals.G_Catalog_Group_rec.Catalog_Group_Name;
373:
374: RAISE EGO_Globals.G_EXC_UNEXP_SKIP_OBJECT;
375: END IF;
376:
370: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
371: l_other_token_tbl(1).token_value :=
372: Ego_Globals.G_Catalog_Group_rec.Catalog_Group_Name;
373:
374: RAISE EGO_Globals.G_EXC_UNEXP_SKIP_OBJECT;
375: END IF;
376:
377: --
378: -- Process Flow step 9: Check Attributes
377: --
378: -- Process Flow step 9: Check Attributes
379: --
380:
381: IF EGO_Globals.G_Catalog_Group_Rec.transaction_type IN
382: (Ego_Globals.G_OPR_UPDATE, Ego_Globals.G_OPR_CREATE)
383: THEN
384: Error_Handler.Write_Debug('Performing check attributes');
385: -- dbms_output.put_line('Performing check attributes');
378: -- Process Flow step 9: Check Attributes
379: --
380:
381: IF EGO_Globals.G_Catalog_Group_Rec.transaction_type IN
382: (Ego_Globals.G_OPR_UPDATE, Ego_Globals.G_OPR_CREATE)
383: THEN
384: Error_Handler.Write_Debug('Performing check attributes');
385: -- dbms_output.put_line('Performing check attributes');
386: EGO_Validate_Catalog_Group.Check_Attributes
389: );
390:
391: IF l_return_status = Error_Handler.G_STATUS_ERROR
392: THEN
393: RAISE EGO_Globals.G_EXC_SEV_QUIT_RECORD;
394: ELSIF l_return_status = Error_Handler.G_STATUS_UNEXPECTED
395: THEN
396: RAISE EGO_Globals.G_EXC_UNEXP_SKIP_OBJECT;
397: END IF;
392: THEN
393: RAISE EGO_Globals.G_EXC_SEV_QUIT_RECORD;
394: ELSIF l_return_status = Error_Handler.G_STATUS_UNEXPECTED
395: THEN
396: RAISE EGO_Globals.G_EXC_UNEXP_SKIP_OBJECT;
397: END IF;
398:
399: END IF;
400:
402: -- Process Flow step 10: Populate null columns for UPDATE
403: -- OR Perform attribute defaulting for CREATE
404: --
405:
406: IF EGO_Globals.G_Catalog_Group_Rec.transaction_type IN
407: (EGO_Globals.G_OPR_UPDATE, EGO_Globals.G_OPR_DELETE)
408: THEN
409: Error_Handler.Write_Debug('Populate NULL columns . . .');
410:
403: -- OR Perform attribute defaulting for CREATE
404: --
405:
406: IF EGO_Globals.G_Catalog_Group_Rec.transaction_type IN
407: (EGO_Globals.G_OPR_UPDATE, EGO_Globals.G_OPR_DELETE)
408: THEN
409: Error_Handler.Write_Debug('Populate NULL columns . . .');
410:
411: Ego_Default_Catalog_Group.Populate_Null_Columns;
410:
411: Ego_Default_Catalog_Group.Populate_Null_Columns;
412:
413: -- Bug 3324531
414: -- changed the global Bom_Globals.G_OPR_CREATE to EGO_Globals.G_OPR_CREATE
415: ELSIF EGO_Globals.G_Catalog_Group_Rec.transaction_type = EGO_Globals.G_OPR_CREATE
416: THEN
417: Error_Handler.Write_Debug('Attribute Defaulting . . .');
418:
411: Ego_Default_Catalog_Group.Populate_Null_Columns;
412:
413: -- Bug 3324531
414: -- changed the global Bom_Globals.G_OPR_CREATE to EGO_Globals.G_OPR_CREATE
415: ELSIF EGO_Globals.G_Catalog_Group_Rec.transaction_type = EGO_Globals.G_OPR_CREATE
416: THEN
417: Error_Handler.Write_Debug('Attribute Defaulting . . .');
418:
419: Ego_Default_Catalog_Group.Attribute_Defaulting
425: THEN
426: l_other_message := 'EGO_CATGRP_ATTDEF_CSEV_SKIP';
427: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
428: l_other_token_tbl(1).token_value :=
429: EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Name;
430: RAISE EGO_Globals.G_EXC_SEV_SKIP_BRANCH;
431: ELSIF l_return_status = Error_Handler.G_STATUS_UNEXPECTED
432: THEN
433: l_other_message := 'EGO_CATGRP_ATTDEF_UNEXP_SKIP';
426: l_other_message := 'EGO_CATGRP_ATTDEF_CSEV_SKIP';
427: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
428: l_other_token_tbl(1).token_value :=
429: EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Name;
430: RAISE EGO_Globals.G_EXC_SEV_SKIP_BRANCH;
431: ELSIF l_return_status = Error_Handler.G_STATUS_UNEXPECTED
432: THEN
433: l_other_message := 'EGO_CATGRP_ATTDEF_UNEXP_SKIP';
434: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
432: THEN
433: l_other_message := 'EGO_CATGRP_ATTDEF_UNEXP_SKIP';
434: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
435: l_other_token_tbl(1).token_value :=
436: EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Name;
437: RAISE EGO_Globals.G_EXC_UNEXP_SKIP_OBJECT;
438: END IF;
439: END IF;
440:
433: l_other_message := 'EGO_CATGRP_ATTDEF_UNEXP_SKIP';
434: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
435: l_other_token_tbl(1).token_value :=
436: EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Name;
437: RAISE EGO_Globals.G_EXC_UNEXP_SKIP_OBJECT;
438: END IF;
439: END IF;
440:
441: Error_Handler.write_debug('Finished with attribute defaulting . . .');
441: Error_Handler.write_debug('Finished with attribute defaulting . . .');
442: Error_Handler.write_debug('Proceeding with entity validations . . .');
443: -- dbms_output.put_line('Proceeding with entity validations . . .');
444:
445: IF EGO_Globals.G_Catalog_Group_Rec.transaction_type <> EGO_Globals.G_OPR_DELETE
446: THEN
447: Ego_Validate_Catalog_Group.Check_Entity
448: ( x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
449: , x_return_status => l_Return_Status
450: );
451:
452: IF l_return_status = Error_Handler.G_STATUS_ERROR
453: THEN
454: RAISE EGO_Globals.G_EXC_SEV_QUIT_RECORD;
455: ELSIF l_return_status = Error_Handler.G_STATUS_UNEXPECTED
456: THEN
457: l_other_message := 'EGO_CATGRP_ENTVAL_UNEXP_SKIP';
458: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
456: THEN
457: l_other_message := 'EGO_CATGRP_ENTVAL_UNEXP_SKIP';
458: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
459: l_other_token_tbl(1).token_value :=
460: EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Name;
461: RAISE EGO_Globals.G_EXC_UNEXP_SKIP_OBJECT;
462: END IF;
463: ELSIF EGO_Globals.G_Catalog_Group_Rec.transaction_type = EGO_Globals.G_OPR_DELETE
464: THEN
457: l_other_message := 'EGO_CATGRP_ENTVAL_UNEXP_SKIP';
458: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
459: l_other_token_tbl(1).token_value :=
460: EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Name;
461: RAISE EGO_Globals.G_EXC_UNEXP_SKIP_OBJECT;
462: END IF;
463: ELSIF EGO_Globals.G_Catalog_Group_Rec.transaction_type = EGO_Globals.G_OPR_DELETE
464: THEN
465: Ego_Validate_Catalog_Group.Check_Entity_Delete
459: l_other_token_tbl(1).token_value :=
460: EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Name;
461: RAISE EGO_Globals.G_EXC_UNEXP_SKIP_OBJECT;
462: END IF;
463: ELSIF EGO_Globals.G_Catalog_Group_Rec.transaction_type = EGO_Globals.G_OPR_DELETE
464: THEN
465: Ego_Validate_Catalog_Group.Check_Entity_Delete
466: ( x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
467: , x_return_status => l_Return_Status
471:
472: IF l_return_status = Error_Handler.G_STATUS_ERROR
473: THEN
474: -- dbms_output.put_line('Raising exception in delete');
475: RAISE EGO_Globals.G_EXC_SEV_QUIT_RECORD;
476: ELSIF l_return_status = Error_Handler.G_STATUS_UNEXPECTED
477: THEN
478: l_other_message := 'EGO_CATGRP_ENTVAL_UNEXP_SKIP';
479: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
477: THEN
478: l_other_message := 'EGO_CATGRP_ENTVAL_UNEXP_SKIP';
479: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
480: l_other_token_tbl(1).token_value :=
481: EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Name;
482: RAISE EGO_Globals.G_EXC_UNEXP_SKIP_OBJECT;
483: END IF;
484:
485: END IF ;
478: l_other_message := 'EGO_CATGRP_ENTVAL_UNEXP_SKIP';
479: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
480: l_other_token_tbl(1).token_value :=
481: EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Name;
482: RAISE EGO_Globals.G_EXC_UNEXP_SKIP_OBJECT;
483: END IF;
484:
485: END IF ;
486:
498: );
499:
500: IF l_return_status = Error_Handler.G_STATUS_ERROR
501: THEN
502: RAISE EGO_Globals.G_EXC_SEV_QUIT_RECORD;
503: ELSIF l_return_status = Error_Handler.G_STATUS_UNEXPECTED
504: THEN
505: l_other_message := 'EGO_CATGRP_ENTVAL_UNEXP_SKIP';
506: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
504: THEN
505: l_other_message := 'EGO_CATGRP_ENTVAL_UNEXP_SKIP';
506: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
507: l_other_token_tbl(1).token_value :=
508: EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Name;
509: RAISE EGO_Globals.G_EXC_UNEXP_SKIP_OBJECT;
510: END IF;
511:
512: -- return the record back to the table after processing
505: l_other_message := 'EGO_CATGRP_ENTVAL_UNEXP_SKIP';
506: l_other_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
507: l_other_token_tbl(1).token_value :=
508: EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Name;
509: RAISE EGO_Globals.G_EXC_UNEXP_SKIP_OBJECT;
510: END IF;
511:
512: -- return the record back to the table after processing
513:
510: END IF;
511:
512: -- return the record back to the table after processing
513:
514: EGO_Globals.G_Catalog_Group_Tbl(l_Table_Index) := EGO_Globals.G_Catalog_Group_Rec;
515:
516: x_return_status := l_bo_return_status;
517:
518: Error_Handler.Write_Debug('Process Completed');
517:
518: Error_Handler.Write_Debug('Process Completed');
519:
520: EXCEPTION
521: WHEN EGO_Globals.G_EXC_SEV_QUIT_RECORD THEN
522: Error_Handler.Write_Debug('Handling exception G_EXC_SEV_QUIT_RECORD');
523: -- dbms_output.put_line('Handling exception G_EXC_SEV_QUIT_RECORD');
524: EGO_Catalog_Group_Err_Handler.Log_Error
525: ( p_mesg_token_tbl => l_mesg_token_tbl
524: EGO_Catalog_Group_Err_Handler.Log_Error
525: ( p_mesg_token_tbl => l_mesg_token_tbl
526: , p_error_status => Error_Handler.G_STATUS_ERROR
527: , p_error_scope => Error_Handler.G_SCOPE_RECORD
528: , p_error_level => EGO_Globals.G_ITEM_CATALOG_GROUP_LEVEL
529: , p_entity_index => l_Table_Index
530: );
531:
532: IF l_bo_return_status = 'S'
535: END IF;
536:
537: x_return_status := l_bo_return_status;
538:
539: WHEN EGO_Globals.G_EXC_SEV_QUIT_BRANCH THEN
540: EGO_Catalog_Group_Err_Handler.Log_Error
541: ( p_mesg_token_tbl => l_mesg_token_tbl
542: , p_error_status => Error_Handler.G_STATUS_ERROR
543: , p_error_scope => Error_Handler.G_SCOPE_CHILDREN
540: EGO_Catalog_Group_Err_Handler.Log_Error
541: ( p_mesg_token_tbl => l_mesg_token_tbl
542: , p_error_status => Error_Handler.G_STATUS_ERROR
543: , p_error_scope => Error_Handler.G_SCOPE_CHILDREN
544: , p_error_level => EGO_Globals.G_ITEM_CATALOG_GROUP_LEVEL
545: , p_entity_index => l_Table_Index
546: );
547:
548: IF l_bo_return_status = 'S'
551: END IF;
552:
553: x_return_status := l_bo_return_status;
554:
555: WHEN EGO_Globals.G_EXC_SEV_QUIT_SIBLINGS THEN
556: EGO_Catalog_Group_Err_Handler.Log_Error
557: ( p_mesg_token_tbl => l_mesg_token_tbl
558: , p_error_status => Error_Handler.G_STATUS_ERROR
559: , p_error_scope => Error_Handler.G_SCOPE_SIBLINGS
556: EGO_Catalog_Group_Err_Handler.Log_Error
557: ( p_mesg_token_tbl => l_mesg_token_tbl
558: , p_error_status => Error_Handler.G_STATUS_ERROR
559: , p_error_scope => Error_Handler.G_SCOPE_SIBLINGS
560: , p_error_level => EGO_Globals.G_ITEM_CATALOG_GROUP_LEVEL
561: , p_entity_index => l_Table_Index
562: );
563:
564: IF l_bo_return_status = 'S'
567: END IF;
568:
569: x_return_status := l_bo_return_status;
570:
571: WHEN EGO_Globals.G_EXC_FAT_QUIT_SIBLINGS THEN
572: EGO_Catalog_Group_Err_Handler.Log_Error
573: ( p_mesg_token_tbl => l_mesg_token_tbl
574: , p_error_status => Error_Handler.G_STATUS_FATAL
575: , p_error_scope => Error_Handler.G_SCOPE_SIBLINGS
572: EGO_Catalog_Group_Err_Handler.Log_Error
573: ( p_mesg_token_tbl => l_mesg_token_tbl
574: , p_error_status => Error_Handler.G_STATUS_FATAL
575: , p_error_scope => Error_Handler.G_SCOPE_SIBLINGS
576: , p_error_level => EGO_Globals.G_ITEM_CATALOG_GROUP_LEVEL
577: , p_entity_index => l_Table_Index
578: );
579:
580: IF l_bo_return_status = 'S'
583: END IF;
584:
585: x_return_status := l_bo_return_status;
586:
587: WHEN EGO_Globals.G_EXC_FAT_QUIT_OBJECT THEN
588: EGO_Catalog_Group_Err_Handler.Log_Error
589: ( p_mesg_token_tbl => l_mesg_token_tbl
590: , p_error_status => Error_Handler.G_STATUS_FATAL
591: , p_error_scope => Error_Handler.G_SCOPE_ALL
588: EGO_Catalog_Group_Err_Handler.Log_Error
589: ( p_mesg_token_tbl => l_mesg_token_tbl
590: , p_error_status => Error_Handler.G_STATUS_FATAL
591: , p_error_scope => Error_Handler.G_SCOPE_ALL
592: , p_error_level => EGO_Globals.G_ITEM_CATALOG_GROUP_LEVEL
593: , p_entity_index => l_Table_Index
594: );
595:
596: IF l_bo_return_status = 'S'
599: END IF;
600:
601: x_return_status := l_bo_return_status;
602:
603: WHEN EGO_Globals.G_EXC_UNEXP_SKIP_OBJECT THEN
604: EGO_Catalog_Group_Err_Handler.Log_Error
605: ( p_mesg_token_tbl => l_mesg_token_tbl
606: , p_error_status => Error_Handler.G_STATUS_UNEXPECTED
607: , p_other_status => Error_Handler.G_STATUS_NOT_PICKED
607: , p_other_status => Error_Handler.G_STATUS_NOT_PICKED
608: , p_other_message => l_other_message
609: , p_other_token_tbl => l_other_token_tbl
610: , p_error_scope => Error_Handler.G_SCOPE_ALL
611: , p_error_level => EGO_Globals.G_ITEM_CATALOG_GROUP_LEVEL
612: , p_entity_index => l_Table_Index
613: );
614:
615: IF l_bo_return_status = 'S'