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_VALIDATE_SUB_OP_RES dependencies on BOM_RTG_GLOBALS

Line 159: l_lot_number := BOM_Rtg_Globals.Get_Lot_Number;

155:
156: BEGIN
157:
158:
159: l_lot_number := BOM_Rtg_Globals.Get_Lot_Number;
160: l_from_wip_entity_id := BOM_Rtg_Globals.Get_From_Wip_Entity_Id;
161: l_to_wip_entity_id := BOM_Rtg_Globals.Get_To_Wip_Entity_Id;
162: l_from_cum_qty := BOM_Rtg_Globals.Get_From_Cum_Qty;
163:

Line 160: l_from_wip_entity_id := BOM_Rtg_Globals.Get_From_Wip_Entity_Id;

156: BEGIN
157:
158:
159: l_lot_number := BOM_Rtg_Globals.Get_Lot_Number;
160: l_from_wip_entity_id := BOM_Rtg_Globals.Get_From_Wip_Entity_Id;
161: l_to_wip_entity_id := BOM_Rtg_Globals.Get_To_Wip_Entity_Id;
162: l_from_cum_qty := BOM_Rtg_Globals.Get_From_Cum_Qty;
163:
164:

Line 161: l_to_wip_entity_id := BOM_Rtg_Globals.Get_To_Wip_Entity_Id;

157:
158:
159: l_lot_number := BOM_Rtg_Globals.Get_Lot_Number;
160: l_from_wip_entity_id := BOM_Rtg_Globals.Get_From_Wip_Entity_Id;
161: l_to_wip_entity_id := BOM_Rtg_Globals.Get_To_Wip_Entity_Id;
162: l_from_cum_qty := BOM_Rtg_Globals.Get_From_Cum_Qty;
163:
164:
165: -- Check if Op Seq Num is exist in ECO by Lot

Line 162: l_from_cum_qty := BOM_Rtg_Globals.Get_From_Cum_Qty;

158:
159: l_lot_number := BOM_Rtg_Globals.Get_Lot_Number;
160: l_from_wip_entity_id := BOM_Rtg_Globals.Get_From_Wip_Entity_Id;
161: l_to_wip_entity_id := BOM_Rtg_Globals.Get_To_Wip_Entity_Id;
162: l_from_cum_qty := BOM_Rtg_Globals.Get_From_Cum_Qty;
163:
164:
165: -- Check if Op Seq Num is exist in ECO by Lot
166: IF l_lot_number IS NOT NULL

Line 444: IF BOM_Rtg_Globals.Get_Bo_Identifier = BOM_Rtg_Globals.G_ECO_BO

440: x_return_status := FND_API.G_RET_STS_ERROR ;
441: END LOOP ;
442:
443: /*
444: IF BOM_Rtg_Globals.Get_Bo_Identifier = BOM_Rtg_Globals.G_ECO_BO
445: THEN
446: null; -- Substitute resources cannot be added from ECOs
447: END IF ;
448: */

Line 675: IF l_return_status = BOM_Rtg_Globals.G_RECORD_FOUND AND

671: , x_mesg_token_tbl => l_mesg_token_tbl
672: , x_return_status => l_return_status
673: ) ;
674:
675: IF l_return_status = BOM_Rtg_Globals.G_RECORD_FOUND AND
676: p_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
677: THEN
678: Error_Handler.Add_Error_Token
679: ( x_Mesg_token_tbl => l_Mesg_Token_Tbl

Line 676: p_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE

672: , x_return_status => l_return_status
673: ) ;
674:
675: IF l_return_status = BOM_Rtg_Globals.G_RECORD_FOUND AND
676: p_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
677: THEN
678: Error_Handler.Add_Error_Token
679: ( x_Mesg_token_tbl => l_Mesg_Token_Tbl
680: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 686: ELSIF l_return_status = BOM_Rtg_Globals.G_RECORD_NOT_FOUND AND

682: , p_token_tbl => l_token_tbl
683: ) ;
684: l_return_status := FND_API.G_RET_STS_ERROR ;
685:
686: ELSIF l_return_status = BOM_Rtg_Globals.G_RECORD_NOT_FOUND AND
687: p_rev_sub_resource_rec.transaction_type IN
688: (BOM_Rtg_Globals.G_OPR_UPDATE, BOM_Rtg_Globals.G_OPR_DELETE)
689: THEN
690: Error_Handler.Add_Error_Token

Line 688: (BOM_Rtg_Globals.G_OPR_UPDATE, BOM_Rtg_Globals.G_OPR_DELETE)

684: l_return_status := FND_API.G_RET_STS_ERROR ;
685:
686: ELSIF l_return_status = BOM_Rtg_Globals.G_RECORD_NOT_FOUND AND
687: p_rev_sub_resource_rec.transaction_type IN
688: (BOM_Rtg_Globals.G_OPR_UPDATE, BOM_Rtg_Globals.G_OPR_DELETE)
689: THEN
690: Error_Handler.Add_Error_Token
691: ( x_Mesg_token_tbl => l_Mesg_Token_Tbl
692: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 812: IF p_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_UPDATE

808: --
809: -- Check if the user is trying to update a record with
810: -- missing value when the column value is required.
811: --
812: IF p_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_UPDATE
813: THEN
814:
815: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
816: ('Sub Operation Resource Attr Validation: Missing Value. . . ' ) ;

Line 815: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

811: --
812: IF p_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_UPDATE
813: THEN
814:
815: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
816: ('Sub Operation Resource Attr Validation: Missing Value. . . ' ) ;
817: END IF;
818:
819: -- New Sub Resource Code

Line 976: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

972: -- Check if the user is trying to create/update a record with
973: -- invalid value.
974: --
975:
976: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
977: ('Sub Operation Resource Attr Validation: Invalid Value. . . ' || l_return_status) ;
978: END IF;
979:
980:

Line 984: AND BOM_Rtg_Globals.Get_Bo_Identifier = BOM_Rtg_Globals.G_ECO_BO

980:
981: -- New Sub Resource Code
982: IF p_rev_sub_resource_rec.new_sub_resource_code IS NOT NULL
983: AND p_rev_sub_resource_rec.new_sub_resource_code <> FND_API.G_MISS_CHAR
984: AND BOM_Rtg_Globals.Get_Bo_Identifier = BOM_Rtg_Globals.G_ECO_BO
985: THEN
986: Error_Handler.Add_Error_Token
987: ( p_Message_Name => 'BOM_SUB_RES_CODE_NOTUPDATE'
988: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 997: IF p_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE

993: END IF ;
994:
995:
996: -- Replacement Group Num
997: IF p_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
998: AND (p_rev_sub_resource_rec.replacement_group_number IS NULL
999: OR p_rev_sub_resource_rec.replacement_group_number = FND_API.G_MISS_NUM)
1000: THEN
1001: Error_Handler.Add_Error_Token

Line 1178: AND BOM_Rtg_Globals.Get_Bo_Identifier = BOM_Rtg_Globals.G_ECO_BO

1174: -- ACD Type
1175: IF p_rev_sub_resource_rec.acd_type IS NOT NULL
1176: AND p_rev_sub_resource_rec.acd_type NOT IN
1177: (l_ACD_ADD, l_ACD_DISABLE)
1178: AND BOM_Rtg_Globals.Get_Bo_Identifier = BOM_Rtg_Globals.G_ECO_BO
1179: THEN
1180:
1181: l_token_tbl(2).token_name := 'ACD_TYPE';
1182: l_token_tbl(2).token_value := p_rev_sub_resource_rec.acd_type;

Line 1194: IF (p_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE

1190: l_return_status := FND_API.G_RET_STS_ERROR ;
1191: END IF ;
1192:
1193: -- Schedule Sequence Number
1194: IF (p_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
1195: AND p_rev_sub_resource_rec.schedule_sequence_number IS NULL)
1196: OR (p_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_UPDATE
1197: AND p_rev_sub_resource_rec.schedule_sequence_number = FND_API.G_MISS_NUM)
1198: OR p_rev_sub_resource_rec.schedule_sequence_number = 0

Line 1196: OR (p_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_UPDATE

1192:
1193: -- Schedule Sequence Number
1194: IF (p_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
1195: AND p_rev_sub_resource_rec.schedule_sequence_number IS NULL)
1196: OR (p_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_UPDATE
1197: AND p_rev_sub_resource_rec.schedule_sequence_number = FND_API.G_MISS_NUM)
1198: OR p_rev_sub_resource_rec.schedule_sequence_number = 0
1199: THEN
1200: Error_Handler.Add_Error_Token

Line 1210: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

1206: l_return_status := FND_API.G_RET_STS_ERROR ;
1207: END IF;
1208:
1209: -- Done validating attributes
1210: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1211: ('Sub Operation Resource Attr Validation completed with return_status: ' || l_return_status) ;
1212: END IF;
1213:
1214: x_return_status := l_return_status;

Line 1219: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

1215: x_mesg_token_tbl := l_Mesg_Token_Tbl;
1216:
1217: EXCEPTION
1218: WHEN OTHERS THEN
1219: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1220: ('Some unknown error in Attribute Validation . . .' || SQLERRM );
1221: END IF ;
1222:
1223:

Line 1433: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

1429: l_rev_sub_res_unexp_rec := p_rev_sub_res_unexp_rec ;
1430: l_return_status := FND_API.G_RET_STS_SUCCESS;
1431: x_return_status := FND_API.G_RET_STS_SUCCESS;
1432:
1433: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1434: ('Performing Sub Op Resource Check Entitity Validation . . .') ;
1435: END IF ;
1436:
1437: --

Line 1452: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

1448: -- The ECO can be updated but a warning needs to be generated and
1449: -- scheduled revised items need to be update to Open
1450: -- and the ECO status need to be changed to Not Submitted for Approval
1451:
1452: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1453: ('Check if ECO has been approved and has a workflow process. . . ' || l_return_status) ;
1454: END IF ;
1455:
1456: IF BOM_Rtg_Globals.Get_Bo_Identifier = BOM_Rtg_Globals.G_ECO_BO

Line 1456: IF BOM_Rtg_Globals.Get_Bo_Identifier = BOM_Rtg_Globals.G_ECO_BO

1452: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1453: ('Check if ECO has been approved and has a workflow process. . . ' || l_return_status) ;
1454: END IF ;
1455:
1456: IF BOM_Rtg_Globals.Get_Bo_Identifier = BOM_Rtg_Globals.G_ECO_BO
1457: THEN
1458: BOM_Rtg_Globals.Check_Approved_For_Process
1459: ( p_change_notice => l_rev_sub_resource_rec.eco_name
1460: , p_organization_id => l_rev_sub_res_unexp_rec.organization_id

Line 1458: BOM_Rtg_Globals.Check_Approved_For_Process

1454: END IF ;
1455:
1456: IF BOM_Rtg_Globals.Get_Bo_Identifier = BOM_Rtg_Globals.G_ECO_BO
1457: THEN
1458: BOM_Rtg_Globals.Check_Approved_For_Process
1459: ( p_change_notice => l_rev_sub_resource_rec.eco_name
1460: , p_organization_id => l_rev_sub_res_unexp_rec.organization_id
1461: , x_processed => l_eco_processed
1462: , x_err_text => l_err_text

Line 1467: BOM_Rtg_Globals.Set_Request_For_Approval

1463: ) ;
1464:
1465: IF l_eco_processed THEN
1466: -- If the above process returns true then set the ECO approval.
1467: BOM_Rtg_Globals.Set_Request_For_Approval
1468: ( p_change_notice => l_rev_sub_resource_rec.eco_name
1469: , p_organization_id => l_rev_sub_res_unexp_rec.organization_id
1470: , x_err_text => l_err_text
1471: ) ;

Line 1480: IF BOM_Rtg_Globals.Get_Bo_Identifier = BOM_Rtg_Globals.G_ECO_BO

1476:
1477: --
1478: -- Performing Entity Validation in Revised Sub Op Resource(ECO BO)
1479: --
1480: IF BOM_Rtg_Globals.Get_Bo_Identifier = BOM_Rtg_Globals.G_ECO_BO
1481: THEN
1482: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1483: ('Performing Entitity Validation for Eco Routing :ACD Type. . .') ;
1484: END IF ;

Line 1482: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

1478: -- Performing Entity Validation in Revised Sub Op Resource(ECO BO)
1479: --
1480: IF BOM_Rtg_Globals.Get_Bo_Identifier = BOM_Rtg_Globals.G_ECO_BO
1481: THEN
1482: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1483: ('Performing Entitity Validation for Eco Routing :ACD Type. . .') ;
1484: END IF ;
1485:
1486: --

Line 1491: IF l_rev_sub_resource_rec.Transaction_Type = BOM_Rtg_Globals.G_OPR_CREATE

1487: -- ACD Type
1488: -- If the Transaction Type is CREATE and the ACD_Type = Disable, then
1489: -- the sub operation resource should already exist for the revised operation.
1490: --
1491: IF l_rev_sub_resource_rec.Transaction_Type = BOM_Rtg_Globals.G_OPR_CREATE
1492: AND ( NVL(l_rev_sub_resource_rec.acd_type,l_ACD_ADD ) = l_ACD_DISABLE )
1493: THEN
1494:
1495: FOR l_disable_subres_exist_rec IN l_disable_subres_exist_csr -- add replacement_group_num to this check??

Line 1524: IF l_rev_sub_resource_rec.Transaction_Type = BOM_Rtg_Globals.G_OPR_CREATE

1520: -- operation is Add then,the ACD_Type must be Add.
1521: -- Call BOM_Validate_Op_Res.Get_Rev_Op_ACD(p_op_seq_id to get parent revised
1522: -- operation's ACD Type
1523: --
1524: IF l_rev_sub_resource_rec.Transaction_Type = BOM_Rtg_Globals.G_OPR_CREATE
1525: THEN
1526: IF
1527: l_ACD_ADD =
1528: BOM_Validate_Op_Res.Get_Rev_Op_ACD(p_op_seq_id

Line 1551: IF l_rev_sub_resource_rec.Transaction_Type = BOM_Rtg_Globals.G_OPR_UPDATE

1547:
1548: --
1549: -- For UPDATE, ACD Type not updateable
1550: --
1551: IF l_rev_sub_resource_rec.Transaction_Type = BOM_Rtg_Globals.G_OPR_UPDATE
1552: AND l_rev_sub_resource_rec.acd_type <> p_old_rev_sub_resource_rec.acd_type
1553: THEN
1554: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1555: THEN

Line 1571: IF l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE

1567: --
1568: -- Verify the ECO by WO Effectivity, If ECO by WO, Lot Num, Or Cum Qty, then
1569: -- Check if the operation resource exist in the WO or Lot Num.
1570: --
1571: IF l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
1572: THEN
1573: IF NOT Check_ECO_By_WO_Effectivity
1574: ( p_revised_item_sequence_id => l_rev_sub_res_unexp_rec.revised_item_sequence_id
1575: , p_operation_seq_num => l_rev_sub_resource_rec.operation_sequence_number

Line 1611: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN

1607: END IF ; -- ECO BO Validation
1608:
1609:
1610: -- Validation for Assigned Units
1611: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN
1612: Error_Handler.Write_Debug ('Validating the Assigned Units for a Batchable Alternate Resource . . .') ;
1613: END IF;
1614:
1615: IF l_rev_sub_resource_rec.Transaction_Type IN

Line 1616: (BOM_Rtg_Globals.G_OPR_CREATE, BOM_Rtg_Globals.G_OPR_UPDATE)

1612: Error_Handler.Write_Debug ('Validating the Assigned Units for a Batchable Alternate Resource . . .') ;
1613: END IF;
1614:
1615: IF l_rev_sub_resource_rec.Transaction_Type IN
1616: (BOM_Rtg_Globals.G_OPR_CREATE, BOM_Rtg_Globals.G_OPR_UPDATE)
1617: THEN
1618: --
1619: -- APS Enhancement for Routings.
1620: -- Verify that if a resource has setups defined, or is Batchable then

Line 1652: IF l_rev_sub_resource_rec.Transaction_Type = BOM_Rtg_Globals.G_OPR_UPDATE

1648: --
1649: -- For UPDATE
1650: -- Validation specific to the Transaction Type of Update
1651: --
1652: IF l_rev_sub_resource_rec.Transaction_Type = BOM_Rtg_Globals.G_OPR_UPDATE
1653:
1654: -- In this release, Acd type : Change is not allowed.
1655: --
1656: -- OR

Line 1657: -- (l_rev_sub_resource_rec.Transaction_Type = BOM_Rtg_Globals.G_OPR_CREATE

1653:
1654: -- In this release, Acd type : Change is not allowed.
1655: --
1656: -- OR
1657: -- (l_rev_sub_resource_rec.Transaction_Type = BOM_Rtg_Globals.G_OPR_CREATE
1658: -- AND l_rev_sub_resource_rec.acd_type = l_ACD_CHANGE
1659: -- )
1660: THEN
1661: NULL ;

Line 1665: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

1661: NULL ;
1662: END IF ; -- Transation: UPDATE
1663:
1664:
1665: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1666: ('End of Validation specific to the Transaction Type of Update' || l_return_status) ;
1667: END IF ;
1668:
1669: --

Line 1673: ( BOM_Rtg_Globals.G_OPR_CREATE, BOM_Rtg_Globals.G_OPR_UPDATE )

1669: --
1670: -- Validation for Transaction Type : Create and Update
1671: --
1672: IF l_rev_sub_resource_rec.transaction_type IN
1673: ( BOM_Rtg_Globals.G_OPR_CREATE, BOM_Rtg_Globals.G_OPR_UPDATE )
1674: THEN
1675:
1676: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1677: ('Common Validateion for Transaction Type : Create and Update . . . . ' || l_return_status) ;

Line 1676: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

1672: IF l_rev_sub_resource_rec.transaction_type IN
1673: ( BOM_Rtg_Globals.G_OPR_CREATE, BOM_Rtg_Globals.G_OPR_UPDATE )
1674: THEN
1675:
1676: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1677: ('Common Validateion for Transaction Type : Create and Update . . . . ' || l_return_status) ;
1678: END IF ;
1679:
1680: --

Line 1687: AND l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE )

1683: -- Call BOM_Validate_Op_Res.Val_Resource_Id
1684: --
1685:
1686: IF ( ( NVL(l_rev_sub_resource_rec.acd_type,l_ACD_ADD) = l_ACD_ADD
1687: AND l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE )
1688: OR l_rev_sub_res_unexp_rec.resource_id <>
1689: NVL(l_rev_sub_res_unexp_rec.new_resource_id, l_rev_sub_res_unexp_rec.resource_id )
1690: )
1691: THEN

Line 1717: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

1713: END IF ;
1714:
1715: l_return_status := FND_API.G_RET_STS_ERROR ;
1716:
1717: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1718: ('Check if Resource is enabled. . . . ' || l_return_status) ;
1719: END IF ;
1720:
1721: END IF ;

Line 1728: AND l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE )

1724: --
1725: -- Check Uniqueness of Sub Op Resource Record
1726: --
1727: IF ( ( NVL(l_rev_sub_resource_rec.acd_type,l_ACD_ADD) = l_ACD_ADD
1728: AND l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE )
1729: OR l_rev_sub_res_unexp_rec.resource_id <>
1730: NVL(l_rev_sub_res_unexp_rec.new_resource_id, l_rev_sub_res_unexp_rec.resource_id )
1731: OR l_rev_sub_resource_rec.replacement_Group_number <> -- bug 3741570
1732: NVL(l_rev_sub_resource_rec.new_replacement_Group_number, l_rev_sub_resource_rec.replacement_Group_number)

Line 1739: IF BOM_Rtg_Globals.Get_Bo_Identifier = BOM_Rtg_Globals.G_RTG_BO

1735: OR l_rev_sub_resource_rec.schedule_flag <>
1736: NVL(l_rev_sub_resource_rec.new_schedule_flag, l_rev_sub_resource_rec.schedule_flag) /* Added for bug 13005178 */
1737: )
1738: THEN
1739: IF BOM_Rtg_Globals.Get_Bo_Identifier = BOM_Rtg_Globals.G_RTG_BO
1740: AND l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_UPDATE
1741: THEN
1742:
1743: FOR l_duplicate_rec IN l_duplicate_csr

Line 1740: AND l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_UPDATE

1736: NVL(l_rev_sub_resource_rec.new_schedule_flag, l_rev_sub_resource_rec.schedule_flag) /* Added for bug 13005178 */
1737: )
1738: THEN
1739: IF BOM_Rtg_Globals.Get_Bo_Identifier = BOM_Rtg_Globals.G_RTG_BO
1740: AND l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_UPDATE
1741: THEN
1742:
1743: FOR l_duplicate_rec IN l_duplicate_csr
1744: ( p_resource_id => NVL(l_rev_sub_res_unexp_rec.new_resource_id,

Line 1782: ELSIF BOM_Rtg_Globals.Get_Bo_Identifier = BOM_Rtg_Globals.G_ECO_BO

1778: l_Token_Tbl(1).token_value :=
1779: p_rev_sub_resource_rec.sub_resource_code ;
1780: l_token_tbl.delete(3) ;
1781: END LOOP ;
1782: ELSIF BOM_Rtg_Globals.Get_Bo_Identifier = BOM_Rtg_Globals.G_ECO_BO
1783: THEN
1784: l_old_op_seq_id := Get_Old_Op_Seq_Id
1785: (p_op_seq_id =>
1786: l_rev_sub_res_unexp_rec.operation_sequence_id ) ;

Line 1844: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

1840: END IF;
1841:
1842: END IF ;
1843:
1844: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1845: ('Check uniquness of Sub Op Resource Record. . . . ' || l_return_status) ;
1846: END IF ;
1847:
1848: END IF ;

Line 1856: AND l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE )

1852: -- Check if Activity is enabled
1853: -- BOM_Validate_Op_Res.Val_Activity_Id
1854: --
1855: IF ( ( NVL(l_rev_sub_resource_rec.acd_type,l_ACD_ADD) = l_ACD_ADD
1856: AND l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE )
1857: OR NVL(l_rev_sub_res_unexp_rec.activity_id, FND_API.G_MISS_NUM)
1858: <> NVL(p_old_rev_sub_res_unexp_rec.activity_id, FND_API.G_MISS_NUM)
1859: )
1860: AND ( l_rev_sub_res_unexp_rec.activity_id IS NOT NULL AND

Line 1864: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

1860: AND ( l_rev_sub_res_unexp_rec.activity_id IS NOT NULL AND
1861: l_rev_sub_res_unexp_rec.activity_id <> FND_API.G_MISS_NUM )
1862: THEN
1863:
1864: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1865: ('Activity_Id : ' || to_char(l_rev_sub_res_unexp_rec.activity_id)) ;
1866: END IF ;
1867:
1868:

Line 1893: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

1889: l_return_status := FND_API.G_RET_STS_ERROR ;
1890:
1891: END IF ;
1892:
1893: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1894: ('Check if Activity is enabled. . . . ' || l_return_status) ;
1895: END IF ;
1896:
1897: END IF ;

Line 1906: AND l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE )

1902: -- Check if Activity is enabled
1903: -- BOM_Validate_Op_Res.Val_Activity_Id
1904: --
1905: IF ( ( NVL(l_rev_sub_resource_rec.acd_type,l_ACD_ADD) = l_ACD_ADD
1906: AND l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE )
1907: OR NVL(l_rev_sub_res_unexp_rec.setup_Id , FND_API.G_MISS_NUM)
1908: <> NVL(p_old_rev_sub_res_unexp_rec.setup_id, FND_API.G_MISS_NUM)
1909: )
1910: AND ( l_rev_sub_res_unexp_rec.setup_id IS NOT NULL AND

Line 1914: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

1910: AND ( l_rev_sub_res_unexp_rec.setup_id IS NOT NULL AND
1911: l_rev_sub_res_unexp_rec.setup_Id <> FND_API.G_MISS_NUM )
1912: THEN
1913:
1914: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1915: ('Setup_Id : ' || to_char(l_rev_sub_res_unexp_rec.setup_id )) ;
1916: END IF ;
1917:
1918:

Line 1952: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

1948: l_return_status := FND_API.G_RET_STS_ERROR ;
1949:
1950: END IF ;
1951:
1952: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1953: ('Check if Setup is enabled. . . . ' || l_return_status) ;
1954: END IF ;
1955:
1956: END IF ;

Line 2014: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

2010: l_return_status := FND_API.G_RET_STS_ERROR ;
2011:
2012: END IF ;
2013:
2014: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2015: ('Check if schedule flag is valid. . . . ' || l_return_status) ;
2016: END IF ;
2017:
2018: END IF ;

Line 2030: AND l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE )

2026: -- and cannot have more than one next or prior sheduled sub resource
2027: -- whitin substitute group num.
2028: --
2029: IF ( ( NVL(l_rev_sub_resource_rec.acd_type,l_ACD_ADD) = l_ACD_ADD
2030: AND l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE )
2031: OR l_rev_sub_resource_rec.schedule_flag
2032: <> p_old_rev_sub_resource_rec.schedule_flag
2033: )
2034: THEN

Line 2096: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

2092: l_return_status := FND_API.G_RET_STS_ERROR ;
2093:
2094: END IF ;
2095:
2096: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2097: ('Check next or prior scheduled resource. . . . ' || l_return_status) ;
2098: END IF ;
2099:
2100: END IF ;

Line 2111: AND l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE )

2107: -- department has no location.
2108: -- Call BOM_Validate_Op_Res.Val_Dept_Has_Location
2109: --
2110: IF ( ( NVL(l_rev_sub_resource_rec.acd_type,l_ACD_ADD) = l_ACD_ADD
2111: AND l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE )
2112: OR l_rev_sub_resource_rec.autocharge_type <> p_old_rev_sub_resource_rec.autocharge_type
2113: )
2114: AND l_rev_sub_resource_rec.autocharge_type = l_PO_RECEIPT
2115: THEN

Line 2139: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

2135: l_return_status := FND_API.G_RET_STS_ERROR ;
2136:
2137: END IF ;
2138:
2139: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2140: ('Check if Dept has a location for PO Receipt Res. . . . ' || l_return_status) ;
2141: END IF ;
2142:
2143: END IF ;

Line 2153: AND l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE )

2149: -- is non-OSP resource
2150: -- Call BOM_Validate_Op_Res.Val_Autocharge_for_OSP_Res
2151: --
2152: IF ( ( NVL(l_rev_sub_resource_rec.acd_type,l_ACD_ADD) = l_ACD_ADD
2153: AND l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE )
2154: OR l_rev_sub_resource_rec.autocharge_type <> p_old_rev_sub_resource_rec.autocharge_type
2155: )
2156: AND l_rev_sub_resource_rec.autocharge_type IN (l_PO_RECEIPT, l_PO_MOVE )
2157: THEN

Line 2184: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

2180: l_return_status := FND_API.G_RET_STS_ERROR ;
2181:
2182: END IF ;
2183:
2184: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2185: ('Check if resource is OSP resource when autocharge is PO Move or PO Receipt. . . . ' || l_return_status) ;
2186: END IF ;
2187:
2188: END IF ;

Line 2197: AND l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE )

2193: -- Hence, there must be related PO Move resource in operation resource
2194: -- and cannot have more than one PO Move whitin substitute group num.
2195: --
2196: IF ( ( NVL(l_rev_sub_resource_rec.acd_type,l_ACD_ADD) = l_ACD_ADD
2197: AND l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE )
2198: OR l_rev_sub_resource_rec.autocharge_type <> p_old_rev_sub_resource_rec.autocharge_type
2199: )
2200: AND l_rev_sub_resource_rec.autocharge_type = l_PO_MOVE
2201: THEN

Line 2229: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

2225:
2226: l_return_status := FND_API.G_RET_STS_ERROR ;
2227: END IF ;
2228:
2229: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2230: ('Check if Autocharge Type is enabled. . . . ' || l_return_status) ;
2231: END IF ;
2232:
2233:

Line 2243: AND l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE )

2239: -- Check round values for Usage Rate or Amount and the Inverse.
2240: -- Call BOM_Validate_Op_Res.Val_Usage_Rate_or_Amount
2241: --
2242: IF ( ( NVL(l_rev_sub_resource_rec.acd_type,l_ACD_ADD) = l_ACD_ADD
2243: AND l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE )
2244: OR l_rev_sub_resource_rec.usage_rate_or_amount
2245: <> p_old_rev_sub_resource_rec.usage_rate_or_amount
2246: OR l_rev_sub_resource_rec.usage_rate_or_amount_inverse
2247: <> p_old_rev_sub_resource_rec.usage_rate_or_amount_inverse

Line 2275: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

2271: l_return_status := FND_API.G_RET_STS_ERROR ;
2272:
2273: END IF ;
2274:
2275: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2276: ('Check round value for Usage Rate or Amount and the Inverse . . . ' || l_return_status) ;
2277: END IF ;
2278:
2279: END IF ;

Line 2292: AND l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE )

2288: -- Form allows No.3
2289: --
2290:
2291: IF ( ( NVL(l_rev_sub_resource_rec.acd_type,l_ACD_ADD) = l_ACD_ADD
2292: AND l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE )
2293: OR l_rev_sub_resource_rec.usage_rate_or_amount
2294: <> p_old_rev_sub_resource_rec.usage_rate_or_amount
2295: OR l_rev_sub_resource_rec.usage_rate_or_amount_inverse
2296: <> p_old_rev_sub_resource_rec.usage_rate_or_amount_inverse

Line 2344: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

2340: l_return_status := FND_API.G_RET_STS_ERROR ;
2341:
2342: END IF ;
2343:
2344: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2345: ('Check negative usage rate. . . . ' || l_return_status) ;
2346: END IF ;
2347:
2348: END IF ;

Line 2357: AND l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE )

2353: --
2354: /* Added by deepu. Validation for Principal flag is required for patchset I Bug 2689249*/
2355:
2356: IF ( ( NVL(l_rev_sub_resource_rec.acd_type,l_ACD_ADD) = l_ACD_ADD
2357: AND l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE )
2358: OR l_rev_sub_resource_rec.principle_flag
2359: <> p_old_rev_sub_resource_rec.principle_flag
2360: OR l_rev_sub_resource_rec.replacement_group_number
2361: <> p_old_rev_sub_resource_rec.replacement_group_number

Line 2398: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

2394: l_return_status := FND_API.G_RET_STS_ERROR ;
2395:
2396: END IF ;
2397:
2398: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2399: ('Check principal flag . . . . ' || l_return_status) ;
2400: END IF ;
2401:
2402: END IF ;

Line 2412: AND l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE )

2408:
2409: IF ( l_rev_sub_resource_rec.schedule_flag <> l_NO_SCHEDULE)
2410: AND
2411: ( ( NVL(l_rev_sub_resource_rec.acd_type,l_ACD_ADD) = l_ACD_ADD
2412: AND l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE )
2413: OR l_rev_sub_resource_rec.schedule_sequence_number <> p_old_rev_sub_resource_rec.schedule_sequence_number
2414: OR l_rev_sub_resource_rec.schedule_flag <> p_old_rev_sub_resource_rec.schedule_flag
2415: )
2416: THEN

Line 2469: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

2465:
2466: END IF ; -- Transaction Type : Create and Update
2467:
2468:
2469: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2470: ('Entity Validation was processed. . . ' || l_return_status);
2471: END IF ;
2472:
2473:

Line 2490: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

2486:
2487:
2488: EXCEPTION
2489: WHEN OTHERS THEN
2490: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2491: ('Some unknown error in Entity Validation . . .' || SQLERRM );
2492: END IF ;
2493:
2494: