546: * After calling Check_Existence, convert old Revised
547: * Op Resource record back to Routing Op Resource
548: *********************************************************************/
549: PROCEDURE Check_Existence
550: ( p_sub_resource_rec IN Bom_Rtg_Pub.Sub_Resource_Rec_Type
551: , p_sub_res_unexp_rec IN Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
552: , x_old_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Resource_Rec_Type
553: , x_old_sub_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
554: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
547: * Op Resource record back to Routing Op Resource
548: *********************************************************************/
549: PROCEDURE Check_Existence
550: ( p_sub_resource_rec IN Bom_Rtg_Pub.Sub_Resource_Rec_Type
551: , p_sub_res_unexp_rec IN Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
552: , x_old_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Resource_Rec_Type
553: , x_old_sub_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
554: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
555: , x_return_status IN OUT NOCOPY VARCHAR2
548: *********************************************************************/
549: PROCEDURE Check_Existence
550: ( p_sub_resource_rec IN Bom_Rtg_Pub.Sub_Resource_Rec_Type
551: , p_sub_res_unexp_rec IN Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
552: , x_old_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Resource_Rec_Type
553: , x_old_sub_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
554: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
555: , x_return_status IN OUT NOCOPY VARCHAR2
556: )
549: PROCEDURE Check_Existence
550: ( p_sub_resource_rec IN Bom_Rtg_Pub.Sub_Resource_Rec_Type
551: , p_sub_res_unexp_rec IN Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
552: , x_old_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Resource_Rec_Type
553: , x_old_sub_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
554: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
555: , x_return_status IN OUT NOCOPY VARCHAR2
556: )
557:
555: , x_return_status IN OUT NOCOPY VARCHAR2
556: )
557:
558: IS
559: l_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type ;
560: l_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
561: l_old_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type ;
562: l_old_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
563:
556: )
557:
558: IS
559: l_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type ;
560: l_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
561: l_old_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type ;
562: l_old_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
563:
564: BEGIN
557:
558: IS
559: l_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type ;
560: l_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
561: l_old_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type ;
562: l_old_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
563:
564: BEGIN
565: -- Convert Routing Operation to ECO Operation
558: IS
559: l_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type ;
560: l_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
561: l_old_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type ;
562: l_old_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
563:
564: BEGIN
565: -- Convert Routing Operation to ECO Operation
566: Bom_Rtg_Pub.Convert_RtgSubRes_To_EcoSubRes
562: l_old_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
563:
564: BEGIN
565: -- Convert Routing Operation to ECO Operation
566: Bom_Rtg_Pub.Convert_RtgSubRes_To_EcoSubRes
567: ( p_rtg_sub_resource_rec => p_sub_resource_rec
568: , p_rtg_sub_res_unexp_rec => p_sub_res_unexp_rec
569: , x_rev_sub_resource_rec => l_rev_sub_resource_rec
570: , x_rev_sub_res_unexp_rec => l_rev_sub_res_unexp_rec
580: , x_mesg_token_tbl => x_mesg_token_tbl
581: ) ;
582:
583: -- Convert old Eco Opeartion Record back to Routing Operation
584: Bom_Rtg_Pub.Convert_EcoSubRes_To_RtgSubRes
585: ( p_rev_sub_resource_rec => l_old_rev_sub_resource_rec
586: , p_rev_sub_res_unexp_rec => l_old_rev_sub_res_unexp_rec
587: , x_rtg_sub_resource_rec => x_old_sub_resource_rec
588: , x_rtg_sub_res_unexp_rec => x_old_sub_res_unexp_rec
611: * with a success status.
612: *********************************************************************/
613:
614: PROCEDURE Check_Existence
615: ( p_rev_sub_resource_rec IN Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
616: , p_rev_sub_res_unexp_rec IN Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
617: , x_old_rev_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
618: , x_old_rev_sub_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
619: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
612: *********************************************************************/
613:
614: PROCEDURE Check_Existence
615: ( p_rev_sub_resource_rec IN Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
616: , p_rev_sub_res_unexp_rec IN Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
617: , x_old_rev_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
618: , x_old_rev_sub_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
619: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
620: , x_return_status IN OUT NOCOPY VARCHAR2
613:
614: PROCEDURE Check_Existence
615: ( p_rev_sub_resource_rec IN Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
616: , p_rev_sub_res_unexp_rec IN Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
617: , x_old_rev_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
618: , x_old_rev_sub_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
619: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
620: , x_return_status IN OUT NOCOPY VARCHAR2
621: )
614: PROCEDURE Check_Existence
615: ( p_rev_sub_resource_rec IN Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
616: , p_rev_sub_res_unexp_rec IN Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
617: , x_old_rev_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
618: , x_old_rev_sub_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
619: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
620: , x_return_status IN OUT NOCOPY VARCHAR2
621: )
622: IS
731: * of the operation resource record in their own entirety.
732: * No cross entity validations will be performed.
733: ********************************************************************/
734: PROCEDURE Check_Attributes
735: ( p_sub_resource_rec IN Bom_Rtg_Pub.Sub_Resource_Rec_Type
736: , p_sub_res_unexp_rec IN Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
737: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
738: , x_return_status IN OUT NOCOPY VARCHAR2
739: )
732: * No cross entity validations will be performed.
733: ********************************************************************/
734: PROCEDURE Check_Attributes
735: ( p_sub_resource_rec IN Bom_Rtg_Pub.Sub_Resource_Rec_Type
736: , p_sub_res_unexp_rec IN Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
737: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
738: , x_return_status IN OUT NOCOPY VARCHAR2
739: )
740: IS
738: , x_return_status IN OUT NOCOPY VARCHAR2
739: )
740: IS
741:
742: l_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type ;
743: l_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
744:
745: BEGIN
746:
739: )
740: IS
741:
742: l_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type ;
743: l_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
744:
745: BEGIN
746:
747: -- Convert Routing Operation to ECO Operation
744:
745: BEGIN
746:
747: -- Convert Routing Operation to ECO Operation
748: Bom_Rtg_Pub.Convert_RtgSubRes_To_EcoSubRes
749: ( p_rtg_sub_resource_rec => p_sub_resource_rec
750: , p_rtg_sub_res_unexp_rec => p_sub_res_unexp_rec
751: , x_rev_sub_resource_rec => l_rev_sub_resource_rec
752: , x_rev_sub_res_unexp_rec => l_rev_sub_res_unexp_rec
779: * before the procedure returns with a Return_Status
780: * of 'E'.
781: *********************************************************************/
782: PROCEDURE Check_Attributes
783: ( p_rev_sub_resource_rec IN Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
784: , p_rev_sub_res_unexp_rec IN Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
785: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
786: , x_return_status IN OUT NOCOPY VARCHAR2
787: )
780: * of 'E'.
781: *********************************************************************/
782: PROCEDURE Check_Attributes
783: ( p_rev_sub_resource_rec IN Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
784: , p_rev_sub_res_unexp_rec IN Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
785: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
786: , x_return_status IN OUT NOCOPY VARCHAR2
787: )
788: IS
1253: * Procedure will execute the business logic and will
1254: * also perform any required cross entity validations
1255: *******************************************************************/
1256: PROCEDURE Check_Entity
1257: ( p_sub_resource_rec IN Bom_Rtg_Pub.Sub_Resource_Rec_Type
1258: , p_sub_res_unexp_rec IN Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
1259: , p_old_sub_resource_rec IN Bom_Rtg_Pub.Sub_Resource_Rec_Type
1260: , p_old_sub_res_unexp_rec IN Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
1261: , x_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Resource_Rec_Type
1254: * also perform any required cross entity validations
1255: *******************************************************************/
1256: PROCEDURE Check_Entity
1257: ( p_sub_resource_rec IN Bom_Rtg_Pub.Sub_Resource_Rec_Type
1258: , p_sub_res_unexp_rec IN Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
1259: , p_old_sub_resource_rec IN Bom_Rtg_Pub.Sub_Resource_Rec_Type
1260: , p_old_sub_res_unexp_rec IN Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
1261: , x_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Resource_Rec_Type
1262: , x_sub_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
1255: *******************************************************************/
1256: PROCEDURE Check_Entity
1257: ( p_sub_resource_rec IN Bom_Rtg_Pub.Sub_Resource_Rec_Type
1258: , p_sub_res_unexp_rec IN Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
1259: , p_old_sub_resource_rec IN Bom_Rtg_Pub.Sub_Resource_Rec_Type
1260: , p_old_sub_res_unexp_rec IN Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
1261: , x_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Resource_Rec_Type
1262: , x_sub_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
1263: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1256: PROCEDURE Check_Entity
1257: ( p_sub_resource_rec IN Bom_Rtg_Pub.Sub_Resource_Rec_Type
1258: , p_sub_res_unexp_rec IN Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
1259: , p_old_sub_resource_rec IN Bom_Rtg_Pub.Sub_Resource_Rec_Type
1260: , p_old_sub_res_unexp_rec IN Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
1261: , x_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Resource_Rec_Type
1262: , x_sub_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
1263: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1264: , x_return_status IN OUT NOCOPY VARCHAR2
1257: ( p_sub_resource_rec IN Bom_Rtg_Pub.Sub_Resource_Rec_Type
1258: , p_sub_res_unexp_rec IN Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
1259: , p_old_sub_resource_rec IN Bom_Rtg_Pub.Sub_Resource_Rec_Type
1260: , p_old_sub_res_unexp_rec IN Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
1261: , x_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Resource_Rec_Type
1262: , x_sub_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
1263: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1264: , x_return_status IN OUT NOCOPY VARCHAR2
1265: )
1258: , p_sub_res_unexp_rec IN Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
1259: , p_old_sub_resource_rec IN Bom_Rtg_Pub.Sub_Resource_Rec_Type
1260: , p_old_sub_res_unexp_rec IN Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
1261: , x_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Resource_Rec_Type
1262: , x_sub_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
1263: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1264: , x_return_status IN OUT NOCOPY VARCHAR2
1265: )
1266: IS
1263: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1264: , x_return_status IN OUT NOCOPY VARCHAR2
1265: )
1266: IS
1267: l_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type ;
1268: l_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
1269: l_old_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type ;
1270: l_old_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
1271:
1264: , x_return_status IN OUT NOCOPY VARCHAR2
1265: )
1266: IS
1267: l_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type ;
1268: l_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
1269: l_old_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type ;
1270: l_old_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
1271:
1272: BEGIN
1265: )
1266: IS
1267: l_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type ;
1268: l_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
1269: l_old_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type ;
1270: l_old_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
1271:
1272: BEGIN
1273: -- Convert Routing Operation to ECO Operation
1266: IS
1267: l_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type ;
1268: l_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
1269: l_old_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type ;
1270: l_old_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
1271:
1272: BEGIN
1273: -- Convert Routing Operation to ECO Operation
1274: Bom_Rtg_Pub.Convert_RtgSubRes_To_EcoSubRes
1270: l_old_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
1271:
1272: BEGIN
1273: -- Convert Routing Operation to ECO Operation
1274: Bom_Rtg_Pub.Convert_RtgSubRes_To_EcoSubRes
1275: ( p_rtg_sub_resource_rec => p_sub_resource_rec
1276: , p_rtg_sub_res_unexp_rec => p_sub_res_unexp_rec
1277: , x_rev_sub_resource_rec => l_rev_sub_resource_rec
1278: , x_rev_sub_res_unexp_rec => l_rev_sub_res_unexp_rec
1279: ) ;
1280:
1281:
1282: -- Also Convert Old Routing Operation to Old ECO Operation
1283: Bom_Rtg_Pub.Convert_RtgSubRes_To_EcoSubRes
1284: ( p_rtg_sub_resource_rec => p_old_sub_resource_rec
1285: , p_rtg_sub_res_unexp_rec => p_old_sub_res_unexp_rec
1286: , x_rev_sub_resource_rec => l_old_rev_sub_resource_rec
1287: , x_rev_sub_res_unexp_rec => l_old_rev_sub_res_unexp_rec
1292: ( p_rev_sub_resource_rec => l_rev_sub_resource_rec
1293: , p_rev_sub_res_unexp_rec => l_rev_sub_res_unexp_rec
1294: , p_old_rev_sub_resource_rec => l_old_rev_sub_resource_rec
1295: , p_old_rev_sub_res_unexp_rec => l_old_rev_sub_res_unexp_rec
1296: , p_control_rec => Bom_Rtg_Pub.G_DEFAULT_CONTROL_REC
1297: , x_rev_sub_resource_rec => l_rev_sub_resource_rec
1298: , x_rev_sub_res_unexp_rec => l_rev_sub_res_unexp_rec
1299: , x_return_status => x_return_status
1300: , x_mesg_token_tbl => x_mesg_token_tbl
1301: ) ;
1302:
1303:
1304: -- Convert Eco Op Resource Record back to Routing Op Resource
1305: Bom_Rtg_Pub.Convert_EcoSubRes_To_RtgSubRes
1306: ( p_rev_sub_resource_rec => l_rev_sub_resource_rec
1307: , p_rev_sub_res_unexp_rec => l_rev_sub_res_unexp_rec
1308: , x_rtg_sub_resource_rec => x_sub_resource_rec
1309: , x_rtg_sub_res_unexp_rec => x_sub_res_unexp_rec
1327: * It will also verify that changes in one column value
1328: * does not invalidate some other columns.
1329: *******************************************************************/
1330: PROCEDURE Check_Entity
1331: ( p_rev_sub_resource_rec IN Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
1332: , p_rev_sub_res_unexp_rec IN Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
1333: , p_old_rev_sub_resource_rec IN Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
1334: , p_old_rev_sub_res_unexp_rec IN Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
1335: , p_control_rec IN Bom_Rtg_Pub.Control_Rec_Type
1328: * does not invalidate some other columns.
1329: *******************************************************************/
1330: PROCEDURE Check_Entity
1331: ( p_rev_sub_resource_rec IN Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
1332: , p_rev_sub_res_unexp_rec IN Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
1333: , p_old_rev_sub_resource_rec IN Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
1334: , p_old_rev_sub_res_unexp_rec IN Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
1335: , p_control_rec IN Bom_Rtg_Pub.Control_Rec_Type
1336: , x_rev_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
1329: *******************************************************************/
1330: PROCEDURE Check_Entity
1331: ( p_rev_sub_resource_rec IN Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
1332: , p_rev_sub_res_unexp_rec IN Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
1333: , p_old_rev_sub_resource_rec IN Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
1334: , p_old_rev_sub_res_unexp_rec IN Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
1335: , p_control_rec IN Bom_Rtg_Pub.Control_Rec_Type
1336: , x_rev_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
1337: , x_rev_sub_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
1330: PROCEDURE Check_Entity
1331: ( p_rev_sub_resource_rec IN Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
1332: , p_rev_sub_res_unexp_rec IN Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
1333: , p_old_rev_sub_resource_rec IN Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
1334: , p_old_rev_sub_res_unexp_rec IN Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
1335: , p_control_rec IN Bom_Rtg_Pub.Control_Rec_Type
1336: , x_rev_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
1337: , x_rev_sub_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
1338: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1331: ( p_rev_sub_resource_rec IN Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
1332: , p_rev_sub_res_unexp_rec IN Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
1333: , p_old_rev_sub_resource_rec IN Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
1334: , p_old_rev_sub_res_unexp_rec IN Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
1335: , p_control_rec IN Bom_Rtg_Pub.Control_Rec_Type
1336: , x_rev_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
1337: , x_rev_sub_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
1338: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1339: , x_return_status IN OUT NOCOPY VARCHAR2
1332: , p_rev_sub_res_unexp_rec IN Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
1333: , p_old_rev_sub_resource_rec IN Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
1334: , p_old_rev_sub_res_unexp_rec IN Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
1335: , p_control_rec IN Bom_Rtg_Pub.Control_Rec_Type
1336: , x_rev_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
1337: , x_rev_sub_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
1338: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1339: , x_return_status IN OUT NOCOPY VARCHAR2
1340: )
1333: , p_old_rev_sub_resource_rec IN Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
1334: , p_old_rev_sub_res_unexp_rec IN Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
1335: , p_control_rec IN Bom_Rtg_Pub.Control_Rec_Type
1336: , x_rev_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type
1337: , x_rev_sub_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
1338: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1339: , x_return_status IN OUT NOCOPY VARCHAR2
1340: )
1341: IS
1353: l_res_code VARCHAR2(10);
1354: l_res_code_2 VARCHAR2(10);
1355: l_res_id NUMBER;
1356:
1357: l_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type ;
1358: l_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
1359:
1360: -- Error Handlig Variables
1361: l_return_status VARCHAR2(1);
1354: l_res_code_2 VARCHAR2(10);
1355: l_res_id NUMBER;
1356:
1357: l_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_rec_Type ;
1358: l_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
1359:
1360: -- Error Handlig Variables
1361: l_return_status VARCHAR2(1);
1362: l_err_text VARCHAR2(2000) ;