DBA Data[Home] [Help]

APPS.BOM_VALIDATE_BOM_COMPONENT dependencies on FND_MSG_PUB

Line 3673: IF FND_MSG_PUB.Check_Msg_Level

3669: -- If the primary bill does not exist then the acd type
3670: -- of the component cannot be other that add.
3671: --
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'

Line 3674: (FND_MSG_PUB.G_MSG_LVL_ERROR)

3670: -- of the component cannot be other that add.
3671: --
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

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

3701:
3702: -- If no exception is raised then Bill is referencing another
3703: -- bill
3704:
3705: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
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;

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

3728: p_rev_comp_unexp_rec.bill_sequence_id)
3729: THEN
3730: NULL;
3731: ELSE
3732: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
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;

Line 3747: IF FND_MSG_PUB.Check_Msg_Level

3743: END IF;
3744: l_return_status := FND_API.G_RET_STS_ERROR;
3745: END IF;
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

Line 3748: (FND_MSG_PUB.G_MSG_LVL_ERROR)

3744: l_return_status := FND_API.G_RET_STS_ERROR;
3745: END IF;
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 ' ||

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

3768: ******************************************************************/
3769: IF p_rev_comp_unexp_rec.revised_item_id =
3770: p_rev_comp_unexp_rec.component_item_id
3771: THEN
3772: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3773: THEN
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;

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

3849: IF g_Comp_Bom_Enabled_Flag = 'N' THEN
3850: -- Bom_Enabled is N, so cannot add a component .
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

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

3929: g_rev_component_rec.component_item_name;
3930:
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

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

4001: /*ELSIF l_result = 4 THEN
4002: l_err_text := 'BOM_COMMON_OP_SEQ_INVALID';*/
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

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

4031: --
4032: IF p_Old_Rev_Component_Rec.Shipping_Allowed <>
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

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

4095: IF p_rev_component_rec.old_effectivity_date IS NOT NULL AND
4096: p_rev_component_rec.old_effectivity_date <> FND_API.G_MISS_DATE AND
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

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

4113: p_rev_component_rec.old_operation_sequence_number <>
4114: FND_API.G_MISS_NUM AND
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

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

4132: IF p_rev_component_rec.acd_type <>
4133: p_old_rev_component_rec.acd_type AND
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

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

4151: --
4152: IF p_old_rev_component_rec.acd_type = 3 AND
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

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

4170: IF NVL(p_rev_component_rec.acd_type, 1) = 3 AND
4171: p_rev_component_rec.to_end_item_unit_number <>
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

Line 4216: IF FND_MSG_PUB.Check_Msg_Level

4212: IF g_assy_item_type = 3 -- Planning parent
4213: OR
4214: g_comp_item_type = 2 -- Option Class component
4215: THEN
4216: IF FND_MSG_PUB.Check_Msg_Level
4217: (FND_MSG_PUB.G_MSG_LVL_ERROR)
4218: THEN
4219: g_token_tbl(2).token_name :=
4220: 'REVISED_ITEM_NAME';

Line 4217: (FND_MSG_PUB.G_MSG_LVL_ERROR)

4213: OR
4214: g_comp_item_type = 2 -- Option Class component
4215: THEN
4216: IF FND_MSG_PUB.Check_Msg_Level
4217: (FND_MSG_PUB.G_MSG_LVL_ERROR)
4218: THEN
4219: g_token_tbl(2).token_name :=
4220: 'REVISED_ITEM_NAME';
4221: g_token_tbl(2).token_value :=

Line 4236: IF FND_MSG_PUB.Check_Msg_Level

4232: END IF;
4233:
4234: IF p_rev_component_rec.projected_yield <=0
4235: THEN
4236: IF FND_MSG_PUB.Check_Msg_Level
4237: (FND_MSG_PUB.G_MSG_LVL_ERROR)
4238: THEN
4239: g_token_tbl(2).token_name :=
4240: 'REVISED_ITEM_NAME';

Line 4237: (FND_MSG_PUB.G_MSG_LVL_ERROR)

4233:
4234: IF p_rev_component_rec.projected_yield <=0
4235: THEN
4236: IF FND_MSG_PUB.Check_Msg_Level
4237: (FND_MSG_PUB.G_MSG_LVL_ERROR)
4238: THEN
4239: g_token_tbl(2).token_name :=
4240: 'REVISED_ITEM_NAME';
4241: g_token_tbl(2).token_value :=

Line 4256: IF FND_MSG_PUB.Check_Msg_Level

4252: END IF;
4253:
4254: IF p_rev_component_rec.projected_yield > 1
4255: THEN
4256: IF FND_MSG_PUB.Check_Msg_Level
4257: (FND_MSG_PUB.G_MSG_LVL_ERROR)
4258: THEN
4259: -- Log warning
4260:

Line 4257: (FND_MSG_PUB.G_MSG_LVL_ERROR)

4253:
4254: IF p_rev_component_rec.projected_yield > 1
4255: THEN
4256: IF FND_MSG_PUB.Check_Msg_Level
4257: (FND_MSG_PUB.G_MSG_LVL_ERROR)
4258: THEN
4259: -- Log warning
4260:
4261: Error_Handler.Add_Error_Token

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

4351: IF p_rev_component_rec.transaction_type in (BOM_GLOBALS.G_OPR_CREATE,
4352: BOM_GLOBALS.G_OPR_UPDATE) AND
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

Line 4459: IF FND_MSG_PUB.Check_Msg_Level

4455:
4456: EXCEPTION
4457: WHEN NO_DATA_FOUND THEN
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'

Line 4460: (FND_MSG_PUB.G_MSG_LVL_ERROR)

4456: EXCEPTION
4457: WHEN NO_DATA_FOUND THEN
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

Line 4541: IF FND_MSG_PUB.Check_Msg_Level

4537: (p_rev_comp_unexp_rec.old_component_sequence_id,
4538: l_eco_for_production)
4539: LOOP
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'

Line 4542: (FND_MSG_PUB.G_MSG_LVL_ERROR)

4538: l_eco_for_production)
4539: LOOP
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

Line 4605: IF FND_MSG_PUB.Check_Msg_Level

4601: --Bug 9076970 changes begin
4602: IF Check_Routing_Exists THEN
4603: /*IF NOT Check_Routing_Exists
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'

Line 4606: (FND_MSG_PUB.G_MSG_LVL_ERROR)

4602: IF Check_Routing_Exists THEN
4603: /*IF NOT Check_Routing_Exists
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

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

4767: X_Operation_Seq_Num => p_rev_component_rec.operation_sequence_number)
4768: THEN
4769: --if function return true then component dates overlapp
4770:
4771: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)
4772: THEN
4773: --added for bug 9647673 (begin)
4774: g_token_tbl.delete;
4775: g_token_tbl(1).token_name := 'REVISED_COMPONENT_NAME';

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

4814: p_rev_component_rec.operation_sequence_number)
4815: THEN
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

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

4872: p_entity => 'RC')
4873: THEN
4874: --if function return true then component dates overlapp
4875:
4876: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)
4877: THEN
4878: --added for bug 9647673 (begin)
4879: g_token_tbl.delete;
4880: g_token_tbl(1).token_name := 'REVISED_COMPONENT_NAME';

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

4919: p_entity => 'RC')
4920: THEN
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

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

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;
4944: IF l_Result = 1 Then
4945: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
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;

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

4979: )
4980: THEN
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

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

4991: END IF;
4992: l_return_status := FND_API.G_RET_STS_ERROR;
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

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

5030: )
5031: THEN
5032: l_Result := Check_Planning_Percent;
5033: IF l_Result = 1 THEN
5034: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
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;

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

5045: g_Token_Tbl.DELETE(2);
5046: END IF;
5047: l_return_status := FND_API.G_RET_STS_ERROR;
5048: ELSIF l_Result = 2 THEN
5049: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
5050: THEN
5051: g_Token_Tbl(2).Token_Name := 'REVISED_ITEM_NAME';
5052: g_Token_Tbl(2).Token_Value :=
5053: g_rev_component_rec.revised_item_name;

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

5071: l_return_status := FND_API.G_RET_STS_ERROR;
5072: END IF;
5073: --Commented condition below for bug 7392603
5074: /* ELSIF l_Result = 3 THEN
5075: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
5076: THEN
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;

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

5123: THEN
5124:
5125: l_Result := Chk_Req_For_Rev_Or_Shp;
5126: IF l_Result = 1 THEN
5127: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
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;

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

5226: -- to decide the translatable token since the message text
5227: -- is now changed. Please refer to text for BOM_ATP_CHECK_NOT_NO
5228:
5229: -- Modified by MK on 11/13/00
5230: -- IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) AND
5231: -- l_result <> 0
5232: -- THEN
5233:
5234: IF l_result <> 0

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

5232: -- THEN
5233:
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

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

5269: THEN
5270: l_result := Check_Mutually_Exclusive;
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

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

5278: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5279: );
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

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

5343: ) AND
5344: p_rev_component_rec.minimum_allowed_quantity is not null
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

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

5363: ) AND
5364: p_rev_component_rec.maximum_allowed_quantity IS NOT NULL
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

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

5413: <> p_rev_component_rec.quantity_per_assembly)
5414: )
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

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

5439:
5440: IF p_rev_component_rec.check_atp = 1 AND -- Bug Fix 3688325
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

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

5460: ********************************************************************/
5461: IF g_Comp_PTO_Flag = 'Y' AND
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

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

5500: )
5501: AND
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

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

5543: -- dbms_output.put_line('Locators check returned with an error-' ||
5544: -- to_char(l_locator_control));
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

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

5556: /* Error message should be proper. Since dynamic locators are supported
5557: same validation for pre-specified can be used. Bug 5032528
5558: ELSIF l_locator_control = 3 THEN
5559: -- Log the Dynamic locator control message.
5560: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
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:

Line 5580: IF FND_MSG_PUB.Check_Msg_Level

5576:
5577: -- if error occured when item_locator_control was
5578: -- restrcited
5579:
5580: IF FND_MSG_PUB.Check_Msg_Level
5581: (FND_MSG_PUB.G_MSG_LVL_ERROR)
5582: THEN
5583: -- Added Token by MK on 12/06/00
5584: g_Token_Tbl(2).Token_Name := 'SUPPLY_SUBINVENTORY';

Line 5581: (FND_MSG_PUB.G_MSG_LVL_ERROR)

5577: -- if error occured when item_locator_control was
5578: -- restrcited
5579:
5580: IF FND_MSG_PUB.Check_Msg_Level
5581: (FND_MSG_PUB.G_MSG_LVL_ERROR)
5582: THEN
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 ;

Line 5598: IF FND_MSG_PUB.Check_Msg_Level

5594: g_Token_Tbl.DELETE(2);
5595:
5596: END IF;
5597: ELSE
5598: IF FND_MSG_PUB.Check_Msg_Level
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;

Line 5599: (FND_MSG_PUB.G_MSG_LVL_ERROR)

5595:
5596: END IF;
5597: ELSE
5598: IF FND_MSG_PUB.Check_Msg_Level
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

Line 5613: IF FND_MSG_PUB.Check_Msg_Level

5609:
5610: END IF;
5611: END IF;
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'

Line 5614: (FND_MSG_PUB.G_MSG_LVL_ERROR)

5610: END IF;
5611: END IF;
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

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

5625: l_return_status := FND_API.G_RET_STS_ERROR;
5626: ELSIF p_rev_component_rec.location_name IS NOT NULL AND
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

Line 5827: IF FND_MSG_PUB.Check_Msg_Level

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)
5829: THEN
5830: l_err_text := G_PKG_NAME ||
5831: ' : (Entity Validation) ' ||

Line 5828: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

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)
5829: THEN
5830: l_err_text := G_PKG_NAME ||
5831: ' : (Entity Validation) ' ||
5832: substrb(SQLERRM,1,200);

Line 5844: IF FND_MSG_PUB.Check_Msg_Level

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
5847: l_err_text := G_PKG_NAME ||
5848: ' : (Entity Validation) ' ||

Line 5845: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

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
5847: l_err_text := G_PKG_NAME ||
5848: ' : (Entity Validation) ' ||
5849: substrb(SQLERRM,1,200);

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

6249:
6250: IF p_rev_component_rec.wip_supply_type IS NOT NULL AND
6251: p_rev_component_rec.wip_supply_type = 7
6252: THEN
6253: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
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;

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

6271: ( p_wip_supply_type => p_rev_component_rec.wip_supply_type
6272: , x_err_text => l_err_text
6273: )
6274: THEN
6275: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)
6276: THEN
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;

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

6294:
6295: IF p_rev_component_rec.operation_sequence_number IS NOT NULL AND
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

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

6315: p_rev_component_rec.item_sequence_number > (power(10,38)-1) /*
6316: bug 7437710 */
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

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

6331: IF p_rev_component_rec.projected_yield IS NOT NULL AND
6332: p_rev_component_rec.projected_yield < 0 OR
6333: p_rev_component_rec.projected_yield > 1
6334: THEN
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

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

6349:
6350: IF p_rev_component_rec.include_in_cost_rollup IS NOT NULL AND
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

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

6364:
6365: IF p_rev_component_rec.SO_Basis IS NOT NULL AND
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

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

6379:
6380: IF p_rev_component_rec.optional IS NOT NULL AND
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

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

6394:
6395: IF p_rev_component_rec.mutually_exclusive IS NOT NULL AND
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

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

6409:
6410: IF p_rev_component_rec.check_atp IS NOT NULL AND
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

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

6424:
6425: IF p_rev_component_rec.shipping_allowed IS NOT NULL AND
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

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

6439:
6440: IF p_rev_component_rec.required_to_ship IS NOT NULL AND
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

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

6454:
6455: IF p_rev_component_rec.required_for_revenue IS NOT NULL AND
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

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

6469:
6470: IF p_rev_component_rec.include_on_ship_docs IS NOT NULL AND
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

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

6484:
6485: IF p_rev_component_rec.quantity_related IS NOT NULL AND
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

Line 6793: IF FND_MSG_PUB.Check_Msg_Level

6789: --
6790: -- if not exception is raised then record is deleted.
6791: -- so raise an error.
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'

Line 6794: (FND_MSG_PUB.G_MSG_LVL_ERROR)

6790: -- if not exception is raised then record is deleted.
6791: -- so raise an error.
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

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

7246: )
7247:
7248: THEN
7249:
7250: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
7251: THEN
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 ;