eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.ECO_ERROR_HANDLER dependencies on ERROR_HANDLER

Line 1: PACKAGE BODY Eco_Error_Handler AS

1: PACKAGE BODY Eco_Error_Handler AS
2: /* $Header: ENGBOEHB.pls 120.1 2006/06/05 06:49:31 prgopala noship $ */
3: g_eco_rec ENG_Eco_Pub.Eco_Rec_Type;
4: g_eco_revision_tbl Eng_Eco_Pub.Eco_Revision_tbl_Type;
5: g_revised_item_tbl Eng_Eco_Pub.Revised_Item_Tbl_Type;

Line 27: G_ERROR_TABLE Error_Handler.Error_Tbl_Type;

23: g_change_line_tbl Eng_Eco_Pub.Change_Line_Tbl_Type ;
24: -- Added by MK on 08/13/2002
25:
26:
27: G_ERROR_TABLE Error_Handler.Error_Tbl_Type;
28: G_Msg_Index NUMBER := 0;
29: G_Msg_Count NUMBER := 0;
30:
31: /******************************************************************

Line 58: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Setting substitute component records to ' ||

54: IS
55: l_idx NUMBER;
56: BEGIN
57:
58: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Setting substitute component records to ' ||
59: p_other_status);
60: END IF;
61:
62: IF p_error_scope = G_SCOPE_ALL

Line 74: Error_Handler.Add_Message

70: -- Fix made by AS on 03/17/99
71: */
72: IF p_other_mesg_text IS NOT NULL
73: THEN
74: Error_Handler.Add_Message
75: ( p_mesg_text => p_other_mesg_text
76: , p_entity_id => G_SC_LEVEL
77: , p_entity_index=> l_idx
78: , p_message_type=> 'E'

Line 86: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Children in Substitute Component'); END IF;

82:
83: ELSIF p_error_scope = G_SCOPE_CHILDREN AND
84: p_ri_idx <> 0
85: THEN
86: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Children in Substitute Component'); END IF;
87: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Item index <> 0'); END IF;
88:
89: FOR l_idx IN 1..g_sub_component_tbl.COUNT
90: LOOP

Line 87: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Item index <> 0'); END IF;

83: ELSIF p_error_scope = G_SCOPE_CHILDREN AND
84: p_ri_idx <> 0
85: THEN
86: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Children in Substitute Component'); END IF;
87: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Item index <> 0'); END IF;
88:
89: FOR l_idx IN 1..g_sub_component_tbl.COUNT
90: LOOP
91: IF NVL(g_sub_component_tbl(l_idx).revised_item_name, ' ') =

Line 105: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Substitute Component at ' || to_char(l_idx) || ' set to status ' ||

101: NVL(g_revised_item_tbl(p_ri_idx).new_revised_item_revision, 'X')
102: THEN
103: g_sub_component_tbl(l_idx).return_status :=
104: p_other_status;
105: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Substitute Component at ' || to_char(l_idx) || ' set to status ' ||
106: p_other_status);
107: END IF;
108:
109: Error_Handler.Add_Message

Line 109: Error_Handler.Add_Message

105: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Substitute Component at ' || to_char(l_idx) || ' set to status ' ||
106: p_other_status);
107: END IF;
108:
109: Error_Handler.Add_Message
110: ( p_mesg_text => p_other_mesg_text
111: , p_entity_id => G_SC_LEVEL
112: , p_entity_index => l_idx
113: , p_message_type => 'E'

Line 121: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Children in Substitute Component'); END IF;

117: ELSIF p_error_scope = G_SCOPE_CHILDREN AND
118: p_rc_idx <> 0
119: THEN
120:
121: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Children in Substitute Component'); END IF;
122: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Component index <> 0'); END IF;
123:
124: FOR l_idx IN 1..g_sub_component_tbl.COUNT
125: LOOP

Line 122: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Component index <> 0'); END IF;

118: p_rc_idx <> 0
119: THEN
120:
121: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Children in Substitute Component'); END IF;
122: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Component index <> 0'); END IF;
123:
124: FOR l_idx IN 1..g_sub_component_tbl.COUNT
125: LOOP
126: IF NVL(g_sub_component_tbl(l_idx).component_item_name, ' ')=

Line 152: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

148: --
149: -- Since bill sequence id is not available
150: -- match the revised item information also.
151: --
152: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
153: ('Substitute Comp. at ' || to_char(l_idx) || ' set to '
154: || p_other_status);
155: END IF;
156:

Line 159: Error_Handler.Add_Message

155: END IF;
156:
157: g_sub_component_tbl(l_idx).return_status :=
158: p_other_status;
159: Error_Handler.Add_Message
160: ( p_mesg_text => p_other_mesg_text
161: , p_entity_id => G_SC_LEVEL
162: , p_entity_index => l_idx
163: , p_message_type => 'E'

Line 172: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope = Siblings in Sub. Components'); END IF;

168: ELSIF p_error_scope = G_SCOPE_SIBLINGS AND
169: p_rd_idx <> 0
170: THEN
171:
172: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope = Siblings in Sub. Components'); END IF;
173: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Reference Desg Index <> 0'); END IF;
174:
175: FOR l_idx IN 1..g_sub_component_tbl.COUNT
176: LOOP

Line 173: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Reference Desg Index <> 0'); END IF;

169: p_rd_idx <> 0
170: THEN
171:
172: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope = Siblings in Sub. Components'); END IF;
173: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Reference Desg Index <> 0'); END IF;
174:
175: FOR l_idx IN 1..g_sub_component_tbl.COUNT
176: LOOP
177: IF NVL(g_sub_component_tbl(l_idx).component_item_name,' ') =

Line 202: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Substitute Component at ' || to_char(l_idx) || ' set to status ' ||

198: -- match the revised item information also.
199: --
200: g_sub_component_tbl(l_idx).return_status :=
201: p_other_status;
202: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Substitute Component at ' || to_char(l_idx) || ' set to status ' ||
203: p_other_status);
204: END IF;
205: Error_Handler.Add_Message
206: ( p_mesg_text => p_other_mesg_text

Line 205: Error_Handler.Add_Message

201: p_other_status;
202: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Substitute Component at ' || to_char(l_idx) || ' set to status ' ||
203: p_other_status);
204: END IF;
205: Error_Handler.Add_Message
206: ( p_mesg_text => p_other_mesg_text
207: , p_entity_id => G_SC_LEVEL
208: , p_entity_index => l_idx
209: , p_message_type => 'E'

Line 228: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Siblings in Substitute Component'); END IF;

224: -- Match the component key information at the entity index
225: -- location with rest of the records, all those that are found
226: -- will be siblings and should get an error.
227: --
228: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Siblings in Substitute Component'); END IF;
229: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('All entity indexes = 0'); END IF;
230:
231:
232: FOR l_idx IN (p_entity_index+1)..g_sub_component_tbl.COUNT

Line 229: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('All entity indexes = 0'); END IF;

225: -- location with rest of the records, all those that are found
226: -- will be siblings and should get an error.
227: --
228: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Siblings in Substitute Component'); END IF;
229: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('All entity indexes = 0'); END IF;
230:
231:
232: FOR l_idx IN (p_entity_index+1)..g_sub_component_tbl.COUNT
233: LOOP

Line 260: Error_Handler.Add_Message

256: -- match the revised item information also.
257: --
258: g_sub_component_tbl(l_idx).return_status :=
259: p_other_status;
260: Error_Handler.Add_Message
261: ( p_mesg_text => p_other_mesg_text
262: , p_entity_id => G_SC_LEVEL
263: , p_entity_index => l_idx
264: , p_message_type => 'E'

Line 297: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Setting reference designator records to '

293: IS
294: l_idx NUMBER;
295: BEGIN
296:
297: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Setting reference designator records to '
298: || p_other_status);
299: END IF;
300:
301: IF p_error_scope = G_SCOPE_ALL

Line 313: Error_Handler.Add_Message

309: -- Fix made by AS on 03/17/99
310: */
311: IF p_other_mesg_text IS NOT NULL
312: THEN
313: Error_Handler.Add_Message
314: ( p_mesg_text => p_other_mesg_text
315: , p_entity_id => G_RD_LEVEL
316: , p_entity_index=> l_idx
317: , p_message_type=> 'E'

Line 334: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Children in Reference Designator'); END IF;

330: ELSIF p_error_scope = G_SCOPE_CHILDREN AND
331: p_ri_idx <> 0
332: THEN
333:
334: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Children in Reference Designator'); END IF;
335: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Item index <> 0'); END IF;
336:
337:
338: FOR l_idx IN 1..g_ref_designator_tbl.COUNT

Line 335: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Item index <> 0'); END IF;

331: p_ri_idx <> 0
332: THEN
333:
334: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Children in Reference Designator'); END IF;
335: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Item index <> 0'); END IF;
336:
337:
338: FOR l_idx IN 1..g_ref_designator_tbl.COUNT
339: LOOP

Line 354: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Ref. Designator at ' || to_char(l_idx) || ' set to status ' ||

350: THEN
351: g_ref_designator_tbl(l_idx).return_status :=
352: p_other_status;
353:
354: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Ref. Designator at ' || to_char(l_idx) || ' set to status ' ||
355: p_other_status);
356: END IF;
357:
358: Error_Handler.Add_Message

Line 358: Error_Handler.Add_Message

354: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Ref. Designator at ' || to_char(l_idx) || ' set to status ' ||
355: p_other_status);
356: END IF;
357:
358: Error_Handler.Add_Message
359: ( p_mesg_text => p_other_mesg_text
360: , p_entity_id => G_RD_LEVEL
361: , p_entity_index => l_idx
362: , p_message_type => 'E'

Line 371: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Children in Reference Designator'); END IF;

367: ELSIF p_error_scope = G_SCOPE_CHILDREN AND
368: p_rc_idx <> 0
369: THEN
370:
371: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Children in Reference Designator'); END IF;
372: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Component index <> 0'); END IF;
373:
374: FOR l_idx IN 1..g_ref_designator_tbl.COUNT
375: LOOP

Line 372: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Component index <> 0'); END IF;

368: p_rc_idx <> 0
369: THEN
370:
371: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Children in Reference Designator'); END IF;
372: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Component index <> 0'); END IF;
373:
374: FOR l_idx IN 1..g_ref_designator_tbl.COUNT
375: LOOP
376: IF NVL(g_ref_designator_tbl(l_idx).component_item_name, ' ') =

Line 397: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

393: --
394: -- Since bill sequence id is not available
395: -- match the revised item information also.
396: --
397: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
398: ('Refernce Desg. at ' || to_char(l_idx) || ' set to '
399: || p_other_status);
400: END IF;
401:

Line 404: Error_Handler.Add_Message

400: END IF;
401:
402: g_ref_designator_tbl(l_idx).return_status :=
403: p_other_status;
404: Error_Handler.Add_Message
405: ( p_mesg_text => p_other_mesg_text
406: , p_entity_id => G_RD_LEVEL
407: , p_entity_index => l_idx
408: , p_message_type => 'E'

Line 425: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Siblings in Reference Designator'); END IF;

421: -- location with rest of the records, all those that are found
422: -- will be siblings and should get an error.
423: --
424:
425: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Siblings in Reference Designator'); END IF;
426: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('All Indexes = 0'); END IF;
427:
428: FOR l_idx IN (p_entity_index+1)..g_ref_designator_tbl.COUNT
429: LOOP

Line 426: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('All Indexes = 0'); END IF;

422: -- will be siblings and should get an error.
423: --
424:
425: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Siblings in Reference Designator'); END IF;
426: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('All Indexes = 0'); END IF;
427:
428: FOR l_idx IN (p_entity_index+1)..g_ref_designator_tbl.COUNT
429: LOOP
430: IF NVL(g_ref_designator_tbl(l_idx).component_item_name, ' ') =

Line 457: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Ref. Designator at ' || to_char(l_idx) || ' set to status ' ||

453: --
454: g_ref_designator_tbl(l_idx).return_status :=
455: p_other_status;
456:
457: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Ref. Designator at ' || to_char(l_idx) || ' set to status ' ||
458: p_other_status);
459: END IF;
460:
461: Error_Handler.Add_Message

Line 461: Error_Handler.Add_Message

457: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Ref. Designator at ' || to_char(l_idx) || ' set to status ' ||
458: p_other_status);
459: END IF;
460:
461: Error_Handler.Add_Message
462: ( p_mesg_text => p_other_mesg_text
463: , p_entity_id => G_RD_LEVEL
464: , p_entity_index => l_idx
465: , p_message_type => 'E'

Line 512: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Setting Revised component records to '

508: IS
509: l_Idx NUMBER;
510: BEGIN
511:
512: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Setting Revised component records to '
513: || p_other_status);
514: END IF;
515:
516: IF p_error_scope = G_SCOPE_CHILDREN AND

Line 520: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Children in Revised Component'); END IF;

516: IF p_error_scope = G_SCOPE_CHILDREN AND
517: p_ri_idx <> 0
518: THEN
519:
520: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Children in Revised Component'); END IF;
521: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Item index <> 0'); END IF;
522:
523: FOR l_idx IN 1..g_rev_component_tbl.COUNT
524: LOOP

Line 521: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Item index <> 0'); END IF;

517: p_ri_idx <> 0
518: THEN
519:
520: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Children in Revised Component'); END IF;
521: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Item index <> 0'); END IF;
522:
523: FOR l_idx IN 1..g_rev_component_tbl.COUNT
524: LOOP
525: IF NVL(g_rev_component_tbl(l_Idx).eco_name, ' ') =

Line 544: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

540: -- matches that of the revised item then
541: -- error that revised component too.
542: --
543:
544: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
545: ('Comp. errored at index: '||to_char(l_idx));
546: END IF;
547:
548: g_rev_component_tbl(l_Idx).return_status :=

Line 551: Error_Handler.Add_Message

547:
548: g_rev_component_tbl(l_Idx).return_status :=
549: p_other_status;
550:
551: Error_Handler.Add_Message
552: ( p_mesg_text => p_other_mesg_text
553: , p_entity_id => G_RC_LEVEL
554: , p_entity_index=> l_Idx
555: , p_message_type=> 'E'

Line 582: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Siblings in Revised Component'); END IF;

578: , p_other_mesg_name => p_other_mesg_name --bug 5174203
579: );
580: ELSIF p_error_scope = G_SCOPE_SIBLINGS THEN
581:
582: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Siblings in Revised Component'); END IF;
583: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity Index: ' ||
584: to_char(p_entity_index));
585: END IF;
586:

Line 583: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity Index: ' ||

579: );
580: ELSIF p_error_scope = G_SCOPE_SIBLINGS THEN
581:
582: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Siblings in Revised Component'); END IF;
583: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity Index: ' ||
584: to_char(p_entity_index));
585: END IF;
586:
587: FOR l_idx IN 1..g_rev_component_tbl.COUNT

Line 617: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Component at ' || to_char(l_idx) || ' set to status ' ||

613: --
614: g_rev_component_tbl(l_idx).return_status :=
615: p_other_status;
616:
617: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Component at ' || to_char(l_idx) || ' set to status ' ||
618: p_other_status);
619: END IF;
620:
621: Error_Handler.Add_Message

Line 621: Error_Handler.Add_Message

617: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Component at ' || to_char(l_idx) || ' set to status ' ||
618: p_other_status);
619: END IF;
620:
621: Error_Handler.Add_Message
622: ( p_mesg_text => p_other_mesg_text
623: , p_entity_id => G_RC_LEVEL
624: , p_entity_index => l_idx
625: , p_message_type => 'E'

Line 653: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=All in Revised Component'); END IF;

649: END LOOP;
650: ELSIF p_error_scope = G_SCOPE_ALL
651: THEN
652:
653: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=All in Revised Component'); END IF;
654:
655: FOR l_idx IN 1..g_rev_component_tbl.COUNT
656: LOOP
657: g_rev_component_tbl(l_idx).return_status :=

Line 665: Error_Handler.Add_Message

661: -- Fix made by AS on 03/17/99
662: */
663: IF p_other_mesg_text IS NOT NULL
664: THEN
665: Error_Handler.Add_Message
666: ( p_mesg_text => p_other_mesg_text
667: , p_entity_id => G_RC_LEVEL
668: , p_entity_index=> l_Idx
669: , p_message_type=> 'E'

Line 721: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Setting Change Line records to ' || p_other_status); END IF;

717: IS
718: l_CurrentIndex NUMBER;
719: BEGIN
720:
721: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Setting Change Line records to ' || p_other_status); END IF;
722:
723: FOR l_CurrentIndex IN 1..g_change_line_tbl.COUNT
724: LOOP
725: g_change_line_tbl(l_CurrentIndex).return_status := p_other_status;

Line 729: Error_Handler.Add_Message

725: g_change_line_tbl(l_CurrentIndex).return_status := p_other_status;
726:
727: IF p_other_mesg_text IS NOT NULL
728: THEN
729: Error_Handler.Add_Message
730: ( p_mesg_text => p_other_mesg_text
731: , p_entity_id => G_CL_LEVEL
732: , p_entity_index => l_CurrentIndex
733: , p_message_type => 'E'

Line 760: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Setting ECO Revision records to ' || p_other_status); END IF;

756: IS
757: l_CurrentIndex NUMBER;
758: BEGIN
759:
760: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Setting ECO Revision records to ' || p_other_status); END IF;
761:
762: FOR l_CurrentIndex IN 1..g_eco_revision_tbl.COUNT
763: LOOP
764: g_eco_revision_tbl(l_CurrentIndex).return_status :=

Line 772: Error_Handler.Add_Message

768: -- Fix made by AS on 03/17/99
769: */
770: IF p_other_mesg_text IS NOT NULL
771: THEN
772: Error_Handler.Add_Message
773: ( p_mesg_text => p_other_mesg_text
774: , p_entity_id => G_REV_LEVEL
775: , p_entity_index => l_CurrentIndex
776: , p_message_type => 'E'

Line 820: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Setting sub operation resources records to ' || p_other_status); END IF ;

816: IS
817: l_idx NUMBER;
818: BEGIN
819:
820: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Setting sub operation resources records to ' || p_other_status); END IF ;
821:
822: IF p_error_scope = G_SCOPE_ALL
823: THEN
824: FOR l_idx IN 1..g_rev_sub_resource_tbl.COUNT

Line 830: Error_Handler.Add_Message

826: g_rev_sub_resource_tbl(l_idx).return_status := p_other_status;
827:
828: IF p_other_mesg_text IS NOT NULL
829: THEN
830: Error_Handler.Add_Message
831: ( p_mesg_text => p_other_mesg_text
832: , p_entity_id => G_SR_LEVEL
833: , p_entity_index=> l_idx
834: , p_message_type=> 'E'

Line 843: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Children in Sub Op Resource'); END IF;

839: ELSIF p_error_scope = G_SCOPE_CHILDREN AND
840: p_ri_idx <> 0
841: THEN
842:
843: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Children in Sub Op Resource'); END IF;
844: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Item index <> 0'); END IF;
845:
846: FOR l_idx IN 1..g_rev_sub_resource_tbl.COUNT
847: LOOP

Line 844: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Item index <> 0'); END IF;

840: p_ri_idx <> 0
841: THEN
842:
843: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Children in Sub Op Resource'); END IF;
844: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Item index <> 0'); END IF;
845:
846: FOR l_idx IN 1..g_rev_sub_resource_tbl.COUNT
847: LOOP
848: IF NVL(g_rev_sub_resource_tbl(l_idx).revised_item_name, ' ') =

Line 865: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Sub Op Resource at ' || to_char(l_idx) || ' set to status ' || p_other_status);

861: NVL(g_revised_item_tbl(p_ri_idx).new_revised_item_revision, 'X')
862: THEN
863: g_rev_sub_resource_tbl(l_idx).return_status := p_other_status;
864:
865: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Sub Op Resource at ' || to_char(l_idx) || ' set to status ' || p_other_status);
866: END IF;
867:
868: Error_Handler.Add_Message
869: ( p_mesg_text => p_other_mesg_text

Line 868: Error_Handler.Add_Message

864:
865: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Sub Op Resource at ' || to_char(l_idx) || ' set to status ' || p_other_status);
866: END IF;
867:
868: Error_Handler.Add_Message
869: ( p_mesg_text => p_other_mesg_text
870: , p_entity_id => G_SR_LEVEL
871: , p_entity_index => l_idx
872: , p_message_type => 'E'

Line 881: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Children in Sub Op Resources'); END IF;

877: ELSIF p_error_scope = G_SCOPE_CHILDREN AND
878: p_op_idx <> 0
879: THEN
880:
881: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Children in Sub Op Resources'); END IF;
882: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Operation Sequence index <> 0'); END IF;
883:
884: FOR l_idx IN 1..g_rev_sub_resource_tbl.COUNT
885: LOOP

Line 882: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Operation Sequence index <> 0'); END IF;

878: p_op_idx <> 0
879: THEN
880:
881: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Children in Sub Op Resources'); END IF;
882: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Operation Sequence index <> 0'); END IF;
883:
884: FOR l_idx IN 1..g_rev_sub_resource_tbl.COUNT
885: LOOP
886: IF NVL(g_rev_sub_resource_tbl(l_idx).operation_sequence_number, 0 ) =

Line 905: Error_Handler.Add_Message

901: NVL(g_rev_sub_resource_tbl(l_idx).eco_name, ' ') =
902: NVL(g_rev_operation_tbl(p_op_idx).eco_name, ' ')
903: THEN
904: g_rev_sub_resource_tbl(l_idx).return_status := p_other_status ;
905: Error_Handler.Add_Message
906: ( p_mesg_text => p_other_mesg_text
907: , p_entity_id => G_SR_LEVEL
908: , p_entity_index => l_idx
909: , p_message_type => 'E'

Line 917: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope = Siblings in Sub Op Resources'); END IF;

913:
914: ELSIF p_error_scope = G_SCOPE_SIBLINGS AND p_res_idx <> 0
915: THEN
916:
917: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope = Siblings in Sub Op Resources'); END IF;
918: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Operation Resource Index <> 0'); END IF ;
919:
920: FOR l_idx IN 1..g_rev_sub_resource_tbl.COUNT
921: LOOP

Line 918: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Operation Resource Index <> 0'); END IF ;

914: ELSIF p_error_scope = G_SCOPE_SIBLINGS AND p_res_idx <> 0
915: THEN
916:
917: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope = Siblings in Sub Op Resources'); END IF;
918: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Operation Resource Index <> 0'); END IF ;
919:
920: FOR l_idx IN 1..g_rev_sub_resource_tbl.COUNT
921: LOOP
922: IF NVL(g_rev_sub_resource_tbl(l_idx).operation_sequence_number, 0) =

Line 947: Error_Handler.Add_Message

943: --
944: g_rev_sub_resource_tbl(l_idx).return_status :=
945: p_other_status;
946:
947: Error_Handler.Add_Message
948: ( p_mesg_text => p_other_mesg_text
949: , p_entity_id => G_SR_LEVEL
950: , p_entity_index => l_idx
951: , p_message_type => 'E'

Line 970: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Siblings in Sub Op Resources'); END IF;

966: -- Match the operation key information at the entity index
967: -- location with rest of the records, all those that are found
968: -- will be siblings and should get an error.
969: --
970: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Siblings in Sub Op Resources'); END IF;
971: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('All entity indexes = 0'); END IF;
972:
973: FOR l_idx IN (p_entity_index+1)..g_rev_sub_resource_tbl.COUNT
974: LOOP

Line 971: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('All entity indexes = 0'); END IF;

967: -- location with rest of the records, all those that are found
968: -- will be siblings and should get an error.
969: --
970: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Siblings in Sub Op Resources'); END IF;
971: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('All entity indexes = 0'); END IF;
972:
973: FOR l_idx IN (p_entity_index+1)..g_rev_sub_resource_tbl.COUNT
974: LOOP
975: IF NVL(g_rev_sub_resource_tbl(l_idx).operation_sequence_number, 0) =

Line 994: Error_Handler.Add_Message

990: NVL(g_rev_sub_resource_tbl(l_idx).eco_name, ' ') =
991: NVL(g_rev_sub_resource_tbl(p_entity_index).eco_name, ' ')
992: THEN
993: g_rev_sub_resource_tbl(l_idx).return_status := p_other_status;
994: Error_Handler.Add_Message
995: ( p_mesg_text => p_other_mesg_text
996: , p_entity_id => G_SR_LEVEL
997: , p_entity_index => l_idx
998: , p_message_type => 'E'

Line 1037: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Setting Opration Rsource records to ' || p_other_status);

1033: IS
1034: l_idx NUMBER;
1035: BEGIN
1036:
1037: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Setting Opration Rsource records to ' || p_other_status);
1038: END IF;
1039:
1040:
1041: IF p_error_scope = G_SCOPE_ALL

Line 1052: Error_Handler.Add_Message

1048: g_rev_op_resource_tbl(l_idx).return_status := p_other_status;
1049:
1050: IF p_other_mesg_text IS NOT NULL
1051: THEN
1052: Error_Handler.Add_Message
1053: ( p_mesg_text => p_other_mesg_text
1054: , p_entity_id => G_RES_LEVEL
1055: , p_entity_index => l_idx
1056: , p_message_type => 'E'

Line 1074: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Children in Operation Resource'); END IF;

1070: ELSIF p_error_scope = G_SCOPE_CHILDREN AND
1071: p_ri_idx <> 0
1072: THEN
1073:
1074: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Children in Operation Resource'); END IF;
1075: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Item index <> 0'); END IF;
1076:
1077:
1078: FOR l_idx IN 1..g_rev_op_resource_tbl.COUNT

Line 1075: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Item index <> 0'); END IF;

1071: p_ri_idx <> 0
1072: THEN
1073:
1074: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Children in Operation Resource'); END IF;
1075: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Item index <> 0'); END IF;
1076:
1077:
1078: FOR l_idx IN 1..g_rev_op_resource_tbl.COUNT
1079: LOOP

Line 1097: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Op Resource at ' || to_char(l_idx) || ' set to status ' || p_other_status);

1093: NVL(g_revised_item_tbl(p_ri_idx).new_revised_item_revision, 'X')
1094: THEN
1095: g_rev_op_resource_tbl(l_idx).return_status := p_other_status;
1096:
1097: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Op Resource at ' || to_char(l_idx) || ' set to status ' || p_other_status);
1098: END IF;
1099:
1100: Error_Handler.Add_Message
1101: ( p_mesg_text => p_other_mesg_text

Line 1100: Error_Handler.Add_Message

1096:
1097: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Op Resource at ' || to_char(l_idx) || ' set to status ' || p_other_status);
1098: END IF;
1099:
1100: Error_Handler.Add_Message
1101: ( p_mesg_text => p_other_mesg_text
1102: , p_entity_id => G_RES_LEVEL
1103: , p_entity_index => l_idx
1104: , p_message_type => 'E'

Line 1113: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Children in Operation Resource'); END IF;

1109: ELSIF p_error_scope = G_SCOPE_CHILDREN AND
1110: p_op_idx <> 0
1111: THEN
1112:
1113: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Children in Operation Resource'); END IF;
1114: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Operation Sequence index <> 0'); END IF;
1115:
1116: FOR l_idx IN 1..g_rev_op_resource_tbl.COUNT
1117: LOOP

Line 1114: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Operation Sequence index <> 0'); END IF;

1110: p_op_idx <> 0
1111: THEN
1112:
1113: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Children in Operation Resource'); END IF;
1114: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Operation Sequence index <> 0'); END IF;
1115:
1116: FOR l_idx IN 1..g_rev_op_resource_tbl.COUNT
1117: LOOP
1118: IF NVL(g_rev_op_resource_tbl(l_idx).operation_sequence_number, 0)=

Line 1138: Error_Handler.Add_Message

1134: NVL(g_rev_operation_tbl(p_op_idx).eco_name, ' ')
1135: THEN
1136:
1137: g_rev_op_resource_tbl(l_idx).return_status := p_other_status;
1138: Error_Handler.Add_Message
1139: ( p_mesg_text => p_other_mesg_text
1140: , p_entity_id => G_RES_LEVEL
1141: , p_entity_index => l_idx
1142: , p_message_type => 'E'

Line 1158: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Siblings in Operation Resource'); END IF;

1154: -- location with rest of the records, all those that are found
1155: -- will be siblings and should get an error.
1156: --
1157:
1158: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Siblings in Operation Resource'); END IF;
1159: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('All Indexes = 0'); END IF;
1160:
1161: FOR l_idx IN (p_entity_index+1)..g_rev_op_resource_tbl.COUNT
1162: LOOP

Line 1159: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('All Indexes = 0'); END IF;

1155: -- will be siblings and should get an error.
1156: --
1157:
1158: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Siblings in Operation Resource'); END IF;
1159: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('All Indexes = 0'); END IF;
1160:
1161: FOR l_idx IN (p_entity_index+1)..g_rev_op_resource_tbl.COUNT
1162: LOOP
1163: IF NVL(g_rev_op_resource_tbl(l_idx).operation_sequence_number, 0) =

Line 1183: Error_Handler.Add_Message

1179: NVL(g_rev_op_resource_tbl(p_entity_index).eco_name, ' ')
1180: THEN
1181:
1182: g_rev_op_resource_tbl(l_idx).return_status := p_other_status;
1183: Error_Handler.Add_Message
1184: ( p_mesg_text => p_other_mesg_text
1185: , p_entity_id => G_RES_LEVEL
1186: , p_entity_index => l_idx
1187: , p_message_type => 'E'

Line 1237: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Setting Revised operation records to '

1233: IS
1234: l_Idx NUMBER;
1235: BEGIN
1236:
1237: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Setting Revised operation records to '
1238: || p_other_status);
1239: END IF;
1240:
1241: IF p_error_scope = G_SCOPE_CHILDREN AND

Line 1245: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Children in Revised Operation'); END IF;

1241: IF p_error_scope = G_SCOPE_CHILDREN AND
1242: p_ri_idx <> 0
1243: THEN
1244:
1245: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Children in Revised Operation'); END IF;
1246: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Item index <> 0'); END IF;
1247:
1248: FOR l_idx IN 1..g_rev_operation_tbl.COUNT
1249: LOOP

Line 1246: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Item index <> 0'); END IF;

1242: p_ri_idx <> 0
1243: THEN
1244:
1245: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Children in Revised Operation'); END IF;
1246: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Item index <> 0'); END IF;
1247:
1248: FOR l_idx IN 1..g_rev_operation_tbl.COUNT
1249: LOOP
1250: IF NVL(g_rev_operation_tbl(l_Idx).eco_name, ' ') =

Line 1272: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

1268: -- matches that of the revised item then
1269: -- error that revised operation too.
1270: --
1271:
1272: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1273: ('Comp. errored at index: '||to_char(l_idx));
1274: END IF;
1275:
1276: g_rev_operation_tbl(l_Idx).return_status := p_other_status;

Line 1278: Error_Handler.Add_Message

1274: END IF;
1275:
1276: g_rev_operation_tbl(l_Idx).return_status := p_other_status;
1277:
1278: Error_Handler.Add_Message
1279: ( p_mesg_text => p_other_mesg_text
1280: , p_entity_id => G_OP_LEVEL
1281: , p_entity_index=> l_Idx
1282: , p_message_type=> 'E'

Line 1311: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Siblings in Revised Operation'); END IF;

1307: );
1308:
1309: ELSIF p_error_scope = G_SCOPE_SIBLINGS THEN
1310:
1311: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Siblings in Revised Operation'); END IF;
1312: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity Index: ' ||
1313: to_char(p_entity_index));
1314: END IF;
1315:

Line 1312: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity Index: ' ||

1308:
1309: ELSIF p_error_scope = G_SCOPE_SIBLINGS THEN
1310:
1311: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=Siblings in Revised Operation'); END IF;
1312: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity Index: ' ||
1313: to_char(p_entity_index));
1314: END IF;
1315:
1316: FOR l_idx IN 1..g_rev_component_tbl.COUNT

Line 1343: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Operation at ' || to_char(l_idx) || ' set to status ' ||p_other_status);

1339: -- Set the operation error status
1340: --
1341: g_rev_operation_tbl(l_idx).return_status := p_other_status;
1342:
1343: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Operation at ' || to_char(l_idx) || ' set to status ' ||p_other_status);
1344: END IF;
1345: Error_Handler.Add_Message
1346: ( p_mesg_text => p_other_mesg_text
1347: , p_entity_id => G_RC_LEVEL

Line 1345: Error_Handler.Add_Message

1341: g_rev_operation_tbl(l_idx).return_status := p_other_status;
1342:
1343: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Operation at ' || to_char(l_idx) || ' set to status ' ||p_other_status);
1344: END IF;
1345: Error_Handler.Add_Message
1346: ( p_mesg_text => p_other_mesg_text
1347: , p_entity_id => G_RC_LEVEL
1348: , p_entity_index => l_idx
1349: , p_message_type => 'E'

Line 1376: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=All in Operation Sequences'); END IF;

1372:
1373: ELSIF p_error_scope = G_SCOPE_ALL
1374: THEN
1375:
1376: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope=All in Operation Sequences'); END IF;
1377:
1378: FOR l_idx IN 1..g_rev_operation_tbl.COUNT
1379: LOOP
1380: g_rev_operation_tbl(l_idx).return_status := p_other_status;

Line 1384: Error_Handler.Add_Message

1380: g_rev_operation_tbl(l_idx).return_status := p_other_status;
1381:
1382: IF p_other_mesg_text IS NOT NULL
1383: THEN
1384: Error_Handler.Add_Message
1385: ( p_mesg_text => p_other_mesg_text
1386: , p_entity_id => G_OP_LEVEL
1387: , p_entity_index => l_Idx
1388: , p_message_type => 'E'

Line 1435: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Setting Revised Item records to ' || p_other_status); END IF;

1431: )
1432: IS
1433: l_CurrentIndex NUMBER;
1434: BEGIN
1435: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Setting Revised Item records to ' || p_other_status); END IF;
1436:
1437: FOR l_CurrentIndex IN 1..g_revised_item_tbl.COUNT
1438: LOOP
1439: g_revised_item_tbl(l_CurrentIndex).return_status :=

Line 1448: Error_Handler.Add_Message

1444: -- Fix made by AS on 03/17/99
1445: */
1446: IF p_other_mesg_text IS NOT NULL
1447: THEN
1448: Error_Handler.Add_Message
1449: ( p_mesg_text => p_other_mesg_text
1450: , p_entity_id => G_RI_LEVEL
1451: , p_entity_index => l_CurrentIndex
1452: , p_message_type => 'E'

Line 1495: , p_Mesg_Token_tbl IN Error_Handler.Mesg_Token_Tbl_Type

1491: , p_ref_designator_tbl IN Bom_Bo_Pub.Ref_Designator_Tbl_Type
1492: := Bom_Bo_Pub.G_MISS_REF_DESIGNATOR_TBL
1493: , p_sub_component_tbl IN Bom_Bo_Pub.Sub_Component_Tbl_Type
1494: := Bom_Bo_Pub.G_MISS_SUB_COMPONENT_TBL
1495: , p_Mesg_Token_tbl IN Error_Handler.Mesg_Token_Tbl_Type
1496: := Error_Handler.G_MISS_MESG_TOKEN_TBL
1497: , p_error_status IN VARCHAR2
1498: , p_error_scope IN VARCHAR2 := NULL
1499: , p_other_message IN VARCHAR2 := NULL

Line 1496: := Error_Handler.G_MISS_MESG_TOKEN_TBL

1492: := Bom_Bo_Pub.G_MISS_REF_DESIGNATOR_TBL
1493: , p_sub_component_tbl IN Bom_Bo_Pub.Sub_Component_Tbl_Type
1494: := Bom_Bo_Pub.G_MISS_SUB_COMPONENT_TBL
1495: , p_Mesg_Token_tbl IN Error_Handler.Mesg_Token_Tbl_Type
1496: := Error_Handler.G_MISS_MESG_TOKEN_TBL
1497: , p_error_status IN VARCHAR2
1498: , p_error_scope IN VARCHAR2 := NULL
1499: , p_other_message IN VARCHAR2 := NULL
1500: , p_other_status IN VARCHAR2 := NULL

Line 1501: , p_other_token_tbl IN Error_Handler.Token_Tbl_Type

1497: , p_error_status IN VARCHAR2
1498: , p_error_scope IN VARCHAR2 := NULL
1499: , p_other_message IN VARCHAR2 := NULL
1500: , p_other_status IN VARCHAR2 := NULL
1501: , p_other_token_tbl IN Error_Handler.Token_Tbl_Type
1502: := Error_Handler.G_MISS_TOKEN_TBL
1503: , p_error_level IN NUMBER
1504: , p_entity_index IN NUMBER := NULL
1505: , x_eco_rec OUT ENG_Eco_Pub.Eco_Rec_Type

Line 1502: := Error_Handler.G_MISS_TOKEN_TBL

1498: , p_error_scope IN VARCHAR2 := NULL
1499: , p_other_message IN VARCHAR2 := NULL
1500: , p_other_status IN VARCHAR2 := NULL
1501: , p_other_token_tbl IN Error_Handler.Token_Tbl_Type
1502: := Error_Handler.G_MISS_TOKEN_TBL
1503: , p_error_level IN NUMBER
1504: , p_entity_index IN NUMBER := NULL
1505: , x_eco_rec OUT ENG_Eco_Pub.Eco_Rec_Type
1506: , x_eco_revision_tbl OUT Eng_Eco_Pub.Eco_Revision_tbl_Type

Line 1547: , p_Mesg_Token_tbl IN Error_Handler.Mesg_Token_Tbl_Type

1543: , p_ref_designator_tbl IN Bom_Bo_Pub.Ref_Designator_Tbl_Type
1544: := Eng_Eco_Pub.G_MISS_REF_DESIGNATOR_TBL
1545: , p_sub_component_tbl IN Bom_Bo_Pub.Sub_Component_Tbl_Type
1546: := Eng_Eco_Pub.G_MISS_SUB_COMPONENT_TBL
1547: , p_Mesg_Token_tbl IN Error_Handler.Mesg_Token_Tbl_Type
1548: := Error_Handler.G_MISS_MESG_TOKEN_TBL
1549: , p_error_status IN VARCHAR2
1550: , p_error_scope IN VARCHAR2 := NULL
1551: , p_other_message IN VARCHAR2 := NULL

Line 1548: := Error_Handler.G_MISS_MESG_TOKEN_TBL

1544: := Eng_Eco_Pub.G_MISS_REF_DESIGNATOR_TBL
1545: , p_sub_component_tbl IN Bom_Bo_Pub.Sub_Component_Tbl_Type
1546: := Eng_Eco_Pub.G_MISS_SUB_COMPONENT_TBL
1547: , p_Mesg_Token_tbl IN Error_Handler.Mesg_Token_Tbl_Type
1548: := Error_Handler.G_MISS_MESG_TOKEN_TBL
1549: , p_error_status IN VARCHAR2
1550: , p_error_scope IN VARCHAR2 := NULL
1551: , p_other_message IN VARCHAR2 := NULL
1552: , p_other_status IN VARCHAR2 := NULL

Line 1553: , p_other_token_tbl IN Error_Handler.Token_Tbl_Type

1549: , p_error_status IN VARCHAR2
1550: , p_error_scope IN VARCHAR2 := NULL
1551: , p_other_message IN VARCHAR2 := NULL
1552: , p_other_status IN VARCHAR2 := NULL
1553: , p_other_token_tbl IN Error_Handler.Token_Tbl_Type
1554: := Error_Handler.G_MISS_TOKEN_TBL
1555: , p_error_level IN NUMBER
1556: , p_entity_index IN NUMBER := 1 -- := NULL
1557: , x_eco_rec IN OUT NOCOPY ENG_Eco_Pub.Eco_Rec_Type

Line 1554: := Error_Handler.G_MISS_TOKEN_TBL

1550: , p_error_scope IN VARCHAR2 := NULL
1551: , p_other_message IN VARCHAR2 := NULL
1552: , p_other_status IN VARCHAR2 := NULL
1553: , p_other_token_tbl IN Error_Handler.Token_Tbl_Type
1554: := Error_Handler.G_MISS_TOKEN_TBL
1555: , p_error_level IN NUMBER
1556: , p_entity_index IN NUMBER := 1 -- := NULL
1557: , x_eco_rec IN OUT NOCOPY ENG_Eco_Pub.Eco_Rec_Type
1558: , x_eco_revision_tbl IN OUT NOCOPY Eng_Eco_Pub.Eco_Revision_tbl_Type

Line 1644: , p_Mesg_Token_tbl IN Error_Handler.Mesg_Token_Tbl_Type

1640: , p_ref_designator_tbl IN Bom_Bo_Pub.Ref_Designator_Tbl_Type
1641: := Eng_Eco_Pub.G_MISS_REF_DESIGNATOR_TBL
1642: , p_sub_component_tbl IN Bom_Bo_Pub.Sub_Component_Tbl_Type
1643: := Eng_Eco_Pub.G_MISS_SUB_COMPONENT_TBL
1644: , p_Mesg_Token_tbl IN Error_Handler.Mesg_Token_Tbl_Type
1645: := Error_Handler.G_MISS_MESG_TOKEN_TBL
1646: , p_error_status IN VARCHAR2
1647: , p_error_scope IN VARCHAR2 := NULL
1648: , p_other_message IN VARCHAR2 := NULL

Line 1645: := Error_Handler.G_MISS_MESG_TOKEN_TBL

1641: := Eng_Eco_Pub.G_MISS_REF_DESIGNATOR_TBL
1642: , p_sub_component_tbl IN Bom_Bo_Pub.Sub_Component_Tbl_Type
1643: := Eng_Eco_Pub.G_MISS_SUB_COMPONENT_TBL
1644: , p_Mesg_Token_tbl IN Error_Handler.Mesg_Token_Tbl_Type
1645: := Error_Handler.G_MISS_MESG_TOKEN_TBL
1646: , p_error_status IN VARCHAR2
1647: , p_error_scope IN VARCHAR2 := NULL
1648: , p_other_message IN VARCHAR2 := NULL
1649: , p_other_status IN VARCHAR2 := NULL

Line 1650: , p_other_token_tbl IN Error_Handler.Token_Tbl_Type

1646: , p_error_status IN VARCHAR2
1647: , p_error_scope IN VARCHAR2 := NULL
1648: , p_other_message IN VARCHAR2 := NULL
1649: , p_other_status IN VARCHAR2 := NULL
1650: , p_other_token_tbl IN Error_Handler.Token_Tbl_Type
1651: := Error_Handler.G_MISS_TOKEN_TBL
1652: , p_error_level IN NUMBER
1653: , p_entity_index IN NUMBER := 1 -- := NULL
1654: , x_eco_rec IN OUT NOCOPY Eng_Eco_Pub.Eco_Rec_Type

Line 1651: := Error_Handler.G_MISS_TOKEN_TBL

1647: , p_error_scope IN VARCHAR2 := NULL
1648: , p_other_message IN VARCHAR2 := NULL
1649: , p_other_status IN VARCHAR2 := NULL
1650: , p_other_token_tbl IN Error_Handler.Token_Tbl_Type
1651: := Error_Handler.G_MISS_TOKEN_TBL
1652: , p_error_level IN NUMBER
1653: , p_entity_index IN NUMBER := 1 -- := NULL
1654: , x_eco_rec IN OUT NOCOPY Eng_Eco_Pub.Eco_Rec_Type
1655: , x_eco_revision_tbl IN OUT NOCOPY Eng_Eco_Pub.Eco_Revision_tbl_Type

Line 1706: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Within the Log Error Procedure . . .'); END IF;

1702: -- Error Table.
1703: --
1704: **************************************************/
1705:
1706: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Within the Log Error Procedure . . .'); END IF;
1707: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope: ' || l_error_scope); END IF;
1708: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity Index: ' || to_char(p_entity_index)); END IF;
1709: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Error Level: ' || to_char(p_error_level)); END IF;
1710: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Error Status: ' || l_error_status); END IF;

Line 1707: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope: ' || l_error_scope); END IF;

1703: --
1704: **************************************************/
1705:
1706: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Within the Log Error Procedure . . .'); END IF;
1707: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope: ' || l_error_scope); END IF;
1708: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity Index: ' || to_char(p_entity_index)); END IF;
1709: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Error Level: ' || to_char(p_error_level)); END IF;
1710: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Error Status: ' || l_error_status); END IF;
1711: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Other Status: ' || p_other_status); END IF;

Line 1708: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity Index: ' || to_char(p_entity_index)); END IF;

1704: **************************************************/
1705:
1706: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Within the Log Error Procedure . . .'); END IF;
1707: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope: ' || l_error_scope); END IF;
1708: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity Index: ' || to_char(p_entity_index)); END IF;
1709: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Error Level: ' || to_char(p_error_level)); END IF;
1710: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Error Status: ' || l_error_status); END IF;
1711: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Other Status: ' || p_other_status); END IF;
1712: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Other Message: ' || p_other_message); END IF;

Line 1709: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Error Level: ' || to_char(p_error_level)); END IF;

1705:
1706: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Within the Log Error Procedure . . .'); END IF;
1707: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope: ' || l_error_scope); END IF;
1708: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity Index: ' || to_char(p_entity_index)); END IF;
1709: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Error Level: ' || to_char(p_error_level)); END IF;
1710: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Error Status: ' || l_error_status); END IF;
1711: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Other Status: ' || p_other_status); END IF;
1712: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Other Message: ' || p_other_message); END IF;
1713: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Business Object: ' || Bom_Globals.Get_Bo_Identifier); END IF;

Line 1710: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Error Status: ' || l_error_status); END IF;

1706: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Within the Log Error Procedure . . .'); END IF;
1707: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope: ' || l_error_scope); END IF;
1708: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity Index: ' || to_char(p_entity_index)); END IF;
1709: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Error Level: ' || to_char(p_error_level)); END IF;
1710: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Error Status: ' || l_error_status); END IF;
1711: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Other Status: ' || p_other_status); END IF;
1712: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Other Message: ' || p_other_message); END IF;
1713: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Business Object: ' || Bom_Globals.Get_Bo_Identifier); END IF;
1714:

Line 1711: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Other Status: ' || p_other_status); END IF;

1707: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Scope: ' || l_error_scope); END IF;
1708: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity Index: ' || to_char(p_entity_index)); END IF;
1709: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Error Level: ' || to_char(p_error_level)); END IF;
1710: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Error Status: ' || l_error_status); END IF;
1711: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Other Status: ' || p_other_status); END IF;
1712: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Other Message: ' || p_other_message); END IF;
1713: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Business Object: ' || Bom_Globals.Get_Bo_Identifier); END IF;
1714:
1715: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Translating and Inserting Messages . . . '); END IF;

Line 1712: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Other Message: ' || p_other_message); END IF;

1708: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity Index: ' || to_char(p_entity_index)); END IF;
1709: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Error Level: ' || to_char(p_error_level)); END IF;
1710: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Error Status: ' || l_error_status); END IF;
1711: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Other Status: ' || p_other_status); END IF;
1712: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Other Message: ' || p_other_message); END IF;
1713: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Business Object: ' || Bom_Globals.Get_Bo_Identifier); END IF;
1714:
1715: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Translating and Inserting Messages . . . '); END IF;
1716:

Line 1713: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Business Object: ' || Bom_Globals.Get_Bo_Identifier); END IF;

1709: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Error Level: ' || to_char(p_error_level)); END IF;
1710: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Error Status: ' || l_error_status); END IF;
1711: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Other Status: ' || p_other_status); END IF;
1712: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Other Message: ' || p_other_message); END IF;
1713: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Business Object: ' || Bom_Globals.Get_Bo_Identifier); END IF;
1714:
1715: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Translating and Inserting Messages . . . '); END IF;
1716:
1717: Error_Handler.Translate_And_Insert_Messages

Line 1715: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Translating and Inserting Messages . . . '); END IF;

1711: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Other Status: ' || p_other_status); END IF;
1712: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Other Message: ' || p_other_message); END IF;
1713: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Business Object: ' || Bom_Globals.Get_Bo_Identifier); END IF;
1714:
1715: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Translating and Inserting Messages . . . '); END IF;
1716:
1717: Error_Handler.Translate_And_Insert_Messages
1718: ( p_Mesg_Token_Tbl => p_Mesg_Token_Tbl
1719: , p_error_level => p_error_level

Line 1717: Error_Handler.Translate_And_Insert_Messages

1713: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Business Object: ' || Bom_Globals.Get_Bo_Identifier); END IF;
1714:
1715: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Translating and Inserting Messages . . . '); END IF;
1716:
1717: Error_Handler.Translate_And_Insert_Messages
1718: ( p_Mesg_Token_Tbl => p_Mesg_Token_Tbl
1719: , p_error_level => p_error_level
1720: , p_entity_index => p_entity_index
1721: );

Line 1765: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Finished extracting other message . . . '); END IF;

1761: l_other_message := fnd_message.get;
1762:
1763: END IF; -- Other Token Tbl Count <> 0 Ends
1764:
1765: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Finished extracting other message . . . '); END IF;
1766: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Other Message generated: ' || l_other_message); END IF;
1767:
1768:
1769: /**********************************************************

Line 1766: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Other Message generated: ' || l_other_message); END IF;

1762:
1763: END IF; -- Other Token Tbl Count <> 0 Ends
1764:
1765: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Finished extracting other message . . . '); END IF;
1766: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Other Message generated: ' || l_other_message); END IF;
1767:
1768:
1769: /**********************************************************
1770: --

Line 1779: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Error Level is Business Object . . . '); END IF;

1775: IF l_error_level = G_BO_LEVEL
1776: THEN
1777: l_error_level := G_ECO_LEVEL;
1778:
1779: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Error Level is Business Object . . . '); END IF;
1780:
1781: END IF;
1782: /**********************************************************
1783: --

Line 1790: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Status unexpected and scope is All . . .'); END IF;

1786: --
1787: ************************************************************/
1788: IF l_error_status = G_STATUS_UNEXPECTED
1789: THEN
1790: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Status unexpected and scope is All . . .'); END IF;
1791: l_error_scope := G_SCOPE_ALL;
1792: ELSIF l_error_status = G_STATUS_WARNING
1793: THEN
1794: l_error_scope := G_SCOPE_RECORD;

Line 1796: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Status is warning . . .'); END IF;

1792: ELSIF l_error_status = G_STATUS_WARNING
1793: THEN
1794: l_error_scope := G_SCOPE_RECORD;
1795: l_error_status := FND_API.G_RET_STS_SUCCESS;
1796: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Status is warning . . .'); END IF;
1797:
1798: END IF;
1799:
1800: --

Line 1812: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Error Level is ECO . . .'); END IF;

1808: *************************************************************/
1809: IF l_error_level = G_ECO_LEVEL
1810: THEN
1811:
1812: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Error Level is ECO . . .'); END IF;
1813: --
1814: -- Set the ECO Header record status to p_error_status
1815: -- This will also take care of the scope RECORD.
1816: --

Line 1827: Error_Handler.Add_Message

1823: -- so that BO is the entity that the message
1824: -- is logged for, and not ECO.
1825: -- Changed by AS on 03/17/99 for bug 851387
1826: */
1827: Error_Handler.Add_Message
1828: ( p_mesg_text => l_other_message
1829: , p_entity_id => p_error_level
1830: , p_entity_index => p_entity_index
1831: , p_message_type => 'E'

Line 2114: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Error Level = Revised Items . . .'); END IF;

2110: --
2111: -- Set the revised item status at the entity_index
2112: -- This will take care of scope RECORD
2113: --
2114: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Error Level = Revised Items . . .'); END IF;
2115:
2116: g_revised_item_tbl(p_entity_index).return_status :=
2117: l_error_status;
2118:

Line 2186: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Error Level = Revised components . . .'); END IF;

2182: --
2183: g_rev_component_tbl(p_entity_index).return_status :=
2184: l_error_status;
2185:
2186: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Error Level = Revised components . . .'); END IF;
2187:
2188: IF l_error_scope = G_SCOPE_SIBLINGS OR
2189: l_error_scope = G_SCOPE_ALL
2190: THEN

Line 2234: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Error Level = Reference Designators . . .'); END IF;

2230: --
2231: -- Set reference designator record status at entity_idx
2232: -- This will take care of Scope = RECORD.
2233: --
2234: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Error Level = Reference Designators . . .'); END IF;
2235:
2236: g_ref_designator_tbl(p_entity_index).return_status :=
2237: l_error_status;
2238: IF l_error_scope <> G_SCOPE_RECORD

Line 2259: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Error Level = Substitute Components . . .'); END IF;

2255: THEN
2256: -- Set substitute component record status at entity_idx
2257: -- This will take care of Scope = RECORD.
2258: --
2259: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Error Level = Substitute Components . . .'); END IF;
2260:
2261: g_sub_component_tbl(p_entity_index).return_status :=
2262: l_error_status;
2263: IF l_error_scope <> G_SCOPE_RECORD

Line 2293: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Error Level = Revised operations . . .'); END IF;

2289: --
2290: g_rev_operation_tbl(p_entity_index).return_status :=
2291: l_error_status;
2292:
2293: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Error Level = Revised operations . . .'); END IF;
2294:
2295: IF l_error_scope = G_SCOPE_SIBLINGS OR
2296: l_error_scope = G_SCOPE_ALL
2297: THEN

Line 2347: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Error Level = Ope ration Resource . . .'); END IF;

2343: --
2344: -- Set operation resource record status at entity_idx
2345: -- This will take care of Scope = RECORD.
2346: --
2347: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Error Level = Ope ration Resource . . .'); END IF;
2348:
2349: g_rev_op_resource_tbl(p_entity_index).return_status := l_error_status;
2350: IF l_error_scope <> G_SCOPE_RECORD
2351: THEN

Line 2373: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Error Level = Sub

2369: THEN
2370: -- Set substitute resource record status at entity_idx
2371: -- This will take care of Scope = RECORD.
2372: --
2373: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Error Level = Sub
2374: stitute Op Resources . . .'); END IF;
2375:
2376: g_rev_sub_resource_tbl(p_entity_index).return_status := l_error_status;
2377:

Line 2423: END Eco_Error_Handler;

2419: END Log_Error;
2420:
2421:
2422:
2423: END Eco_Error_Handler;