APPS.QLTTRAWB dependencies on DBMS_SQL

Line 142: val dbms_sql.varchar2s;

138:
139: s VARCHAR2(2000) := p_cols;
140: p INTEGER;
141: i INTEGER := 1;
142: val dbms_sql.varchar2s;
143:
144: BEGIN
145: val(1) := '';
146: val(2) := '';

Line 1271: -- using DBMS_SQL.EXECUTE. This is for the SQL Bind Compliance Project.

1267: BEGIN
1268: I := 0;
1269:
1270: -- Bug 2941809. Need to use bind variables instead of literal values when
1271: -- using DBMS_SQL.EXECUTE. This is for the SQL Bind Compliance Project.
1272: -- kabalakr
1273:
1274: -- Bug 3136107.suramasw
1275: -- Replaced :ERR_COL introduced in the version 115.63 by :ERROR_COL_NAME

Line 1296: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;

1292: 'QRI.TRANSACTION_INTERFACE_ID ' ||
1293: 'AND QIE.ERROR_COLUMN IN ( :ERROR_COL_NAME, NULL))' ||
1294: ' AND to_char(QRI.' || COL_NAME || ') NOT IN (to_char(:NULL_NUM), :NULL_CHAR, to_char(:null_date, ''DD-MON-YYYY HH24:MI:SS''))' ;
1295:
1296: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
1297: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
1298:
1299: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
1300: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);

Line 1297: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);

1293: 'AND QIE.ERROR_COLUMN IN ( :ERROR_COL_NAME, NULL))' ||
1294: ' AND to_char(QRI.' || COL_NAME || ') NOT IN (to_char(:NULL_NUM), :NULL_CHAR, to_char(:null_date, ''DD-MON-YYYY HH24:MI:SS''))' ;
1295:
1296: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
1297: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
1298:
1299: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
1300: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
1301:

Line 1299: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);

1295:
1296: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
1297: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
1298:
1299: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
1300: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
1301:
1302: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':NULL_NUM' , NULL_NUM);
1303: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':NULL_CHAR', NULL_CHAR);

Line 1300: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);

1296: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
1297: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
1298:
1299: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
1300: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
1301:
1302: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':NULL_NUM' , NULL_NUM);
1303: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':NULL_CHAR', NULL_CHAR);
1304: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':NULL_DATE', NULL_DATE);

Line 1302: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':NULL_NUM' , NULL_NUM);

1298:
1299: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
1300: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
1301:
1302: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':NULL_NUM' , NULL_NUM);
1303: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':NULL_CHAR', NULL_CHAR);
1304: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':NULL_DATE', NULL_DATE);
1305:
1306: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);

Line 1303: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':NULL_CHAR', NULL_CHAR);

1299: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
1300: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
1301:
1302: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':NULL_NUM' , NULL_NUM);
1303: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':NULL_CHAR', NULL_CHAR);
1304: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':NULL_DATE', NULL_DATE);
1305:
1306: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1307: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_CHARACTERX, 150);

Line 1304: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':NULL_DATE', NULL_DATE);

1300: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
1301:
1302: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':NULL_NUM' , NULL_NUM);
1303: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':NULL_CHAR', NULL_CHAR);
1304: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':NULL_DATE', NULL_DATE);
1305:
1306: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1307: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_CHARACTERX, 150);
1308:

Line 1306: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);

1302: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':NULL_NUM' , NULL_NUM);
1303: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':NULL_CHAR', NULL_CHAR);
1304: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':NULL_DATE', NULL_DATE);
1305:
1306: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1307: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_CHARACTERX, 150);
1308:
1309: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
1310:

Line 1307: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_CHARACTERX, 150);

1303: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':NULL_CHAR', NULL_CHAR);
1304: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':NULL_DATE', NULL_DATE);
1305:
1306: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1307: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_CHARACTERX, 150);
1308:
1309: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
1310:
1311: LOOP

Line 1309: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);

1305:
1306: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1307: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_CHARACTERX, 150);
1308:
1309: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
1310:
1311: LOOP
1312: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
1313: I := I + 1;

Line 1312: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN

1308:
1309: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
1310:
1311: LOOP
1312: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
1313: I := I + 1;
1314: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1315: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_CHARACTERX);
1316: INTERFACE_ID_TABLE(I) := X_INTERFACE_ID;

Line 1314: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);

1310:
1311: LOOP
1312: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
1313: I := I + 1;
1314: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1315: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_CHARACTERX);
1316: INTERFACE_ID_TABLE(I) := X_INTERFACE_ID;
1317: VALUE_TABLE(I) := X_CHARACTERX;
1318: ELSE

Line 1315: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_CHARACTERX);

1311: LOOP
1312: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
1313: I := I + 1;
1314: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1315: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_CHARACTERX);
1316: INTERFACE_ID_TABLE(I) := X_INTERFACE_ID;
1317: VALUE_TABLE(I) := X_CHARACTERX;
1318: ELSE
1319: EXIT;

Line 1324: DBMS_SQL.CLOSE_CURSOR(SOURCE_CURSOR);

1320: END IF;
1321: END LOOP;
1322:
1323: NUM_ROWS := I;
1324: DBMS_SQL.CLOSE_CURSOR(SOURCE_CURSOR);
1325:
1326: IF (X_DATATYPE = 2) THEN
1327: -- Bug 7626523.Fp for 7568208
1328: -- Truncating the message to 240 Characters

Line 1543: -- using DBMS_SQL.EXECUTE. This is for the SQL Bind Compliance Project.

1539: ID_FIELD := 'LOCATOR_ID';
1540: END IF;
1541:
1542: -- Bug 2941809. Need to use bind variables instead of literal values when
1543: -- using DBMS_SQL.EXECUTE. This is for the SQL Bind Compliance Project.
1544: -- kabalakr
1545:
1546: -- Bug 3136107.suramasw.
1547: -- Replaced :ERR_COL introduced in the version 115.63 by :ERROR_COL_NAME

Line 1573: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;

1569: 'QRI.TRANSACTION_INTERFACE_ID ' ||
1570: 'AND QIE.ERROR_COLUMN IN ( :ERROR_COL_NAME, NULL)) '||
1571: ' AND QRI.ORGANIZATION_ID = MP.ORGANIZATION_ID';
1572:
1573: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
1574: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
1575:
1576: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
1577: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);

Line 1574: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);

1570: 'AND QIE.ERROR_COLUMN IN ( :ERROR_COL_NAME, NULL)) '||
1571: ' AND QRI.ORGANIZATION_ID = MP.ORGANIZATION_ID';
1572:
1573: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
1574: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
1575:
1576: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
1577: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
1578:

Line 1576: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);

1572:
1573: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
1574: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
1575:
1576: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
1577: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
1578:
1579: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1580: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);

Line 1577: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);

1573: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
1574: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
1575:
1576: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
1577: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
1578:
1579: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1580: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
1581: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);

Line 1579: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);

1575:
1576: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
1577: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
1578:
1579: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1580: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
1581: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
1582: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_SUB_LOC_TYPE);
1583: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);

Line 1580: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);

1576: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
1577: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
1578:
1579: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1580: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
1581: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
1582: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_SUB_LOC_TYPE);
1583: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1584: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);

Line 1581: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);

1577: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
1578:
1579: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1580: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
1581: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
1582: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_SUB_LOC_TYPE);
1583: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1584: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1585: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 7, X_SUBINV, 10);

Line 1582: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_SUB_LOC_TYPE);

1578:
1579: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1580: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
1581: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
1582: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_SUB_LOC_TYPE);
1583: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1584: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1585: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 7, X_SUBINV, 10);
1586: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);

Line 1583: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);

1579: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1580: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
1581: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
1582: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_SUB_LOC_TYPE);
1583: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1584: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1585: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 7, X_SUBINV, 10);
1586: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1587: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 9, X_NEG_INV);

Line 1584: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);

1580: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
1581: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
1582: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_SUB_LOC_TYPE);
1583: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1584: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1585: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 7, X_SUBINV, 10);
1586: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1587: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 9, X_NEG_INV);
1588: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 10, X_ITEM_ID);

Line 1585: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 7, X_SUBINV, 10);

1581: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
1582: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_SUB_LOC_TYPE);
1583: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1584: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1585: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 7, X_SUBINV, 10);
1586: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1587: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 9, X_NEG_INV);
1588: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 10, X_ITEM_ID);
1589:

Line 1586: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);

1582: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_SUB_LOC_TYPE);
1583: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1584: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1585: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 7, X_SUBINV, 10);
1586: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1587: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 9, X_NEG_INV);
1588: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 10, X_ITEM_ID);
1589:
1590: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);

Line 1587: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 9, X_NEG_INV);

1583: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1584: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1585: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 7, X_SUBINV, 10);
1586: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1587: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 9, X_NEG_INV);
1588: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 10, X_ITEM_ID);
1589:
1590: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
1591:

Line 1588: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 10, X_ITEM_ID);

1584: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1585: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 7, X_SUBINV, 10);
1586: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1587: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 9, X_NEG_INV);
1588: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 10, X_ITEM_ID);
1589:
1590: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
1591:
1592: LOOP

Line 1590: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);

1586: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1587: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 9, X_NEG_INV);
1588: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 10, X_ITEM_ID);
1589:
1590: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
1591:
1592: LOOP
1593: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
1594: I := I + 1;

Line 1593: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN

1589:
1590: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
1591:
1592: LOOP
1593: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
1594: I := I + 1;
1595: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1596: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
1597: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);

Line 1595: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);

1591:
1592: LOOP
1593: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
1594: I := I + 1;
1595: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1596: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
1597: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
1598: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_SUB_LOC_TYPE);
1599: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);

Line 1596: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);

1592: LOOP
1593: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
1594: I := I + 1;
1595: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1596: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
1597: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
1598: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_SUB_LOC_TYPE);
1599: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1600: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);

Line 1597: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);

1593: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
1594: I := I + 1;
1595: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1596: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
1597: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
1598: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_SUB_LOC_TYPE);
1599: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1600: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1601: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 7, X_SUBINV);

Line 1598: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_SUB_LOC_TYPE);

1594: I := I + 1;
1595: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1596: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
1597: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
1598: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_SUB_LOC_TYPE);
1599: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1600: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1601: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 7, X_SUBINV);
1602: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);

Line 1599: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);

1595: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1596: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
1597: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
1598: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_SUB_LOC_TYPE);
1599: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1600: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1601: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 7, X_SUBINV);
1602: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1603: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 9, X_NEG_INV);

Line 1600: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);

1596: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
1597: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
1598: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_SUB_LOC_TYPE);
1599: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1600: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1601: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 7, X_SUBINV);
1602: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1603: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 9, X_NEG_INV);
1604: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 10, X_ITEM_ID);

Line 1601: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 7, X_SUBINV);

1597: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
1598: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_SUB_LOC_TYPE);
1599: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1600: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1601: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 7, X_SUBINV);
1602: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1603: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 9, X_NEG_INV);
1604: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 10, X_ITEM_ID);
1605:

Line 1602: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);

1598: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_SUB_LOC_TYPE);
1599: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1600: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1601: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 7, X_SUBINV);
1602: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1603: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 9, X_NEG_INV);
1604: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 10, X_ITEM_ID);
1605:
1606: INTERFACE_ID_TABLE(I) := X_INTERFACE_ID;

Line 1603: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 9, X_NEG_INV);

1599: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1600: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1601: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 7, X_SUBINV);
1602: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1603: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 9, X_NEG_INV);
1604: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 10, X_ITEM_ID);
1605:
1606: INTERFACE_ID_TABLE(I) := X_INTERFACE_ID;
1607: SEGS_TABLE(I) := X_SEGS;

Line 1604: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 10, X_ITEM_ID);

1600: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1601: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 7, X_SUBINV);
1602: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1603: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 9, X_NEG_INV);
1604: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 10, X_ITEM_ID);
1605:
1606: INTERFACE_ID_TABLE(I) := X_INTERFACE_ID;
1607: SEGS_TABLE(I) := X_SEGS;
1608: ORG_ID_TABLE(I) := X_ORG_ID;

Line 1623: DBMS_SQL.CLOSE_CURSOR(SOURCE_CURSOR);

1619: END LOOP;
1620:
1621:
1622: NUM_ROWS := I;
1623: DBMS_SQL.CLOSE_CURSOR(SOURCE_CURSOR);
1624:
1625: FOR I IN 1..NUM_ROWS LOOP
1626: GEN_LOC_CTRL_TABLE(I) := QLTINVCB.CONTROL(
1627: ORG_CONTROL=>ORG_LOC_CTRL_TABLE(I),

Line 1878: -- using DBMS_SQL.EXECUTE. This is for the SQL Bind Compliance Project.

1874: -- Bug 3136107.SQL Bind project.
1875: parse_error_columns(error_col_list, l_col1, l_col2, l_col3, l_col4, l_col5);
1876:
1877: -- Bug 2941809. Need to use bind variables instead of literal values when
1878: -- using DBMS_SQL.EXECUTE. This is for the SQL Bind Compliance Project.
1879: -- kabalakr
1880:
1881: -- Bug 3136107.suramasw.
1882: -- Replaced :ERR_COL introduced in the version 115.63 by :ERROR_COL_NAME

Line 1909: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;

1905: 'AND QIE.ERROR_COLUMN IN ( :ERROR_COL_NAME, NULL))' ||
1906: ' AND QRI.ORGANIZATION_ID = MP.ORGANIZATION_ID';
1907:
1908:
1909: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
1910: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
1911:
1912: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
1913: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);

Line 1910: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);

1906: ' AND QRI.ORGANIZATION_ID = MP.ORGANIZATION_ID';
1907:
1908:
1909: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
1910: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
1911:
1912: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
1913: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
1914:

Line 1912: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);

1908:
1909: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
1910: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
1911:
1912: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
1913: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
1914:
1915: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1916: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);

Line 1913: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);

1909: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
1910: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
1911:
1912: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
1913: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
1914:
1915: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1916: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
1917: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);

Line 1915: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);

1911:
1912: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
1913: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
1914:
1915: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1916: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
1917: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
1918: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_TO_SUB_LOC_TYPE);
1919: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);

Line 1916: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);

1912: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
1913: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
1914:
1915: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1916: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
1917: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
1918: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_TO_SUB_LOC_TYPE);
1919: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1920: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);

Line 1917: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);

1913: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
1914:
1915: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1916: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
1917: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
1918: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_TO_SUB_LOC_TYPE);
1919: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1920: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1921: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 7, X_TO_SUBINV, 10);

Line 1918: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_TO_SUB_LOC_TYPE);

1914:
1915: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1916: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
1917: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
1918: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_TO_SUB_LOC_TYPE);
1919: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1920: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1921: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 7, X_TO_SUBINV, 10);
1922: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);

Line 1919: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);

1915: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1916: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
1917: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
1918: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_TO_SUB_LOC_TYPE);
1919: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1920: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1921: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 7, X_TO_SUBINV, 10);
1922: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1923: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 9, X_NEG_INV);

Line 1920: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);

1916: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
1917: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
1918: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_TO_SUB_LOC_TYPE);
1919: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1920: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1921: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 7, X_TO_SUBINV, 10);
1922: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1923: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 9, X_NEG_INV);
1924: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 10, X_ITEM_ID);

Line 1921: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 7, X_TO_SUBINV, 10);

1917: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
1918: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_TO_SUB_LOC_TYPE);
1919: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1920: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1921: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 7, X_TO_SUBINV, 10);
1922: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1923: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 9, X_NEG_INV);
1924: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 10, X_ITEM_ID);
1925:

Line 1922: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);

1918: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_TO_SUB_LOC_TYPE);
1919: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1920: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1921: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 7, X_TO_SUBINV, 10);
1922: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1923: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 9, X_NEG_INV);
1924: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 10, X_ITEM_ID);
1925:
1926: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);

Line 1923: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 9, X_NEG_INV);

1919: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1920: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1921: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 7, X_TO_SUBINV, 10);
1922: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1923: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 9, X_NEG_INV);
1924: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 10, X_ITEM_ID);
1925:
1926: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
1927:

Line 1924: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 10, X_ITEM_ID);

1920: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1921: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 7, X_TO_SUBINV, 10);
1922: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1923: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 9, X_NEG_INV);
1924: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 10, X_ITEM_ID);
1925:
1926: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
1927:
1928: LOOP

Line 1926: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);

1922: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1923: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 9, X_NEG_INV);
1924: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 10, X_ITEM_ID);
1925:
1926: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
1927:
1928: LOOP
1929: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
1930: I := I + 1;

Line 1929: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN

1925:
1926: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
1927:
1928: LOOP
1929: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
1930: I := I + 1;
1931: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1932: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
1933: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);

Line 1931: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);

1927:
1928: LOOP
1929: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
1930: I := I + 1;
1931: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1932: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
1933: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
1934: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_TO_SUB_LOC_TYPE);
1935: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);

Line 1932: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);

1928: LOOP
1929: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
1930: I := I + 1;
1931: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1932: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
1933: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
1934: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_TO_SUB_LOC_TYPE);
1935: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1936: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);

Line 1933: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);

1929: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
1930: I := I + 1;
1931: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1932: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
1933: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
1934: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_TO_SUB_LOC_TYPE);
1935: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1936: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1937: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 7, X_TO_SUBINV);

Line 1934: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_TO_SUB_LOC_TYPE);

1930: I := I + 1;
1931: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1932: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
1933: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
1934: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_TO_SUB_LOC_TYPE);
1935: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1936: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1937: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 7, X_TO_SUBINV);
1938: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);

Line 1935: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);

1931: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1932: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
1933: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
1934: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_TO_SUB_LOC_TYPE);
1935: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1936: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1937: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 7, X_TO_SUBINV);
1938: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1939: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 9, X_NEG_INV);

Line 1936: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);

1932: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
1933: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
1934: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_TO_SUB_LOC_TYPE);
1935: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1936: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1937: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 7, X_TO_SUBINV);
1938: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1939: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 9, X_NEG_INV);
1940: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 10, X_ITEM_ID);

Line 1937: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 7, X_TO_SUBINV);

1933: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
1934: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_TO_SUB_LOC_TYPE);
1935: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1936: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1937: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 7, X_TO_SUBINV);
1938: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1939: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 9, X_NEG_INV);
1940: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 10, X_ITEM_ID);
1941:

Line 1938: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);

1934: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_TO_SUB_LOC_TYPE);
1935: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1936: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1937: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 7, X_TO_SUBINV);
1938: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1939: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 9, X_NEG_INV);
1940: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 10, X_ITEM_ID);
1941:
1942: INTERFACE_ID_TABLE(I) := X_INTERFACE_ID;

Line 1939: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 9, X_NEG_INV);

1935: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1936: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1937: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 7, X_TO_SUBINV);
1938: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1939: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 9, X_NEG_INV);
1940: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 10, X_ITEM_ID);
1941:
1942: INTERFACE_ID_TABLE(I) := X_INTERFACE_ID;
1943: SEGS_TABLE(I) := X_SEGS;

Line 1940: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 10, X_ITEM_ID);

1936: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1937: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 7, X_TO_SUBINV);
1938: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1939: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 9, X_NEG_INV);
1940: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 10, X_ITEM_ID);
1941:
1942: INTERFACE_ID_TABLE(I) := X_INTERFACE_ID;
1943: SEGS_TABLE(I) := X_SEGS;
1944: ORG_ID_TABLE(I) := X_ORG_ID;

Line 1957: DBMS_SQL.CLOSE_CURSOR(SOURCE_CURSOR);

1953: EXIT;
1954: END IF;
1955: END LOOP;
1956: NUM_ROWS := I;
1957: DBMS_SQL.CLOSE_CURSOR(SOURCE_CURSOR);
1958:
1959: FOR I IN 1..NUM_ROWS LOOP
1960: GEN_LOC_CTRL_TABLE(I) := QLTINVCB.CONTROL(
1961: ORG_CONTROL=>ORG_LOC_CTRL_TABLE(I),

Line 2238: -- using DBMS_SQL.EXECUTE. This is for the SQL Bind Compliance Project.

2234:
2235: END IF;
2236:
2237: -- Bug 2941809. Need to use bind variables instead of literal values when
2238: -- using DBMS_SQL.EXECUTE. This is for the SQL Bind Compliance Project.
2239: -- kabalakr
2240:
2241: -- Bug 3136107.suramasw.
2242: -- Replaced :ERR_COL introduced in the version 115.63 by :ERROR_COL_NAME

Line 2258: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;

2254: 'WHERE QIE.TRANSACTION_INTERFACE_ID = ' ||
2255: 'QRI.TRANSACTION_INTERFACE_ID ' ||
2256: 'AND QIE.ERROR_COLUMN IN ( :ERROR_COL_NAME, NULL))';
2257:
2258: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
2259: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
2260:
2261: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
2262: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);

Line 2259: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);

2255: 'QRI.TRANSACTION_INTERFACE_ID ' ||
2256: 'AND QIE.ERROR_COLUMN IN ( :ERROR_COL_NAME, NULL))';
2257:
2258: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
2259: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
2260:
2261: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
2262: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
2263:

Line 2261: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);

2257:
2258: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
2259: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
2260:
2261: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
2262: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
2263:
2264: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2265: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);

Line 2262: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);

2258: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
2259: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
2260:
2261: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
2262: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
2263:
2264: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2265: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
2266: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);

Line 2264: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);

2260:
2261: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
2262: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
2263:
2264: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2265: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
2266: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
2267: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_LINE_ID);
2268:

Line 2265: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);

2261: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
2262: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
2263:
2264: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2265: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
2266: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
2267: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_LINE_ID);
2268:
2269: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);

Line 2266: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);

2262: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
2263:
2264: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2265: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
2266: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
2267: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_LINE_ID);
2268:
2269: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
2270:

Line 2267: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_LINE_ID);

2263:
2264: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2265: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
2266: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
2267: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_LINE_ID);
2268:
2269: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
2270:
2271: LOOP

Line 2269: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);

2265: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
2266: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
2267: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_LINE_ID);
2268:
2269: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
2270:
2271: LOOP
2272: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
2273: I := I + 1;

Line 2272: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN

2268:
2269: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
2270:
2271: LOOP
2272: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
2273: I := I + 1;
2274: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2275: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
2276: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);

Line 2274: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);

2270:
2271: LOOP
2272: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
2273: I := I + 1;
2274: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2275: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
2276: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
2277: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_LINE_ID);
2278: INTERFACE_ID_TABLE(I) := X_INTERFACE_ID;

Line 2275: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);

2271: LOOP
2272: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
2273: I := I + 1;
2274: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2275: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
2276: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
2277: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_LINE_ID);
2278: INTERFACE_ID_TABLE(I) := X_INTERFACE_ID;
2279: SEGS_TABLE(I) := X_SEGS;

Line 2276: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);

2272: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
2273: I := I + 1;
2274: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2275: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
2276: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
2277: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_LINE_ID);
2278: INTERFACE_ID_TABLE(I) := X_INTERFACE_ID;
2279: SEGS_TABLE(I) := X_SEGS;
2280: ORG_ID_TABLE(I) := X_ORG_ID;

Line 2277: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_LINE_ID);

2273: I := I + 1;
2274: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2275: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
2276: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
2277: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_LINE_ID);
2278: INTERFACE_ID_TABLE(I) := X_INTERFACE_ID;
2279: SEGS_TABLE(I) := X_SEGS;
2280: ORG_ID_TABLE(I) := X_ORG_ID;
2281: LINE_ID_TABLE(I) := X_LINE_ID;

Line 2288: DBMS_SQL.CLOSE_CURSOR(SOURCE_CURSOR);

2284: END IF;
2285: END LOOP;
2286:
2287: NUM_ROWS := I;
2288: DBMS_SQL.CLOSE_CURSOR(SOURCE_CURSOR);
2289:
2290: -- Added the UNION condition in the X_WHERE_CLAUSE below to
2291: -- validate Flow Items associated with Production Line.
2292: -- Bug 2791447.suramasw.Tue Feb 11 00:06:05 PST 2003

Line 2563: -- using DBMS_SQL.EXECUTE. This is for the SQL Bind Compliance Project.

2559: ID_FIELD := 'FOLLOWUP_ACTIVITY_ID';
2560: END IF;
2561:
2562: -- Bug 2941809. Need to use bind variables instead of literal values when
2563: -- using DBMS_SQL.EXECUTE. This is for the SQL Bind Compliance Project.
2564: -- kabalakr
2565:
2566: -- Bug 3136107.suramasw.
2567: -- Replaced :ERR_COL introduced in the version 115.63 by :ERROR_COL_NAME

Line 2583: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;

2579: 'WHERE QIE.TRANSACTION_INTERFACE_ID = ' ||
2580: 'QRI.TRANSACTION_INTERFACE_ID ' ||
2581: 'AND QIE.ERROR_COLUMN IN ( :ERROR_COL_NAME, NULL)) ';
2582:
2583: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
2584:
2585: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
2586:
2587: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);

Line 2585: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);

2581: 'AND QIE.ERROR_COLUMN IN ( :ERROR_COL_NAME, NULL)) ';
2582:
2583: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
2584:
2585: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
2586:
2587: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
2588: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
2589:

Line 2587: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);

2583: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
2584:
2585: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
2586:
2587: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
2588: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
2589:
2590: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2591: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);

Line 2588: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);

2584:
2585: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
2586:
2587: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
2588: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
2589:
2590: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2591: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
2592: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);

Line 2590: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);

2586:
2587: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
2588: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
2589:
2590: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2591: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
2592: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
2593:
2594: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);

Line 2591: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);

2587: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
2588: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
2589:
2590: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2591: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
2592: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
2593:
2594: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
2595:

Line 2592: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);

2588: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
2589:
2590: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2591: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
2592: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
2593:
2594: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
2595:
2596: LOOP

Line 2594: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);

2590: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2591: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
2592: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
2593:
2594: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
2595:
2596: LOOP
2597: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
2598: I := I + 1;

Line 2597: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN

2593:
2594: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
2595:
2596: LOOP
2597: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
2598: I := I + 1;
2599: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2600: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
2601: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);

Line 2599: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);

2595:
2596: LOOP
2597: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
2598: I := I + 1;
2599: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2600: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
2601: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
2602: INTERFACE_ID_TABLE(I) := X_INTERFACE_ID;
2603: SEGS_TABLE(I) := X_SEGS;

Line 2600: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);

2596: LOOP
2597: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
2598: I := I + 1;
2599: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2600: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
2601: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
2602: INTERFACE_ID_TABLE(I) := X_INTERFACE_ID;
2603: SEGS_TABLE(I) := X_SEGS;
2604: ORG_ID_TABLE(I) := X_ORG_ID;

Line 2601: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);

2597: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
2598: I := I + 1;
2599: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2600: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
2601: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
2602: INTERFACE_ID_TABLE(I) := X_INTERFACE_ID;
2603: SEGS_TABLE(I) := X_SEGS;
2604: ORG_ID_TABLE(I) := X_ORG_ID;
2605: ELSE

Line 2611: DBMS_SQL.CLOSE_CURSOR(SOURCE_CURSOR);

2607: END IF;
2608: END LOOP;
2609:
2610: NUM_ROWS := I;
2611: DBMS_SQL.CLOSE_CURSOR(SOURCE_CURSOR);
2612:
2613: FOR I IN 1..NUM_ROWS LOOP
2614: -- For Asset Activities, EAM_ITEM_TYPE is 2
2615: IF (COL_NAME LIKE 'ASSET_ACTIVITY') THEN

Line 2746: -- using DBMS_SQL.EXECUTE. This is for the SQL Bind Compliance Project.

2742: ID_FIELD := 'ROUTING_REFERENCE_ID';
2743: END IF;
2744:
2745: -- Bug 2941809. Need to use bind variables instead of literal values when
2746: -- using DBMS_SQL.EXECUTE. This is for the SQL Bind Compliance Project.
2747: -- kabalakr
2748:
2749: -- Bug 3136107.suramasw.
2750: -- Replaced :ERR_COL introduced in the version 115.63 by :ERROR_COL_NAME

Line 2766: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;

2762: 'WHERE QIE.TRANSACTION_INTERFACE_ID = ' ||
2763: 'QRI.TRANSACTION_INTERFACE_ID ' ||
2764: 'AND QIE.ERROR_COLUMN IN ( :ERROR_COL_NAME, NULL))';
2765:
2766: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
2767:
2768: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
2769:
2770: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);

Line 2768: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);

2764: 'AND QIE.ERROR_COLUMN IN ( :ERROR_COL_NAME, NULL))';
2765:
2766: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
2767:
2768: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
2769:
2770: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
2771: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
2772:

Line 2770: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);

2766: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
2767:
2768: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
2769:
2770: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
2771: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
2772:
2773: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2774: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);

Line 2771: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);

2767:
2768: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
2769:
2770: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
2771: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
2772:
2773: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2774: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
2775: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);

Line 2773: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);

2769:
2770: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
2771: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
2772:
2773: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2774: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
2775: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
2776: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_LINE_ID);
2777:

Line 2774: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);

2770: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
2771: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
2772:
2773: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2774: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
2775: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
2776: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_LINE_ID);
2777:
2778: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);

Line 2775: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);

2771: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
2772:
2773: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2774: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
2775: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
2776: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_LINE_ID);
2777:
2778: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
2779:

Line 2776: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_LINE_ID);

2772:
2773: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2774: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
2775: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
2776: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_LINE_ID);
2777:
2778: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
2779:
2780: LOOP

Line 2778: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);

2774: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
2775: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
2776: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_LINE_ID);
2777:
2778: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
2779:
2780: LOOP
2781: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
2782: I := I + 1;

Line 2781: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN

2777:
2778: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
2779:
2780: LOOP
2781: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
2782: I := I + 1;
2783: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2784: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
2785: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);

Line 2783: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);

2779:
2780: LOOP
2781: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
2782: I := I + 1;
2783: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2784: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
2785: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
2786: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_LINE_ID);
2787: INTERFACE_ID_TABLE(I) := X_INTERFACE_ID;

Line 2784: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);

2780: LOOP
2781: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
2782: I := I + 1;
2783: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2784: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
2785: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
2786: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_LINE_ID);
2787: INTERFACE_ID_TABLE(I) := X_INTERFACE_ID;
2788: SEGS_TABLE(I) := X_SEGS;

Line 2785: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);

2781: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
2782: I := I + 1;
2783: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2784: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
2785: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
2786: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_LINE_ID);
2787: INTERFACE_ID_TABLE(I) := X_INTERFACE_ID;
2788: SEGS_TABLE(I) := X_SEGS;
2789: ORG_ID_TABLE(I) := X_ORG_ID;

Line 2786: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_LINE_ID);

2782: I := I + 1;
2783: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2784: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
2785: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
2786: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_LINE_ID);
2787: INTERFACE_ID_TABLE(I) := X_INTERFACE_ID;
2788: SEGS_TABLE(I) := X_SEGS;
2789: ORG_ID_TABLE(I) := X_ORG_ID;
2790: LINE_ID_TABLE(I) := X_LINE_ID;

Line 2797: DBMS_SQL.CLOSE_CURSOR(SOURCE_CURSOR);

2793: END IF;
2794: END LOOP;
2795:
2796: NUM_ROWS := I;
2797: DBMS_SQL.CLOSE_CURSOR(SOURCE_CURSOR);
2798:
2799: FOR I IN 1..NUM_ROWS LOOP
2800:
2801: --IF (COL_NAME LIKE 'BILL_REFERENCE') OR (COL_NAME LIKE 'ROUTING_REFERENCE') THEN

Line 4359: CURSOR_HANDLE INTEGER := DBMS_SQL.OPEN_CURSOR;

4355: DATA_TABLE NUMBER_TABLE;
4356: QARES_ROW ROWID;
4357: STMT_OF_ROWIDS VARCHAR2(10000);
4358: MATCH_ERROR BOOLEAN;
4359: CURSOR_HANDLE INTEGER := DBMS_SQL.OPEN_CURSOR;
4360: IGNORE NUMBER;
4361: X_PLAN_NAME QA_PLANS.NAME%TYPE;
4362: MATCHING_ERROR EXCEPTION;
4363: NO_ROWIDS_ERROR EXCEPTION;

Line 4649: DBMS_SQL.PARSE(CURSOR_HANDLE, SELECT_STMT, DBMS_SQL.NATIVE);

4645:
4646: END IF;
4647: END LOOP;
4648:
4649: DBMS_SQL.PARSE(CURSOR_HANDLE, SELECT_STMT, DBMS_SQL.NATIVE);
4650: DBMS_SQL.DEFINE_COLUMN_ROWID(CURSOR_HANDLE, 1, QARES_ROW);
4651: DBMS_SQL.BIND_VARIABLE(CURSOR_HANDLE,'X_INTERFACE_ID',X_TRANSACTION_INTERFACE_ID);
4652: IGNORE := DBMS_SQL.EXECUTE(CURSOR_HANDLE);
4653: STMT_OF_ROWIDS := '(''';

Line 4650: DBMS_SQL.DEFINE_COLUMN_ROWID(CURSOR_HANDLE, 1, QARES_ROW);

4646: END IF;
4647: END LOOP;
4648:
4649: DBMS_SQL.PARSE(CURSOR_HANDLE, SELECT_STMT, DBMS_SQL.NATIVE);
4650: DBMS_SQL.DEFINE_COLUMN_ROWID(CURSOR_HANDLE, 1, QARES_ROW);
4651: DBMS_SQL.BIND_VARIABLE(CURSOR_HANDLE,'X_INTERFACE_ID',X_TRANSACTION_INTERFACE_ID);
4652: IGNORE := DBMS_SQL.EXECUTE(CURSOR_HANDLE);
4653: STMT_OF_ROWIDS := '(''';
4654: I := 0;

Line 4651: DBMS_SQL.BIND_VARIABLE(CURSOR_HANDLE,'X_INTERFACE_ID',X_TRANSACTION_INTERFACE_ID);

4647: END LOOP;
4648:
4649: DBMS_SQL.PARSE(CURSOR_HANDLE, SELECT_STMT, DBMS_SQL.NATIVE);
4650: DBMS_SQL.DEFINE_COLUMN_ROWID(CURSOR_HANDLE, 1, QARES_ROW);
4651: DBMS_SQL.BIND_VARIABLE(CURSOR_HANDLE,'X_INTERFACE_ID',X_TRANSACTION_INTERFACE_ID);
4652: IGNORE := DBMS_SQL.EXECUTE(CURSOR_HANDLE);
4653: STMT_OF_ROWIDS := '(''';
4654: I := 0;
4655: WHILE DBMS_SQL.FETCH_ROWS(CURSOR_HANDLE) > 0 LOOP

Line 4652: IGNORE := DBMS_SQL.EXECUTE(CURSOR_HANDLE);

4648:
4649: DBMS_SQL.PARSE(CURSOR_HANDLE, SELECT_STMT, DBMS_SQL.NATIVE);
4650: DBMS_SQL.DEFINE_COLUMN_ROWID(CURSOR_HANDLE, 1, QARES_ROW);
4651: DBMS_SQL.BIND_VARIABLE(CURSOR_HANDLE,'X_INTERFACE_ID',X_TRANSACTION_INTERFACE_ID);
4652: IGNORE := DBMS_SQL.EXECUTE(CURSOR_HANDLE);
4653: STMT_OF_ROWIDS := '(''';
4654: I := 0;
4655: WHILE DBMS_SQL.FETCH_ROWS(CURSOR_HANDLE) > 0 LOOP
4656: IF I > 0

Line 4655: WHILE DBMS_SQL.FETCH_ROWS(CURSOR_HANDLE) > 0 LOOP

4651: DBMS_SQL.BIND_VARIABLE(CURSOR_HANDLE,'X_INTERFACE_ID',X_TRANSACTION_INTERFACE_ID);
4652: IGNORE := DBMS_SQL.EXECUTE(CURSOR_HANDLE);
4653: STMT_OF_ROWIDS := '(''';
4654: I := 0;
4655: WHILE DBMS_SQL.FETCH_ROWS(CURSOR_HANDLE) > 0 LOOP
4656: IF I > 0
4657: THEN STMT_OF_ROWIDS := STMT_OF_ROWIDS ||''''||','||'''';
4658: END IF;
4659: I := I + 1;

Line 4660: DBMS_SQL.COLUMN_VALUE_ROWID(CURSOR_HANDLE, 1, QARES_ROW);

4656: IF I > 0
4657: THEN STMT_OF_ROWIDS := STMT_OF_ROWIDS ||''''||','||'''';
4658: END IF;
4659: I := I + 1;
4660: DBMS_SQL.COLUMN_VALUE_ROWID(CURSOR_HANDLE, 1, QARES_ROW);
4661: STMT_OF_ROWIDS := STMT_OF_ROWIDS || QARES_ROW;
4662: END LOOP;
4663: STMT_OF_ROWIDS := STMT_OF_ROWIDS || ''')';
4664: DBMS_SQL.CLOSE_CURSOR(CURSOR_HANDLE);

Line 4664: DBMS_SQL.CLOSE_CURSOR(CURSOR_HANDLE);

4660: DBMS_SQL.COLUMN_VALUE_ROWID(CURSOR_HANDLE, 1, QARES_ROW);
4661: STMT_OF_ROWIDS := STMT_OF_ROWIDS || QARES_ROW;
4662: END LOOP;
4663: STMT_OF_ROWIDS := STMT_OF_ROWIDS || ''')';
4664: DBMS_SQL.CLOSE_CURSOR(CURSOR_HANDLE);
4665:
4666: IF I = 0
4667: THEN RAISE NO_ROWIDS_ERROR;
4668: ELSIF I > 1

Line 7892: qri_update_str_tab DBMS_SQL.VARCHAR2S;

7888: null_num number := fnd_api.G_NULL_NUM;
7889: null_char varchar2(1) := fnd_api.G_NULL_char;
7890: null_date date := fnd_api.G_NULL_date;
7891:
7892: qri_update_str_tab DBMS_SQL.VARCHAR2S;
7893: update_qri_cur PLS_INTEGER;
7894: update_qri_status NUMBER;
7895:
7896: BEGIN

Line 7935: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;

7931: 'FROM QA_INTERFACE_ERRORS QIE ' ||
7932: 'WHERE QIE.TRANSACTION_INTERFACE_ID = ' ||
7933: 'QRI.TRANSACTION_INTERFACE_ID )';
7934:
7935: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
7936: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
7937:
7938: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
7939:

Line 7936: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);

7932: 'WHERE QIE.TRANSACTION_INTERFACE_ID = ' ||
7933: 'QRI.TRANSACTION_INTERFACE_ID )';
7934:
7935: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
7936: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
7937:
7938: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
7939:
7940: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);

Line 7938: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);

7934:
7935: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
7936: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
7937:
7938: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
7939:
7940: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
7941: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
7942:

Line 7940: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);

7936: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
7937:
7938: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
7939:
7940: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
7941: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
7942:
7943: LOOP
7944: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN

Line 7941: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);

7937:
7938: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
7939:
7940: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
7941: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
7942:
7943: LOOP
7944: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
7945: K := K + 1;

Line 7944: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN

7940: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
7941: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
7942:
7943: LOOP
7944: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
7945: K := K + 1;
7946: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
7947: INTERFACE_ID_TABLE(K) := X_INTERFACE_ID;
7948: ELSE

Line 7946: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);

7942:
7943: LOOP
7944: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
7945: K := K + 1;
7946: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
7947: INTERFACE_ID_TABLE(K) := X_INTERFACE_ID;
7948: ELSE
7949: EXIT;
7950: END IF;

Line 8136: update_qri_cur := DBMS_SQL.OPEN_CURSOR;

8132: END LOOP;
8133:
8134: qri_update_str_tab(NVL(qri_update_str_tab.LAST, 0)+1) := ' where ROWID = :BIND_ROWID';
8135:
8136: update_qri_cur := DBMS_SQL.OPEN_CURSOR;
8137: DBMS_SQL.PARSE(update_qri_cur, qri_update_str_tab, qri_update_str_tab.FIRST, qri_update_str_tab.LAST, TRUE, DBMS_SQL.NATIVE);
8138: DBMS_SQL.BIND_VARIABLE( update_qri_cur, ':null_num' , null_num );
8139: DBMS_SQL.BIND_VARIABLE( update_qri_cur, ':null_char', null_char );
8140: DBMS_SQL.BIND_VARIABLE( update_qri_cur, ':null_date', null_date );

Line 8137: DBMS_SQL.PARSE(update_qri_cur, qri_update_str_tab, qri_update_str_tab.FIRST, qri_update_str_tab.LAST, TRUE, DBMS_SQL.NATIVE);

8133:
8134: qri_update_str_tab(NVL(qri_update_str_tab.LAST, 0)+1) := ' where ROWID = :BIND_ROWID';
8135:
8136: update_qri_cur := DBMS_SQL.OPEN_CURSOR;
8137: DBMS_SQL.PARSE(update_qri_cur, qri_update_str_tab, qri_update_str_tab.FIRST, qri_update_str_tab.LAST, TRUE, DBMS_SQL.NATIVE);
8138: DBMS_SQL.BIND_VARIABLE( update_qri_cur, ':null_num' , null_num );
8139: DBMS_SQL.BIND_VARIABLE( update_qri_cur, ':null_char', null_char );
8140: DBMS_SQL.BIND_VARIABLE( update_qri_cur, ':null_date', null_date );
8141: DBMS_SQL.BIND_VARIABLE( update_qri_cur, ':BIND_ROWID', L_ROWID );

Line 8138: DBMS_SQL.BIND_VARIABLE( update_qri_cur, ':null_num' , null_num );

8134: qri_update_str_tab(NVL(qri_update_str_tab.LAST, 0)+1) := ' where ROWID = :BIND_ROWID';
8135:
8136: update_qri_cur := DBMS_SQL.OPEN_CURSOR;
8137: DBMS_SQL.PARSE(update_qri_cur, qri_update_str_tab, qri_update_str_tab.FIRST, qri_update_str_tab.LAST, TRUE, DBMS_SQL.NATIVE);
8138: DBMS_SQL.BIND_VARIABLE( update_qri_cur, ':null_num' , null_num );
8139: DBMS_SQL.BIND_VARIABLE( update_qri_cur, ':null_char', null_char );
8140: DBMS_SQL.BIND_VARIABLE( update_qri_cur, ':null_date', null_date );
8141: DBMS_SQL.BIND_VARIABLE( update_qri_cur, ':BIND_ROWID', L_ROWID );
8142: update_qri_status := DBMS_SQL.EXECUTE( update_qri_cur );

Line 8139: DBMS_SQL.BIND_VARIABLE( update_qri_cur, ':null_char', null_char );

8135:
8136: update_qri_cur := DBMS_SQL.OPEN_CURSOR;
8137: DBMS_SQL.PARSE(update_qri_cur, qri_update_str_tab, qri_update_str_tab.FIRST, qri_update_str_tab.LAST, TRUE, DBMS_SQL.NATIVE);
8138: DBMS_SQL.BIND_VARIABLE( update_qri_cur, ':null_num' , null_num );
8139: DBMS_SQL.BIND_VARIABLE( update_qri_cur, ':null_char', null_char );
8140: DBMS_SQL.BIND_VARIABLE( update_qri_cur, ':null_date', null_date );
8141: DBMS_SQL.BIND_VARIABLE( update_qri_cur, ':BIND_ROWID', L_ROWID );
8142: update_qri_status := DBMS_SQL.EXECUTE( update_qri_cur );
8143: DBMS_SQL.CLOSE_CURSOR(update_qri_cur);

Line 8140: DBMS_SQL.BIND_VARIABLE( update_qri_cur, ':null_date', null_date );

8136: update_qri_cur := DBMS_SQL.OPEN_CURSOR;
8137: DBMS_SQL.PARSE(update_qri_cur, qri_update_str_tab, qri_update_str_tab.FIRST, qri_update_str_tab.LAST, TRUE, DBMS_SQL.NATIVE);
8138: DBMS_SQL.BIND_VARIABLE( update_qri_cur, ':null_num' , null_num );
8139: DBMS_SQL.BIND_VARIABLE( update_qri_cur, ':null_char', null_char );
8140: DBMS_SQL.BIND_VARIABLE( update_qri_cur, ':null_date', null_date );
8141: DBMS_SQL.BIND_VARIABLE( update_qri_cur, ':BIND_ROWID', L_ROWID );
8142: update_qri_status := DBMS_SQL.EXECUTE( update_qri_cur );
8143: DBMS_SQL.CLOSE_CURSOR(update_qri_cur);
8144: END IF;

Line 8141: DBMS_SQL.BIND_VARIABLE( update_qri_cur, ':BIND_ROWID', L_ROWID );

8137: DBMS_SQL.PARSE(update_qri_cur, qri_update_str_tab, qri_update_str_tab.FIRST, qri_update_str_tab.LAST, TRUE, DBMS_SQL.NATIVE);
8138: DBMS_SQL.BIND_VARIABLE( update_qri_cur, ':null_num' , null_num );
8139: DBMS_SQL.BIND_VARIABLE( update_qri_cur, ':null_char', null_char );
8140: DBMS_SQL.BIND_VARIABLE( update_qri_cur, ':null_date', null_date );
8141: DBMS_SQL.BIND_VARIABLE( update_qri_cur, ':BIND_ROWID', L_ROWID );
8142: update_qri_status := DBMS_SQL.EXECUTE( update_qri_cur );
8143: DBMS_SQL.CLOSE_CURSOR(update_qri_cur);
8144: END IF;
8145:

Line 8142: update_qri_status := DBMS_SQL.EXECUTE( update_qri_cur );

8138: DBMS_SQL.BIND_VARIABLE( update_qri_cur, ':null_num' , null_num );
8139: DBMS_SQL.BIND_VARIABLE( update_qri_cur, ':null_char', null_char );
8140: DBMS_SQL.BIND_VARIABLE( update_qri_cur, ':null_date', null_date );
8141: DBMS_SQL.BIND_VARIABLE( update_qri_cur, ':BIND_ROWID', L_ROWID );
8142: update_qri_status := DBMS_SQL.EXECUTE( update_qri_cur );
8143: DBMS_SQL.CLOSE_CURSOR(update_qri_cur);
8144: END IF;
8145:
8146:

Line 8143: DBMS_SQL.CLOSE_CURSOR(update_qri_cur);

8139: DBMS_SQL.BIND_VARIABLE( update_qri_cur, ':null_char', null_char );
8140: DBMS_SQL.BIND_VARIABLE( update_qri_cur, ':null_date', null_date );
8141: DBMS_SQL.BIND_VARIABLE( update_qri_cur, ':BIND_ROWID', L_ROWID );
8142: update_qri_status := DBMS_SQL.EXECUTE( update_qri_cur );
8143: DBMS_SQL.CLOSE_CURSOR(update_qri_cur);
8144: END IF;
8145:
8146:
8147: -- QLTTRAFB.EXEC_SQL(SQL_STATEMENT);

Line 8413: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;

8409: 'WHERE QIE.TRANSACTION_INTERFACE_ID = ' ||
8410: 'QRI.TRANSACTION_INTERFACE_ID )';
8411:
8412:
8413: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
8414: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
8415:
8416: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
8417:

Line 8414: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);

8410: 'QRI.TRANSACTION_INTERFACE_ID )';
8411:
8412:
8413: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
8414: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
8415:
8416: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
8417:
8418: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);

Line 8416: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);

8412:
8413: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
8414: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
8415:
8416: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
8417:
8418: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
8419: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
8420:

Line 8418: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);

8414: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
8415:
8416: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
8417:
8418: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
8419: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
8420:
8421: LOOP
8422: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN

Line 8419: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);

8415:
8416: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
8417:
8418: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
8419: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
8420:
8421: LOOP
8422: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
8423: K := K + 1;

Line 8422: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN

8418: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
8419: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
8420:
8421: LOOP
8422: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
8423: K := K + 1;
8424: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
8425: INTERFACE_ID_TABLE(K) := X_INTERFACE_ID;
8426: ELSE

Line 8424: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);

8420:
8421: LOOP
8422: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
8423: K := K + 1;
8424: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
8425: INTERFACE_ID_TABLE(K) := X_INTERFACE_ID;
8426: ELSE
8427: EXIT;
8428: END IF;

Line 8431: DBMS_SQL.CLOSE_CURSOR(SOURCE_CURSOR);

8427: EXIT;
8428: END IF;
8429: END LOOP;
8430: NUM_ROWS := K ;
8431: DBMS_SQL.CLOSE_CURSOR(SOURCE_CURSOR);
8432:
8433: -- Before we update, make sure that all the variables are initialized.
8434: -- Exceptions can rise, if its not done.
8435: