eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.BOM_RTG_PVT dependencies on BOM_RTG_GLOBALS

Line 93: l_temp_op_rec BOM_RTG_Globals.Temp_Op_Rec_Type;

89: l_op_parent_exists BOOLEAN := FALSE ;
90: l_rtg_parent_exists BOOLEAN := FALSE ;
91: l_process_children BOOLEAN := TRUE ;
92: l_valid BOOLEAN := TRUE;
93: l_temp_op_rec BOM_RTG_Globals.Temp_Op_Rec_Type;
94:
95: BEGIN
96:
97: -- Init local table variables.

Line 101: l_op_res_unexp_rec.organization_id := BOM_Rtg_Globals.Get_Org_Id ;

97: -- Init local table variables.
98: l_return_status := 'S';
99: l_bo_return_status := 'S';
100: l_op_resource_tbl := p_op_resource_tbl ;
101: l_op_res_unexp_rec.organization_id := BOM_Rtg_Globals.Get_Org_Id ;
102: FOR I IN 1..l_op_resource_tbl.COUNT LOOP
103: BEGIN
104:
105: -- Load local records

Line 144: IF BOM_RTG_Globals.G_Init_Eff_Date_Op_Num_Flag

140: l_rtg_parent_exists := TRUE ;
141: END IF ;
142:
143: -- If effectivity/op seq num of the parent operation has changed, update the child resource record
144: IF BOM_RTG_Globals.G_Init_Eff_Date_Op_Num_Flag
145: AND BOM_RTG_Globals.Get_Temp_Op_Rec1
146: ( l_op_resource_rec.operation_sequence_number
147: , p_effectivity_date -- this cannot be null as this check is done only when the op has children
148: , l_temp_op_rec) THEN

Line 145: AND BOM_RTG_Globals.Get_Temp_Op_Rec1

141: END IF ;
142:
143: -- If effectivity/op seq num of the parent operation has changed, update the child resource record
144: IF BOM_RTG_Globals.G_Init_Eff_Date_Op_Num_Flag
145: AND BOM_RTG_Globals.Get_Temp_Op_Rec1
146: ( l_op_resource_rec.operation_sequence_number
147: , p_effectivity_date -- this cannot be null as this check is done only when the op has children
148: , l_temp_op_rec) THEN
149: l_op_resource_rec.operation_sequence_number := l_temp_op_rec.new_op_seq_num;

Line 205: -- Call the BOM_Rtg_Globals.Transaction_Type_Validity

201:
202: --
203: -- Process Flow step 3 :Check if transaction_type is valid
204: -- Transaction_Type must be CRATE, UPDATE, DELETE or CANCEL(in only ECO for Rrg)
205: -- Call the BOM_Rtg_Globals.Transaction_Type_Validity
206: --
207: BOM_Rtg_Globals.Transaction_Type_Validity
208: ( p_transaction_type => l_op_resource_rec.transaction_type
209: , p_entity => 'Op_Res'

Line 207: BOM_Rtg_Globals.Transaction_Type_Validity

203: -- Process Flow step 3 :Check if transaction_type is valid
204: -- Transaction_Type must be CRATE, UPDATE, DELETE or CANCEL(in only ECO for Rrg)
205: -- Call the BOM_Rtg_Globals.Transaction_Type_Validity
206: --
207: BOM_Rtg_Globals.Transaction_Type_Validity
208: ( p_transaction_type => l_op_resource_rec.transaction_type
209: , p_entity => 'Op_Res'
210: , p_entity_id => l_op_resource_rec.resource_sequence_number
211: , x_valid => l_valid

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

230: , x_mesg_token_tbl => l_mesg_token_tbl
231: , x_return_status => l_return_status
232: ) ;
233:
234: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
235: ('Convert to User Unique Index to Index1 completed with return_status: ' || l_return_status) ;
236: END IF;
237:
238: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

267: , x_other_token_tbl => l_other_token_tbl
268: , x_return_status => l_return_status
269: ) ;
270:
271: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
272: ('Convert to User Unique Index to Index2 completed with return_status: ' || l_return_status) ;
273: END IF;
274:
275: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

298: , x_return_status => l_return_status
299: ) ;
300:
301:
302: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
303: ('Check Existence completed with return_status: ' || l_return_status) ;
304: END IF ;
305:
306: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

346: , x_mesg_token_tbl => l_mesg_token_tbl
347: , x_return_status => l_return_status
348: ) ;
349:
350: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
351: ('Check Assembly Item Operability completed with return_status: ' || l_return_status) ;
352: END IF ;
353:
354: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

381: , x_mesg_token_tbl => l_mesg_token_tbl
382: , x_return_status => l_return_status
383: ) ;
384:
385: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
386: ('Check non-ref operation completed with return_status: ' || l_return_status) ;
387: END IF ;
388:
389: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

450: , x_mesg_token_tbl => l_mesg_token_tbl
451: , x_return_status => l_return_status
452: );
453:
454: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
455: ('Value-id conversions completed with return_status: ' || l_return_status) ;
456: END IF ;
457:
458: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

526: ) ;
527:
528:
529:
530: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
531: ('Check required completed with return_status: ' || l_return_status) ;
532: END IF ;
533:
534: IF l_return_status = Error_Handler.G_STATUS_ERROR

Line 536: IF l_op_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE

532: END IF ;
533:
534: IF l_return_status = Error_Handler.G_STATUS_ERROR
535: THEN
536: IF l_op_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
537: THEN
538: l_other_message := 'BOM_RES_REQ_CSEV_SKIP';
539: l_other_token_tbl(1).token_name := 'RES_SEQ_NUMBER';
540: l_other_token_tbl(1).token_value :=

Line 562: (BOM_Rtg_Globals.G_OPR_CREATE, BOM_Rtg_Globals.G_OPR_UPDATE)

558: -- Call Bom_Validate_Op_Res.Check_Attributes
559: --
560:
561: IF l_op_resource_rec.transaction_type IN
562: (BOM_Rtg_Globals.G_OPR_CREATE, BOM_Rtg_Globals.G_OPR_UPDATE)
563: THEN
564: Bom_Validate_Op_Res.Check_Attributes
565: ( p_op_resource_rec => l_op_resource_rec
566: , p_op_res_unexp_rec => l_op_res_unexp_rec

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

567: , x_return_status => l_return_status
568: , x_mesg_token_tbl => l_mesg_token_tbl
569: ) ;
570:
571: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
572: ('Attribute validation completed with return_status: ' || l_return_status) ;
573: END IF ;
574:
575:

Line 578: IF l_op_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE

574:
575:
576: IF l_return_status = Error_Handler.G_STATUS_ERROR
577: THEN
578: IF l_op_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
579: THEN
580: l_other_message := 'BOM_RES_ATTVAL_CSEV_SKIP';
581: l_other_token_tbl(1).token_name := 'RES_SEQ_NUMBER';
582: l_other_token_tbl(1).token_value :=

Line 627: (BOM_Rtg_Globals.G_OPR_UPDATE, BOM_Rtg_Globals.G_OPR_DELETE)

623:
624:
625:
626: IF l_op_resource_rec.transaction_type IN
627: (BOM_Rtg_Globals.G_OPR_UPDATE, BOM_Rtg_Globals.G_OPR_DELETE)
628: THEN
629:
630: --
631: -- Process flow step 12: Populate NULL columns for Update and Delete

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

631: -- Process flow step 12: Populate NULL columns for Update and Delete
632: -- Call Bom_Default_Op_Res.Populate_Null_Columns
633: --
634:
635: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Populate NULL columns') ;
636: END IF ;
637:
638: Bom_Default_Op_Res.Populate_Null_Columns
639: ( p_op_resource_rec => l_op_resource_rec

Line 647: ELSIF l_op_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE

643: , x_op_resource_rec => l_op_resource_rec
644: , x_op_res_unexp_rec => l_op_res_unexp_rec
645: ) ;
646:
647: ELSIF l_op_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
648: THEN
649: --
650: -- Process Flow step 13 : Default missing values for Op Resource (CREATE)
651: -- Call Bom_Default_Op_Res.Attribute_Defaulting

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

650: -- Process Flow step 13 : Default missing values for Op Resource (CREATE)
651: -- Call Bom_Default_Op_Res.Attribute_Defaulting
652: --
653:
654: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Attribute Defaulting') ;
655: END IF ;
656:
657: Bom_Default_Op_Res.Attribute_Defaulting
658: ( p_op_resource_rec => l_op_resource_rec

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

663: , x_return_status => l_return_status
664: ) ;
665:
666:
667: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
668: ('Attribute Defaulting completed with return_status: ' || l_return_status) ;
669: END IF ;
670:
671: IF l_return_status = Error_Handler.G_STATUS_ERROR

Line 720: IF l_op_resource_rec.transaction_type IN ( BOM_Rtg_Globals.G_OPR_CREATE

716: -- Process Flow step 14: Conditionally Required Attributes
717: --
718: --
719: /*
720: IF l_op_resource_rec.transaction_type IN ( BOM_Rtg_Globals.G_OPR_CREATE
721: , BOM_Rtg_Globals.G_OPR_UPDATE )
722: THEN
723: Bom_Validate_Op_Seq.Check_Conditionally_Required
724: ( p_op_resource_rec => l_op_resource_rec

Line 721: , BOM_Rtg_Globals.G_OPR_UPDATE )

717: --
718: --
719: /*
720: IF l_op_resource_rec.transaction_type IN ( BOM_Rtg_Globals.G_OPR_CREATE
721: , BOM_Rtg_Globals.G_OPR_UPDATE )
722: THEN
723: Bom_Validate_Op_Seq.Check_Conditionally_Required
724: ( p_op_resource_rec => l_op_resource_rec
725: , p_op_res_unexp_rec => l_op_res_unexp_rec

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

727: , x_mesg_token_tbl => l_mesg_token_tbl
728: ) ;
729:
730:
731: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
732: ('Check Conditionally Required Attr. completed with return_status: ' || l_return_status) ;
733: END IF ;
734:
735:

Line 738: IF l_op_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE

734:
735:
736: IF l_return_status = Error_Handler.G_STATUS_ERROR
737: THEN
738: IF l_op_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
739: THEN
740: l_other_message := 'BOM_RES_CONREQ_CSEV_SKIP';
741: l_other_token_tbl(1).token_name := 'RES_SEQ_NUMBER';
742: l_other_token_tbl(1).token_value :=

Line 787: IF l_op_resource_rec.transaction_type IN ( BOM_Rtg_Globals.G_OPR_CREATE

783:
784: --
785: -- Process Flow step 15: Entity defaulting for CREATE and UPDATE
786: --
787: IF l_op_resource_rec.transaction_type IN ( BOM_Rtg_Globals.G_OPR_CREATE
788: , BOM_Rtg_Globals.G_OPR_UPDATE )
789:
790: THEN
791: Bom_Default_Op_Res.Entity_Defaulting

Line 788: , BOM_Rtg_Globals.G_OPR_UPDATE )

784: --
785: -- Process Flow step 15: Entity defaulting for CREATE and UPDATE
786: --
787: IF l_op_resource_rec.transaction_type IN ( BOM_Rtg_Globals.G_OPR_CREATE
788: , BOM_Rtg_Globals.G_OPR_UPDATE )
789:
790: THEN
791: Bom_Default_Op_Res.Entity_Defaulting
792: ( p_op_resource_rec => l_op_resource_rec

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

796: , x_mesg_token_tbl => l_mesg_token_tbl
797: , x_return_status => l_return_status
798: ) ;
799:
800: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
801: ('Entity defaulting completed with return_status: ' || l_return_status) ;
802: END IF ;
803:
804: IF l_return_status = Error_Handler.G_STATUS_ERROR

Line 806: IF l_op_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE

802: END IF ;
803:
804: IF l_return_status = Error_Handler.G_STATUS_ERROR
805: THEN
806: IF l_op_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
807: THEN
808: l_other_message := 'BOM_RES_ENTDEF_CSEV_SKIP';
809: l_other_token_tbl(1).token_name := 'RES_SEQ_NUMBER';
810: l_other_token_tbl(1).token_value :=

Line 871: IF l_op_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE

867:
868:
869: IF l_return_status = Error_Handler.G_STATUS_ERROR
870: THEN
871: IF l_op_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
872: THEN
873: l_other_message := 'BOM_RES_ENTVAL_CSEV_SKIP';
874: l_other_token_tbl(1).token_name := 'RES_SEQ_NUMBER';
875: l_other_token_tbl(1).token_value :=

Line 915: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN

911: , x_sub_resource_tbl => l_sub_resource_tbl
912: ) ;
913: END IF;
914:
915: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
916: Error_Handler.Write_Debug('Entity validation completed with '
917: || l_return_Status || ' proceeding for database writes . . . ') ;
918: END IF;
919:

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

962: , x_sub_resource_tbl => l_sub_resource_tbl
963: ) ;
964: END IF;
965:
966: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Res Database writes completed with status ' || l_return_status);
967: END IF;
968: --
969: -- Process Flow Step 18: Validate SGN order
970: --

Line 983: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('validate SGN order completed with status ' || l_return_status);

979: ROLLBACK TO validate_sgn;
980: RAISE EXC_SEV_QUIT_SIBLINGS;
981: END IF;
982:
983: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('validate SGN order completed with status ' || l_return_status);
984: END IF;
985:
986: END IF; -- END IF statement that checks RETURN STATUS
987:

Line 1343: l_temp_op_rec BOM_RTG_Globals.Temp_Op_Rec_Type;

1339: l_op_parent_exists BOOLEAN := FALSE ;
1340: l_rtg_parent_exists BOOLEAN := FALSE ;
1341: l_process_children BOOLEAN := TRUE ;
1342: l_valid BOOLEAN := TRUE;
1343: l_temp_op_rec BOM_RTG_Globals.Temp_Op_Rec_Type;
1344:
1345: BEGIN
1346:
1347: -- Init local table variables.

Line 1351: l_sub_res_unexp_rec.organization_id := BOM_Rtg_Globals.Get_Org_Id ;

1347: -- Init local table variables.
1348: l_return_status := 'S';
1349: l_bo_return_status := 'S';
1350: l_sub_resource_tbl := p_sub_resource_tbl ;
1351: l_sub_res_unexp_rec.organization_id := BOM_Rtg_Globals.Get_Org_Id ;
1352:
1353:
1354: FOR I IN 1..l_sub_resource_tbl.COUNT LOOP
1355: BEGIN

Line 1390: IF BOM_RTG_Globals.G_Init_Eff_Date_Op_Num_Flag

1386: l_rtg_parent_exists := TRUE ;
1387: END IF ;
1388:
1389: -- If effectivity/op seq num of the parent operation has changed, update the child resource record
1390: IF BOM_RTG_Globals.G_Init_Eff_Date_Op_Num_Flag
1391: AND BOM_RTG_Globals.Get_Temp_Op_Rec1
1392: ( l_sub_resource_rec.operation_sequence_number
1393: , p_effectivity_date -- this cannot be null as this check is done only when the op has children
1394: , l_temp_op_rec)

Line 1391: AND BOM_RTG_Globals.Get_Temp_Op_Rec1

1387: END IF ;
1388:
1389: -- If effectivity/op seq num of the parent operation has changed, update the child resource record
1390: IF BOM_RTG_Globals.G_Init_Eff_Date_Op_Num_Flag
1391: AND BOM_RTG_Globals.Get_Temp_Op_Rec1
1392: ( l_sub_resource_rec.operation_sequence_number
1393: , p_effectivity_date -- this cannot be null as this check is done only when the op has children
1394: , l_temp_op_rec)
1395: THEN

Line 1451: -- Call the BOM_Rtg_Globals.Transaction_Type_Validity

1447:
1448: --
1449: -- Process Flow step 3 :Check if transaction_type is valid
1450: -- Transaction_Type must be CRATE, UPDATE, DELETE or CANCEL(in only ECO for Rrg)
1451: -- Call the BOM_Rtg_Globals.Transaction_Type_Validity
1452: --
1453:
1454: BOM_Rtg_Globals.Transaction_Type_Validity
1455: ( p_transaction_type => l_sub_resource_rec.transaction_type

Line 1454: BOM_Rtg_Globals.Transaction_Type_Validity

1450: -- Transaction_Type must be CRATE, UPDATE, DELETE or CANCEL(in only ECO for Rrg)
1451: -- Call the BOM_Rtg_Globals.Transaction_Type_Validity
1452: --
1453:
1454: BOM_Rtg_Globals.Transaction_Type_Validity
1455: ( p_transaction_type => l_sub_resource_rec.transaction_type
1456: , p_entity => 'Sub_Res'
1457: , p_entity_id => nvl(l_sub_resource_rec.substitute_group_number, l_sub_res_unexp_rec.substitute_group_number)
1458: , x_valid => l_valid

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

1477: , x_mesg_token_tbl => l_mesg_token_tbl
1478: , x_return_status => l_return_status
1479: ) ;
1480:
1481: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1482: ('Convert to User Unique Index to Index1 completed with return_status: ' || l_return_status) ;
1483: END IF;
1484:
1485: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

1520: , x_other_token_tbl => l_other_token_tbl
1521: , x_return_status => l_return_status
1522: ) ;
1523:
1524: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1525: ('Convert to User Unique Index to Index2 completed with return_status: ' || l_return_status) ;
1526: END IF;
1527:
1528: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

1555: , x_return_status => l_return_status
1556: ) ;
1557:
1558:
1559: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1560: ('Check Existence completed with return_status: ' || l_return_status) ;
1561: END IF ;
1562:
1563: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

1609: , x_mesg_token_tbl => l_mesg_token_tbl
1610: , x_return_status => l_return_status
1611: ) ;
1612:
1613: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1614: ('Check Assembly Item Operability completed with return_status: ' || l_return_status) ;
1615: END IF ;
1616:
1617: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

1650: , x_mesg_token_tbl => l_mesg_token_tbl
1651: , x_return_status => l_return_status
1652: ) ;
1653:
1654: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1655: ('Check non-ref operation completed with return_status: ' || l_return_status) ;
1656: END IF ;
1657:
1658: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

1775: , x_mesg_token_tbl => l_mesg_token_tbl
1776: , x_return_status => l_return_status
1777: );
1778:
1779: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1780: ('Value-id conversions completed with return_status: ' || l_return_status) ;
1781: END IF ;
1782:
1783: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

1848: ) ;
1849:
1850:
1851:
1852: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1853: ('Check required completed with return_status: ' || l_return_status) ;
1854: END IF ;
1855:
1856: IF l_return_status = Error_Handler.G_STATUS_ERROR

Line 1858: IF l_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE

1854: END IF ;
1855:
1856: IF l_return_status = Error_Handler.G_STATUS_ERROR
1857: THEN
1858: IF l_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
1859: THEN
1860: l_other_message := 'BOM_SUB_RES_REQ_CSEV_SKIP';
1861: l_other_token_tbl(1).token_name := 'SUB_RESOURCE_CODE';
1862: l_other_token_tbl(1).token_value :=

Line 1890: (BOM_Rtg_Globals.G_OPR_CREATE, BOM_Rtg_Globals.G_OPR_UPDATE)

1886: -- Call Bom_Validate_Sub_Op_Res.Check_Attributes
1887: --
1888:
1889: IF l_sub_resource_rec.transaction_type IN
1890: (BOM_Rtg_Globals.G_OPR_CREATE, BOM_Rtg_Globals.G_OPR_UPDATE)
1891: THEN
1892: Bom_Validate_Sub_Op_Res.Check_Attributes
1893: ( p_sub_resource_rec => l_sub_resource_rec
1894: , p_sub_res_unexp_rec => l_sub_res_unexp_rec

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

1895: , x_return_status => l_return_status
1896: , x_mesg_token_tbl => l_mesg_token_tbl
1897: ) ;
1898:
1899: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1900: ('Attribute validation completed with return_status: ' || l_return_status) ;
1901: END IF ;
1902:
1903:

Line 1906: IF l_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE

1902:
1903:
1904: IF l_return_status = Error_Handler.G_STATUS_ERROR
1905: THEN
1906: IF l_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
1907: THEN
1908: l_other_message := 'BOM_SUB_RES_ATTVAL_CSEV_SKIP';
1909: l_other_token_tbl(1).token_name := 'SUB_RESOURCE_CODE';
1910: l_other_token_tbl(1).token_value :=

Line 1960: (BOM_Rtg_Globals.G_OPR_UPDATE, BOM_Rtg_Globals.G_OPR_DELETE)

1956:
1957:
1958:
1959: IF l_sub_resource_rec.transaction_type IN
1960: (BOM_Rtg_Globals.G_OPR_UPDATE, BOM_Rtg_Globals.G_OPR_DELETE)
1961: THEN
1962:
1963: --
1964: -- Process flow step 12: Populate NULL columns for Update and Delete

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

1964: -- Process flow step 12: Populate NULL columns for Update and Delete
1965: -- Call Bom_Default_Op_Res.Populate_Null_Columns
1966: --
1967:
1968: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Populate NULL columns') ;
1969: END IF ;
1970:
1971: Bom_Default_Sub_Op_Res.Populate_Null_Columns
1972: ( p_sub_resource_rec => l_sub_resource_rec

Line 1980: ELSIF l_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE

1976: , x_sub_resource_rec => l_sub_resource_rec
1977: , x_sub_res_unexp_rec => l_sub_res_unexp_rec
1978: ) ;
1979:
1980: ELSIF l_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
1981: THEN
1982: --
1983: -- Process Flow step 13 : Default missing values for Op Resource (CREATE)
1984: -- Call Bom_Default_Op_Res.Attribute_Defaulting

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

1991: , x_mesg_token_tbl => l_mesg_token_tbl
1992: , x_return_status => l_return_status
1993: ) ;
1994:
1995: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1996: ('Attribute Defaulting completed with return_status: ' || l_return_status) ;
1997: END IF ;
1998:
1999: IF l_return_status = Error_Handler.G_STATUS_ERROR

Line 2053: IF l_sub_resource_rec.transaction_type IN ( BOM_Rtg_Globals.G_OPR_CREATE

2049: -- Process Flow step 14: Conditionally Required Attributes
2050: --
2051: --
2052: /*
2053: IF l_sub_resource_rec.transaction_type IN ( BOM_Rtg_Globals.G_OPR_CREATE
2054: , BOM_Rtg_Globals.G_OPR_UPDATE )
2055: THEN
2056:
2057: Bom_Validate_Sub_Op_Seq.Check_Conditionally_Required

Line 2054: , BOM_Rtg_Globals.G_OPR_UPDATE )

2050: --
2051: --
2052: /*
2053: IF l_sub_resource_rec.transaction_type IN ( BOM_Rtg_Globals.G_OPR_CREATE
2054: , BOM_Rtg_Globals.G_OPR_UPDATE )
2055: THEN
2056:
2057: Bom_Validate_Sub_Op_Seq.Check_Conditionally_Required
2058: ( p_sub_resource_rec => l_sub_resource_rec

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

2061: , x_mesg_token_tbl => l_mesg_token_tbl
2062: ) ;
2063:
2064:
2065: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2066: ('Check Conditionally Required Attr. completed with return_status: ' || l_return_status) ;
2067: END IF ;
2068:
2069:

Line 2072: IF l_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE

2068:
2069:
2070: IF l_return_status = Error_Handler.G_STATUS_ERROR
2071: THEN
2072: IF l_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
2073: THEN
2074: l_other_message := 'BOM_SUB_RES_CONREQ_CSEV_SKIP';
2075: l_other_token_tbl(1).token_name := 'SUB_RESOURCE_CODE';
2076: l_other_token_tbl(1).token_value :=

Line 2127: IF l_sub_resource_rec.transaction_type IN ( BOM_Rtg_Globals.G_OPR_CREATE

2123:
2124: --
2125: -- Process Flow step 15: Entity defaulting for CREATE and UPDATE
2126: --
2127: IF l_sub_resource_rec.transaction_type IN ( BOM_Rtg_Globals.G_OPR_CREATE
2128: , BOM_Rtg_Globals.G_OPR_UPDATE )
2129:
2130: THEN
2131: Bom_Default_Sub_Op_Res.Entity_Defaulting

Line 2128: , BOM_Rtg_Globals.G_OPR_UPDATE )

2124: --
2125: -- Process Flow step 15: Entity defaulting for CREATE and UPDATE
2126: --
2127: IF l_sub_resource_rec.transaction_type IN ( BOM_Rtg_Globals.G_OPR_CREATE
2128: , BOM_Rtg_Globals.G_OPR_UPDATE )
2129:
2130: THEN
2131: Bom_Default_Sub_Op_Res.Entity_Defaulting
2132: ( p_sub_resource_rec => l_sub_resource_rec

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

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

Line 2146: IF l_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE

2142: END IF ;
2143:
2144: IF l_return_status = Error_Handler.G_STATUS_ERROR
2145: THEN
2146: IF l_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
2147: THEN
2148: l_other_message := 'BOM_SUB_RES_ENTDEF_CSEV_SKIP';
2149: l_other_token_tbl(1).token_name := 'SUB_RESOURCE_CODE';
2150: l_other_token_tbl(1).token_value :=

Line 2216: IF l_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE

2212:
2213:
2214: IF l_return_status = Error_Handler.G_STATUS_ERROR
2215: THEN
2216: IF l_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
2217: THEN
2218: l_other_message := 'BOM_SUB_RES_ENTVAL_CSEV_SKIP';
2219: l_other_token_tbl(1).token_name := 'SUB_RESOURCE_CODE';
2220: l_other_token_tbl(1).token_value :=

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

2262: , x_sub_resource_tbl => l_sub_resource_tbl
2263: ) ;
2264: END IF;
2265:
2266: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity validation completed with '
2267: || l_return_Status || ' proceeding for database writes . . . ') ;
2268: END IF;
2269:
2270: --

Line 2319: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Sub Res Database writes completed with status ' || l_return_status);

2315: , x_sub_resource_tbl => l_sub_resource_tbl
2316: ) ;
2317: END IF;
2318:
2319: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Sub Res Database writes completed with status ' || l_return_status);
2320: END IF;
2321:
2322:
2323: --

Line 2338: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Sub Res validate SGN order completed with status ' || l_return_status);

2334: ROLLBACK TO validate_sgn;
2335: RAISE EXC_SEV_QUIT_SIBLINGS;
2336: END IF;
2337:
2338: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Sub Res validate SGN order completed with status ' || l_return_status);
2339: END IF;
2340: END IF; -- END IF statement that checks RETURN STATUS
2341:
2342: -- Load tables.

Line 2686: --l_temp_op_rec_tbl_test BOM_RTG_Globals.Temp_Op_Rec_Tbl_Type;

2682:
2683: l_line_op BOOLEAN := FALSE; -- Added for calc_cynp
2684: l_process_op BOOLEAN := FALSE;
2685: l_dummy VARCHAR2(1) := 'S';
2686: --l_temp_op_rec_tbl_test BOM_RTG_Globals.Temp_Op_Rec_Tbl_Type;
2687:
2688: BEGIN
2689: IF BOM_Rtg_Globals.Get_Debug = 'Y'
2690: THEN Error_Handler.Write_Debug

Line 2689: IF BOM_Rtg_Globals.Get_Debug = 'Y'

2685: l_dummy VARCHAR2(1) := 'S';
2686: --l_temp_op_rec_tbl_test BOM_RTG_Globals.Temp_Op_Rec_Tbl_Type;
2687:
2688: BEGIN
2689: IF BOM_Rtg_Globals.Get_Debug = 'Y'
2690: THEN Error_Handler.Write_Debug
2691: ('Within Operation Network procedure call. . . ');
2692: END IF;
2693:

Line 2700: l_op_network_unexp_rec.organization_id := BOM_Rtg_Globals.Get_org_id;

2696:
2697: -- Init local table variables.
2698: l_op_network_tbl := p_op_network_tbl;
2699:
2700: l_op_network_unexp_rec.organization_id := BOM_Rtg_Globals.Get_org_id;
2701: FOR I IN 1..l_op_network_tbl.COUNT LOOP
2702: BEGIN
2703:
2704: -- Load local records.

Line 2754: BOM_Rtg_Globals.Transaction_Type_Validity

2750:
2751: --
2752: -- Step 3: Check if transaction_type is valid
2753: --
2754: BOM_Rtg_Globals.Transaction_Type_Validity
2755: ( p_transaction_type => l_op_network_rec.transaction_type
2756: , p_entity => 'Op_Network'
2757: , p_entity_id => l_op_network_rec.assembly_item_name
2758: , x_valid => l_valid

Line 2770: --l_temp_op_rec_tbl BOM_RTG_Globals.Temp_Op_Rec_Tbl_Type;

2766: END IF;
2767:
2768: --
2769: -- Process Flow Step: 4 Convert User Unique Index
2770: --l_temp_op_rec_tbl BOM_RTG_Globals.Temp_Op_Rec_Tbl_Type;
2771: -- BOM_RTG_Globals.Set_Temp_Op_Tbl(l_temp_op_rec_tbl_test);
2772: BOM_Rtg_Val_To_Id.Op_Network_UUI_To_UI
2773: ( p_op_network_rec => l_op_network_rec
2774: , p_op_network_unexp_rec => l_op_network_unexp_rec

Line 2771: -- BOM_RTG_Globals.Set_Temp_Op_Tbl(l_temp_op_rec_tbl_test);

2767:
2768: --
2769: -- Process Flow Step: 4 Convert User Unique Index
2770: --l_temp_op_rec_tbl BOM_RTG_Globals.Temp_Op_Rec_Tbl_Type;
2771: -- BOM_RTG_Globals.Set_Temp_Op_Tbl(l_temp_op_rec_tbl_test);
2772: BOM_Rtg_Val_To_Id.Op_Network_UUI_To_UI
2773: ( p_op_network_rec => l_op_network_rec
2774: , p_op_network_unexp_rec => l_op_network_unexp_rec
2775: , x_op_network_unexp_rec => l_op_network_unexp_rec

Line 2824: l_temp_rtg_id := BOM_RTG_Globals.Get_Routing_Sequence_Id();

2820: * b. When sub inv also match , then we will not change the locator => *
2821: * we will tell user that the sub inv matches and locators are not the *
2822: * same, and that they can change this in form if they wish! *
2823: **************************************************************************/
2824: l_temp_rtg_id := BOM_RTG_Globals.Get_Routing_Sequence_Id();
2825: IF( l_temp_rtg_id IS NULL OR l_temp_rtg_id = 0 ) OR
2826: ( BOM_RTG_Globals.Is_Osfm_NW_Calc_Flag = FALSE) THEN
2827:
2828: BOM_RTG_Globals.Set_Routing_Sequence_Id(

Line 2826: ( BOM_RTG_Globals.Is_Osfm_NW_Calc_Flag = FALSE) THEN

2822: * same, and that they can change this in form if they wish! *
2823: **************************************************************************/
2824: l_temp_rtg_id := BOM_RTG_Globals.Get_Routing_Sequence_Id();
2825: IF( l_temp_rtg_id IS NULL OR l_temp_rtg_id = 0 ) OR
2826: ( BOM_RTG_Globals.Is_Osfm_NW_Calc_Flag = FALSE) THEN
2827:
2828: BOM_RTG_Globals.Set_Routing_Sequence_Id(
2829: l_op_network_unexp_rec.routing_sequence_id);
2830: BOM_RTG_Globals.Set_Osfm_NW_Calc_Flag(TRUE);

Line 2828: BOM_RTG_Globals.Set_Routing_Sequence_Id(

2824: l_temp_rtg_id := BOM_RTG_Globals.Get_Routing_Sequence_Id();
2825: IF( l_temp_rtg_id IS NULL OR l_temp_rtg_id = 0 ) OR
2826: ( BOM_RTG_Globals.Is_Osfm_NW_Calc_Flag = FALSE) THEN
2827:
2828: BOM_RTG_Globals.Set_Routing_Sequence_Id(
2829: l_op_network_unexp_rec.routing_sequence_id);
2830: BOM_RTG_Globals.Set_Osfm_NW_Calc_Flag(TRUE);
2831: IF BOM_Rtg_Globals.Get_Debug = 'Y'
2832: THEN Error_Handler.Write_Debug

Line 2830: BOM_RTG_Globals.Set_Osfm_NW_Calc_Flag(TRUE);

2826: ( BOM_RTG_Globals.Is_Osfm_NW_Calc_Flag = FALSE) THEN
2827:
2828: BOM_RTG_Globals.Set_Routing_Sequence_Id(
2829: l_op_network_unexp_rec.routing_sequence_id);
2830: BOM_RTG_Globals.Set_Osfm_NW_Calc_Flag(TRUE);
2831: IF BOM_Rtg_Globals.Get_Debug = 'Y'
2832: THEN Error_Handler.Write_Debug
2833: ('Op Network: Calling BOM_Op_Network_UTIL.Get_WSM_Netowrk_Attribs....');
2834: END IF;

Line 2831: IF BOM_Rtg_Globals.Get_Debug = 'Y'

2827:
2828: BOM_RTG_Globals.Set_Routing_Sequence_Id(
2829: l_op_network_unexp_rec.routing_sequence_id);
2830: BOM_RTG_Globals.Set_Osfm_NW_Calc_Flag(TRUE);
2831: IF BOM_Rtg_Globals.Get_Debug = 'Y'
2832: THEN Error_Handler.Write_Debug
2833: ('Op Network: Calling BOM_Op_Network_UTIL.Get_WSM_Netowrk_Attribs....');
2834: END IF;
2835:

Line 2843: IF BOM_Rtg_Globals.Get_Debug = 'Y'

2839: , x_prev_end_id => l_prev_end_id
2840: , x_mesg_token_tbl => l_mesg_token_tbl
2841: , x_Return_status => l_return_status
2842: );
2843: IF BOM_Rtg_Globals.Get_Debug = 'Y'
2844: THEN Error_Handler.Write_Debug
2845: ('Op Network: Get_WSM_Netowrk_Attribs returned with Status '||
2846: l_return_status);
2847: END IF;

Line 2864: IF l_op_network_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE

2860: -- If routing header record is being created and the business object
2861: -- does not carry the Rtg header, then it is imperative to check
2862: -- for the Rtg Header's existence.
2863:
2864: IF l_op_network_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
2865: AND NOT l_rtg_parent_exists
2866: THEN
2867: l_rtg_header_rec.alternate_routing_code :=
2868: p_alternate_rtg_code;

Line 2992: (BOM_Rtg_Globals.G_OPR_UPDATE, BOM_Rtg_Globals.G_OPR_CREATE)

2988: --
2989: -- Process Flow step 9: Attribute Validation for Create and Update
2990: --
2991: IF l_op_network_rec.transaction_type IN
2992: (BOM_Rtg_Globals.G_OPR_UPDATE, BOM_Rtg_Globals.G_OPR_CREATE)
2993: THEN
2994: Bom_Validate_Op_Network.Check_Access
2995: ( p_op_network_rec => l_op_network_rec
2996: , p_op_network_unexp_rec => l_op_network_unexp_rec

Line 3001: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN

2997: , x_return_status => l_return_status
2998: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2999: );
3000:
3001: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
3002: Error_Handler.Write_Debug
3003: ('Op Network: Check Access is completed with status '|| l_return_status );
3004: END IF;
3005:

Line 3028: (BOM_Rtg_Globals.G_OPR_UPDATE, BOM_Rtg_Globals.G_OPR_CREATE)

3024: --
3025: -- Process Flow step 9: Attribute Validation for Create and Update
3026: --
3027: IF l_op_network_rec.transaction_type IN
3028: (BOM_Rtg_Globals.G_OPR_UPDATE, BOM_Rtg_Globals.G_OPR_CREATE)
3029: THEN
3030: Bom_Validate_Op_Network.Check_Attributes
3031: ( x_return_status => l_return_status
3032: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 3039: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN

3035: , p_old_op_network_rec => l_Old_op_network_rec
3036: , p_old_op_network_unexp_rec => l_Old_op_network_unexp_rec
3037: );
3038:
3039: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
3040: Error_Handler.Write_Debug
3041: ('Op Network: Check Attributes is completed with status '|| l_return_status );
3042: END IF;
3043:

Line 3079: (BOM_Rtg_Globals.G_OPR_UPDATE, BOM_Rtg_Globals.G_OPR_DELETE)

3075: END IF;
3076:
3077:
3078: IF l_op_network_rec.Transaction_Type IN
3079: (BOM_Rtg_Globals.G_OPR_UPDATE, BOM_Rtg_Globals.G_OPR_DELETE)
3080: THEN
3081:
3082: -- Process flow - Populate NULL columns for Update and
3083: -- Delete.

Line 3094: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN

3090: , x_op_network_rec => l_op_network_rec
3091: , x_op_network_unexp_rec => l_op_network_unexp_rec
3092: );
3093:
3094: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
3095: Error_Handler.Write_Debug
3096: ('Op Network: Populate Null columns is completed with status '|| l_return_status );
3097: END IF;
3098:

Line 3100: ELSIF l_op_network_rec.Transaction_Type = BOM_Rtg_Globals.G_OPR_CREATE

3096: ('Op Network: Populate Null columns is completed with status '|| l_return_status );
3097: END IF;
3098:
3099:
3100: ELSIF l_op_network_rec.Transaction_Type = BOM_Rtg_Globals.G_OPR_CREATE
3101: THEN
3102: --
3103: -- Default missing values for Operation network record creation
3104: --

Line 3114: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN

3110: , x_mesg_token_tbl => l_mesg_token_tbl
3111: , x_return_status => l_return_status
3112: );
3113:
3114: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
3115: Error_Handler.Write_Debug
3116: ('Op Network: Attribute Defaulting is completed with status '|| l_return_status );
3117: END IF;
3118:

Line 3227: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN

3223: , p_old_op_network_rec => l_old_op_network_rec
3224: , p_old_op_network_unexp_rec=> l_old_op_network_unexp_rec
3225: );
3226:
3227: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
3228: Error_Handler.Write_Debug
3229: ('Op Network: Check Entity1 is completed with status '|| l_return_status );
3230: END IF;
3231:

Line 3268: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN

3264: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3265: , x_return_status => l_return_status
3266: );
3267:
3268: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
3269: Error_Handler.Write_Debug
3270: ('Op Network: Perform Writes is completed with status '|| l_return_status );
3271: END IF;
3272:

Line 3300: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN

3296: , p_old_op_network_rec => l_old_op_network_rec
3297: , p_old_op_network_unexp_rec=> l_old_op_network_unexp_rec
3298: );
3299:
3300: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
3301: Error_Handler.Write_Debug
3302: ('Op Network: Check Entity2 is completed with status '|| l_return_status );
3303: END IF;
3304:

Line 3306: BOM_RTG_Globals.Add_Osfm_NW_Count(1);

3302: ('Op Network: Check Entity2 is completed with status '|| l_return_status );
3303: END IF;
3304:
3305: /* below is OSFM change */
3306: BOM_RTG_Globals.Add_Osfm_NW_Count(1);
3307: /* above is OSFM change */
3308:
3309: IF l_return_status = Error_Handler.G_STATUS_ERROR
3310: THEN

Line 3363: IF l_op_network_rec.Operation_Type = Bom_Rtg_Globals.G_LINE_OP THEN

3359: -- Load tables.
3360: l_op_network_tbl(I) := l_op_network_rec;
3361:
3362: -- Initialize variables for calc_cynp
3363: IF l_op_network_rec.Operation_Type = Bom_Rtg_Globals.G_LINE_OP THEN
3364: l_line_op := TRUE;
3365: ELSIF l_op_network_rec.Operation_Type = Bom_Rtg_Globals.G_PROCESS_OP THEN
3366: l_process_op := TRUE;
3367: END IF;

Line 3365: ELSIF l_op_network_rec.Operation_Type = Bom_Rtg_Globals.G_PROCESS_OP THEN

3361:
3362: -- Initialize variables for calc_cynp
3363: IF l_op_network_rec.Operation_Type = Bom_Rtg_Globals.G_LINE_OP THEN
3364: l_line_op := TRUE;
3365: ELSIF l_op_network_rec.Operation_Type = Bom_Rtg_Globals.G_PROCESS_OP THEN
3366: l_process_op := TRUE;
3367: END IF;
3368:
3369: -- For loop exception handler.

Line 3546: AND BOM_Rtg_Globals.Get_Eam_Item_Type <>

3542: FOR I IN 1..l_op_network_tbl.COUNT LOOP
3543: BEGIN
3544:
3545: IF l_op_network_rec.connection_type <> 3 -- Not Rework
3546: AND BOM_Rtg_Globals.Get_Eam_Item_Type <>
3547: BOM_Rtg_Globals.G_ASSET_ACTIVITY THEN
3548: bom_rtg_network_validate_api.validate_routing_network
3549: ( p_rtg_sequence_id => l_op_network_unexp_rec.routing_sequence_id
3550: , p_assy_item_id => l_op_network_unexp_rec.assembly_item_id

Line 3547: BOM_Rtg_Globals.G_ASSET_ACTIVITY THEN

3543: BEGIN
3544:
3545: IF l_op_network_rec.connection_type <> 3 -- Not Rework
3546: AND BOM_Rtg_Globals.Get_Eam_Item_Type <>
3547: BOM_Rtg_Globals.G_ASSET_ACTIVITY THEN
3548: bom_rtg_network_validate_api.validate_routing_network
3549: ( p_rtg_sequence_id => l_op_network_unexp_rec.routing_sequence_id
3550: , p_assy_item_id => l_op_network_unexp_rec.assembly_item_id
3551: , p_org_id => l_op_network_unexp_rec.organization_id

Line 3557: IF BOM_Rtg_Globals.Get_Debug = 'Y'

3553: , p_operation_type => l_op_network_rec.operation_type
3554: , x_status => l_return_status
3555: , x_message => l_other_message
3556: ) ;
3557: IF BOM_Rtg_Globals.Get_Debug = 'Y'
3558: THEN Error_Handler.Write_Debug
3559: ('After calling Rtg Network Validate API. Retrun status is '|| l_return_status);
3560: END IF;
3561: --dbms_output.put_line('returned from nwk validate');

Line 3606: l_temp_rtg_id := BOM_RTG_Globals.Get_Routing_Sequence_Id();

3602: END;
3603: END LOOP; -- END
3604: */
3605:
3606: l_temp_rtg_id := BOM_RTG_Globals.Get_Routing_Sequence_Id();
3607: IF l_process_op THEN
3608: bom_calc_cynp.calc_cynp_rbo(p_routing_sequence_id => l_temp_rtg_id,
3609: p_operation_type => BOM_Rtg_Globals.G_PROCESS_OP,
3610: p_update_events => 0,

Line 3609: p_operation_type => BOM_Rtg_Globals.G_PROCESS_OP,

3605:
3606: l_temp_rtg_id := BOM_RTG_Globals.Get_Routing_Sequence_Id();
3607: IF l_process_op THEN
3608: bom_calc_cynp.calc_cynp_rbo(p_routing_sequence_id => l_temp_rtg_id,
3609: p_operation_type => BOM_Rtg_Globals.G_PROCESS_OP,
3610: p_update_events => 0,
3611: x_token_tbl => l_token_tbl,
3612: x_err_msg => l_other_message,
3613: x_return_status => l_dummy);

Line 3631: p_operation_type => BOM_Rtg_Globals.G_LINE_OP,

3627: END IF;
3628: END IF;
3629: IF l_line_op THEN
3630: bom_calc_cynp.calc_cynp_rbo(p_routing_sequence_id => l_temp_rtg_id,
3631: p_operation_type => BOM_Rtg_Globals.G_LINE_OP,
3632: p_update_events => 0,
3633: x_token_tbl => l_token_tbl,
3634: x_err_msg => l_other_message,
3635: x_return_status => l_dummy);

Line 3656: IF ( l_op_network_tbl.COUNT = BOM_RTG_Globals.Get_Osfm_NW_Count() )

3652:
3653: /* end of the whole network validation */
3654:
3655: /*below change for RBO support for OSFM*/
3656: IF ( l_op_network_tbl.COUNT = BOM_RTG_Globals.Get_Osfm_NW_Count() )
3657: AND( l_op_network_tbl.COUNT <> 0 )
3658: AND ( l_temp_rtg_id IS NOT NULL AND l_temp_rtg_id <>0 )THEN
3659: IF BOM_Rtg_Globals.Get_Debug = 'Y'
3660: THEN Error_Handler.Write_Debug

Line 3659: IF BOM_Rtg_Globals.Get_Debug = 'Y'

3655: /*below change for RBO support for OSFM*/
3656: IF ( l_op_network_tbl.COUNT = BOM_RTG_Globals.Get_Osfm_NW_Count() )
3657: AND( l_op_network_tbl.COUNT <> 0 )
3658: AND ( l_temp_rtg_id IS NOT NULL AND l_temp_rtg_id <>0 )THEN
3659: IF BOM_Rtg_Globals.Get_Debug = 'Y'
3660: THEN Error_Handler.Write_Debug
3661: ('Op Network: Calling BOM_Validate_Op_Network.Check_WSM_Netowrk_Attribs....');
3662: END IF;
3663:

Line 3672: IF BOM_Rtg_Globals.Get_Debug = 'Y'

3668: , x_mesg_token_tbl => l_mesg_token_tbl
3669: , x_Return_status => l_return_status
3670: );
3671:
3672: IF BOM_Rtg_Globals.Get_Debug = 'Y'
3673: THEN Error_Handler.Write_Debug
3674: ('Op Network: Check_WSM_Netowrk_Attribs comleted with Status '||
3675: l_return_status);
3676: END IF;

Line 3683: IF BOM_Rtg_Globals.Get_Debug = 'Y'

3679: IF l_return_status = Error_Handler.G_STATUS_ERROR
3680: THEN
3681: RAISE EXC_SEV_QUIT_OBJECT ;
3682: END IF;
3683: IF BOM_Rtg_Globals.Get_Debug = 'Y'
3684: THEN Error_Handler.Write_Debug
3685: ('Op Network: Calling BOM_Op_Network_UTIL.Set_WSM_Network_Sub_Loc...');
3686: END IF;
3687:

Line 3695: IF BOM_Rtg_Globals.Get_Debug = 'Y'

3691: , x_mesg_token_tbl => l_mesg_token_tbl
3692: , x_Return_status => l_return_status
3693: );
3694:
3695: IF BOM_Rtg_Globals.Get_Debug = 'Y'
3696: THEN Error_Handler.Write_Debug
3697: ('Op Network: Set_WSM_Network_Sub_Loc comleted with Status '||
3698: l_return_status);
3699: END IF;

Line 3711: AND ( BOM_RTG_Globals.Get_Routing_Sequence_Id() IS NOT NULL ) )

3707:
3708: -- bug:5235684 SSOS is required for standard/network routing for serial controlled item
3709: -- and it should be present on primary path.
3710: IF ( ( l_return_status = FND_API.G_RET_STS_SUCCESS )
3711: AND ( BOM_RTG_Globals.Get_Routing_Sequence_Id() IS NOT NULL ) )
3712: THEN
3713: Bom_Validate_Rtg_Header.Validate_SSOS
3714: ( p_routing_sequence_id => BOM_RTG_Globals.Get_Routing_Sequence_Id()
3715: , p_ser_start_op_seq => NULL

Line 3714: ( p_routing_sequence_id => BOM_RTG_Globals.Get_Routing_Sequence_Id()

3710: IF ( ( l_return_status = FND_API.G_RET_STS_SUCCESS )
3711: AND ( BOM_RTG_Globals.Get_Routing_Sequence_Id() IS NOT NULL ) )
3712: THEN
3713: Bom_Validate_Rtg_Header.Validate_SSOS
3714: ( p_routing_sequence_id => BOM_RTG_Globals.Get_Routing_Sequence_Id()
3715: , p_ser_start_op_seq => NULL
3716: , p_validate_from_table => TRUE
3717: , x_mesg_token_tbl => l_Mesg_Token_Tbl
3718: , x_return_status => l_return_status );

Line 3726: IF ( BOM_RTG_Globals.Get_Routing_Sequence_Id() IS NOT NULL ) THEN

3722: END IF;
3723: END IF; -- end if ( l_return_status = FND_API.G_RET_STS_SUCCESS )
3724:
3725: --bug:5060186 Copy the first or last operation of the network if disabled.
3726: IF ( BOM_RTG_Globals.Get_Routing_Sequence_Id() IS NOT NULL ) THEN
3727: Bom_Op_Network_Util.Copy_First_Last_Dis_Op(
3728: p_routing_sequence_id => BOM_RTG_Globals.Get_Routing_Sequence_Id()
3729: , x_mesg_token_tbl => l_mesg_token_tbl
3730: , x_return_status => l_return_status );

Line 3728: p_routing_sequence_id => BOM_RTG_Globals.Get_Routing_Sequence_Id()

3724:
3725: --bug:5060186 Copy the first or last operation of the network if disabled.
3726: IF ( BOM_RTG_Globals.Get_Routing_Sequence_Id() IS NOT NULL ) THEN
3727: Bom_Op_Network_Util.Copy_First_Last_Dis_Op(
3728: p_routing_sequence_id => BOM_RTG_Globals.Get_Routing_Sequence_Id()
3729: , x_mesg_token_tbl => l_mesg_token_tbl
3730: , x_return_status => l_return_status );
3731:
3732: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN

Line 3732: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN

3728: p_routing_sequence_id => BOM_RTG_Globals.Get_Routing_Sequence_Id()
3729: , x_mesg_token_tbl => l_mesg_token_tbl
3730: , x_return_status => l_return_status );
3731:
3732: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
3733: Error_Handler.Write_Debug
3734: ( 'Op Network: Copy First/Last Disabled Operation completed with status ' ||
3735: l_return_status );
3736: END IF;

Line 3852: l_temp_op_rec_tbl BOM_RTG_Globals.Temp_Op_Rec_Tbl_Type;

3848: l_op_seq_num NUMBER;
3849: l_strt_eff_date DATE;
3850: l_tmp_cnt NUMBER := 1;
3851: l_dummy_cnt NUMBER;
3852: l_temp_op_rec_tbl BOM_RTG_Globals.Temp_Op_Rec_Tbl_Type;
3853:
3854: l_cfm_routing_flag BOM_OPERATIONAL_ROUTINGS.CFM_ROUTING_FLAG%TYPE;
3855: l_routing_sequence_id NUMBER;
3856:

Line 3863: l_op_unexp_rec.organization_id := BOM_Rtg_Globals.Get_Org_Id ;

3859: -- Init local table variables.
3860: l_return_status := 'S' ;
3861: l_bo_return_status := 'S' ;
3862: l_operation_tbl := p_operation_tbl ;
3863: l_op_unexp_rec.organization_id := BOM_Rtg_Globals.Get_Org_Id ;
3864: l_temp_op_rec_tbl.DELETE;
3865: l_tmp_cnt := 1;
3866: FOR I IN 1..l_operation_tbl.COUNT LOOP
3867: BEGIN

Line 3883: BOM_RTG_Globals.G_Init_Eff_Date_Op_Num_Flag := FALSE;

3879: --
3880: l_process_children := FALSE;
3881:
3882: -- Initialize the init_eff_date_op_num flag to false for every operation (bug 2767019)
3883: BOM_RTG_Globals.G_Init_Eff_Date_Op_Num_Flag := FALSE;
3884:
3885: --
3886: -- Initialize the Unexposed Record for every iteration of the Loop
3887: -- so that sequence numbers get generated for every new row.

Line 3944: -- Call the BOM_Rtg_Globals.Transaction_Type_Validity

3940:
3941: --
3942: -- Process Flow step 3 :Check if transaction_type is valid
3943: -- Transaction_Type must be CRATE, UPDATE, DELETE
3944: -- Call the BOM_Rtg_Globals.Transaction_Type_Validity
3945: --
3946:
3947: BOM_Rtg_Globals.Transaction_Type_Validity
3948: ( p_transaction_type => l_operation_rec.transaction_type

Line 3947: BOM_Rtg_Globals.Transaction_Type_Validity

3943: -- Transaction_Type must be CRATE, UPDATE, DELETE
3944: -- Call the BOM_Rtg_Globals.Transaction_Type_Validity
3945: --
3946:
3947: BOM_Rtg_Globals.Transaction_Type_Validity
3948: ( p_transaction_type => l_operation_rec.transaction_type
3949: , p_entity => 'Op_Seq'
3950: , p_entity_id => l_operation_rec.operation_sequence_number
3951: , x_valid => l_valid

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

3971: , x_mesg_token_tbl => l_mesg_token_tbl
3972: , x_return_status => l_return_status
3973: ) ;
3974:
3975: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3976: ('Convert to User Unique Index to Index1 completed with return_status: ' || l_return_status) ;
3977: END IF;
3978:
3979: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

3990: l_other_token_tbl(1).token_name := 'OP_SEQ_NUMBER';
3991: l_other_token_tbl(1).token_value :=
3992: l_operation_rec.operation_sequence_number ;
3993: RAISE EXC_UNEXP_SKIP_OBJECT;
3994: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3995: ('Convert to User Unique Index to Index2 completed
3996: with return_status: ' || l_return_status) ;
3997: END IF ;
3998:

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

4014: , x_other_token_tbl => l_other_token_tbl
4015: , x_return_status => l_return_status
4016: ) ;
4017:
4018: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
4019: ('Convert to User Unique Index to Index2 completed with return_status:
4020: ' || l_return_status) ;
4021: END IF;
4022:

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

4045: , x_mesg_token_tbl => l_mesg_token_tbl
4046: , x_return_status => l_return_status
4047: ) ;
4048:
4049: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
4050: ('Check Existence completed with return_status: ' || l_return_status) ;
4051: END IF ;
4052:
4053: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

4092: , x_mesg_token_tbl => l_mesg_token_tbl
4093: , x_return_status => l_return_status
4094: ) ;
4095:
4096: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
4097: ('Check Assembly Item Operability completed with return_status: ' || l_return_status) ;
4098: END IF ;
4099:
4100:

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

4125: , x_mesg_token_tbl => l_mesg_token_tbl
4126: , x_return_status => l_return_status
4127: ) ;
4128:
4129: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
4130: ('Check the routing non-referenced common completed with return_status: ' || l_return_status) ;
4131: END IF ;
4132:
4133: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

4175: , x_return_status => l_return_status
4176: ) ;
4177:
4178:
4179: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
4180: ('Check non-operating columns completed with return_status: ' || l_return_status) ;
4181: END IF ;
4182:
4183: IF l_return_status = Error_Handler.G_STATUS_UNEXPECTED

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

4227: , x_mesg_token_tbl => l_mesg_token_tbl
4228: , x_return_status => l_return_status
4229: );
4230:
4231: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
4232: ('Value-id conversions completed with return_status: ' || l_return_status) ;
4233: END IF ;
4234:
4235: IF l_return_status = Error_Handler.G_STATUS_ERROR

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

4293: , x_mesg_token_tbl => l_mesg_token_tbl
4294: ) ;
4295:
4296:
4297: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
4298: ('Check required completed with return_status: ' || l_return_status) ;
4299: END IF ;
4300:
4301:

Line 4304: IF l_operation_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE

4300:
4301:
4302: IF l_return_status = Error_Handler.G_STATUS_ERROR
4303: THEN
4304: IF l_operation_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
4305: THEN
4306: l_other_message := 'BOM_OP_REQ_CSEV_SKIP';
4307: l_other_token_tbl(1).token_name := 'OP_SEQ_NUMBER';
4308: l_other_token_tbl(1).token_value :=

Line 4329: (BOM_Rtg_Globals.G_OPR_CREATE, BOM_Rtg_Globals.G_OPR_UPDATE)

4325: --
4326: --
4327:
4328: IF l_operation_rec.transaction_type IN
4329: (BOM_Rtg_Globals.G_OPR_CREATE, BOM_Rtg_Globals.G_OPR_UPDATE)
4330: THEN
4331: Bom_Validate_Op_Seq.Check_Attributes
4332: ( p_operation_rec => l_operation_rec
4333: , p_op_unexp_rec => l_op_unexp_rec

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

4333: , p_op_unexp_rec => l_op_unexp_rec
4334: , x_return_status => l_return_status
4335: , x_mesg_token_tbl => l_mesg_token_tbl
4336: ) ;
4337: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
4338: ('Attribute validation completed with return_status: ' || l_return_status) ;
4339: END IF ;
4340:
4341: IF BOM_RTG_Globals.G_Init_Eff_Date_Op_Num_Flag -- Added for bug 2767019

Line 4341: IF BOM_RTG_Globals.G_Init_Eff_Date_Op_Num_Flag -- Added for bug 2767019

4337: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
4338: ('Attribute validation completed with return_status: ' || l_return_status) ;
4339: END IF ;
4340:
4341: IF BOM_RTG_Globals.G_Init_Eff_Date_Op_Num_Flag -- Added for bug 2767019
4342: THEN
4343: -- This flag is set only for Create transactions and
4344: -- if the date is in the past wrt time, but on the same day
4345: -- Initialize the date which will be used for this operation

Line 4350: IF l_operation_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE

4346: l_operation_rec.Start_Effective_Date := sysdate;
4347: END IF;
4348: IF l_return_status = Error_Handler.G_STATUS_ERROR
4349: THEN
4350: IF l_operation_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
4351: THEN
4352: l_other_message := 'BOM_OP_ATTVAL_CSEV_SKIP';
4353: l_other_token_tbl(1).token_name := 'OP_SEQ_NUMBER';
4354: l_other_token_tbl(1).token_value :=

Line 4397: (BOM_Rtg_Globals.G_OPR_UPDATE, BOM_Rtg_Globals.G_OPR_DELETE)

4393: END IF;
4394:
4395:
4396: IF l_operation_rec.transaction_type IN
4397: (BOM_Rtg_Globals.G_OPR_UPDATE, BOM_Rtg_Globals.G_OPR_DELETE)
4398: THEN
4399:
4400: --
4401: -- Process flow step 12: Populate NULL columns for Update and Delete

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

4401: -- Process flow step 12: Populate NULL columns for Update and Delete
4402: -- Call Bom_Default_Op_Seq.Populate_Null_Columns
4403: --
4404:
4405: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Populate NULL columns') ;
4406: END IF ;
4407:
4408: Bom_Default_Op_Seq.Populate_Null_Columns
4409: ( p_operation_rec => l_operation_rec

Line 4418: ELSIF l_operation_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE

4414: , x_op_unexp_rec => l_op_unexp_rec
4415: ) ;
4416:
4417:
4418: ELSIF l_operation_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
4419: THEN
4420: --
4421: -- Process Flow step 13 : Default missing values for Operation (CREATE)
4422: -- (also includes Entity Defaulting)

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

4431: , x_mesg_token_tbl => l_mesg_token_tbl
4432: , x_return_status => l_return_status
4433: ) ;
4434:
4435: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
4436: ('Attribute Defaulting completed with return_status: ' || l_return_status) ;
4437: END IF ;
4438:
4439:

Line 4487: IF l_operation_rec.transaction_type IN ( BOM_Rtg_Globals.G_OPR_CREATE

4483: --
4484: -- Process Flow step 14: Conditionally Required Attributes
4485: --
4486: --
4487: IF l_operation_rec.transaction_type IN ( BOM_Rtg_Globals.G_OPR_CREATE
4488: , BOM_Rtg_Globals.G_OPR_UPDATE )
4489: THEN
4490: Bom_Validate_Op_Seq.Check_Conditionally_Required
4491: ( p_operation_rec => l_operation_rec

Line 4488: , BOM_Rtg_Globals.G_OPR_UPDATE )

4484: -- Process Flow step 14: Conditionally Required Attributes
4485: --
4486: --
4487: IF l_operation_rec.transaction_type IN ( BOM_Rtg_Globals.G_OPR_CREATE
4488: , BOM_Rtg_Globals.G_OPR_UPDATE )
4489: THEN
4490: Bom_Validate_Op_Seq.Check_Conditionally_Required
4491: ( p_operation_rec => l_operation_rec
4492: , p_op_unexp_rec => l_op_unexp_rec

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

4493: , x_return_status => l_return_status
4494: , x_mesg_token_tbl => l_mesg_token_tbl
4495: ) ;
4496:
4497: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
4498: ('Check Conditionally Required Attr. completed with return_status: ' || l_return_status) ;
4499: END IF ;
4500:
4501: IF l_return_status = Error_Handler.G_STATUS_ERROR

Line 4503: IF l_operation_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE

4499: END IF ;
4500:
4501: IF l_return_status = Error_Handler.G_STATUS_ERROR
4502: THEN
4503: IF l_operation_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
4504: THEN
4505: l_other_message := 'BOM_OP_CONREQ_CSEV_SKIP';
4506: l_other_token_tbl(1).token_name := 'OP_SEQ_NUMBER';
4507: l_other_token_tbl(1).token_value :=

Line 4553: IF l_operation_rec.transaction_type IN ( BOM_Rtg_Globals.G_OPR_CREATE

4549: -- Process Flow step 15: Entity defaulting for CREATE and UPDATE
4550: -- Merged into Process Flow step 13 : Default missing values
4551: --
4552:
4553: IF l_operation_rec.transaction_type IN ( BOM_Rtg_Globals.G_OPR_CREATE
4554: , BOM_Rtg_Globals.G_OPR_UPDATE )
4555: THEN
4556: Bom_Default_Op_Seq.Entity_Defaulting
4557: ( p_operation_rec => l_operation_rec

Line 4554: , BOM_Rtg_Globals.G_OPR_UPDATE )

4550: -- Merged into Process Flow step 13 : Default missing values
4551: --
4552:
4553: IF l_operation_rec.transaction_type IN ( BOM_Rtg_Globals.G_OPR_CREATE
4554: , BOM_Rtg_Globals.G_OPR_UPDATE )
4555: THEN
4556: Bom_Default_Op_Seq.Entity_Defaulting
4557: ( p_operation_rec => l_operation_rec
4558: , p_op_unexp_rec => l_op_unexp_rec

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

4561: , x_mesg_token_tbl => l_mesg_token_tbl
4562: , x_return_status => l_return_status
4563: ) ;
4564:
4565: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
4566: ('Entity defaulting completed with return_status: ' || l_return_status) ;
4567: END IF ;
4568:
4569: IF l_return_status = Error_Handler.G_STATUS_ERROR

Line 4571: IF l_operation_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE

4567: END IF ;
4568:
4569: IF l_return_status = Error_Handler.G_STATUS_ERROR
4570: THEN
4571: IF l_operation_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
4572: THEN
4573: l_other_message := 'BOM_OP_ENTDEF_CSEV_SKIP';
4574: l_other_token_tbl(1).token_name := 'OP_SEQ_NUMBER';
4575: l_other_token_tbl(1).token_value :=

Line 4635: IF l_operation_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE

4631:
4632:
4633: IF l_return_status = Error_Handler.G_STATUS_ERROR
4634: THEN
4635: IF l_operation_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
4636: THEN
4637: l_other_message := 'BOM_OP_ENTVAL_CSEV_SKIP';
4638: l_other_token_tbl(1).token_name := 'OP_SEQ_NUMBER';
4639: l_other_token_tbl(1).token_value :=

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

4675: , x_sub_resource_tbl => l_sub_resource_tbl
4676: ) ;
4677: END IF;
4678:
4679: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity validation completed with '
4680: || l_return_Status || ' proceeding for database writes . . . ') ;
4681: END IF;
4682:
4683: --

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

4724: , x_sub_resource_tbl => l_sub_resource_tbl
4725: ) ;
4726: END IF;
4727:
4728: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Op Database writes completed with status ' || l_return_status);
4729: END IF;
4730:
4731: END IF; -- END IF statement that checks RETURN STATUS
4732:

Line 5077: OR BOM_RTG_Globals.G_Init_Eff_Date_Op_Num_Flag THEN -- added for bug 2767019

5073: l_strt_eff_date := nvl(l_operation_rec.New_Start_Effective_Date, l_operation_rec.start_effective_date);
5074:
5075: IF l_operation_rec.New_Operation_Sequence_Number IS NOT NULL -- populate the temp_op_rec_tbl to be used later by networks
5076: OR l_operation_rec.New_Start_Effective_Date IS NOT NULL
5077: OR BOM_RTG_Globals.G_Init_Eff_Date_Op_Num_Flag THEN -- added for bug 2767019
5078:
5079: l_temp_op_rec_tbl(l_tmp_cnt).old_op_seq_num := l_operation_rec.operation_sequence_number;
5080: l_temp_op_rec_tbl(l_tmp_cnt).new_op_seq_num := l_op_seq_num;
5081:

Line 5086: BOM_RTG_Globals.G_Init_Eff_Date_Op_Num_Flag := TRUE;

5082: l_temp_op_rec_tbl(l_tmp_cnt).old_start_eff_date := l_operation_rec.start_effective_date;
5083: l_temp_op_rec_tbl(l_tmp_cnt).new_start_eff_date := l_strt_eff_date;
5084:
5085: l_tmp_cnt := l_tmp_cnt + 1;
5086: BOM_RTG_Globals.G_Init_Eff_Date_Op_Num_Flag := TRUE;
5087:
5088: -- Set the temp_op_rec_tbl to be used by the children(res and sub res) and network (for OSFM)
5089: BOM_RTG_Globals.Set_Temp_Op_Tbl(l_temp_op_rec_tbl);
5090: END IF;

Line 5089: BOM_RTG_Globals.Set_Temp_Op_Tbl(l_temp_op_rec_tbl);

5085: l_tmp_cnt := l_tmp_cnt + 1;
5086: BOM_RTG_Globals.G_Init_Eff_Date_Op_Num_Flag := TRUE;
5087:
5088: -- Set the temp_op_rec_tbl to be used by the children(res and sub res) and network (for OSFM)
5089: BOM_RTG_Globals.Set_Temp_Op_Tbl(l_temp_op_rec_tbl);
5090: END IF;
5091:
5092: Operation_Resources
5093: ( p_validation_level => p_validation_level

Line 5149: BOM_RTG_Globals.G_Init_Eff_Date_Op_Num_Flag := FALSE;

5145:
5146: END IF; -- Process children
5147: END LOOP; -- END Operation Sequences processing loop
5148: -- Reset the Init_Eff_Date_Op_Num flag so that this affects only it's children
5149: BOM_RTG_Globals.G_Init_Eff_Date_Op_Num_Flag := FALSE;
5150:
5151:
5152: -- bug:5060186 Copy the first or last operation of the network routing if disabled.
5153: IF ( l_routing_sequence_id IS NOT NULL ) THEN

Line 5165: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN

5161: p_routing_sequence_id => l_routing_sequence_id
5162: , x_mesg_token_tbl => l_mesg_token_tbl
5163: , x_return_status => l_return_status );
5164:
5165: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
5166: Error_Handler.Write_Debug
5167: ( 'Op Sequences: Copy First/Last Disabled Operation completed with status ' ||
5168: l_return_status );
5169: END IF; -- end if BOM_Rtg_Globals.Get_Debug = 'Y'

Line 5169: END IF; -- end if BOM_Rtg_Globals.Get_Debug = 'Y'

5165: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
5166: Error_Handler.Write_Debug
5167: ( 'Op Sequences: Copy First/Last Disabled Operation completed with status ' ||
5168: l_return_status );
5169: END IF; -- end if BOM_Rtg_Globals.Get_Debug = 'Y'
5170: END IF; -- end if l_cfm_routing_flag = 3
5171: END IF; -- end if l_routing_sequence_id IS NOT NULL
5172:
5173: -- Load OUT parameters

Line 5254: l_rtg_rev_unexp_rec.organization_id := BOM_Rtg_Globals.Get_org_id;

5250:
5251: -- Init local table variables.
5252:
5253: l_rtg_revision_tbl := p_rtg_revision_tbl;
5254: l_rtg_rev_unexp_rec.organization_id := BOM_Rtg_Globals.Get_org_id;
5255:
5256: FOR I IN 1..l_rtg_revision_tbl.COUNT LOOP
5257: BEGIN
5258:

Line 5298: BOM_Rtg_Globals.Transaction_Type_Validity

5294:
5295: --
5296: -- Check if transaction_type is valid
5297: --
5298: BOM_Rtg_Globals.Transaction_Type_Validity
5299: ( p_transaction_type => l_rtg_revision_rec.transaction_type
5300: , p_entity => 'Routing_Revision'
5301: , p_entity_id => l_rtg_revision_rec.revision
5302: , x_valid => l_valid

Line 5356: IF l_rtg_revision_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE

5352: -- If revision is being created and the business object does not
5353: -- carry the Rtg header, then it is imperative to check for the
5354: -- Rtg Header's existence.
5355:
5356: IF l_rtg_revision_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
5357: AND
5358: NOT l_rtg_parent_exists
5359: THEN
5360: l_rtg_header_rec.alternate_routing_code := p_alternate_rtg_code;

Line 5462: (BOM_Rtg_Globals.G_OPR_UPDATE, BOM_Rtg_Globals.G_OPR_CREATE)

5458: --
5459: -- Process Flow step 9: Attribute Validation for Create and Update
5460: --
5461: IF l_rtg_revision_rec.transaction_type IN
5462: (BOM_Rtg_Globals.G_OPR_UPDATE, BOM_Rtg_Globals.G_OPR_CREATE)
5463: THEN
5464:
5465: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
5466: Error_Handler.Write_Debug('Rtg Revision : Check Attributes . . .');

Line 5465: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN

5461: IF l_rtg_revision_rec.transaction_type IN
5462: (BOM_Rtg_Globals.G_OPR_UPDATE, BOM_Rtg_Globals.G_OPR_CREATE)
5463: THEN
5464:
5465: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
5466: Error_Handler.Write_Debug('Rtg Revision : Check Attributes . . .');
5467: END IF;
5468:
5469: Bom_Validate_Rtg_Revision.Check_Attributes

Line 5503: (BOM_Rtg_Globals.G_OPR_UPDATE, BOM_Rtg_Globals.G_OPR_DELETE)

5499: END IF;
5500:
5501:
5502: IF l_rtg_revision_rec.Transaction_Type IN
5503: (BOM_Rtg_Globals.G_OPR_UPDATE, BOM_Rtg_Globals.G_OPR_DELETE)
5504: THEN
5505:
5506: -- Process flow - Populate NULL columns for Update and
5507: -- Delete.

Line 5518: ELSIF l_rtg_revision_rec.Transaction_Type = BOM_Rtg_Globals.G_OPR_CREATE

5514: , x_rtg_revision_rec => l_rtg_revision_rec
5515: , x_rtg_rev_unexp_rec => l_rtg_rev_unexp_rec
5516: );
5517:
5518: ELSIF l_rtg_revision_rec.Transaction_Type = BOM_Rtg_Globals.G_OPR_CREATE
5519: THEN
5520:
5521: --
5522: -- Default missing values for Operation

Line 5823: l_rtg_header_unexp_rec.organization_id := BOM_Rtg_Globals.Get_Org_Id;

5819:
5820: -- Load entity and record-specific details into system_information
5821: -- record
5822:
5823: l_rtg_header_unexp_rec.organization_id := BOM_Rtg_Globals.Get_Org_Id;
5824:
5825:
5826: l_rtg_header_rec := p_rtg_header_rec;
5827: l_rtg_header_rec.transaction_type :=

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

5826: l_rtg_header_rec := p_rtg_header_rec;
5827: l_rtg_header_rec.transaction_type :=
5828: UPPER(l_rtg_header_rec.transaction_type);
5829:
5830: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN
5831: Error_Handler.Write_Debug('Processing Rtg Header - Trans Type : '|| l_rtg_header_rec.transaction_type) ;
5832: End IF ;
5833: -- Process Flow Step 2: Check if record has not yet been processed
5834: --

Line 5855: BOM_Rtg_Globals.Transaction_Type_Validity

5851:
5852: --
5853: -- Process Flow Step 3: Check if transaction_type is valid
5854: --
5855: BOM_Rtg_Globals.Transaction_Type_Validity
5856: ( p_transaction_type => l_rtg_header_rec.transaction_type
5857: , p_entity => 'Routing_Header'
5858: , p_entity_id => l_rtg_header_rec.assembly_item_name
5859: , x_valid => l_valid

Line 5881: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN

5877: , x_return_status => l_return_status
5878: , x_mesg_token_tbl => l_mesg_token_tbl
5879: );
5880:
5881: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
5882: Error_Handler.Write_Debug ('Rtg Header: UUI-UI Conversion. Return Status : '|| l_return_status );
5883: END IF;
5884:
5885: IF l_return_status = Error_Handler.G_STATUS_ERROR

Line 5913: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN

5909: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5910: , x_return_status => l_return_status
5911: );
5912:
5913: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
5914: Error_Handler.Write_Debug ('Rtg Header: Check Existence. Return Status : '|| l_return_status );
5915: END IF;
5916:
5917: IF l_return_status = Error_Handler.G_STATUS_ERROR

Line 5947: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN

5943: , x_mesg_token_tbl => l_mesg_token_tbl
5944: , x_return_status => l_return_status
5945: );
5946:
5947: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
5948: Error_Handler.Write_Debug ('Rtg Header: Check Access. Return Status : '|| l_return_status );
5949: END IF;
5950:
5951: IF l_return_status = Error_Handler.G_STATUS_ERROR

Line 5979: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN

5975: , x_mesg_token_tbl => l_mesg_token_tbl
5976: , x_return_status => l_return_status
5977: );
5978:
5979: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
5980: Error_Handler.Write_Debug ('Rtg Header: Check Flow Routing operability. Return Status : '|| l_return_status );
5981: END IF;
5982:
5983:

Line 6007: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN

6003: , x_mesg_token_tbl => l_mesg_token_tbl
6004: , x_return_status => l_return_status
6005: );
6006:
6007: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
6008: Error_Handler.Write_Debug ('Rtg Header: Check Lot Controlled Item. Return Status : '||l_return_status);
6009: END IF;
6010:
6011: IF l_return_status = Error_Handler.G_STATUS_ERROR

Line 6039: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN

6035:
6036: --
6037: -- Process Flow Step 8: Value-ID conversion.
6038: --
6039: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
6040: Error_Handler.Write_Debug('Rtg Header: Value-Id Conversion . . .');
6041: END IF;
6042: BOM_Rtg_Val_To_Id.Rtg_Header_VID
6043: ( x_Return_Status => l_return_status

Line 6103: (BOM_Rtg_Globals.G_OPR_UPDATE, BOM_Rtg_Globals.G_OPR_CREATE)

6099: -- Process Flow step 10: Attribute Validation for Create and Update
6100: --
6101:
6102: IF l_rtg_header_rec.transaction_type IN
6103: (BOM_Rtg_Globals.G_OPR_UPDATE, BOM_Rtg_Globals.G_OPR_CREATE)
6104: THEN
6105:
6106: Bom_Validate_Rtg_Header.Check_Attributes
6107: ( x_return_status => l_return_status

Line 6115: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN

6111: , p_old_rtg_header_rec => l_old_rtg_header_rec
6112: , p_old_rtg_header_unexp_rec => l_old_rtg_header_unexp_rec
6113: );
6114:
6115: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
6116: Error_Handler.Write_Debug ('Rtg Header: Check Attributes. Return Status : '|| l_return_status );
6117: END IF ;
6118:
6119:

Line 6146: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN

6142: ELSIF l_return_status ='S' AND
6143: l_Mesg_Token_Tbl.COUNT <>0
6144: THEN
6145:
6146: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
6147: Error_Handler.Write_Debug ('Warning : '|| l_return_status );
6148: END IF ;
6149: Bom_Rtg_Error_Handler.Log_Error
6150: ( p_rtg_header_rec => l_rtg_header_rec

Line 6181: (BOM_Rtg_Globals.G_OPR_UPDATE, BOM_Rtg_Globals.G_OPR_DELETE)

6177: -- If the Transaction Type is Update/Delete, then Populate_Null_Columns
6178: -- Else Attribute_Defaulting
6179: --
6180: IF l_rtg_header_rec.Transaction_Type IN
6181: (BOM_Rtg_Globals.G_OPR_UPDATE, BOM_Rtg_Globals.G_OPR_DELETE)
6182: THEN
6183:
6184: --
6185: -- Process flow step 12 - Populate NULL columns for Update and

Line 6197: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN

6193: , x_rtg_header_rec => l_rtg_header_rec
6194: , x_rtg_header_unexp_rec => l_rtg_header_unexp_rec
6195: );
6196:
6197: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
6198: Error_Handler.Write_Debug ('Rtg Header: Populate Null Columns. Return Status : '|| l_return_status );
6199: END IF ;
6200:
6201: ELSIF l_rtg_header_rec.Transaction_Type = BOM_Rtg_Globals.G_OPR_CREATE THEN

Line 6201: ELSIF l_rtg_header_rec.Transaction_Type = BOM_Rtg_Globals.G_OPR_CREATE THEN

6197: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
6198: Error_Handler.Write_Debug ('Rtg Header: Populate Null Columns. Return Status : '|| l_return_status );
6199: END IF ;
6200:
6201: ELSIF l_rtg_header_rec.Transaction_Type = BOM_Rtg_Globals.G_OPR_CREATE THEN
6202: --
6203: -- Process Flow step 12: Default missing values for Operation CREATE
6204: --
6205: BOM_Default_Rtg_Header.Attribute_Defaulting

Line 6214: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN

6210: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6211: , x_return_status => l_return_status
6212: );
6213:
6214: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
6215: Error_Handler.Write_Debug ('Rtg Header: Attribute Defaulting. Return Status : '|| l_return_status );
6216: END IF ;
6217:
6218: IF l_return_status = Error_Handler.G_STATUS_ERROR

Line 6276: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN

6272: , p_rtg_header_rec => l_rtg_header_rec
6273: , p_rtg_header_unexp_rec => l_rtg_header_unexp_rec
6274: );
6275:
6276: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
6277: Error_Handler.Write_Debug ('Rtg Header: Check Required. Return Status : '|| l_return_status );
6278: END IF ;
6279:
6280: IF l_return_status = Error_Handler.G_STATUS_ERROR

Line 6282: IF l_rtg_header_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE

6278: END IF ;
6279:
6280: IF l_return_status = Error_Handler.G_STATUS_ERROR
6281: THEN
6282: IF l_rtg_header_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
6283: THEN
6284: l_other_message := 'BOM_RTG_CONREQ_CSEV_SKIP';
6285: l_other_token_tbl(1).token_name := 'ASSEMBLY_ITEM_NAME';
6286: l_other_token_tbl(1).token_value :=

Line 6331: BOM_Rtg_Globals.G_OPR_CREATE, BOM_Rtg_Globals.G_OPR_UPDATE)

6327: -- Process Flow step 14 - Entity Level Defaulting for Operation CREATE
6328: -- and operation update.
6329:
6330: IF l_rtg_header_rec.Transaction_Type IN (
6331: BOM_Rtg_Globals.G_OPR_CREATE, BOM_Rtg_Globals.G_OPR_UPDATE)
6332: THEN
6333:
6334: BOM_Default_Rtg_Header.Entity_Attribute_Defaulting
6335: ( p_rtg_header_rec => l_rtg_header_rec

Line 6343: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN

6339: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6340: , x_return_status => l_return_status
6341: );
6342:
6343: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
6344: Error_Handler.Write_Debug ('Rtg Header: Entity Level Defaulting. Return Status : '|| l_return_status );
6345: END IF ;
6346:
6347: IF l_return_status = Error_Handler.G_STATUS_ERROR

Line 6413: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN

6409: , p_old_rtg_header_rec => l_rtg_header_rec
6410: , p_old_rtg_header_unexp_rec => l_old_rtg_header_unexp_rec
6411: );
6412:
6413: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
6414: Error_Handler.Write_Debug ('Rtg Header: Check Entity. Return Status : '|| l_return_status );
6415: END IF ;
6416:
6417: ELSE

Line 6426: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN

6422: , p_rtg_header_Unexp_Rec => l_rtg_header_unexp_rec
6423: , x_rtg_header_unexp_rec => l_rtg_header_unexp_rec
6424: );
6425:
6426: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
6427: Error_Handler.Write_Debug ('Rtg Header: Check Entity for Deleting. Return Status : '|| l_return_status );
6428: END IF ;
6429:
6430: END IF;

Line 6434: IF l_rtg_header_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE

6430: END IF;
6431:
6432: IF l_return_status = Error_Handler.G_STATUS_ERROR
6433: THEN
6434: IF l_rtg_header_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
6435: THEN
6436: l_other_message := 'BOM_RTG_ENTVAL_CSEV_SKIP';
6437: l_other_token_tbl(1).token_name := 'ASSEMBLY_ITEM_NAME';
6438: l_other_token_tbl(1).token_value :=

Line 6489: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN

6485: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6486: , x_return_status => l_return_status
6487: );
6488:
6489: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
6490: Error_Handler.Write_Debug ('Rtg Header: Perform DB Writes. Return Status : '|| l_return_status );
6491: END IF ;
6492:
6493: IF l_return_status = Error_Handler.G_STATUS_UNEXPECTED

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

6983:
6984: EXC_ERR_PVT_API_MAIN EXCEPTION;
6985:
6986: BEGIN
6987: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN
6988: Error_Handler.Write_Debug('Processing Rtg BO Private API . . . ' ) ;
6989: End IF ;
6990:
6991: -- Init local variables.

Line 7005: BOM_Rtg_Globals.Init_System_Info_Rec

7001:
7002: --Load environment information into the SYSTEM_INFORMATION record
7003: -- (USER_ID, LOGIN_ID, PROG_APPID, PROG_ID)
7004:
7005: BOM_Rtg_Globals.Init_System_Info_Rec
7006: ( x_mesg_token_tbl => l_mesg_token_tbl
7007: , x_return_status => l_return_status
7008: );
7009:

Line 7011: BOM_Rtg_Globals.Set_Osfm_NW_Count(0);

7007: , x_return_status => l_return_status
7008: );
7009:
7010: /* below are changes for OSFM */
7011: BOM_Rtg_Globals.Set_Osfm_NW_Count(0);
7012: BOM_Rtg_Globals.Set_Osfm_NW_Calc_Flag(FALSE);
7013: /* above are changes for OSFM */
7014: /* Initialize System_Information Unit_Effectivity flag
7015:

Line 7012: BOM_Rtg_Globals.Set_Osfm_NW_Calc_Flag(FALSE);

7008: );
7009:
7010: /* below are changes for OSFM */
7011: BOM_Rtg_Globals.Set_Osfm_NW_Count(0);
7012: BOM_Rtg_Globals.Set_Osfm_NW_Calc_Flag(FALSE);
7013: /* above are changes for OSFM */
7014: /* Initialize System_Information Unit_Effectivity flag
7015:
7016: IF FND_PROFILE.DEFINED('PJM:PJM_UNITEFF_NO_EFFECT') AND

Line 7019: BOM_Rtg_Globals.Set_Unit_Effectivity (TRUE);

7015:
7016: IF FND_PROFILE.DEFINED('PJM:PJM_UNITEFF_NO_EFFECT') AND
7017: FND_PROFILE.VALUE('PJM:PJM_UNITEFF_NO_EFFECT') = 'Y'
7018: THEN
7019: BOM_Rtg_Globals.Set_Unit_Effectivity (TRUE);
7020: ELSE
7021: BOM_Rtg_Globals.Set_Unit_Effectivity (FALSE);
7022: END IF;
7023:

Line 7021: BOM_Rtg_Globals.Set_Unit_Effectivity (FALSE);

7017: FND_PROFILE.VALUE('PJM:PJM_UNITEFF_NO_EFFECT') = 'Y'
7018: THEN
7019: BOM_Rtg_Globals.Set_Unit_Effectivity (TRUE);
7020: ELSE
7021: BOM_Rtg_Globals.Set_Unit_Effectivity (FALSE);
7022: END IF;
7023:
7024: */
7025:

Line 7268: BOM_Rtg_Globals.Set_STD_Item_Access( p_std_item_access => NULL);

7264:
7265:
7266: -- Reset system_information business object flags
7267:
7268: BOM_Rtg_Globals.Set_STD_Item_Access( p_std_item_access => NULL);
7269: BOM_Rtg_Globals.Set_MDL_Item_Access( p_mdl_item_access => NULL);
7270: BOM_Rtg_Globals.Set_PLN_Item_Access( p_pln_item_access => NULL);
7271: BOM_Rtg_Globals.Set_OC_Item_Access( p_oc_item_access => NULL);
7272:

Line 7269: BOM_Rtg_Globals.Set_MDL_Item_Access( p_mdl_item_access => NULL);

7265:
7266: -- Reset system_information business object flags
7267:
7268: BOM_Rtg_Globals.Set_STD_Item_Access( p_std_item_access => NULL);
7269: BOM_Rtg_Globals.Set_MDL_Item_Access( p_mdl_item_access => NULL);
7270: BOM_Rtg_Globals.Set_PLN_Item_Access( p_pln_item_access => NULL);
7271: BOM_Rtg_Globals.Set_OC_Item_Access( p_oc_item_access => NULL);
7272:
7273: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN

Line 7270: BOM_Rtg_Globals.Set_PLN_Item_Access( p_pln_item_access => NULL);

7266: -- Reset system_information business object flags
7267:
7268: BOM_Rtg_Globals.Set_STD_Item_Access( p_std_item_access => NULL);
7269: BOM_Rtg_Globals.Set_MDL_Item_Access( p_mdl_item_access => NULL);
7270: BOM_Rtg_Globals.Set_PLN_Item_Access( p_pln_item_access => NULL);
7271: BOM_Rtg_Globals.Set_OC_Item_Access( p_oc_item_access => NULL);
7272:
7273: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
7274: Error_Handler.Write_Debug

Line 7271: BOM_Rtg_Globals.Set_OC_Item_Access( p_oc_item_access => NULL);

7267:
7268: BOM_Rtg_Globals.Set_STD_Item_Access( p_std_item_access => NULL);
7269: BOM_Rtg_Globals.Set_MDL_Item_Access( p_mdl_item_access => NULL);
7270: BOM_Rtg_Globals.Set_PLN_Item_Access( p_pln_item_access => NULL);
7271: BOM_Rtg_Globals.Set_OC_Item_Access( p_oc_item_access => NULL);
7272:
7273: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
7274: Error_Handler.Write_Debug
7275: ('-----------------------------------------------------' ) ;

Line 7273: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN

7269: BOM_Rtg_Globals.Set_MDL_Item_Access( p_mdl_item_access => NULL);
7270: BOM_Rtg_Globals.Set_PLN_Item_Access( p_pln_item_access => NULL);
7271: BOM_Rtg_Globals.Set_OC_Item_Access( p_oc_item_access => NULL);
7272:
7273: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
7274: Error_Handler.Write_Debug
7275: ('-----------------------------------------------------' ) ;
7276: Error_Handler.Write_Debug
7277: ('End of Rtg BO Private API with return_status: ' || x_return_status) ;

Line 7319: BOM_Rtg_Globals.Set_STD_Item_Access( p_std_item_access => NULL);

7315: x_op_network_tbl := l_op_network_tbl;
7316:
7317: -- Reset system_information business object flags
7318:
7319: BOM_Rtg_Globals.Set_STD_Item_Access( p_std_item_access => NULL);
7320: BOM_Rtg_Globals.Set_MDL_Item_Access( p_mdl_item_access => NULL);
7321: BOM_Rtg_Globals.Set_PLN_Item_Access( p_pln_item_access => NULL);
7322: BOM_Rtg_Globals.Set_OC_Item_Access( p_oc_item_access => NULL);
7323:

Line 7320: BOM_Rtg_Globals.Set_MDL_Item_Access( p_mdl_item_access => NULL);

7316:
7317: -- Reset system_information business object flags
7318:
7319: BOM_Rtg_Globals.Set_STD_Item_Access( p_std_item_access => NULL);
7320: BOM_Rtg_Globals.Set_MDL_Item_Access( p_mdl_item_access => NULL);
7321: BOM_Rtg_Globals.Set_PLN_Item_Access( p_pln_item_access => NULL);
7322: BOM_Rtg_Globals.Set_OC_Item_Access( p_oc_item_access => NULL);
7323:
7324: WHEN G_EXC_QUIT_IMPORT THEN

Line 7321: BOM_Rtg_Globals.Set_PLN_Item_Access( p_pln_item_access => NULL);

7317: -- Reset system_information business object flags
7318:
7319: BOM_Rtg_Globals.Set_STD_Item_Access( p_std_item_access => NULL);
7320: BOM_Rtg_Globals.Set_MDL_Item_Access( p_mdl_item_access => NULL);
7321: BOM_Rtg_Globals.Set_PLN_Item_Access( p_pln_item_access => NULL);
7322: BOM_Rtg_Globals.Set_OC_Item_Access( p_oc_item_access => NULL);
7323:
7324: WHEN G_EXC_QUIT_IMPORT THEN
7325: x_return_status := l_return_status;

Line 7322: BOM_Rtg_Globals.Set_OC_Item_Access( p_oc_item_access => NULL);

7318:
7319: BOM_Rtg_Globals.Set_STD_Item_Access( p_std_item_access => NULL);
7320: BOM_Rtg_Globals.Set_MDL_Item_Access( p_mdl_item_access => NULL);
7321: BOM_Rtg_Globals.Set_PLN_Item_Access( p_pln_item_access => NULL);
7322: BOM_Rtg_Globals.Set_OC_Item_Access( p_oc_item_access => NULL);
7323:
7324: WHEN G_EXC_QUIT_IMPORT THEN
7325: x_return_status := l_return_status;
7326: x_rtg_header_rec := l_rtg_header_rec;

Line 7333: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN

7329: x_op_resource_tbl := l_op_resource_tbl;
7330: x_sub_resource_tbl := l_sub_resource_tbl;
7331: x_op_network_tbl := l_op_network_tbl;
7332:
7333: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
7334: Error_Handler.Write_Debug
7335: ('-----------------------------------------------------' ) ;
7336: Error_Handler.Write_Debug
7337: ('Quit Rtg BO Private API process with return_status: ' || x_return_status) ;

Line 7342: BOM_Rtg_Globals.Set_STD_Item_Access( p_std_item_access => NULL);

7338: END IF;
7339:
7340:
7341: -- Reset system_information business object flags
7342: BOM_Rtg_Globals.Set_STD_Item_Access( p_std_item_access => NULL);
7343: BOM_Rtg_Globals.Set_MDL_Item_Access( p_mdl_item_access => NULL);
7344: BOM_Rtg_Globals.Set_PLN_Item_Access( p_pln_item_access => NULL);
7345: BOM_Rtg_Globals.Set_OC_Item_Access( p_oc_item_access => NULL);
7346:

Line 7343: BOM_Rtg_Globals.Set_MDL_Item_Access( p_mdl_item_access => NULL);

7339:
7340:
7341: -- Reset system_information business object flags
7342: BOM_Rtg_Globals.Set_STD_Item_Access( p_std_item_access => NULL);
7343: BOM_Rtg_Globals.Set_MDL_Item_Access( p_mdl_item_access => NULL);
7344: BOM_Rtg_Globals.Set_PLN_Item_Access( p_pln_item_access => NULL);
7345: BOM_Rtg_Globals.Set_OC_Item_Access( p_oc_item_access => NULL);
7346:
7347: WHEN OTHERS THEN

Line 7344: BOM_Rtg_Globals.Set_PLN_Item_Access( p_pln_item_access => NULL);

7340:
7341: -- Reset system_information business object flags
7342: BOM_Rtg_Globals.Set_STD_Item_Access( p_std_item_access => NULL);
7343: BOM_Rtg_Globals.Set_MDL_Item_Access( p_mdl_item_access => NULL);
7344: BOM_Rtg_Globals.Set_PLN_Item_Access( p_pln_item_access => NULL);
7345: BOM_Rtg_Globals.Set_OC_Item_Access( p_oc_item_access => NULL);
7346:
7347: WHEN OTHERS THEN
7348:

Line 7345: BOM_Rtg_Globals.Set_OC_Item_Access( p_oc_item_access => NULL);

7341: -- Reset system_information business object flags
7342: BOM_Rtg_Globals.Set_STD_Item_Access( p_std_item_access => NULL);
7343: BOM_Rtg_Globals.Set_MDL_Item_Access( p_mdl_item_access => NULL);
7344: BOM_Rtg_Globals.Set_PLN_Item_Access( p_pln_item_access => NULL);
7345: BOM_Rtg_Globals.Set_OC_Item_Access( p_oc_item_access => NULL);
7346:
7347: WHEN OTHERS THEN
7348:
7349: l_return_status := Error_Handler.G_STATUS_UNEXPECTED ;

Line 7394: BOM_Rtg_Globals.Set_STD_Item_Access( p_std_item_access => NULL);

7390: x_sub_resource_tbl := l_sub_resource_tbl;
7391: x_op_network_tbl := l_op_network_tbl;
7392: -- Reset system_information business object flags
7393:
7394: BOM_Rtg_Globals.Set_STD_Item_Access( p_std_item_access => NULL);
7395: BOM_Rtg_Globals.Set_MDL_Item_Access( p_mdl_item_access => NULL);
7396: BOM_Rtg_Globals.Set_PLN_Item_Access( p_pln_item_access => NULL);
7397: BOM_Rtg_Globals.Set_OC_Item_Access( p_oc_item_access => NULL);
7398:

Line 7395: BOM_Rtg_Globals.Set_MDL_Item_Access( p_mdl_item_access => NULL);

7391: x_op_network_tbl := l_op_network_tbl;
7392: -- Reset system_information business object flags
7393:
7394: BOM_Rtg_Globals.Set_STD_Item_Access( p_std_item_access => NULL);
7395: BOM_Rtg_Globals.Set_MDL_Item_Access( p_mdl_item_access => NULL);
7396: BOM_Rtg_Globals.Set_PLN_Item_Access( p_pln_item_access => NULL);
7397: BOM_Rtg_Globals.Set_OC_Item_Access( p_oc_item_access => NULL);
7398:
7399: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN

Line 7396: BOM_Rtg_Globals.Set_PLN_Item_Access( p_pln_item_access => NULL);

7392: -- Reset system_information business object flags
7393:
7394: BOM_Rtg_Globals.Set_STD_Item_Access( p_std_item_access => NULL);
7395: BOM_Rtg_Globals.Set_MDL_Item_Access( p_mdl_item_access => NULL);
7396: BOM_Rtg_Globals.Set_PLN_Item_Access( p_pln_item_access => NULL);
7397: BOM_Rtg_Globals.Set_OC_Item_Access( p_oc_item_access => NULL);
7398:
7399: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
7400: Error_Handler.Write_Debug

Line 7397: BOM_Rtg_Globals.Set_OC_Item_Access( p_oc_item_access => NULL);

7393:
7394: BOM_Rtg_Globals.Set_STD_Item_Access( p_std_item_access => NULL);
7395: BOM_Rtg_Globals.Set_MDL_Item_Access( p_mdl_item_access => NULL);
7396: BOM_Rtg_Globals.Set_PLN_Item_Access( p_pln_item_access => NULL);
7397: BOM_Rtg_Globals.Set_OC_Item_Access( p_oc_item_access => NULL);
7398:
7399: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
7400: Error_Handler.Write_Debug
7401: ('-----------------------------------------------------' ) ;

Line 7399: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN

7395: BOM_Rtg_Globals.Set_MDL_Item_Access( p_mdl_item_access => NULL);
7396: BOM_Rtg_Globals.Set_PLN_Item_Access( p_pln_item_access => NULL);
7397: BOM_Rtg_Globals.Set_OC_Item_Access( p_oc_item_access => NULL);
7398:
7399: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
7400: Error_Handler.Write_Debug
7401: ('-----------------------------------------------------' ) ;
7402: Error_Handler.Write_Debug
7403: ('Rtg BO Private API process is terminated with unexpected error: ' || x_return_status) ;