541: * After calling Check_Existence, convert old Revised
542: * Op Resource record back to Routing Op Resource
543: *********************************************************************/
544: PROCEDURE Check_Existence
545: ( p_sub_resource_rec IN Bom_Rtg_Pub.Sub_Resource_Rec_Type
546: , p_sub_res_unexp_rec IN Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
547: , x_old_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Resource_Rec_Type
548: , x_old_sub_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
549: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
542: * Op Resource record back to Routing Op Resource
543: *********************************************************************/
544: PROCEDURE Check_Existence
545: ( p_sub_resource_rec IN Bom_Rtg_Pub.Sub_Resource_Rec_Type
546: , p_sub_res_unexp_rec IN Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
547: , x_old_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Resource_Rec_Type
548: , x_old_sub_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
549: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
550: , x_return_status IN OUT NOCOPY VARCHAR2
543: *********************************************************************/
544: PROCEDURE Check_Existence
545: ( p_sub_resource_rec IN Bom_Rtg_Pub.Sub_Resource_Rec_Type
546: , p_sub_res_unexp_rec IN Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
547: , x_old_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Resource_Rec_Type
548: , x_old_sub_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
549: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
550: , x_return_status IN OUT NOCOPY VARCHAR2
551: )
544: PROCEDURE Check_Existence
545: ( p_sub_resource_rec IN Bom_Rtg_Pub.Sub_Resource_Rec_Type
546: , p_sub_res_unexp_rec IN Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
547: , x_old_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Resource_Rec_Type
548: , x_old_sub_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
549: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
550: , x_return_status IN OUT NOCOPY VARCHAR2
551: )
552:
550: , x_return_status IN OUT NOCOPY VARCHAR2
551: )
552:
553: IS
554: l_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type ;
555: l_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
556: l_old_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type ;
557: l_old_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
558:
551: )
552:
553: IS
554: l_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type ;
555: l_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
556: l_old_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type ;
557: l_old_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
558:
559: BEGIN
552:
553: IS
554: l_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type ;
555: l_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
556: l_old_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type ;
557: l_old_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
558:
559: BEGIN
560: -- Convert Routing Operation to ECO Operation
553: IS
554: l_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type ;
555: l_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
556: l_old_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type ;
557: l_old_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
558:
559: BEGIN
560: -- Convert Routing Operation to ECO Operation
561: Bom_Rtg_Pub.Convert_RtgSubRes_To_EcoSubRes
557: l_old_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
558:
559: BEGIN
560: -- Convert Routing Operation to ECO Operation
561: Bom_Rtg_Pub.Convert_RtgSubRes_To_EcoSubRes
562: ( p_rtg_sub_resource_rec => p_sub_resource_rec
563: , p_rtg_sub_res_unexp_rec => p_sub_res_unexp_rec
564: , x_rev_sub_resource_rec => l_rev_sub_resource_rec
565: , x_rev_sub_res_unexp_rec => l_rev_sub_res_unexp_rec
575: , x_mesg_token_tbl => x_mesg_token_tbl
576: ) ;
577:
578: -- Convert old Eco Opeartion Record back to Routing Operation
579: Bom_Rtg_Pub.Convert_EcoSubRes_To_RtgSubRes
580: ( p_rev_sub_resource_rec => l_old_rev_sub_resource_rec
581: , p_rev_sub_res_unexp_rec => l_old_rev_sub_res_unexp_rec
582: , x_rtg_sub_resource_rec => x_old_sub_resource_rec
583: , x_rtg_sub_res_unexp_rec => x_old_sub_res_unexp_rec
606: * with a success status.
607: *********************************************************************/
608:
609: PROCEDURE Check_Existence
610: ( p_rev_sub_resource_rec IN Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
611: , p_rev_sub_res_unexp_rec IN Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
612: , x_old_rev_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
613: , x_old_rev_sub_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
614: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
607: *********************************************************************/
608:
609: PROCEDURE Check_Existence
610: ( p_rev_sub_resource_rec IN Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
611: , p_rev_sub_res_unexp_rec IN Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
612: , x_old_rev_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
613: , x_old_rev_sub_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
614: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
615: , x_return_status IN OUT NOCOPY VARCHAR2
608:
609: PROCEDURE Check_Existence
610: ( p_rev_sub_resource_rec IN Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
611: , p_rev_sub_res_unexp_rec IN Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
612: , x_old_rev_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
613: , x_old_rev_sub_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
614: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
615: , x_return_status IN OUT NOCOPY VARCHAR2
616: )
609: PROCEDURE Check_Existence
610: ( p_rev_sub_resource_rec IN Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
611: , p_rev_sub_res_unexp_rec IN Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
612: , x_old_rev_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
613: , x_old_rev_sub_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
614: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
615: , x_return_status IN OUT NOCOPY VARCHAR2
616: )
617: IS
725: * of the operation resource record in their own entirety.
726: * No cross entity validations will be performed.
727: ********************************************************************/
728: PROCEDURE Check_Attributes
729: ( p_sub_resource_rec IN Bom_Rtg_Pub.Sub_Resource_Rec_Type
730: , p_sub_res_unexp_rec IN Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
731: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
732: , x_return_status IN OUT NOCOPY VARCHAR2
733: )
726: * No cross entity validations will be performed.
727: ********************************************************************/
728: PROCEDURE Check_Attributes
729: ( p_sub_resource_rec IN Bom_Rtg_Pub.Sub_Resource_Rec_Type
730: , p_sub_res_unexp_rec IN Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
731: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
732: , x_return_status IN OUT NOCOPY VARCHAR2
733: )
734: IS
732: , x_return_status IN OUT NOCOPY VARCHAR2
733: )
734: IS
735:
736: l_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type ;
737: l_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
738:
739: BEGIN
740:
733: )
734: IS
735:
736: l_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type ;
737: l_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
738:
739: BEGIN
740:
741: -- Convert Routing Operation to ECO Operation
738:
739: BEGIN
740:
741: -- Convert Routing Operation to ECO Operation
742: Bom_Rtg_Pub.Convert_RtgSubRes_To_EcoSubRes
743: ( p_rtg_sub_resource_rec => p_sub_resource_rec
744: , p_rtg_sub_res_unexp_rec => p_sub_res_unexp_rec
745: , x_rev_sub_resource_rec => l_rev_sub_resource_rec
746: , x_rev_sub_res_unexp_rec => l_rev_sub_res_unexp_rec
773: * before the procedure returns with a Return_Status
774: * of 'E'.
775: *********************************************************************/
776: PROCEDURE Check_Attributes
777: ( p_rev_sub_resource_rec IN Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
778: , p_rev_sub_res_unexp_rec IN Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
779: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
780: , x_return_status IN OUT NOCOPY VARCHAR2
781: )
774: * of 'E'.
775: *********************************************************************/
776: PROCEDURE Check_Attributes
777: ( p_rev_sub_resource_rec IN Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
778: , p_rev_sub_res_unexp_rec IN Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
779: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
780: , x_return_status IN OUT NOCOPY VARCHAR2
781: )
782: IS
1223: * Procedure will execute the business logic and will
1224: * also perform any required cross entity validations
1225: *******************************************************************/
1226: PROCEDURE Check_Entity
1227: ( p_sub_resource_rec IN Bom_Rtg_Pub.Sub_Resource_Rec_Type
1228: , p_sub_res_unexp_rec IN Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
1229: , p_old_sub_resource_rec IN Bom_Rtg_Pub.Sub_Resource_Rec_Type
1230: , p_old_sub_res_unexp_rec IN Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
1231: , x_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Resource_Rec_Type
1224: * also perform any required cross entity validations
1225: *******************************************************************/
1226: PROCEDURE Check_Entity
1227: ( p_sub_resource_rec IN Bom_Rtg_Pub.Sub_Resource_Rec_Type
1228: , p_sub_res_unexp_rec IN Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
1229: , p_old_sub_resource_rec IN Bom_Rtg_Pub.Sub_Resource_Rec_Type
1230: , p_old_sub_res_unexp_rec IN Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
1231: , x_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Resource_Rec_Type
1232: , x_sub_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
1225: *******************************************************************/
1226: PROCEDURE Check_Entity
1227: ( p_sub_resource_rec IN Bom_Rtg_Pub.Sub_Resource_Rec_Type
1228: , p_sub_res_unexp_rec IN Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
1229: , p_old_sub_resource_rec IN Bom_Rtg_Pub.Sub_Resource_Rec_Type
1230: , p_old_sub_res_unexp_rec IN Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
1231: , x_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Resource_Rec_Type
1232: , x_sub_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
1233: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1226: PROCEDURE Check_Entity
1227: ( p_sub_resource_rec IN Bom_Rtg_Pub.Sub_Resource_Rec_Type
1228: , p_sub_res_unexp_rec IN Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
1229: , p_old_sub_resource_rec IN Bom_Rtg_Pub.Sub_Resource_Rec_Type
1230: , p_old_sub_res_unexp_rec IN Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
1231: , x_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Resource_Rec_Type
1232: , x_sub_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
1233: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1234: , x_return_status IN OUT NOCOPY VARCHAR2
1227: ( p_sub_resource_rec IN Bom_Rtg_Pub.Sub_Resource_Rec_Type
1228: , p_sub_res_unexp_rec IN Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
1229: , p_old_sub_resource_rec IN Bom_Rtg_Pub.Sub_Resource_Rec_Type
1230: , p_old_sub_res_unexp_rec IN Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
1231: , x_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Resource_Rec_Type
1232: , x_sub_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
1233: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1234: , x_return_status IN OUT NOCOPY VARCHAR2
1235: )
1228: , p_sub_res_unexp_rec IN Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
1229: , p_old_sub_resource_rec IN Bom_Rtg_Pub.Sub_Resource_Rec_Type
1230: , p_old_sub_res_unexp_rec IN Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
1231: , x_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Resource_Rec_Type
1232: , x_sub_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
1233: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1234: , x_return_status IN OUT NOCOPY VARCHAR2
1235: )
1236: IS
1233: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1234: , x_return_status IN OUT NOCOPY VARCHAR2
1235: )
1236: IS
1237: l_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type ;
1238: l_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
1239: l_old_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type ;
1240: l_old_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
1241:
1234: , x_return_status IN OUT NOCOPY VARCHAR2
1235: )
1236: IS
1237: l_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type ;
1238: l_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
1239: l_old_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type ;
1240: l_old_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
1241:
1242: BEGIN
1235: )
1236: IS
1237: l_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type ;
1238: l_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
1239: l_old_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type ;
1240: l_old_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
1241:
1242: BEGIN
1243: -- Convert Routing Operation to ECO Operation
1236: IS
1237: l_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type ;
1238: l_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
1239: l_old_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type ;
1240: l_old_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
1241:
1242: BEGIN
1243: -- Convert Routing Operation to ECO Operation
1244: Bom_Rtg_Pub.Convert_RtgSubRes_To_EcoSubRes
1240: l_old_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
1241:
1242: BEGIN
1243: -- Convert Routing Operation to ECO Operation
1244: Bom_Rtg_Pub.Convert_RtgSubRes_To_EcoSubRes
1245: ( p_rtg_sub_resource_rec => p_sub_resource_rec
1246: , p_rtg_sub_res_unexp_rec => p_sub_res_unexp_rec
1247: , x_rev_sub_resource_rec => l_rev_sub_resource_rec
1248: , x_rev_sub_res_unexp_rec => l_rev_sub_res_unexp_rec
1249: ) ;
1250:
1251:
1252: -- Also Convert Old Routing Operation to Old ECO Operation
1253: Bom_Rtg_Pub.Convert_RtgSubRes_To_EcoSubRes
1254: ( p_rtg_sub_resource_rec => p_old_sub_resource_rec
1255: , p_rtg_sub_res_unexp_rec => p_old_sub_res_unexp_rec
1256: , x_rev_sub_resource_rec => l_old_rev_sub_resource_rec
1257: , x_rev_sub_res_unexp_rec => l_old_rev_sub_res_unexp_rec
1262: ( p_rev_sub_resource_rec => l_rev_sub_resource_rec
1263: , p_rev_sub_res_unexp_rec => l_rev_sub_res_unexp_rec
1264: , p_old_rev_sub_resource_rec => l_old_rev_sub_resource_rec
1265: , p_old_rev_sub_res_unexp_rec => l_old_rev_sub_res_unexp_rec
1266: , p_control_rec => Bom_Rtg_Pub.G_DEFAULT_CONTROL_REC
1267: , x_rev_sub_resource_rec => l_rev_sub_resource_rec
1268: , x_rev_sub_res_unexp_rec => l_rev_sub_res_unexp_rec
1269: , x_return_status => x_return_status
1270: , x_mesg_token_tbl => x_mesg_token_tbl
1271: ) ;
1272:
1273:
1274: -- Convert Eco Op Resource Record back to Routing Op Resource
1275: Bom_Rtg_Pub.Convert_EcoSubRes_To_RtgSubRes
1276: ( p_rev_sub_resource_rec => l_rev_sub_resource_rec
1277: , p_rev_sub_res_unexp_rec => l_rev_sub_res_unexp_rec
1278: , x_rtg_sub_resource_rec => x_sub_resource_rec
1279: , x_rtg_sub_res_unexp_rec => x_sub_res_unexp_rec
1297: * It will also verify that changes in one column value
1298: * does not invalidate some other columns.
1299: *******************************************************************/
1300: PROCEDURE Check_Entity
1301: ( p_rev_sub_resource_rec IN Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
1302: , p_rev_sub_res_unexp_rec IN Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
1303: , p_old_rev_sub_resource_rec IN Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
1304: , p_old_rev_sub_res_unexp_rec IN Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
1305: , p_control_rec IN Bom_Rtg_Pub.Control_Rec_Type
1298: * does not invalidate some other columns.
1299: *******************************************************************/
1300: PROCEDURE Check_Entity
1301: ( p_rev_sub_resource_rec IN Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
1302: , p_rev_sub_res_unexp_rec IN Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
1303: , p_old_rev_sub_resource_rec IN Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
1304: , p_old_rev_sub_res_unexp_rec IN Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
1305: , p_control_rec IN Bom_Rtg_Pub.Control_Rec_Type
1306: , x_rev_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
1299: *******************************************************************/
1300: PROCEDURE Check_Entity
1301: ( p_rev_sub_resource_rec IN Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
1302: , p_rev_sub_res_unexp_rec IN Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
1303: , p_old_rev_sub_resource_rec IN Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
1304: , p_old_rev_sub_res_unexp_rec IN Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
1305: , p_control_rec IN Bom_Rtg_Pub.Control_Rec_Type
1306: , x_rev_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
1307: , x_rev_sub_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
1300: PROCEDURE Check_Entity
1301: ( p_rev_sub_resource_rec IN Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
1302: , p_rev_sub_res_unexp_rec IN Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
1303: , p_old_rev_sub_resource_rec IN Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
1304: , p_old_rev_sub_res_unexp_rec IN Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
1305: , p_control_rec IN Bom_Rtg_Pub.Control_Rec_Type
1306: , x_rev_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
1307: , x_rev_sub_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
1308: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1301: ( p_rev_sub_resource_rec IN Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
1302: , p_rev_sub_res_unexp_rec IN Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
1303: , p_old_rev_sub_resource_rec IN Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
1304: , p_old_rev_sub_res_unexp_rec IN Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
1305: , p_control_rec IN Bom_Rtg_Pub.Control_Rec_Type
1306: , x_rev_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
1307: , x_rev_sub_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
1308: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1309: , x_return_status IN OUT NOCOPY VARCHAR2
1302: , p_rev_sub_res_unexp_rec IN Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
1303: , p_old_rev_sub_resource_rec IN Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
1304: , p_old_rev_sub_res_unexp_rec IN Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
1305: , p_control_rec IN Bom_Rtg_Pub.Control_Rec_Type
1306: , x_rev_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
1307: , x_rev_sub_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
1308: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1309: , x_return_status IN OUT NOCOPY VARCHAR2
1310: )
1303: , p_old_rev_sub_resource_rec IN Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
1304: , p_old_rev_sub_res_unexp_rec IN Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
1305: , p_control_rec IN Bom_Rtg_Pub.Control_Rec_Type
1306: , x_rev_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
1307: , x_rev_sub_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
1308: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1309: , x_return_status IN OUT NOCOPY VARCHAR2
1310: )
1311: IS
1323: l_res_code VARCHAR2(10);
1324: l_res_code_2 VARCHAR2(10);
1325: l_res_id NUMBER;
1326:
1327: l_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type ;
1328: l_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
1329:
1330: -- Error Handlig Variables
1331: l_return_status VARCHAR2(1);
1324: l_res_code_2 VARCHAR2(10);
1325: l_res_id NUMBER;
1326:
1327: l_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type ;
1328: l_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
1329:
1330: -- Error Handlig Variables
1331: l_return_status VARCHAR2(1);
1332: l_err_text VARCHAR2(2000) ;