DBA Data[Home] [Help]

APPS.ENG_ECO_PVT dependencies on BOM_RTG_GLOBALS

Line 240: -- Call the Bom_Rtg_Globals.Transaction_Type_Validity

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

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

264: , x_mesg_token_tbl => l_mesg_token_tbl
265: , x_return_status => l_return_status
266: ) ;
267:
268: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
269: ('Convert to User Unique Index to Index1 completed with return_status: ' || l_return_status) ;
270: END IF;
271:
272: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

315: , x_other_token_tbl => l_other_token_tbl
316: , x_Return_Status => l_return_status
317: ) ;
318:
319: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
320: ('Convert to User Unique Index to Index1 for Rtg and Rev Item Seq completed with return_status: ' || l_return_status) ;
321: END IF;
322:
323: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

361: , x_other_token_tbl => l_other_token_tbl
362: , x_return_status => l_return_status
363: ) ;
364:
365: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
366: ('Convert to User Unique Index to Index2 completed with return_status: ' || l_return_status) ;
367: END IF;
368:
369: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

397: , x_return_status => l_return_status
398: ) ;
399:
400:
401: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
402: ('Check Existence completed with return_status: ' || l_return_status) ;
403: END IF ;
404:
405: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

659: , x_mesg_token_tbl => l_mesg_token_tbl
660: , x_return_status => l_return_status
661: ) ;
662:
663: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
664: ('Check non-ref operation completed with return_status: '
665: || l_return_status) ;
666: END IF;
667:

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

743: , x_mesg_token_tbl => l_mesg_token_tbl
744: , x_return_status => l_return_status
745: );
746:
747: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
748: ('Value-id conversions completed with return_status: ' || l_return_status) ;
749: END IF ;
750:
751: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

810: -- Call Bom_Validate_Op_Res.Check_Attributes
811: --
812:
813: IF l_rev_sub_resource_rec.transaction_type IN
814: (Bom_Rtg_Globals.G_OPR_CREATE, Bom_Rtg_Globals.G_OPR_UPDATE)
815: THEN
816: Bom_Validate_Sub_Op_Res.Check_Attributes
817: ( p_rev_sub_resource_rec => l_rev_sub_resource_rec
818: , p_rev_sub_res_unexp_rec => l_rev_sub_res_unexp_rec

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

819: , x_return_status => l_return_status
820: , x_mesg_token_tbl => l_mesg_token_tbl
821: ) ;
822:
823: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
824: ('Attribute validation completed with return_status: ' ||
825: l_return_status) ;
826: END IF ;
827:

Line 830: IF l_rev_sub_resource_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE

826: END IF ;
827:
828: IF l_return_status = Error_Handler.G_STATUS_ERROR
829: THEN
830: IF l_rev_sub_resource_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE
831: THEN
832: l_other_message := 'BOM_SUB_RES_ATTVAL_CSEV_SKIP';
833: l_other_token_tbl(1).token_name := 'SUB_RESOURCE_CODE';
834: l_other_token_tbl(1).token_value :=

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

872: END IF;
873: END IF;
874:
875: IF l_rev_sub_resource_rec.transaction_type IN
876: (Bom_Rtg_Globals.G_OPR_UPDATE, Bom_Rtg_Globals.G_OPR_DELETE)
877: THEN
878:
879: --
880: -- Process flow step 16: Populate NULL columns for Update and Delete

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

880: -- Process flow step 16: Populate NULL columns for Update and Delete
881: -- Call Bom_Default_Op_Res.Populate_Null_Columns
882: --
883:
884: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Populate NULL columns') ;
885: END IF ;
886:
887: Bom_Default_Sub_Op_Res.Populate_Null_Columns
888: ( p_rev_sub_resource_rec => l_rev_sub_resource_rec

Line 897: ELSIF l_rev_sub_resource_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE

893: , x_rev_sub_res_unexp_rec => l_rev_sub_res_unexp_rec
894: ) ;
895:
896:
897: ELSIF l_rev_sub_resource_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE
898: THEN
899: --
900: -- Process Flow step 18 : Default missing values for Sub Op Resource (CREATE)
901: -- Call Bom_Default_Op_Res.Attribute_Defaulting

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

900: -- Process Flow step 18 : Default missing values for Sub Op Resource (CREATE)
901: -- Call Bom_Default_Op_Res.Attribute_Defaulting
902: --
903:
904: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Attribute Defaulting') ;
905: END IF ;
906:
907: Bom_Default_Sub_Op_Res.Attribute_Defaulting
908: ( p_rev_sub_resource_rec => l_rev_sub_resource_rec

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

914: , x_return_status => l_return_status
915: ) ;
916:
917:
918: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
919: ('Attribute Defaulting completed with return_status: ' || l_return_status) ;
920: END IF ;
921:
922: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

970: -- Process Flow step 18: Entity defaulting for CREATE and UPDATE
971: --
972:
973:
974: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity defaulting') ;
975: END IF ;
976: IF l_rev_sub_resource_rec.transaction_type IN ( Bom_Rtg_Globals.G_OPR_CREATE
977: , Bom_Rtg_Globals.G_OPR_UPDATE )
978: THEN

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

972:
973:
974: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity defaulting') ;
975: END IF ;
976: IF l_rev_sub_resource_rec.transaction_type IN ( Bom_Rtg_Globals.G_OPR_CREATE
977: , Bom_Rtg_Globals.G_OPR_UPDATE )
978: THEN
979: Bom_Default_Sub_OP_Res.Entity_Defaulting
980: ( p_rev_sub_resource_rec => l_rev_sub_resource_rec

Line 977: , Bom_Rtg_Globals.G_OPR_UPDATE )

973:
974: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity defaulting') ;
975: END IF ;
976: IF l_rev_sub_resource_rec.transaction_type IN ( Bom_Rtg_Globals.G_OPR_CREATE
977: , Bom_Rtg_Globals.G_OPR_UPDATE )
978: THEN
979: Bom_Default_Sub_OP_Res.Entity_Defaulting
980: ( p_rev_sub_resource_rec => l_rev_sub_resource_rec
981: , p_rev_sub_res_unexp_rec => l_rev_sub_res_unexp_rec

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

985: , x_mesg_token_tbl => l_mesg_token_tbl
986: , x_return_status => l_return_status
987: ) ;
988:
989: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
990: ('Entity defaulting completed with return_status: ' || l_return_status) ;
991: END IF ;
992:
993: IF l_return_status = Error_Handler.G_STATUS_ERROR

Line 995: IF l_rev_sub_resource_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE

991: END IF ;
992:
993: IF l_return_status = Error_Handler.G_STATUS_ERROR
994: THEN
995: IF l_rev_sub_resource_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE
996: THEN
997: l_other_message := 'BOM_SUB_RES_ENTDEF_CSEV_SKIP';
998: l_other_token_tbl(1).token_name := 'SUB_RESOURCE_CODE';
999: l_other_token_tbl(1).token_value :=

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

1041: -- Process Flow step 19 - Entity Level Validation
1042: -- Call Bom_Validate_Op_Res.Check_Entity
1043: --
1044:
1045: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN
1046: Error_Handler.Write_Debug('Starting Entity Validation for Sub Op Resources . . . ') ;
1047: END IF ;
1048:
1049: Bom_Validate_Sub_Op_Res.Check_Entity

Line 1063: IF l_rev_sub_resource_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE

1059: ) ;
1060:
1061: IF l_return_status = Error_Handler.G_STATUS_ERROR
1062: THEN
1063: IF l_rev_sub_resource_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE
1064: THEN
1065: l_other_message := 'BOM_SUB_RES_ENTVAL_CSEV_SKIP';
1066: l_other_token_tbl(1).token_name := 'SUB_RESOURCE_CODE';
1067: l_other_token_tbl(1).token_value :=

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

1102: , x_rev_sub_resource_tbl=> x_rev_sub_resource_tbl
1103: ) ;
1104: END IF;
1105:
1106: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity validation completed with '
1107: || l_return_Status || ' proceeding for database writes . . . ') ;
1108: END IF;
1109:
1110: --

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

1148: , x_rev_sub_resource_tbl=> x_rev_sub_resource_tbl
1149: ) ;
1150: END IF;
1151:
1152: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Database writes completed with status ' || l_return_status);
1153: END IF;
1154:
1155:
1156: END IF; -- END IF statement that checks RETURN STATUS

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

1553: -- Process Flow Step 2: Check if record has not yet been processed and
1554: -- that it is the child of the parent that called this procedure
1555: --
1556:
1557: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1558: ('ECO Name: ' || p_change_notice ||
1559: ' Org: ' || p_organization_id ||
1560: ' Eff. Dt: ' || to_char(p_effectivity_date) ||
1561: ' Revision: ' || p_item_revision ||

Line 1636: -- Call the Bom_Rtg_Globals.Transaction_Type_Validity

1632:
1633: --
1634: -- Process Flow step 3 :Check if transaction_type is valid
1635: -- Transaction_Type must be CRATE, UPDATE, DELETE or CANCEL(in only ECO for Rrg)
1636: -- Call the Bom_Rtg_Globals.Transaction_Type_Validity
1637: --
1638:
1639: Eng_Globals.Transaction_Type_Validity
1640: ( p_transaction_type => l_rev_op_resource_rec.transaction_type

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

1662: , x_mesg_token_tbl => l_mesg_token_tbl
1663: , x_return_status => l_return_status
1664: ) ;
1665:
1666: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1667: ('Convert to User Unique Index to Index1 completed with return_status: ' || l_return_status) ;
1668: END IF;
1669:
1670: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

1707: , x_other_token_tbl => l_other_token_tbl
1708: , x_Return_Status => l_return_status
1709: ) ;
1710:
1711: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1712: ('Convert to User Unique Index to Index1 for Rtg and Rev Item Seq completed with return_status: ' || l_return_status) ;
1713: END IF;
1714:
1715: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

1745: , x_other_token_tbl => l_other_token_tbl
1746: , x_return_status => l_return_status
1747: ) ;
1748:
1749: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1750: ('Convert to User Unique Index to Index2 completed with return_status: ' || l_return_status) ;
1751: END IF;
1752:
1753: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

1776: , x_mesg_token_tbl => l_mesg_token_tbl
1777: , x_return_status => l_return_status
1778: ) ;
1779:
1780: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1781: ('Check Existence completed with return_status: ' || l_return_status) ;
1782: END IF ;
1783:
1784: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

2009: , x_mesg_token_tbl => l_mesg_token_tbl
2010: , x_return_status => l_return_status
2011: ) ;
2012:
2013: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2014: ('Check non-ref operation completed with return_status: ' || l_return_status) ;
2015: END IF ;
2016:
2017: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

2079: , x_mesg_token_tbl => l_mesg_token_tbl
2080: , x_return_status => l_return_status
2081: );
2082:
2083: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2084: ('Value-id conversions completed with return_status: ' || l_return_status) ;
2085: END IF ;
2086:
2087: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

2139: -- Process Flow step 14 : Attribute Validation for CREATE and UPDATE
2140: -- Call Bom_Validate_Op_Res.Check_Attributes
2141: --
2142: IF l_rev_op_resource_rec.transaction_type IN
2143: (Bom_Rtg_Globals.G_OPR_CREATE, Bom_Rtg_Globals.G_OPR_UPDATE)
2144: THEN
2145: Bom_Validate_Op_Res.Check_Attributes
2146: ( p_rev_op_resource_rec => l_rev_op_resource_rec
2147: , p_rev_op_res_unexp_rec => l_rev_op_res_unexp_rec

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

2148: , x_return_status => l_return_status
2149: , x_mesg_token_tbl => l_mesg_token_tbl
2150: ) ;
2151:
2152: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2153: ('Attribute validation completed with return_status: ' || l_return_status) ;
2154: END IF ;
2155:
2156:

Line 2159: IF l_rev_op_resource_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE

2155:
2156:
2157: IF l_return_status = Error_Handler.G_STATUS_ERROR
2158: THEN
2159: IF l_rev_op_resource_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE
2160: THEN
2161: l_other_message := 'BOM_RES_ATTVAL_CSEV_SKIP';
2162: l_other_token_tbl(1).token_name := 'RES_SEQ_NUMBER';
2163: l_other_token_tbl(1).token_value :=

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

2214: , x_mesg_token_tbl => l_mesg_token_tbl
2215: , x_return_status => l_return_status
2216: ) ;
2217:
2218: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2219: ('Query the original op res for rev op res with acd type : change or delete completed with return_status: ' || l_return_status) ;
2220: END IF ;
2221:
2222: IF l_return_status <> Eng_Globals.G_RECORD_FOUND

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

2264: -- Process flow step 12: Populate NULL columns for Update and Delete
2265: -- Call Bom_Default_Op_Res.Populate_Null_Columns
2266: --
2267:
2268: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Populate NULL columns') ;
2269: END IF ;
2270:
2271: Bom_Default_Op_Res.Populate_Null_Columns
2272: ( p_rev_op_resource_rec => l_rev_op_resource_rec

Line 2281: ELSIF l_rev_op_resource_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE

2277: , x_rev_op_res_unexp_rec => l_rev_op_res_unexp_rec
2278: ) ;
2279:
2280:
2281: ELSIF l_rev_op_resource_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE
2282: THEN
2283: --
2284: -- Process Flow step 13 : Default missing values for Op Resource (CREATE)
2285: -- Call Bom_Default_Op_Res.Attribute_Defaulting

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

2284: -- Process Flow step 13 : Default missing values for Op Resource (CREATE)
2285: -- Call Bom_Default_Op_Res.Attribute_Defaulting
2286: --
2287:
2288: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Attribute Defaulting') ;
2289: END IF ;
2290:
2291: Bom_Default_Op_res.Attribute_Defaulting
2292: ( p_rev_op_resource_rec => l_rev_op_resource_rec

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

2298: , x_return_status => l_return_status
2299: ) ;
2300:
2301:
2302: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2303: ('Attribute Defaulting completed with return_status: ' || l_return_status) ;
2304: END IF ;
2305:
2306: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

2349:
2350: --
2351: -- Process Flow step 18: Entity defaulting for CREATE and UPDATE
2352: --
2353: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity defaulting') ;
2354: END IF ;
2355: IF l_rev_op_resource_rec.transaction_type IN ( Bom_Rtg_Globals.G_OPR_CREATE
2356: , Bom_Rtg_Globals.G_OPR_UPDATE )
2357: THEN

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

2351: -- Process Flow step 18: Entity defaulting for CREATE and UPDATE
2352: --
2353: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity defaulting') ;
2354: END IF ;
2355: IF l_rev_op_resource_rec.transaction_type IN ( Bom_Rtg_Globals.G_OPR_CREATE
2356: , Bom_Rtg_Globals.G_OPR_UPDATE )
2357: THEN
2358: Bom_Default_Op_res.Entity_Defaulting
2359: ( p_rev_op_resource_rec => l_rev_op_resource_rec

Line 2356: , Bom_Rtg_Globals.G_OPR_UPDATE )

2352: --
2353: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity defaulting') ;
2354: END IF ;
2355: IF l_rev_op_resource_rec.transaction_type IN ( Bom_Rtg_Globals.G_OPR_CREATE
2356: , Bom_Rtg_Globals.G_OPR_UPDATE )
2357: THEN
2358: Bom_Default_Op_res.Entity_Defaulting
2359: ( p_rev_op_resource_rec => l_rev_op_resource_rec
2360: , p_rev_op_res_unexp_rec => l_rev_op_res_unexp_rec

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

2364: , x_mesg_token_tbl => l_mesg_token_tbl
2365: , x_return_status => l_return_status
2366: ) ;
2367:
2368: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2369: ('Entity defaulting completed with return_status: ' || l_return_status) ;
2370: END IF ;
2371:
2372: IF l_return_status = Error_Handler.G_STATUS_ERROR

Line 2374: IF l_rev_op_resource_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE

2370: END IF ;
2371:
2372: IF l_return_status = Error_Handler.G_STATUS_ERROR
2373: THEN
2374: IF l_rev_op_resource_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE
2375: THEN
2376: l_other_message := 'BOM_RES_ENTDEF_CSEV_SKIP';
2377: l_other_token_tbl(1).token_name := 'RES_SEQ_NUMBER';
2378: l_other_token_tbl(1).token_value :=

Line 2417: IF Bom_Rtg_Globals.Get_Debug = 'Y'

2413: --
2414: -- Process Flow step 16 - Entity Level Validation
2415: -- Call Bom_Validate_Op_Res.Check_Entity
2416: --
2417: IF Bom_Rtg_Globals.Get_Debug = 'Y'
2418: THEN Error_Handler.Write_Debug('Starting with Op Resources entity validation . . . ') ;
2419: END IF ;
2420:
2421: Bom_Validate_Op_Res.Check_Entity

Line 2436: IF l_rev_op_resource_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE

2432:
2433:
2434: IF l_return_status = Error_Handler.G_STATUS_ERROR
2435: THEN
2436: IF l_rev_op_resource_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE
2437: THEN
2438: l_other_message := 'BOM_RES_ENTVAL_CSEV_SKIP';
2439: l_other_token_tbl(1).token_name := 'RES_SEQ_NUMBER';
2440: l_other_token_tbl(1).token_value :=

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

2470: , x_rev_sub_resource_tbl => x_rev_sub_resource_tbl
2471: ) ;
2472: END IF;
2473:
2474: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity validation completed with '
2475: || l_return_Status || ' proceeding for database writes . . . ') ;
2476: END IF;
2477:
2478: --

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

2513: , x_rev_sub_resource_tbl=> x_rev_sub_resource_tbl
2514: ) ;
2515: END IF;
2516:
2517: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Database writes completed with status: ' || l_return_status);
2518: END IF;
2519:
2520: END IF; -- END IF statement that checks RETURN STATUS
2521:

Line 2950: -- Call the Bom_Rtg_Globals.Transaction_Type_Validity

2946:
2947: --
2948: -- Process Flow step 3 :Check if transaction_type is valid
2949: -- Transaction_Type must be CRATE, UPDATE, DELETE or CANCEL
2950: -- Call the Bom_Rtg_Globals.Transaction_Type_Validity
2951: --
2952:
2953: ENG_GLOBALS.Transaction_Type_Validity
2954: ( p_transaction_type => l_rev_operation_rec.transaction_type

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

2975: , x_mesg_token_tbl => l_mesg_token_tbl
2976: , x_return_status => l_return_status
2977: ) ;
2978:
2979: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2980: ('Convert to User Unique Index to Index1 completed with return_status: ' || l_return_status) ;
2981: END IF;
2982:
2983: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

3019: , x_other_token_tbl => l_other_token_tbl
3020: , x_Return_Status => l_return_status
3021: ) ;
3022:
3023: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3024: ('Convert to User Unique Index to Index1 for Rtg and Rev Item Seq completed with return_status: ' || l_return_status) ;
3025: END IF;
3026:
3027: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

3057: , x_other_token_tbl => l_other_token_tbl
3058: , x_return_status => l_return_status
3059: ) ;
3060:
3061: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3062: ('Convert to User Unique Index to Index2 completed with return_status: ' || l_return_status) ;
3063: END IF;
3064:
3065: IF l_return_status = Error_Handler.G_STATUS_ERROR

Line 3079: Bom_Rtg_Globals.Set_Unit_Controlled_Item

3075: END IF ;
3076: */
3077:
3078: -- Set Unit Controlled Item
3079: Bom_Rtg_Globals.Set_Unit_Controlled_Item
3080: ( p_inventory_item_id => l_rev_comp_unexp_rec.revised_item_id
3081: , p_organization_id => l_rev_comp_unexp_rec.organization_id
3082: );
3083:

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

3080: ( p_inventory_item_id => l_rev_comp_unexp_rec.revised_item_id
3081: , p_organization_id => l_rev_comp_unexp_rec.organization_id
3082: );
3083:
3084: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3085: ('Set unit controlled item flag . . .' ) ;
3086: END IF ;
3087:
3088: --

Line 3093: IF Bom_Rtg_Globals.Get_Unit_Controlled_Item THEN

3089: -- Process Flow step 5 : Check the parent revised item is controlled
3090: -- by model unit effectivity
3091: --
3092: --
3093: IF Bom_Rtg_Globals.Get_Unit_Controlled_Item THEN
3094: l_return_status := FND_API.G_RET_STS_ERROR;
3095: l_token_tbl(1).token_name := 'OP_SEQ_NUMBER';
3096: l_token_tbl(1).token_value := l_rev_operation_rec.operation_sequence_number ;
3097: l_token_tbl(2).token_name := 'REVISED_ITEM_NAME';

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

3107: l_return_status := 'F';
3108: RAISE EXC_FAT_QUIT_SIBLINGS ; -- RAISE EXC_FAT_QUIT_BRANCH
3109: END IF;
3110:
3111: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3112: ('Check if the parent item is unit controlled item with return_status: ' || l_return_status) ;
3113: END IF ;
3114:
3115: --

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

3126: , x_return_status => l_return_status
3127: ) ;
3128:
3129:
3130: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3131: ('Check Existence completed with return_status: ' || l_return_status) ;
3132: END IF ;
3133:
3134: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

3157: -- Process Flow step 7: Check lineage
3158: --
3159: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Check lineage'); END IF;
3160: IF l_rev_operation_rec.transaction_type IN
3161: (Bom_Rtg_Globals.G_OPR_UPDATE, Bom_Rtg_Globals.G_OPR_DELETE,
3162: Bom_Rtg_Globals.G_OPR_CANCEL)
3163: THEN
3164:
3165: BOM_Validate_Op_Seq.Check_Lineage

Line 3162: Bom_Rtg_Globals.G_OPR_CANCEL)

3158: --
3159: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Check lineage'); END IF;
3160: IF l_rev_operation_rec.transaction_type IN
3161: (Bom_Rtg_Globals.G_OPR_UPDATE, Bom_Rtg_Globals.G_OPR_DELETE,
3162: Bom_Rtg_Globals.G_OPR_CANCEL)
3163: THEN
3164:
3165: BOM_Validate_Op_Seq.Check_Lineage
3166: ( p_routing_sequence_id =>

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

3352: , x_mesg_token_tbl => l_mesg_token_tbl
3353: , x_return_status => l_return_status
3354: ) ;
3355:
3356: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3357: ('Check the routing non-referenced common completed with return_status: ' || l_return_status) ;
3358: END IF ;
3359:
3360: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

3404: , x_mesg_token_tbl => l_mesg_token_tbl
3405: , x_return_status => l_return_status
3406: ) ;
3407:
3408: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3409: ('Check non-operating columns completed with return_status: ' || l_return_status) ;
3410: END IF ;
3411:
3412: IF l_return_status = Error_Handler.G_STATUS_UNEXPECTED

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

3452: , x_mesg_token_tbl => l_mesg_token_tbl
3453: , x_return_status => l_return_status
3454: );
3455:
3456: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3457: ('Value-id conversions completed with return_status: ' ||
3458: l_return_status) ;
3459: END IF ;
3460:

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

3512: , x_mesg_token_tbl => l_mesg_token_tbl
3513: ) ;
3514:
3515:
3516: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3517: ('Check required completed with return_status: ' || l_return_status) ;
3518: END IF ;
3519:
3520:

Line 3523: IF l_rev_operation_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE

3519:
3520:
3521: IF l_return_status = Error_Handler.G_STATUS_ERROR
3522: THEN
3523: IF l_rev_operation_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE
3524: THEN
3525: l_other_message := 'BOM_OP_REQ_CSEV_SKIP';
3526: l_other_token_tbl(1).token_name := 'OP_SEQ_NUMBER';
3527: l_other_token_tbl(1).token_value :=

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

3544: -- Process Flow step 14 : Attribute Validation for CREATE and UPDATE
3545: --
3546: --
3547: IF l_rev_operation_rec.transaction_type IN
3548: (Bom_Rtg_Globals.G_OPR_CREATE, Bom_Rtg_Globals.G_OPR_UPDATE)
3549: THEN
3550: Bom_Validate_Op_Seq.Check_Attributes
3551: ( p_rev_operation_rec => l_rev_operation_rec
3552: , p_rev_op_unexp_rec => l_rev_op_unexp_rec

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

3553: , x_return_status => l_return_status
3554: , x_mesg_token_tbl => l_mesg_token_tbl
3555: ) ;
3556:
3557: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3558: ('Attribute validation completed with return_status: ' || l_return_status) ;
3559: END IF ;
3560:
3561: IF l_return_status = Error_Handler.G_STATUS_ERROR

Line 3563: IF l_rev_operation_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE

3559: END IF ;
3560:
3561: IF l_return_status = Error_Handler.G_STATUS_ERROR
3562: THEN
3563: IF l_rev_operation_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE
3564: THEN
3565: l_other_message := 'BOM_OP_ATTVAL_CSEV_SKIP';
3566: l_other_token_tbl(1).token_name := 'OP_SEQ_NUMBER';
3567: l_other_token_tbl(1).token_value :=

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

3674: -- and Creates with ACD_Type 'Add'.
3675: -- Call Bom_Default_Op_Seq.Populate_Null_Columns
3676: --
3677:
3678: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Populate NULL columns') ;
3679: END IF ;
3680:
3681:
3682: Bom_Default_Op_Seq.Populate_Null_Columns

Line 3692: ELSIF l_rev_operation_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE

3688: , x_rev_op_unexp_rec => l_rev_op_unexp_rec
3689: ) ;
3690:
3691:
3692: ELSIF l_rev_operation_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE
3693: AND l_rev_operation_rec.acd_type <> 2 -- ACD Type : Not Change
3694: THEN
3695: --
3696: -- Process Flow step 16 : Default missing values for Operation (CREATE)

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

3707: , x_mesg_token_tbl => l_mesg_token_tbl
3708: , x_return_status => l_return_status
3709: ) ;
3710:
3711: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3712: ('Attribute Defaulting completed with return_status: ' || l_return_status) ;
3713: END IF ;
3714:
3715:

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

3755: --
3756: -- Process Flow step 17: Conditionally Required Attributes
3757: --
3758: --
3759: IF l_rev_operation_rec.transaction_type IN ( Bom_Rtg_Globals.G_OPR_CREATE
3760: , Bom_Rtg_Globals.G_OPR_UPDATE )
3761: THEN
3762: Bom_Validate_Op_Seq.Check_Conditionally_Required
3763: ( p_rev_operation_rec => l_rev_operation_rec

Line 3760: , Bom_Rtg_Globals.G_OPR_UPDATE )

3756: -- Process Flow step 17: Conditionally Required Attributes
3757: --
3758: --
3759: IF l_rev_operation_rec.transaction_type IN ( Bom_Rtg_Globals.G_OPR_CREATE
3760: , Bom_Rtg_Globals.G_OPR_UPDATE )
3761: THEN
3762: Bom_Validate_Op_Seq.Check_Conditionally_Required
3763: ( p_rev_operation_rec => l_rev_operation_rec
3764: , p_rev_op_unexp_rec => l_rev_op_unexp_rec

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

3765: , x_return_status => l_return_status
3766: , x_mesg_token_tbl => l_mesg_token_tbl
3767: ) ;
3768:
3769: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3770: ('Check Conditionally Required Attr. completed with return_status: ' || l_return_status) ;
3771: END IF ;
3772:
3773: IF l_return_status = Error_Handler.G_STATUS_ERROR

Line 3775: IF l_rev_operation_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE

3771: END IF ;
3772:
3773: IF l_return_status = Error_Handler.G_STATUS_ERROR
3774: THEN
3775: IF l_rev_operation_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE
3776: THEN
3777: l_other_message := 'BOM_OP_CONREQ_CSEV_SKIP';
3778: l_other_token_tbl(1).token_name := 'OP_SEQ_NUMBER';
3779: l_other_token_tbl(1).token_value :=

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

3817: -- Process Flow step 18: Entity defaulting for CREATE and UPDATE
3818: -- Merged into Process Flow step 13 : Default missing values
3819: --
3820:
3821: IF l_rev_operation_rec.transaction_type IN ( Bom_Rtg_Globals.G_OPR_CREATE
3822: , Bom_Rtg_Globals.G_OPR_UPDATE )
3823: THEN
3824: Bom_Default_Op_Seq.Entity_Defaulting
3825: ( p_rev_operation_rec => l_rev_operation_rec

Line 3822: , Bom_Rtg_Globals.G_OPR_UPDATE )

3818: -- Merged into Process Flow step 13 : Default missing values
3819: --
3820:
3821: IF l_rev_operation_rec.transaction_type IN ( Bom_Rtg_Globals.G_OPR_CREATE
3822: , Bom_Rtg_Globals.G_OPR_UPDATE )
3823: THEN
3824: Bom_Default_Op_Seq.Entity_Defaulting
3825: ( p_rev_operation_rec => l_rev_operation_rec
3826: , p_rev_op_unexp_rec => l_rev_op_unexp_rec

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

3830: , x_mesg_token_tbl => l_mesg_token_tbl
3831: , x_return_status => l_return_status
3832: ) ;
3833:
3834: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3835: ('Entity defaulting completed with return_status: ' || l_return_status) ;
3836: END IF ;
3837:
3838: IF l_return_status = Error_Handler.G_STATUS_ERROR

Line 3840: IF l_rev_operation_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE

3836: END IF ;
3837:
3838: IF l_return_status = Error_Handler.G_STATUS_ERROR
3839: THEN
3840: IF l_rev_operation_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE
3841: THEN
3842: l_other_message := 'BOM_OP_ENTDEF_CSEV_SKIP';
3843: l_other_token_tbl(1).token_name := 'OP_SEQ_NUMBER';
3844: l_other_token_tbl(1).token_value :=

Line 3886: IF Bom_Rtg_Globals.Get_Debug = 'Y'

3882: -- Process Flow step 19 - Entity Level Validation
3883: -- Call Bom_Validate_Op_Seq.Check_Entity
3884: --
3885:
3886: IF Bom_Rtg_Globals.Get_Debug = 'Y'
3887: THEN Error_Handler.Write_Debug('Starting with Revised Operatin Entity Validation . . . ') ;
3888: END IF ;
3889:
3890: Bom_Validate_Op_Seq.Check_Entity

Line 3905: IF l_rev_operation_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE

3901:
3902:
3903: IF l_return_status = Error_Handler.G_STATUS_ERROR
3904: THEN
3905: IF l_rev_operation_rec.transaction_type = Bom_Rtg_Globals.G_OPR_CREATE
3906: THEN
3907: l_other_message := 'BOM_OP_ENTVAL_CSEV_SKIP';
3908: l_other_token_tbl(1).token_name := 'OP_SEQ_NUMBER';
3909: l_other_token_tbl(1).token_value :=

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

3940: , x_rev_sub_resource_tbl=> x_rev_sub_resource_tbl
3941: ) ;
3942: END IF;
3943:
3944: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity validation completed with '
3945: || l_return_Status || ' proceeding for database writes . . . ') ;
3946: END IF;
3947:
3948: --

Line 3951: IF l_rev_operation_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CANCEL

3947:
3948: --
3949: -- Process Flow step 20 : Database Writes
3950: --
3951: IF l_rev_operation_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CANCEL
3952: THEN
3953:
3954: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3955: ('Operatin Sequence: Perform Cancel Operation . . .') ;

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

3950: --
3951: IF l_rev_operation_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CANCEL
3952: THEN
3953:
3954: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3955: ('Operatin Sequence: Perform Cancel Operation . . .') ;
3956: END IF ;
3957:
3958: ENG_Globals.Cancel_Operation

Line 3962: , p_user_id => BOM_Rtg_Globals.Get_User_Id

3958: ENG_Globals.Cancel_Operation
3959: ( p_operation_sequence_id => l_rev_op_unexp_rec.operation_sequence_id
3960: , p_cancel_comments => l_rev_operation_rec.cancel_comments
3961: , p_op_seq_num => l_rev_operation_rec.operation_sequence_number
3962: , p_user_id => BOM_Rtg_Globals.Get_User_Id
3963: , p_login_id => BOM_Rtg_Globals.Get_Login_Id
3964: , p_prog_id => BOM_Rtg_Globals.Get_Prog_Id
3965: , p_prog_appid => BOM_Rtg_Globals.Get_Prog_AppId
3966: , x_return_status => l_return_status

Line 3963: , p_login_id => BOM_Rtg_Globals.Get_Login_Id

3959: ( p_operation_sequence_id => l_rev_op_unexp_rec.operation_sequence_id
3960: , p_cancel_comments => l_rev_operation_rec.cancel_comments
3961: , p_op_seq_num => l_rev_operation_rec.operation_sequence_number
3962: , p_user_id => BOM_Rtg_Globals.Get_User_Id
3963: , p_login_id => BOM_Rtg_Globals.Get_Login_Id
3964: , p_prog_id => BOM_Rtg_Globals.Get_Prog_Id
3965: , p_prog_appid => BOM_Rtg_Globals.Get_Prog_AppId
3966: , x_return_status => l_return_status
3967: , x_mesg_token_tbl => l_mesg_token_tbl

Line 3964: , p_prog_id => BOM_Rtg_Globals.Get_Prog_Id

3960: , p_cancel_comments => l_rev_operation_rec.cancel_comments
3961: , p_op_seq_num => l_rev_operation_rec.operation_sequence_number
3962: , p_user_id => BOM_Rtg_Globals.Get_User_Id
3963: , p_login_id => BOM_Rtg_Globals.Get_Login_Id
3964: , p_prog_id => BOM_Rtg_Globals.Get_Prog_Id
3965: , p_prog_appid => BOM_Rtg_Globals.Get_Prog_AppId
3966: , x_return_status => l_return_status
3967: , x_mesg_token_tbl => l_mesg_token_tbl
3968: ) ;

Line 3965: , p_prog_appid => BOM_Rtg_Globals.Get_Prog_AppId

3961: , p_op_seq_num => l_rev_operation_rec.operation_sequence_number
3962: , p_user_id => BOM_Rtg_Globals.Get_User_Id
3963: , p_login_id => BOM_Rtg_Globals.Get_Login_Id
3964: , p_prog_id => BOM_Rtg_Globals.Get_Prog_Id
3965: , p_prog_appid => BOM_Rtg_Globals.Get_Prog_AppId
3966: , x_return_status => l_return_status
3967: , x_mesg_token_tbl => l_mesg_token_tbl
3968: ) ;
3969:

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

3966: , x_return_status => l_return_status
3967: , x_mesg_token_tbl => l_mesg_token_tbl
3968: ) ;
3969:
3970: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3971: ('Cancel Operation is completed with return status ' || l_return_status ) ;
3972: END IF ;
3973:
3974: ELSE

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

4063:
4064: END IF ;
4065:
4066:
4067: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Database writes completed with status ' || l_return_status);
4068: END IF;
4069:
4070: /*Bug 6485168. l_process_children should be set inside the if clause. In the else set it to false
4071: END IF; -- END IF statement that checks RETURN STATUS