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 FND_MSG_PUB

Line 3560: IF FND_MSG_PUB.Check_Msg_Level

3556: -- If the primary bill does not exist then the acd type
3557: -- of the component cannot be other that add.
3558: --
3559: ******************************************************/
3560: IF FND_MSG_PUB.Check_Msg_Level
3561: (FND_MSG_PUB.G_MSG_LVL_ERROR)
3562: THEN
3563: Error_Handler.Add_Error_Token
3564: ( p_message_name => 'BOM_CMP_ACD_TYPE_ADD'

Line 3561: (FND_MSG_PUB.G_MSG_LVL_ERROR)

3557: -- of the component cannot be other that add.
3558: --
3559: ******************************************************/
3560: IF FND_MSG_PUB.Check_Msg_Level
3561: (FND_MSG_PUB.G_MSG_LVL_ERROR)
3562: THEN
3563: Error_Handler.Add_Error_Token
3564: ( p_message_name => 'BOM_CMP_ACD_TYPE_ADD'
3565: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 3590: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

3586:
3587: -- If no exception is raised then Bill is referencing another
3588: -- bill
3589:
3590: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3591: THEN
3592: g_token_tbl(2).token_name := 'REVISED_ITEM_NAME';
3593: g_token_tbl(2).token_value :=
3594: p_rev_component_rec.revised_item_name;

Line 3617: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

3613: p_rev_comp_unexp_rec.bill_sequence_id)
3614: THEN
3615: NULL;
3616: ELSE
3617: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3618: THEN
3619: g_token_tbl(2).token_name := 'REVISED_ITEM_NAME';
3620: g_token_tbl(2).token_value :=
3621: p_rev_component_rec.revised_item_name;

Line 3632: IF FND_MSG_PUB.Check_Msg_Level

3628: END IF;
3629: l_return_status := FND_API.G_RET_STS_ERROR;
3630: END IF;
3631: WHEN OTHERS THEN
3632: IF FND_MSG_PUB.Check_Msg_Level
3633: (FND_MSG_PUB.G_MSG_LVL_ERROR)
3634: THEN
3635: Error_Handler.Add_Error_Token
3636: ( p_message_name => NULL

Line 3633: (FND_MSG_PUB.G_MSG_LVL_ERROR)

3629: l_return_status := FND_API.G_RET_STS_ERROR;
3630: END IF;
3631: WHEN OTHERS THEN
3632: IF FND_MSG_PUB.Check_Msg_Level
3633: (FND_MSG_PUB.G_MSG_LVL_ERROR)
3634: THEN
3635: Error_Handler.Add_Error_Token
3636: ( p_message_name => NULL
3637: , p_message_text => 'Common Bill Check ' ||

Line 3657: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

3653: ******************************************************************/
3654: IF p_rev_comp_unexp_rec.revised_item_id =
3655: p_rev_comp_unexp_rec.component_item_id
3656: THEN
3657: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3658: THEN
3659: g_token_tbl(1).token_name := 'REVISED_ITEM_NAME';
3660: g_token_tbl(1).token_value :=
3661: g_rev_component_rec.revised_item_name;

Line 3692: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

3688: IF g_Comp_Bom_Enabled_Flag = 'N' THEN
3689: -- Bom_Enabled is N, so cannot add a component .
3690: -- Check if ACD type is not Disable or Update
3691: IF( nvl(p_rev_component_rec.acd_type, 1) NOT IN (2 , 3)) THEN -- Change or Disable
3692: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3693: THEN
3694: Error_Handler.Add_Error_Token
3695: ( x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3696: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 3772: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

3768: g_rev_component_rec.component_item_name;
3769:
3770: IF g_Comp_Item_Type = 5
3771: THEN
3772: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3773: THEN
3774: Error_Handler.Add_Error_Token
3775: ( p_message_name => 'BOM_ITEM_PRODUCT_FAMILY'
3776: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 3816: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

3812: /*ELSIF l_result = 4 THEN
3813: l_err_text := 'BOM_COMMON_OP_SEQ_INVALID';*/
3814: END IF;
3815:
3816: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3817: THEN
3818: Error_Handler.Add_Error_Token
3819: ( p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3820: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 3846: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

3842: --
3843: IF p_Old_Rev_Component_Rec.Shipping_Allowed <>
3844: p_rev_component_rec.shipping_allowed
3845: THEN
3846: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3847: THEN
3848: Error_Handler.Add_Error_Token
3849: ( p_message_name => 'BOM_SHIP_ALLOWED_NOT_UPDATE'
3850: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 3910: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

3906: IF p_rev_component_rec.old_effectivity_date IS NOT NULL AND
3907: p_rev_component_rec.old_effectivity_date <> FND_API.G_MISS_DATE AND
3908: Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_ECO_BO
3909: THEN
3910: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3911: THEN
3912: Error_Handler.Add_Error_Token
3913: ( p_message_name => 'BOM_OLD_EFFECTIVITY_GIVEN'
3914: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 3928: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

3924: p_rev_component_rec.old_operation_sequence_number <>
3925: FND_API.G_MISS_NUM AND
3926: Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_ECO_BO
3927: THEN
3928: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3929: THEN
3930: Error_Handler.Add_Error_Token
3931: ( p_message_name => 'BOM_OLD_OP_SEQ_NUM_GIVEN'
3932: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 3947: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

3943: IF p_rev_component_rec.acd_type <>
3944: p_old_rev_component_rec.acd_type AND
3945: Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_ECO_BO
3946: THEN
3947: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3948: THEN
3949: Error_Handler.Add_Error_Token
3950: ( p_message_name => 'BOM_ACD_TYPE_NOT_UPDATEABLE'
3951: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 3966: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

3962: --
3963: IF p_old_rev_component_rec.acd_type = 3 AND
3964: Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_ECO_BO
3965: THEN
3966: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3967: THEN
3968: Error_Handler.Add_Error_Token
3969: ( p_message_name => 'BOM_COMPONENT_DISABLED'
3970: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 3985: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

3981: IF NVL(p_rev_component_rec.acd_type, 1) = 3 AND
3982: p_rev_component_rec.to_end_item_unit_number <>
3983: p_old_rev_component_rec.to_end_item_unit_number
3984: THEN
3985: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3986: THEN
3987: Error_Handler.Add_Error_Token
3988: ( p_message_name => 'BOM_DISABLE_TOUNIT_NONUPD'
3989: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 4027: IF FND_MSG_PUB.Check_Msg_Level

4023: IF g_assy_item_type = 3 -- Planning parent
4024: OR
4025: g_comp_item_type = 2 -- Option Class component
4026: THEN
4027: IF FND_MSG_PUB.Check_Msg_Level
4028: (FND_MSG_PUB.G_MSG_LVL_ERROR)
4029: THEN
4030: g_token_tbl(2).token_name :=
4031: 'REVISED_ITEM_NAME';

Line 4028: (FND_MSG_PUB.G_MSG_LVL_ERROR)

4024: OR
4025: g_comp_item_type = 2 -- Option Class component
4026: THEN
4027: IF FND_MSG_PUB.Check_Msg_Level
4028: (FND_MSG_PUB.G_MSG_LVL_ERROR)
4029: THEN
4030: g_token_tbl(2).token_name :=
4031: 'REVISED_ITEM_NAME';
4032: g_token_tbl(2).token_value :=

Line 4047: IF FND_MSG_PUB.Check_Msg_Level

4043: END IF;
4044:
4045: IF p_rev_component_rec.projected_yield <=0
4046: THEN
4047: IF FND_MSG_PUB.Check_Msg_Level
4048: (FND_MSG_PUB.G_MSG_LVL_ERROR)
4049: THEN
4050: g_token_tbl(2).token_name :=
4051: 'REVISED_ITEM_NAME';

Line 4048: (FND_MSG_PUB.G_MSG_LVL_ERROR)

4044:
4045: IF p_rev_component_rec.projected_yield <=0
4046: THEN
4047: IF FND_MSG_PUB.Check_Msg_Level
4048: (FND_MSG_PUB.G_MSG_LVL_ERROR)
4049: THEN
4050: g_token_tbl(2).token_name :=
4051: 'REVISED_ITEM_NAME';
4052: g_token_tbl(2).token_value :=

Line 4067: IF FND_MSG_PUB.Check_Msg_Level

4063: END IF;
4064:
4065: IF p_rev_component_rec.projected_yield > 1
4066: THEN
4067: IF FND_MSG_PUB.Check_Msg_Level
4068: (FND_MSG_PUB.G_MSG_LVL_ERROR)
4069: THEN
4070: -- Log warning
4071:

Line 4068: (FND_MSG_PUB.G_MSG_LVL_ERROR)

4064:
4065: IF p_rev_component_rec.projected_yield > 1
4066: THEN
4067: IF FND_MSG_PUB.Check_Msg_Level
4068: (FND_MSG_PUB.G_MSG_LVL_ERROR)
4069: THEN
4070: -- Log warning
4071:
4072: Error_Handler.Add_Error_Token

Line 4166: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

4162: IF p_rev_component_rec.transaction_type in (BOM_GLOBALS.G_OPR_CREATE,
4163: BOM_GLOBALS.G_OPR_UPDATE) AND
4164: p_rev_component_rec.disable_date <
4165: p_rev_component_rec.start_effective_date THEN
4166: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
4167: THEN
4168: Error_Handler.Add_Error_Token
4169: ( p_message_name => 'BOM_COMP_DIS_DATE_INVALID'
4170: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 4270: IF FND_MSG_PUB.Check_Msg_Level

4266:
4267: EXCEPTION
4268: WHEN NO_DATA_FOUND THEN
4269: -- component is yet not implemented
4270: IF FND_MSG_PUB.Check_Msg_Level
4271: (FND_MSG_PUB.G_MSG_LVL_ERROR)
4272: THEN
4273: Error_Handler.Add_Error_Token
4274: ( p_message_name => 'BOM_OLD_COMP_SEQ_ID_INVALID'

Line 4271: (FND_MSG_PUB.G_MSG_LVL_ERROR)

4267: EXCEPTION
4268: WHEN NO_DATA_FOUND THEN
4269: -- component is yet not implemented
4270: IF FND_MSG_PUB.Check_Msg_Level
4271: (FND_MSG_PUB.G_MSG_LVL_ERROR)
4272: THEN
4273: Error_Handler.Add_Error_Token
4274: ( p_message_name => 'BOM_OLD_COMP_SEQ_ID_INVALID'
4275: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 4352: IF FND_MSG_PUB.Check_Msg_Level

4348: (p_rev_comp_unexp_rec.old_component_sequence_id,
4349: l_eco_for_production)
4350: LOOP
4351: -- component is invalid
4352: IF FND_MSG_PUB.Check_Msg_Level
4353: (FND_MSG_PUB.G_MSG_LVL_ERROR)
4354: THEN
4355: Error_Handler.Add_Error_Token
4356: ( p_message_name => 'BOM_OLD_COMP_SEQ_ID_INVALID'

Line 4353: (FND_MSG_PUB.G_MSG_LVL_ERROR)

4349: l_eco_for_production)
4350: LOOP
4351: -- component is invalid
4352: IF FND_MSG_PUB.Check_Msg_Level
4353: (FND_MSG_PUB.G_MSG_LVL_ERROR)
4354: THEN
4355: Error_Handler.Add_Error_Token
4356: ( p_message_name => 'BOM_OLD_COMP_SEQ_ID_INVALID'
4357: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 4413: IF FND_MSG_PUB.Check_Msg_Level

4409: *************************************************************/
4410:
4411: IF NOT Check_Routing_Exists
4412: THEN
4413: IF FND_MSG_PUB.Check_Msg_Level
4414: (FND_MSG_PUB.G_MSG_LVL_ERROR)
4415: THEN
4416: Error_Handler.Add_Error_Token
4417: ( p_message_name => 'BOM_ONLY_ONE'

Line 4414: (FND_MSG_PUB.G_MSG_LVL_ERROR)

4410:
4411: IF NOT Check_Routing_Exists
4412: THEN
4413: IF FND_MSG_PUB.Check_Msg_Level
4414: (FND_MSG_PUB.G_MSG_LVL_ERROR)
4415: THEN
4416: Error_Handler.Add_Error_Token
4417: ( p_message_name => 'BOM_ONLY_ONE'
4418: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 4579: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)

4575: X_Operation_Seq_Num => p_rev_component_rec.operation_sequence_number)
4576: THEN
4577: --if function return true then component dates overlapp
4578:
4579: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)
4580: THEN
4581: Error_Handler.Add_Error_Token
4582: ( p_Message_Name => 'BOM_COMP_OPSEQ_DATE_OVERLAP'
4583: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 4615: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)

4611: p_rev_component_rec.operation_sequence_number)
4612: THEN
4613: --if function return true then component dates overlapp
4614:
4615: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)
4616: THEN
4617: Error_Handler.Add_Error_Token
4618: ( p_Message_Name => 'BOM_COMP_OPSEQ_UNIT_OVERLAP'
4619: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 4666: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)

4662: p_entity => 'RC')
4663: THEN
4664: --if function return true then component dates overlapp
4665:
4666: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)
4667: THEN
4668: Error_Handler.Add_Error_Token
4669: ( p_Message_Name => 'BOM_COMP_OPSEQ_DATE_OVERLAP'
4670: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 4703: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)

4699: p_entity => 'RC')
4700: THEN
4701: --if function return true then component unit numbers overlapp
4702:
4703: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)
4704: THEN
4705: Error_Handler.Add_Error_Token
4706: ( p_Message_Name => 'BOM_COMP_OPSEQ_UNIT_OVERLAP'
4707: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 4725: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

4721:
4722: If (p_rev_component_rec.Transaction_Type=BOM_GLOBALS.G_OPR_CREATE AND g_Assy_Item_Type = Bom_Globals.G_PRODUCT_FAMILY) THEN
4723: l_Result := CheckUnique_PF_Member;
4724: IF l_Result = 1 Then
4725: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
4726: THEN
4727: g_Token_Tbl(2).Token_Name := 'pf_item';
4728: g_Token_Tbl(2).Token_Value :=
4729: g_rev_component_rec.revised_item_name;

Line 4763: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

4759: )
4760: THEN
4761: l_Result := Check_PTO_ATO_for_Optional;
4762: IF l_Result = 1 THEN
4763: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
4764: THEN
4765: Error_Handler.Add_Error_Token
4766: ( p_message_name => 'BOM_COMP_OPTIONAL'
4767: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 4775: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

4771: END IF;
4772: l_return_status := FND_API.G_RET_STS_ERROR;
4773: ELSIF l_Result = 2
4774: THEN
4775: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
4776: THEN
4777: Error_Handler.Add_Error_Token
4778: ( p_message_name => 'BOM_COMP_NOT_OPTIONAL'
4779: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 4814: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

4810: )
4811: THEN
4812: l_Result := Check_Planning_Percent;
4813: IF l_Result = 1 THEN
4814: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
4815: THEN
4816: g_Token_Tbl(2).Token_Name := 'REVISED_ITEM_NAME';
4817: g_Token_Tbl(2).Token_Value :=
4818: g_rev_component_rec.revised_item_name;

Line 4829: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

4825: g_Token_Tbl.DELETE(2);
4826: END IF;
4827: l_return_status := FND_API.G_RET_STS_ERROR;
4828: ELSIF l_Result = 2 THEN
4829: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
4830: THEN
4831: g_Token_Tbl(2).Token_Name := 'REVISED_ITEM_NAME';
4832: g_Token_Tbl(2).Token_Value :=
4833: g_rev_component_rec.revised_item_name;

Line 4854: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

4850: g_Token_Tbl.DELETE(3);
4851: l_return_status := FND_API.G_RET_STS_ERROR;
4852: END IF;
4853: ELSIF l_Result = 3 THEN
4854: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
4855: THEN
4856: g_Token_Tbl(1).Token_Name := 'REVISED_ITEM_NAME';
4857: g_Token_Tbl(1).Token_Value :=
4858: g_rev_component_rec.revised_item_name;

Line 4906: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

4902: THEN
4903:
4904: l_Result := Chk_Req_For_Rev_Or_Shp;
4905: IF l_Result = 1 THEN
4906: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
4907: THEN
4908: g_Token_Tbl(2).Token_Name := 'REVISED_ITEM_NAME';
4909: g_Token_Tbl(2).Token_Value :=
4910: g_rev_component_rec.revised_item_name;

Line 5009: -- IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) AND

5005: -- to decide the translatable token since the message text
5006: -- is now changed. Please refer to text for BOM_ATP_CHECK_NOT_NO
5007:
5008: -- Modified by MK on 11/13/00
5009: -- IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) AND
5010: -- l_result <> 0
5011: -- THEN
5012:
5013: IF l_result <> 0

Line 5015: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

5011: -- THEN
5012:
5013: IF l_result <> 0
5014: THEN
5015: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
5016: THEN
5017: Error_Handler.Add_Error_Token
5018: ( p_message_name => 'BOM_ATP_CHECK_NOT_NO'
5019: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 5052: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

5048: THEN
5049: l_result := Check_Mutually_Exclusive;
5050: IF l_result <> 0 THEN
5051: IF l_result = 1 THEN
5052: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
5053: THEN
5054: Error_Handler.Add_Error_Token
5055: ( p_message_name => 'BOM_MUT_EXCL_BOM_NOT_INST'
5056: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 5061: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

5057: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5058: );
5059: END IF;
5060: ELSIF l_result = 2 THEN
5061: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
5062: THEN
5063: Error_Handler.Add_Error_Token
5064: ( p_message_name => 'BOM_MUT_EXCL_NOT_MDL_OPTCLASS'
5065: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 5126: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

5122: ) AND
5123: p_rev_component_rec.minimum_allowed_quantity is not null
5124: AND
5125: NOT Check_Min_Quantity THEN
5126: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
5127: THEN
5128: Error_Handler.Add_Error_Token
5129: ( p_message_name => 'BOM_MIN_QUANTITY_INVALID'
5130: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 5146: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

5142: ) AND
5143: p_rev_component_rec.maximum_allowed_quantity IS NOT NULL
5144: AND
5145: NOT Check_Max_Quantity THEN
5146: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
5147: THEN
5148: Error_Handler.Add_Error_Token
5149: ( p_message_name => 'BOM_MAX_QUANTITY_INVALID'
5150: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 5196: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

5192: <> p_rev_component_rec.quantity_per_assembly)
5193: )
5194: )
5195: THEN
5196: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
5197: THEN
5198: Error_Handler.Add_Error_Token
5199: ( p_message_name => 'BOM_COMP_QTY_FRACTIONAL'
5200: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 5222: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

5218:
5219: IF p_rev_component_rec.check_atp = 1 AND -- Bug Fix 3688325
5220: p_rev_component_rec.quantity_per_assembly < 0
5221: THEN
5222: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
5223: THEN
5224: Error_Handler.Add_Error_Token
5225: ( p_message_name => 'BOM_COMP_QTY_NEGATIVE'
5226: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 5243: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

5239: ********************************************************************/
5240: IF g_Comp_PTO_Flag = 'Y' AND
5241: p_rev_component_rec.quantity_per_assembly < 0
5242: THEN
5243: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
5244: THEN
5245: Error_Handler.Add_Error_Token
5246: ( p_message_name => 'BOM_COMP_PTO_QTY_NEGATIVE'
5247: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 5283: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

5279: )
5280: AND
5281: NOT Check_Supply_SubInventory THEN
5282:
5283: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
5284: THEN
5285: Error_Handler.Add_Error_Token
5286: ( p_message_name => 'BOM_SUBINV_INVALID'
5287: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 5326: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

5322: -- dbms_output.put_line('Locators check returned with an error-' ||
5323: -- to_char(l_locator_control));
5324:
5325: IF l_locator_control = 4 THEN
5326: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
5327: THEN
5328: Error_Handler.Add_Error_Token
5329: ( p_message_name => 'BOM_LOCATOR_REQUIRED'
5330: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 5339: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

5335: /* Error message should be proper. Since dynamic locators are supported
5336: same validation for pre-specified can be used. Bug 5032528
5337: ELSIF l_locator_control = 3 THEN
5338: -- Log the Dynamic locator control message.
5339: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
5340: THEN
5341: g_Token_Tbl(1).token_name := 'REVISED_COMPONENT_NAME';
5342: g_Token_Tbl(1).token_value:= p_rev_component_rec.component_item_name;
5343:

Line 5359: IF FND_MSG_PUB.Check_Msg_Level

5355:
5356: -- if error occured when item_locator_control was
5357: -- restrcited
5358:
5359: IF FND_MSG_PUB.Check_Msg_Level
5360: (FND_MSG_PUB.G_MSG_LVL_ERROR)
5361: THEN
5362: -- Added Token by MK on 12/06/00
5363: g_Token_Tbl(2).Token_Name := 'SUPPLY_SUBINVENTORY';

Line 5360: (FND_MSG_PUB.G_MSG_LVL_ERROR)

5356: -- if error occured when item_locator_control was
5357: -- restrcited
5358:
5359: IF FND_MSG_PUB.Check_Msg_Level
5360: (FND_MSG_PUB.G_MSG_LVL_ERROR)
5361: THEN
5362: -- Added Token by MK on 12/06/00
5363: g_Token_Tbl(2).Token_Name := 'SUPPLY_SUBINVENTORY';
5364: g_Token_Tbl(2).Token_Value := p_rev_component_rec.Supply_SubInventory ;

Line 5377: IF FND_MSG_PUB.Check_Msg_Level

5373: g_Token_Tbl.DELETE(2);
5374:
5375: END IF;
5376: ELSE
5377: IF FND_MSG_PUB.Check_Msg_Level
5378: (FND_MSG_PUB.G_MSG_LVL_ERROR)
5379: THEN
5380: g_Token_Tbl(2).token_name := 'REVISED_COMPONENT_NAME';
5381: g_Token_Tbl(2).token_value:= p_rev_component_rec.component_item_name;

Line 5378: (FND_MSG_PUB.G_MSG_LVL_ERROR)

5374:
5375: END IF;
5376: ELSE
5377: IF FND_MSG_PUB.Check_Msg_Level
5378: (FND_MSG_PUB.G_MSG_LVL_ERROR)
5379: THEN
5380: g_Token_Tbl(2).token_name := 'REVISED_COMPONENT_NAME';
5381: g_Token_Tbl(2).token_value:= p_rev_component_rec.component_item_name;
5382: Error_Handler.Add_Error_Token

Line 5392: IF FND_MSG_PUB.Check_Msg_Level

5388:
5389: END IF;
5390: END IF;
5391: ELSIF l_locator_control = 1 THEN
5392: IF FND_MSG_PUB.Check_Msg_Level
5393: (FND_MSG_PUB.G_MSG_LVL_ERROR)
5394: THEN
5395: Error_Handler.Add_Error_Token
5396: ( p_message_name => 'BOM_ITEM_NO_LOCATOR_CONTROL'

Line 5393: (FND_MSG_PUB.G_MSG_LVL_ERROR)

5389: END IF;
5390: END IF;
5391: ELSIF l_locator_control = 1 THEN
5392: IF FND_MSG_PUB.Check_Msg_Level
5393: (FND_MSG_PUB.G_MSG_LVL_ERROR)
5394: THEN
5395: Error_Handler.Add_Error_Token
5396: ( p_message_name => 'BOM_ITEM_NO_LOCATOR_CONTROL'
5397: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 5408: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

5404: l_return_status := FND_API.G_RET_STS_ERROR;
5405: ELSIF p_rev_component_rec.location_name IS NOT NULL AND
5406: p_rev_component_rec.supply_subinventory IS NULL
5407: THEN
5408: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
5409: THEN
5410: Error_Handler.Add_Error_Token
5411: ( p_message_name => 'BOM_LOCATOR_MUST_BE_NULL'
5412: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 5588: IF FND_MSG_PUB.Check_Msg_Level

5584:
5585: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('UNExpected Error in Rev. Comp. Entity Validation . . .'); END IF;
5586:
5587: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5588: IF FND_MSG_PUB.Check_Msg_Level
5589: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5590: THEN
5591: l_err_text := G_PKG_NAME ||
5592: ' : (Entity Validation) ' ||

Line 5589: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

5585: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('UNExpected Error in Rev. Comp. Entity Validation . . .'); END IF;
5586:
5587: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5588: IF FND_MSG_PUB.Check_Msg_Level
5589: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5590: THEN
5591: l_err_text := G_PKG_NAME ||
5592: ' : (Entity Validation) ' ||
5593: substrb(SQLERRM,1,200);

Line 5605: IF FND_MSG_PUB.Check_Msg_Level

5601:
5602: WHEN OTHERS THEN
5603: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug(SQLERRM || ' ' || TO_CHAR(SQLCODE)); END IF;
5604: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5605: IF FND_MSG_PUB.Check_Msg_Level
5606: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5607: THEN
5608: l_err_text := G_PKG_NAME ||
5609: ' : (Entity Validation) ' ||

Line 5606: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

5602: WHEN OTHERS THEN
5603: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug(SQLERRM || ' ' || TO_CHAR(SQLCODE)); END IF;
5604: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5605: IF FND_MSG_PUB.Check_Msg_Level
5606: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5607: THEN
5608: l_err_text := G_PKG_NAME ||
5609: ' : (Entity Validation) ' ||
5610: substrb(SQLERRM,1,200);

Line 6014: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

6010:
6011: IF p_rev_component_rec.wip_supply_type IS NOT NULL AND
6012: p_rev_component_rec.wip_supply_type = 7
6013: THEN
6014: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
6015: THEN
6016: g_token_tbl(2).token_name := 'WIP_SUPPLY_TYPE';
6017: g_token_tbl(2).token_value :=
6018: p_rev_component_rec.wip_supply_type;

Line 6036: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)

6032: ( p_wip_supply_type => p_rev_component_rec.wip_supply_type
6033: , x_err_text => l_err_text
6034: )
6035: THEN
6036: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)
6037: THEN
6038: g_token_tbl(1).token_name := 'WIP_SUPPLY_TYPE';
6039: g_token_tbl(1).token_value :=
6040: p_rev_component_rec.wip_supply_type;

Line 6059: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

6055:
6056: IF p_rev_component_rec.operation_sequence_number IS NOT NULL AND
6057: p_rev_component_rec.operation_sequence_number <= 0
6058: THEN
6059: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
6060: THEN
6061: Error_Handler.Add_Error_Token
6062: ( p_Message_Name => 'BOM_OPSEQ_LESS_THAN_ZERO'
6063: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 6080: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

6076: p_rev_component_rec.item_sequence_number > (power(10,38)-1) /*
6077: bug 7437710 */
6078: )
6079: THEN
6080: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
6081: THEN
6082: Error_Handler.Add_Error_Token
6083: ( p_Message_Name => 'BOM_ITEM_NUM_INVALID'
6084: , p_Mesg_token_Tbl => l_Mesg_token_Tbl

Line 6096: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)

6092: IF p_rev_component_rec.projected_yield IS NOT NULL AND
6093: p_rev_component_rec.projected_yield < 0 OR
6094: p_rev_component_rec.projected_yield > 1
6095: THEN
6096: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)
6097: THEN
6098: g_token_tbl(1).token_name := 'REVISED_COMPONENT_NAME';
6099: g_token_tbl(1).token_value := p_rev_component_rec.component_item_name;
6100: Error_Handler.Add_Error_Token

Line 6114: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)

6110:
6111: IF p_rev_component_rec.include_in_cost_rollup IS NOT NULL AND
6112: p_rev_component_rec.include_in_cost_rollup NOT IN (1,2)
6113: THEN
6114: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)
6115: THEN
6116: Error_Handler.Add_Error_Token
6117: ( p_Message_Name => 'BOM_INCL_IN_COST_ROLL_INVALID'
6118: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 6129: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)

6125:
6126: IF p_rev_component_rec.SO_Basis IS NOT NULL AND
6127: p_rev_component_rec.SO_Basis NOT IN (1, 2)
6128: THEN
6129: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)
6130: THEN
6131: Error_Handler.Add_Error_Token
6132: ( p_Message_Name => 'BOM_SO_BASIS_INVALID'
6133: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 6144: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)

6140:
6141: IF p_rev_component_rec.optional IS NOT NULL AND
6142: p_rev_component_rec.optional NOT IN (1, 2)
6143: THEN
6144: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)
6145: THEN
6146: Error_Handler.Add_Error_Token
6147: ( p_Message_Name => 'BOM_OPTIONAL_INVALID'
6148: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 6159: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)

6155:
6156: IF p_rev_component_rec.mutually_exclusive IS NOT NULL AND
6157: p_rev_component_rec.mutually_exclusive NOT IN (1, 2)
6158: THEN
6159: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)
6160: THEN
6161: Error_Handler.Add_Error_Token
6162: ( p_Message_Name => 'BOM_MUTUALLY_EXCLUSIVE_INVALID'
6163: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 6174: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)

6170:
6171: IF p_rev_component_rec.check_atp IS NOT NULL AND
6172: p_rev_component_rec.check_atp NOT IN (1, 2)
6173: THEN
6174: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)
6175: THEN
6176: Error_Handler.Add_Error_Token
6177: ( p_Message_Name => 'BOM_CHECK_ATP_INVALID'
6178: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 6189: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)

6185:
6186: IF p_rev_component_rec.shipping_allowed IS NOT NULL AND
6187: p_rev_component_rec.shipping_allowed NOT IN (1, 2)
6188: THEN
6189: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)
6190: THEN
6191: Error_Handler.Add_Error_Token
6192: ( p_Message_Name => 'BOM_SHIPPING_ALLOWED_INVALID'
6193: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 6204: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)

6200:
6201: IF p_rev_component_rec.required_to_ship IS NOT NULL AND
6202: p_rev_component_rec.required_to_ship NOT IN (1, 2)
6203: THEN
6204: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)
6205: THEN
6206: Error_Handler.Add_Error_Token
6207: ( p_Message_Name => 'BOM_REQUIRED_TO_SHIP_INVALID'
6208: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 6219: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)

6215:
6216: IF p_rev_component_rec.required_for_revenue IS NOT NULL AND
6217: p_rev_component_rec.required_for_revenue NOT IN (1, 2)
6218: THEN
6219: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)
6220: THEN
6221: Error_Handler.Add_Error_Token
6222: ( p_Message_Name => 'BOM_REQ_FOR_REVENUE_INVALID'
6223: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 6234: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)

6230:
6231: IF p_rev_component_rec.include_on_ship_docs IS NOT NULL AND
6232: p_rev_component_rec.include_on_ship_docs NOT IN (1, 2)
6233: THEN
6234: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)
6235: THEN
6236: Error_Handler.Add_Error_Token
6237: ( p_Message_Name => 'BOM_INCL_ON_SHIP_DOCS_INVALID'
6238: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 6249: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)

6245:
6246: IF p_rev_component_rec.quantity_related IS NOT NULL AND
6247: p_rev_component_rec.quantity_related NOT IN (1, 2)
6248: THEN
6249: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)
6250: THEN
6251: Error_Handler.Add_Error_Token
6252: ( p_Message_Name => 'BOM_QTY_RELATED_INVALID'
6253: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 6554: IF FND_MSG_PUB.Check_Msg_Level

6550: --
6551: -- if not exception is raised then record is deleted.
6552: -- so raise an error.
6553: --
6554: IF FND_MSG_PUB.Check_Msg_Level
6555: (FND_MSG_PUB.G_MSG_LVL_ERROR)
6556: THEN
6557: Error_Handler.Add_Error_Token
6558: ( p_Message_Name=> 'BOM_COMP_CANCELLED'

Line 6555: (FND_MSG_PUB.G_MSG_LVL_ERROR)

6551: -- if not exception is raised then record is deleted.
6552: -- so raise an error.
6553: --
6554: IF FND_MSG_PUB.Check_Msg_Level
6555: (FND_MSG_PUB.G_MSG_LVL_ERROR)
6556: THEN
6557: Error_Handler.Add_Error_Token
6558: ( p_Message_Name=> 'BOM_COMP_CANCELLED'
6559: , p_Mesg_Token_Tbl=> l_Mesg_Token_Tbl

Line 7011: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

7007: )
7008:
7009: THEN
7010:
7011: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
7012: THEN
7013: l_token_tbl.delete;
7014: l_token_tbl(1).token_name := 'REVISED_ITEM_NAME';
7015: l_token_tbl(1).token_value := p_revised_item_name ;