257: /* No Longer used
258: -- Check if the operation resource's attribute is updated when ACD Type is changed
259: -- If updated, return False.
260: FUNCTION Check_Res_Attr_changed
261: ( p_rev_op_resource_rec IN Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
262: , p_rev_op_res_unexp_rec IN Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
263: , p_old_rev_op_resource_rec IN Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
264: , p_old_rev_op_res_unexp_rec IN Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
265: ) RETURN BOOLEAN
258: -- Check if the operation resource's attribute is updated when ACD Type is changed
259: -- If updated, return False.
260: FUNCTION Check_Res_Attr_changed
261: ( p_rev_op_resource_rec IN Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
262: , p_rev_op_res_unexp_rec IN Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
263: , p_old_rev_op_resource_rec IN Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
264: , p_old_rev_op_res_unexp_rec IN Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
265: ) RETURN BOOLEAN
266:
259: -- If updated, return False.
260: FUNCTION Check_Res_Attr_changed
261: ( p_rev_op_resource_rec IN Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
262: , p_rev_op_res_unexp_rec IN Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
263: , p_old_rev_op_resource_rec IN Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
264: , p_old_rev_op_res_unexp_rec IN Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
265: ) RETURN BOOLEAN
266:
267: IS
260: FUNCTION Check_Res_Attr_changed
261: ( p_rev_op_resource_rec IN Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
262: , p_rev_op_res_unexp_rec IN Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
263: , p_old_rev_op_resource_rec IN Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
264: , p_old_rev_op_res_unexp_rec IN Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
265: ) RETURN BOOLEAN
266:
267: IS
268:
1296: * After calling Check_Existence, convert old Revised
1297: * Op Resource record back to Routing Op Resource
1298: *********************************************************************/
1299: PROCEDURE Check_Existence
1300: ( p_op_resource_rec IN Bom_Rtg_Pub.Op_Resource_Rec_Type
1301: , p_op_res_unexp_rec IN Bom_Rtg_Pub.Op_Res_Unexposed_Rec_Type
1302: , x_old_op_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Op_Resource_Rec_Type
1303: , x_old_op_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Op_Res_Unexposed_Rec_Type
1304: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1297: * Op Resource record back to Routing Op Resource
1298: *********************************************************************/
1299: PROCEDURE Check_Existence
1300: ( p_op_resource_rec IN Bom_Rtg_Pub.Op_Resource_Rec_Type
1301: , p_op_res_unexp_rec IN Bom_Rtg_Pub.Op_Res_Unexposed_Rec_Type
1302: , x_old_op_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Op_Resource_Rec_Type
1303: , x_old_op_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Op_Res_Unexposed_Rec_Type
1304: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1305: , x_return_status IN OUT NOCOPY VARCHAR2
1298: *********************************************************************/
1299: PROCEDURE Check_Existence
1300: ( p_op_resource_rec IN Bom_Rtg_Pub.Op_Resource_Rec_Type
1301: , p_op_res_unexp_rec IN Bom_Rtg_Pub.Op_Res_Unexposed_Rec_Type
1302: , x_old_op_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Op_Resource_Rec_Type
1303: , x_old_op_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Op_Res_Unexposed_Rec_Type
1304: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1305: , x_return_status IN OUT NOCOPY VARCHAR2
1306: )
1299: PROCEDURE Check_Existence
1300: ( p_op_resource_rec IN Bom_Rtg_Pub.Op_Resource_Rec_Type
1301: , p_op_res_unexp_rec IN Bom_Rtg_Pub.Op_Res_Unexposed_Rec_Type
1302: , x_old_op_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Op_Resource_Rec_Type
1303: , x_old_op_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Op_Res_Unexposed_Rec_Type
1304: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1305: , x_return_status IN OUT NOCOPY VARCHAR2
1306: )
1307:
1305: , x_return_status IN OUT NOCOPY VARCHAR2
1306: )
1307:
1308: IS
1309: l_rev_op_resource_rec Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type ;
1310: l_rev_op_res_unexp_rec Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type ;
1311: l_old_rev_op_resource_rec Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type ;
1312: l_old_rev_op_res_unexp_rec Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type ;
1313:
1306: )
1307:
1308: IS
1309: l_rev_op_resource_rec Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type ;
1310: l_rev_op_res_unexp_rec Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type ;
1311: l_old_rev_op_resource_rec Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type ;
1312: l_old_rev_op_res_unexp_rec Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type ;
1313:
1314: BEGIN
1307:
1308: IS
1309: l_rev_op_resource_rec Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type ;
1310: l_rev_op_res_unexp_rec Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type ;
1311: l_old_rev_op_resource_rec Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type ;
1312: l_old_rev_op_res_unexp_rec Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type ;
1313:
1314: BEGIN
1315: -- Convert Routing Operation to ECO Operation
1308: IS
1309: l_rev_op_resource_rec Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type ;
1310: l_rev_op_res_unexp_rec Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type ;
1311: l_old_rev_op_resource_rec Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type ;
1312: l_old_rev_op_res_unexp_rec Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type ;
1313:
1314: BEGIN
1315: -- Convert Routing Operation to ECO Operation
1316: Bom_Rtg_Pub.Convert_RtgRes_To_EcoRes
1312: l_old_rev_op_res_unexp_rec Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type ;
1313:
1314: BEGIN
1315: -- Convert Routing Operation to ECO Operation
1316: Bom_Rtg_Pub.Convert_RtgRes_To_EcoRes
1317: ( p_rtg_op_resource_rec => p_op_resource_rec
1318: , p_rtg_op_res_unexp_rec => p_op_res_unexp_rec
1319: , x_rev_op_resource_rec => l_rev_op_resource_rec
1320: , x_rev_op_res_unexp_rec => l_rev_op_res_unexp_rec
1330: , x_mesg_token_tbl => x_mesg_token_tbl
1331: ) ;
1332:
1333: -- Convert old Eco Opeartion Record back to Routing Operation
1334: Bom_Rtg_Pub.Convert_EcoRes_To_RtgRes
1335: ( p_rev_op_resource_rec => l_old_rev_op_resource_rec
1336: , p_rev_op_res_unexp_rec => l_old_rev_op_res_unexp_rec
1337: , x_rtg_op_resource_rec => x_old_op_resource_rec
1338: , x_rtg_op_res_unexp_rec => x_old_op_res_unexp_rec
1361: * with a success status.
1362: *********************************************************************/
1363:
1364: PROCEDURE Check_Existence
1365: ( p_rev_op_resource_rec IN Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
1366: , p_rev_op_res_unexp_rec IN Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
1367: , x_old_rev_op_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
1368: , x_old_rev_op_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
1369: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1362: *********************************************************************/
1363:
1364: PROCEDURE Check_Existence
1365: ( p_rev_op_resource_rec IN Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
1366: , p_rev_op_res_unexp_rec IN Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
1367: , x_old_rev_op_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
1368: , x_old_rev_op_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
1369: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1370: , x_return_status IN OUT NOCOPY VARCHAR2
1363:
1364: PROCEDURE Check_Existence
1365: ( p_rev_op_resource_rec IN Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
1366: , p_rev_op_res_unexp_rec IN Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
1367: , x_old_rev_op_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
1368: , x_old_rev_op_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
1369: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1370: , x_return_status IN OUT NOCOPY VARCHAR2
1371: )
1364: PROCEDURE Check_Existence
1365: ( p_rev_op_resource_rec IN Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
1366: , p_rev_op_res_unexp_rec IN Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
1367: , x_old_rev_op_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
1368: , x_old_rev_op_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
1369: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1370: , x_return_status IN OUT NOCOPY VARCHAR2
1371: )
1372: IS
1566: * of the operation resource record in their own entirety.
1567: * No cross entity validations will be performed.
1568: ********************************************************************/
1569: PROCEDURE Check_Attributes
1570: ( p_op_resource_rec IN Bom_Rtg_Pub.Op_Resource_Rec_Type
1571: , p_op_res_unexp_rec IN Bom_Rtg_Pub.Op_Res_Unexposed_Rec_Type
1572: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1573: , x_return_status IN OUT NOCOPY VARCHAR2
1574: )
1567: * No cross entity validations will be performed.
1568: ********************************************************************/
1569: PROCEDURE Check_Attributes
1570: ( p_op_resource_rec IN Bom_Rtg_Pub.Op_Resource_Rec_Type
1571: , p_op_res_unexp_rec IN Bom_Rtg_Pub.Op_Res_Unexposed_Rec_Type
1572: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1573: , x_return_status IN OUT NOCOPY VARCHAR2
1574: )
1575: IS
1573: , x_return_status IN OUT NOCOPY VARCHAR2
1574: )
1575: IS
1576:
1577: l_rev_op_resource_rec Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type ;
1578: l_rev_op_res_unexp_rec Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type ;
1579:
1580: BEGIN
1581:
1574: )
1575: IS
1576:
1577: l_rev_op_resource_rec Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type ;
1578: l_rev_op_res_unexp_rec Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type ;
1579:
1580: BEGIN
1581:
1582: -- Convert Routing Operation to ECO Operation
1579:
1580: BEGIN
1581:
1582: -- Convert Routing Operation to ECO Operation
1583: Bom_Rtg_Pub.Convert_RtgRes_To_EcoRes
1584: ( p_rtg_op_resource_rec => p_op_resource_rec
1585: , p_rtg_op_res_unexp_rec => p_op_res_unexp_rec
1586: , x_rev_op_resource_rec => l_rev_op_resource_rec
1587: , x_rev_op_res_unexp_rec => l_rev_op_res_unexp_rec
1614: * before the procedure returns with a Return_Status
1615: * of 'E'.
1616: *********************************************************************/
1617: PROCEDURE Check_Attributes
1618: ( p_rev_op_resource_rec IN Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
1619: , p_rev_op_res_unexp_rec IN Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
1620: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1621: , x_return_status IN OUT NOCOPY VARCHAR2
1622: )
1615: * of 'E'.
1616: *********************************************************************/
1617: PROCEDURE Check_Attributes
1618: ( p_rev_op_resource_rec IN Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
1619: , p_rev_op_res_unexp_rec IN Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
1620: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1621: , x_return_status IN OUT NOCOPY VARCHAR2
1622: )
1623: IS
1962: * Procedure will execute the business logic and will
1963: * also perform any required cross entity validations
1964: *******************************************************************/
1965: PROCEDURE Check_Entity
1966: ( p_op_resource_rec IN Bom_Rtg_Pub.Op_Resource_Rec_Type
1967: , p_op_res_unexp_rec IN Bom_Rtg_Pub.Op_Res_Unexposed_Rec_Type
1968: , p_old_op_resource_rec IN Bom_Rtg_Pub.Op_Resource_Rec_Type
1969: , p_old_op_res_unexp_rec IN Bom_Rtg_Pub.Op_Res_Unexposed_Rec_Type
1970: , x_op_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Op_Resource_Rec_Type
1963: * also perform any required cross entity validations
1964: *******************************************************************/
1965: PROCEDURE Check_Entity
1966: ( p_op_resource_rec IN Bom_Rtg_Pub.Op_Resource_Rec_Type
1967: , p_op_res_unexp_rec IN Bom_Rtg_Pub.Op_Res_Unexposed_Rec_Type
1968: , p_old_op_resource_rec IN Bom_Rtg_Pub.Op_Resource_Rec_Type
1969: , p_old_op_res_unexp_rec IN Bom_Rtg_Pub.Op_Res_Unexposed_Rec_Type
1970: , x_op_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Op_Resource_Rec_Type
1971: , x_op_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Op_Res_Unexposed_Rec_Type
1964: *******************************************************************/
1965: PROCEDURE Check_Entity
1966: ( p_op_resource_rec IN Bom_Rtg_Pub.Op_Resource_Rec_Type
1967: , p_op_res_unexp_rec IN Bom_Rtg_Pub.Op_Res_Unexposed_Rec_Type
1968: , p_old_op_resource_rec IN Bom_Rtg_Pub.Op_Resource_Rec_Type
1969: , p_old_op_res_unexp_rec IN Bom_Rtg_Pub.Op_Res_Unexposed_Rec_Type
1970: , x_op_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Op_Resource_Rec_Type
1971: , x_op_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Op_Res_Unexposed_Rec_Type
1972: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1965: PROCEDURE Check_Entity
1966: ( p_op_resource_rec IN Bom_Rtg_Pub.Op_Resource_Rec_Type
1967: , p_op_res_unexp_rec IN Bom_Rtg_Pub.Op_Res_Unexposed_Rec_Type
1968: , p_old_op_resource_rec IN Bom_Rtg_Pub.Op_Resource_Rec_Type
1969: , p_old_op_res_unexp_rec IN Bom_Rtg_Pub.Op_Res_Unexposed_Rec_Type
1970: , x_op_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Op_Resource_Rec_Type
1971: , x_op_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Op_Res_Unexposed_Rec_Type
1972: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1973: , x_return_status IN OUT NOCOPY VARCHAR2
1966: ( p_op_resource_rec IN Bom_Rtg_Pub.Op_Resource_Rec_Type
1967: , p_op_res_unexp_rec IN Bom_Rtg_Pub.Op_Res_Unexposed_Rec_Type
1968: , p_old_op_resource_rec IN Bom_Rtg_Pub.Op_Resource_Rec_Type
1969: , p_old_op_res_unexp_rec IN Bom_Rtg_Pub.Op_Res_Unexposed_Rec_Type
1970: , x_op_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Op_Resource_Rec_Type
1971: , x_op_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Op_Res_Unexposed_Rec_Type
1972: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1973: , x_return_status IN OUT NOCOPY VARCHAR2
1974: )
1967: , p_op_res_unexp_rec IN Bom_Rtg_Pub.Op_Res_Unexposed_Rec_Type
1968: , p_old_op_resource_rec IN Bom_Rtg_Pub.Op_Resource_Rec_Type
1969: , p_old_op_res_unexp_rec IN Bom_Rtg_Pub.Op_Res_Unexposed_Rec_Type
1970: , x_op_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Op_Resource_Rec_Type
1971: , x_op_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Op_Res_Unexposed_Rec_Type
1972: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1973: , x_return_status IN OUT NOCOPY VARCHAR2
1974: )
1975: IS
1972: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1973: , x_return_status IN OUT NOCOPY VARCHAR2
1974: )
1975: IS
1976: l_rev_op_resource_rec Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type ;
1977: l_rev_op_res_unexp_rec Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type ;
1978: l_old_rev_op_resource_rec Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type ;
1979: l_old_rev_op_res_unexp_rec Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type ;
1980:
1973: , x_return_status IN OUT NOCOPY VARCHAR2
1974: )
1975: IS
1976: l_rev_op_resource_rec Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type ;
1977: l_rev_op_res_unexp_rec Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type ;
1978: l_old_rev_op_resource_rec Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type ;
1979: l_old_rev_op_res_unexp_rec Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type ;
1980:
1981: BEGIN
1974: )
1975: IS
1976: l_rev_op_resource_rec Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type ;
1977: l_rev_op_res_unexp_rec Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type ;
1978: l_old_rev_op_resource_rec Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type ;
1979: l_old_rev_op_res_unexp_rec Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type ;
1980:
1981: BEGIN
1982: -- Convert Routing Operation to ECO Operation
1975: IS
1976: l_rev_op_resource_rec Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type ;
1977: l_rev_op_res_unexp_rec Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type ;
1978: l_old_rev_op_resource_rec Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type ;
1979: l_old_rev_op_res_unexp_rec Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type ;
1980:
1981: BEGIN
1982: -- Convert Routing Operation to ECO Operation
1983: Bom_Rtg_Pub.Convert_RtgRes_To_EcoRes
1979: l_old_rev_op_res_unexp_rec Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type ;
1980:
1981: BEGIN
1982: -- Convert Routing Operation to ECO Operation
1983: Bom_Rtg_Pub.Convert_RtgRes_To_EcoRes
1984: ( p_rtg_op_resource_rec => p_op_resource_rec
1985: , p_rtg_op_res_unexp_rec => p_op_res_unexp_rec
1986: , x_rev_op_resource_rec => l_rev_op_resource_rec
1987: , x_rev_op_res_unexp_rec => l_rev_op_res_unexp_rec
1988: ) ;
1989:
1990:
1991: -- Also Convert Old Routing Operation to Old ECO Operation
1992: Bom_Rtg_Pub.Convert_RtgRes_To_EcoRes
1993: ( p_rtg_op_resource_rec => p_old_op_resource_rec
1994: , p_rtg_op_res_unexp_rec => p_old_op_res_unexp_rec
1995: , x_rev_op_resource_rec => l_old_rev_op_resource_rec
1996: , x_rev_op_res_unexp_rec => l_old_rev_op_res_unexp_rec
2001: ( p_rev_op_resource_rec => l_rev_op_resource_rec
2002: , p_rev_op_res_unexp_rec => l_rev_op_res_unexp_rec
2003: , p_old_rev_op_resource_rec => l_old_rev_op_resource_rec
2004: , p_old_rev_op_res_unexp_rec => l_old_rev_op_res_unexp_rec
2005: , p_control_rec => Bom_Rtg_Pub.G_DEFAULT_CONTROL_REC
2006: , x_rev_op_resource_rec => l_rev_op_resource_rec
2007: , x_rev_op_res_unexp_rec => l_rev_op_res_unexp_rec
2008: , x_return_status => x_return_status
2009: , x_mesg_token_tbl => x_mesg_token_tbl
2010: ) ;
2011:
2012:
2013: -- Convert Eco Op Resource Record back to Routing Op Resource
2014: Bom_Rtg_Pub.Convert_EcoRes_To_RtgRes
2015: ( p_rev_op_resource_rec => l_rev_op_resource_rec
2016: , p_rev_op_res_unexp_rec => l_rev_op_res_unexp_rec
2017: , x_rtg_op_resource_rec => x_op_resource_rec
2018: , x_rtg_op_res_unexp_rec => x_op_res_unexp_rec
2036: * It will also verify that changes in one column value
2037: * does not invalidate some other columns.
2038: *******************************************************************/
2039: PROCEDURE Check_Entity
2040: ( p_rev_op_resource_rec IN Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
2041: , p_rev_op_res_unexp_rec IN Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
2042: , p_old_rev_op_resource_rec IN Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
2043: , p_old_rev_op_res_unexp_rec IN Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
2044: , p_control_rec IN Bom_Rtg_Pub.Control_Rec_Type
2037: * does not invalidate some other columns.
2038: *******************************************************************/
2039: PROCEDURE Check_Entity
2040: ( p_rev_op_resource_rec IN Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
2041: , p_rev_op_res_unexp_rec IN Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
2042: , p_old_rev_op_resource_rec IN Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
2043: , p_old_rev_op_res_unexp_rec IN Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
2044: , p_control_rec IN Bom_Rtg_Pub.Control_Rec_Type
2045: , x_rev_op_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
2038: *******************************************************************/
2039: PROCEDURE Check_Entity
2040: ( p_rev_op_resource_rec IN Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
2041: , p_rev_op_res_unexp_rec IN Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
2042: , p_old_rev_op_resource_rec IN Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
2043: , p_old_rev_op_res_unexp_rec IN Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
2044: , p_control_rec IN Bom_Rtg_Pub.Control_Rec_Type
2045: , x_rev_op_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
2046: , x_rev_op_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
2039: PROCEDURE Check_Entity
2040: ( p_rev_op_resource_rec IN Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
2041: , p_rev_op_res_unexp_rec IN Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
2042: , p_old_rev_op_resource_rec IN Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
2043: , p_old_rev_op_res_unexp_rec IN Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
2044: , p_control_rec IN Bom_Rtg_Pub.Control_Rec_Type
2045: , x_rev_op_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
2046: , x_rev_op_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
2047: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
2040: ( p_rev_op_resource_rec IN Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
2041: , p_rev_op_res_unexp_rec IN Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
2042: , p_old_rev_op_resource_rec IN Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
2043: , p_old_rev_op_res_unexp_rec IN Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
2044: , p_control_rec IN Bom_Rtg_Pub.Control_Rec_Type
2045: , x_rev_op_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
2046: , x_rev_op_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
2047: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
2048: , x_return_status IN OUT NOCOPY VARCHAR2
2041: , p_rev_op_res_unexp_rec IN Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
2042: , p_old_rev_op_resource_rec IN Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
2043: , p_old_rev_op_res_unexp_rec IN Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
2044: , p_control_rec IN Bom_Rtg_Pub.Control_Rec_Type
2045: , x_rev_op_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
2046: , x_rev_op_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
2047: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
2048: , x_return_status IN OUT NOCOPY VARCHAR2
2049: )
2042: , p_old_rev_op_resource_rec IN Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
2043: , p_old_rev_op_res_unexp_rec IN Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
2044: , p_control_rec IN Bom_Rtg_Pub.Control_Rec_Type
2045: , x_rev_op_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
2046: , x_rev_op_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
2047: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
2048: , x_return_status IN OUT NOCOPY VARCHAR2
2049: )
2050: IS
2057: l_res_uom_class VARCHAR2(10) ; -- Resource UOM Class
2058: l_temp_status VARCHAR2(1) ; -- Temp Error Status
2059: l_res_code BOM_RESOURCES_V.RESOURCE_CODE%TYPE;
2060:
2061: l_rev_op_resource_rec Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type ;
2062: l_rev_op_res_unexp_rec Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type ;
2063:
2064: -- Error Handlig Variables
2065: l_return_status VARCHAR2(1);
2058: l_temp_status VARCHAR2(1) ; -- Temp Error Status
2059: l_res_code BOM_RESOURCES_V.RESOURCE_CODE%TYPE;
2060:
2061: l_rev_op_resource_rec Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type ;
2062: l_rev_op_res_unexp_rec Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type ;
2063:
2064: -- Error Handlig Variables
2065: l_return_status VARCHAR2(1);
2066: l_err_text VARCHAR2(2000) ;