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

Line 359: x_Return_Status := BOM_Globals.G_RECORD_FOUND;

355: AND bill_sequence_id = p_bill_sequence_id
356: AND NVL(from_end_item_unit_number, FND_API.G_MISS_CHAR) =
357: NVL(p_from_end_item_number, FND_API.G_MISS_CHAR);
358:
359: x_Return_Status := BOM_Globals.G_RECORD_FOUND;
360: x_Rev_Component_Rec := l_rev_component_rec;
361: x_Rev_Comp_Unexp_Rec := l_Rev_Comp_Unexp_Rec;
362:
363: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Finished querying and assigning component record . . .'); END IF;

Line 363: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Finished querying and assigning component record . . .'); END IF;

359: x_Return_Status := BOM_Globals.G_RECORD_FOUND;
360: x_Rev_Component_Rec := l_rev_component_rec;
361: x_Rev_Comp_Unexp_Rec := l_Rev_Comp_Unexp_Rec;
362:
363: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Finished querying and assigning component record . . .'); END IF;
364:
365: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Selecting the lookup meaning for enforce int requirements code . . .'); END IF;
366:
367: IF l_rev_comp_unexp_rec.enforce_int_requirements_code IS NOT NULL AND

Line 365: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Selecting the lookup meaning for enforce int requirements code . . .'); END IF;

361: x_Rev_Comp_Unexp_Rec := l_Rev_Comp_Unexp_Rec;
362:
363: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Finished querying and assigning component record . . .'); END IF;
364:
365: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Selecting the lookup meaning for enforce int requirements code . . .'); END IF;
366:
367: IF l_rev_comp_unexp_rec.enforce_int_requirements_code IS NOT NULL AND
368: l_rev_comp_unexp_rec.enforce_int_requirements_code <> FND_API.G_MISS_NUM THEN
369: Begin

Line 394: x_return_status := BOM_Globals.G_RECORD_NOT_FOUND;

390:
391: EXCEPTION
392:
393: WHEN NO_DATA_FOUND THEN
394: x_return_status := BOM_Globals.G_RECORD_NOT_FOUND;
395: x_rev_component_rec := l_rev_component_rec;
396: x_Rev_Comp_Unexp_Rec := l_Rev_Comp_Unexp_Rec;
397:
398: WHEN OTHERS THEN

Line 480: , LAST_UPDATED_BY = BOM_Globals.Get_User_Id

476: , p_rev_component_rec.start_effective_date
477: , p_rev_component_rec.new_effectivity_date
478: )
479: , LAST_UPDATE_DATE = SYSDATE
480: , LAST_UPDATED_BY = BOM_Globals.Get_User_Id
481: , LAST_UPDATE_LOGIN = BOM_Globals.Get_User_Id
482: , ITEM_NUM = p_rev_component_rec.item_sequence_number
483: , BASIS_TYPE = decode(p_rev_component_rec.basis_type,
484: FND_API.G_MISS_NUM, null,p_rev_component_rec.basis_type)

Line 481: , LAST_UPDATE_LOGIN = BOM_Globals.Get_User_Id

477: , p_rev_component_rec.new_effectivity_date
478: )
479: , LAST_UPDATE_DATE = SYSDATE
480: , LAST_UPDATED_BY = BOM_Globals.Get_User_Id
481: , LAST_UPDATE_LOGIN = BOM_Globals.Get_User_Id
482: , ITEM_NUM = p_rev_component_rec.item_sequence_number
483: , BASIS_TYPE = decode(p_rev_component_rec.basis_type,
484: FND_API.G_MISS_NUM, null,p_rev_component_rec.basis_type)
485: , COMPONENT_QUANTITY = p_rev_component_rec.quantity_per_assembly

Line 521: , PROGRAM_ID = BOM_Globals.Get_Prog_Id

517: , INCLUDE_ON_SHIP_DOCS = p_rev_component_rec.include_on_ship_docs
518: , LOW_QUANTITY = p_rev_component_rec.minimum_allowed_quantity
519: , ACD_TYPE = p_rev_component_rec.acd_type
520: , PROGRAM_UPDATE_DATE = SYSDATE
521: , PROGRAM_ID = BOM_Globals.Get_Prog_Id
522: , OPERATION_LEAD_TIME_PERCENT = l_operation_leadtime
523: , Original_System_Reference =
524: p_rev_component_rec.original_system_reference
525: , From_End_Item_Unit_Number =

Line 609: l_Bo_Id := Bom_Globals.Get_Bo_Identifier;

605: l_operation_seq_num NUMBER;
606:
607: BEGIN
608:
609: l_Bo_Id := Bom_Globals.Get_Bo_Identifier;
610:
611:
612: -- bug 2820641
613: -- BOM form : BOMFDBOM.fmb won't insert the Old_component_sequence_id.

Line 616: if l_Bo_Id = BOM_Globals.G_ECO_BO THEN

612: -- bug 2820641
613: -- BOM form : BOMFDBOM.fmb won't insert the Old_component_sequence_id.
614: -- ENG form : ENGFDECN.fmb will always inserts Old_component_sequence_id.
615:
616: if l_Bo_Id = BOM_Globals.G_ECO_BO THEN
617: if (p_rev_comp_Unexp_rec.old_component_sequence_id = FND_API.G_MISS_NUM)
618: or (p_rev_comp_Unexp_rec.old_component_sequence_id is NULL) then
619: l_old_component_sequence_id := p_rev_comp_Unexp_rec.component_sequence_id;
620: else

Line 635: BOM_GLOBALS.GET_DEF_REV_ATTRS

631:
632: --/* added for BOM Defaulting for WEB-ADI Open Interface calls */
633:
634:
635: BOM_GLOBALS.GET_DEF_REV_ATTRS
636: ( p_bill_sequence_id => p_rev_comp_Unexp_rec.bill_sequence_id
637: , p_comp_item_id => p_rev_comp_Unexp_rec.component_item_id
638: , p_effectivity_date => nvl(p_rev_component_rec.start_effective_date,SYSDATE)
639: , x_object_revision_id => l_object_revision_id

Line 762: , BOM_Globals.Get_Prog_AppId

758: , NULL /* Cost Factor */
759: , p_rev_component_rec.required_for_revenue
760: , p_rev_component_rec.maximum_allowed_quantity
761: , p_rev_comp_Unexp_rec.component_sequence_id
762: , BOM_Globals.Get_Prog_AppId
763: , p_rev_component_rec.wip_supply_type
764: , DECODE(p_rev_comp_Unexp_rec.supply_locator_id, FND_API.G_MISS_NUM,
765: NULL, p_rev_comp_Unexp_rec.supply_locator_id)
766: , p_rev_comp_Unexp_rec.bom_item_type

Line 770: , BOM_Globals.Get_User_Id /* Last Updated By */

766: , p_rev_comp_Unexp_rec.bom_item_type
767: , l_operation_seq_num
768: , p_rev_comp_Unexp_rec.component_item_id
769: , SYSDATE /* Last Update Date */
770: , BOM_Globals.Get_User_Id /* Last Updated By */
771: , SYSDATE /* Creation Date */
772: , BOM_Globals.Get_User_Id /* Created By */
773: , BOM_Globals.Get_User_Id /* Last Update Login */
774: , DECODE(p_rev_component_rec.item_sequence_number, FND_API.G_MISS_NUM,

Line 772: , BOM_Globals.Get_User_Id /* Created By */

768: , p_rev_comp_Unexp_rec.component_item_id
769: , SYSDATE /* Last Update Date */
770: , BOM_Globals.Get_User_Id /* Last Updated By */
771: , SYSDATE /* Creation Date */
772: , BOM_Globals.Get_User_Id /* Created By */
773: , BOM_Globals.Get_User_Id /* Last Update Login */
774: , DECODE(p_rev_component_rec.item_sequence_number, FND_API.G_MISS_NUM,
775: 1, NULL,1,p_rev_component_rec.item_sequence_number)
776: , DECODE(p_rev_component_rec.basis_type,FND_API.G_MISS_NUM,

Line 773: , BOM_Globals.Get_User_Id /* Last Update Login */

769: , SYSDATE /* Last Update Date */
770: , BOM_Globals.Get_User_Id /* Last Updated By */
771: , SYSDATE /* Creation Date */
772: , BOM_Globals.Get_User_Id /* Created By */
773: , BOM_Globals.Get_User_Id /* Last Update Login */
774: , DECODE(p_rev_component_rec.item_sequence_number, FND_API.G_MISS_NUM,
775: 1, NULL,1,p_rev_component_rec.item_sequence_number)
776: , DECODE(p_rev_component_rec.basis_type,FND_API.G_MISS_NUM,
777: NULL,p_rev_component_rec.basis_type)

Line 784: Bom_Globals.G_BOM_BO,

780: , p_rev_component_rec.comments
781: , nvl(p_rev_component_rec.start_effective_date,SYSDATE) --2169237
782: , p_rev_component_rec.Eco_Name
783: , DECODE(l_Bo_Id,
784: Bom_Globals.G_BOM_BO,
785: Decode( p_rev_comp_Unexp_rec.bom_implementation_date,
786: null,
787: null,
788: SYSDATE),

Line 793: Bom_Globals.G_BOM_BO,

789: NULL
790: ) /* Implementation Date */
791: /*
792: , DECODE(l_Bo_Id,
793: Bom_Globals.G_BOM_BO,
794: SYSDATE,
795: NULL
796: ) -- Implementation Date
797: */

Line 836: , BOM_Globals.Get_Prog_Id

832: -- )
833: , l_old_component_sequence_id
834: , p_rev_comp_Unexp_rec.bill_sequence_id
835: , Fnd_Global.Conc_Request_Id /* Request Id */
836: , BOM_Globals.Get_Prog_Id
837: , SYSDATE /* program_update_date */
838: , p_rev_comp_Unexp_rec.pick_components
839: , p_rev_component_rec.original_system_reference
840: , DECODE( p_rev_component_rec.from_end_item_unit_number

Line 850: , BOM_Globals.Get_Eco_For_Production

846: , FND_API.G_MISS_CHAR
847: , null
848: , p_rev_component_rec.to_end_item_unit_number
849: )
850: , BOM_Globals.Get_Eco_For_Production
851: -- DECODE( l_Bo_Id, BOM_Globals.G_ECO_BO, l_Eco_For_Production, 2) /* Eco for Production flag */
852: , p_rev_comp_Unexp_rec.Enforce_Int_Requirements_Code
853: , p_rev_component_rec.auto_request_material -- Added in 11.5.9 by ADEY
854: , NULL-- Added by hgelli. Identifies this record as Bom Component.

Line 851: -- DECODE( l_Bo_Id, BOM_Globals.G_ECO_BO, l_Eco_For_Production, 2) /* Eco for Production flag */

847: , null
848: , p_rev_component_rec.to_end_item_unit_number
849: )
850: , BOM_Globals.Get_Eco_For_Production
851: -- DECODE( l_Bo_Id, BOM_Globals.G_ECO_BO, l_Eco_For_Production, 2) /* Eco for Production flag */
852: , p_rev_comp_Unexp_rec.Enforce_Int_Requirements_Code
853: , p_rev_component_rec.auto_request_material -- Added in 11.5.9 by ADEY
854: , NULL-- Added by hgelli. Identifies this record as Bom Component.
855: , p_rev_comp_Unexp_rec.component_item_id

Line 879: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Unexpected Error occured in Insert . . .' || SQLERRM); END IF;

875:
876: EXCEPTION
877:
878: WHEN OTHERS THEN
879: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Unexpected Error occured in Insert . . .' || SQLERRM); END IF;
880:
881: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
882: THEN
883: l_err_text := G_PKG_NAME ||

Line 955: IF Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_ECO_BO

951: l_rev_component_rec := p_rev_component_rec ;
952: l_rev_comp_unexp_rec := p_rev_comp_unexp_rec ;
953: x_return_status := FND_API.G_RET_STS_SUCCESS;
954:
955: IF Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_ECO_BO
956: THEN
957:
958: DELETE FROM BOM_INVENTORY_COMPONENTS
959: WHERE COMPONENT_SEQUENCE_ID = p_rev_comp_unexp_rec.component_sequence_id;

Line 990: ELSIF Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_BOM_BO

986:
987:
988: -- In Bom BO, the user is not allowed to delete components directly.
989: -- The user can use delete group functionality for deleting components.
990: ELSIF Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_BOM_BO
991: THEN
992:
993:
994: FOR DG IN CheckGroup

Line 1047: user_id => BOM_Globals.Get_User_Id

1043: ent_inv_item_id => l_rev_comp_unexp_rec.revised_item_id,
1044: ent_alt_designator => l_rev_component_rec.alternate_bom_code,
1045: ent_comp_seq_id => l_rev_comp_unexp_rec.component_sequence_id,
1046: ent_op_seq_id => NULL,
1047: user_id => BOM_Globals.Get_User_Id
1048: );
1049:
1050: BOMPCMBM.Delete_Related_Pending_Comps(p_src_comp_seq_id => p_rev_comp_unexp_rec.component_sequence_id
1051: , x_Return_Status => x_Return_Status);

Line 1316: IF l_Rev_Component_Rec.Transaction_Type = BOM_GLOBALS.G_OPR_CREATE THEN

1312: l_Token_Tbl(1).Token_Name := 'REVISED_COMPONENT_NAME';
1313: l_Token_Tbl(1).Token_Value := l_rev_component_rec.component_item_name;
1314:
1315:
1316: IF l_Rev_Component_Rec.Transaction_Type = BOM_GLOBALS.G_OPR_CREATE THEN
1317:
1318: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Test Harness: Executing Insert Row. . . '); END IF;
1319:
1320: IF Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_ECO_BO

Line 1318: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Test Harness: Executing Insert Row. . . '); END IF;

1314:
1315:
1316: IF l_Rev_Component_Rec.Transaction_Type = BOM_GLOBALS.G_OPR_CREATE THEN
1317:
1318: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Test Harness: Executing Insert Row. . . '); END IF;
1319:
1320: IF Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_ECO_BO
1321: THEN
1322: FOR CheckBillExists IN c_CheckBillExists LOOP

Line 1320: IF Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_ECO_BO

1316: IF l_Rev_Component_Rec.Transaction_Type = BOM_GLOBALS.G_OPR_CREATE THEN
1317:
1318: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Test Harness: Executing Insert Row. . . '); END IF;
1319:
1320: IF Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_ECO_BO
1321: THEN
1322: FOR CheckBillExists IN c_CheckBillExists LOOP
1323: -- Loop executes then the bill does not exist.
1324: -- Procedure Create_New_Bill

Line 1381: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('BOM_Component_Util: Creating New Bill. . . ');

1377: , p_message_type => 'W' -- Parameter added as fix for Bug - 3267190
1378: );
1379: END IF;
1380:
1381: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('BOM_Component_Util: Creating New Bill. . . ');
1382: END IF;
1383: Bom_Bom_Component_Util.Create_New_Bill
1384: ( p_assembly_item_id =>
1385: l_rev_comp_unexp_rec.revised_item_id

Line 1396: , p_last_updated_by => BOM_Globals.Get_User_Id

1392: , p_common_bill_sequence_id =>
1393: l_rev_comp_unexp_rec.bill_sequence_id
1394: , p_assembly_type => l_assembly_type
1395: , p_last_update_date => SYSDATE
1396: , p_last_updated_by => BOM_Globals.Get_User_Id
1397: , p_creation_date => SYSDATE
1398: , p_created_by => BOM_Globals.Get_User_Id
1399: , p_revised_item_seq_id =>
1400: l_rev_comp_unexp_rec.revised_item_sequence_id

Line 1398: , p_created_by => BOM_Globals.Get_User_Id

1394: , p_assembly_type => l_assembly_type
1395: , p_last_update_date => SYSDATE
1396: , p_last_updated_by => BOM_Globals.Get_User_Id
1397: , p_creation_date => SYSDATE
1398: , p_created_by => BOM_Globals.Get_User_Id
1399: , p_revised_item_seq_id =>
1400: l_rev_comp_unexp_rec.revised_item_sequence_id
1401: , p_original_system_reference =>
1402: l_rev_component_rec.original_system_reference);

Line 1422: If l_bom_item_type = BOM_Globals.G_PRODUCT_FAMILY Then

1418: FROM MTL_SYSTEM_ITEMS_B
1419: WHERE INVENTORY_ITEM_ID = l_rev_comp_unexp_rec.revised_item_id
1420: AND ORGANIZATION_ID = l_rev_comp_unexp_rec.organization_id;
1421:
1422: If l_bom_item_type = BOM_Globals.G_PRODUCT_FAMILY Then
1423: Product_Family_PKG.Update_PF_Item_Id
1424: (X_Inventory_Item_Id => l_Rev_Comp_Unexp_Rec.component_item_id,
1425: X_Organization_Id => l_rev_comp_unexp_rec.organization_id,
1426: X_PF_Item_Id => l_rev_comp_unexp_rec.revised_item_id,

Line 1440: ELSIF l_Rev_Component_Rec.Transaction_Type = BOM_GLOBALS.G_OPR_UPDATE

1436: FND_MESSAGE.SET_TOKEN('ENTITY', err_text);
1437: APP_EXCEPTION.RAISE_EXCEPTION;
1438: End;
1439: End if;
1440: ELSIF l_Rev_Component_Rec.Transaction_Type = BOM_GLOBALS.G_OPR_UPDATE
1441: THEN
1442:
1443: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Test Harness: Executing Update Row. . . '); END IF;
1444:

Line 1443: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Test Harness: Executing Update Row. . . '); END IF;

1439: End if;
1440: ELSIF l_Rev_Component_Rec.Transaction_Type = BOM_GLOBALS.G_OPR_UPDATE
1441: THEN
1442:
1443: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Test Harness: Executing Update Row. . . '); END IF;
1444:
1445: Update_Row
1446: ( p_Rev_component_rec => l_Rev_Component_Rec
1447: , p_Rev_Comp_Unexp_Rec => l_Rev_Comp_Unexp_Rec

Line 1451: ELSIF l_Rev_Component_Rec.Transaction_Type = BOM_GLOBALS.G_OPR_DELETE

1447: , p_Rev_Comp_Unexp_Rec => l_Rev_Comp_Unexp_Rec
1448: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1449: , x_return_status => l_Return_Status
1450: );
1451: ELSIF l_Rev_Component_Rec.Transaction_Type = BOM_GLOBALS.G_OPR_DELETE
1452: THEN
1453:
1454: -- dbms_output.put_line('Test Harness: Executing Delete Row. . . ');
1455:

Line 1473: ELSIF l_Rev_Component_Rec.Transaction_Type = BOM_GLOBALS.G_OPR_CANCEL

1469: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1470: , x_return_status => l_Return_Status
1471: );
1472:
1473: ELSIF l_Rev_Component_Rec.Transaction_Type = BOM_GLOBALS.G_OPR_CANCEL
1474: THEN
1475: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Perform Cancel Component . . .'); END IF;
1476:
1477: --

Line 1475: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Perform Cancel Component . . .'); END IF;

1471: );
1472:
1473: ELSIF l_Rev_Component_Rec.Transaction_Type = BOM_GLOBALS.G_OPR_CANCEL
1474: THEN
1475: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Perform Cancel Component . . .'); END IF;
1476:
1477: --
1478: -- Fetch Component Sequence Id
1479: --

Line 1510: BOM_Globals.Get_User_ID

1506: l_comp_seq_id
1507: , p_cancel_comments =>
1508: l_rev_component_rec.cancel_comments
1509: , p_user_id =>
1510: BOM_Globals.Get_User_ID
1511: , p_login_id =>
1512: BOM_Globals.Get_Login_ID
1513: );
1514:

Line 1512: BOM_Globals.Get_Login_ID

1508: l_rev_component_rec.cancel_comments
1509: , p_user_id =>
1510: BOM_Globals.Get_User_ID
1511: , p_login_id =>
1512: BOM_Globals.Get_Login_ID
1513: );
1514:
1515: END IF;
1516:

Line 1521: IF l_Rev_Component_Rec.Transaction_Type = BOM_GLOBALS.G_OPR_CREATE

1517: /********************************************************************
1518: -- If the structure type is Packaging Hierarchy the we will do the
1519: -- following operations.
1520: ********************************************************************/
1521: IF l_Rev_Component_Rec.Transaction_Type = BOM_GLOBALS.G_OPR_CREATE
1522: OR l_Rev_Component_Rec.Transaction_Type = BOM_GLOBALS.G_OPR_UPDATE
1523: OR l_Rev_Component_Rec.Transaction_Type = BOM_GLOBALS.G_OPR_DELETE
1524: THEN
1525: SELECT STRUCTURE_TYPE_NAME,

Line 1522: OR l_Rev_Component_Rec.Transaction_Type = BOM_GLOBALS.G_OPR_UPDATE

1518: -- If the structure type is Packaging Hierarchy the we will do the
1519: -- following operations.
1520: ********************************************************************/
1521: IF l_Rev_Component_Rec.Transaction_Type = BOM_GLOBALS.G_OPR_CREATE
1522: OR l_Rev_Component_Rec.Transaction_Type = BOM_GLOBALS.G_OPR_UPDATE
1523: OR l_Rev_Component_Rec.Transaction_Type = BOM_GLOBALS.G_OPR_DELETE
1524: THEN
1525: SELECT STRUCTURE_TYPE_NAME,
1526: ASSEMBLY_ITEM_ID,

Line 1523: OR l_Rev_Component_Rec.Transaction_Type = BOM_GLOBALS.G_OPR_DELETE

1519: -- following operations.
1520: ********************************************************************/
1521: IF l_Rev_Component_Rec.Transaction_Type = BOM_GLOBALS.G_OPR_CREATE
1522: OR l_Rev_Component_Rec.Transaction_Type = BOM_GLOBALS.G_OPR_UPDATE
1523: OR l_Rev_Component_Rec.Transaction_Type = BOM_GLOBALS.G_OPR_DELETE
1524: THEN
1525: SELECT STRUCTURE_TYPE_NAME,
1526: ASSEMBLY_ITEM_ID,
1527: ORGANIZATION_ID,

Line 1564: IF l_Rev_Component_Rec.Transaction_Type = BOM_GLOBALS.G_OPR_CREATE THEN

1560: l_return_status := FND_API.G_RET_STS_ERROR;
1561: RETURN;
1562: END IF;
1563:
1564: IF l_Rev_Component_Rec.Transaction_Type = BOM_GLOBALS.G_OPR_CREATE THEN
1565:
1566: BOM_GTIN_RULES.Update_Top_GTIN (
1567: p_organization_id => l_Organization_Id
1568: ,p_component_item_id => l_Rev_Comp_Unexp_Rec.component_item_id

Line 1655: if bom_globals.get_debug = 'Y'

1651: l_effectivity_control NUMBER;
1652: -- End bug 4550996
1653: BEGIN
1654:
1655: if bom_globals.get_debug = 'Y'
1656: then
1657: error_handler.write_debug('Rev_Comps: default structure type_id for alt: ' || p_alternate_bom_code);
1658: end if;
1659:

Line 1679: if bom_globals.get_debug = 'Y'

1675:
1676: end loop;
1677: end if;
1678:
1679: if bom_globals.get_debug = 'Y'
1680: then
1681: error_handler.write_debug('Rev_Comps: defaulted structure type id: ' || l_structure_type_id);
1682: end if;
1683:

Line 1688: IF bom_globals.get_debug = 'Y' THEN

1684: -- Added for fix of bug 4550996
1685: OPEN c_effectivity_control;
1686: FETCH c_effectivity_control INTO l_effectivity_control;
1687: CLOSE c_effectivity_control;
1688: IF bom_globals.get_debug = 'Y' THEN
1689: Error_handler.Write_debug('Rev_Comps: defaulted effectivity control: ' || l_effectivity_control);
1690: END IF;
1691: -- End fix of bug 4550996
1692: