DBA Data[Home] [Help]

APPS.BOM_VALIDATE_COMP_OPERATION dependencies on ERROR_HANDLER

Line 305: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

301: ********************************************************************/
302:
303: PROCEDURE Check_Entity
304: ( x_return_status IN OUT NOCOPY VARCHAR2
305: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
306: , p_bom_comp_ops_rec IN Bom_Bo_Pub.Bom_Comp_Ops_Rec_Type
307: , p_bom_comp_ops_Unexp_Rec IN Bom_Bo_Pub.Bom_Comp_Ops_Unexp_Rec_Type
308: )
309: IS

Line 312: l_token_tbl Error_Handler.Token_tbl_Type;

308: )
309: IS
310:
311: l_disable_date Date;
312: l_token_tbl Error_Handler.Token_tbl_Type;
313: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
314: l_Additional_Op_Seq_Number NUMBER;
315: l_temp_var NUMBER :=0;
316: p_dummy NUMBER;

Line 313: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

309: IS
310:
311: l_disable_date Date;
312: l_token_tbl Error_Handler.Token_tbl_Type;
313: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
314: l_Additional_Op_Seq_Number NUMBER;
315: l_temp_var NUMBER :=0;
316: p_dummy NUMBER;
317: l_assy_bom_enabled VARCHAR2(1);

Line 329: Error_Handler.Add_Error_Token

325: WHERE bill_sequence_id = source_bill_sequence_id
326: AND bill_sequence_id = p_bom_comp_ops_unexp_rec.bill_Sequence_id;
327: EXCEPTION
328: WHEN NO_DATA_FOUND THEN
329: Error_Handler.Add_Error_Token
330: ( p_Message_Name => 'BOM_COMMON_COMP_OP'
331: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
332: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
333: , p_Token_Tbl => l_Token_Tbl

Line 338: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity Validation for Comp. Operation begins . . .'); END IF;

334: );
335: x_Return_Status := FND_API.G_RET_STS_ERROR;
336: END;
337:
338: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity Validation for Comp. Operation begins . . .'); END IF;
339:
340:
341: SELECT msi.bom_enabled_flag
342: INTO l_assy_bom_enabled

Line 349: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Assy Bom Enabled flag : ' || l_assy_bom_enabled); END IF;

345: WHERE bbom.bill_sequence_id = p_bom_comp_ops_Unexp_Rec.bill_sequence_id
346: AND bbom.assembly_item_id = msi.inventory_item_id
347: AND bbom.organization_id = msi.organization_id;
348:
349: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Assy Bom Enabled flag : ' || l_assy_bom_enabled); END IF;
350:
351: IF l_assy_bom_enabled <> 'Y'
352: THEN
353: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

Line 357: Error_Handler.Add_Error_Token

353: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
354: l_token_tbl(1).token_name := 'REVISED_ITEM_NAME';
355: l_token_tbl(1).token_value :=
356: p_bom_comp_ops_rec.assembly_Item_Name;
357: Error_Handler.Add_Error_Token
358: ( x_Mesg_Token_tbl => l_Mesg_Token_Tbl
359: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
360: , p_message_name => 'BOM_REV_ITEM_BOM_NOT_ENABLED'
361: , p_token_tbl => l_token_tbl

Line 402: Error_Handler.Add_Error_Token

398: l_token_tbl(1).token_name := 'COMPONENT_ITEM_NAME';
399: l_token_tbl(1).token_value := p_bom_comp_ops_rec.component_item_name;
400: l_token_tbl(2).token_name := 'OPERATION_SEQ_NUM';
401: l_token_tbl(2).token_value := p_bom_comp_ops_rec.additional_operation_seq_num;
402: Error_Handler.Add_Error_Token
403: ( x_Mesg_Token_tbl => l_Mesg_Token_tbl
404: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
405: , p_message_name => 'BOM_COPS_DATES_OVERLAP'
406: , p_token_tbl => l_token_tbl

Line 426: Error_Handler.Add_Error_Token

422: l_token_tbl(1).token_name := 'COMPONENT_ITEM_NAME';
423: l_token_tbl(1).token_value := p_bom_comp_ops_rec.component_item_name;
424: l_token_tbl(2).token_name := 'OPERATION_SEQ_NUM';
425: l_token_tbl(2).token_value := p_bom_comp_ops_rec.additional_operation_seq_num;
426: Error_Handler.Add_Error_Token
427: ( x_Mesg_Token_tbl => l_Mesg_Token_tbl
428: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
429: , p_message_name => 'BOM_COPS_NUMBERS_OVERLAP'
430: , p_token_tbl => l_token_tbl

Line 460: Error_Handler.Add_Error_Token

456: p_bom_comp_ops_rec.new_additional_op_seq_num;
457: l_token_tbl(2).token_name := 'REVISED_COMPONENT_NAME';
458: l_token_tbl(2).token_value := p_bom_comp_ops_rec.component_item_name;
459:
460: Error_Handler.Add_Error_Token
461: ( x_Mesg_token_tbl => l_Mesg_Token_Tbl
462: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
463: , p_message_name => 'BOM_COMP_OPS_ALREADY_EXISTS'
464: , p_token_tbl => l_token_tbl

Line 471: IF BOm_GlobalS.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Verified New addtional Component operation ... '); END IF;

467: RAISE FND_API.G_EXC_ERROR;
468: END IF;
469: END IF;
470:
471: IF BOm_GlobalS.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Verified New addtional Component operation ... '); END IF;
472:
473: IF Bom_GlobalS.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Verifying Operation Seq Num in Editable common Bills ... '); END IF;
474: --The op seq num being used must be valid for the editable common bills commoning this bill.
475: IF NOT BOMPCMBM.Check_Op_Seq_In_Ref_Boms(p_src_bill_seq_id => p_bom_comp_ops_unexp_rec.bill_sequence_id,

Line 473: IF Bom_GlobalS.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Verifying Operation Seq Num in Editable common Bills ... '); END IF;

469: END IF;
470:
471: IF BOm_GlobalS.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Verified New addtional Component operation ... '); END IF;
472:
473: IF Bom_GlobalS.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Verifying Operation Seq Num in Editable common Bills ... '); END IF;
474: --The op seq num being used must be valid for the editable common bills commoning this bill.
475: IF NOT BOMPCMBM.Check_Op_Seq_In_Ref_Boms(p_src_bill_seq_id => p_bom_comp_ops_unexp_rec.bill_sequence_id,
476: p_op_seq => nvl(p_bom_comp_ops_rec.new_additional_op_seq_num,
477: p_bom_comp_ops_rec.additional_operation_seq_num)

Line 480: Error_Handler.Add_Error_Token

476: p_op_seq => nvl(p_bom_comp_ops_rec.new_additional_op_seq_num,
477: p_bom_comp_ops_rec.additional_operation_seq_num)
478: )
479: THEN
480: Error_Handler.Add_Error_Token
481: ( p_Message_Name => 'BOM_COMMON_OP_SEQ_INVALID'
482: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
483: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
484: , p_Token_Tbl => l_Token_Tbl

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

492: EXCEPTION
493:
494: WHEN FND_API.G_EXC_ERROR THEN
495:
496: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Expected Error in Comp Operations. Entity Validation '); END IF;
497:
498: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
499: x_return_status := FND_API.G_RET_STS_ERROR;
500:

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

499: x_return_status := FND_API.G_RET_STS_ERROR;
500:
501: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
502:
503: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('UNExpected Error in Comp. Operations Entity Validation '); END IF;
504: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
505: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
506:
507: WHEN OTHERS THEN

Line 526: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

522: ********************************************************************/
523:
524: PROCEDURE Check_Attributes
525: ( x_return_status IN OUT NOCOPY VARCHAR2
526: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
527: , p_bom_comp_ops_rec IN Bom_Bo_Pub.Bom_Comp_Ops_Rec_Type
528: , p_bom_comp_ops_unexp_rec IN Bom_Bo_Pub.Bom_Comp_Ops_Unexp_Rec_Type
529: )
530: IS

Line 534: l_token_tbl Error_Handler.Token_tbl_Type;

530: IS
531:
532: l_original_routing VARCHAR2(1) := 'N';
533: l_valid Number := 0;
534: l_token_tbl Error_Handler.Token_tbl_Type;
535: l_Mesg_token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
536: l_err_text VARCHAR2(240);
537:
538: CURSOR OpSeq_In_Original IS

Line 535: l_Mesg_token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

531:
532: l_original_routing VARCHAR2(1) := 'N';
533: l_valid Number := 0;
534: l_token_tbl Error_Handler.Token_tbl_Type;
535: l_Mesg_token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
536: l_err_text VARCHAR2(240);
537:
538: CURSOR OpSeq_In_Original IS
539: SELECT operation_seq_num

Line 567: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Attribute Validation Starts . . . '); END IF;

563: BEGIN
564:
565: x_return_status := FND_API.G_RET_STS_SUCCESS;
566:
567: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Attribute Validation Starts . . . '); END IF;
568:
569: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Additional Operation Sequence Number is '||to_char(p_bom_comp_ops_rec.additional_operation_seq_num)); END IF;
570:
571: /* Check for the existence of OpSeq in the original routing which is defined for this item */

Line 569: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Additional Operation Sequence Number is '||to_char(p_bom_comp_ops_rec.additional_operation_seq_num)); END IF;

565: x_return_status := FND_API.G_RET_STS_SUCCESS;
566:
567: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Attribute Validation Starts . . . '); END IF;
568:
569: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Additional Operation Sequence Number is '||to_char(p_bom_comp_ops_rec.additional_operation_seq_num)); END IF;
570:
571: /* Check for the existence of OpSeq in the original routing which is defined for this item */
572:
573: FOR r1 IN OpSeq_In_Original

Line 603: Error_Handler.Add_Error_Token

599: THEN
600: l_token_tbl(1).token_name := 'OPERATION_SEQ_NUM';
601: l_token_tbl(1).token_value := p_bom_comp_ops_rec.additional_operation_seq_num;
602:
603: Error_Handler.Add_Error_Token
604: ( x_Mesg_Token_tbl => l_Mesg_Token_tbl
605: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
606: , p_message_name => 'BOM_COPS_OPSEQ_INVALID'
607: , p_token_tbl => l_token_tbl

Line 625: Error_Handler.Add_Error_Token

621: l_err_text := G_PKG_NAME ||
622: 'Attribute Validate (Component Operation)' ||
623: SUBSTR(SQLERRM, 1, 100);
624:
625: Error_Handler.Add_Error_Token
626: ( p_Message_Name => NULL
627: , p_Message_Text => l_err_text
628: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
629: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 659: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

655: ( p_bom_comp_ops_rec IN Bom_Bo_Pub.Bom_Comp_Ops_Rec_Type
656: , p_bom_comp_ops_unexp_rec IN Bom_Bo_Pub.Bom_Comp_Ops_Unexp_Rec_Type
657: , x_old_bom_comp_ops_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Comp_Ops_Rec_Type
658: , x_old_bom_comp_ops_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Comp_Ops_Unexp_Rec_Type
659: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
660: , x_Return_Status IN OUT NOCOPY VARCHAR2
661: )
662: IS
663: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

Line 663: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

659: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
660: , x_Return_Status IN OUT NOCOPY VARCHAR2
661: )
662: IS
663: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
664: l_Return_Status VARCHAR2(1);
665: l_Token_Tbl Error_Handler.Token_Tbl_Type;
666: BEGIN
667: l_Token_Tbl(1).Token_Name := 'OPERATION_SEQUENCE_NUMBER';

Line 665: l_Token_Tbl Error_Handler.Token_Tbl_Type;

661: )
662: IS
663: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
664: l_Return_Status VARCHAR2(1);
665: l_Token_Tbl Error_Handler.Token_Tbl_Type;
666: BEGIN
667: l_Token_Tbl(1).Token_Name := 'OPERATION_SEQUENCE_NUMBER';
668: l_Token_Tbl(1).Token_Value :=
669: p_bom_comp_ops_rec.additional_operation_seq_num;

Line 685: Error_Handler.Add_Error_Token

681:
682: IF l_return_status = Bom_Globals.G_RECORD_FOUND AND
683: p_bom_comp_ops_rec.transaction_type = Bom_Globals.G_OPR_CREATE
684: THEN
685: Error_Handler.Add_Error_Token
686: ( x_Mesg_token_tbl => l_Mesg_Token_Tbl
687: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
688: , p_message_name => 'BOM_COMP_OPS_ALREADY_EXISTS'
689: , p_token_tbl => l_token_tbl

Line 696: Error_Handler.Add_Error_Token

692: ELSIF l_return_status = Bom_Globals.G_RECORD_NOT_FOUND AND
693: p_bom_comp_ops_rec.transaction_type IN
694: (Bom_Globals.G_OPR_UPDATE, Bom_Globals.G_OPR_DELETE)
695: THEN
696: Error_Handler.Add_Error_Token
697: ( x_Mesg_token_tbl => l_Mesg_Token_Tbl
698: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
699: , p_message_name => 'BOM_COMP_OPS_DOESNOT_EXIST'
700: , p_token_tbl => l_token_tbl

Line 705: Error_Handler.Add_Error_Token

701: );
702: l_return_status := FND_API.G_RET_STS_ERROR;
703: ELSIF l_Return_status = FND_API.G_RET_STS_UNEXP_ERROR
704: THEN
705: Error_Handler.Add_Error_Token
706: ( x_Mesg_token_tbl => l_Mesg_Token_Tbl
707: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
708: , p_message_name => NULL
709: , p_message_text =>

Line 740: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

736:
737: PROCEDURE Check_Lineage
738: ( p_bom_comp_ops_rec IN Bom_Bo_Pub.Bom_Comp_Ops_Rec_Type
739: , p_bom_comp_ops_unexp_rec IN Bom_Bo_Pub.Bom_Comp_Ops_Unexp_Rec_Type
740: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
741: , x_Return_Status IN OUT NOCOPY VARCHAR2
742: )
743: IS
744: l_token_tbl Error_Handler.Token_Tbl_Type;

Line 744: l_token_tbl Error_Handler.Token_Tbl_Type;

740: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
741: , x_Return_Status IN OUT NOCOPY VARCHAR2
742: )
743: IS
744: l_token_tbl Error_Handler.Token_Tbl_Type;
745: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
746:
747: CURSOR c_GetComponent IS
748: SELECT component_sequence_id

Line 745: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

741: , x_Return_Status IN OUT NOCOPY VARCHAR2
742: )
743: IS
744: l_token_tbl Error_Handler.Token_Tbl_Type;
745: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
746:
747: CURSOR c_GetComponent IS
748: SELECT component_sequence_id
749: FROM bom_inventory_components

Line 774: Error_Handler.Add_Error_Token

770: 'ASSEMBLY_ITEM_NAME';
771: l_Token_Tbl(3).token_value :=
772: p_bom_comp_ops_rec.assembly_item_name;
773:
774: Error_Handler.Add_Error_Token
775: ( p_Message_Name => 'BOM_COPS_REV_ITEM_MISMATCH'
776: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
777: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
778: , p_Token_Tbl => l_Token_Tbl