DBA Data[Home] [Help]

APPS.ENG_ECO_PVT dependencies on BOM_RTG_GLOBALS

Line 235: -- Call the Bom_Rtg_Globals.Transaction_Type_Validity

231: END IF;
232: --
233: -- Process Flow step 3 : Check if transaction_type is valid
234: -- Transaction_Type must be CRATE, UPDATE, DELETE or CANCEL(in only ECO for Rrg)
235: -- Call the Bom_Rtg_Globals.Transaction_Type_Validity
236: --
237: Eng_Globals.Transaction_Type_Validity
238: ( p_transaction_type => l_rev_sub_resource_rec.transaction_type
239: , p_entity => 'Sub_Res'

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

259: , x_mesg_token_tbl => l_mesg_token_tbl
260: , x_return_status => l_return_status
261: ) ;
262:
263: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
264: ('Convert to User Unique Index to Index1 completed with return_status: ' || l_return_status) ;
265: END IF;
266:
267: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

309: , x_other_token_tbl => l_other_token_tbl
310: , x_Return_Status => l_return_status
311: ) ;
312:
313: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
314: ('Convert to User Unique Index to Index1 for Rtg and Rev Item Seq completed with return_status: ' || l_return_status) ;
315: END IF;
316:
317: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

355: , x_other_token_tbl => l_other_token_tbl
356: , x_return_status => l_return_status
357: ) ;
358:
359: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
360: ('Convert to User Unique Index to Index2 completed with return_status: ' || l_return_status) ;
361: END IF;
362:
363: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

391: , x_return_status => l_return_status
392: ) ;
393:
394:
395: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
396: ('Check Existence completed with return_status: ' || l_return_status) ;
397: END IF ;
398:
399: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

653: , x_mesg_token_tbl => l_mesg_token_tbl
654: , x_return_status => l_return_status
655: ) ;
656:
657: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
658: ('Check non-ref operation completed with return_status: '
659: || l_return_status) ;
660: END IF;
661:

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

737: , x_mesg_token_tbl => l_mesg_token_tbl
738: , x_return_status => l_return_status
739: );
740:
741: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
742: ('Value-id conversions completed with return_status: ' || l_return_status) ;
743: END IF ;
744:
745: IF l_return_status = Error_Handler.G_STATUS_ERROR

Line 808: (Bom_Rtg_Globals.G_OPR_CREATE, Bom_Rtg_Globals.G_OPR_UPDATE)

804: -- Call Bom_Validate_Op_Res.Check_Attributes
805: --
806:
807: IF l_rev_sub_resource_rec.transaction_type IN
808: (Bom_Rtg_Globals.G_OPR_CREATE, Bom_Rtg_Globals.G_OPR_UPDATE)
809: THEN
810: Bom_Validate_Sub_Op_Res.Check_Attributes
811: ( p_rev_sub_resource_rec => l_rev_sub_resource_rec
812: , p_rev_sub_res_unexp_rec => l_rev_sub_res_unexp_rec

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

813: , x_return_status => l_return_status
814: , x_mesg_token_tbl => l_mesg_token_tbl
815: ) ;
816:
817: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
818: ('Attribute validation completed with return_status: ' ||
819: l_return_status) ;
820: END IF ;
821:

Line 824: IF l_rev_sub_resource_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE

820: END IF ;
821:
822: IF l_return_status = Error_Handler.G_STATUS_ERROR
823: THEN
824: IF l_rev_sub_resource_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE
825: THEN
826: l_other_message := 'BOM_SUB_RES_ATTVAL_CSEV_SKIP';
827: l_other_token_tbl(1).token_name := 'SUB_RESOURCE_CODE';
828: l_other_token_tbl(1).token_value :=

Line 870: (Bom_Rtg_Globals.G_OPR_UPDATE, Bom_Rtg_Globals.G_OPR_DELETE)

866: END IF;
867: END IF;
868:
869: IF l_rev_sub_resource_rec.transaction_type IN
870: (Bom_Rtg_Globals.G_OPR_UPDATE, Bom_Rtg_Globals.G_OPR_DELETE)
871: THEN
872:
873: --
874: -- Process flow step 16: Populate NULL columns for Update and Delete

Line 878: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Populate NULL columns') ;

874: -- Process flow step 16: Populate NULL columns for Update and Delete
875: -- Call Bom_Default_Op_Res.Populate_Null_Columns
876: --
877:
878: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Populate NULL columns') ;
879: END IF ;
880:
881: Bom_Default_Sub_Op_Res.Populate_Null_Columns
882: ( p_rev_sub_resource_rec => l_rev_sub_resource_rec

Line 891: ELSIF l_rev_sub_resource_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE

887: , x_rev_sub_res_unexp_rec => l_rev_sub_res_unexp_rec
888: ) ;
889:
890:
891: ELSIF l_rev_sub_resource_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE
892: THEN
893: --
894: -- Process Flow step 18 : Default missing values for Sub Op Resource (CREATE)
895: -- Call Bom_Default_Op_Res.Attribute_Defaulting

Line 898: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Attribute Defaulting') ;

894: -- Process Flow step 18 : Default missing values for Sub Op Resource (CREATE)
895: -- Call Bom_Default_Op_Res.Attribute_Defaulting
896: --
897:
898: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Attribute Defaulting') ;
899: END IF ;
900:
901: Bom_Default_Sub_Op_Res.Attribute_Defaulting
902: ( p_rev_sub_resource_rec => l_rev_sub_resource_rec

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

908: , x_return_status => l_return_status
909: ) ;
910:
911:
912: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
913: ('Attribute Defaulting completed with return_status: ' || l_return_status) ;
914: END IF ;
915:
916: IF l_return_status = Error_Handler.G_STATUS_ERROR

Line 968: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity defaulting') ;

964: -- Process Flow step 18: Entity defaulting for CREATE and UPDATE
965: --
966:
967:
968: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity defaulting') ;
969: END IF ;
970: IF l_rev_sub_resource_rec.transaction_type IN ( Bom_Rtg_Globals.G_OPR_CREATE
971: , Bom_Rtg_Globals.G_OPR_UPDATE )
972: THEN

Line 970: IF l_rev_sub_resource_rec.transaction_type IN ( Bom_Rtg_Globals.G_OPR_CREATE

966:
967:
968: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity defaulting') ;
969: END IF ;
970: IF l_rev_sub_resource_rec.transaction_type IN ( Bom_Rtg_Globals.G_OPR_CREATE
971: , Bom_Rtg_Globals.G_OPR_UPDATE )
972: THEN
973: Bom_Default_Sub_OP_Res.Entity_Defaulting
974: ( p_rev_sub_resource_rec => l_rev_sub_resource_rec

Line 971: , Bom_Rtg_Globals.G_OPR_UPDATE )

967:
968: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity defaulting') ;
969: END IF ;
970: IF l_rev_sub_resource_rec.transaction_type IN ( Bom_Rtg_Globals.G_OPR_CREATE
971: , Bom_Rtg_Globals.G_OPR_UPDATE )
972: THEN
973: Bom_Default_Sub_OP_Res.Entity_Defaulting
974: ( p_rev_sub_resource_rec => l_rev_sub_resource_rec
975: , p_rev_sub_res_unexp_rec => l_rev_sub_res_unexp_rec

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

979: , x_mesg_token_tbl => l_mesg_token_tbl
980: , x_return_status => l_return_status
981: ) ;
982:
983: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
984: ('Entity defaulting completed with return_status: ' || l_return_status) ;
985: END IF ;
986:
987: IF l_return_status = Error_Handler.G_STATUS_ERROR

Line 989: IF l_rev_sub_resource_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE

985: END IF ;
986:
987: IF l_return_status = Error_Handler.G_STATUS_ERROR
988: THEN
989: IF l_rev_sub_resource_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE
990: THEN
991: l_other_message := 'BOM_SUB_RES_ENTDEF_CSEV_SKIP';
992: l_other_token_tbl(1).token_name := 'SUB_RESOURCE_CODE';
993: l_other_token_tbl(1).token_value :=

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

1035: -- Process Flow step 19 - Entity Level Validation
1036: -- Call Bom_Validate_Op_Res.Check_Entity
1037: --
1038:
1039: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN
1040: Error_Handler.Write_Debug('Starting Entity Validation for Sub Op Resources . . . ') ;
1041: END IF ;
1042:
1043: Bom_Validate_Sub_Op_Res.Check_Entity

Line 1057: IF l_rev_sub_resource_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE

1053: ) ;
1054:
1055: IF l_return_status = Error_Handler.G_STATUS_ERROR
1056: THEN
1057: IF l_rev_sub_resource_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE
1058: THEN
1059: l_other_message := 'BOM_SUB_RES_ENTVAL_CSEV_SKIP';
1060: l_other_token_tbl(1).token_name := 'SUB_RESOURCE_CODE';
1061: l_other_token_tbl(1).token_value :=

Line 1100: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity validation completed with '

1096: , x_rev_sub_resource_tbl=> x_rev_sub_resource_tbl
1097: ) ;
1098: END IF;
1099:
1100: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity validation completed with '
1101: || l_return_Status || ' proceeding for database writes . . . ') ;
1102: END IF;
1103:
1104: --

Line 1146: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Database writes completed with status ' || l_return_status);

1142: , x_rev_sub_resource_tbl=> x_rev_sub_resource_tbl
1143: ) ;
1144: END IF;
1145:
1146: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Database writes completed with status ' || l_return_status);
1147: END IF;
1148:
1149:
1150: END IF; -- END IF statement that checks RETURN STATUS

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

1546: -- Process Flow Step 2: Check if record has not yet been processed and
1547: -- that it is the child of the parent that called this procedure
1548: --
1549:
1550: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1551: ('ECO Name: ' || p_change_notice ||
1552: ' Org: ' || p_organization_id ||
1553: ' Eff. Dt: ' || to_char(p_effectivity_date) ||
1554: ' Revision: ' || p_item_revision ||

Line 1625: -- Call the Bom_Rtg_Globals.Transaction_Type_Validity

1621:
1622: --
1623: -- Process Flow step 3 :Check if transaction_type is valid
1624: -- Transaction_Type must be CRATE, UPDATE, DELETE or CANCEL(in only ECO for Rrg)
1625: -- Call the Bom_Rtg_Globals.Transaction_Type_Validity
1626: --
1627:
1628: Eng_Globals.Transaction_Type_Validity
1629: ( p_transaction_type => l_rev_op_resource_rec.transaction_type

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

1651: , x_mesg_token_tbl => l_mesg_token_tbl
1652: , x_return_status => l_return_status
1653: ) ;
1654:
1655: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1656: ('Convert to User Unique Index to Index1 completed with return_status: ' || l_return_status) ;
1657: END IF;
1658:
1659: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

1695: , x_other_token_tbl => l_other_token_tbl
1696: , x_Return_Status => l_return_status
1697: ) ;
1698:
1699: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1700: ('Convert to User Unique Index to Index1 for Rtg and Rev Item Seq completed with return_status: ' || l_return_status) ;
1701: END IF;
1702:
1703: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

1733: , x_other_token_tbl => l_other_token_tbl
1734: , x_return_status => l_return_status
1735: ) ;
1736:
1737: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1738: ('Convert to User Unique Index to Index2 completed with return_status: ' || l_return_status) ;
1739: END IF;
1740:
1741: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

1764: , x_mesg_token_tbl => l_mesg_token_tbl
1765: , x_return_status => l_return_status
1766: ) ;
1767:
1768: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1769: ('Check Existence completed with return_status: ' || l_return_status) ;
1770: END IF ;
1771:
1772: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

1997: , x_mesg_token_tbl => l_mesg_token_tbl
1998: , x_return_status => l_return_status
1999: ) ;
2000:
2001: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2002: ('Check non-ref operation completed with return_status: ' || l_return_status) ;
2003: END IF ;
2004:
2005: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

2067: , x_mesg_token_tbl => l_mesg_token_tbl
2068: , x_return_status => l_return_status
2069: );
2070:
2071: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2072: ('Value-id conversions completed with return_status: ' || l_return_status) ;
2073: END IF ;
2074:
2075: IF l_return_status = Error_Handler.G_STATUS_ERROR

Line 2131: (Bom_Rtg_Globals.G_OPR_CREATE, Bom_Rtg_Globals.G_OPR_UPDATE)

2127: -- Process Flow step 14 : Attribute Validation for CREATE and UPDATE
2128: -- Call Bom_Validate_Op_Res.Check_Attributes
2129: --
2130: IF l_rev_op_resource_rec.transaction_type IN
2131: (Bom_Rtg_Globals.G_OPR_CREATE, Bom_Rtg_Globals.G_OPR_UPDATE)
2132: THEN
2133: Bom_Validate_Op_Res.Check_Attributes
2134: ( p_rev_op_resource_rec => l_rev_op_resource_rec
2135: , p_rev_op_res_unexp_rec => l_rev_op_res_unexp_rec

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

2136: , x_return_status => l_return_status
2137: , x_mesg_token_tbl => l_mesg_token_tbl
2138: ) ;
2139:
2140: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2141: ('Attribute validation completed with return_status: ' || l_return_status) ;
2142: END IF ;
2143:
2144:

Line 2147: IF l_rev_op_resource_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE

2143:
2144:
2145: IF l_return_status = Error_Handler.G_STATUS_ERROR
2146: THEN
2147: IF l_rev_op_resource_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE
2148: THEN
2149: l_other_message := 'BOM_RES_ATTVAL_CSEV_SKIP';
2150: l_other_token_tbl(1).token_name := 'RES_SEQ_NUMBER';
2151: l_other_token_tbl(1).token_value :=

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

2202: , x_mesg_token_tbl => l_mesg_token_tbl
2203: , x_return_status => l_return_status
2204: ) ;
2205:
2206: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2207: ('Query the original op res for rev op res with acd type : change or delete completed with return_status: ' || l_return_status) ;
2208: END IF ;
2209:
2210: IF l_return_status <> Eng_Globals.G_RECORD_FOUND

Line 2256: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Populate NULL columns') ;

2252: -- Process flow step 12: Populate NULL columns for Update and Delete
2253: -- Call Bom_Default_Op_Res.Populate_Null_Columns
2254: --
2255:
2256: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Populate NULL columns') ;
2257: END IF ;
2258:
2259: Bom_Default_Op_Res.Populate_Null_Columns
2260: ( p_rev_op_resource_rec => l_rev_op_resource_rec

Line 2269: ELSIF l_rev_op_resource_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE

2265: , x_rev_op_res_unexp_rec => l_rev_op_res_unexp_rec
2266: ) ;
2267:
2268:
2269: ELSIF l_rev_op_resource_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE
2270: THEN
2271: --
2272: -- Process Flow step 13 : Default missing values for Op Resource (CREATE)
2273: -- Call Bom_Default_Op_Res.Attribute_Defaulting

Line 2276: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Attribute Defaulting') ;

2272: -- Process Flow step 13 : Default missing values for Op Resource (CREATE)
2273: -- Call Bom_Default_Op_Res.Attribute_Defaulting
2274: --
2275:
2276: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Attribute Defaulting') ;
2277: END IF ;
2278:
2279: Bom_Default_Op_res.Attribute_Defaulting
2280: ( p_rev_op_resource_rec => l_rev_op_resource_rec

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

2286: , x_return_status => l_return_status
2287: ) ;
2288:
2289:
2290: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2291: ('Attribute Defaulting completed with return_status: ' || l_return_status) ;
2292: END IF ;
2293:
2294: IF l_return_status = Error_Handler.G_STATUS_ERROR

Line 2341: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity defaulting') ;

2337:
2338: --
2339: -- Process Flow step 18: Entity defaulting for CREATE and UPDATE
2340: --
2341: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity defaulting') ;
2342: END IF ;
2343: IF l_rev_op_resource_rec.transaction_type IN ( Bom_Rtg_Globals.G_OPR_CREATE
2344: , Bom_Rtg_Globals.G_OPR_UPDATE )
2345: THEN

Line 2343: IF l_rev_op_resource_rec.transaction_type IN ( Bom_Rtg_Globals.G_OPR_CREATE

2339: -- Process Flow step 18: Entity defaulting for CREATE and UPDATE
2340: --
2341: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity defaulting') ;
2342: END IF ;
2343: IF l_rev_op_resource_rec.transaction_type IN ( Bom_Rtg_Globals.G_OPR_CREATE
2344: , Bom_Rtg_Globals.G_OPR_UPDATE )
2345: THEN
2346: Bom_Default_Op_res.Entity_Defaulting
2347: ( p_rev_op_resource_rec => l_rev_op_resource_rec

Line 2344: , Bom_Rtg_Globals.G_OPR_UPDATE )

2340: --
2341: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity defaulting') ;
2342: END IF ;
2343: IF l_rev_op_resource_rec.transaction_type IN ( Bom_Rtg_Globals.G_OPR_CREATE
2344: , Bom_Rtg_Globals.G_OPR_UPDATE )
2345: THEN
2346: Bom_Default_Op_res.Entity_Defaulting
2347: ( p_rev_op_resource_rec => l_rev_op_resource_rec
2348: , p_rev_op_res_unexp_rec => l_rev_op_res_unexp_rec

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

2352: , x_mesg_token_tbl => l_mesg_token_tbl
2353: , x_return_status => l_return_status
2354: ) ;
2355:
2356: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2357: ('Entity defaulting completed with return_status: ' || l_return_status) ;
2358: END IF ;
2359:
2360: IF l_return_status = Error_Handler.G_STATUS_ERROR

Line 2362: IF l_rev_op_resource_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE

2358: END IF ;
2359:
2360: IF l_return_status = Error_Handler.G_STATUS_ERROR
2361: THEN
2362: IF l_rev_op_resource_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE
2363: THEN
2364: l_other_message := 'BOM_RES_ENTDEF_CSEV_SKIP';
2365: l_other_token_tbl(1).token_name := 'RES_SEQ_NUMBER';
2366: l_other_token_tbl(1).token_value :=

Line 2405: IF Bom_Rtg_Globals.Get_Debug = 'Y'

2401: --
2402: -- Process Flow step 16 - Entity Level Validation
2403: -- Call Bom_Validate_Op_Res.Check_Entity
2404: --
2405: IF Bom_Rtg_Globals.Get_Debug = 'Y'
2406: THEN Error_Handler.Write_Debug('Starting with Op Resources entity validation . . . ') ;
2407: END IF ;
2408:
2409: Bom_Validate_Op_Res.Check_Entity

Line 2424: IF l_rev_op_resource_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE

2420:
2421:
2422: IF l_return_status = Error_Handler.G_STATUS_ERROR
2423: THEN
2424: IF l_rev_op_resource_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE
2425: THEN
2426: l_other_message := 'BOM_RES_ENTVAL_CSEV_SKIP';
2427: l_other_token_tbl(1).token_name := 'RES_SEQ_NUMBER';
2428: l_other_token_tbl(1).token_value :=

Line 2462: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity validation completed with '

2458: , x_rev_sub_resource_tbl => x_rev_sub_resource_tbl
2459: ) ;
2460: END IF;
2461:
2462: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity validation completed with '
2463: || l_return_Status || ' proceeding for database writes . . . ') ;
2464: END IF;
2465:
2466: --

Line 2505: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Database writes completed with status: ' || l_return_status);

2501: , x_rev_sub_resource_tbl=> x_rev_sub_resource_tbl
2502: ) ;
2503: END IF;
2504:
2505: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Database writes completed with status: ' || l_return_status);
2506: END IF;
2507:
2508: END IF; -- END IF statement that checks RETURN STATUS
2509:

Line 2934: -- Call the Bom_Rtg_Globals.Transaction_Type_Validity

2930:
2931: --
2932: -- Process Flow step 3 :Check if transaction_type is valid
2933: -- Transaction_Type must be CRATE, UPDATE, DELETE or CANCEL
2934: -- Call the Bom_Rtg_Globals.Transaction_Type_Validity
2935: --
2936:
2937: ENG_GLOBALS.Transaction_Type_Validity
2938: ( p_transaction_type => l_rev_operation_rec.transaction_type

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

2959: , x_mesg_token_tbl => l_mesg_token_tbl
2960: , x_return_status => l_return_status
2961: ) ;
2962:
2963: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2964: ('Convert to User Unique Index to Index1 completed with return_status: ' || l_return_status) ;
2965: END IF;
2966:
2967: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

3002: , x_other_token_tbl => l_other_token_tbl
3003: , x_Return_Status => l_return_status
3004: ) ;
3005:
3006: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3007: ('Convert to User Unique Index to Index1 for Rtg and Rev Item Seq completed with return_status: ' || l_return_status) ;
3008: END IF;
3009:
3010: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

3040: , x_other_token_tbl => l_other_token_tbl
3041: , x_return_status => l_return_status
3042: ) ;
3043:
3044: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3045: ('Convert to User Unique Index to Index2 completed with return_status: ' || l_return_status) ;
3046: END IF;
3047:
3048: IF l_return_status = Error_Handler.G_STATUS_ERROR

Line 3062: Bom_Rtg_Globals.Set_Unit_Controlled_Item

3058: END IF ;
3059: */
3060:
3061: -- Set Unit Controlled Item
3062: Bom_Rtg_Globals.Set_Unit_Controlled_Item
3063: ( p_inventory_item_id => l_rev_comp_unexp_rec.revised_item_id
3064: , p_organization_id => l_rev_comp_unexp_rec.organization_id
3065: );
3066:

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

3063: ( p_inventory_item_id => l_rev_comp_unexp_rec.revised_item_id
3064: , p_organization_id => l_rev_comp_unexp_rec.organization_id
3065: );
3066:
3067: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3068: ('Set unit controlled item flag . . .' ) ;
3069: END IF ;
3070:
3071: --

Line 3076: IF Bom_Rtg_Globals.Get_Unit_Controlled_Item THEN

3072: -- Process Flow step 5 : Check the parent revised item is controlled
3073: -- by model unit effectivity
3074: --
3075: --
3076: IF Bom_Rtg_Globals.Get_Unit_Controlled_Item THEN
3077: l_return_status := FND_API.G_RET_STS_ERROR;
3078: l_token_tbl(1).token_name := 'OP_SEQ_NUMBER';
3079: l_token_tbl(1).token_value := l_rev_operation_rec.operation_sequence_number ;
3080: l_token_tbl(2).token_name := 'REVISED_ITEM_NAME';

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

3090: l_return_status := 'F';
3091: RAISE EXC_FAT_QUIT_SIBLINGS ; -- RAISE EXC_FAT_QUIT_BRANCH
3092: END IF;
3093:
3094: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3095: ('Check if the parent item is unit controlled item with return_status: ' || l_return_status) ;
3096: END IF ;
3097:
3098: --

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

3109: , x_return_status => l_return_status
3110: ) ;
3111:
3112:
3113: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3114: ('Check Existence completed with return_status: ' || l_return_status) ;
3115: END IF ;
3116:
3117: IF l_return_status = Error_Handler.G_STATUS_ERROR

Line 3144: (Bom_Rtg_Globals.G_OPR_UPDATE, Bom_Rtg_Globals.G_OPR_DELETE,

3140: -- Process Flow step 7: Check lineage
3141: --
3142: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Check lineage'); END IF;
3143: IF l_rev_operation_rec.transaction_type IN
3144: (Bom_Rtg_Globals.G_OPR_UPDATE, Bom_Rtg_Globals.G_OPR_DELETE,
3145: Bom_Rtg_Globals.G_OPR_CANCEL)
3146: THEN
3147:
3148: BOM_Validate_Op_Seq.Check_Lineage

Line 3145: Bom_Rtg_Globals.G_OPR_CANCEL)

3141: --
3142: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Check lineage'); END IF;
3143: IF l_rev_operation_rec.transaction_type IN
3144: (Bom_Rtg_Globals.G_OPR_UPDATE, Bom_Rtg_Globals.G_OPR_DELETE,
3145: Bom_Rtg_Globals.G_OPR_CANCEL)
3146: THEN
3147:
3148: BOM_Validate_Op_Seq.Check_Lineage
3149: ( p_routing_sequence_id =>

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

3335: , x_mesg_token_tbl => l_mesg_token_tbl
3336: , x_return_status => l_return_status
3337: ) ;
3338:
3339: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3340: ('Check the routing non-referenced common completed with return_status: ' || l_return_status) ;
3341: END IF ;
3342:
3343: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

3387: , x_mesg_token_tbl => l_mesg_token_tbl
3388: , x_return_status => l_return_status
3389: ) ;
3390:
3391: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3392: ('Check non-operating columns completed with return_status: ' || l_return_status) ;
3393: END IF ;
3394:
3395: IF l_return_status = Error_Handler.G_STATUS_UNEXPECTED

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

3435: , x_mesg_token_tbl => l_mesg_token_tbl
3436: , x_return_status => l_return_status
3437: );
3438:
3439: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3440: ('Value-id conversions completed with return_status: ' ||
3441: l_return_status) ;
3442: END IF ;
3443:

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

3495: , x_mesg_token_tbl => l_mesg_token_tbl
3496: ) ;
3497:
3498:
3499: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3500: ('Check required completed with return_status: ' || l_return_status) ;
3501: END IF ;
3502:
3503:

Line 3506: IF l_rev_operation_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE

3502:
3503:
3504: IF l_return_status = Error_Handler.G_STATUS_ERROR
3505: THEN
3506: IF l_rev_operation_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE
3507: THEN
3508: l_other_message := 'BOM_OP_REQ_CSEV_SKIP';
3509: l_other_token_tbl(1).token_name := 'OP_SEQ_NUMBER';
3510: l_other_token_tbl(1).token_value :=

Line 3531: (Bom_Rtg_Globals.G_OPR_CREATE, Bom_Rtg_Globals.G_OPR_UPDATE)

3527: -- Process Flow step 14 : Attribute Validation for CREATE and UPDATE
3528: --
3529: --
3530: IF l_rev_operation_rec.transaction_type IN
3531: (Bom_Rtg_Globals.G_OPR_CREATE, Bom_Rtg_Globals.G_OPR_UPDATE)
3532: THEN
3533: Bom_Validate_Op_Seq.Check_Attributes
3534: ( p_rev_operation_rec => l_rev_operation_rec
3535: , p_rev_op_unexp_rec => l_rev_op_unexp_rec

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

3536: , x_return_status => l_return_status
3537: , x_mesg_token_tbl => l_mesg_token_tbl
3538: ) ;
3539:
3540: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3541: ('Attribute validation completed with return_status: ' || l_return_status) ;
3542: END IF ;
3543:
3544: IF l_return_status = Error_Handler.G_STATUS_ERROR

Line 3546: IF l_rev_operation_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE

3542: END IF ;
3543:
3544: IF l_return_status = Error_Handler.G_STATUS_ERROR
3545: THEN
3546: IF l_rev_operation_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE
3547: THEN
3548: l_other_message := 'BOM_OP_ATTVAL_CSEV_SKIP';
3549: l_other_token_tbl(1).token_name := 'OP_SEQ_NUMBER';
3550: l_other_token_tbl(1).token_value :=

Line 3661: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Populate NULL columns') ;

3657: -- and Creates with ACD_Type 'Add'.
3658: -- Call Bom_Default_Op_Seq.Populate_Null_Columns
3659: --
3660:
3661: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Populate NULL columns') ;
3662: END IF ;
3663:
3664:
3665: Bom_Default_Op_Seq.Populate_Null_Columns

Line 3675: ELSIF l_rev_operation_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE

3671: , x_rev_op_unexp_rec => l_rev_op_unexp_rec
3672: ) ;
3673:
3674:
3675: ELSIF l_rev_operation_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE
3676: AND l_rev_operation_rec.acd_type <> 2 -- ACD Type : Not Change
3677: THEN
3678: --
3679: -- Process Flow step 16 : Default missing values for Operation (CREATE)

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

3690: , x_mesg_token_tbl => l_mesg_token_tbl
3691: , x_return_status => l_return_status
3692: ) ;
3693:
3694: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3695: ('Attribute Defaulting completed with return_status: ' || l_return_status) ;
3696: END IF ;
3697:
3698:

Line 3742: IF l_rev_operation_rec.transaction_type IN ( Bom_Rtg_Globals.G_OPR_CREATE

3738: --
3739: -- Process Flow step 17: Conditionally Required Attributes
3740: --
3741: --
3742: IF l_rev_operation_rec.transaction_type IN ( Bom_Rtg_Globals.G_OPR_CREATE
3743: , Bom_Rtg_Globals.G_OPR_UPDATE )
3744: THEN
3745: Bom_Validate_Op_Seq.Check_Conditionally_Required
3746: ( p_rev_operation_rec => l_rev_operation_rec

Line 3743: , Bom_Rtg_Globals.G_OPR_UPDATE )

3739: -- Process Flow step 17: Conditionally Required Attributes
3740: --
3741: --
3742: IF l_rev_operation_rec.transaction_type IN ( Bom_Rtg_Globals.G_OPR_CREATE
3743: , Bom_Rtg_Globals.G_OPR_UPDATE )
3744: THEN
3745: Bom_Validate_Op_Seq.Check_Conditionally_Required
3746: ( p_rev_operation_rec => l_rev_operation_rec
3747: , p_rev_op_unexp_rec => l_rev_op_unexp_rec

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

3748: , x_return_status => l_return_status
3749: , x_mesg_token_tbl => l_mesg_token_tbl
3750: ) ;
3751:
3752: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3753: ('Check Conditionally Required Attr. completed with return_status: ' || l_return_status) ;
3754: END IF ;
3755:
3756: IF l_return_status = Error_Handler.G_STATUS_ERROR

Line 3758: IF l_rev_operation_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE

3754: END IF ;
3755:
3756: IF l_return_status = Error_Handler.G_STATUS_ERROR
3757: THEN
3758: IF l_rev_operation_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE
3759: THEN
3760: l_other_message := 'BOM_OP_CONREQ_CSEV_SKIP';
3761: l_other_token_tbl(1).token_name := 'OP_SEQ_NUMBER';
3762: l_other_token_tbl(1).token_value :=

Line 3804: IF l_rev_operation_rec.transaction_type IN ( Bom_Rtg_Globals.G_OPR_CREATE

3800: -- Process Flow step 18: Entity defaulting for CREATE and UPDATE
3801: -- Merged into Process Flow step 13 : Default missing values
3802: --
3803:
3804: IF l_rev_operation_rec.transaction_type IN ( Bom_Rtg_Globals.G_OPR_CREATE
3805: , Bom_Rtg_Globals.G_OPR_UPDATE )
3806: THEN
3807: Bom_Default_Op_Seq.Entity_Defaulting
3808: ( p_rev_operation_rec => l_rev_operation_rec

Line 3805: , Bom_Rtg_Globals.G_OPR_UPDATE )

3801: -- Merged into Process Flow step 13 : Default missing values
3802: --
3803:
3804: IF l_rev_operation_rec.transaction_type IN ( Bom_Rtg_Globals.G_OPR_CREATE
3805: , Bom_Rtg_Globals.G_OPR_UPDATE )
3806: THEN
3807: Bom_Default_Op_Seq.Entity_Defaulting
3808: ( p_rev_operation_rec => l_rev_operation_rec
3809: , p_rev_op_unexp_rec => l_rev_op_unexp_rec

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

3813: , x_mesg_token_tbl => l_mesg_token_tbl
3814: , x_return_status => l_return_status
3815: ) ;
3816:
3817: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3818: ('Entity defaulting completed with return_status: ' || l_return_status) ;
3819: END IF ;
3820:
3821: IF l_return_status = Error_Handler.G_STATUS_ERROR

Line 3823: IF l_rev_operation_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE

3819: END IF ;
3820:
3821: IF l_return_status = Error_Handler.G_STATUS_ERROR
3822: THEN
3823: IF l_rev_operation_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE
3824: THEN
3825: l_other_message := 'BOM_OP_ENTDEF_CSEV_SKIP';
3826: l_other_token_tbl(1).token_name := 'OP_SEQ_NUMBER';
3827: l_other_token_tbl(1).token_value :=

Line 3869: IF Bom_Rtg_Globals.Get_Debug = 'Y'

3865: -- Process Flow step 19 - Entity Level Validation
3866: -- Call Bom_Validate_Op_Seq.Check_Entity
3867: --
3868:
3869: IF Bom_Rtg_Globals.Get_Debug = 'Y'
3870: THEN Error_Handler.Write_Debug('Starting with Revised Operatin Entity Validation . . . ') ;
3871: END IF ;
3872:
3873: Bom_Validate_Op_Seq.Check_Entity

Line 3888: IF l_rev_operation_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE

3884:
3885:
3886: IF l_return_status = Error_Handler.G_STATUS_ERROR
3887: THEN
3888: IF l_rev_operation_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE
3889: THEN
3890: l_other_message := 'BOM_OP_ENTVAL_CSEV_SKIP';
3891: l_other_token_tbl(1).token_name := 'OP_SEQ_NUMBER';
3892: l_other_token_tbl(1).token_value :=

Line 3927: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity validation completed with '

3923: , x_rev_sub_resource_tbl=> x_rev_sub_resource_tbl
3924: ) ;
3925: END IF;
3926:
3927: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity validation completed with '
3928: || l_return_Status || ' proceeding for database writes . . . ') ;
3929: END IF;
3930:
3931: --

Line 3934: IF l_rev_operation_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CANCEL

3930:
3931: --
3932: -- Process Flow step 20 : Database Writes
3933: --
3934: IF l_rev_operation_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CANCEL
3935: THEN
3936:
3937: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3938: ('Operatin Sequence: Perform Cancel Operation . . .') ;

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

3933: --
3934: IF l_rev_operation_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CANCEL
3935: THEN
3936:
3937: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3938: ('Operatin Sequence: Perform Cancel Operation . . .') ;
3939: END IF ;
3940:
3941: ENG_Globals.Cancel_Operation

Line 3945: , p_user_id => BOM_Rtg_Globals.Get_User_Id

3941: ENG_Globals.Cancel_Operation
3942: ( p_operation_sequence_id => l_rev_op_unexp_rec.operation_sequence_id
3943: , p_cancel_comments => l_rev_operation_rec.cancel_comments
3944: , p_op_seq_num => l_rev_operation_rec.operation_sequence_number
3945: , p_user_id => BOM_Rtg_Globals.Get_User_Id
3946: , p_login_id => BOM_Rtg_Globals.Get_Login_Id
3947: , p_prog_id => BOM_Rtg_Globals.Get_Prog_Id
3948: , p_prog_appid => BOM_Rtg_Globals.Get_Prog_AppId
3949: , x_return_status => l_return_status

Line 3946: , p_login_id => BOM_Rtg_Globals.Get_Login_Id

3942: ( p_operation_sequence_id => l_rev_op_unexp_rec.operation_sequence_id
3943: , p_cancel_comments => l_rev_operation_rec.cancel_comments
3944: , p_op_seq_num => l_rev_operation_rec.operation_sequence_number
3945: , p_user_id => BOM_Rtg_Globals.Get_User_Id
3946: , p_login_id => BOM_Rtg_Globals.Get_Login_Id
3947: , p_prog_id => BOM_Rtg_Globals.Get_Prog_Id
3948: , p_prog_appid => BOM_Rtg_Globals.Get_Prog_AppId
3949: , x_return_status => l_return_status
3950: , x_mesg_token_tbl => l_mesg_token_tbl

Line 3947: , p_prog_id => BOM_Rtg_Globals.Get_Prog_Id

3943: , p_cancel_comments => l_rev_operation_rec.cancel_comments
3944: , p_op_seq_num => l_rev_operation_rec.operation_sequence_number
3945: , p_user_id => BOM_Rtg_Globals.Get_User_Id
3946: , p_login_id => BOM_Rtg_Globals.Get_Login_Id
3947: , p_prog_id => BOM_Rtg_Globals.Get_Prog_Id
3948: , p_prog_appid => BOM_Rtg_Globals.Get_Prog_AppId
3949: , x_return_status => l_return_status
3950: , x_mesg_token_tbl => l_mesg_token_tbl
3951: ) ;

Line 3948: , p_prog_appid => BOM_Rtg_Globals.Get_Prog_AppId

3944: , p_op_seq_num => l_rev_operation_rec.operation_sequence_number
3945: , p_user_id => BOM_Rtg_Globals.Get_User_Id
3946: , p_login_id => BOM_Rtg_Globals.Get_Login_Id
3947: , p_prog_id => BOM_Rtg_Globals.Get_Prog_Id
3948: , p_prog_appid => BOM_Rtg_Globals.Get_Prog_AppId
3949: , x_return_status => l_return_status
3950: , x_mesg_token_tbl => l_mesg_token_tbl
3951: ) ;
3952:

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

3949: , x_return_status => l_return_status
3950: , x_mesg_token_tbl => l_mesg_token_tbl
3951: ) ;
3952:
3953: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3954: ('Cancel Operation is completed with return status ' || l_return_status ) ;
3955: END IF ;
3956:
3957: ELSE

Line 4036: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Database writes completed with status ' || l_return_status);

4032:
4033: END IF ;
4034:
4035:
4036: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Database writes completed with status ' || l_return_status);
4037: END IF;
4038:
4039: /*Bug 6485168. l_process_children should be set inside the if clause. In the else set it to false
4040: END IF; -- END IF statement that checks RETURN STATUS