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 578: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Within the Rev. Component Defaulting...'); END IF;

574: WHERE inventory_item_id = p_rev_comp_unexp_rec.component_item_id
575: AND organization_id = p_rev_comp_unexp_rec.organization_id;
576: BEGIN
577:
578: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Within the Rev. Component Defaulting...'); END IF;
579:
580: -- Initialize package global records
581:
582: g_rev_component_rec := p_rev_component_rec;

Line 617: 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;

613: IF g_Rev_Comp_Unexp_rec.bill_sequence_id IS NULL THEN
614:
615: g_Rev_Comp_Unexp_Rec.bill_sequence_id :=
616: get_bill_sequence;
617: 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;
618: END IF;
619:
620: /*********************************************************
621: --

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

668: g_rev_component_rec.to_end_item_unit_number :=
669: l_to_end_item_unit_number;
670: END IF;
671:
672: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After defaulting to_end_item_unit_num..'); END IF;
673:
674: --* Added for Bug 4568522
675: SELECT Bom_Item_Type
676: INTO l_assy_item_type

Line 697: Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_BOM_BO

693:
694: IF ( g_rev_component_rec.acd_type IS NOT NULL AND
695: g_rev_component_rec.acd_type <> FND_API.G_MISS_NUM
696: ) OR
697: Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_BOM_BO
698: THEN
699:
700: /************************************************************
701: --

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

705:
706: IF ((g_rev_component_rec.item_sequence_number IS NULL) OR
707: (g_rev_component_rec.item_sequence_number =
708: fnd_api.g_miss_num))
709: AND l_assy_item_type <> Bom_Globals.G_PRODUCT_FAMILY --* Added for Bug 4568522
710: THEN
711:
712: g_rev_component_rec.item_sequence_number :=
713: Get_Item_Num;

Line 717: IF l_assy_item_type = Bom_Globals.G_PRODUCT_FAMILY THEN

713: Get_Item_Num;
714:
715: --* Added for Bug 4568522
716: ELSE
717: IF l_assy_item_type = Bom_Globals.G_PRODUCT_FAMILY THEN
718: g_rev_component_rec.item_sequence_number := 1;
719: END IF;
720: END IF;
721: --* End of Bug 4568522

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

719: END IF;
720: END IF;
721: --* End of Bug 4568522
722:
723: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After defaulting item num . . . '); END IF;
724:
725: /**********************************************************
726: --
727: -- Default Operation_Seq_Num

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

742: THEN
743: g_rev_component_rec.new_operation_sequence_number := null;
744: END IF;
745:
746: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After defaulting operation seq num...'); END IF;
747:
748: IF g_rev_component_rec.acd_type = 3 AND
749: g_rev_component_rec.disable_date IS NULL
750: THEN

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

751: g_rev_component_rec.disable_date :=
752: g_rev_component_rec.start_effective_date;
753: END IF;
754:
755: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After defaulting disable_date...'); END IF;
756: END IF;
757:
758: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After defaulting operation seq num...'); END IF;
759:

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

754:
755: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After defaulting disable_date...'); END IF;
756: END IF;
757:
758: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After defaulting operation seq num...'); END IF;
759:
760: /************************************************************
761: --
762: -- Default Component_Quantity

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

773: round(g_rev_component_rec.quantity_per_assembly, 7);
774: */
775: END IF;
776:
777: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After defaulting component qunatity...'); END IF;
778:
779: /************************************************************
780: --
781: -- Default Pick_Components

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

788: g_Rev_Comp_Unexp_Rec.pick_components :=
789: Get_Pick_Components;
790: END IF;
791:
792: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After defaulting pick components . . .'); END IF;
793:
794: /*************************************************************
795: --
796: -- Default Effectivity Date

Line 807: IF Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_BOM_BO

803: Get_Effectivity_Date;
804: END IF;
805:
806: /*
807: IF Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_BOM_BO
808: THEN
809: IF trunc(g_rev_component_rec.start_effective_date) = trunc(SYSDATE)
810: AND g_rev_component_rec.start_effective_date < SYSDATE
811: THEN

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

822: IF g_rev_component_rec.disable_date = FND_API.G_MISS_DATE THEN
823: g_rev_component_rec.disable_date := NULL;
824: END IF;
825:
826: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After Effectivity Defaulted . . .'); END IF;
827:
828: /************************************************************
829: --
830: -- Default Planning Factor (Planning_Percent)

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

877: g_rev_component_rec.mutually_exclusive :=
878: Get_Mutually_Exclusive;
879: END IF;
880:
881: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After Mutually Exclusive defualting...'); END IF;
882:
883:
884: -- Added extra IF condition for component_item_id to accomodate
885: -- records that come in thru the ECO form.

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

900: g_rev_component_rec.include_in_cost_rollup :=
901: Get_Include_In_Cost_Rollup;
902: END IF;
903:
904: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After include in cost rollup defualting . . . '); END IF;
905:
906: /***********************************************************
907: --
908: -- Default Check_ATP

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

913: THEN
914: g_rev_component_rec.check_atp := Get_Check_Atp;
915: END IF;
916:
917: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After Check ATP Defualted . . . '); END IF;
918:
919: IF g_rev_comp_Unexp_rec.bom_item_type IS NULL OR
920: g_rev_comp_unexp_rec.bom_item_type = FND_API.G_MISS_NUM
921: THEN

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

933: g_rev_component_rec.projected_yield :=
934: Get_Component_Yield_Factor;
935: END IF;
936:
937: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After defaulting component yeild factor . . .'); END IF;
938:
939: END IF;
940:
941: -- Defaulting used by the ECO form

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

989: g_rev_component_rec.supply_subinventory := NULL;
990: g_Rev_Comp_Unexp_Rec.Supply_Locator_Id := NULL;
991: END IF;
992:
993: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Subinventory . . . ' || g_rev_component_rec.supply_subinventory ); END IF;
994:
995:
996: /*********************************************************
997: --

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

1000: ***********************************************************/
1001:
1002: IF (g_rev_component_rec.auto_request_material IS NULL
1003: OR g_rev_component_rec.auto_request_material = FND_API.G_MISS_CHAR)
1004: AND l_assy_item_type <> Bom_Globals.G_PRODUCT_FAMILY --* Added for Bug 4568522
1005: THEN
1006:
1007: g_rev_component_rec.auto_request_material :=
1008: Get_Auto_Request_Material;

Line 1012: IF l_assy_item_type = Bom_Globals.G_PRODUCT_FAMILY THEN

1008: Get_Auto_Request_Material;
1009:
1010: --* Added for Bug 4568522
1011: ELSE
1012: IF l_assy_item_type = Bom_Globals.G_PRODUCT_FAMILY THEN
1013: g_rev_component_rec.auto_request_material := NULL;
1014: END IF;
1015: --* End of Bug 4568522
1016:

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

1111: THEN
1112: g_rev_comp_unexp_rec.supply_locator_id := NULL;
1113: END IF;
1114:
1115: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Attribute defaulting enforce_int_requirements_code...'); END IF;
1116:
1117: /* bug2758790, form defaults the enforce req code to 0 and value to 'none' */
1118:
1119: IF( g_rev_comp_unexp_rec.enforce_int_requirements_code = FND_API.G_MISS_NUM

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

1117: /* bug2758790, form defaults the enforce req code to 0 and value to 'none' */
1118:
1119: IF( g_rev_comp_unexp_rec.enforce_int_requirements_code = FND_API.G_MISS_NUM
1120: or g_rev_comp_unexp_rec.enforce_int_requirements_code is NULL)
1121: AND l_assy_item_type <> Bom_Globals.G_PRODUCT_FAMILY --* Added for Bug 4568522
1122: THEN
1123: g_rev_comp_unexp_rec.enforce_int_requirements_code := 0;
1124: END IF;
1125:

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

1122: THEN
1123: g_rev_comp_unexp_rec.enforce_int_requirements_code := 0;
1124: END IF;
1125:
1126: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Attribute defaulting enforce_int_requirements...'); END IF;
1127: IF (g_rev_component_rec.enforce_int_requirements = FND_API.G_MISS_CHAR
1128: or g_rev_component_rec.enforce_int_requirements is NULL)
1129: AND l_assy_item_type <> Bom_Globals.G_PRODUCT_FAMILY --* Added for Bug 4568522
1130: THEN

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

1125:
1126: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Attribute defaulting enforce_int_requirements...'); END IF;
1127: IF (g_rev_component_rec.enforce_int_requirements = FND_API.G_MISS_CHAR
1128: or g_rev_component_rec.enforce_int_requirements is NULL)
1129: AND l_assy_item_type <> Bom_Globals.G_PRODUCT_FAMILY --* Added for Bug 4568522
1130: THEN
1131: g_rev_component_rec.enforce_int_requirements := Get_EnforceInteger_Value(
1132: p_enforce_integer => 0);
1133:

Line 1136: IF l_assy_item_type = Bom_Globals.G_PRODUCT_FAMILY THEN

1132: p_enforce_integer => 0);
1133:
1134: --* Added for Bug 4568522
1135: ELSE
1136: IF l_assy_item_type = Bom_Globals.G_PRODUCT_FAMILY THEN
1137: g_rev_component_rec.enforce_int_requirements := NULL;
1138: END IF;
1139: --* End of Bug 4568522
1140:

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

1164:
1165: x_rev_component_rec := g_rev_component_rec;
1166: x_Rev_Comp_Unexp_Rec := g_Rev_Comp_Unexp_Rec;
1167:
1168: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Getting out of Attribute Defualting...'); END IF;
1169:
1170: END Attribute_Defaulting;
1171:
1172: /*********************************************************************

Line 1602: BOM_GLOBALS.G_OPR_CREATE

1598: --
1599: -- Also copy the Unexposed Columns from Database to New record
1600: --
1601: IF l_rev_component_rec.transaction_type <>
1602: BOM_GLOBALS.G_OPR_CREATE
1603: THEN
1604:
1605: l_Rev_Comp_Unexp_Rec.component_sequence_id :=
1606: p_Old_Rev_Comp_Unexp_Rec.component_sequence_id;

Line 1617: 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;

1613:
1614: l_Rev_Comp_Unexp_Rec.Rowid :=
1615: p_Old_Rev_Comp_Unexp_Rec.Rowid;
1616:
1617: 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;
1618: ELSIF l_rev_component_rec.transaction_type =
1619: BOM_GLOBALS.G_OPR_CREATE
1620: THEN
1621: /***********************************************

Line 1619: BOM_GLOBALS.G_OPR_CREATE

1615: p_Old_Rev_Comp_Unexp_Rec.Rowid;
1616:
1617: 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;
1618: ELSIF l_rev_component_rec.transaction_type =
1619: BOM_GLOBALS.G_OPR_CREATE
1620: THEN
1621: /***********************************************
1622: --
1623: -- Default Component_Sequence_Id

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

1755: IS
1756: BEGIN
1757:
1758: -- Load out record
1759: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Within entity defaulting . . .'); END IF;
1760:
1761: x_rev_component_rec := p_rev_component_rec;
1762:
1763: IF (p_rev_component_rec.quantity_per_assembly) IS NULL

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

1787: THEN
1788: x_rev_component_rec.maximum_allowed_quantity :=
1789: p_rev_component_rec.quantity_per_assembly;
1790: END IF;
1791: IF Bom_Globals.Get_Debug = 'Y' THEN error_handler.write_debug('exiting defaulting . . .'); END IF;
1792:
1793: END Entity_Defaulting;
1794:
1795: /******************************************************************