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_DEFAULT_BOM_COMPONENT dependencies on BOM_GLOBALS

Line 64: IF Bom_Globals.Get_Debug = 'Y' THEN

60:
61: l_dummy VARCHAR2(1);
62:
63: BEGIN
64: IF Bom_Globals.Get_Debug = 'Y' THEN
65: Error_Handler.Write_Debug('Checking if routing exist for defaulting operation sequence number');
66: END IF;
67:
68: IF g_rev_comp_unexp_rec.bill_sequence_id IS NULL

Line 72: IF Bom_Globals.Get_Debug = 'Y' THEN

68: IF g_rev_comp_unexp_rec.bill_sequence_id IS NULL
69: THEN
70: --12676077 begin
71: --even though there's no bill but there can still be a routing
72: IF Bom_Globals.Get_Debug = 'Y' THEN
73: Error_Handler.Write_Debug('Revised item does not have a bill');
74: END IF;
75:
76: OPEN CheckPrimaryRouting;

Line 653: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Within the Rev. Component Defaulting...'); END IF;

649: WHERE inventory_item_id = p_rev_comp_unexp_rec.component_item_id
650: AND organization_id = p_rev_comp_unexp_rec.organization_id;
651: BEGIN
652:
653: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Within the Rev. Component Defaulting...'); END IF;
654:
655: -- Initialize package global records
656:
657: g_rev_component_rec := p_rev_component_rec;

Line 677: g_rev_component_rec.transaction_type = BOM_Globals.G_OPR_CREATE

673: g_rev_Component_rec.ACD_Type = 1
674: ) OR
675: ( g_rev_component_rec.operation_sequence_number <> 1 AND
676: g_rev_Component_rec.ACD_Type is NULL and
677: g_rev_component_rec.transaction_type = BOM_Globals.G_OPR_CREATE
678: ) OR
679: ( g_rev_component_rec.operation_sequence_number <> 1 AND
680: NVL(g_rev_Component_rec.ACD_Type, 1) = 2 AND
681: NVL(g_rev_component_rec.new_operation_sequence_number,FND_API.G_MISS_NUM)

Line 691: BOM_Globals.G_OPR_CREATE

687:
688: ELSIF ( NVL(g_rev_component_rec.new_operation_sequence_number,1) <> 1 AND
689: ( ( g_rev_component_rec.ACD_Type = 2 AND
690: g_rev_component_rec.transaction_type =
691: BOM_Globals.G_OPR_CREATE
692: ) OR
693: g_rev_component_rec.transaction_type =
694: BOM_Globals.G_OPR_UPDATE
695: ) AND

Line 694: BOM_Globals.G_OPR_UPDATE

690: g_rev_component_rec.transaction_type =
691: BOM_Globals.G_OPR_CREATE
692: ) OR
693: g_rev_component_rec.transaction_type =
694: BOM_Globals.G_OPR_UPDATE
695: ) AND
696: (
697: --NVL(p_old_rev_component_rec.operation_sequence_number, 1) <>
698: --NVL(p_rev_component_rec.new_operation_sequence_number, 1) AND

Line 727: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Defaulting old component sequence id '); END IF;

723: Get_Component_Sequence;
724: END IF;
725:
726: --bug 14490716 (begin)
727: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Defaulting old component sequence id '); END IF;
728: IF (g_Rev_Comp_Unexp_Rec.old_component_sequence_id IS NULL OR
729: g_Rev_Comp_Unexp_Rec.old_component_sequence_id =
730: FND_API.G_MISS_NUM) AND
731: (NVL(g_rev_component_rec.acd_type, FND_API.G_MISS_NUM) = 1)

Line 737: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Old Comp Seq: ' || to_char(g_Rev_Comp_Unexp_Rec.old_component_sequence_id)); END IF;

733: THEN
734: g_Rev_Comp_Unexp_Rec.old_component_sequence_id :=
735: g_Rev_Comp_Unexp_Rec.component_sequence_id;
736:
737: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Old Comp Seq: ' || to_char(g_Rev_Comp_Unexp_Rec.old_component_sequence_id)); END IF;
738:
739: END IF;
740: --bug 14490716 (end)
741:

Line 752: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Generated Bill Sequence_id...' || to_char(g_rev_comp_Unexp_rec.bill_sequence_id)); END IF;

748: IF g_Rev_Comp_Unexp_rec.bill_sequence_id IS NULL THEN
749:
750: g_Rev_Comp_Unexp_Rec.bill_sequence_id :=
751: get_bill_sequence;
752: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Generated Bill Sequence_id...' || to_char(g_rev_comp_Unexp_rec.bill_sequence_id)); END IF;
753: END IF;
754:
755: /*********************************************************
756: --

Line 807: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After defaulting to_end_item_unit_num..'); END IF;

803: g_rev_component_rec.to_end_item_unit_number :=
804: l_to_end_item_unit_number;
805: END IF;
806:
807: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After defaulting to_end_item_unit_num..'); END IF;
808:
809: --* Added for Bug 4568522
810: SELECT Bom_Item_Type
811: INTO l_assy_item_type

Line 832: Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_BOM_BO

828:
829: IF ( g_rev_component_rec.acd_type IS NOT NULL AND
830: g_rev_component_rec.acd_type <> FND_API.G_MISS_NUM
831: ) OR
832: Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_BOM_BO
833: THEN
834:
835: /************************************************************
836: --

Line 844: AND l_assy_item_type <> Bom_Globals.G_PRODUCT_FAMILY --* Added for Bug 4568522

840:
841: IF ((g_rev_component_rec.item_sequence_number IS NULL) OR
842: (g_rev_component_rec.item_sequence_number =
843: fnd_api.g_miss_num))
844: AND l_assy_item_type <> Bom_Globals.G_PRODUCT_FAMILY --* Added for Bug 4568522
845: THEN
846:
847: g_rev_component_rec.item_sequence_number :=
848: Get_Item_Num;

Line 852: IF l_assy_item_type = Bom_Globals.G_PRODUCT_FAMILY THEN

848: Get_Item_Num;
849:
850: --* Added for Bug 4568522
851: ELSE
852: IF l_assy_item_type = Bom_Globals.G_PRODUCT_FAMILY THEN
853: g_rev_component_rec.item_sequence_number := 1;
854: END IF;
855: END IF;
856: --* End of Bug 4568522

Line 858: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After defaulting item num . . . '); END IF;

854: END IF;
855: END IF;
856: --* End of Bug 4568522
857:
858: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After defaulting item num . . . '); END IF;
859:
860: /**********************************************************
861: --
862: -- Default Operation_Seq_Num

Line 881: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After defaulting operation seq num...'); END IF;

877: THEN
878: g_rev_component_rec.new_operation_sequence_number := null;
879: END IF;
880:
881: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After defaulting operation seq num...'); END IF;
882:
883: IF g_rev_component_rec.acd_type = 3 AND
884: g_rev_component_rec.disable_date IS NULL
885: THEN

Line 890: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After defaulting disable_date...'); END IF;

886: g_rev_component_rec.disable_date :=
887: g_rev_component_rec.start_effective_date;
888: END IF;
889:
890: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After defaulting disable_date...'); END IF;
891: END IF;
892:
893: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After defaulting operation seq num...'); END IF;
894:

Line 893: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After defaulting operation seq num...'); END IF;

889:
890: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After defaulting disable_date...'); END IF;
891: END IF;
892:
893: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After defaulting operation seq num...'); END IF;
894:
895: /************************************************************
896: --
897: -- Default Component_Quantity

Line 912: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After defaulting component qunatity...'); END IF;

908: round(g_rev_component_rec.quantity_per_assembly, 7);
909: */
910: END IF;
911:
912: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After defaulting component qunatity...'); END IF;
913:
914: /************************************************************
915: --
916: -- Default Pick_Components

Line 927: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After defaulting pick components . . .'); END IF;

923: g_Rev_Comp_Unexp_Rec.pick_components :=
924: Get_Pick_Components;
925: END IF;
926:
927: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After defaulting pick components . . .'); END IF;
928:
929: /*************************************************************
930: --
931: -- Default Effectivity Date

Line 942: IF Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_BOM_BO

938: Get_Effectivity_Date;
939: END IF;
940:
941: /*
942: IF Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_BOM_BO
943: THEN
944: IF trunc(g_rev_component_rec.start_effective_date) = trunc(SYSDATE)
945: AND g_rev_component_rec.start_effective_date < SYSDATE
946: THEN

Line 961: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After Effectivity Defaulted . . .'); END IF;

957: IF g_rev_component_rec.disable_date = FND_API.G_MISS_DATE THEN
958: g_rev_component_rec.disable_date := NULL;
959: END IF;
960:
961: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After Effectivity Defaulted . . .'); END IF;
962:
963: /************************************************************
964: --
965: -- Default Planning Factor (Planning_Percent)

Line 1016: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After Mutually Exclusive defualting...'); END IF;

1012: g_rev_component_rec.mutually_exclusive :=
1013: Get_Mutually_Exclusive;
1014: END IF;
1015:
1016: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After Mutually Exclusive defualting...'); END IF;
1017:
1018:
1019: -- Added extra IF condition for component_item_id to accomodate
1020: -- records that come in thru the ECO form.

Line 1039: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After include in cost rollup defualting . . . '); END IF;

1035: g_rev_component_rec.include_in_cost_rollup :=
1036: Get_Include_In_Cost_Rollup;
1037: END IF;
1038:
1039: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After include in cost rollup defualting . . . '); END IF;
1040:
1041: /***********************************************************
1042: --
1043: -- Default Check_ATP

Line 1052: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After Check ATP Defualted . . . '); END IF;

1048: THEN
1049: g_rev_component_rec.check_atp := Get_Check_Atp;
1050: END IF;
1051:
1052: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After Check ATP Defualted . . . '); END IF;
1053:
1054: IF g_rev_comp_Unexp_rec.bom_item_type IS NULL OR
1055: g_rev_comp_unexp_rec.bom_item_type = FND_API.G_MISS_NUM
1056: THEN

Line 1072: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After defaulting component yeild factor . . .'); END IF;

1068: g_rev_component_rec.projected_yield :=
1069: Get_Component_Yield_Factor;
1070: END IF;
1071:
1072: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After defaulting component yeild factor . . .'); END IF;
1073:
1074: END IF;
1075:
1076: -- Defaulting used by the ECO form

Line 1128: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Subinventory . . . ' || g_rev_component_rec.supply_subinventory ); END IF;

1124: g_rev_component_rec.supply_subinventory := NULL;
1125: g_Rev_Comp_Unexp_Rec.Supply_Locator_Id := NULL;
1126: END IF;
1127:
1128: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Subinventory . . . ' || g_rev_component_rec.supply_subinventory ); END IF;
1129:
1130:
1131: /*********************************************************
1132: --

Line 1139: AND l_assy_item_type <> Bom_Globals.G_PRODUCT_FAMILY --* Added for Bug 4568522

1135: ***********************************************************/
1136:
1137: IF (g_rev_component_rec.auto_request_material IS NULL
1138: OR g_rev_component_rec.auto_request_material = FND_API.G_MISS_CHAR)
1139: AND l_assy_item_type <> Bom_Globals.G_PRODUCT_FAMILY --* Added for Bug 4568522
1140: THEN
1141:
1142: g_rev_component_rec.auto_request_material :=
1143: Get_Auto_Request_Material;

Line 1147: IF l_assy_item_type = Bom_Globals.G_PRODUCT_FAMILY THEN

1143: Get_Auto_Request_Material;
1144:
1145: --* Added for Bug 4568522
1146: ELSE
1147: IF l_assy_item_type = Bom_Globals.G_PRODUCT_FAMILY THEN
1148: g_rev_component_rec.auto_request_material := NULL;
1149: END IF;
1150: --* End of Bug 4568522
1151:

Line 1250: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Attribute defaulting enforce_int_requirements_code...'); END IF;

1246: THEN
1247: g_rev_comp_unexp_rec.supply_locator_id := NULL;
1248: END IF;
1249:
1250: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Attribute defaulting enforce_int_requirements_code...'); END IF;
1251:
1252: /* bug2758790, form defaults the enforce req code to 0 and value to 'none' */
1253:
1254: IF( g_rev_comp_unexp_rec.enforce_int_requirements_code = FND_API.G_MISS_NUM

Line 1256: AND l_assy_item_type <> Bom_Globals.G_PRODUCT_FAMILY --* Added for Bug 4568522

1252: /* bug2758790, form defaults the enforce req code to 0 and value to 'none' */
1253:
1254: IF( g_rev_comp_unexp_rec.enforce_int_requirements_code = FND_API.G_MISS_NUM
1255: or g_rev_comp_unexp_rec.enforce_int_requirements_code is NULL)
1256: AND l_assy_item_type <> Bom_Globals.G_PRODUCT_FAMILY --* Added for Bug 4568522
1257: THEN
1258: g_rev_comp_unexp_rec.enforce_int_requirements_code := 0;
1259: END IF;
1260:

Line 1261: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Attribute defaulting enforce_int_requirements...'); END IF;

1257: THEN
1258: g_rev_comp_unexp_rec.enforce_int_requirements_code := 0;
1259: END IF;
1260:
1261: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Attribute defaulting enforce_int_requirements...'); END IF;
1262: IF (g_rev_component_rec.enforce_int_requirements = FND_API.G_MISS_CHAR
1263: or g_rev_component_rec.enforce_int_requirements is NULL)
1264: AND l_assy_item_type <> Bom_Globals.G_PRODUCT_FAMILY --* Added for Bug 4568522
1265: THEN

Line 1264: AND l_assy_item_type <> Bom_Globals.G_PRODUCT_FAMILY --* Added for Bug 4568522

1260:
1261: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Attribute defaulting enforce_int_requirements...'); END IF;
1262: IF (g_rev_component_rec.enforce_int_requirements = FND_API.G_MISS_CHAR
1263: or g_rev_component_rec.enforce_int_requirements is NULL)
1264: AND l_assy_item_type <> Bom_Globals.G_PRODUCT_FAMILY --* Added for Bug 4568522
1265: THEN
1266: g_rev_component_rec.enforce_int_requirements := Get_EnforceInteger_Value(
1267: p_enforce_integer => 0);
1268:

Line 1271: IF l_assy_item_type = Bom_Globals.G_PRODUCT_FAMILY THEN

1267: p_enforce_integer => 0);
1268:
1269: --* Added for Bug 4568522
1270: ELSE
1271: IF l_assy_item_type = Bom_Globals.G_PRODUCT_FAMILY THEN
1272: g_rev_component_rec.enforce_int_requirements := NULL;
1273: END IF;
1274: --* End of Bug 4568522
1275:

Line 1303: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Getting out of Attribute Defualting...'); END IF;

1299:
1300: x_rev_component_rec := g_rev_component_rec;
1301: x_Rev_Comp_Unexp_Rec := g_Rev_Comp_Unexp_Rec;
1302:
1303: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Getting out of Attribute Defualting...'); END IF;
1304:
1305: END Attribute_Defaulting;
1306:
1307: /*********************************************************************

Line 1737: BOM_GLOBALS.G_OPR_CREATE

1733: --
1734: -- Also copy the Unexposed Columns from Database to New record
1735: --
1736: IF l_rev_component_rec.transaction_type <>
1737: BOM_GLOBALS.G_OPR_CREATE
1738: THEN
1739:
1740: l_Rev_Comp_Unexp_Rec.component_sequence_id :=
1741: p_Old_Rev_Comp_Unexp_Rec.component_sequence_id;

Line 1752: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Comp Seq: ' || to_char(l_Rev_Comp_Unexp_Rec.component_sequence_id)); END IF;

1748:
1749: l_Rev_Comp_Unexp_Rec.Rowid :=
1750: p_Old_Rev_Comp_Unexp_Rec.Rowid;
1751:
1752: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Comp Seq: ' || to_char(l_Rev_Comp_Unexp_Rec.component_sequence_id)); END IF;
1753: ELSIF l_rev_component_rec.transaction_type =
1754: BOM_GLOBALS.G_OPR_CREATE
1755: THEN
1756: /***********************************************

Line 1754: BOM_GLOBALS.G_OPR_CREATE

1750: p_Old_Rev_Comp_Unexp_Rec.Rowid;
1751:
1752: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Comp Seq: ' || to_char(l_Rev_Comp_Unexp_Rec.component_sequence_id)); END IF;
1753: ELSIF l_rev_component_rec.transaction_type =
1754: BOM_GLOBALS.G_OPR_CREATE
1755: THEN
1756: /***********************************************
1757: --
1758: -- Default Component_Sequence_Id

Line 1895: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Within entity defaulting . . .'); END IF;

1891: IS
1892: BEGIN
1893:
1894: -- Load out record
1895: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Within entity defaulting . . .'); END IF;
1896:
1897: x_rev_component_rec := p_rev_component_rec;
1898:
1899: IF (p_rev_component_rec.quantity_per_assembly) IS NULL

Line 1927: IF Bom_Globals.Get_Debug = 'Y' THEN error_handler.write_debug('exiting defaulting . . .'); END IF;

1923: THEN
1924: x_rev_component_rec.maximum_allowed_quantity :=
1925: p_rev_component_rec.quantity_per_assembly;
1926: END IF;
1927: IF Bom_Globals.Get_Debug = 'Y' THEN error_handler.write_debug('exiting defaulting . . .'); END IF;
1928:
1929: END Entity_Defaulting;
1930:
1931: /******************************************************************