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_EAM_UTIL dependencies on BOM_RTG_GLOBALS

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

112: -- planning_pct NUMBER
113: -- network_seq_num NUMBER
114: -- process_flag VARCHAR2
115:
116: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
117: Error_Handler.Write_Debug( 'Getting All Links . . .' ) ;
118: END IF ;
119:
120: FOR all_links_rec IN c_All_Nwk_Links LOOP

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

128: x_network_link_tbl(i).process_flag := 'C';
129:
130:
131:
132: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
133: Error_Handler.Write_Debug( 'Row#'||to_char(i) || ' FROM : '
134: || to_char(x_network_link_tbl(i).from_op_seq_num)
135: || ' - '
136: || to_char(x_network_link_tbl(i).from_op_seq_id)

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

202: -- planning_pct NUMBER
203: -- network_seq_num NUMBER
204: -- process_flag VARCHAR2
205:
206: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
207: Error_Handler.Write_Debug( 'Getting All start nodes . . .' ) ;
208: END IF ;
209:
210: FOR all_start_nodes_rec IN c_All_Start_Nodes LOOP

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

217: x_start_op_tbl(i).network_seq_num := i ;
218: x_start_op_tbl(i).process_flag := 'C';
219:
220:
221: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
222: Error_Handler.Write_Debug( 'Row#'||to_char(i) || ' FROM : '
223: || to_char(x_start_op_tbl(i).from_op_seq_num)
224: || ' - '
225: || to_char(x_start_op_tbl(i).from_op_seq_id)

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

282: x_connected_op_tbl(1).from_op_seq_id := p_from_op_seq_id ;
283: x_connected_op_tbl(1).from_op_seq_num := p_from_op_seq_hum ;
284: x_connected_op_tbl(1).process_flag := 'S' ;
285:
286: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
287: Error_Handler.Write_Debug('Connected op list : Start Node '
288: || to_char(x_connected_op_tbl(1).from_op_seq_num)
289: || ' - '
290: || to_char(x_connected_op_tbl(1).from_op_seq_id)

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

317: x_connected_op_tbl(i).planning_pct := all_connected_op_rec.planning_pct ;
318: x_connected_op_tbl(i).network_seq_num := p_network_seq_num ;
319: x_connected_op_tbl(i).process_flag := 'C' ;
320:
321: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
322: Error_Handler.Write_Debug( 'Row#'||to_char(i) || ' FROM : '
323: || to_char(x_connected_op_tbl(i).from_op_seq_num)
324: || ' - '
325: || to_char(x_connected_op_tbl(i).from_op_seq_id)

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

343:
344: RETURN TRUE ;
345:
346: WHEN OTHERS THEN
347: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
348: Error_Handler.Write_Debug
349: ( 'When creating connected op list, Some unknown error in Check Access. . .' || SQLERRM ) ;
350: END IF ;
351:

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

452: x_master_op_tbl := p_master_op_tbl ;
453: mst_c := x_master_op_tbl.COUNT + 1 ;
454:
455:
456: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
457: Error_Handler.Write_Debug('Appending an op link to master op list . .' );
458: END IF ;
459:
460:

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

483: p_connected_op_tbl(i).network_seq_num ;
484: x_master_op_tbl(mst_c).process_flag :=
485: p_connected_op_tbl(i).process_flag ;
486:
487: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
488: Error_Handler.Write_Debug( 'Row#'||to_char(mst_c) || ' FROM : '
489: || to_char(x_master_op_tbl(mst_c).from_op_seq_num)
490: || ' - '
491: || to_char(x_master_op_tbl(mst_c).from_op_seq_id)

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

579:
580: BEGIN
581: l_network_link_tbl := p_network_link_tbl ;
582:
583: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
584: Error_Handler.Write_Debug('Within CheckLoopAPI . . .');
585: END IF;
586:
587: -- Get the top and bottom reference pointers

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

588: l_top_ptr := GetTopRefPointer( l_network_link_tbl ) ;
589: l_bot_ptr := GetBottomRefPointer( l_network_link_tbl ) ;
590:
591:
592: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
593: Error_Handler.Write_Debug('Get op network node. top_ptr: '
594: || to_char(l_top_ptr)
595: || ' - ' || 'bot_ptr: '|| to_char(l_bot_ptr));
596: END IF;

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

604: FOR i IN 1..l_network_link_tbl.COUNT LOOP
605: IF l_network_link_tbl(i).process_flag = 'C' THEN
606: l_connected := 0;
607:
608: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
609: Error_Handler.Write_Debug('in loop1 :'||to_char(i)||' time');
610: END IF;
611:
612: FOR j IN 1..l_network_link_tbl.COUNT LOOP

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

621: IF (l_connected = 0) THEN
622: l_network_link_tbl(i).process_flag := 'D';
623: l_flag_changed := 1;
624:
625: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
626: Error_Handler.Write_Debug('Changing row#'||to_char(i)||' '||'flag to D');
627: END IF;
628:
629: END IF;

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

633: -- Get the top and bottom reference pointers
634: l_top_ptr := GetTopRefPointer( l_network_link_tbl ) ;
635: l_bot_ptr := GetBottomRefPointer( l_network_link_tbl ) ;
636:
637: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
638: Error_Handler.Write_Debug('top_ptr:'|| to_char(l_top_ptr));
639: Error_Handler.Write_Debug('bot_ptr:'|| to_char(l_bot_ptr));
640: END IF;
641:

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

645: FOR i IN REVERSE l_top_ptr..l_bot_ptr LOOP
646: IF l_network_link_tbl(i).process_flag = 'C' THEN
647: l_connected := 0;
648:
649: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
650: Error_Handler.Write_Debug('in loop2 :'||to_char(i)||' time');
651: END IF;
652:
653:

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

663: IF (l_connected = 0) THEN
664: l_network_link_tbl(i).process_flag := 'D';
665: l_flag_changed := 1;
666:
667: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
668: Error_Handler.Write_Debug('Changing row#'||to_char(i)||' '||'flag to D');
669: END IF;
670: END IF;
671: END IF;

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

675: -- Get the top and bottom reference pointers
676: l_top_ptr := GetTopRefPointer( l_network_link_tbl ) ;
677: l_bot_ptr := GetBottomRefPointer( l_network_link_tbl ) ;
678:
679: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
680: Error_Handler.Write_Debug('top_ptr:'|| to_char(l_top_ptr));
681: Error_Handler.Write_Debug('bot_ptr:'|| to_char(l_bot_ptr));
682: END IF;
683:

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

684: END LOOP; -- while
685:
686: IF (l_top_ptr <> -1 or l_bot_ptr <> -1) THEN
687:
688: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
689: Error_Handler.Write_Debug('Error. A loop has been detected');
690: END IF;
691:
692: RETURN FALSE ;

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

724: l_connected_flag BOOLEAN ;
725:
726: BEGIN
727:
728: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
729: Error_Handler.Write_Debug('Within eAM Rtg Network validation API. . . ');
730: END IF;
731:
732:

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

745: -- Commented as part of bug#3460975. This is not an error. It should be treated as warning
746: -- because a routing may or may not have a link.
747: -- x_return_status := FND_API.G_RET_STS_ERROR ;
748:
749: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
750: Error_Handler.Write_Debug('Check if Op Network exists. . . ' || x_return_status );
751: END IF;
752:
753: -- Commented as part of bug#3460975. Since this is a warning don't return.

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

754: -- RETURN ;
755: END IF;
756:
757:
758: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
759: Error_Handler.Write_Debug('Get network info and import the data into the PL/SQL table . . . ' );
760: END IF;
761:
762: Get_All_Links

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

770: ) ;
771:
772:
773: -- Check for BROKEN LINKS
774: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
775: Error_Handler.Write_Debug('Check for broken links. . . ' );
776: END IF;
777:
778: -- In each start node, get the nodes connected to,then compare with

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

781: -- this is the broken link; print the broken link.
782:
783: FOR i IN 1..l_start_op_tbl.COUNT LOOP
784:
785: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
786: Error_Handler.Write_Debug('Creating connected op list : '
787: || to_char(l_start_op_tbl(i).from_op_seq_num)
788: || ' - '
789: || to_char(l_start_op_tbl(i).from_op_seq_id)

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

803: l_master_op_tbl(l_mst_c).from_op_seq_num := l_start_op_tbl(i).from_op_seq_num;
804: l_master_op_tbl(l_mst_c).process_flag := 'S' ;
805: l_master_op_tbl(l_mst_c).network_seq_num := i ;
806:
807: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
808: Error_Handler.Write_Debug('Added start node to Master Op Nwk Tbl . . . ' );
809: Error_Handler.Write_Debug('Mst : Row# ' || to_char(l_mst_c) || ' = '
810: || to_char(l_master_op_tbl(l_mst_c).from_op_seq_num)
811: || ' - ' || to_char(l_master_op_tbl(l_mst_c).from_op_seq_id)

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

853: END IF;
854: END LOOP;
855:
856:
857: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
858: Error_Handler.Write_Debug('Check all links in l_network_link_tbl exists in Master Op Tbl. . . ' );
859: END IF;
860:
861: -- Check all links in l_network_link_tbl exists in Master Op Tbl

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

868: , p_op_nwk_tbl => l_master_op_tbl
869: )
870: THEN
871:
872: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
873: Error_Handler.Write_Debug('Error Broken Link exists on Nwk Row# '
874: || to_char(i) || ' - FROM : '
875: || to_char(l_network_link_tbl(i).from_op_seq_num)
876: || ' TO : '

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

885: END IF ;
886: END LOOP ;
887:
888:
889: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
890: Error_Handler.Write_Debug('Check all connected links in Master Op tbl exists in all links. . . ' );
891: END IF;
892:
893: -- Check all connected links in Master Op tbl exists in all links

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

901: )
902: AND l_master_op_tbl(i).process_flag <> 'S'
903: THEN
904:
905: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
906: Error_Handler.Write_Debug('Error Broken Link exists on Master Row# '
907: || to_char(i) || ' - '
908: || to_char(l_master_op_tbl(i).from_op_seq_num)
909: );

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

917: END LOOP ;
918:
919:
920: -- Check for Loops
921: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
922: Error_Handler.Write_Debug('Check for loops. . . ' );
923: END IF;
924:
925:

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

928: nwk_c := 1 ;
929: l_seq_num := 1 ;
930:
931: -- Check for Loops
932: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
933: Error_Handler.Write_Debug('Get a group of network links from master op tbl for multiple start node. . . ' );
934: END IF;
935:
936:

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

943: AND l_master_op_tbl(i).process_flag <> 'S'
944: THEN
945: -- Check loop
946:
947: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
948: Error_Handler.Write_Debug('When nwk seq is changed, Check Loop for Network Link Seq Num ' || to_char(l_seq_num) );
949: END IF;
950: IF CheckLoopNwk (p_network_link_tbl => l_each_nwk_link_tbl)
951: THEN

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

955:
956: ELSE
957:
958:
959: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
960: Error_Handler.Write_Debug('Loop exists in operation network : seq = ' || to_char(l_seq_num) );
961: END IF;
962:
963: FND_MESSAGE.SET_NAME('BOM','BOM_RTG_NTWK_LOOP_EXISTS');

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

995:
996: END LOOP ;
997:
998: -- Check Loop
999: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
1000: Error_Handler.Write_Debug('At the end of loop validation, Check loops for rest of network : seq = '
1001: || to_char(l_seq_num) );
1002: END IF ;
1003:

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

1006: l_each_nwk_link_tbl.DELETE ;
1007:
1008: ELSE
1009:
1010: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
1011: Error_Handler.Write_Debug('Loop exists in operation network : seq = '
1012: || to_char(l_seq_num) );
1013: END IF ;
1014:

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

1094: );
1095:
1096: BEGIN
1097:
1098: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
1099: Error_Handler.Write_Debug('Within eAM Rtg Network from operation validation API. . . ');
1100: END IF;
1101:
1102:

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

1113: )
1114: LOOP
1115:
1116:
1117: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
1118: Error_Handler.Write_Debug('from operation is duplicate in operation network : seq = '
1119: || to_char(p_from_op_seq_num) );
1120: END IF ;
1121:

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

1283: x_return_status := FND_API.G_RET_STS_SUCCESS ;
1284: l_return_status := FND_API.G_RET_STS_SUCCESS ;
1285:
1286:
1287: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
1288: Error_Handler.Write_Debug
1289: ('Querying an operation sequence record : Seq ID '
1290: || to_char(p_op_node_rec.operation_sequence_id ) || '. . . ' ) ;
1291: END IF ;

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

1305: x_old_op_node_rec.X_Coordinate := op_node_rec.X_Coordinate ;
1306: x_old_op_node_rec.Y_Coordinate := op_node_rec.Y_Coordinate ;
1307:
1308:
1309: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
1310: Error_Handler.Write_Debug('Finished querying and assigning operation node record . . .') ;
1311: END IF ;
1312:
1313: l_return_status := BOM_Rtg_Globals.G_RECORD_FOUND ;

Line 1313: l_return_status := BOM_Rtg_Globals.G_RECORD_FOUND ;

1309: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
1310: Error_Handler.Write_Debug('Finished querying and assigning operation node record . . .') ;
1311: END IF ;
1312:
1313: l_return_status := BOM_Rtg_Globals.G_RECORD_FOUND ;
1314:
1315: ELSE
1316:
1317: l_return_status := BOM_Rtg_Globals.G_RECORD_NOT_FOUND ;

Line 1317: l_return_status := BOM_Rtg_Globals.G_RECORD_NOT_FOUND ;

1313: l_return_status := BOM_Rtg_Globals.G_RECORD_FOUND ;
1314:
1315: ELSE
1316:
1317: l_return_status := BOM_Rtg_Globals.G_RECORD_NOT_FOUND ;
1318:
1319: END IF ;
1320:
1321: IF op_node_csr%ISOPEN

Line 1327: IF l_return_status = BOM_Rtg_Globals.G_RECORD_FOUND AND

1323: CLOSE op_node_csr ;
1324: END IF ;
1325:
1326:
1327: IF l_return_status = BOM_Rtg_Globals.G_RECORD_FOUND AND
1328: p_op_node_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
1329: THEN
1330: l_return_mesg := 'BOM_OP_ALREADY_EXISTS' ;
1331: l_return_status := FND_API.G_RET_STS_ERROR ;

Line 1328: p_op_node_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE

1324: END IF ;
1325:
1326:
1327: IF l_return_status = BOM_Rtg_Globals.G_RECORD_FOUND AND
1328: p_op_node_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
1329: THEN
1330: l_return_mesg := 'BOM_OP_ALREADY_EXISTS' ;
1331: l_return_status := FND_API.G_RET_STS_ERROR ;
1332:

Line 1333: ELSIF l_return_status = BOM_Rtg_Globals.G_RECORD_NOT_FOUND AND

1329: THEN
1330: l_return_mesg := 'BOM_OP_ALREADY_EXISTS' ;
1331: l_return_status := FND_API.G_RET_STS_ERROR ;
1332:
1333: ELSIF l_return_status = BOM_Rtg_Globals.G_RECORD_NOT_FOUND AND
1334: p_op_node_rec.transaction_type IN
1335: (BOM_Rtg_Globals.G_OPR_UPDATE,
1336: BOM_Rtg_Globals.G_OPR_DELETE )
1337: THEN

Line 1335: (BOM_Rtg_Globals.G_OPR_UPDATE,

1331: l_return_status := FND_API.G_RET_STS_ERROR ;
1332:
1333: ELSIF l_return_status = BOM_Rtg_Globals.G_RECORD_NOT_FOUND AND
1334: p_op_node_rec.transaction_type IN
1335: (BOM_Rtg_Globals.G_OPR_UPDATE,
1336: BOM_Rtg_Globals.G_OPR_DELETE )
1337: THEN
1338: l_return_mesg := 'BOM_OP_DOESNOT_EXIST' ;
1339: l_return_status := FND_API.G_RET_STS_ERROR ;

Line 1336: BOM_Rtg_Globals.G_OPR_DELETE )

1332:
1333: ELSIF l_return_status = BOM_Rtg_Globals.G_RECORD_NOT_FOUND AND
1334: p_op_node_rec.transaction_type IN
1335: (BOM_Rtg_Globals.G_OPR_UPDATE,
1336: BOM_Rtg_Globals.G_OPR_DELETE )
1337: THEN
1338: l_return_mesg := 'BOM_OP_DOESNOT_EXIST' ;
1339: l_return_status := FND_API.G_RET_STS_ERROR ;
1340:

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

1380:
1381: BEGIN
1382:
1383:
1384: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1385: ('Within the Operation Node Populate null columns...') ;
1386: END IF ;
1387:
1388: -- Initialize operation exp and unexp record

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

1388: -- Initialize operation exp and unexp record
1389: x_op_node_rec := p_op_node_rec ;
1390:
1391:
1392: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1393: ('Populate null exposed columns......') ;
1394: END IF ;
1395:
1396:

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

1426:
1427:
1428: BEGIN
1429:
1430: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1431: ('Within the Operation Node Entity Defaulting...') ;
1432: END IF ;
1433:
1434: x_op_node_rec := p_op_node_rec ;

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

1447:
1448:
1449: EXCEPTION
1450: WHEN OTHERS THEN
1451: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1452: ('Some unknown error in Op Node Entity Defaulting . . .' || SQLERRM );
1453: END IF ;
1454:
1455:

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

1492: x_op_node_rec := p_op_node_rec ;
1493: x_return_status := FND_API.G_RET_STS_SUCCESS ;
1494:
1495:
1496: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1497: ('Performing Operation Check Entitity Validation . . .') ;
1498: END IF ;
1499:
1500: -- There is no validation in current release.

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

1501:
1502:
1503: EXCEPTION
1504: WHEN OTHERS THEN
1505: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1506: ('Some unknown error in Op Node Entity Validation . . .' || SQLERRM );
1507: END IF ;
1508:
1509:

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

1539: -- Initialize Status
1540: --
1541: x_return_status := FND_API.G_RET_STS_SUCCESS ;
1542:
1543: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1544: ('Performing Database Writes . . .') ;
1545: END IF ;
1546:
1547:

Line 1548: IF p_op_node_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE THEN

1544: ('Performing Database Writes . . .') ;
1545: END IF ;
1546:
1547:
1548: IF p_op_node_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE THEN
1549: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1550: ('Operation Sequence: Executing Insert Row. . . ') ;
1551: END IF;
1552:

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

1545: END IF ;
1546:
1547:
1548: IF p_op_node_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE THEN
1549: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1550: ('Operation Sequence: Executing Insert Row. . . ') ;
1551: END IF;
1552:
1553: NULL ;

Line 1555: ELSIF p_op_node_rec.transaction_type = BOM_Rtg_Globals.G_OPR_UPDATE

1551: END IF;
1552:
1553: NULL ;
1554:
1555: ELSIF p_op_node_rec.transaction_type = BOM_Rtg_Globals.G_OPR_UPDATE
1556: THEN
1557: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1558: ('Operatin Sequence: Executing Update Row. . . ') ;
1559: END IF ;

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

1553: NULL ;
1554:
1555: ELSIF p_op_node_rec.transaction_type = BOM_Rtg_Globals.G_OPR_UPDATE
1556: THEN
1557: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1558: ('Operatin Sequence: Executing Update Row. . . ') ;
1559: END IF ;
1560:
1561:

Line 1566: , last_updated_by = BOM_Rtg_Globals.Get_User_Id /* Last Updated By */

1562: UPDATE BOM_OPERATION_SEQUENCES
1563: SET X_Coordinate = p_op_node_rec.x_coordinate
1564: , Y_Coordinate = p_op_node_rec.y_coordinate
1565: , last_update_date = SYSDATE /* Last Update Date */
1566: , last_updated_by = BOM_Rtg_Globals.Get_User_Id /* Last Updated By */
1567: , last_update_login = BOM_Rtg_Globals.Get_Login_Id /* Last Update Login */
1568: , program_application_id = BOM_Rtg_Globals.Get_Prog_AppId /* Application Id */
1569: , program_id = BOM_Rtg_Globals.Get_Prog_Id /* Program Id */
1570: , program_update_date = SYSDATE /* program_update_date */

Line 1567: , last_update_login = BOM_Rtg_Globals.Get_Login_Id /* Last Update Login */

1563: SET X_Coordinate = p_op_node_rec.x_coordinate
1564: , Y_Coordinate = p_op_node_rec.y_coordinate
1565: , last_update_date = SYSDATE /* Last Update Date */
1566: , last_updated_by = BOM_Rtg_Globals.Get_User_Id /* Last Updated By */
1567: , last_update_login = BOM_Rtg_Globals.Get_Login_Id /* Last Update Login */
1568: , program_application_id = BOM_Rtg_Globals.Get_Prog_AppId /* Application Id */
1569: , program_id = BOM_Rtg_Globals.Get_Prog_Id /* Program Id */
1570: , program_update_date = SYSDATE /* program_update_date */
1571: WHERE operation_sequence_id = p_op_node_rec.operation_sequence_id ;

Line 1568: , program_application_id = BOM_Rtg_Globals.Get_Prog_AppId /* Application Id */

1564: , Y_Coordinate = p_op_node_rec.y_coordinate
1565: , last_update_date = SYSDATE /* Last Update Date */
1566: , last_updated_by = BOM_Rtg_Globals.Get_User_Id /* Last Updated By */
1567: , last_update_login = BOM_Rtg_Globals.Get_Login_Id /* Last Update Login */
1568: , program_application_id = BOM_Rtg_Globals.Get_Prog_AppId /* Application Id */
1569: , program_id = BOM_Rtg_Globals.Get_Prog_Id /* Program Id */
1570: , program_update_date = SYSDATE /* program_update_date */
1571: WHERE operation_sequence_id = p_op_node_rec.operation_sequence_id ;
1572:

Line 1569: , program_id = BOM_Rtg_Globals.Get_Prog_Id /* Program Id */

1565: , last_update_date = SYSDATE /* Last Update Date */
1566: , last_updated_by = BOM_Rtg_Globals.Get_User_Id /* Last Updated By */
1567: , last_update_login = BOM_Rtg_Globals.Get_Login_Id /* Last Update Login */
1568: , program_application_id = BOM_Rtg_Globals.Get_Prog_AppId /* Application Id */
1569: , program_id = BOM_Rtg_Globals.Get_Prog_Id /* Program Id */
1570: , program_update_date = SYSDATE /* program_update_date */
1571: WHERE operation_sequence_id = p_op_node_rec.operation_sequence_id ;
1572:
1573:

Line 1574: ELSIF p_op_node_rec.transaction_type = BOM_Rtg_Globals.G_OPR_DELETE

1570: , program_update_date = SYSDATE /* program_update_date */
1571: WHERE operation_sequence_id = p_op_node_rec.operation_sequence_id ;
1572:
1573:
1574: ELSIF p_op_node_rec.transaction_type = BOM_Rtg_Globals.G_OPR_DELETE
1575: THEN
1576:
1577: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1578: ('Operatin Sequence: Executing Delete Row. . . ') ;

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

1573:
1574: ELSIF p_op_node_rec.transaction_type = BOM_Rtg_Globals.G_OPR_DELETE
1575: THEN
1576:
1577: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1578: ('Operatin Sequence: Executing Delete Row. . . ') ;
1579: END IF ;
1580:
1581: NULL ;

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

1584:
1585:
1586: EXCEPTION
1587: WHEN OTHERS THEN
1588: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1589: ('Some unknown error in Op Node Perform Writes . . .' || SQLERRM );
1590: END IF ;
1591:
1592: x_return_mesg := G_PKG_NAME || ' Utility (Op Node Perform Writes) '

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

1637: -- Error : FND_API.G_RET_STS_ERROR
1638: -- Unexpected Error : FND_API.G_RET_STS_UNEXP_ERROR
1639:
1640:
1641: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1642: ('Processing Operation Nodes . . .' ) ;
1643: END IF ;
1644:
1645:

Line 1656: BOM_Rtg_Globals.Init_System_Info_Rec

1652:
1653: -- Load environment information into the SYSTEM_INFORMATION record
1654: -- (USER_ID, LOGIN_ID, PROG_APPID, PROG_ID)
1655:
1656: BOM_Rtg_Globals.Init_System_Info_Rec
1657: ( x_mesg_token_tbl => l_mesg_token_tbl
1658: , x_return_status => l_return_status
1659: );
1660:

Line 1684: IF l_op_node_rec.transaction_type <> BOM_Rtg_Globals.G_OPR_UPDATE

1680:
1681: -- Check Transaction Type
1682: -- Transaction Type should be UPDATE only.
1683:
1684: IF l_op_node_rec.transaction_type <> BOM_Rtg_Globals.G_OPR_UPDATE
1685: THEN
1686: /* Error Handling */
1687: FND_MESSAGE.SET_NAME('BOM','BOM_OPNODE_TRANS_TYPE_INVALID');
1688: FND_MESSAGE.SET_TOKEN('OP_SEQ_NUMBER', l_op_node_rec.operation_sequence_number) ;

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

1736: -- Process Flow step : Attribute Validation for CREATE and UPDATE
1737: -- Nothing special
1738:
1739: IF l_op_node_rec.transaction_type IN
1740: (BOM_Rtg_Globals.G_OPR_UPDATE, BOM_Rtg_Globals.G_OPR_DELETE)
1741: THEN
1742:
1743: --
1744: -- Process flow step : Populate NULL columns for Update and Delete

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

1743: --
1744: -- Process flow step : Populate NULL columns for Update and Delete
1745: --
1746:
1747: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
1748: Error_Handler.Write_Debug('Populate NULL columns') ;
1749: END IF ;
1750:
1751: Bom_Rtg_Eam_Util.Op_Node_Populate_Null_Columns

Line 1758: ELSIF l_op_node_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE

1754: , x_op_node_rec => l_op_node_rec
1755: );
1756:
1757:
1758: ELSIF l_op_node_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
1759: THEN
1760: --
1761: -- Process Flow step : Default missing values for Op Nodes (CREATE)
1762:

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

1759: THEN
1760: --
1761: -- Process Flow step : Default missing values for Op Nodes (CREATE)
1762:
1763: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
1764: Error_Handler.Write_Debug('Attribute Defaulting') ;
1765: END IF ;
1766:
1767: END IF ;

Line 1772: IF l_op_node_rec.transaction_type IN ( BOM_Rtg_Globals.G_OPR_CREATE

1768:
1769: --
1770: -- Process Flow step : Entity defaulting for CREATE and UPDATE
1771: --
1772: IF l_op_node_rec.transaction_type IN ( BOM_Rtg_Globals.G_OPR_CREATE
1773: , BOM_Rtg_Globals.G_OPR_UPDATE )
1774: THEN
1775:
1776: Bom_Rtg_Eam_Util.Op_Node_Entity_Defaulting

Line 1773: , BOM_Rtg_Globals.G_OPR_UPDATE )

1769: --
1770: -- Process Flow step : Entity defaulting for CREATE and UPDATE
1771: --
1772: IF l_op_node_rec.transaction_type IN ( BOM_Rtg_Globals.G_OPR_CREATE
1773: , BOM_Rtg_Globals.G_OPR_UPDATE )
1774: THEN
1775:
1776: Bom_Rtg_Eam_Util.Op_Node_Entity_Defaulting
1777: ( p_op_node_rec => l_op_node_rec

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

1779: , x_return_mesg => l_return_mesg
1780: , x_return_status => l_return_status
1781: ) ;
1782:
1783: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
1784: Error_Handler.Write_Debug ('Entity defaulting completed with return_status: ' || l_return_status) ;
1785: END IF ;
1786:
1787:

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

1829: END IF;
1830:
1831:
1832:
1833: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
1834: Error_Handler.Write_Debug('Entity validation completed with '
1835: || l_return_Status || ' proceeding for database writes . . . ') ;
1836: END IF;
1837:

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

1929:
1930: FOR I IN 1..p_op_link_tbl.COUNT LOOP
1931:
1932:
1933: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1934: ('Getting Operation Network Record . . .');
1935: END IF ;
1936:
1937: nwk_c:= nwk_c + 1 ; --counter for operation networks

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

2023:
2024: SAVEPOINT init_operation_link ;
2025:
2026:
2027: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2028: ('Create op_network_tbl from p_op_link_tbl. . . ');
2029: END IF ;
2030:
2031:

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

2034: , x_op_network_tbl => l_op_network_tbl
2035: ) ;
2036:
2037:
2038: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2039: ('Call Routing Business Object Public API . . . ');
2040: END IF ;
2041:
2042: Bom_Rtg_Pub.Process_Rtg