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.BOM_VALIDATE_BOM_COMPONENT dependencies on ERROR_HANDLER

Line 80: g_Token_Tbl Error_Handler.Token_Tbl_Type;

76: g_Assy_Assembly_Type NUMBER; --4161794
77:
78: g_rev_component_rec Bom_bo_Pub.Rev_Component_Rec_Type;
79: g_Rev_Comp_Unexp_Rec Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type;
80: g_Token_Tbl Error_Handler.Token_Tbl_Type;
81:
82: FUNCTION Item_Revision_Exists (p_item_id IN NUMBER,
83: p_org_id IN NUMBER,
84: p_eff_dt IN DATE)

Line 94: Error_Handler.Write_Debug('In Item Check Revisio' );

90: WHERE INVENTORY_ITEM_ID = p_item_id
91: AND ORGANIZATION_ID = p_org_id
92: AND MIR.EFFECTIVITY_DATE <= p_eff_dt;
93: BEGIN
94: Error_Handler.Write_Debug('In Item Check Revisio' );
95: Error_Handler.Write_Debug('Item id '||to_char(p_item_id));
96: Error_Handler.Write_Debug('Org id '||to_char(p_org_id));
97: Error_Handler.Write_Debug('Eff Dt '||to_char(p_eff_dt));
98: FOR r1 IN c1

Line 95: Error_Handler.Write_Debug('Item id '||to_char(p_item_id));

91: AND ORGANIZATION_ID = p_org_id
92: AND MIR.EFFECTIVITY_DATE <= p_eff_dt;
93: BEGIN
94: Error_Handler.Write_Debug('In Item Check Revisio' );
95: Error_Handler.Write_Debug('Item id '||to_char(p_item_id));
96: Error_Handler.Write_Debug('Org id '||to_char(p_org_id));
97: Error_Handler.Write_Debug('Eff Dt '||to_char(p_eff_dt));
98: FOR r1 IN c1
99: LOOP

Line 96: Error_Handler.Write_Debug('Org id '||to_char(p_org_id));

92: AND MIR.EFFECTIVITY_DATE <= p_eff_dt;
93: BEGIN
94: Error_Handler.Write_Debug('In Item Check Revisio' );
95: Error_Handler.Write_Debug('Item id '||to_char(p_item_id));
96: Error_Handler.Write_Debug('Org id '||to_char(p_org_id));
97: Error_Handler.Write_Debug('Eff Dt '||to_char(p_eff_dt));
98: FOR r1 IN c1
99: LOOP
100: Error_Handler.Write_Debug('In loop');

Line 97: Error_Handler.Write_Debug('Eff Dt '||to_char(p_eff_dt));

93: BEGIN
94: Error_Handler.Write_Debug('In Item Check Revisio' );
95: Error_Handler.Write_Debug('Item id '||to_char(p_item_id));
96: Error_Handler.Write_Debug('Org id '||to_char(p_org_id));
97: Error_Handler.Write_Debug('Eff Dt '||to_char(p_eff_dt));
98: FOR r1 IN c1
99: LOOP
100: Error_Handler.Write_Debug('In loop');
101: Return TRUE;

Line 100: Error_Handler.Write_Debug('In loop');

96: Error_Handler.Write_Debug('Org id '||to_char(p_org_id));
97: Error_Handler.Write_Debug('Eff Dt '||to_char(p_eff_dt));
98: FOR r1 IN c1
99: LOOP
100: Error_Handler.Write_Debug('In loop');
101: Return TRUE;
102: END LOOP;
103: Error_Handler.Write_Debug('Returning False' );
104: Return FALSE;

Line 103: Error_Handler.Write_Debug('Returning False' );

99: LOOP
100: Error_Handler.Write_Debug('In loop');
101: Return TRUE;
102: END LOOP;
103: Error_Handler.Write_Debug('Returning False' );
104: Return FALSE;
105: END;
106:
107:

Line 114: * the error handler is initialized.If the caller does not

110: * Parameters IN : p_parent_item_id parent item id
111: * p_child_item_id child item id
112: * p_organization_id org id.
113: * p_init_msg_list Default value is TRUE.By default
114: * the error handler is initialized.If the caller does not
115: * want the error handler to get initialized, the caller
116: * has to pass FALSE.
117: * Parameters OUT: x_return_status is FND_API.G_RET_STS_SUCCESS or
118: * FND_API.G_RET_STS_ERROR

Line 115: * want the error handler to get initialized, the caller

111: * p_child_item_id child item id
112: * p_organization_id org id.
113: * p_init_msg_list Default value is TRUE.By default
114: * the error handler is initialized.If the caller does not
115: * want the error handler to get initialized, the caller
116: * has to pass FALSE.
117: * Parameters OUT: x_return_status is FND_API.G_RET_STS_SUCCESS or
118: * FND_API.G_RET_STS_ERROR
119: * x_error_message The error message passed to the

Line 145: l_mesg_token_tbl Error_Handler.Mesg_Token_Tbl_Type;

141: l_child_item_type MTL_SYSTEM_ITEMS.ITEM_TYPE%TYPE;
142: l_parent_item_type_name FND_LOOKUP_VALUES_VL.MEANING%TYPE;
143: l_child_item_type_name FND_LOOKUP_VALUES_VL.MEANING%TYPE;
144: l_return_status VARCHAR2(1);
145: l_mesg_token_tbl Error_Handler.Mesg_Token_Tbl_Type;
146: l_token_tbl Error_Handler.Token_Tbl_Type;
147: l_message_list Error_Handler.Error_Tbl_Type;
148: l_parent_name VARCHAR2(700);
149: l_child_name VARCHAR2(700);

Line 146: l_token_tbl Error_Handler.Token_Tbl_Type;

142: l_parent_item_type_name FND_LOOKUP_VALUES_VL.MEANING%TYPE;
143: l_child_item_type_name FND_LOOKUP_VALUES_VL.MEANING%TYPE;
144: l_return_status VARCHAR2(1);
145: l_mesg_token_tbl Error_Handler.Mesg_Token_Tbl_Type;
146: l_token_tbl Error_Handler.Token_Tbl_Type;
147: l_message_list Error_Handler.Error_Tbl_Type;
148: l_parent_name VARCHAR2(700);
149: l_child_name VARCHAR2(700);
150:

Line 147: l_message_list Error_Handler.Error_Tbl_Type;

143: l_child_item_type_name FND_LOOKUP_VALUES_VL.MEANING%TYPE;
144: l_return_status VARCHAR2(1);
145: l_mesg_token_tbl Error_Handler.Mesg_Token_Tbl_Type;
146: l_token_tbl Error_Handler.Token_Tbl_Type;
147: l_message_list Error_Handler.Error_Tbl_Type;
148: l_parent_name VARCHAR2(700);
149: l_child_name VARCHAR2(700);
150:
151: BEGIN

Line 159: Error_Handler.Initialize;

155: -- Init Message List parameter
156: --
157: IF p_init_msg_list
158: THEN
159: Error_Handler.Initialize;
160: END IF;
161:
162:
163: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 238: Error_Handler.Add_Error_Token

234: l_token_tbl(3).token_value := l_child_name;
235: l_token_tbl(4).token_name := 'CHILD_ITEM_TYPE';
236: l_token_tbl(4).token_value := l_child_item_type_name;
237:
238: Error_Handler.Add_Error_Token
239: ( p_Message_Name => 'BOM_COMP_ASSOC_DENIED'
240: , p_Mesg_Token_Tbl => l_mesg_token_tbl
241: , x_Mesg_Token_Tbl => l_mesg_token_tbl
242: , p_Token_Tbl => l_token_tbl

Line 245: Error_Handler.Translate_And_Insert_Messages

241: , x_Mesg_Token_Tbl => l_mesg_token_tbl
242: , p_Token_Tbl => l_token_tbl
243: );
244:
245: Error_Handler.Translate_And_Insert_Messages
246: ( p_mesg_token_tbl => l_mesg_token_tbl
247: , p_application_id => 'BOM'
248: );
249:

Line 250: Error_Handler.Get_Message_List( x_message_list => l_message_list);

246: ( p_mesg_token_tbl => l_mesg_token_tbl
247: , p_application_id => 'BOM'
248: );
249:
250: Error_Handler.Get_Message_List( x_message_list => l_message_list);
251: x_error_message := l_message_list(1).Message_Text;
252: x_return_status := FND_API.G_RET_STS_ERROR;
253: -- dbms_output.put_line('RETURN STATUS WITH EXCEPTION '||l_return_status);
254: -- dbms_output.put_line('RETURN STATUS '||x_return_status);

Line 258: Error_Handler.Write_To_DebugFile;

254: -- dbms_output.put_line('RETURN STATUS '||x_return_status);
255: -- dbms_output.put_line('RETURN MESSAGE '||x_error_message);
256: IF p_init_msg_list
257: THEN
258: Error_Handler.Write_To_DebugFile;
259: Error_Handler.Close_Debug_Session;
260: END IF;
261: END IF;
262: END;

Line 259: Error_Handler.Close_Debug_Session;

255: -- dbms_output.put_line('RETURN MESSAGE '||x_error_message);
256: IF p_init_msg_list
257: THEN
258: Error_Handler.Write_To_DebugFile;
259: Error_Handler.Close_Debug_Session;
260: END IF;
261: END IF;
262: END;
263: ELSE

Line 297: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

293: * also perform any required cross entity validations
294: *******************************************************************/
295: PROCEDURE Check_Entity
296: ( x_return_status IN OUT NOCOPY VARCHAR2
297: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
298: , p_bom_component_rec IN Bom_Bo_Pub.Bom_Comps_Rec_Type
299: , p_bom_Comp_Unexp_Rec IN Bom_Bo_Pub.Bom_Comps_Unexposed_Rec_Type
300: , p_old_bom_Component_Rec IN Bom_Bo_Pub.Bom_Comps_Rec_Type
301: , p_old_bom_Comp_Unexp_Rec IN Bom_Bo_Pub.Bom_Comps_Unexposed_Rec_Type

Line 354: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

350: * cross entity validations will be performed.
351: ********************************************************************/
352: PROCEDURE Check_Attributes
353: ( x_return_status IN OUT NOCOPY VARCHAR2
354: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
355: , p_bom_component_rec IN Bom_Bo_Pub.Bom_Comps_Rec_Type
356: , p_bom_Comp_Unexp_Rec IN Bom_Bo_Pub.Bom_Comps_Unexposed_Rec_Type
357: )
358: IS

Line 382: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

378: END Check_Attributes;
379:
380: PROCEDURE Check_Entity_Delete
381: ( x_return_status IN OUT NOCOPY VARCHAR2
382: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
383: , p_bom_component_rec IN Bom_Bo_Pub.Bom_Comps_Rec_Type
384: , p_bom_Comp_Unexp_Rec IN Bom_Bo_Pub.Bom_Comps_Unexposed_Rec_Type
385: )
386: IS

Line 394: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

390:
391:
392: PROCEDURE Check_Required
393: ( x_return_status IN OUT NOCOPY VARCHAR2
394: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
395: , p_bom_component_rec IN Bom_Bo_Pub.Bom_Comps_Rec_Type
396: )
397: IS
398: l_rev_component_rec Bom_Bo_Pub.Rev_Component_Rec_Type;

Line 420: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

416: ( p_bom_component_rec IN Bom_Bo_Pub.Bom_Comps_Rec_Type
417: , p_bom_comp_unexp_rec IN Bom_Bo_Pub.Bom_Comps_Unexposed_Rec_Type
418: , x_old_bom_component_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Comps_Rec_Type
419: , x_old_bom_comp_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Comps_Unexposed_Rec_Type
420: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
421: , x_return_status IN OUT NOCOPY VARCHAR2
422: )
423: IS
424: l_rev_component_rec Bom_Bo_Pub.Rev_Component_Rec_Type;

Line 462: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

458:
459: PROCEDURE Check_ComponentCount
460: ( p_bom_component_rec IN Bom_Bo_Pub.Bom_Comps_Rec_Type
461: , p_bom_comp_unexp_rec IN Bom_Bo_Pub.Bom_Comps_Unexposed_Rec_Type
462: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
463: , x_Return_Status IN OUT NOCOPY VARCHAR2
464: )
465: IS
466:

Line 468: l_mesg_token_tbl Error_Handler.Mesg_Token_Tbl_type;

464: )
465: IS
466:
467: l_total NUMBER := 0;
468: l_mesg_token_tbl Error_Handler.Mesg_Token_Tbl_type;
469:
470: BEGIN
471:
472: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 485: Error_Handler.Add_Error_Token

481: IF l_total > BOM_GLOBALS.G_COMPS_LIMIT THEN
482: g_token_tbl(1).token_name := 'ASSEMBLY_ITEM_NAME';
483: g_token_tbl(1).token_value :=
484: p_bom_component_rec.assembly_item_name;
485: Error_Handler.Add_Error_Token
486: ( p_message_name => 'BOM_COMP_COUNT_EXCEEDS_LIMIT'
487: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
488: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
489: , p_Token_Tbl => g_Token_Tbl

Line 502: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

498:
499: PROCEDURE Check_Lineage
500: ( p_bom_component_rec IN Bom_Bo_Pub.Bom_Comps_Rec_Type
501: , p_bom_comp_unexp_rec IN Bom_Bo_Pub.Bom_Comps_Unexposed_Rec_Type
502: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
503: , x_Return_Status IN OUT NOCOPY VARCHAR2
504: )
505: IS
506: BEGIN

Line 525: , p_Mesg_Token_Tbl IN Error_Handler.Mesg_Token_Tbl_Type :=

521: PROCEDURE Check_Access
522: ( p_organization_id IN NUMBER
523: , p_component_item_id IN NUMBER
524: , p_component_name IN VARCHAR2
525: , p_Mesg_Token_Tbl IN Error_Handler.Mesg_Token_Tbl_Type :=
526: Error_Handler.G_MISS_MESG_TOKEN_TBL
527: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
528: , x_Return_Status IN OUT NOCOPY VARCHAR2
529: )

Line 526: Error_Handler.G_MISS_MESG_TOKEN_TBL

522: ( p_organization_id IN NUMBER
523: , p_component_item_id IN NUMBER
524: , p_component_name IN VARCHAR2
525: , p_Mesg_Token_Tbl IN Error_Handler.Mesg_Token_Tbl_Type :=
526: Error_Handler.G_MISS_MESG_TOKEN_TBL
527: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
528: , x_Return_Status IN OUT NOCOPY VARCHAR2
529: )
530: IS

Line 527: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

523: , p_component_item_id IN NUMBER
524: , p_component_name IN VARCHAR2
525: , p_Mesg_Token_Tbl IN Error_Handler.Mesg_Token_Tbl_Type :=
526: Error_Handler.G_MISS_MESG_TOKEN_TBL
527: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
528: , x_Return_Status IN OUT NOCOPY VARCHAR2
529: )
530: IS
531: l_bom_comp_item_type NUMBER;

Line 534: l_mesg_token_tbl Error_Handler.Mesg_Token_Tbl_type;

530: IS
531: l_bom_comp_item_type NUMBER;
532: l_OPM_org VARCHAR2(1);
533: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;
534: l_mesg_token_tbl Error_Handler.Mesg_Token_Tbl_type;
535: l_token_tbl Error_Handler.Token_Tbl_Type;
536: BEGIN
537: /*************************************************************
538: --

Line 535: l_token_tbl Error_Handler.Token_Tbl_Type;

531: l_bom_comp_item_type NUMBER;
532: l_OPM_org VARCHAR2(1);
533: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;
534: l_mesg_token_tbl Error_Handler.Mesg_Token_Tbl_type;
535: l_token_tbl Error_Handler.Token_Tbl_Type;
536: BEGIN
537: /*************************************************************
538: --
539: -- Check if the user has access to the revised component's

Line 558: Error_Handler.Add_Error_Token

554: /* Validations for OPM Convergence Project
555: Model/Option class items are not allowed in OPM organizations*/
556:
557: IF (l_OPM_org='Y' and l_bom_comp_item_type in ( Bom_Globals.G_MODEL, Bom_Globals.G_OPTION_CLASS))THEN
558: Error_Handler.Add_Error_Token
559: ( p_Message_name => 'BOM_OPM_ORG_MODEL_OC'
560: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
561: , x_mesg_token_tbl => l_mesg_token_tbl
562: );

Line 592: Error_Handler.Add_Error_Token

588: THEN
589: l_Token_Tbl(2).Token_Value := 'BOM_STANDARD';
590: END IF;
591:
592: Error_Handler.Add_Error_Token
593: ( p_Message_Name => 'BOM_BOM_COMP_ACCESS_DENIED'
594: , p_Mesg_Token_Tbl => l_mesg_token_tbl
595: , x_Mesg_Token_Tbl => l_mesg_token_tbl
596: , p_Token_Tbl => l_token_tbl

Line 627: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

623: * filled in, then the record would get an error.
624: ********************************************************************/
625: PROCEDURE Check_Required
626: ( x_return_status IN OUT NOCOPY VARCHAR2
627: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
628: , p_rev_component_rec IN Bom_Bo_Pub.Rev_Component_Rec_Type
629: )
630: IS
631: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

Line 631: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

627: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
628: , p_rev_component_rec IN Bom_Bo_Pub.Rev_Component_Rec_Type
629: )
630: IS
631: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
632: BEGIN
633: x_return_status := FND_API.G_RET_STS_SUCCESS;
634:
635: g_token_tbl(1).token_name := 'REVISED_COMPONENT_NAME';

Line 644: Error_Handler.Add_Error_Token

640: p_rev_component_rec.acd_type = FND_API.G_MISS_NUM
641: ) AND
642: Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_ECO_BO
643: THEN
644: Error_Handler.Add_Error_Token
645: ( p_message_name => 'BOM_ACD_TYPE_MISSING'
646: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
647: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
648: , p_Token_Tbl => g_Token_Tbl

Line 660: Error_Handler.Add_Error_Token

656: ( p_rev_component_rec.from_end_item_unit_number IS NULL OR
657: p_rev_component_rec.from_end_item_unit_number = FND_API.G_MISS_CHAR
658: )
659: THEN
660: Error_Handler.Add_Error_Token
661: ( p_message_name => 'BOM_EFFECTIVITY_MISSING'
662: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
663: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
664: , p_Token_Tbl => g_Token_Tbl

Line 872: ( p_Mesg_token_tbl IN Error_Handler.Mesg_Token_Tbl_Type

868: *Config Item No Yes No Yes No Yes No Yes
869: *
870: **********************************************************************/
871: FUNCTION Verify_Item_Attributes
872: ( p_Mesg_token_tbl IN Error_Handler.Mesg_Token_Tbl_Type
873: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type)
874: RETURN BOOLEAN
875: IS
876: dummy NUMBER;

Line 873: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type)

869: *
870: **********************************************************************/
871: FUNCTION Verify_Item_Attributes
872: ( p_Mesg_token_tbl IN Error_Handler.Mesg_Token_Tbl_Type
873: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type)
874: RETURN BOOLEAN
875: IS
876: dummy NUMBER;
877: l_allow_eng_comps VARCHAR2(10);

Line 878: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

874: RETURN BOOLEAN
875: IS
876: dummy NUMBER;
877: l_allow_eng_comps VARCHAR2(10);
878: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
879:
880: BEGIN
881: l_Mesg_Token_Tbl := p_Mesg_Token_Tbl;
882:

Line 895: Error_Handler.Add_Error_Token

891: --bug: 4161794
892: g_Comp_Eng_Flag = 'Y' and -- and component is Engineering
893: (l_allow_eng_comps is NULL or l_allow_eng_comps <> '1'))
894: THEN
895: Error_Handler.Add_Error_Token
896: ( x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
897: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
898: , p_message_name => 'BOM_ASSY_COMP_ENG_FLG_MISMATCH'
899: , p_Token_Tbl => g_Token_Tbl

Line 961: Error_Handler.Add_Error_Token

957: g_rev_component_rec.revised_item_name;
958:
959: IF g_Assy_Item_Type IN ( Bom_Globals.G_MODEL, Bom_Globals.G_OPTION_CLASS)
960: THEN
961: Error_Handler.Add_Error_Token
962: ( p_message_name => 'BOM_ATO_PROP_MISMATCH'
963: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
964: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
965: , p_Token_Tbl => g_Token_Tbl

Line 968: Error_Handler.Add_Error_Token

964: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
965: , p_Token_Tbl => g_Token_Tbl
966: );
967: ELSE
968: Error_Handler.Add_Error_Token
969: ( p_message_name => 'BOM_ATO_STD_PROP_MISMATCH'
970: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
971: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
972: , p_Token_Tbl => g_Token_Tbl

Line 1007: Error_Handler.Add_Error_Token

1003: g_token_tbl(2).token_name:='REVISED_ITEM_NAME';
1004: g_token_tbl(2).token_value :=
1005: g_rev_component_rec.revised_item_name;
1006:
1007: Error_Handler.Add_Error_Token
1008: ( p_message_name => 'BOM_CFG_SUPPLY_NOT_PHANTOM'
1009: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1010: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1011: , p_Token_Tbl => g_Token_Tbl

Line 1036: Error_Handler.Add_Error_Token

1032: g_token_tbl(2).token_name:= 'REVISED_ITEM_NAME';
1033: g_token_tbl(2).token_value :=
1034: g_rev_component_rec.revised_item_name;
1035:
1036: Error_Handler.Add_Error_Token
1037: ( p_message_name => 'BOM_CONFIG_PROP_MISMATCH'
1038: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1039: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1040: , p_Token_Tbl => g_Token_Tbl

Line 1079: Error_Handler.Add_Error_Token

1075: g_token_tbl(3).token_name := 'REVISED_ITEM_NAME';
1076: g_token_tbl(3).token_value :=
1077: g_rev_component_rec.revised_item_name;
1078:
1079: Error_Handler.Add_Error_Token
1080: ( p_message_name => 'BOM_MODEL_OC_PROP_MISMATCH'
1081: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1082: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1083: , p_Token_Tbl => g_Token_Tbl

Line 1123: Error_Handler.Add_Error_Token

1119: THEN
1120: g_token_tbl(2).token_name := 'REVISED_ITEM_NAME';
1121: g_token_tbl(2).token_value :=
1122: g_rev_component_rec.revised_item_name;
1123: Error_Handler.Add_Error_Token
1124: ( p_message_name => 'BOM_PTO_STD_PROP_MISMATCH'
1125: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1126: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1127: , p_Token_Tbl => g_Token_Tbl

Line 1156: Error_Handler.Add_Error_Token

1152: THEN
1153: g_token_tbl(2).token_name := 'REVISED_ITEM_NAME';
1154: g_token_tbl(2).token_value :=
1155: g_rev_component_rec.revised_item_name;
1156: Error_Handler.Add_Error_Token
1157: ( p_message_name => 'BOM_STANDARD_PROP_MISMATCH'
1158: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1159: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1160: , p_Token_Tbl => g_Token_Tbl

Line 1176: error_handler.write_debug('Check the ATP Components and ATP Check attribute.' );

1172: -- Once the matrix is verified then check the ATP Components
1173: -- and ATP Check attributes
1174:
1175: IF BOM_Globals.get_debug = 'Y' THEN
1176: error_handler.write_debug('Check the ATP Components and ATP Check attribute.' );
1177: error_handler.write_debug('Assy ATP Comp Flag : ' || g_Assy_ATP_Comp_flag );
1178: error_handler.write_debug('Comp ATP Check Flag : ' || g_Comp_Atp_Check_Flag );
1179: END IF;
1180:

Line 1177: error_handler.write_debug('Assy ATP Comp Flag : ' || g_Assy_ATP_Comp_flag );

1173: -- and ATP Check attributes
1174:
1175: IF BOM_Globals.get_debug = 'Y' THEN
1176: error_handler.write_debug('Check the ATP Components and ATP Check attribute.' );
1177: error_handler.write_debug('Assy ATP Comp Flag : ' || g_Assy_ATP_Comp_flag );
1178: error_handler.write_debug('Comp ATP Check Flag : ' || g_Comp_Atp_Check_Flag );
1179: END IF;
1180:
1181: IF ( g_Assy_ATP_Comp_flag = 'N' AND

Line 1178: error_handler.write_debug('Comp ATP Check Flag : ' || g_Comp_Atp_Check_Flag );

1174:
1175: IF BOM_Globals.get_debug = 'Y' THEN
1176: error_handler.write_debug('Check the ATP Components and ATP Check attribute.' );
1177: error_handler.write_debug('Assy ATP Comp Flag : ' || g_Assy_ATP_Comp_flag );
1178: error_handler.write_debug('Comp ATP Check Flag : ' || g_Comp_Atp_Check_Flag );
1179: END IF;
1180:
1181: IF ( g_Assy_ATP_Comp_flag = 'N' AND
1182: g_Comp_Atp_Check_Flag = 'Y'

Line 1189: Error_Handler.Add_Error_Token

1185: g_token_tbl(2).token_name := 'REVISED_ITEM_NAME';
1186: g_token_tbl(2).token_value :=
1187: g_rev_component_rec.revised_item_name;
1188:
1189: Error_Handler.Add_Error_Token
1190: ( p_message_name => 'BOM_ASSY_COMP_ATP_MISMATCH'
1191: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1192: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1193: , p_Token_Tbl => g_Token_Tbl

Line 1202: error_handler.write_debug('Check the ATP Components and ATP Check attribute.' );

1198: END IF;
1199: -- dbms_output.put_line('End of Item Attribute Validation . . .');
1200:
1201: IF BOM_Globals.get_debug = 'Y' THEN
1202: error_handler.write_debug('Check the ATP Components and ATP Check attribute.' );
1203: END IF;
1204:
1205: **************************************************************/
1206:

Line 1468: ( p_Mesg_Token_Tbl IN Error_Handler.Mesg_Token_Tbl_Type

1464: * 2. Wip_Supply_Type must be Phantom if the component is
1465: * Model or Option Class
1466: ********************************************************************/
1467: FUNCTION Check_Supply_Type
1468: ( p_Mesg_Token_Tbl IN Error_Handler.Mesg_Token_Tbl_Type
1469: , x_Mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type)
1470: RETURN BOOLEAN
1471: IS
1472: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

Line 1469: , x_Mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type)

1465: * Model or Option Class
1466: ********************************************************************/
1467: FUNCTION Check_Supply_Type
1468: ( p_Mesg_Token_Tbl IN Error_Handler.Mesg_Token_Tbl_Type
1469: , x_Mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type)
1470: RETURN BOOLEAN
1471: IS
1472: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
1473: BEGIN

Line 1472: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

1468: ( p_Mesg_Token_Tbl IN Error_Handler.Mesg_Token_Tbl_Type
1469: , x_Mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type)
1470: RETURN BOOLEAN
1471: IS
1472: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
1473: BEGIN
1474: l_Mesg_token_Tbl := p_Mesg_Token_Tbl;
1475:
1476: IF g_rev_component_rec.WIP_Supply_Type IS NOT NULL

Line 1496: Error_Handler.Add_Error_Token

1492: RETURN TRUE;
1493:
1494: EXCEPTION
1495: WHEN NO_DATA_FOUND THEN
1496: Error_Handler.Add_Error_Token
1497: ( p_message_name => 'BOM_NO_BILL'
1498: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1499: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1500: , p_message_type => 'W'

Line 1515: Error_Handler.Add_Error_Token

1511: IF g_Comp_Item_Type IN
1512: (l_MODEL, l_OPTION_CLASS) AND
1513: g_rev_component_rec.wip_supply_type <> 6
1514: THEN
1515: Error_Handler.Add_Error_Token
1516: ( p_message_name => 'BOM_WIP_SUPPLY_PHANTOM'
1517: ,p_Mesg_Token_Tbl=> l_Mesg_token_Tbl
1518: ,x_Mesg_Token_Tbl=> l_Mesg_Token_Tbl
1519: ,p_token_tbl => g_Token_Tbl

Line 1798: Error_Handler.Write_Debug('L_SUB_LOC_CONTROL :' || to_number( l_Sub_Locator_Control) );

1794: -- calling Check_Supply_SubInventory . . .');
1795:
1796:
1797: IF Bom_Globals.Get_Debug = 'Y' THEN
1798: Error_Handler.Write_Debug('L_SUB_LOC_CONTROL :' || to_number( l_Sub_Locator_Control) );
1799: Error_Handler.Write_Debug('Now calling Check SupplySubInv: '|| g_rev_component_rec.supply_subinventory );
1800: END IF;
1801:
1802: IF l_Sub_Locator_Control IS NULL AND

Line 1799: Error_Handler.Write_Debug('Now calling Check SupplySubInv: '|| g_rev_component_rec.supply_subinventory );

1795:
1796:
1797: IF Bom_Globals.Get_Debug = 'Y' THEN
1798: Error_Handler.Write_Debug('L_SUB_LOC_CONTROL :' || to_number( l_Sub_Locator_Control) );
1799: Error_Handler.Write_Debug('Now calling Check SupplySubInv: '|| g_rev_component_rec.supply_subinventory );
1800: END IF;
1801:
1802: IF l_Sub_Locator_Control IS NULL AND
1803: g_rev_component_rec.supply_subinventory IS NOT NULL

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

1802: IF l_Sub_Locator_Control IS NULL AND
1803: g_rev_component_rec.supply_subinventory IS NOT NULL
1804: THEN
1805:
1806: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1807: ('Now calling Check SupplySubInv. . .');
1808: END IF;
1809:
1810:

Line 2741: Error_Handler.Write_Debug('Check if the rev component is valid in Eco by Prod. . .' );

2737: l_to_wip_entity_id := BOM_Globals.Get_To_Wip_Entity_Id;
2738: l_from_cum_qty := BOM_Globals.Get_From_Cum_Qty;
2739:
2740: IF Bom_Globals.Get_Debug = 'Y' THEN
2741: Error_Handler.Write_Debug('Check if the rev component is valid in Eco by Prod. . .' );
2742: Error_Handler.Write_Debug('Lot Number in parent rev item : ' || l_lot_number );
2743: Error_Handler.Write_Debug('From WIP Entity Id in parent rev item : ' || to_char(l_from_wip_entity_id) );
2744: Error_Handler.Write_Debug('To WIP Entity Id in parent rev item : ' || to_char(l_to_wip_entity_id) );
2745: Error_Handler.Write_Debug('Cum Qty in parent rev item : ' || to_char(l_from_cum_qty) );

Line 2742: Error_Handler.Write_Debug('Lot Number in parent rev item : ' || l_lot_number );

2738: l_from_cum_qty := BOM_Globals.Get_From_Cum_Qty;
2739:
2740: IF Bom_Globals.Get_Debug = 'Y' THEN
2741: Error_Handler.Write_Debug('Check if the rev component is valid in Eco by Prod. . .' );
2742: Error_Handler.Write_Debug('Lot Number in parent rev item : ' || l_lot_number );
2743: Error_Handler.Write_Debug('From WIP Entity Id in parent rev item : ' || to_char(l_from_wip_entity_id) );
2744: Error_Handler.Write_Debug('To WIP Entity Id in parent rev item : ' || to_char(l_to_wip_entity_id) );
2745: Error_Handler.Write_Debug('Cum Qty in parent rev item : ' || to_char(l_from_cum_qty) );
2746: END IF;

Line 2743: Error_Handler.Write_Debug('From WIP Entity Id in parent rev item : ' || to_char(l_from_wip_entity_id) );

2739:
2740: IF Bom_Globals.Get_Debug = 'Y' THEN
2741: Error_Handler.Write_Debug('Check if the rev component is valid in Eco by Prod. . .' );
2742: Error_Handler.Write_Debug('Lot Number in parent rev item : ' || l_lot_number );
2743: Error_Handler.Write_Debug('From WIP Entity Id in parent rev item : ' || to_char(l_from_wip_entity_id) );
2744: Error_Handler.Write_Debug('To WIP Entity Id in parent rev item : ' || to_char(l_to_wip_entity_id) );
2745: Error_Handler.Write_Debug('Cum Qty in parent rev item : ' || to_char(l_from_cum_qty) );
2746: END IF;
2747:

Line 2744: Error_Handler.Write_Debug('To WIP Entity Id in parent rev item : ' || to_char(l_to_wip_entity_id) );

2740: IF Bom_Globals.Get_Debug = 'Y' THEN
2741: Error_Handler.Write_Debug('Check if the rev component is valid in Eco by Prod. . .' );
2742: Error_Handler.Write_Debug('Lot Number in parent rev item : ' || l_lot_number );
2743: Error_Handler.Write_Debug('From WIP Entity Id in parent rev item : ' || to_char(l_from_wip_entity_id) );
2744: Error_Handler.Write_Debug('To WIP Entity Id in parent rev item : ' || to_char(l_to_wip_entity_id) );
2745: Error_Handler.Write_Debug('Cum Qty in parent rev item : ' || to_char(l_from_cum_qty) );
2746: END IF;
2747:
2748:

Line 2745: Error_Handler.Write_Debug('Cum Qty in parent rev item : ' || to_char(l_from_cum_qty) );

2741: Error_Handler.Write_Debug('Check if the rev component is valid in Eco by Prod. . .' );
2742: Error_Handler.Write_Debug('Lot Number in parent rev item : ' || l_lot_number );
2743: Error_Handler.Write_Debug('From WIP Entity Id in parent rev item : ' || to_char(l_from_wip_entity_id) );
2744: Error_Handler.Write_Debug('To WIP Entity Id in parent rev item : ' || to_char(l_to_wip_entity_id) );
2745: Error_Handler.Write_Debug('Cum Qty in parent rev item : ' || to_char(l_from_cum_qty) );
2746: END IF;
2747:
2748:
2749: -- Check if comp exists in ECO by Lot

Line 2766: Error_Handler.Write_Debug('In Eco by Lot Number, this rev component is invalid. . .' );

2762: )
2763: LOOP
2764:
2765: IF Bom_Globals.Get_Debug = 'Y' THEN
2766: Error_Handler.Write_Debug('In Eco by Lot Number, this rev component is invalid. . .' );
2767: END IF;
2768: l_ret_status := FALSE ;
2769: END LOOP ;
2770:

Line 2786: Error_Handler.Write_Debug('In Eco by Cum Qty, this rev component is invalid. . .' );

2782: , p_operation_seq_num => p_operation_seq_num )
2783: LOOP
2784:
2785: IF Bom_Globals.Get_Debug = 'Y' THEN
2786: Error_Handler.Write_Debug('In Eco by Cum Qty, this rev component is invalid. . .' );
2787: END IF;
2788:
2789: l_ret_status := FALSE ;
2790: END LOOP ;

Line 2807: Error_Handler.Write_Debug('In Eco by range work order, this rev component is invalid. . .' );

2803: , p_organization_id => p_organization_Id )
2804: LOOP
2805:
2806: IF Bom_Globals.Get_Debug = 'Y' THEN
2807: Error_Handler.Write_Debug('In Eco by range work order, this rev component is invalid. . .' );
2808: END IF;
2809:
2810: l_ret_status := FALSE ;
2811: END LOOP ;

Line 2820: Error_Handler.Write_Debug('Parent revised item is not Eco by production. . .' );

2816: AND l_from_cum_qty IS NULL
2817: THEN
2818:
2819: IF Bom_Globals.Get_Debug = 'Y' THEN
2820: Error_Handler.Write_Debug('Parent revised item is not Eco by production. . .' );
2821: END IF;
2822:
2823: NULL ;
2824:

Line 3058: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

3054: * does not invalidate some other columns.
3055: **********************************************************************/
3056: PROCEDURE Check_Entity
3057: ( x_return_status IN OUT NOCOPY VARCHAR2
3058: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
3059: , p_rev_component_rec IN Bom_Bo_Pub.Rev_Component_Rec_Type
3060: , p_Rev_Comp_Unexp_Rec IN Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type
3061: , p_control_rec IN BOM_BO_PUB.Control_Rec_Type
3062: := BOM_BO_PUB.G_DEFAULT_CONTROL_REC

Line 3073: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

3069: l_processed BOOLEAN;
3070: l_result NUMBER;
3071: l_Err_Text VARCHAR2(2000);
3072: l_bom_item_type NUMBER;
3073: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
3074: l_is_comp_unit_Controlled BOOLEAN := FALSE;
3075: l_is_item_unit_controlled BOOLEAN := FALSE;
3076: l_debug_error_mesg VARCHAR2(2000);
3077: l_new_compare_date DATE;

Line 3080: l_Token_Tbl Error_Handler.Token_Tbl_Type;

3076: l_debug_error_mesg VARCHAR2(2000);
3077: l_new_compare_date DATE;
3078: l_new_op_seq_num NUMBER; --added for bug 9920911
3079: l_total_rds NUMBER;
3080: l_Token_Tbl Error_Handler.Token_Tbl_Type;
3081: l_Structure_Type_Name VARCHAR2(30);
3082:
3083: --bug 14351192 added local variable below
3084: l_RC_Duplicate_Comps NUMBER :=0;

Line 3240: Error_Handler.Add_Error_Token

3236: where nvl(p_rev_component_rec.acd_type,1) <>3 and component_sequence_id=p_Rev_Comp_Unexp_Rec.component_sequence_id;
3237: IF(l_total_rds <>0) THEN
3238: l_Token_Tbl(1).Token_Name := 'REVISED_COMPONENT_NAME';
3239: l_Token_Tbl(1).Token_Value := p_rev_component_rec.component_item_name;
3240: Error_Handler.Add_Error_Token
3241: ( x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3242: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3243: , p_message_name => 'BOM_LOT_BASED_RDS'
3244: , p_Token_Tbl => l_Token_Tbl

Line 3255: Error_Handler.Write_Debug('Performing Revised component Entity Validation. . .');

3251:
3252:
3253: IF Bom_Globals.Get_Debug = 'Y'
3254: THEN
3255: Error_Handler.Write_Debug('Performing Revised component Entity Validation. . .');
3256: END IF;
3257:
3258: l_is_comp_unit_controlled := BOM_GLOBALS.Get_Unit_Controlled_Component;
3259: l_is_item_unit_controlled := BOM_GLOBALS.Get_Unit_Controlled_Item;

Line 3262: Error_Handler.Write_Debug('Checked if revised item is unit controlled. . .');

3258: l_is_comp_unit_controlled := BOM_GLOBALS.Get_Unit_Controlled_Component;
3259: l_is_item_unit_controlled := BOM_GLOBALS.Get_Unit_Controlled_Item;
3260:
3261: IF Bom_Globals.Get_Debug = 'Y' THEN
3262: Error_Handler.Write_Debug('Checked if revised item is unit controlled. . .');
3263: Error_Handler.Write_Debug('Org id: ' || to_char(g_rev_Comp_Unexp_Rec.Organization_Id));
3264: Error_Handler.Write_Debug('Item id: ' || to_char(g_rev_Comp_Unexp_Rec.revised_item_id));
3265: Error_Handler.Write_Debug('Comp id: ' || to_char(g_rev_Comp_Unexp_Rec.Component_item_id));
3266: Error_Handler.Write_Debug('Trans type: ' || g_rev_component_rec.transaction_type);

Line 3263: Error_Handler.Write_Debug('Org id: ' || to_char(g_rev_Comp_Unexp_Rec.Organization_Id));

3259: l_is_item_unit_controlled := BOM_GLOBALS.Get_Unit_Controlled_Item;
3260:
3261: IF Bom_Globals.Get_Debug = 'Y' THEN
3262: Error_Handler.Write_Debug('Checked if revised item is unit controlled. . .');
3263: Error_Handler.Write_Debug('Org id: ' || to_char(g_rev_Comp_Unexp_Rec.Organization_Id));
3264: Error_Handler.Write_Debug('Item id: ' || to_char(g_rev_Comp_Unexp_Rec.revised_item_id));
3265: Error_Handler.Write_Debug('Comp id: ' || to_char(g_rev_Comp_Unexp_Rec.Component_item_id));
3266: Error_Handler.Write_Debug('Trans type: ' || g_rev_component_rec.transaction_type);
3267: END IF;

Line 3264: Error_Handler.Write_Debug('Item id: ' || to_char(g_rev_Comp_Unexp_Rec.revised_item_id));

3260:
3261: IF Bom_Globals.Get_Debug = 'Y' THEN
3262: Error_Handler.Write_Debug('Checked if revised item is unit controlled. . .');
3263: Error_Handler.Write_Debug('Org id: ' || to_char(g_rev_Comp_Unexp_Rec.Organization_Id));
3264: Error_Handler.Write_Debug('Item id: ' || to_char(g_rev_Comp_Unexp_Rec.revised_item_id));
3265: Error_Handler.Write_Debug('Comp id: ' || to_char(g_rev_Comp_Unexp_Rec.Component_item_id));
3266: Error_Handler.Write_Debug('Trans type: ' || g_rev_component_rec.transaction_type);
3267: END IF;
3268:

Line 3265: Error_Handler.Write_Debug('Comp id: ' || to_char(g_rev_Comp_Unexp_Rec.Component_item_id));

3261: IF Bom_Globals.Get_Debug = 'Y' THEN
3262: Error_Handler.Write_Debug('Checked if revised item is unit controlled. . .');
3263: Error_Handler.Write_Debug('Org id: ' || to_char(g_rev_Comp_Unexp_Rec.Organization_Id));
3264: Error_Handler.Write_Debug('Item id: ' || to_char(g_rev_Comp_Unexp_Rec.revised_item_id));
3265: Error_Handler.Write_Debug('Comp id: ' || to_char(g_rev_Comp_Unexp_Rec.Component_item_id));
3266: Error_Handler.Write_Debug('Trans type: ' || g_rev_component_rec.transaction_type);
3267: END IF;
3268:
3269: -- First Query all the attributes for the Assembly item and

Line 3266: Error_Handler.Write_Debug('Trans type: ' || g_rev_component_rec.transaction_type);

3262: Error_Handler.Write_Debug('Checked if revised item is unit controlled. . .');
3263: Error_Handler.Write_Debug('Org id: ' || to_char(g_rev_Comp_Unexp_Rec.Organization_Id));
3264: Error_Handler.Write_Debug('Item id: ' || to_char(g_rev_Comp_Unexp_Rec.revised_item_id));
3265: Error_Handler.Write_Debug('Comp id: ' || to_char(g_rev_Comp_Unexp_Rec.Component_item_id));
3266: Error_Handler.Write_Debug('Trans type: ' || g_rev_component_rec.transaction_type);
3267: END IF;
3268:
3269: -- First Query all the attributes for the Assembly item and
3270: -- component item.

Line 3355: Error_Handler.Add_Error_Token

3351: g_Comp_Item_Type = Bom_Globals.G_STANDARD
3352:
3353: THEN
3354:
3355: Error_Handler.Add_Error_Token
3356: ( p_message_name => 'BOM_KIT_COMP_PRF_NOT_SET'
3357: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3358: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3359: , p_Token_Tbl => g_Token_Tbl

Line 3380: Error_Handler.Add_Error_Token

3376: g_Comp_Item_Type = Bom_Globals.G_STANDARD AND
3377: g_Rev_Component_Rec.optional = 2
3378:
3379: THEN
3380: Error_Handler.Add_Error_Token
3381: ( p_message_name => 'BOM_MODEL_COMP_PRF_NOT_SET'
3382: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3383: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3384: , p_Token_Tbl => g_Token_Tbl

Line 3407: Error_Handler.Add_Error_Token

3403: g_Comp_Item_Type = Bom_Globals.G_STANDARD AND
3404: nvl(g_Rev_Component_Rec.optional,1) = 2
3405:
3406: THEN
3407: Error_Handler.Add_Error_Token
3408: ( p_message_name => 'BOM_MODEL_COMP_PRF_NOT_SET'
3409: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3410: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3411: , p_Token_Tbl => g_Token_Tbl

Line 3453: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Check Eco Status . . .' || l_return_status); END IF;

3449: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3450: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3451: END;
3452: END IF;
3453: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Check Eco Status . . .' || l_return_status); END IF;
3454:
3455: -- Added by MK on 01/26/2001 for ECO New Effectivities
3456: -- Verify the ECO Effectivity, If ECO by WO, Lot Num, Or Cum Qty, then
3457: -- Check if the component exists in the WO or Lot Num.

Line 3478: Error_Handler.Add_Error_Token

3474: g_token_tbl(2).token_name := 'REVISED_COMPONENT_NAME';
3475: g_token_tbl(2).token_value :=
3476: g_rev_component_rec.component_item_name;
3477:
3478: Error_Handler.Add_Error_Token
3479: ( p_message_name => 'BOM_CMP_RIT_ECO_WO_EFF_INVALID'
3480: , p_mesg_token_tbl => l_Mesg_Token_Tbl
3481: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3482: , p_token_tbl => g_token_tbl

Line 3490: Error_Handler.Write_Debug('Check if the rev component is valid in Eco by Prod. . .' || l_return_status);

3486: g_Token_Tbl(1).Token_Name := 'REVISED_COMPONENT_NAME';
3487: g_Token_Tbl(1).Token_Value := p_rev_component_rec.component_item_name;
3488: END IF ;
3489: IF Bom_Globals.Get_Debug = 'Y' THEN
3490: Error_Handler.Write_Debug('Check if the rev component is valid in Eco by Prod. . .' || l_return_status);
3491: END IF;
3492: END IF ;
3493:
3494:

Line 3511: Error_Handler.Add_Error_Token

3507: g_token_tbl.delete;
3508: g_token_tbl(1).token_name := 'REVISED_COMPONENT_NAME';
3509: g_token_tbl(1).token_value :=
3510: g_rev_component_rec.component_item_name;
3511: Error_Handler.Add_Error_Token
3512: ( p_message_name => 'BOM_TOUNIT_LESS_THAN_FROMUNIT'
3513: , p_mesg_token_tbl => l_Mesg_Token_Tbl
3514: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3515: , p_token_tbl => g_token_tbl

Line 3520: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Check to end item unit number. . .' || l_return_status); END IF;

3516: );
3517:
3518: l_return_status := FND_API.G_RET_STS_ERROR;
3519:
3520: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Check to end item unit number. . .' || l_return_status); END IF;
3521:
3522: END IF;
3523:
3524: --

Line 3534: Error_Handler.Add_Error_Token

3530: g_token_tbl(1).token_name := 'REVISED_ITEM_NAME';
3531: g_token_tbl(1).token_value :=
3532: g_rev_component_rec.revised_item_name;
3533:
3534: Error_Handler.Add_Error_Token
3535: ( p_message_name => 'BOM_REV_ITEM_BOM_NOT_ENABLED'
3536: , p_mesg_token_tbl => l_Mesg_Token_Tbl
3537: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3538: , p_token_tbl => g_token_tbl

Line 3574: Error_Handler.Add_Error_Token

3570: g_token_tbl(1).token_name := 'REVISED_COMPONENT_NAME';
3571: g_token_tbl(1).token_value :=
3572: g_rev_component_rec.component_item_name;
3573:
3574: Error_Handler.Add_Error_Token
3575: ( p_message_name => 'BOM_DISABLE_TOUNIT_INVALID'
3576: , p_mesg_token_tbl => l_Mesg_Token_Tbl
3577: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3578: , p_token_tbl => g_token_tbl

Line 3605: Error_Handler.Add_Error_Token

3601: g_token_tbl(2).token_name := 'REVISED_ITEM_NAME';
3602: g_token_tbl(2).token_value :=
3603: g_rev_component_rec.revised_item_name;
3604:
3605: Error_Handler.Add_Error_Token
3606: ( p_message_name => 'BOM_CMP_UNIT_RIT_NOT_UNIT'
3607: , p_mesg_token_tbl => l_Mesg_Token_Tbl
3608: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3609: , p_token_tbl => g_token_tbl

Line 3629: Error_Handler.Add_Error_Token

3625: g_token_tbl(1).token_name := 'REVISED_ITEM_NAME';
3626: g_token_tbl(1).token_value :=
3627: g_rev_component_rec.revised_item_name;
3628:
3629: Error_Handler.Add_Error_Token
3630: ( p_message_name => 'BOM_CMP_UNIT_TYPE_NOT_VALID'
3631: , p_mesg_token_tbl => l_Mesg_Token_Tbl
3632: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3633: , p_token_tbl => g_token_tbl

Line 3648: Error_Handler.Add_Error_Token

3644: g_token_tbl(1).token_name := 'REVISED_ITEM_NAME';
3645: g_token_tbl(1).token_value :=
3646: g_rev_component_rec.revised_item_name;
3647:
3648: Error_Handler.Add_Error_Token
3649: ( p_message_name => 'BOM_REV_ITEM_BOM_NOT_ENABLED'
3650: , p_mesg_token_tbl => l_Mesg_Token_Tbl
3651: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3652: , p_token_tbl => g_token_tbl

Line 3663: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('ACD type to be add if primary bill does not exist . . .'); END IF;

3659:
3660: END IF; */
3661: IF NOT Check_PrimaryBill AND Nvl(Bom_Globals.Get_Validate_For_Plm,'N') = 'N'
3662: THEN
3663: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('ACD type to be add if primary bill does not exist . . .'); END IF;
3664: IF NVL(p_rev_component_rec.acd_type, 1) <> 1 AND
3665: Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_ECO_BO
3666: THEN
3667: /*****************************************************

Line 3676: Error_Handler.Add_Error_Token

3672: ******************************************************/
3673: IF FND_MSG_PUB.Check_Msg_Level
3674: (FND_MSG_PUB.G_MSG_LVL_ERROR)
3675: THEN
3676: Error_Handler.Add_Error_Token
3677: ( p_message_name => 'BOM_CMP_ACD_TYPE_ADD'
3678: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3679: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3680: , p_token_tbl => g_token_tbl

Line 3710: Error_Handler.Add_Error_Token

3706: THEN
3707: g_token_tbl(2).token_name := 'REVISED_ITEM_NAME';
3708: g_token_tbl(2).token_value :=
3709: p_rev_component_rec.revised_item_name;
3710: Error_Handler.Add_Error_Token
3711: ( p_Message_Name => 'BOM_BILL_COMMON'
3712: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3713: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3714: , p_Token_Tbl => g_Token_Tbl

Line 3737: Error_Handler.Add_Error_Token

3733: THEN
3734: g_token_tbl(2).token_name := 'REVISED_ITEM_NAME';
3735: g_token_tbl(2).token_value :=
3736: p_rev_component_rec.revised_item_name;
3737: Error_Handler.Add_Error_Token
3738: ( p_Message_Name => 'BOM_BILL_COMMON'
3739: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3740: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3741: , p_Token_Tbl => g_Token_Tbl

Line 3750: Error_Handler.Add_Error_Token

3746: WHEN OTHERS THEN
3747: IF FND_MSG_PUB.Check_Msg_Level
3748: (FND_MSG_PUB.G_MSG_LVL_ERROR)
3749: THEN
3750: Error_Handler.Add_Error_Token
3751: ( p_message_name => NULL
3752: , p_message_text => 'Common Bill Check ' ||
3753: SUBSTR(SQLERRM, 1, 30) || ' '||
3754: TO_CHAR(SQLCODE)

Line 3778: Error_Handler.Add_Error_Token

3774: g_token_tbl(1).token_name := 'REVISED_ITEM_NAME';
3775: g_token_tbl(1).token_value :=
3776: g_rev_component_rec.revised_item_name;
3777:
3778: Error_Handler.Add_Error_Token
3779: ( x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3780: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3781: , p_Message_name => 'BOM_COMP_SAME_AS_BILL'
3782: , p_token_tbl => g_token_tbl

Line 3827: Error_Handler.Add_Error_Token

3823: and operation_seq_num = p_rev_component_rec.Operation_Sequence_Number
3824: and rownum=1
3825: order by effectivity_date asc;
3826:
3827: Error_Handler.Add_Error_Token
3828: ( x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3829: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3830: , p_Message_name => 'BOM_COMPONENT_OVERLAPS'
3831: , p_token_tbl => g_token_tbl

Line 3855: Error_Handler.Add_Error_Token

3851: -- Check if ACD type is not Disable or Update
3852: IF( nvl(p_rev_component_rec.acd_type, 1) NOT IN (2 , 3)) THEN -- Change or Disable
3853: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3854: THEN
3855: Error_Handler.Add_Error_Token
3856: ( x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3857: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3858: , p_Message_name => 'BOM_COMP_ITEM_BOM_NOT_ENABLED'
3859: , p_token_tbl => g_token_tbl

Line 3908: Error_Handler.Add_Error_Token

3904: END LOOP;
3905: END IF;
3906:
3907: IF item_num_for_bill = 1 THEN
3908: Error_Handler.Add_Error_Token
3909: ( x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3910: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3911: , p_message_name => 'BOM_ITEM_NUM_NOT_UNIQUE'
3912: , p_Token_Tbl => g_Token_Tbl

Line 3935: Error_Handler.Add_Error_Token

3931: IF g_Comp_Item_Type = 5
3932: THEN
3933: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3934: THEN
3935: Error_Handler.Add_Error_Token
3936: ( p_message_name => 'BOM_ITEM_PRODUCT_FAMILY'
3937: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3938: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3939: , p_token_tbl => g_token_tbl

Line 3952: error_handler.write_debug('Check Item Attribute Validation. . .' || l_Return_Status );

3948: l_return_status := FND_API.G_RET_STS_ERROR;
3949: END IF;
3950:
3951: IF BOM_Globals.get_debug = 'Y' THEN
3952: error_handler.write_debug('Check Item Attribute Validation. . .' || l_Return_Status );
3953: END IF;
3954:
3955: -- Verify if the revised item is being referenced as common in
3956: -- other orgs then it satisfies all the criteria required for the

Line 3963: error_handler.write_debug(' Check if custom hook enabled: ' || BOM_PUB_COMMON_COMP.GET_CUSTOM_MODE(1.0) );

3959:
3960: -- Bug 10094436 - pim-ait integration: provide custom hook to ait for item org assignment
3961: --- custom hook API called for sun-integration
3962: IF BOM_Globals.get_debug = 'Y' THEN
3963: error_handler.write_debug(' Check if custom hook enabled: ' || BOM_PUB_COMMON_COMP.GET_CUSTOM_MODE(1.0) );
3964: END IF;
3965:
3966: if BOM_PUB_COMMON_COMP.GET_CUSTOM_MODE(1.0) = 'Y' then
3967: IF BOM_Globals.get_debug = 'Y' THEN

Line 3968: error_handler.write_debug(' Before calling custom hook BOM_PUB_COMMON_COMP.ASSIGN_COMP_TO_ORGS assign component ' || g_rev_comp_Unexp_rec.component_item_id || ' - ' || to_char(sysdate, 'YYYY-MM-DD hh24:mi:ss') );

3964: END IF;
3965:
3966: if BOM_PUB_COMMON_COMP.GET_CUSTOM_MODE(1.0) = 'Y' then
3967: IF BOM_Globals.get_debug = 'Y' THEN
3968: error_handler.write_debug(' Before calling custom hook BOM_PUB_COMMON_COMP.ASSIGN_COMP_TO_ORGS assign component ' || g_rev_comp_Unexp_rec.component_item_id || ' - ' || to_char(sysdate, 'YYYY-MM-DD hh24:mi:ss') );
3969: END IF;
3970:
3971: BOM_PUB_COMMON_COMP.ASSIGN_COMP_TO_ORGS(
3972: p_api_version => 1.0,

Line 3983: error_handler.write_debug('After calling custom hook BOM_PUB_COMMON_COMP.ASSIGN_COMP_TO_ORGS - ' || to_char(sysdate, 'YYYY-MM-DD hh24:mi:ss') );

3979: x_return_status => l_return_status,
3980: x_Mesg_Token_Tbl => l_Mesg_Token_Tbl) ;
3981:
3982: IF BOM_Globals.get_debug = 'Y' THEN
3983: error_handler.write_debug('After calling custom hook BOM_PUB_COMMON_COMP.ASSIGN_COMP_TO_ORGS - ' || to_char(sysdate, 'YYYY-MM-DD hh24:mi:ss') );
3984: END IF;
3985: end if;
3986:
3987:

Line 3990: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Check Common_Other_Orgs returned with result ' || to_char(l_result)); END IF;

3986:
3987:
3988: l_result := Check_Common_Other_Orgs;
3989:
3990: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Check Common_Other_Orgs returned with result ' || to_char(l_result)); END IF;
3991:
3992: IF l_result <> 0
3993: THEN
3994: IF l_result = 1

Line 4007: Error_Handler.Add_Error_Token

4003: END IF;
4004:
4005: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
4006: THEN
4007: Error_Handler.Add_Error_Token
4008: ( p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4009: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4010: , p_message_name => l_err_text
4011: , p_token_tbl => g_token_tbl

Line 4037: Error_Handler.Add_Error_Token

4033: p_rev_component_rec.shipping_allowed
4034: THEN
4035: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
4036: THEN
4037: Error_Handler.Add_Error_Token
4038: ( p_message_name => 'BOM_SHIP_ALLOWED_NOT_UPDATE'
4039: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4040: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4041: , p_token_tbl => g_token_tbl

Line 4063: Error_Handler.Add_Error_Token

4059: --if the change on common bom is only in the wip attributes,
4060: --allow it.
4061: NULL;
4062: ELSE
4063: Error_Handler.Add_Error_Token
4064: ( p_message_name => 'BOM_INVALID_COMMON_BOM_CHANGE'
4065: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4066: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4067: , p_token_tbl => g_token_tbl

Line 4083: Error_Handler.Add_Error_Token

4079: IF Check_Optional_For_Comp_Ops
4080: THEN
4081: g_token_tbl(1).token_name := 'COMPONENT_ITEM_NAME';
4082: g_token_tbl(1).token_value := p_rev_component_rec.component_item_name;
4083: Error_Handler.Add_Error_Token
4084: ( p_message_name => 'BOM_COMP_OPERATION_EXIST'
4085: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4086: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4087: , p_token_tbl => g_token_tbl

Line 4101: Error_Handler.Add_Error_Token

4097: Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_ECO_BO
4098: THEN
4099: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
4100: THEN
4101: Error_Handler.Add_Error_Token
4102: ( p_message_name => 'BOM_OLD_EFFECTIVITY_GIVEN'
4103: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4104: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4105: , p_token_tbl => g_token_tbl

Line 4119: Error_Handler.Add_Error_Token

4115: Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_ECO_BO
4116: THEN
4117: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
4118: THEN
4119: Error_Handler.Add_Error_Token
4120: ( p_message_name => 'BOM_OLD_OP_SEQ_NUM_GIVEN'
4121: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4122: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4123: , p_token_tbl => g_token_tbl

Line 4138: Error_Handler.Add_Error_Token

4134: Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_ECO_BO
4135: THEN
4136: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
4137: THEN
4138: Error_Handler.Add_Error_Token
4139: ( p_message_name => 'BOM_ACD_TYPE_NOT_UPDATEABLE'
4140: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4141: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4142: , p_token_tbl => g_token_tbl

Line 4157: Error_Handler.Add_Error_Token

4153: Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_ECO_BO
4154: THEN
4155: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
4156: THEN
4157: Error_Handler.Add_Error_Token
4158: ( p_message_name => 'BOM_COMPONENT_DISABLED'
4159: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4160: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4161: , p_token_tbl => g_token_tbl

Line 4176: Error_Handler.Add_Error_Token

4172: p_old_rev_component_rec.to_end_item_unit_number
4173: THEN
4174: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
4175: THEN
4176: Error_Handler.Add_Error_Token
4177: ( p_message_name => 'BOM_DISABLE_TOUNIT_NONUPD'
4178: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4179: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4180: , p_token_tbl => g_token_tbl

Line 4223: Error_Handler.Add_Error_Token

4219: g_token_tbl(2).token_name :=
4220: 'REVISED_ITEM_NAME';
4221: g_token_tbl(2).token_value :=
4222: g_rev_component_Rec.revised_item_name;
4223: Error_Handler.Add_Error_Token
4224: ( p_Message_Name => 'BOM_COMP_YIELD_NOT_ONE'
4225: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4226: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4227: , p_Token_Tbl => g_Token_Tbl

Line 4243: Error_Handler.Add_Error_Token

4239: g_token_tbl(2).token_name :=
4240: 'REVISED_ITEM_NAME';
4241: g_token_tbl(2).token_value :=
4242: g_rev_component_Rec.revised_item_name;
4243: Error_Handler.Add_Error_Token
4244: ( p_Message_Name => 'BOM_COMP_YIELD_NOT_NEGATIVE'
4245: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4246: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4247: , p_Token_Tbl => g_Token_Tbl

Line 4261: Error_Handler.Add_Error_Token

4257: (FND_MSG_PUB.G_MSG_LVL_ERROR)
4258: THEN
4259: -- Log warning
4260:
4261: Error_Handler.Add_Error_Token
4262: ( p_Message_Name => 'BOM_YIELD_WARNING'
4263: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4264: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4265: , p_message_type => 'W'

Line 4276: Error_Handler.Add_Error_Token

4272:
4273: IF not(p_rev_component_rec.BASIS_TYPE is null or p_rev_component_rec.BASIS_TYPE=2
4274: or p_rev_component_rec.BASIS_TYPE =FND_API.G_MISS_NUM)
4275: THEN
4276: Error_Handler.Add_Error_Token
4277: ( p_Message_Name => 'BOM_BASIS_TYPE_INVALID'
4278: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4279: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4280: , p_message_type => 'E'

Line 4290: Error_Handler.Add_Error_Token

4286: -- WIP supply type is Phantom. Basis_type can not be lot for Model/OC items
4287:
4288: IF (p_rev_component_rec.WIP_SUPPLY_TYPE =6 AND p_rev_component_rec.BASIS_TYPE=2)
4289: THEN
4290: Error_Handler.Add_Error_Token
4291: ( p_Message_Name => 'BOM_LOT_BASED_PHANTOM'
4292: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4293: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4294: , p_message_type => 'E'

Line 4301: Error_Handler.Add_Error_Token

4297: END IF;
4298:
4299: -- For Components of PTO Kits, Models, Option Classes, Basis type should be item.
4300: IF(g_Assy_PTO_flag ='Y' and p_rev_component_rec.BASIS_TYPE=2) then
4301: Error_Handler.Add_Error_Token
4302: ( p_Message_Name => 'BOM_LOT_BASED_PTO'
4303: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4304: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4305: , p_message_type => 'E'

Line 4315: Error_Handler.Add_Error_Token

4311: -- components should not be lot based.
4312: IF ( p_rev_component_rec.BASIS_TYPE=2
4313: and (p_rev_component_rec.OPTIONAL=1
4314: or g_Comp_Item_Type in (Bom_Globals.G_MODEL, Bom_Globals.G_OPTION_CLASS) )) THEN
4315: Error_Handler.Add_Error_Token
4316: ( p_Message_Name => 'BOM_LOT_BASED_ATO'
4317: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4318: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4319: , p_message_type => 'E'

Line 4327: Error_Handler.Add_Error_Token

4323:
4324: /* Validations for OPM convergence Project, Dual UOM tracking items should not be allowed
4325: for updates and creates */
4326: IF (G_Assy_Tracking_Quantity_Ind <>'P' or G_Comp_Tracking_Quantity_Ind <>'P') then
4327: Error_Handler.Add_Error_Token
4328: ( p_Message_Name => 'BOM_DUAL_UOM_ITEMS'
4329: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4330: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4331: , p_message_type => 'E'

Line 4357: Error_Handler.Add_Error_Token

4353: p_rev_component_rec.disable_date <
4354: p_rev_component_rec.start_effective_date THEN
4355: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
4356: THEN
4357: Error_Handler.Add_Error_Token
4358: ( p_message_name => 'BOM_COMP_DIS_DATE_INVALID'
4359: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4360: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4361: , p_Token_Tbl => g_Token_Tbl

Line 4374: Error_Handler.Add_Error_Token

4370: -- p_rev_component_rec.new_effectivity_date < SYSDATE OR -- Bug3281414
4371: p_rev_component_rec.disable_date < p_rev_component_rec.new_effectivity_date
4372: )
4373: THEN
4374: Error_Handler.Add_Error_Token
4375: ( p_message_name => 'BOM_COMP_DIS_DATE_INVALID'
4376: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4377: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4378: , p_Token_Tbl => g_Token_Tbl

Line 4401: Error_Handler.Add_Error_Token

4397: p_rev_component_rec.quantity_per_assembly
4398: THEN
4399: -- GIVE A WARNING
4400: --
4401: Error_Handler.Add_Error_Token
4402: ( p_message_name => 'BOM_QTY_REL_QTY_REF_DESG'
4403: , p_Mesg_Token_Tbl=> l_Mesg_Token_Tbl
4404: , x_Mesg_Token_Tbl=> l_Mesg_Token_Tbl
4405: , p_Token_Tbl => g_Token_Tbl

Line 4423: Error_Handler.Add_Error_Token

4419: IF round(p_rev_component_rec.quantity_per_assembly) <>
4420: p_rev_component_rec.quantity_per_assembly AND
4421: p_rev_component_rec.quantity_related = 1
4422: THEN
4423: Error_Handler.Add_Error_Token
4424: ( p_message_name => 'BOM_QTY_REL_QTY_FRACTIONAL'
4425: , p_Mesg_Token_Tbl=> l_Mesg_Token_Tbl
4426: , x_Mesg_Token_Tbl=> l_Mesg_Token_Tbl
4427: , p_Token_Tbl => g_Token_Tbl

Line 4447: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Old sequence: ' || to_char(p_rev_comp_Unexp_rec.old_component_sequence_id)); END IF;

4443:
4444: IF p_rev_component_rec.Transaction_Type = BOM_GLOBALS.G_OPR_CREATE AND
4445: p_rev_component_rec.acd_type IN (2, 3)
4446: THEN
4447: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Old sequence: ' || to_char(p_rev_comp_Unexp_rec.old_component_sequence_id)); END IF;
4448: BEGIN
4449: SELECT 'Component Implemented'
4450: INTO l_dummy
4451: FROM bom_inventory_components

Line 4462: Error_Handler.Add_Error_Token

4458: -- component is yet not implemented
4459: IF FND_MSG_PUB.Check_Msg_Level
4460: (FND_MSG_PUB.G_MSG_LVL_ERROR)
4461: THEN
4462: Error_Handler.Add_Error_Token
4463: ( p_message_name => 'BOM_OLD_COMP_SEQ_ID_INVALID'
4464: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4465: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4466: , p_Token_Tbl => g_Token_Tbl

Line 4472: Error_Handler.Add_Error_Token

4468: END IF;
4469: l_return_status := FND_API.G_RET_STS_ERROR;
4470: WHEN OTHERS THEN
4471: -- dbms_output.put_line(SQLERRM);
4472: Error_Handler.Add_Error_Token
4473: ( p_message_name => NULL
4474: , p_message_text => 'ERROR Rev Cmp entity validate ' ||
4475: SUBSTR(SQLERRM, 1, 30) || ' ' ||
4476: TO_CHAR(SQLCODE)

Line 4503: Error_Handler.Add_Error_Token

4499: g_Rev_Component_rec.revised_item_name;
4500: g_Token_Tbl(1).Token_Name := 'NEW_FROM_UNIT_NUMBER';
4501: g_Token_Tbl(1).Token_Value := g_Rev_Component_rec.new_from_end_item_unit_number;
4502:
4503: Error_Handler.Add_Error_Token
4504: ( p_Message_Name => 'BOM_NEW_FROM_UNIT_NUM_OVERLAP'
4505: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4506: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4507: , p_Token_Tbl => g_Token_Tbl

Line 4531: Error_Handler.Write_Debug('Checking old component : '|| to_char(p_rev_comp_unexp_rec.old_component_sequence_id));

4527: p_rev_component_rec.acd_type IN (2, 3)
4528: THEN
4529:
4530: IF Bom_Globals.Get_Debug = 'Y' THEN
4531: Error_Handler.Write_Debug('Checking old component : '|| to_char(p_rev_comp_unexp_rec.old_component_sequence_id));
4532: END IF;
4533:
4534: l_eco_for_production := NVL(Bom_Globals.Get_Eco_For_Production,2) ;
4535:

Line 4544: Error_Handler.Add_Error_Token

4540: -- component is invalid
4541: IF FND_MSG_PUB.Check_Msg_Level
4542: (FND_MSG_PUB.G_MSG_LVL_ERROR)
4543: THEN
4544: Error_Handler.Add_Error_Token
4545: ( p_message_name => 'BOM_OLD_COMP_SEQ_ID_INVALID'
4546: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4547: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4548: , p_Token_Tbl => g_Token_Tbl

Line 4555: Error_Handler.Write_Debug('After checking old component. Return status is '|| l_return_status);

4551: l_return_status := FND_API.G_RET_STS_ERROR;
4552: END LOOP ;
4553:
4554: IF Bom_Globals.Get_Debug = 'Y' THEN
4555: Error_Handler.Write_Debug('After checking old component. Return status is '|| l_return_status);
4556: END IF;
4557:
4558: END IF;
4559:

Line 4608: Error_Handler.Add_Error_Token

4604: THEN
4605: IF FND_MSG_PUB.Check_Msg_Level
4606: (FND_MSG_PUB.G_MSG_LVL_ERROR)
4607: THEN
4608: Error_Handler.Add_Error_Token
4609: ( p_message_name => 'BOM_ONLY_ONE'
4610: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4611: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4612: , p_Token_Tbl => g_Token_Tbl

Line 4629: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Check_Op_Seq returned with : ' || l_result); END IF;

4625:
4626: l_result := Check_Op_Seq(l_is_item_unit_controlled);
4627: --arudresh_debug('Result after check_op_seq '||l_result);
4628:
4629: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Check_Op_Seq returned with : ' || l_result); END IF;
4630: IF l_result = 1
4631: THEN
4632: g_Token_Tbl(1).Token_Name := 'REVISED_ITEM_NAME';
4633: g_Token_Tbl(1).Token_Value :=

Line 4635: Error_Handler.Add_Error_Token

4631: THEN
4632: g_Token_Tbl(1).Token_Name := 'REVISED_ITEM_NAME';
4633: g_Token_Tbl(1).Token_Value :=
4634: g_Rev_Component_rec.revised_item_name;
4635: Error_Handler.Add_Error_Token
4636: ( p_Message_Name => 'BOM_OP_SEQ_NUM_INVALID'
4637: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4638: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4639: , p_Token_Tbl => g_Token_Tbl

Line 4654: Error_Handler.Add_Error_Token

4650: */
4651: ELSIF l_result = 3 THEN
4652: g_Token_Tbl(1).Token_Name := 'REVISED_COMPONENT_NAME';
4653: g_Token_Tbl(1).Token_Value := g_Rev_Component_rec.component_item_name;
4654: Error_Handler.Add_Error_Token
4655: ( p_Message_Name => 'BOM_COMP_OPS_OP_SEQ'
4656: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4657: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4658: , p_Token_Tbl => g_Token_Tbl

Line 4667: Error_Handler.Add_Error_Token

4663: g_Token_Tbl(2).Token_Name := 'OP_SEQ_NUM';
4664: g_Token_Tbl(2).Token_Value :=
4665: to_char
4666: (g_Rev_Component_rec.operation_sequence_number);
4667: Error_Handler.Add_Error_Token
4668: ( p_message_name => 'BOM_OP_SEQ_NUM_NOT_UNIQUE'
4669: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4670: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4671: , p_Token_Tbl => g_Token_Tbl

Line 4680: Error_Handler.Add_Error_Token

4676: g_Token_Tbl(2).Token_Name := 'OP_SEQ_NUM';
4677: g_Token_Tbl(2).Token_Value :=
4678: to_char
4679: (g_Rev_Component_rec.operation_sequence_number);
4680: Error_Handler.Add_Error_Token
4681: ( p_message_name => 'BOM_OP_SEQ_NUM_NOT_UNIQUE'
4682: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4683: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4684: , p_Token_Tbl => g_Token_Tbl

Line 4690: Error_Handler.Add_Error_Token

4686: );
4687: g_Token_Tbl.DELETE(2);
4688: END IF;
4689: ELSIF l_result = 4 THEN
4690: Error_Handler.Add_Error_Token
4691: ( p_Message_Name => 'BOM_COMMON_OP_SEQ_INVALID'
4692: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4693: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4694: , p_Token_Tbl => g_Token_Tbl

Line 4723: Error_Handler.Add_Error_Token

4719: g_Token_Tbl(2).Token_Name := 'OLD_OP_SEQUENCE_NUM';
4720: g_Token_Tbl(2).Token_Value :=
4721: to_char
4722: (g_Rev_Component_rec.old_operation_sequence_number);
4723: Error_Handler.Add_Error_Token
4724: ( p_message_name => 'BOM_OLD_OP_SEQ_NUM_GIVEN'
4725: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4726: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4727: , p_Token_Tbl => g_Token_Tbl

Line 4738: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Op seq num validation completed with ' || l_return_status); END IF;

4734: END IF; -- Operation_seq_Num Check Ends.
4735: --END IF; -- Validate for plm ends
4736: END IF;
4737:
4738: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Op seq num validation completed with ' || l_return_status); END IF;
4739:
4740: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('BO identifier is '||Bom_Globals.Get_Bo_Identifier); END IF;
4741:
4742: IF Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_ECO_BO AND NVL(p_rev_Component_rec.ACD_Type,1) <> 3 THEN

Line 4740: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('BO identifier is '||Bom_Globals.Get_Bo_Identifier); END IF;

4736: END IF;
4737:
4738: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Op seq num validation completed with ' || l_return_status); END IF;
4739:
4740: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('BO identifier is '||Bom_Globals.Get_Bo_Identifier); END IF;
4741:
4742: IF Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_ECO_BO AND NVL(p_rev_Component_rec.ACD_Type,1) <> 3 THEN
4743: IF Nvl(Bom_Globals.Get_Validate_For_Plm,'N') = 'N'
4744: THEN

Line 4783: Error_Handler.Add_Error_Token

4779: g_token_tbl(2).token_value := p_rev_component_rec.Revised_Item_Name;
4780:
4781: --added for bug 9647673 (end)
4782:
4783: Error_Handler.Add_Error_Token
4784: ( p_Message_Name => 'BOM_COMP_OPSEQ_DATE_OVERLAP'
4785: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4786: , p_token_tbl => g_token_tbl
4787: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 4795: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Verified overlapping dates . . . ' || l_return_status); END IF;

4791: END IF;
4792: -- Since Open Interface allows for Dates to be
4793: -- overlapping do set the error status.
4794: END IF;
4795: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Verified overlapping dates . . . ' || l_return_status); END IF;
4796:
4797: ELSE
4798:
4799: /********************************************************************

Line 4820: Error_Handler.Add_Error_Token

4816: --if function return true then component dates overlapp
4817:
4818: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)
4819: THEN
4820: Error_Handler.Add_Error_Token
4821: ( p_Message_Name => 'BOM_COMP_OPSEQ_UNIT_OVERLAP'
4822: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4823: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4824: , p_token_tbl => g_token_tbl

Line 4888: Error_Handler.Add_Error_Token

4884: g_token_tbl(2).token_value := p_rev_component_rec.Revised_Item_Name;
4885:
4886: --added for bug 9647673 (end)
4887:
4888: Error_Handler.Add_Error_Token
4889: ( p_Message_Name => 'BOM_COMP_OPSEQ_DATE_OVERLAP'
4890: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4891: , p_token_tbl => g_token_tbl
4892: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 4898: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Verified overlapping dates . . . ' || l_return_status); END IF;

4894: );
4895: END IF;
4896: l_return_status := FND_API.G_RET_STS_ERROR;
4897: END IF;
4898: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Verified overlapping dates . . . ' || l_return_status); END IF;
4899:
4900: ELSE
4901: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('I am here Inside Unit Eff'); END IF;
4902:

Line 4901: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('I am here Inside Unit Eff'); END IF;

4897: END IF;
4898: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Verified overlapping dates . . . ' || l_return_status); END IF;
4899:
4900: ELSE
4901: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('I am here Inside Unit Eff'); END IF;
4902:
4903: /********************************************************************
4904: --
4905: -- Check for Overlapping numbers for the component being inserted.

Line 4925: Error_Handler.Add_Error_Token

4921: --if function return true then component unit numbers overlapp
4922:
4923: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)
4924: THEN
4925: Error_Handler.Add_Error_Token
4926: ( p_Message_Name => 'BOM_COMP_OPSEQ_UNIT_OVERLAP'
4927: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4928: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4929: , p_token_tbl => g_token_tbl

Line 4939: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Verified overlapping unit numbers. . .' || l_return_status); END IF;

4935: END IF;
4936: END IF; -- Validate for Plm check ends
4937: END IF;
4938:
4939: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Verified overlapping unit numbers. . .' || l_return_status); END IF;
4940:
4941:
4942: If (p_rev_component_rec.Transaction_Type=BOM_GLOBALS.G_OPR_CREATE AND g_Assy_Item_Type = Bom_Globals.G_PRODUCT_FAMILY) THEN
4943: l_Result := CheckUnique_PF_Member;

Line 4950: Error_Handler.Add_Error_Token

4946: THEN
4947: g_Token_Tbl(2).Token_Name := 'pf_item';
4948: g_Token_Tbl(2).Token_Value :=
4949: g_rev_component_rec.revised_item_name;
4950: Error_Handler.Add_Error_Token
4951: ( p_message_name => 'BOM_PF_MEMBER_ALREADY_EXISTS'
4952: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4953: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4954: , p_Token_Tbl => g_Token_Tbl

Line 4985: Error_Handler.Add_Error_Token

4981: l_Result := Check_PTO_ATO_for_Optional;
4982: IF l_Result = 1 THEN
4983: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
4984: THEN
4985: Error_Handler.Add_Error_Token
4986: ( p_message_name => 'BOM_COMP_OPTIONAL'
4987: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4988: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4989: , p_Token_Tbl => g_Token_Tbl

Line 4997: Error_Handler.Add_Error_Token

4993: ELSIF l_Result = 2
4994: THEN
4995: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
4996: THEN
4997: Error_Handler.Add_Error_Token
4998: ( p_message_name => 'BOM_COMP_NOT_OPTIONAL'
4999: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5000: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5001: );

Line 5039: Error_Handler.Add_Error_Token

5035: THEN
5036: g_Token_Tbl(2).Token_Name := 'REVISED_ITEM_NAME';
5037: g_Token_Tbl(2).Token_Value :=
5038: g_rev_component_rec.revised_item_name;
5039: Error_Handler.Add_Error_Token
5040: ( p_Message_Name => 'BOM_NOT_A_PLANNING_PARENT'
5041: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5042: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5043: , p_Token_Tbl => g_Token_Tbl

Line 5063: Error_Handler.Add_Error_Token

5059: g_Token_Tbl(3).Token_Value :=
5060: 'BOM_OPTION_CLASS_TYPE';
5061: END IF;
5062: g_Token_Tbl(3).Translate := TRUE;
5063: Error_Handler.Add_Error_Token
5064: ( p_Message_Name => 'BOM_COMP_MODEL_OC_OPTIONAL'
5065: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5066: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5067: , p_Token_Tbl => g_Token_Tbl

Line 5081: Error_Handler.Add_Error_Token

5077: g_Token_Tbl(1).Token_Name := 'REVISED_ITEM_NAME';
5078: g_Token_Tbl(1).Token_Value :=
5079: g_rev_component_rec.revised_item_name;
5080:
5081: Error_Handler.Add_Error_Token
5082: ( p_Message_Name =>
5083: 'BOM_COMP_OPTIONAL_ATO_FORECAST'
5084: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5085: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 5132: Error_Handler.Add_Error_Token

5128: THEN
5129: g_Token_Tbl(2).Token_Name := 'REVISED_ITEM_NAME';
5130: g_Token_Tbl(2).Token_Value :=
5131: g_rev_component_rec.revised_item_name;
5132: Error_Handler.Add_Error_Token
5133: ( p_message_name => 'BOM_COMP_REQ_FOR_REV_INVALID'
5134: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5135: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5136: , p_Token_Tbl => g_Token_Tbl

Line 5145: Error_Handler.Add_Error_Token

5141: ELSIF l_Result = 2 THEN
5142: g_Token_Tbl(2).Token_Name := 'REVISED_ITEM_NAME';
5143: g_Token_Tbl(2).Token_Value :=
5144: g_rev_component_rec.revised_item_name;
5145: Error_Handler.Add_Error_Token
5146: ( p_message_name => 'BOM_COMP_REQ_TO_SHIP_INVALID'
5147: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5148: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5149: , p_Token_Tbl => g_Token_Tbl

Line 5157: Error_Handler.Add_Error_Token

5153: ELSIF l_Result = 3 THEN
5154: g_Token_Tbl(2).Token_Name := 'REVISED_ITEM_NAME';
5155: g_Token_Tbl(2).Token_Value :=
5156: g_rev_component_rec.revised_item_name;
5157: Error_Handler.Add_Error_Token
5158: ( p_message_name => 'BOM_COMP_REQ_TO_SHIP_INVALID'
5159: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5160: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5161: , p_Token_Tbl => g_Token_Tbl

Line 5167: Error_Handler.Add_Error_Token

5163:
5164: g_Token_Tbl(2).Token_Name := 'REVISED_ITEM_NAME';
5165: g_Token_Tbl(2).Token_Value :=
5166: g_rev_component_rec.revised_item_name;
5167: Error_Handler.Add_Error_Token
5168: ( p_message_name => 'BOM_COMP_REQ_FOR_REV_INVALID'
5169: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5170: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5171: , p_Token_Tbl => g_Token_Tbl

Line 5179: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Verified Req for Rev and Shipping . . . ' || l_return_status); END IF;

5175: l_return_status := FND_API.G_RET_STS_ERROR;
5176: END IF;
5177: END IF;
5178:
5179: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Verified Req for Rev and Shipping . . . ' || l_return_status); END IF;
5180:
5181: /*********************************************************************
5182: --
5183: -- Verify the value of SO_Basis

Line 5190: Error_Handler.Add_Error_Token

5186: IF -- p_control_rec.caller_type = 'FORM' AND
5187: p_rev_component_rec.so_basis = 1 AND
5188: g_Comp_Item_Type <> Bom_Globals.G_OPTION_CLASS
5189: THEN
5190: Error_Handler.Add_Error_Token
5191: ( p_message_name => 'BOM_SO_BASIS_ONE'
5192: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5193: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5194: , p_Token_Tbl => g_Token_Tbl

Line 5238: Error_Handler.Add_Error_Token

5234: IF l_result <> 0
5235: THEN
5236: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
5237: THEN
5238: Error_Handler.Add_Error_Token
5239: ( p_message_name => 'BOM_ATP_CHECK_NOT_NO'
5240: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5241: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5242: , p_Token_Tbl => g_Token_Tbl

Line 5252: Error_Handler.Write_Debug('After verification of Check ATP . . . ' || l_return_status);

5248: END IF ;
5249: END IF;
5250:
5251: IF Bom_Globals.Get_Debug = 'Y' THEN
5252: Error_Handler.Write_Debug('After verification of Check ATP . . . ' || l_return_status);
5253: END IF;
5254: -- dbms_output.put_line('After verification of Check ATP, Req for Rev' );
5255: ********************************************************************/
5256:

Line 5275: Error_Handler.Add_Error_Token

5271: IF l_result <> 0 THEN
5272: IF l_result = 1 THEN
5273: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
5274: THEN
5275: Error_Handler.Add_Error_Token
5276: ( p_message_name => 'BOM_MUT_EXCL_BOM_NOT_INST'
5277: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5278: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5279: );

Line 5284: Error_Handler.Add_Error_Token

5280: END IF;
5281: ELSIF l_result = 2 THEN
5282: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
5283: THEN
5284: Error_Handler.Add_Error_Token
5285: ( p_message_name => 'BOM_MUT_EXCL_NOT_MDL_OPTCLASS'
5286: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5287: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5288: , p_Token_Tbl => g_Token_Tbl

Line 5349: Error_Handler.Add_Error_Token

5345: AND
5346: NOT Check_Min_Quantity THEN
5347: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
5348: THEN
5349: Error_Handler.Add_Error_Token
5350: ( p_message_name => 'BOM_MIN_QUANTITY_INVALID'
5351: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5352: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5353: , p_Token_Tbl => g_Token_Tbl

Line 5369: Error_Handler.Add_Error_Token

5365: AND
5366: NOT Check_Max_Quantity THEN
5367: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
5368: THEN
5369: Error_Handler.Add_Error_Token
5370: ( p_message_name => 'BOM_MAX_QUANTITY_INVALID'
5371: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5372: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5373: , p_Token_Tbl => g_Token_Tbl

Line 5419: Error_Handler.Add_Error_Token

5415: )
5416: THEN
5417: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
5418: THEN
5419: Error_Handler.Add_Error_Token
5420: ( p_message_name => 'BOM_COMP_QTY_FRACTIONAL'
5421: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5422: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5423: , p_Token_Tbl => g_Token_Tbl

Line 5445: Error_Handler.Add_Error_Token

5441: p_rev_component_rec.quantity_per_assembly < 0
5442: THEN
5443: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
5444: THEN
5445: Error_Handler.Add_Error_Token
5446: ( p_message_name => 'BOM_COMP_QTY_NEGATIVE'
5447: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5448: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5449: , p_Token_Tbl => g_Token_Tbl

Line 5466: Error_Handler.Add_Error_Token

5462: p_rev_component_rec.quantity_per_assembly < 0
5463: THEN
5464: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
5465: THEN
5466: Error_Handler.Add_Error_Token
5467: ( p_message_name => 'BOM_COMP_PTO_QTY_NEGATIVE'
5468: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5469: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5470: , p_Token_Tbl => g_Token_Tbl

Line 5476: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Checking Supply Subinventory . . . ' || p_rev_component_rec.Supply_SubInventory); END IF;

5472: END IF;
5473: l_return_status := FND_API.G_RET_STS_ERROR;
5474: END IF;
5475:
5476: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Checking Supply Subinventory . . . ' || p_rev_component_rec.Supply_SubInventory); END IF;
5477:
5478: /*******************************************************************
5479: --
5480: -- Check Supply Subinventory

Line 5506: Error_Handler.Add_Error_Token

5502: NOT Check_Supply_SubInventory THEN
5503:
5504: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
5505: THEN
5506: Error_Handler.Add_Error_Token
5507: ( p_message_name => 'BOM_SUBINV_INVALID'
5508: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5509: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5510: );

Line 5514: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After checking Subinventory . . . ' || l_return_status); END IF;

5510: );
5511: END IF;
5512: l_return_status := FND_API.G_RET_STS_ERROR;
5513: END IF;
5514: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After checking Subinventory . . . ' || l_return_status); END IF;
5515:
5516: -- dbms_output.put_line('Checking Locators . . . .');
5517: /********************************************************************
5518: --

Line 5549: Error_Handler.Add_Error_Token

5545:
5546: IF l_locator_control = 4 THEN
5547: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
5548: THEN
5549: Error_Handler.Add_Error_Token
5550: ( p_message_name => 'BOM_LOCATOR_REQUIRED'
5551: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5552: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5553: , p_Token_Tbl => g_Token_Tbl

Line 5565: Error_Handler.Add_Error_Token

5561: THEN
5562: g_Token_Tbl(1).token_name := 'REVISED_COMPONENT_NAME';
5563: g_Token_Tbl(1).token_value:= p_rev_component_rec.component_item_name;
5564:
5565: Error_Handler.Add_Error_Token
5566: ( p_message_name => 'BOM_LOCATOR_CANNOT_BE_DYNAMIC'
5567: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5568: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5569: , p_Token_Tbl => g_Token_Tbl

Line 5587: Error_Handler.Add_Error_Token

5583: -- Added Token by MK on 12/06/00
5584: g_Token_Tbl(2).Token_Name := 'SUPPLY_SUBINVENTORY';
5585: g_Token_Tbl(2).Token_Value := p_rev_component_rec.Supply_SubInventory ;
5586:
5587: Error_Handler.Add_Error_Token
5588: ( p_message_name => 'BOM_ITEM_LOCATOR_RESTRICTED'
5589: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5590: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5591: , p_Token_Tbl => g_Token_Tbl

Line 5603: Error_Handler.Add_Error_Token

5599: (FND_MSG_PUB.G_MSG_LVL_ERROR)
5600: THEN
5601: g_Token_Tbl(2).token_name := 'REVISED_COMPONENT_NAME';
5602: g_Token_Tbl(2).token_value:= p_rev_component_rec.component_item_name;
5603: Error_Handler.Add_Error_Token
5604: ( p_message_name => 'BOM_LOCATOR_NOT_IN_SUBINV'
5605: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5606: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5607: , p_Token_Tbl => g_Token_Tbl

Line 5616: Error_Handler.Add_Error_Token

5612: ELSIF l_locator_control = 1 THEN
5613: IF FND_MSG_PUB.Check_Msg_Level
5614: (FND_MSG_PUB.G_MSG_LVL_ERROR)
5615: THEN
5616: Error_Handler.Add_Error_Token
5617: ( p_message_name => 'BOM_ITEM_NO_LOCATOR_CONTROL'
5618: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5619: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5620: , p_Token_Tbl => g_Token_Tbl

Line 5631: Error_Handler.Add_Error_Token

5627: p_rev_component_rec.supply_subinventory IS NULL
5628: THEN
5629: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
5630: THEN
5631: Error_Handler.Add_Error_Token
5632: ( p_message_name => 'BOM_LOCATOR_MUST_BE_NULL'
5633: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5634: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5635: , p_Token_Tbl => g_Token_Tbl

Line 5691: Error_Handler.Add_Error_Token

5687: END LOOP;
5688: END IF;
5689:
5690: IF item_num_for_bill = 1 THEN
5691: Error_Handler.Add_Error_Token
5692: ( x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5693: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5694: , p_message_name => 'BOM_ITEM_NUM_NOT_UNIQUE'
5695: , p_Token_Tbl => g_Token_Tbl

Line 5717: Error_Handler.Add_Error_Token

5713: IF p_rev_comp_unexp_rec.Delete_Group_Name IS NULL OR
5714: p_rev_comp_unexp_rec.Delete_Group_Name = FND_API.G_MISS_CHAR
5715: THEN
5716:
5717: Error_Handler.Add_Error_Token
5718: ( p_message_name => 'BOM_DG_NAME_MISSING'
5719: , p_mesg_token_tbl => l_mesg_token_tbl
5720: , x_mesg_token_tbl => l_mesg_token_tbl
5721: );

Line 5727: IF BOM_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

5723: l_return_status := FND_API.G_RET_STS_ERROR;
5724:
5725: END IF;
5726:
5727: IF BOM_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
5728: ('Check if Delete Group is missing . . . ' || l_return_status) ;
5729: END IF ;
5730:
5731:

Line 5755: Error_Handler.Add_Error_Token

5751:
5752: IF (l_Structure_Type_Name ='Packaging Hierarchy') THEN
5753: IF p_rev_component_rec.quantity_per_assembly < 0
5754: THEN
5755: Error_Handler.Add_Error_Token
5756: ( p_message_name => 'BOM_PKG_HIER_NEGATIVE_QTY'
5757: , p_Mesg_Token_Tbl=> l_Mesg_Token_Tbl
5758: , x_Mesg_Token_Tbl=> l_Mesg_Token_Tbl
5759: , p_Token_Tbl => g_Token_Tbl

Line 5766: Error_Handler.Add_Error_Token

5762: l_return_status := FND_API.G_RET_STS_ERROR;
5763: END IF;
5764: IF round(p_rev_component_rec.quantity_per_assembly) <> p_rev_component_rec.quantity_per_assembly
5765: THEN
5766: Error_Handler.Add_Error_Token
5767: ( p_message_name => 'BOM_PKG_HIER_FRACTIONAL_QTY'
5768: , p_Mesg_Token_Tbl=> l_Mesg_Token_Tbl
5769: , x_Mesg_Token_Tbl=> l_Mesg_Token_Tbl
5770: , p_Token_Tbl => g_Token_Tbl

Line 5795: Error_Handler.Add_Error_Token

5791: );
5792:
5793: IF (l_return_status = FND_API.G_RET_STS_ERROR)
5794: THEN
5795: Error_Handler.Add_Error_Token
5796: ( p_Message_Text => l_debug_error_mesg
5797: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5798: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5799: );

Line 5804: IF BOM_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

5800: END IF;
5801: END IF;
5802: END IF;
5803:
5804: IF BOM_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
5805: ('Check Component Type Rule . . . ' || l_return_status) ;
5806: END IF ;
5807:
5808: x_return_status := l_return_status;

Line 5811: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity Validation done . . . Return Status is ' || l_return_status); END IF;

5807:
5808: x_return_status := l_return_status;
5809: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
5810:
5811: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity Validation done . . . Return Status is ' || l_return_status); END IF;
5812:
5813: EXCEPTION
5814:
5815: WHEN FND_API.G_EXC_ERROR THEN

Line 5817: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Expected Error in Rev. Comp. Entity Validation . . .'); END IF;

5813: EXCEPTION
5814:
5815: WHEN FND_API.G_EXC_ERROR THEN
5816:
5817: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Expected Error in Rev. Comp. Entity Validation . . .'); END IF;
5818:
5819: x_return_status := FND_API.G_RET_STS_ERROR;
5820: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
5821:

Line 5824: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('UNExpected Error in Rev. Comp. Entity Validation . . .'); END IF;

5820: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
5821:
5822: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5823:
5824: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('UNExpected Error in Rev. Comp. Entity Validation . . .'); END IF;
5825:
5826: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5827: IF FND_MSG_PUB.Check_Msg_Level
5828: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

Line 5833: Error_Handler.Add_Error_Token

5829: THEN
5830: l_err_text := G_PKG_NAME ||
5831: ' : (Entity Validation) ' ||
5832: substrb(SQLERRM,1,200);
5833: Error_Handler.Add_Error_Token
5834: ( p_Message_Text => l_err_text
5835: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5836: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5837: );

Line 5842: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug(SQLERRM || ' ' || TO_CHAR(SQLCODE)); END IF;

5838: END IF;
5839: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
5840:
5841: WHEN OTHERS THEN
5842: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug(SQLERRM || ' ' || TO_CHAR(SQLCODE)); END IF;
5843: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5844: IF FND_MSG_PUB.Check_Msg_Level
5845: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5846: THEN

Line 5850: Error_Handler.Add_Error_Token

5846: THEN
5847: l_err_text := G_PKG_NAME ||
5848: ' : (Entity Validation) ' ||
5849: substrb(SQLERRM,1,200);
5850: Error_Handler.Add_Error_Token
5851: ( p_Message_Text => l_err_text
5852: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5853: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5854: );

Line 5876: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

5872: * of 'E'.
5873: *********************************************************************/
5874: PROCEDURE Check_Attributes
5875: ( x_return_status IN OUT NOCOPY VARCHAR2
5876: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
5877: , p_rev_component_rec IN Bom_Bo_Pub.Rev_Component_Rec_Type
5878: , p_Rev_Comp_Unexp_Rec IN Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type
5879: )
5880: IS

Line 5886: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

5882: l_return_status VARCHAR2(1);
5883: l_err_text VARCHAR2(2000);
5884: l_assembly_item_id NUMBER;
5885: l_org_id NUMBER;
5886: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
5887:
5888: CURSOR c_Geteffcontrol IS SELECT effectivity_control FROM mtl_system_items
5889: WHERE inventory_item_id = p_rev_comp_unexp_rec.component_item_id AND
5890: organization_id = l_org_id;

Line 5913: Error_Handler.Add_Error_Token

5909: -- missing value when the column value is required.
5910: --
5911: IF p_rev_component_rec.item_sequence_number = FND_API.G_MISS_NUM
5912: THEN
5913: Error_Handler.Add_Error_Token
5914: ( p_Message_Name => 'BOM_ITEM_NUM_MISSING'
5915: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5916: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5917: , p_Token_Tbl => g_Token_Tbl

Line 5925: Error_Handler.Add_Error_Token

5921:
5922: IF p_rev_component_rec.quantity_per_assembly =
5923: FND_API.G_MISS_NUM
5924: THEN
5925: Error_Handler.Add_Error_Token
5926: ( p_Message_Name => 'BOM_COMP_QUANTITY_MISSING'
5927: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5928: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5929: , p_Token_Tbl => g_Token_Tbl

Line 5936: Error_Handler.Add_Error_Token

5932: END IF;
5933:
5934: IF p_rev_component_rec.projected_yield = FND_API.G_MISS_NUM
5935: THEN
5936: Error_Handler.Add_Error_Token
5937: ( p_Message_Name => 'BOM_COMP_YIELD_MISSING'
5938: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5939: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5940: , p_Token_Tbl => g_Token_Tbl

Line 5947: Error_Handler.Add_Error_Token

5943: END IF;
5944:
5945: IF p_rev_component_rec.planning_percent = FND_API.G_MISS_NUM
5946: THEN
5947: Error_Handler.Add_Error_Token
5948: ( p_Message_Name => 'BOM_PLAN_PERCENT_MISSING'
5949: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5950: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5951: , p_Token_Tbl => g_Token_Tbl

Line 5958: Error_Handler.Add_Error_Token

5954: END IF;
5955:
5956: IF p_rev_component_rec.quantity_related = FND_API.G_MISS_NUM
5957: THEN
5958: Error_Handler.Add_Error_Token
5959: ( p_Message_Name => 'BOM_QUANTITY_RELATED_MISSING'
5960: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5961: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5962: , p_Token_Tbl => g_Token_Tbl

Line 5969: Error_Handler.Add_Error_Token

5965: END IF;
5966:
5967: IF p_rev_component_rec.include_in_cost_rollup = FND_API.G_MISS_NUM
5968: THEN
5969: Error_Handler.Add_Error_Token
5970: ( p_Message_Name => 'BOM_INCL_IN_CST_ROLLUP_MISSING'
5971: -- 'BOM_INCL_IN_COST_ROLLUP_MISSING'
5972: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5973: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 5981: Error_Handler.Add_Error_Token

5977: END IF;
5978:
5979: IF p_rev_component_rec.check_atp = FND_API.G_MISS_NUM
5980: THEN
5981: Error_Handler.Add_Error_Token
5982: ( p_Message_Name => 'BOM_CHECK_ATP_MISSING'
5983: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5984: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5985: , p_Token_Tbl => g_Token_Tbl

Line 5998: Error_Handler.Add_Error_Token

5994: THEN
5995: g_token_tbl(2).token_name := 'ACD_TYPE';
5996: g_token_tbl(2).token_value := p_rev_component_rec.acd_type;
5997:
5998: Error_Handler.Add_Error_Token
5999: ( p_Message_Name => 'BOM_ACD_TYPE_INVALID'
6000: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6001: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6002: , p_Token_Tbl => g_Token_Tbl

Line 6029: Error_Handler.Add_Error_Token

6025: g_token_tbl(2).token_name := 'REVISED_COMPONENT_NAME';
6026: g_token_tbl(2).token_value := p_rev_component_rec.component_item_name;
6027: g_token_tbl(3).token_name := 'ORGANIZATION_CODE';
6028: g_token_tbl(3).token_value := p_rev_component_rec.organization_code;
6029: Error_Handler.Add_Error_Token
6030: ( p_Message_Name=> 'BOM_CMP_FROM_UNIT_NUM_INVALID'
6031: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6032: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6033: , p_Token_Tbl => g_Token_Tbl

Line 6070: Error_Handler.Add_Error_Token

6066: g_token_tbl(3).token_name :=
6067: 'ORGANIZATION_CODE';
6068: g_token_tbl(3).token_value :=
6069: p_rev_component_rec.organization_code;
6070: Error_Handler.Add_Error_Token
6071: ( p_Message_Name=> 'BOM_CMP_TO_UNIT_NUM_INVALID'
6072: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6073: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6074: , p_Token_Tbl => g_Token_Tbl

Line 6089: Error_Handler.Add_Error_Token

6085: THEN
6086: g_token_tbl(2).token_name := 'AUTO_REQ_MATERIAL';
6087: g_token_tbl(2).token_value := p_rev_component_rec.auto_request_material;
6088:
6089: Error_Handler.Add_Error_Token
6090: ( p_Message_Name => 'BOM_AUTO_REQ_MAT_INVALID'
6091: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6092: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6093: , p_Token_Tbl => g_Token_Tbl

Line 6108: Error_Handler.Add_Error_Token

6104: p_rev_component_rec.from_end_item_unit_number IS NOT NULL ) AND
6105: ( p_rev_component_rec.to_end_item_unit_number = FND_API.G_MISS_CHAR OR
6106: p_rev_component_rec.to_end_item_unit_number IS NULL )
6107: THEN
6108: Error_Handler.Add_Error_Token
6109: ( p_Message_Name => 'BOM_CMP_TO_UNIT_NUM_NULL'
6110: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6111: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6112: , p_Token_Tbl => g_Token_Tbl

Line 6130: Error_Handler.Add_Error_Token

6126:
6127: FOR effctrlrec IN c_Geteffcontrol
6128: LOOP
6129: IF effctrlrec.effectivity_control <> 1 THEN
6130: Error_Handler.Add_Error_Token
6131: ( p_Message_Name => 'BOM_EFFCONTROL_INVALID'
6132: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6133: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6134: , p_Token_Tbl => g_Token_Tbl

Line 6150: Error_Handler.Add_Error_Token

6146: X_err_text => l_err_text ) THEN
6147: g_token_tbl(2).token_name := 'FROM_END_ITEM_UNIT_NUMBER';
6148: g_token_tbl(2).token_value :=
6149: p_rev_component_rec.from_end_item_unit_number;
6150: Error_Handler.Add_Error_Token
6151: ( p_Message_Name => 'BOM_INVALID_FROM_SERIAL_NO'
6152: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6153: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6154: , p_Token_Tbl => g_Token_Tbl

Line 6174: Error_Handler.Add_Error_Token

6170: X_err_text => l_err_text ) THEN
6171: g_token_tbl(2).token_name := 'TO_END_ITEM_UNIT_NUMBER';
6172: g_token_tbl(2).token_value :=
6173: p_rev_component_rec.to_end_item_unit_number;
6174: Error_Handler.Add_Error_Token
6175: ( p_Message_Name => 'BOM_INVALID_TO_SERIAL_NO'
6176: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6177: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6178: , p_Token_Tbl => g_Token_Tbl

Line 6198: Error_Handler.Add_Error_Token

6194:
6195: g_token_tbl(2).token_name := 'COMPONENT_ITEM_NAME';
6196: g_token_tbl(2).token_value :=
6197: p_rev_component_rec.component_item_name;
6198: Error_Handler.Add_Error_Token
6199: ( p_Message_Name => 'BOM_COMP_CANNOT_BE_AN_AG'
6200: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6201: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6202: , p_Token_Tbl => g_Token_Tbl

Line 6218: Error_Handler.Add_Error_Token

6214: IF p_rev_component_rec.wip_supply_type NOT IN (1,4) THEN
6215: g_token_tbl(2).token_name := 'WIP_SUPPLY_TYPE';
6216: g_token_tbl(2).token_value :=
6217: p_rev_component_rec.wip_supply_type;
6218: Error_Handler.Add_Error_Token
6219: ( p_Message_Name => 'BOM_INVALID_AA_SUPTYPES'
6220: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6221: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6222: , p_Token_Tbl => g_Token_Tbl

Line 6236: Error_Handler.Add_Error_Token

6232:
6233: g_token_tbl(2).token_name := 'COMPONENT_ITEM_NAME';
6234: g_token_tbl(2).token_value :=
6235: p_rev_component_rec.component_item_name;
6236: Error_Handler.Add_Error_Token
6237: ( p_Message_Name => 'BOM_COMP_CANNOT_BE_AN_AG'
6238: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6239: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6240: , p_Token_Tbl => g_Token_Tbl

Line 6258: Error_Handler.Add_Error_Token

6254: THEN
6255: g_token_tbl(2).token_name := 'WIP_SUPPLY_TYPE';
6256: g_token_tbl(2).token_value :=
6257: p_rev_component_rec.wip_supply_type;
6258: Error_Handler.Add_Error_Token
6259: ( p_Message_Name => 'BOM_WIP_SUPPLY_TYPE_7'
6260: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6261: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6262: , p_Token_Tbl => g_Token_Tbl

Line 6281: Error_Handler.Add_Error_Token

6277: g_token_tbl(1).token_name := 'WIP_SUPPLY_TYPE';
6278: g_token_tbl(1).token_value :=
6279: p_rev_component_rec.wip_supply_type;
6280:
6281: Error_Handler.Add_Error_Token
6282: ( p_Message_Name => 'BOM_WIP_SUPPLY_TYPE_INVALID'
6283: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6284: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6285: , p_Token_Tbl => g_Token_Tbl

Line 6300: Error_Handler.Add_Error_Token

6296: p_rev_component_rec.operation_sequence_number <= 0
6297: THEN
6298: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
6299: THEN
6300: Error_Handler.Add_Error_Token
6301: ( p_Message_Name => 'BOM_OPSEQ_LESS_THAN_ZERO'
6302: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6303: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6304: , p_Token_Tbl => g_Token_Tbl

Line 6321: Error_Handler.Add_Error_Token

6317: )
6318: THEN
6319: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
6320: THEN
6321: Error_Handler.Add_Error_Token
6322: ( p_Message_Name => 'BOM_ITEM_NUM_INVALID'
6323: , p_Mesg_token_Tbl => l_Mesg_token_Tbl
6324: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6325: , p_token_tbl => g_Token_Tbl

Line 6339: Error_Handler.Add_Error_Token

6335: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)
6336: THEN
6337: g_token_tbl(1).token_name := 'REVISED_COMPONENT_NAME';
6338: g_token_tbl(1).token_value := p_rev_component_rec.component_item_name;
6339: Error_Handler.Add_Error_Token
6340: ( p_Message_Name => 'BOM_COMPYIELD_OUT_OF_RANGE'
6341: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6342: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6343: , p_token_tbl => g_token_tbl

Line 6355: Error_Handler.Add_Error_Token

6351: p_rev_component_rec.include_in_cost_rollup NOT IN (1,2)
6352: THEN
6353: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)
6354: THEN
6355: Error_Handler.Add_Error_Token
6356: ( p_Message_Name => 'BOM_INCL_IN_COST_ROLL_INVALID'
6357: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6358: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6359: , p_Token_Tbl => g_Token_Tbl

Line 6370: Error_Handler.Add_Error_Token

6366: p_rev_component_rec.SO_Basis NOT IN (1, 2)
6367: THEN
6368: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)
6369: THEN
6370: Error_Handler.Add_Error_Token
6371: ( p_Message_Name => 'BOM_SO_BASIS_INVALID'
6372: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6373: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6374: , p_Token_Tbl => g_Token_Tbl

Line 6385: Error_Handler.Add_Error_Token

6381: p_rev_component_rec.optional NOT IN (1, 2)
6382: THEN
6383: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)
6384: THEN
6385: Error_Handler.Add_Error_Token
6386: ( p_Message_Name => 'BOM_OPTIONAL_INVALID'
6387: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6388: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6389: , p_Token_Tbl => g_Token_Tbl

Line 6400: Error_Handler.Add_Error_Token

6396: p_rev_component_rec.mutually_exclusive NOT IN (1, 2)
6397: THEN
6398: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)
6399: THEN
6400: Error_Handler.Add_Error_Token
6401: ( p_Message_Name => 'BOM_MUTUALLY_EXCLUSIVE_INVALID'
6402: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6403: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6404: , p_Token_Tbl => g_Token_Tbl

Line 6415: Error_Handler.Add_Error_Token

6411: p_rev_component_rec.check_atp NOT IN (1, 2)
6412: THEN
6413: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)
6414: THEN
6415: Error_Handler.Add_Error_Token
6416: ( p_Message_Name => 'BOM_CHECK_ATP_INVALID'
6417: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6418: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6419: , p_Token_Tbl => g_Token_Tbl

Line 6430: Error_Handler.Add_Error_Token

6426: p_rev_component_rec.shipping_allowed NOT IN (1, 2)
6427: THEN
6428: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)
6429: THEN
6430: Error_Handler.Add_Error_Token
6431: ( p_Message_Name => 'BOM_SHIPPING_ALLOWED_INVALID'
6432: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6433: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6434: , p_Token_Tbl => g_Token_Tbl

Line 6445: Error_Handler.Add_Error_Token

6441: p_rev_component_rec.required_to_ship NOT IN (1, 2)
6442: THEN
6443: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)
6444: THEN
6445: Error_Handler.Add_Error_Token
6446: ( p_Message_Name => 'BOM_REQUIRED_TO_SHIP_INVALID'
6447: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6448: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6449: , p_Token_Tbl => g_Token_Tbl

Line 6460: Error_Handler.Add_Error_Token

6456: p_rev_component_rec.required_for_revenue NOT IN (1, 2)
6457: THEN
6458: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)
6459: THEN
6460: Error_Handler.Add_Error_Token
6461: ( p_Message_Name => 'BOM_REQ_FOR_REVENUE_INVALID'
6462: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6463: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6464: , p_Token_Tbl => g_Token_Tbl

Line 6475: Error_Handler.Add_Error_Token

6471: p_rev_component_rec.include_on_ship_docs NOT IN (1, 2)
6472: THEN
6473: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)
6474: THEN
6475: Error_Handler.Add_Error_Token
6476: ( p_Message_Name => 'BOM_INCL_ON_SHIP_DOCS_INVALID'
6477: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6478: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6479: , p_Token_Tbl => g_Token_Tbl

Line 6490: Error_Handler.Add_Error_Token

6486: p_rev_component_rec.quantity_related NOT IN (1, 2)
6487: THEN
6488: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)
6489: THEN
6490: Error_Handler.Add_Error_Token
6491: ( p_Message_Name => 'BOM_QTY_RELATED_INVALID'
6492: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6493: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6494: , p_Token_Tbl => g_Token_Tbl

Line 6501: Error_handler.write_debug ('BOM Implementation date is '||p_rev_comp_unexp_rec.bom_implementation_date);

6497: l_return_status := FND_API.G_RET_STS_ERROR;
6498: END IF;
6499:
6500: -- Validation specific to unimplemented BOM
6501: Error_handler.write_debug ('BOM Implementation date is '||p_rev_comp_unexp_rec.bom_implementation_date);
6502:
6503: IF p_rev_comp_unexp_rec.bom_implementation_date IS NULL
6504: /* added a dummy condition to make sure this validation happens for any BOM, no matter whether the BOM is fluid or not */
6505: OR 1=1

Line 6523: Error_Handler.Add_Error_Token

6519: g_token_tbl(2).token_value := p_rev_component_rec.start_effective_date;
6520: g_token_tbl(3).token_name := 'NEW_EFFECTIVE_DATE';
6521: g_token_tbl(3).token_value := p_rev_component_rec.new_effectivity_date;
6522:
6523: Error_Handler.Add_Error_Token
6524: ( p_Message_Name => 'BOM_DATE_LESS_ITEMREV'
6525: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6526: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6527: , p_Token_Tbl => g_Token_Tbl

Line 6545: Error_Handler.Add_Error_Token

6541: g_token_tbl(2).token_value := p_rev_component_rec.start_effective_date;
6542: g_token_tbl(3).token_name := 'NEW_EFFECTIVE_DATE';
6543: g_token_tbl(3).token_value := p_rev_component_rec.new_effectivity_date;
6544:
6545: Error_Handler.Add_Error_Token
6546: ( p_Message_Name => 'BOM_DATE_LESS_ITEMREV'
6547: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6548: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6549: , p_Token_Tbl => g_Token_Tbl

Line 6574: Error_Handler.Add_Error_Token

6570: g_token_tbl(2).token_value := p_rev_component_rec.start_effective_date;
6571: g_token_tbl(3).token_name := 'NEW_EFFECTIVE_DATE';
6572: g_token_tbl(3).token_value := p_rev_component_rec.new_effectivity_date;
6573:
6574: Error_Handler.Add_Error_Token
6575: ( p_Message_Name => 'BOM_NEW_DATE_LESS_CURR'
6576: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6577: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6578: , p_Token_Tbl => g_Token_Tbl

Line 6596: Error_handler.write_debug ('Checking for item revision start date');

6592: p_rev_component_rec.start_effective_date <> FND_API.G_MISS_DATE AND
6593: Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_BOM_BO
6594: THEN
6595: /* Check revision exists for revised item */
6596: Error_handler.write_debug ('Checking for item revision start date');
6597: IF NOT Item_Revision_Exists(p_rev_comp_unexp_rec.revised_item_id,
6598: p_rev_comp_unexp_rec.organization_id,
6599: p_rev_component_rec.start_effective_date)
6600: THEN

Line 6601: Error_handler.write_debug ('Checking for item revision start date error');

6597: IF NOT Item_Revision_Exists(p_rev_comp_unexp_rec.revised_item_id,
6598: p_rev_comp_unexp_rec.organization_id,
6599: p_rev_component_rec.start_effective_date)
6600: THEN
6601: Error_handler.write_debug ('Checking for item revision start date error');
6602: g_token_tbl(1).token_name := 'ITEM_NAME';
6603: g_token_tbl(1).token_value := p_rev_component_rec.revised_item_name;
6604: --g_token_tbl(1).token_value := to_char(p_rev_comp_unexp_rec.revised_item_id)||':'||to_char(p_rev_comp_unexp_rec.organization_id)||':'||to_char(p_rev_component_rec.start_effective_date,'dd-mon-yyyy hh24:mi:ss');
6605: g_token_tbl(2).token_name := 'EFFECTIVITY_DATE';

Line 6608: Error_Handler.Add_Error_Token(

6604: --g_token_tbl(1).token_value := to_char(p_rev_comp_unexp_rec.revised_item_id)||':'||to_char(p_rev_comp_unexp_rec.organization_id)||':'||to_char(p_rev_component_rec.start_effective_date,'dd-mon-yyyy hh24:mi:ss');
6605: g_token_tbl(2).token_name := 'EFFECTIVITY_DATE';
6606: g_token_tbl(2).token_value := p_rev_component_rec.start_effective_date;
6607:
6608: Error_Handler.Add_Error_Token(
6609: p_Message_Name => 'BOM_SDATE_LESS_ITEMREV'
6610: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6611: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6612: , p_Token_Tbl => g_Token_Tbl

Line 6629: Error_Handler.Add_Error_Token

6625: --g_token_tbl(1).token_value := to_char(p_rev_comp_unexp_rec.component_item_id)||':'||to_char(p_rev_comp_unexp_rec.organization_id)||':'||to_char(p_rev_component_rec.start_effective_date,'dd-mon-yyyy hh24:mi:ss');
6626: g_token_tbl(2).token_name := 'EFFECTIVITY_DATE';
6627: g_token_tbl(2).token_value := p_rev_component_rec.start_effective_date;
6628:
6629: Error_Handler.Add_Error_Token
6630: ( p_Message_Name => 'BOM_SDATE_LESS_ITEMREV'
6631: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6632: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6633: , p_Token_Tbl => g_Token_Tbl

Line 6658: Error_Handler.Add_Error_Token

6654: g_token_tbl(1).token_value := p_rev_component_rec.component_item_name;
6655: g_token_tbl(2).token_name := 'EFFECTIVITY_DATE';
6656: g_token_tbl(2).token_value := p_rev_component_rec.start_effective_date;
6657:
6658: Error_Handler.Add_Error_Token
6659: ( p_Message_Name => 'BOM_START_DATE_LESS_CURR'
6660: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6661: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6662: , p_Token_Tbl => g_Token_Tbl

Line 6687: Error_Handler.Add_Error_Token

6683: AND rounding_control_type = 1;
6684:
6685: EXCEPTION WHEN NO_DATA_FOUND THEN
6686: g_token_tbl.DELETE;
6687: Error_Handler.Add_Error_Token
6688: ( p_Message_Name => 'BOM_ENFORCE_INT_INVALID'
6689: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6690: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6691: , p_Token_Tbl => g_Token_Tbl

Line 6699: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Checking if the BOM header is implemented . . .'); END IF;

6695:
6696: END IF;
6697:
6698: --Validation to ensure that a pending structure header cannot be modified without an ECO
6699: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Checking if the BOM header is implemented . . .'); END IF;
6700:
6701: IF BOM_GLOBALS.Get_Bill_Header_ECN(p_rev_comp_unexp_rec.bill_Sequence_id) IS NOT NULL
6702: AND (p_rev_component_rec.eco_name IS NULL OR p_rev_component_rec.eco_name = FND_API.G_MISS_CHAR)
6703: THEN

Line 6711: Error_Handler.Add_Error_Token

6707: g_token_tbl(2).token_value := p_rev_component_rec.Revised_Item_Name;
6708: g_token_tbl(3).token_name := 'CHANGE_NOTICE';
6709: g_token_tbl(3).token_value := BOM_GLOBALS.Get_Bill_Header_ECN(p_rev_comp_unexp_rec.bill_Sequence_id);
6710:
6711: Error_Handler.Add_Error_Token
6712: ( p_Message_Name => 'BOM_HEADER_UNIMPLEMENTED'
6713: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6714: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6715: , p_Token_Tbl => g_Token_Tbl

Line 6729: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Some unknown error in Attribute Validation . . .' || SQLERRM ); END IF;

6725:
6726: EXCEPTION
6727:
6728: WHEN OTHERS THEN
6729: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Some unknown error in Attribute Validation . . .' || SQLERRM ); END IF;
6730:
6731: Error_Handler.Add_Error_Token
6732: ( p_Message_Name => NULL
6733: , p_Message_Text =>

Line 6731: Error_Handler.Add_Error_Token

6727:
6728: WHEN OTHERS THEN
6729: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Some unknown error in Attribute Validation . . .' || SQLERRM ); END IF;
6730:
6731: Error_Handler.Add_Error_Token
6732: ( p_Message_Name => NULL
6733: , p_Message_Text =>
6734: 'Error in Rev Comp Attr. Validation '
6735: || SUBSTR(SQLERRM, 1, 30) || ' ' ||

Line 6756: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

6752: * Procedure : Will check if a component can be deleted.
6753: *******************************************************************/
6754: PROCEDURE Check_Entity_Delete
6755: ( x_return_status IN OUT NOCOPY VARCHAR2
6756: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
6757: , p_rev_component_rec IN Bom_Bo_Pub.Rev_Component_Rec_Type
6758: , p_Rev_Comp_Unexp_Rec IN Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type
6759: )
6760: IS

Line 6762: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

6758: , p_Rev_Comp_Unexp_Rec IN Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type
6759: )
6760: IS
6761: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
6762: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
6763:
6764: BEGIN
6765:
6766: g_Token_Tbl(1).Token_Name := 'REVISED_COMPONENT_NAME';

Line 6796: Error_Handler.Add_Error_Token

6792: --
6793: IF FND_MSG_PUB.Check_Msg_Level
6794: (FND_MSG_PUB.G_MSG_LVL_ERROR)
6795: THEN
6796: Error_Handler.Add_Error_Token
6797: ( p_Message_Name=> 'BOM_COMP_CANCELLED'
6798: , p_Mesg_Token_Tbl=> l_Mesg_Token_Tbl
6799: , x_Mesg_Token_Tbl=> l_Mesg_Token_Tbl
6800: , p_Token_Tbl => g_Token_Tbl

Line 6852: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

6848: ( p_rev_component_rec IN Bom_Bo_Pub.Rev_Component_Rec_Type
6849: , p_rev_comp_unexp_rec IN Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type
6850: , x_old_rev_component_rec IN OUT NOCOPY Bom_Bo_Pub.Rev_Component_Rec_Type
6851: , x_old_rev_comp_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type
6852: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
6853: , x_return_status IN OUT NOCOPY VARCHAR2
6854: )
6855: IS
6856: l_token_tbl Error_Handler.Token_Tbl_Type;

Line 6856: l_token_tbl Error_Handler.Token_Tbl_Type;

6852: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
6853: , x_return_status IN OUT NOCOPY VARCHAR2
6854: )
6855: IS
6856: l_token_tbl Error_Handler.Token_Tbl_Type;
6857: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
6858: l_return_status VARCHAR2(1);
6859: BEGIN
6860: l_Token_Tbl(1).Token_Name := 'REVISED_COMPONENT_NAME';

Line 6857: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

6853: , x_return_status IN OUT NOCOPY VARCHAR2
6854: )
6855: IS
6856: l_token_tbl Error_Handler.Token_Tbl_Type;
6857: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
6858: l_return_status VARCHAR2(1);
6859: BEGIN
6860: l_Token_Tbl(1).Token_Name := 'REVISED_COMPONENT_NAME';
6861: l_Token_Tbl(1).Token_Value :=

Line 6886: Error_Handler.Add_Error_Token

6882:
6883: IF l_return_status = BOM_Globals.G_RECORD_FOUND AND
6884: p_rev_component_rec.transaction_type = BOM_Globals.G_OPR_CREATE
6885: THEN
6886: Error_Handler.Add_Error_Token
6887: ( x_Mesg_token_tbl => l_Mesg_Token_Tbl
6888: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6889: , p_message_name => 'BOM_REV_COMP_ALREADY_EXISTS'
6890: , p_token_tbl => l_token_tbl

Line 6897: Error_Handler.Add_Error_Token

6893: ELSIF l_return_status = BOM_Globals.G_RECORD_NOT_FOUND AND
6894: p_rev_component_rec.transaction_type IN
6895: (BOM_Globals.G_OPR_UPDATE, BOM_Globals.G_OPR_DELETE)
6896: THEN
6897: Error_Handler.Add_Error_Token
6898: ( x_Mesg_token_tbl => l_Mesg_Token_Tbl
6899: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6900: , p_message_name => 'BOM_REV_COMP_DOESNOT_EXIST'
6901: , p_token_tbl => l_token_tbl

Line 6906: Error_Handler.Add_Error_Token

6902: );
6903: l_return_status := FND_API.G_RET_STS_ERROR;
6904: ELSIF l_Return_status = FND_API.G_RET_STS_UNEXP_ERROR
6905: THEN
6906: Error_Handler.Add_Error_Token
6907: ( x_Mesg_token_tbl => l_Mesg_Token_Tbl
6908: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6909: , p_message_name => NULL
6910: , p_message_text =>

Line 6952: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

6948: *********************************************************************/
6949: PROCEDURE Check_Lineage
6950: ( p_rev_component_rec IN Bom_Bo_Pub.Rev_Component_Rec_Type
6951: , p_rev_comp_unexp_rec IN Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type
6952: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
6953: , x_Return_Status IN OUT NOCOPY VARCHAR2
6954: )
6955: IS
6956: CURSOR c_GetComponent IS

Line 6965: l_Token_Tbl Error_Handler.Token_Tbl_Type;

6961: AND operation_seq_num =
6962: p_rev_component_rec.operation_sequence_number
6963: AND effectivity_date = p_rev_component_rec.start_effective_date;
6964:
6965: l_Token_Tbl Error_Handler.Token_Tbl_Type;
6966: l_return_status VARCHAR2(1);
6967: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
6968:
6969: BEGIN

Line 6967: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

6963: AND effectivity_date = p_rev_component_rec.start_effective_date;
6964:
6965: l_Token_Tbl Error_Handler.Token_Tbl_Type;
6966: l_return_status VARCHAR2(1);
6967: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
6968:
6969: BEGIN
6970: l_return_status := FND_API.G_RET_STS_SUCCESS;
6971:

Line 7001: Error_Handler.Add_Error_Token

6997: l_token_tbl(3).token_name := 'ECO_NAME';
6998: l_token_tbl(3).token_value :=
6999: p_rev_component_rec.eco_name;
7000:
7001: Error_Handler.Add_Error_Token
7002: ( p_Message_Name =>
7003: 'BOM_REV_ITEM_MISMATCH'
7004: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
7005: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 7041: , p_Mesg_Token_Tbl IN Error_Handler.Mesg_Token_Tbl_Type :=

7037: , p_component_item_id IN NUMBER
7038: , p_operation_seq_num IN NUMBER
7039: , p_bill_sequence_id IN NUMBER
7040: , p_component_name IN VARCHAR2
7041: , p_Mesg_Token_Tbl IN Error_Handler.Mesg_Token_Tbl_Type :=
7042: Error_Handler.G_MISS_MESG_TOKEN_TBL
7043: , p_entity_processed IN VARCHAR2 := 'RC'
7044: , p_rfd_sbc_name IN VARCHAR2 := NULL
7045: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

Line 7042: Error_Handler.G_MISS_MESG_TOKEN_TBL

7038: , p_operation_seq_num IN NUMBER
7039: , p_bill_sequence_id IN NUMBER
7040: , p_component_name IN VARCHAR2
7041: , p_Mesg_Token_Tbl IN Error_Handler.Mesg_Token_Tbl_Type :=
7042: Error_Handler.G_MISS_MESG_TOKEN_TBL
7043: , p_entity_processed IN VARCHAR2 := 'RC'
7044: , p_rfd_sbc_name IN VARCHAR2 := NULL
7045: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
7046: , x_Return_Status IN OUT NOCOPY VARCHAR2

Line 7045: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

7041: , p_Mesg_Token_Tbl IN Error_Handler.Mesg_Token_Tbl_Type :=
7042: Error_Handler.G_MISS_MESG_TOKEN_TBL
7043: , p_entity_processed IN VARCHAR2 := 'RC'
7044: , p_rfd_sbc_name IN VARCHAR2 := NULL
7045: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
7046: , x_Return_Status IN OUT NOCOPY VARCHAR2
7047: )
7048: IS
7049: l_Token_Tbl Error_Handler.Token_Tbl_Type;

Line 7049: l_Token_Tbl Error_Handler.Token_Tbl_Type;

7045: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
7046: , x_Return_Status IN OUT NOCOPY VARCHAR2
7047: )
7048: IS
7049: l_Token_Tbl Error_Handler.Token_Tbl_Type;
7050: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type :=
7051: p_Mesg_Token_Tbl;
7052: l_return_status VARCHAR2(1);
7053: l_Rev_Comp_Item_Type NUMBER;

Line 7050: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type :=

7046: , x_Return_Status IN OUT NOCOPY VARCHAR2
7047: )
7048: IS
7049: l_Token_Tbl Error_Handler.Token_Tbl_Type;
7050: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type :=
7051: p_Mesg_Token_Tbl;
7052: l_return_status VARCHAR2(1);
7053: l_Rev_Comp_Item_Type NUMBER;
7054: l_error_name VARCHAR2(30);

Line 7135: Error_Handler.Add_Error_Token

7131: THEN
7132: l_Token_Tbl(2).Token_Value := 'BOM_STANDARD';
7133: END IF;
7134:
7135: Error_Handler.Add_Error_Token
7136: ( p_Message_Name => 'BOM_REV_COMP_ACCESS_DENIED'
7137: , p_Mesg_Token_Tbl => l_mesg_token_tbl
7138: , x_Mesg_Token_Tbl => l_mesg_token_tbl
7139: , p_Token_Tbl => l_token_tbl

Line 7147: Error_Handler.Add_Error_Token

7143: END IF;
7144:
7145: IF l_rev_comp_item_type = 5 /* Product Family */
7146: THEN
7147: Error_Handler.Add_Error_Token
7148: ( p_Message_Name => 'BOM_REV_COMP_PRODUCT_FAMILY'
7149: , p_Mesg_Token_Tbl => l_mesg_token_tbl
7150: , x_Mesg_Token_Tbl => l_mesg_token_tbl
7151: , p_Token_Tbl => l_token_tbl

Line 7173: Error_Handler.Add_Error_Token

7169: LOOP
7170: l_token_tbl.DELETE;
7171: l_Token_Tbl(1).Token_Name := 'REVISED_COMPONENT_NAME';
7172: l_Token_Tbl(1).Token_value := p_component_name;
7173: Error_Handler.Add_Error_Token
7174: ( p_Message_Name => 'BOM_REV_COMP_CANCELLED'
7175: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
7176: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
7177: , p_Token_Tbl => l_token_tbl

Line 7199: Error_Handler.Add_Error_Token

7195: p_component_name;
7196: l_token_tbl(2).token_name := 'ECO_NAME';
7197: l_token_tbl(2).token_value :=
7198: p_change_notice;
7199: Error_Handler.Add_Error_Token
7200: ( p_Message_Name => 'BOM_REV_COMP_UNIT_CONTROL'
7201: , p_Mesg_Token_Tbl => l_mesg_token_tbl
7202: , x_Mesg_Token_Tbl => l_mesg_token_tbl
7203: , p_Token_Tbl => l_token_tbl

Line 7217: Error_Handler.Add_Error_Token

7213: p_component_name;
7214: l_token_tbl(2).token_name := 'ECO_NAME';
7215: l_token_tbl(2).token_value :=
7216: p_change_notice;
7217: Error_Handler.Add_Error_Token
7218: ( p_Message_Name => 'BOM_REV_ITEM_NOT_UNIT_CONTROL'
7219: , p_Mesg_Token_Tbl => l_mesg_token_tbl
7220: , x_Mesg_Token_Tbl => l_mesg_token_tbl
7221: , p_Token_Tbl => l_token_tbl

Line 7256: Error_Handler.Add_Error_Token

7252: l_token_tbl.delete;
7253: l_token_tbl(1).token_name := 'REVISED_ITEM_NAME';
7254: l_token_tbl(1).token_value := p_revised_item_name ;
7255:
7256: Error_Handler.Add_Error_Token
7257: ( p_Message_Name => 'ENG_CANNOT_ADD_ALTERNATE'
7258: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
7259: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
7260: , p_Token_Tbl => l_Token_Tbl

Line 7299: Error_Handler.Add_Error_Token

7295: l_token_tbl(2).token_value := p_component_name;
7296:
7297: l_return_status := FND_API.G_RET_STS_ERROR;
7298:
7299: Error_Handler.Add_Error_Token
7300: ( p_Message_Name => l_error_name
7301: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
7302: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
7303: , p_Token_Tbl => l_token_tbl

Line 7329: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

7325: PROCEDURE Check_Direct_item_comps
7326: ( p_bom_component_rec IN Bom_Bo_Pub.Bom_Comps_Rec_Type
7327: , p_bom_comp_unexp_rec IN Bom_Bo_Pub.Bom_Comps_Unexposed_Rec_Type
7328: , x_bom_component_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Comps_Rec_Type
7329: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
7330: , x_Return_Status IN OUT NOCOPY VARCHAR2
7331: ) IS
7332: -- l_bom_component_rec Bom_Bo_Pub.Bom_Comps_Rec_Type;
7333: l_Token_Tbl Error_Handler.Token_Tbl_Type;

Line 7333: l_Token_Tbl Error_Handler.Token_Tbl_Type;

7329: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
7330: , x_Return_Status IN OUT NOCOPY VARCHAR2
7331: ) IS
7332: -- l_bom_component_rec Bom_Bo_Pub.Bom_Comps_Rec_Type;
7333: l_Token_Tbl Error_Handler.Token_Tbl_Type;
7334: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
7335: l_return_status VARCHAR2(1);
7336: BEGIN
7337: l_return_status := FND_API.G_RET_STS_SUCCESS;

Line 7334: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

7330: , x_Return_Status IN OUT NOCOPY VARCHAR2
7331: ) IS
7332: -- l_bom_component_rec Bom_Bo_Pub.Bom_Comps_Rec_Type;
7333: l_Token_Tbl Error_Handler.Token_Tbl_Type;
7334: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
7335: l_return_status VARCHAR2(1);
7336: BEGIN
7337: l_return_status := FND_API.G_RET_STS_SUCCESS;
7338: IF BOM_EAMUTIL.Direct_Item ( item_id => p_bom_comp_unexp_rec.Component_Item_Id,

Line 7345: Error_Handler.Add_Error_Token

7341: OR p_bom_component_rec.Suggested_Vendor_Name <> FND_API.G_MISS_CHAR)
7342: THEN
7343: x_bom_component_rec.Suggested_Vendor_Name := '';
7344: -- x_bom_component_rec.Vendor_Id := '';
7345: Error_Handler.Add_Error_Token
7346: ( p_Message_Name => 'BOM_COMP_SUPPLIER_IGNORED'
7347: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
7348: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
7349: , p_Token_Tbl => l_token_tbl

Line 7356: Error_Handler.Add_Error_Token

7352: IF (p_bom_component_rec.Unit_Price IS NOT NULL
7353: OR p_bom_component_rec.Unit_Price <> FND_API.G_MISS_NUM)
7354: THEN
7355: x_bom_component_rec.Unit_Price := '';
7356: Error_Handler.Add_Error_Token
7357: ( p_Message_Name => 'BOM_COMP_PRICE_IGNORED'
7358: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
7359: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
7360: , p_Token_Tbl => l_token_tbl

Line 7450: l_mesg_token_tbl Error_Handler.Mesg_Token_Tbl_Type;

7446: l_rev_comp_unexp_rec Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type;
7447: l_old_rev_component_rec Bom_Bo_Pub.Rev_Component_Rec_Type;
7448: l_old_rev_comp_unexp_rec Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type;
7449: l_return_status VARCHAR2(1);
7450: l_mesg_token_tbl Error_Handler.Mesg_Token_Tbl_Type;
7451:
7452: l_message_list Error_Handler.Error_Tbl_Type;
7453: l_debug_error_status VARCHAR2(1);
7454: l_debug_error_mesg VARCHAR2(2000);

Line 7452: l_message_list Error_Handler.Error_Tbl_Type;

7448: l_old_rev_comp_unexp_rec Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type;
7449: l_return_status VARCHAR2(1);
7450: l_mesg_token_tbl Error_Handler.Mesg_Token_Tbl_Type;
7451:
7452: l_message_list Error_Handler.Error_Tbl_Type;
7453: l_debug_error_status VARCHAR2(1);
7454: l_debug_error_mesg VARCHAR2(2000);
7455: l_debug_filename VARCHAR2(20) := 'compjbo'||to_char(sysdate,'MISS');
7456: l_Assembly_Item_Name VARCHAR2(2000);

Line 7467: Error_Handler.Initialize;

7463:
7464: /* Construct the exposed and unexposed records for
7465: component and call check_attributes. check_entity */
7466:
7467: Error_Handler.Initialize;
7468: Error_Handler.Set_Debug ('Y');
7469: Bom_Globals.Set_Debug ('Y');
7470:
7471:

Line 7468: Error_Handler.Set_Debug ('Y');

7464: /* Construct the exposed and unexposed records for
7465: component and call check_attributes. check_entity */
7466:
7467: Error_Handler.Initialize;
7468: Error_Handler.Set_Debug ('Y');
7469: Bom_Globals.Set_Debug ('Y');
7470:
7471:
7472: Error_Handler.Open_Debug_Session

Line 7472: Error_Handler.Open_Debug_Session

7468: Error_Handler.Set_Debug ('Y');
7469: Bom_Globals.Set_Debug ('Y');
7470:
7471:
7472: Error_Handler.Open_Debug_Session
7473: ( p_debug_filename => l_debug_filename
7474: , p_output_dir =>'/appslog/bis_top/utl/plm115dv/out'
7475: , x_return_status => l_debug_error_status
7476: , x_error_mesg => l_debug_error_mesg

Line 7510: Error_Handler.Write_Debug('After open debug ');

7506: THEN
7507: RAISE EXC_ERR_PVT_API_MAIN;
7508: END IF;
7509:
7510: Error_Handler.Write_Debug('After open debug ');
7511:
7512: Error_Handler.Set_BO_Identifier(p_bo_identifier);
7513: Bom_Globals.Set_BO_Identifier(p_bo_identifier);
7514:

Line 7512: Error_Handler.Set_BO_Identifier(p_bo_identifier);

7508: END IF;
7509:
7510: Error_Handler.Write_Debug('After open debug ');
7511:
7512: Error_Handler.Set_BO_Identifier(p_bo_identifier);
7513: Bom_Globals.Set_BO_Identifier(p_bo_identifier);
7514:
7515: /* Set the system information record values for assembly_item_id
7516: and org_id. These values will be used for validating serial effective

Line 7522: Error_Handler.Write_Debug('after set org ');

7518:
7519: Bom_Globals.Set_Org_Id (p_organization_id);
7520: Bom_Globals.Set_Assembly_Item_Id (p_revised_item_id);
7521:
7522: Error_Handler.Write_Debug('after set org ');
7523:
7524: x_return_status := 'S';
7525:
7526: /*Added code to get the parent name

Line 7554: Error_Handler.Write_Debug('0 ');

7550: p_organization_code;
7551: l_rev_component_rec.revised_item_name :=
7552: l_Assembly_Item_Name;
7553: l_rev_component_rec.new_revised_item_revision := NULL;
7554: Error_Handler.Write_Debug('0 ');
7555: Error_Handler.Write_Debug('p_start_Effective_date '||to_char(p_start_Effective_date,'YYYY-MM-DD HH24:MI:SS'));
7556: l_rev_component_rec.start_effective_date := p_start_Effective_date;
7557: -- l_rev_component_rec.start_effective_date :=
7558: -- to_date(p_start_Effective_date,'YYYY-MM-DD HH24:MI:SS');

Line 7555: Error_Handler.Write_Debug('p_start_Effective_date '||to_char(p_start_Effective_date,'YYYY-MM-DD HH24:MI:SS'));

7551: l_rev_component_rec.revised_item_name :=
7552: l_Assembly_Item_Name;
7553: l_rev_component_rec.new_revised_item_revision := NULL;
7554: Error_Handler.Write_Debug('0 ');
7555: Error_Handler.Write_Debug('p_start_Effective_date '||to_char(p_start_Effective_date,'YYYY-MM-DD HH24:MI:SS'));
7556: l_rev_component_rec.start_effective_date := p_start_Effective_date;
7557: -- l_rev_component_rec.start_effective_date :=
7558: -- to_date(p_start_Effective_date,'YYYY-MM-DD HH24:MI:SS');
7559:

Line 7566: Error_Handler.Write_Debug('1 ');

7562:
7563: l_rev_component_rec.disable_date :=
7564: p_disable_date;
7565:
7566: Error_Handler.Write_Debug('1 ');
7567: l_rev_component_rec.operation_sequence_number :=
7568: p_operation_sequence_number;
7569: l_rev_component_rec.component_item_name :=
7570: l_Component_Item_Name;

Line 7579: Error_Handler.Write_Debug('2 ');

7575:
7576: l_rev_component_rec.old_effectivity_date :=
7577: p_old_effectivity_date; -- ECO Specific
7578:
7579: Error_Handler.Write_Debug('2 ');
7580: l_rev_component_rec.old_operation_sequence_number := p_old_operation_sequence_num; -- ECO Specific
7581:
7582: l_rev_component_rec.new_operation_sequence_number :=
7583: p_new_operation_sequence_num;

Line 7665: Error_Handler.Write_Debug('3 ');

7661: l_rev_component_rec.original_system_reference :=
7662: p_original_system_reference;
7663: l_rev_component_rec.transaction_type :=
7664: p_transaction_type;
7665: Error_Handler.Write_Debug('3 ');
7666: l_rev_component_rec.From_End_Item_Unit_Number :=
7667: p_From_End_Item_Unit_Number;
7668: l_rev_component_rec.To_End_Item_Unit_Number :=
7669: p_To_End_Item_Unit_Number;

Line 7694: Error_Handler.Write_Debug('Rowid is '||p_rowid);

7690: p_pick_components;
7691: l_rev_comp_unexp_rec.supply_locator_id :=
7692: p_supply_locator_id;
7693:
7694: Error_Handler.Write_Debug('Rowid is '||p_rowid);
7695: l_rev_comp_unexp_rec.Rowid :=
7696: p_rowid ;
7697: /*
7698: l_rev_comp_unexp_rec.bom_item_type :=

Line 7717: Error_Handler.Write_Debug('4 ');

7713: l_rev_comp_unexp_rec.revised_item_sequence_id := p_revised_item_sequence_id; -- ECO Specific
7714:
7715: l_rev_comp_unexp_rec.Enforce_Int_Requirements_Code :=
7716: p_Enforce_Int_Reqs_Code;
7717: Error_Handler.Write_Debug('4 ');
7718:
7719: l_rev_comp_unexp_rec.bom_implementation_date :=
7720: p_bom_implementation_date;
7721:

Line 7739: Error_Handler.Write_Debug('after assignement ');

7735: p_old_rec_acd_type;
7736: l_old_rev_component_rec.to_end_item_unit_number :=
7737: p_old_rec_to_end_item_unit_num;
7738:
7739: Error_Handler.Write_Debug('after assignement ');
7740: /* validate parent access */
7741:
7742: Bom_Validate_Bom_Header.Check_Access
7743: ( p_assembly_item_id => p_revised_item_id

Line 7750: Error_Handler.Write_Debug('after check access ');

7746: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
7747: , x_Return_Status => x_return_status
7748: );
7749:
7750: Error_Handler.Write_Debug('after check access ');
7751: IF x_return_status <> 'S'
7752: THEN
7753: Error_Handler.Translate_And_Insert_Messages
7754: ( p_mesg_token_tbl => l_mesg_token_tbl

Line 7753: Error_Handler.Translate_And_Insert_Messages

7749:
7750: Error_Handler.Write_Debug('after check access ');
7751: IF x_return_status <> 'S'
7752: THEN
7753: Error_Handler.Translate_And_Insert_Messages
7754: ( p_mesg_token_tbl => l_mesg_token_tbl
7755: , p_application_id => 'BOM'
7756: );
7757:

Line 7758: Error_Handler.Get_Message_List( x_message_list => l_message_list);

7754: ( p_mesg_token_tbl => l_mesg_token_tbl
7755: , p_application_id => 'BOM'
7756: );
7757:
7758: Error_Handler.Get_Message_List( x_message_list => l_message_list);
7759: x_error_message := l_message_list(1).Message_Text;
7760: Error_Handler.Write_To_DebugFile;
7761: Error_Handler.Close_Debug_Session;
7762:

Line 7760: Error_Handler.Write_To_DebugFile;

7756: );
7757:
7758: Error_Handler.Get_Message_List( x_message_list => l_message_list);
7759: x_error_message := l_message_list(1).Message_Text;
7760: Error_Handler.Write_To_DebugFile;
7761: Error_Handler.Close_Debug_Session;
7762:
7763: Return;
7764: END IF;

Line 7761: Error_Handler.Close_Debug_Session;

7757:
7758: Error_Handler.Get_Message_List( x_message_list => l_message_list);
7759: x_error_message := l_message_list(1).Message_Text;
7760: Error_Handler.Write_To_DebugFile;
7761: Error_Handler.Close_Debug_Session;
7762:
7763: Return;
7764: END IF;
7765:

Line 7777: Error_Handler.Write_Debug('after component access ');

7773: , x_Mesg_Token_Tbl => l_mesg_token_tbl
7774: , x_Return_Status => x_return_status
7775: );
7776:
7777: Error_Handler.Write_Debug('after component access ');
7778: IF x_return_status <> 'S'
7779: THEN
7780: Error_Handler.Translate_And_Insert_Messages
7781: ( p_mesg_token_tbl => l_mesg_token_tbl

Line 7780: Error_Handler.Translate_And_Insert_Messages

7776:
7777: Error_Handler.Write_Debug('after component access ');
7778: IF x_return_status <> 'S'
7779: THEN
7780: Error_Handler.Translate_And_Insert_Messages
7781: ( p_mesg_token_tbl => l_mesg_token_tbl
7782: , p_application_id => 'BOM'
7783: );
7784:

Line 7785: Error_Handler.Get_Message_List( x_message_list => l_message_list);

7781: ( p_mesg_token_tbl => l_mesg_token_tbl
7782: , p_application_id => 'BOM'
7783: );
7784:
7785: Error_Handler.Get_Message_List( x_message_list => l_message_list);
7786: x_error_message := l_message_list(1).Message_Text;
7787: Error_Handler.Write_To_DebugFile;
7788: Error_Handler.Close_Debug_Session;
7789:

Line 7787: Error_Handler.Write_To_DebugFile;

7783: );
7784:
7785: Error_Handler.Get_Message_List( x_message_list => l_message_list);
7786: x_error_message := l_message_list(1).Message_Text;
7787: Error_Handler.Write_To_DebugFile;
7788: Error_Handler.Close_Debug_Session;
7789:
7790: Return;
7791: END IF;

Line 7788: Error_Handler.Close_Debug_Session;

7784:
7785: Error_Handler.Get_Message_List( x_message_list => l_message_list);
7786: x_error_message := l_message_list(1).Message_Text;
7787: Error_Handler.Write_To_DebugFile;
7788: Error_Handler.Close_Debug_Session;
7789:
7790: Return;
7791: END IF;
7792:

Line 7810: Error_Handler.Translate_And_Insert_Messages

7806: );
7807:
7808: IF x_return_status <> 'S'
7809: THEN
7810: Error_Handler.Translate_And_Insert_Messages
7811: ( p_mesg_token_tbl => l_mesg_token_tbl
7812: , p_application_id => 'BOM'
7813: );
7814:

Line 7815: Error_Handler.Get_Message_List( x_message_list => l_message_list);

7811: ( p_mesg_token_tbl => l_mesg_token_tbl
7812: , p_application_id => 'BOM'
7813: );
7814:
7815: Error_Handler.Get_Message_List( x_message_list => l_message_list);
7816: x_error_message := l_message_list(1).Message_Text;
7817: Error_Handler.Write_To_DebugFile;
7818: Error_Handler.Close_Debug_Session;
7819:

Line 7817: Error_Handler.Write_To_DebugFile;

7813: );
7814:
7815: Error_Handler.Get_Message_List( x_message_list => l_message_list);
7816: x_error_message := l_message_list(1).Message_Text;
7817: Error_Handler.Write_To_DebugFile;
7818: Error_Handler.Close_Debug_Session;
7819:
7820: Return;
7821: END IF;

Line 7818: Error_Handler.Close_Debug_Session;

7814:
7815: Error_Handler.Get_Message_List( x_message_list => l_message_list);
7816: x_error_message := l_message_list(1).Message_Text;
7817: Error_Handler.Write_To_DebugFile;
7818: Error_Handler.Close_Debug_Session;
7819:
7820: Return;
7821: END IF;
7822:

Line 7842: Error_Handler.Write_Debug('after check entity ');

7838: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
7839: , x_return_status => x_Return_Status
7840: );
7841:
7842: Error_Handler.Write_Debug('after check entity ');
7843: IF x_return_status <> 'S'
7844: THEN
7845: Error_Handler.Translate_And_Insert_Messages
7846: ( p_mesg_token_tbl => l_mesg_token_tbl

Line 7845: Error_Handler.Translate_And_Insert_Messages

7841:
7842: Error_Handler.Write_Debug('after check entity ');
7843: IF x_return_status <> 'S'
7844: THEN
7845: Error_Handler.Translate_And_Insert_Messages
7846: ( p_mesg_token_tbl => l_mesg_token_tbl
7847: , p_application_id => 'BOM'
7848: );
7849:

Line 7850: Error_Handler.Get_Message_List( x_message_list => l_message_list);

7846: ( p_mesg_token_tbl => l_mesg_token_tbl
7847: , p_application_id => 'BOM'
7848: );
7849:
7850: Error_Handler.Get_Message_List( x_message_list => l_message_list);
7851: x_error_message := l_message_list(1).Message_Text;
7852:
7853: Error_Handler.Write_To_DebugFile;
7854: Error_Handler.Close_Debug_Session;

Line 7853: Error_Handler.Write_To_DebugFile;

7849:
7850: Error_Handler.Get_Message_List( x_message_list => l_message_list);
7851: x_error_message := l_message_list(1).Message_Text;
7852:
7853: Error_Handler.Write_To_DebugFile;
7854: Error_Handler.Close_Debug_Session;
7855:
7856: END IF;
7857: EXCEPTION WHEN OTHERS THEN

Line 7854: Error_Handler.Close_Debug_Session;

7850: Error_Handler.Get_Message_List( x_message_list => l_message_list);
7851: x_error_message := l_message_list(1).Message_Text;
7852:
7853: Error_Handler.Write_To_DebugFile;
7854: Error_Handler.Close_Debug_Session;
7855:
7856: END IF;
7857: EXCEPTION WHEN OTHERS THEN
7858: x_error_message := SQLCODE||'/'||SQLERRM;

Line 7859: Error_Handler.Write_To_DebugFile;

7855:
7856: END IF;
7857: EXCEPTION WHEN OTHERS THEN
7858: x_error_message := SQLCODE||'/'||SQLERRM;
7859: Error_Handler.Write_To_DebugFile;
7860: Error_Handler.Close_Debug_Session;
7861:
7862: END;
7863:

Line 7860: Error_Handler.Close_Debug_Session;

7856: END IF;
7857: EXCEPTION WHEN OTHERS THEN
7858: x_error_message := SQLCODE||'/'||SQLERRM;
7859: Error_Handler.Write_To_DebugFile;
7860: Error_Handler.Close_Debug_Session;
7861:
7862: END;
7863:
7864: -- add for bug 8639519