[Home] [Help]
883: -- dbms_output.put_line
884: -- ('Within the Verify Item Attributes procedure . . . ');
885:
886: -- Verify Eng flag for Assembly and Component
887: l_allow_eng_comps := fnd_profile.value('ENG:ALLOW_ENG_COMPS');
888: IF (g_Assy_Assembly_Type = 1 and -- Bill is manufacturing
889: -- Introduced new global variable to hold assembly_type of
890: -- bill header.
891: --bug: 4161794
1104: g_comp_PTO_Flag = 'N'
1105: ) OR --added for BOM ER 9946990
1106: (g_comp_ATO_Flag = 'Y' AND
1107: g_comp_PTO_Flag = 'N' AND
1108: nvl(fnd_profile.value('BOM:MANDATORY_ATO_IN_PTO'), 2) = 1
1109: )
1110: )
1111: )
1112: /* Commenting for Bug 2627352
1237: -- ('Value of Optional when checking ATO / PTO . . .');
1238:
1239: IF ( g_Assy_PTO_flag = 'Y' AND
1240: --following clause modified for BOM ER 9946990
1241: ( (g_Assy_Item_Type = Bom_Globals.G_MODEL and nvl(fnd_profile.value('BOM:MANDATORY_ATO_IN_PTO'), 2) <> 1) OR g_Assy_Item_Type = Bom_Globals.G_OPTION_CLASS) AND
1242: g_Comp_ATO_flag = 'Y' AND
1243: g_Comp_Item_Type = Bom_Globals.G_STANDARD AND
1244: g_Comp_Config = 'N' AND
1245: g_Rev_Component_Rec.optional = 2
1608:
1609: -- dbms_output.put_line('Checking Subinv value . . . ' ||
1610: -- g_rev_component_rec.supply_subinventory);
1611:
1612: l_allow_expense_to_asset := fnd_profile.value
1613: ('INV:EXPENSE_TO_ASSET_TRANSFER');
1614:
1615: -- Get Restrict_Subinventory_Flag for the Item
1616: SELECT DECODE(restrict_subinventories_code, 1, 'Y', 'N'),
2394: RETURN NUMBER
2395: IS
2396: l_other_orgs BOOLEAN;
2397: l_invalid_bill NUMBER;
2398: l_allow_eng_comps varchar2(10) := nvl(fnd_profile.value('ENG:ALLOW_ENG_COMPS'), '2'); -- Bug 6274872
2399: CURSOR bom_enabled_in_other_orgs IS
2400: SELECT 1
2401: FROM BOM_BILL_OF_MATERIALS bom
2402: WHERE bom.source_bill_sequence_id =
3342: --BOM ER #9946990 changes (begin)
3343:
3344: IF
3345: p_rev_component_rec.Transaction_Type IN (BOM_GLOBALS.G_OPR_UPDATE, BOM_Globals.G_OPR_DELETE) AND
3346: nvl(fnd_profile.value('BOM:MANDATORY_ATO_IN_PTO'), 2) <> 1 AND
3347: g_Assy_Item_Type = Bom_Globals.G_STANDARD AND
3348: g_Assy_PTO_Flag = 'Y' AND
3349: g_comp_ATO_Flag = 'Y' AND
3350: g_comp_PTO_Flag = 'N' AND
3367: --update or delete the component once the profile is unset
3368: --BOM ER #9946990 changes (begin)
3369: IF
3370: p_rev_component_rec.Transaction_Type IN (BOM_GLOBALS.G_OPR_UPDATE, BOM_Globals.G_OPR_DELETE) AND
3371: nvl(fnd_profile.value('BOM:MANDATORY_ATO_IN_PTO'), 2) <> 1 AND
3372: g_Assy_Item_Type = Bom_Globals.G_MODEL AND
3373: g_Assy_PTO_Flag = 'Y' AND
3374: g_comp_ATO_Flag = 'Y' AND
3375: g_comp_PTO_Flag = 'N' AND
3394:
3395: IF BOM_Globals.Get_Bo_Identifier = BOM_Globals.G_ECO_BO AND
3396: p_rev_component_rec.Transaction_Type = BOM_Globals.G_OPR_CREATE AND
3397: NVL(p_rev_component_rec.acd_type, 1) in (2, 3) AND --had to include acd_type 2 in here since while updating the record optional flag may not be populated or may not undergo a change
3398: nvl(fnd_profile.value('BOM:MANDATORY_ATO_IN_PTO'), 2) <> 1 AND
3399: g_Assy_Item_Type = Bom_Globals.G_MODEL AND
3400: g_Assy_PTO_Flag = 'Y' AND
3401: g_comp_ATO_Flag = 'Y' AND
3402: g_comp_PTO_Flag = 'N' AND
7492: );
7493:
7494: -- Initialize System_Information Unit_Effectivity flag
7495:
7496: IF (FND_PROFILE.DEFINED('PJM:PJM_UNITEFF_NO_EFFECT') AND
7497: FND_PROFILE.VALUE('PJM:PJM_UNITEFF_NO_EFFECT') = 'Y')
7498: OR (BOM_EAMUTIL.Enabled = 'Y')
7499: THEN
7500: Bom_Globals.Set_Unit_Effectivity (TRUE);
7493:
7494: -- Initialize System_Information Unit_Effectivity flag
7495:
7496: IF (FND_PROFILE.DEFINED('PJM:PJM_UNITEFF_NO_EFFECT') AND
7497: FND_PROFILE.VALUE('PJM:PJM_UNITEFF_NO_EFFECT') = 'Y')
7498: OR (BOM_EAMUTIL.Enabled = 'Y')
7499: THEN
7500: Bom_Globals.Set_Unit_Effectivity (TRUE);
7501: ELSE