APPS.ECE_ADVO_ADVICE_PKG dependencies on DBMS_SQL

Line 636: Header_sel_c := dbms_sql.open_cursor;

632: **
633: */
634:
635: xProgress := 'ADVOB-10-1200';
636: Header_sel_c := dbms_sql.open_cursor;
637:
638: xProgress := 'ADVOB-10-1210';
639: Line_sel_c := dbms_sql.open_cursor;
640:

Line 639: Line_sel_c := dbms_sql.open_cursor;

635: xProgress := 'ADVOB-10-1200';
636: Header_sel_c := dbms_sql.open_cursor;
637:
638: xProgress := 'ADVOB-10-1210';
639: Line_sel_c := dbms_sql.open_cursor;
640:
641: /*
642: **
643: ** Parse each SELECT statement so the database understands the

Line 651: dbms_sql.parse ( Header_sel_c,

647: */
648:
649: xProgress := 'ADVOB-10-1220';
650: BEGIN
651: dbms_sql.parse ( Header_sel_c,
652: cHeader_select,
653: dbms_sql.native );
654: EXCEPTION
655: WHEN OTHERS THEN

Line 653: dbms_sql.native );

649: xProgress := 'ADVOB-10-1220';
650: BEGIN
651: dbms_sql.parse ( Header_sel_c,
652: cHeader_select,
653: dbms_sql.native );
654: EXCEPTION
655: WHEN OTHERS THEN
656: ece_error_handling_pvt.print_parse_error ( dbms_sql.last_error_position,
657: cHeader_select );

Line 656: ece_error_handling_pvt.print_parse_error ( dbms_sql.last_error_position,

652: cHeader_select,
653: dbms_sql.native );
654: EXCEPTION
655: WHEN OTHERS THEN
656: ece_error_handling_pvt.print_parse_error ( dbms_sql.last_error_position,
657: cHeader_select );
658: app_exception.raise_exception;
659: END;
660:

Line 663: dbms_sql.parse ( Line_sel_c,

659: END;
660:
661: xProgress := 'ADVOB-10-1230';
662: BEGIN
663: dbms_sql.parse ( Line_sel_c,
664: cLine_select,
665: dbms_sql.native );
666: EXCEPTION
667: WHEN OTHERS THEN

Line 665: dbms_sql.native );

661: xProgress := 'ADVOB-10-1230';
662: BEGIN
663: dbms_sql.parse ( Line_sel_c,
664: cLine_select,
665: dbms_sql.native );
666: EXCEPTION
667: WHEN OTHERS THEN
668: ece_error_handling_pvt.print_parse_error ( dbms_sql.last_error_position,
669: cLine_select );

Line 668: ece_error_handling_pvt.print_parse_error ( dbms_sql.last_error_position,

664: cLine_select,
665: dbms_sql.native );
666: EXCEPTION
667: WHEN OTHERS THEN
668: ece_error_handling_pvt.print_parse_error ( dbms_sql.last_error_position,
669: cLine_select );
670: app_exception.raise_exception;
671: END;
672:

Line 697: dbms_sql.define_column ( Header_sel_c,

693:
694: xProgress := 'ADVOB-10-1260';
695: FOR k IN 1..iHeader_count
696: LOOP
697: dbms_sql.define_column ( Header_sel_c,
698: k,
699: cHeader_select,
700: ece_extract_utils_PUB.G_MaxColWidth );
701: END LOOP;

Line 706: dbms_sql.define_column ( Line_sel_c,

702:
703: xProgress := 'ADVOB-10-1270';
704: FOR k IN 1..iLine_count
705: LOOP
706: dbms_sql.define_column ( Line_sel_c,
707: k,
708: cLine_select,
709: ece_extract_utils_PUB.G_MaxColWidth );
710: END LOOP;

Line 735: dbms_sql.bind_variable ( Header_sel_c,

731:
732: xProgress := 'ADVOB-10-1291';
733: IF p_TP_Group IS NOT NULL
734: THEN
735: dbms_sql.bind_variable ( Header_sel_c,
736: 'l_TP_Group',
737: p_TP_Group );
738: END IF;
739:

Line 743: dbms_sql.bind_variable ( Header_sel_c,

739:
740: xProgress := 'ADVOB-10-1292';
741: IF p_TP IS NOT NULL
742: THEN
743: dbms_sql.bind_variable ( Header_sel_c,
744: 'l_TP',
745: p_TP );
746: END IF;
747:

Line 751: dbms_sql.bind_variable ( Header_sel_c,

747:
748: xProgress := 'ADVOB-10-1293';
749: IF p_Response_to_doc IS NOT NULL
750: THEN
751: dbms_sql.bind_variable ( Header_sel_c,
752: 'l_Response_to_doc',
753: p_Response_to_doc);
754: END IF;
755:

Line 759: dbms_sql.bind_variable ( Header_sel_c,

755:
756: xProgress := 'ADVOB-10-1294';
757: IF p_Date_From IS NOT NULL
758: THEN
759: dbms_sql.bind_variable ( Header_sel_c,
760: 'l_Date_From',
761: p_Date_From );
762: END IF;
763:

Line 767: dbms_sql.bind_variable ( Header_sel_c,

763:
764: xProgress := 'ADVOB-10-1295';
765: IF p_Date_To IS NOT NULL
766: THEN
767: dbms_sql.bind_variable ( Header_sel_c,
768: 'l_Date_To',
769: p_Date_To );
770: END IF;
771:

Line 775: dbms_sql.bind_variable ( Header_sel_c,

771:
772: xProgress := 'ADVOB-10-1296';
773: IF p_ext_ref1 IS NOT NULL
774: THEN
775: dbms_sql.bind_variable ( Header_sel_c,
776: 'l_ext_ref1',
777: p_ext_ref1 );
778: END IF;
779:

Line 783: dbms_sql.bind_variable ( Header_sel_c,

779:
780: xProgress := 'ADVOB-10-1297';
781: IF p_ext_ref2 IS NOT NULL
782: THEN
783: dbms_sql.bind_variable ( Header_sel_c,
784: 'l_ext_ref2',
785: p_ext_ref2 );
786: END IF;
787:

Line 791: dbms_sql.bind_variable ( Header_sel_c,

787:
788: xProgress := 'ADVOB-10-1298';
789: IF p_ext_ref3 IS NOT NULL
790: THEN
791: dbms_sql.bind_variable ( Header_sel_c,
792: 'l_ext_ref3',
793: p_ext_ref3 );
794: END IF;
795:

Line 799: dbms_sql.bind_variable ( Header_sel_c,

795:
796: xProgress := 'ADVOB-10-1299';
797: IF p_ext_ref4 IS NOT NULL
798: THEN
799: dbms_sql.bind_variable ( Header_sel_c,
800: 'l_ext_ref4',
801: p_ext_ref4 );
802: END IF;
803:

Line 807: dbms_sql.bind_variable ( Header_sel_c,

803:
804: xProgress := 'ADVOB-10-1300';
805: IF p_ext_ref5 IS NOT NULL
806: THEN
807: dbms_sql.bind_variable ( Header_sel_c,
808: 'l_ext_ref5',
809: p_ext_ref5 );
810: END IF;
811:

Line 815: dbms_sql.bind_variable ( Header_sel_c,

811:
812: xProgress := 'ADVOB-10-1301';
813: IF p_ext_ref6 IS NOT NULL
814: THEN
815: dbms_sql.bind_variable ( Header_sel_c,
816: 'l_ext_ref6',
817: p_ext_ref6 );
818: END IF;
819:

Line 827: l_header_row_processed := dbms_sql.execute ( Header_sel_c );

823: **
824: */
825:
826: xProgress := 'ADVOB-10-1302';
827: l_header_row_processed := dbms_sql.execute ( Header_sel_c );
828:
829: /*
830: **
831: ** Begin the Header level loop.

Line 836: WHILE dbms_sql.fetch_rows ( Header_sel_c ) > 0

832: **
833: */
834:
835: xProgress := 'ADVOB-10-1310';
836: WHILE dbms_sql.fetch_rows ( Header_sel_c ) > 0
837: LOOP -- Header
838:
839: /*
840: **

Line 848: dbms_sql.column_value ( Header_sel_c,

844:
845: xProgress := 'ADVOB-10-1320';
846: FOR i IN 1..iHeader_count
847: LOOP
848: dbms_sql.column_value ( Header_sel_c,
849: i,
850: l_header_tbl(i).value );
851: -- fix for 5711134
852:

Line 853: dbms_sql.column_value ( Header_sel_c,

849: i,
850: l_header_tbl(i).value );
851: -- fix for 5711134
852:
853: dbms_sql.column_value ( Header_sel_c,
854: i,
855: l_key_tbl(i).value );
856:
857:

Line 963: dbms_sql.bind_variable ( Line_sel_c,

959: **
960: */
961:
962: xProgress := 'ADVOB-10-1380';
963: dbms_sql.bind_variable ( Line_sel_c,
964: 'l_advice_header_id',
965: l_header_tbl(n_advice_header_id_pos).value );
966:
967: /*

Line 974: l_line_row_processed := dbms_sql.execute ( Line_sel_c );

970: **
971: */
972:
973: xProgress := 'ADVOB-10-1390';
974: l_line_row_processed := dbms_sql.execute ( Line_sel_c );
975:
976: /*
977: **
978: ** Begin the Line level loop.

Line 983: WHILE dbms_sql.fetch_rows ( Line_sel_c ) > 0

979: **
980: */
981:
982: xProgress := 'ADVOB-10-1400';
983: WHILE dbms_sql.fetch_rows ( Line_sel_c ) > 0
984: LOOP --- Line
985:
986: /*
987: **

Line 994: dbms_sql.column_value ( Line_sel_c,

990: */
991:
992: xProgress := 'ADVOB-10-1410';
993: FOR j IN 1..iLine_count LOOP
994: dbms_sql.column_value ( Line_sel_c,
995: j,
996: l_line_tbl(j).value );
997:
998: -- fix for bug 5711134

Line 999: dbms_sql.column_value ( Line_sel_c,

995: j,
996: l_line_tbl(j).value );
997:
998: -- fix for bug 5711134
999: dbms_sql.column_value ( Line_sel_c,
1000: j,
1001: l_key_tbl(iHeader_count + j).value );
1002:
1003: END LOOP;

Line 1067: IF ( dbms_sql.last_row_count = 0 )

1063:
1064: END LOOP; /* Line WHILE loop */
1065:
1066: xProgress := 'ADVOB-10-1443';
1067: IF ( dbms_sql.last_row_count = 0 )
1068: THEN
1069: v_LevelProcessed := 'DETAIL';
1070: ec_debug.pl ( 0,
1071: 'EC',

Line 1084: IF ( dbms_sql.last_row_count = 0 )

1080:
1081: END LOOP; /* Header WHILE loop */
1082:
1083: xProgress := 'ADVOB-10-1446';
1084: IF ( dbms_sql.last_row_count = 0 )
1085: THEN
1086: v_LevelProcessed := 'HEADER';
1087: ec_debug.pl ( 0,
1088: 'EC',

Line 1105: dbms_sql.close_cursor(Header_sel_c );

1101: **
1102: */
1103:
1104: xProgress := 'ADVOB-10-1450';
1105: dbms_sql.close_cursor(Header_sel_c );
1106:
1107: xProgress := 'ADVOB-10-1460';
1108: dbms_sql.close_cursor(Line_sel_c );
1109:

Line 1108: dbms_sql.close_cursor(Line_sel_c );

1104: xProgress := 'ADVOB-10-1450';
1105: dbms_sql.close_cursor(Header_sel_c );
1106:
1107: xProgress := 'ADVOB-10-1460';
1108: dbms_sql.close_cursor(Line_sel_c );
1109:
1110: ec_debug.pop('ece_advo_advice_pkg.Extract_From_Base_Apps' );
1111:
1112: EXCEPTION

Line 1390: Header_sel_c := dbms_sql.open_cursor;

1386: **
1387: */
1388:
1389: xProgress := 'ADVOB-20-1140';
1390: Header_sel_c := dbms_sql.open_cursor;
1391:
1392: xProgress := 'ADVOB-20-1150';
1393: Line_sel_c := dbms_sql.open_cursor;
1394:

Line 1393: Line_sel_c := dbms_sql.open_cursor;

1389: xProgress := 'ADVOB-20-1140';
1390: Header_sel_c := dbms_sql.open_cursor;
1391:
1392: xProgress := 'ADVOB-20-1150';
1393: Line_sel_c := dbms_sql.open_cursor;
1394:
1395: xProgress := 'ADVOB-20-1160';
1396: Header_del_c1 := dbms_sql.open_cursor;
1397:

Line 1396: Header_del_c1 := dbms_sql.open_cursor;

1392: xProgress := 'ADVOB-20-1150';
1393: Line_sel_c := dbms_sql.open_cursor;
1394:
1395: xProgress := 'ADVOB-20-1160';
1396: Header_del_c1 := dbms_sql.open_cursor;
1397:
1398: xProgress := 'ADVOB-20-1170';
1399: Line_del_c1 := dbms_sql.open_cursor;
1400:

Line 1399: Line_del_c1 := dbms_sql.open_cursor;

1395: xProgress := 'ADVOB-20-1160';
1396: Header_del_c1 := dbms_sql.open_cursor;
1397:
1398: xProgress := 'ADVOB-20-1170';
1399: Line_del_c1 := dbms_sql.open_cursor;
1400:
1401: xProgress := 'ADVOB-20-1180';
1402: Header_del_c2 := dbms_sql.open_cursor;
1403:

Line 1402: Header_del_c2 := dbms_sql.open_cursor;

1398: xProgress := 'ADVOB-20-1170';
1399: Line_del_c1 := dbms_sql.open_cursor;
1400:
1401: xProgress := 'ADVOB-20-1180';
1402: Header_del_c2 := dbms_sql.open_cursor;
1403:
1404: xProgress := 'ADVOB-20-1190';
1405: Line_del_c2 := dbms_sql.open_cursor;
1406:

Line 1405: Line_del_c2 := dbms_sql.open_cursor;

1401: xProgress := 'ADVOB-20-1180';
1402: Header_del_c2 := dbms_sql.open_cursor;
1403:
1404: xProgress := 'ADVOB-20-1190';
1405: Line_del_c2 := dbms_sql.open_cursor;
1406:
1407: /*
1408: **
1409: ** Parse each SELECT and DELETE statement so the database understands

Line 1416: dbms_sql.parse ( Header_sel_c,

1412: */
1413:
1414: xProgress := 'ADVOB-20-1200';
1415: BEGIN
1416: dbms_sql.parse ( Header_sel_c,
1417: cHeader_select,
1418: dbms_sql.native );
1419: EXCEPTION
1420: WHEN OTHERS THEN

Line 1418: dbms_sql.native );

1414: xProgress := 'ADVOB-20-1200';
1415: BEGIN
1416: dbms_sql.parse ( Header_sel_c,
1417: cHeader_select,
1418: dbms_sql.native );
1419: EXCEPTION
1420: WHEN OTHERS THEN
1421: ece_error_handling_pvt.print_parse_error ( dbms_sql.last_error_position,
1422: cHeader_select );

Line 1421: ece_error_handling_pvt.print_parse_error ( dbms_sql.last_error_position,

1417: cHeader_select,
1418: dbms_sql.native );
1419: EXCEPTION
1420: WHEN OTHERS THEN
1421: ece_error_handling_pvt.print_parse_error ( dbms_sql.last_error_position,
1422: cHeader_select );
1423: app_exception.raise_exception;
1424: END;
1425:

Line 1428: dbms_sql.parse ( Line_sel_c,

1424: END;
1425:
1426: xProgress := 'ADVOB-20-1210';
1427: BEGIN
1428: dbms_sql.parse ( Line_sel_c,
1429: cLine_select,
1430: dbms_sql.native );
1431: EXCEPTION
1432: WHEN OTHERS THEN

Line 1430: dbms_sql.native );

1426: xProgress := 'ADVOB-20-1210';
1427: BEGIN
1428: dbms_sql.parse ( Line_sel_c,
1429: cLine_select,
1430: dbms_sql.native );
1431: EXCEPTION
1432: WHEN OTHERS THEN
1433: ece_error_handling_pvt.print_parse_error ( dbms_sql.last_error_position,
1434: cLine_select );

Line 1433: ece_error_handling_pvt.print_parse_error ( dbms_sql.last_error_position,

1429: cLine_select,
1430: dbms_sql.native );
1431: EXCEPTION
1432: WHEN OTHERS THEN
1433: ece_error_handling_pvt.print_parse_error ( dbms_sql.last_error_position,
1434: cLine_select );
1435: app_exception.raise_exception;
1436: END;
1437:

Line 1440: dbms_sql.parse ( Header_del_c1,

1436: END;
1437:
1438: xProgress := 'ADVOB-20-1220';
1439: BEGIN
1440: dbms_sql.parse ( Header_del_c1,
1441: cHeader_delete1,
1442: dbms_sql.native );
1443: EXCEPTION
1444: WHEN OTHERS THEN

Line 1442: dbms_sql.native );

1438: xProgress := 'ADVOB-20-1220';
1439: BEGIN
1440: dbms_sql.parse ( Header_del_c1,
1441: cHeader_delete1,
1442: dbms_sql.native );
1443: EXCEPTION
1444: WHEN OTHERS THEN
1445: ece_error_handling_pvt.print_parse_error ( dbms_sql.last_error_position,
1446: cHeader_delete1 );

Line 1445: ece_error_handling_pvt.print_parse_error ( dbms_sql.last_error_position,

1441: cHeader_delete1,
1442: dbms_sql.native );
1443: EXCEPTION
1444: WHEN OTHERS THEN
1445: ece_error_handling_pvt.print_parse_error ( dbms_sql.last_error_position,
1446: cHeader_delete1 );
1447: app_exception.raise_exception;
1448: END;
1449:

Line 1452: dbms_sql.parse ( Line_del_c1,

1448: END;
1449:
1450: xProgress := 'ADVOB-20-1230';
1451: BEGIN
1452: dbms_sql.parse ( Line_del_c1,
1453: cLine_delete1,
1454: dbms_sql.native );
1455: EXCEPTION
1456: WHEN OTHERS THEN

Line 1454: dbms_sql.native );

1450: xProgress := 'ADVOB-20-1230';
1451: BEGIN
1452: dbms_sql.parse ( Line_del_c1,
1453: cLine_delete1,
1454: dbms_sql.native );
1455: EXCEPTION
1456: WHEN OTHERS THEN
1457: ece_error_handling_pvt.print_parse_error ( dbms_sql.last_error_position,
1458: cLine_delete1 );

Line 1457: ece_error_handling_pvt.print_parse_error ( dbms_sql.last_error_position,

1453: cLine_delete1,
1454: dbms_sql.native );
1455: EXCEPTION
1456: WHEN OTHERS THEN
1457: ece_error_handling_pvt.print_parse_error ( dbms_sql.last_error_position,
1458: cLine_delete1 );
1459: app_exception.raise_exception;
1460: END;
1461:

Line 1464: dbms_sql.parse ( Header_del_c2,

1460: END;
1461:
1462: xProgress := 'ADVOB-20-1240';
1463: BEGIN
1464: dbms_sql.parse ( Header_del_c2,
1465: cHeader_delete2,
1466: dbms_sql.native );
1467: EXCEPTION
1468: WHEN OTHERS THEN

Line 1466: dbms_sql.native );

1462: xProgress := 'ADVOB-20-1240';
1463: BEGIN
1464: dbms_sql.parse ( Header_del_c2,
1465: cHeader_delete2,
1466: dbms_sql.native );
1467: EXCEPTION
1468: WHEN OTHERS THEN
1469: ece_error_handling_pvt.print_parse_error ( dbms_sql.last_error_position,
1470: cHeader_delete2 );

Line 1469: ece_error_handling_pvt.print_parse_error ( dbms_sql.last_error_position,

1465: cHeader_delete2,
1466: dbms_sql.native );
1467: EXCEPTION
1468: WHEN OTHERS THEN
1469: ece_error_handling_pvt.print_parse_error ( dbms_sql.last_error_position,
1470: cHeader_delete2 );
1471: app_exception.raise_exception;
1472: END;
1473:

Line 1476: dbms_sql.parse ( Line_del_c2,

1472: END;
1473:
1474: xProgress := 'ADVOB-20-1250';
1475: BEGIN
1476: dbms_sql.parse ( Line_del_c2,
1477: cLine_delete2,
1478: dbms_sql.native );
1479: EXCEPTION
1480: WHEN OTHERS THEN

Line 1478: dbms_sql.native );

1474: xProgress := 'ADVOB-20-1250';
1475: BEGIN
1476: dbms_sql.parse ( Line_del_c2,
1477: cLine_delete2,
1478: dbms_sql.native );
1479: EXCEPTION
1480: WHEN OTHERS THEN
1481: ece_error_handling_pvt.print_parse_error ( dbms_sql.last_error_position,
1482: cLine_delete2 );

Line 1481: ece_error_handling_pvt.print_parse_error ( dbms_sql.last_error_position,

1477: cLine_delete2,
1478: dbms_sql.native );
1479: EXCEPTION
1480: WHEN OTHERS THEN
1481: ece_error_handling_pvt.print_parse_error ( dbms_sql.last_error_position,
1482: cLine_delete2 );
1483: app_exception.raise_exception;
1484: END;
1485:

Line 1511: dbms_sql.define_column ( Header_sel_c,

1507:
1508: xProgress := 'ADVOB-20-1280';
1509: FOR k IN 1..iHeader_count
1510: LOOP
1511: dbms_sql.define_column ( Header_sel_c,
1512: k,
1513: cHeader_select,
1514: ece_flatfile_pvt.G_MaxColWidth );
1515: END LOOP;

Line 1525: dbms_sql.define_column_rowid ( Header_sel_c,

1521: **
1522: */
1523:
1524: xProgress := 'ADVOB-20-1290';
1525: dbms_sql.define_column_rowid ( Header_sel_c,
1526: iHeader_count + 1,
1527: rHeader_rowid );
1528:
1529: xProgress := 'ADVOB-20-1300';

Line 1530: dbms_sql.define_column_rowid ( Header_sel_c,

1526: iHeader_count + 1,
1527: rHeader_rowid );
1528:
1529: xProgress := 'ADVOB-20-1300';
1530: dbms_sql.define_column_rowid ( Header_sel_c,
1531: iHeader_count + 2,
1532: rHeader_X_rowid );
1533:
1534: /*

Line 1545: dbms_sql.define_column ( Line_sel_c,

1541:
1542: xProgress := 'ADVOB-20-1310';
1543: FOR k IN 1..iLine_count
1544: LOOP
1545: dbms_sql.define_column ( Line_sel_c,
1546: k,
1547: cLine_select,
1548: ece_flatfile_pvt.G_MaxColWidth );
1549: END LOOP;

Line 1559: dbms_sql.define_column_rowid ( Line_sel_c,

1555: **
1556: */
1557:
1558: xProgress := 'ADVOB-20-1320';
1559: dbms_sql.define_column_rowid ( Line_sel_c,
1560: iLine_count + 1,
1561: rLine_rowid );
1562:
1563: xProgress := 'ADVOB-20-1330';

Line 1564: dbms_sql.define_column_rowid ( Line_sel_c,

1560: iLine_count + 1,
1561: rLine_rowid );
1562:
1563: xProgress := 'ADVOB-20-1330';
1564: dbms_sql.define_column_rowid ( Line_sel_c,
1565: iLine_count + 2,
1566: rLine_X_rowid );
1567:
1568: /*

Line 1601: dbms_sql.bind_variable ( Header_sel_c,

1597: nLine_key_pos );
1598: ec_debug.pl ( 3, 'nLine_key_pos: ',nLine_key_pos );
1599:
1600: xProgress := 'ADVOB-20-1371';
1601: dbms_sql.bind_variable ( Header_sel_c,
1602: 'l_iRun_id',
1603: iRun_id );
1604:
1605:

Line 1613: dummy := dbms_sql.execute ( Header_sel_c );

1609: **
1610: */
1611:
1612: xProgress := 'ADVOB-20-1380';
1613: dummy := dbms_sql.execute ( Header_sel_c );
1614:
1615: /*
1616: **
1617: ** Begin the Header level loop.

Line 1622: WHILE dbms_sql.fetch_rows ( Header_sel_c ) > 0

1618: **
1619: */
1620:
1621: xProgress := 'ADVOB-20-1390';
1622: WHILE dbms_sql.fetch_rows ( Header_sel_c ) > 0
1623: LOOP -- Header
1624:
1625: /*
1626: **

Line 1634: dbms_sql.column_value ( Header_sel_c,

1630:
1631: xProgress := 'ADVOB-20-1400';
1632: FOR i IN 1..iHeader_count
1633: LOOP
1634: dbms_sql.column_value ( Header_sel_c,
1635: i,
1636: l_header_tbl(i).value );
1637: END LOOP;
1638:

Line 1646: dbms_sql.column_value ( Header_sel_c,

1642: **
1643: */
1644:
1645: xProgress := 'ADVOB-20-1410';
1646: dbms_sql.column_value ( Header_sel_c,
1647: iHeader_count + 1,
1648: rHeader_rowid );
1649:
1650: xProgress := 'ADVOB-20-1420';

Line 1651: dbms_sql.column_value ( Header_sel_c,

1647: iHeader_count + 1,
1648: rHeader_rowid );
1649:
1650: xProgress := 'ADVOB-20-1420';
1651: dbms_sql.column_value ( Header_sel_c,
1652: iHeader_count + 2,
1653: rHeader_X_rowid );
1654:
1655: /*

Line 1698: dbms_sql.bind_variable ( Line_sel_c,

1694: **
1695: */
1696:
1697: xProgress := 'ADVOB-20-1460';
1698: dbms_sql.bind_variable ( Line_sel_c,
1699: 'x_iRun_id',
1700: iRun_id);
1701:
1702:

Line 1704: dbms_sql.bind_variable ( Line_sel_c,

1700: iRun_id);
1701:
1702:
1703: xProgress := 'ADVOB-20-1461';
1704: dbms_sql.bind_variable ( Line_sel_c,
1705: 'x_advice_header_id',
1706: l_header_tbl(n_advice_header_id_pos).value );
1707:
1708: /*

Line 1715: dummy := dbms_sql.execute ( Line_sel_c );

1711: **
1712: */
1713:
1714: xProgress := 'ADVOB-20-1470';
1715: dummy := dbms_sql.execute ( Line_sel_c );
1716:
1717: /*
1718: **
1719: ** Begin the Line level loop.

Line 1724: WHILE dbms_sql.fetch_rows(Line_sel_c) > 0 LOOP --- Line

1720: **
1721: */
1722:
1723: xProgress := 'ADVOB-20-1480';
1724: WHILE dbms_sql.fetch_rows(Line_sel_c) > 0 LOOP --- Line
1725:
1726: /*
1727: **
1728: ** Store the returned values in the PL/SQL table.

Line 1735: dbms_sql.column_value ( Line_sel_c,

1731:
1732: xProgress := 'ADVOB-20-1490';
1733: FOR j IN 1..iLine_count
1734: LOOP
1735: dbms_sql.column_value ( Line_sel_c,
1736: j,
1737: l_line_tbl(j).value );
1738: END LOOP;
1739:

Line 1747: dbms_sql.column_value ( Line_sel_c,

1743: **
1744: */
1745:
1746: xProgress := 'ADVOB-20-1500';
1747: dbms_sql.column_value ( Line_sel_c,
1748: iLine_count + 1,
1749: rLine_rowid );
1750:
1751: xProgress := 'ADVOB-20-1510';

Line 1752: dbms_sql.column_value ( Line_sel_c,

1748: iLine_count + 1,
1749: rLine_rowid );
1750:
1751: xProgress := 'ADVOB-20-1510';
1752: dbms_sql.column_value ( Line_sel_c,
1753: iLine_count + 2,
1754: rLine_X_rowid );
1755:
1756: /*

Line 1797: dbms_sql.bind_variable ( Line_del_c1,

1793: **
1794: */
1795:
1796: xProgress := 'ADVOB-20-1540';
1797: dbms_sql.bind_variable ( Line_del_c1,
1798: 'col_rowid',
1799: rLine_rowid );
1800:
1801: xProgress := 'ADVOB-20-1550';

Line 1802: dbms_sql.bind_variable ( Line_del_c2,

1798: 'col_rowid',
1799: rLine_rowid );
1800:
1801: xProgress := 'ADVOB-20-1550';
1802: dbms_sql.bind_variable ( Line_del_c2,
1803: 'col_rowid',
1804: rLine_X_rowid );
1805:
1806: /*

Line 1813: dummy := dbms_sql.execute ( Line_del_c1 );

1809: **
1810: */
1811:
1812: xProgress := 'ADVOB-20-1560';
1813: dummy := dbms_sql.execute ( Line_del_c1 );
1814:
1815: xProgress := 'ADVOB-20-1570';
1816: dummy := dbms_sql.execute ( Line_del_c2 );
1817:

Line 1816: dummy := dbms_sql.execute ( Line_del_c2 );

1812: xProgress := 'ADVOB-20-1560';
1813: dummy := dbms_sql.execute ( Line_del_c1 );
1814:
1815: xProgress := 'ADVOB-20-1570';
1816: dummy := dbms_sql.execute ( Line_del_c2 );
1817:
1818: END LOOP; /* Line WHILE loop */
1819:
1820: xProgress := 'ADVOB-20-1575';

Line 1821: IF ( dbms_sql.last_row_count = 0 )

1817:
1818: END LOOP; /* Line WHILE loop */
1819:
1820: xProgress := 'ADVOB-20-1575';
1821: IF ( dbms_sql.last_row_count = 0 )
1822: THEN
1823: v_LevelProcessed := 'LINE';
1824: ec_debug.pl ( 0,
1825: 'EC',

Line 1842: dbms_sql.bind_variable ( Header_del_c1,

1838: **
1839: */
1840:
1841: xProgress := 'ADVOB-20-1580';
1842: dbms_sql.bind_variable ( Header_del_c1,
1843: 'col_rowid',
1844: rHeader_rowid );
1845:
1846: xProgress := 'ADVOB-20-1590';

Line 1847: dbms_sql.bind_variable ( Header_del_c2,

1843: 'col_rowid',
1844: rHeader_rowid );
1845:
1846: xProgress := 'ADVOB-20-1590';
1847: dbms_sql.bind_variable ( Header_del_c2,
1848: 'col_rowid',
1849: rHeader_X_rowid );
1850:
1851: /*

Line 1858: dummy := dbms_sql.execute ( Header_del_c1 );

1854: **
1855: */
1856:
1857: xProgress := 'ADVOB-20-1600';
1858: dummy := dbms_sql.execute ( Header_del_c1 );
1859:
1860: xProgress := 'ADVOB-20-1610';
1861: dummy := dbms_sql.execute ( Header_del_c2 );
1862:

Line 1861: dummy := dbms_sql.execute ( Header_del_c2 );

1857: xProgress := 'ADVOB-20-1600';
1858: dummy := dbms_sql.execute ( Header_del_c1 );
1859:
1860: xProgress := 'ADVOB-20-1610';
1861: dummy := dbms_sql.execute ( Header_del_c2 );
1862:
1863:
1864: END LOOP; /* Header WHILE loop */
1865:

Line 1867: IF ( dbms_sql.last_row_count = 0 )

1863:
1864: END LOOP; /* Header WHILE loop */
1865:
1866: xProgress := 'ADVOB-20-1615';
1867: IF ( dbms_sql.last_row_count = 0 )
1868: THEN
1869: v_LevelProcessed := 'HEADER';
1870: ec_debug.pl ( 0,
1871: 'EC',

Line 1888: dbms_sql.close_cursor ( Header_sel_c );

1884: **
1885: */
1886:
1887: xProgress := 'ADVOB-20-1620';
1888: dbms_sql.close_cursor ( Header_sel_c );
1889:
1890: xProgress := 'ADVOB-20-1630';
1891: dbms_sql.close_cursor ( Line_sel_c );
1892:

Line 1891: dbms_sql.close_cursor ( Line_sel_c );

1887: xProgress := 'ADVOB-20-1620';
1888: dbms_sql.close_cursor ( Header_sel_c );
1889:
1890: xProgress := 'ADVOB-20-1630';
1891: dbms_sql.close_cursor ( Line_sel_c );
1892:
1893: xProgress := 'ADVOB-20-1640';
1894: dbms_sql.close_cursor ( Header_del_c1 );
1895:

Line 1894: dbms_sql.close_cursor ( Header_del_c1 );

1890: xProgress := 'ADVOB-20-1630';
1891: dbms_sql.close_cursor ( Line_sel_c );
1892:
1893: xProgress := 'ADVOB-20-1640';
1894: dbms_sql.close_cursor ( Header_del_c1 );
1895:
1896: xProgress := 'ADVOB-20-1650';
1897: dbms_sql.close_cursor ( Line_del_c1 );
1898:

Line 1897: dbms_sql.close_cursor ( Line_del_c1 );

1893: xProgress := 'ADVOB-20-1640';
1894: dbms_sql.close_cursor ( Header_del_c1 );
1895:
1896: xProgress := 'ADVOB-20-1650';
1897: dbms_sql.close_cursor ( Line_del_c1 );
1898:
1899: ec_debug.pop ( 'ece_advo_advice_pkg.Put_Data_To_Output_Table' );
1900:
1901: EXCEPTION