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 1237: -- using DBMS_SQL.EXECUTE. This is for the SQL Bind Compliance Project.

1233: BEGIN
1234: I := 0;
1235:
1236: -- Bug 2941809. Need to use bind variables instead of literal values when
1237: -- using DBMS_SQL.EXECUTE. This is for the SQL Bind Compliance Project.
1238: -- kabalakr
1239:
1240: -- Bug 3136107.suramasw
1241: -- Replaced :ERR_COL introduced in the version 115.63 by :ERROR_COL_NAME

Line 1256: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;

1252: 'WHERE QIE.TRANSACTION_INTERFACE_ID = ' ||
1253: 'QRI.TRANSACTION_INTERFACE_ID ' ||
1254: 'AND QIE.ERROR_COLUMN IN ( :ERROR_COL_NAME, NULL))';
1255:
1256: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
1257: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
1258:
1259: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
1260: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);

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

1253: 'QRI.TRANSACTION_INTERFACE_ID ' ||
1254: 'AND QIE.ERROR_COLUMN IN ( :ERROR_COL_NAME, NULL))';
1255:
1256: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
1257: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
1258:
1259: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
1260: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
1261:

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

1255:
1256: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
1257: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
1258:
1259: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
1260: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
1261:
1262: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1263: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_CHARACTERX, 150);

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

1256: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
1257: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
1258:
1259: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
1260: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
1261:
1262: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1263: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_CHARACTERX, 150);
1264:

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

1258:
1259: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
1260: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
1261:
1262: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1263: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_CHARACTERX, 150);
1264:
1265: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
1266:

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

1259: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
1260: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
1261:
1262: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1263: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_CHARACTERX, 150);
1264:
1265: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
1266:
1267: LOOP

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

1261:
1262: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1263: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_CHARACTERX, 150);
1264:
1265: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
1266:
1267: LOOP
1268: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
1269: I := I + 1;

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

1264:
1265: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
1266:
1267: LOOP
1268: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
1269: I := I + 1;
1270: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1271: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_CHARACTERX);
1272: INTERFACE_ID_TABLE(I) := X_INTERFACE_ID;

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

1266:
1267: LOOP
1268: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
1269: I := I + 1;
1270: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1271: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_CHARACTERX);
1272: INTERFACE_ID_TABLE(I) := X_INTERFACE_ID;
1273: VALUE_TABLE(I) := X_CHARACTERX;
1274: ELSE

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

1267: LOOP
1268: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
1269: I := I + 1;
1270: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1271: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_CHARACTERX);
1272: INTERFACE_ID_TABLE(I) := X_INTERFACE_ID;
1273: VALUE_TABLE(I) := X_CHARACTERX;
1274: ELSE
1275: EXIT;

Line 1280: DBMS_SQL.CLOSE_CURSOR(SOURCE_CURSOR);

1276: END IF;
1277: END LOOP;
1278:
1279: NUM_ROWS := I;
1280: DBMS_SQL.CLOSE_CURSOR(SOURCE_CURSOR);
1281:
1282: IF (X_DATATYPE = 2) THEN
1283: ERRMSG := ERROR_INVALID_NUMBER;
1284: ELSIF (X_DATATYPE = 3) THEN

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

1466: ID_FIELD := 'LOCATOR_ID';
1467: END IF;
1468:
1469: -- Bug 2941809. Need to use bind variables instead of literal values when
1470: -- using DBMS_SQL.EXECUTE. This is for the SQL Bind Compliance Project.
1471: -- kabalakr
1472:
1473: -- Bug 3136107.suramasw.
1474: -- Replaced :ERR_COL introduced in the version 115.63 by :ERROR_COL_NAME

Line 1500: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;

1496: 'QRI.TRANSACTION_INTERFACE_ID ' ||
1497: 'AND QIE.ERROR_COLUMN IN ( :ERROR_COL_NAME, NULL)) '||
1498: ' AND QRI.ORGANIZATION_ID = MP.ORGANIZATION_ID';
1499:
1500: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
1501: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
1502:
1503: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
1504: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);

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

1497: 'AND QIE.ERROR_COLUMN IN ( :ERROR_COL_NAME, NULL)) '||
1498: ' AND QRI.ORGANIZATION_ID = MP.ORGANIZATION_ID';
1499:
1500: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
1501: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
1502:
1503: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
1504: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
1505:

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

1499:
1500: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
1501: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
1502:
1503: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
1504: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
1505:
1506: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1507: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);

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

1500: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
1501: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
1502:
1503: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
1504: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
1505:
1506: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1507: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
1508: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);

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

1502:
1503: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
1504: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
1505:
1506: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1507: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
1508: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
1509: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_SUB_LOC_TYPE);
1510: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);

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

1503: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
1504: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
1505:
1506: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1507: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
1508: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
1509: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_SUB_LOC_TYPE);
1510: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1511: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);

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

1504: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
1505:
1506: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1507: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
1508: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
1509: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_SUB_LOC_TYPE);
1510: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1511: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1512: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 7, X_SUBINV, 10);

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

1505:
1506: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1507: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
1508: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
1509: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_SUB_LOC_TYPE);
1510: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1511: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1512: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 7, X_SUBINV, 10);
1513: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);

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

1506: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1507: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
1508: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
1509: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_SUB_LOC_TYPE);
1510: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1511: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1512: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 7, X_SUBINV, 10);
1513: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1514: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 9, X_NEG_INV);

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

1507: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
1508: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
1509: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_SUB_LOC_TYPE);
1510: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1511: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1512: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 7, X_SUBINV, 10);
1513: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1514: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 9, X_NEG_INV);
1515: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 10, X_ITEM_ID);

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

1508: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
1509: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_SUB_LOC_TYPE);
1510: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1511: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1512: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 7, X_SUBINV, 10);
1513: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1514: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 9, X_NEG_INV);
1515: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 10, X_ITEM_ID);
1516:

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

1509: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_SUB_LOC_TYPE);
1510: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1511: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1512: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 7, X_SUBINV, 10);
1513: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1514: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 9, X_NEG_INV);
1515: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 10, X_ITEM_ID);
1516:
1517: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);

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

1510: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1511: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1512: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 7, X_SUBINV, 10);
1513: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1514: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 9, X_NEG_INV);
1515: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 10, X_ITEM_ID);
1516:
1517: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
1518:

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

1511: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1512: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 7, X_SUBINV, 10);
1513: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1514: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 9, X_NEG_INV);
1515: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 10, X_ITEM_ID);
1516:
1517: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
1518:
1519: LOOP

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

1513: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1514: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 9, X_NEG_INV);
1515: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 10, X_ITEM_ID);
1516:
1517: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
1518:
1519: LOOP
1520: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
1521: I := I + 1;

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

1516:
1517: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
1518:
1519: LOOP
1520: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
1521: I := I + 1;
1522: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1523: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
1524: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);

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

1518:
1519: LOOP
1520: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
1521: I := I + 1;
1522: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1523: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
1524: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
1525: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_SUB_LOC_TYPE);
1526: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);

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

1519: LOOP
1520: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
1521: I := I + 1;
1522: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1523: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
1524: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
1525: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_SUB_LOC_TYPE);
1526: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1527: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);

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

1520: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
1521: I := I + 1;
1522: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1523: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
1524: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
1525: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_SUB_LOC_TYPE);
1526: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1527: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1528: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 7, X_SUBINV);

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

1521: I := I + 1;
1522: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1523: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
1524: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
1525: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_SUB_LOC_TYPE);
1526: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1527: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1528: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 7, X_SUBINV);
1529: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);

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

1522: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1523: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
1524: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
1525: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_SUB_LOC_TYPE);
1526: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1527: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1528: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 7, X_SUBINV);
1529: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1530: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 9, X_NEG_INV);

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

1523: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
1524: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
1525: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_SUB_LOC_TYPE);
1526: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1527: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1528: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 7, X_SUBINV);
1529: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1530: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 9, X_NEG_INV);
1531: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 10, X_ITEM_ID);

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

1524: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
1525: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_SUB_LOC_TYPE);
1526: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1527: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1528: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 7, X_SUBINV);
1529: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1530: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 9, X_NEG_INV);
1531: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 10, X_ITEM_ID);
1532:

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

1525: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_SUB_LOC_TYPE);
1526: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1527: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1528: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 7, X_SUBINV);
1529: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1530: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 9, X_NEG_INV);
1531: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 10, X_ITEM_ID);
1532:
1533: INTERFACE_ID_TABLE(I) := X_INTERFACE_ID;

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

1526: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1527: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1528: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 7, X_SUBINV);
1529: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1530: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 9, X_NEG_INV);
1531: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 10, X_ITEM_ID);
1532:
1533: INTERFACE_ID_TABLE(I) := X_INTERFACE_ID;
1534: SEGS_TABLE(I) := X_SEGS;

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

1527: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1528: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 7, X_SUBINV);
1529: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1530: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 9, X_NEG_INV);
1531: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 10, X_ITEM_ID);
1532:
1533: INTERFACE_ID_TABLE(I) := X_INTERFACE_ID;
1534: SEGS_TABLE(I) := X_SEGS;
1535: ORG_ID_TABLE(I) := X_ORG_ID;

Line 1550: DBMS_SQL.CLOSE_CURSOR(SOURCE_CURSOR);

1546: END LOOP;
1547:
1548:
1549: NUM_ROWS := I;
1550: DBMS_SQL.CLOSE_CURSOR(SOURCE_CURSOR);
1551:
1552: FOR I IN 1..NUM_ROWS LOOP
1553: GEN_LOC_CTRL_TABLE(I) := QLTINVCB.CONTROL(
1554: ORG_CONTROL=>ORG_LOC_CTRL_TABLE(I),

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

1791: -- Bug 3136107.SQL Bind project.
1792: parse_error_columns(error_col_list, l_col1, l_col2, l_col3, l_col4, l_col5);
1793:
1794: -- Bug 2941809. Need to use bind variables instead of literal values when
1795: -- using DBMS_SQL.EXECUTE. This is for the SQL Bind Compliance Project.
1796: -- kabalakr
1797:
1798: -- Bug 3136107.suramasw.
1799: -- Replaced :ERR_COL introduced in the version 115.63 by :ERROR_COL_NAME

Line 1826: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;

1822: 'AND QIE.ERROR_COLUMN IN ( :ERROR_COL_NAME, NULL))' ||
1823: ' AND QRI.ORGANIZATION_ID = MP.ORGANIZATION_ID';
1824:
1825:
1826: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
1827: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
1828:
1829: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
1830: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);

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

1823: ' AND QRI.ORGANIZATION_ID = MP.ORGANIZATION_ID';
1824:
1825:
1826: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
1827: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
1828:
1829: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
1830: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
1831:

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

1825:
1826: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
1827: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
1828:
1829: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
1830: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
1831:
1832: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1833: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);

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

1826: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
1827: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
1828:
1829: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
1830: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
1831:
1832: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1833: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
1834: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);

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

1828:
1829: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
1830: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
1831:
1832: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1833: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
1834: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
1835: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_TO_SUB_LOC_TYPE);
1836: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);

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

1829: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
1830: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
1831:
1832: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1833: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
1834: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
1835: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_TO_SUB_LOC_TYPE);
1836: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1837: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);

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

1830: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
1831:
1832: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1833: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
1834: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
1835: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_TO_SUB_LOC_TYPE);
1836: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1837: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1838: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 7, X_TO_SUBINV, 10);

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

1831:
1832: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1833: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
1834: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
1835: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_TO_SUB_LOC_TYPE);
1836: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1837: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1838: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 7, X_TO_SUBINV, 10);
1839: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);

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

1832: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1833: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
1834: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
1835: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_TO_SUB_LOC_TYPE);
1836: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1837: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1838: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 7, X_TO_SUBINV, 10);
1839: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1840: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 9, X_NEG_INV);

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

1833: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
1834: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
1835: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_TO_SUB_LOC_TYPE);
1836: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1837: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1838: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 7, X_TO_SUBINV, 10);
1839: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1840: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 9, X_NEG_INV);
1841: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 10, X_ITEM_ID);

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

1834: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
1835: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_TO_SUB_LOC_TYPE);
1836: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1837: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1838: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 7, X_TO_SUBINV, 10);
1839: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1840: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 9, X_NEG_INV);
1841: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 10, X_ITEM_ID);
1842:

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

1835: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_TO_SUB_LOC_TYPE);
1836: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1837: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1838: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 7, X_TO_SUBINV, 10);
1839: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1840: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 9, X_NEG_INV);
1841: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 10, X_ITEM_ID);
1842:
1843: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);

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

1836: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1837: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1838: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 7, X_TO_SUBINV, 10);
1839: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1840: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 9, X_NEG_INV);
1841: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 10, X_ITEM_ID);
1842:
1843: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
1844:

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

1837: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1838: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 7, X_TO_SUBINV, 10);
1839: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1840: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 9, X_NEG_INV);
1841: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 10, X_ITEM_ID);
1842:
1843: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
1844:
1845: LOOP

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

1839: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1840: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 9, X_NEG_INV);
1841: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 10, X_ITEM_ID);
1842:
1843: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
1844:
1845: LOOP
1846: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
1847: I := I + 1;

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

1842:
1843: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
1844:
1845: LOOP
1846: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
1847: I := I + 1;
1848: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1849: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
1850: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);

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

1844:
1845: LOOP
1846: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
1847: I := I + 1;
1848: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1849: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
1850: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
1851: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_TO_SUB_LOC_TYPE);
1852: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);

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

1845: LOOP
1846: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
1847: I := I + 1;
1848: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1849: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
1850: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
1851: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_TO_SUB_LOC_TYPE);
1852: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1853: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);

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

1846: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
1847: I := I + 1;
1848: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1849: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
1850: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
1851: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_TO_SUB_LOC_TYPE);
1852: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1853: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1854: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 7, X_TO_SUBINV);

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

1847: I := I + 1;
1848: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1849: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
1850: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
1851: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_TO_SUB_LOC_TYPE);
1852: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1853: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1854: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 7, X_TO_SUBINV);
1855: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);

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

1848: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
1849: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
1850: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
1851: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_TO_SUB_LOC_TYPE);
1852: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1853: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1854: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 7, X_TO_SUBINV);
1855: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1856: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 9, X_NEG_INV);

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

1849: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
1850: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
1851: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_TO_SUB_LOC_TYPE);
1852: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1853: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1854: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 7, X_TO_SUBINV);
1855: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1856: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 9, X_NEG_INV);
1857: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 10, X_ITEM_ID);

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

1850: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
1851: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_TO_SUB_LOC_TYPE);
1852: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1853: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1854: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 7, X_TO_SUBINV);
1855: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1856: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 9, X_NEG_INV);
1857: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 10, X_ITEM_ID);
1858:

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

1851: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_TO_SUB_LOC_TYPE);
1852: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1853: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1854: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 7, X_TO_SUBINV);
1855: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1856: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 9, X_NEG_INV);
1857: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 10, X_ITEM_ID);
1858:
1859: INTERFACE_ID_TABLE(I) := X_INTERFACE_ID;

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

1852: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 5, X_LOC_CTRL_CODE);
1853: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1854: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 7, X_TO_SUBINV);
1855: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1856: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 9, X_NEG_INV);
1857: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 10, X_ITEM_ID);
1858:
1859: INTERFACE_ID_TABLE(I) := X_INTERFACE_ID;
1860: SEGS_TABLE(I) := X_SEGS;

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

1853: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 6, X_RESTRICT_LOC_CODE);
1854: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 7, X_TO_SUBINV);
1855: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 8, X_ORG_LOC_CTRL);
1856: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 9, X_NEG_INV);
1857: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 10, X_ITEM_ID);
1858:
1859: INTERFACE_ID_TABLE(I) := X_INTERFACE_ID;
1860: SEGS_TABLE(I) := X_SEGS;
1861: ORG_ID_TABLE(I) := X_ORG_ID;

Line 1874: DBMS_SQL.CLOSE_CURSOR(SOURCE_CURSOR);

1870: EXIT;
1871: END IF;
1872: END LOOP;
1873: NUM_ROWS := I;
1874: DBMS_SQL.CLOSE_CURSOR(SOURCE_CURSOR);
1875:
1876: FOR I IN 1..NUM_ROWS LOOP
1877: GEN_LOC_CTRL_TABLE(I) := QLTINVCB.CONTROL(
1878: ORG_CONTROL=>ORG_LOC_CTRL_TABLE(I),

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

2141:
2142: END IF;
2143:
2144: -- Bug 2941809. Need to use bind variables instead of literal values when
2145: -- using DBMS_SQL.EXECUTE. This is for the SQL Bind Compliance Project.
2146: -- kabalakr
2147:
2148: -- Bug 3136107.suramasw.
2149: -- Replaced :ERR_COL introduced in the version 115.63 by :ERROR_COL_NAME

Line 2165: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;

2161: 'WHERE QIE.TRANSACTION_INTERFACE_ID = ' ||
2162: 'QRI.TRANSACTION_INTERFACE_ID ' ||
2163: 'AND QIE.ERROR_COLUMN IN ( :ERROR_COL_NAME, NULL))';
2164:
2165: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
2166: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
2167:
2168: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
2169: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);

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

2162: 'QRI.TRANSACTION_INTERFACE_ID ' ||
2163: 'AND QIE.ERROR_COLUMN IN ( :ERROR_COL_NAME, NULL))';
2164:
2165: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
2166: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
2167:
2168: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
2169: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
2170:

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

2164:
2165: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
2166: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
2167:
2168: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
2169: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
2170:
2171: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2172: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);

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

2165: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
2166: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
2167:
2168: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
2169: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
2170:
2171: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2172: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
2173: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);

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

2167:
2168: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
2169: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
2170:
2171: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2172: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
2173: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
2174: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_LINE_ID);
2175:

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

2168: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
2169: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
2170:
2171: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2172: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
2173: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
2174: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_LINE_ID);
2175:
2176: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);

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

2169: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
2170:
2171: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2172: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
2173: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
2174: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_LINE_ID);
2175:
2176: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
2177:

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

2170:
2171: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2172: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
2173: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
2174: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_LINE_ID);
2175:
2176: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
2177:
2178: LOOP

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

2172: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
2173: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
2174: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_LINE_ID);
2175:
2176: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
2177:
2178: LOOP
2179: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
2180: I := I + 1;

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

2175:
2176: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
2177:
2178: LOOP
2179: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
2180: I := I + 1;
2181: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2182: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
2183: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);

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

2177:
2178: LOOP
2179: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
2180: I := I + 1;
2181: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2182: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
2183: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
2184: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_LINE_ID);
2185: INTERFACE_ID_TABLE(I) := X_INTERFACE_ID;

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

2178: LOOP
2179: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
2180: I := I + 1;
2181: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2182: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
2183: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
2184: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_LINE_ID);
2185: INTERFACE_ID_TABLE(I) := X_INTERFACE_ID;
2186: SEGS_TABLE(I) := X_SEGS;

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

2179: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
2180: I := I + 1;
2181: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2182: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
2183: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
2184: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_LINE_ID);
2185: INTERFACE_ID_TABLE(I) := X_INTERFACE_ID;
2186: SEGS_TABLE(I) := X_SEGS;
2187: ORG_ID_TABLE(I) := X_ORG_ID;

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

2180: I := I + 1;
2181: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2182: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
2183: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
2184: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 4, X_LINE_ID);
2185: INTERFACE_ID_TABLE(I) := X_INTERFACE_ID;
2186: SEGS_TABLE(I) := X_SEGS;
2187: ORG_ID_TABLE(I) := X_ORG_ID;
2188: LINE_ID_TABLE(I) := X_LINE_ID;

Line 2195: DBMS_SQL.CLOSE_CURSOR(SOURCE_CURSOR);

2191: END IF;
2192: END LOOP;
2193:
2194: NUM_ROWS := I;
2195: DBMS_SQL.CLOSE_CURSOR(SOURCE_CURSOR);
2196:
2197: -- Added the UNION condition in the X_WHERE_CLAUSE below to
2198: -- validate Flow Items associated with Production Line.
2199: -- Bug 2791447.suramasw.Tue Feb 11 00:06:05 PST 2003

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

2459: ID_FIELD := 'FOLLOWUP_ACTIVITY_ID';
2460: END IF;
2461:
2462: -- Bug 2941809. Need to use bind variables instead of literal values when
2463: -- using DBMS_SQL.EXECUTE. This is for the SQL Bind Compliance Project.
2464: -- kabalakr
2465:
2466: -- Bug 3136107.suramasw.
2467: -- Replaced :ERR_COL introduced in the version 115.63 by :ERROR_COL_NAME

Line 2483: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;

2479: 'WHERE QIE.TRANSACTION_INTERFACE_ID = ' ||
2480: 'QRI.TRANSACTION_INTERFACE_ID ' ||
2481: 'AND QIE.ERROR_COLUMN IN ( :ERROR_COL_NAME, NULL)) ';
2482:
2483: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
2484:
2485: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
2486:
2487: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);

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

2481: 'AND QIE.ERROR_COLUMN IN ( :ERROR_COL_NAME, NULL)) ';
2482:
2483: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
2484:
2485: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
2486:
2487: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
2488: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
2489:

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

2483: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
2484:
2485: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
2486:
2487: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
2488: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
2489:
2490: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2491: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);

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

2484:
2485: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
2486:
2487: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
2488: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
2489:
2490: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2491: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
2492: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);

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

2486:
2487: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
2488: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
2489:
2490: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2491: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
2492: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
2493:
2494: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);

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

2487: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
2488: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
2489:
2490: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2491: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
2492: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
2493:
2494: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
2495:

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

2488: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
2489:
2490: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2491: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
2492: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
2493:
2494: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
2495:
2496: LOOP

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

2490: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2491: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
2492: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
2493:
2494: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
2495:
2496: LOOP
2497: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
2498: I := I + 1;

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

2493:
2494: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
2495:
2496: LOOP
2497: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
2498: I := I + 1;
2499: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2500: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
2501: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);

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

2495:
2496: LOOP
2497: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
2498: I := I + 1;
2499: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2500: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
2501: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
2502: INTERFACE_ID_TABLE(I) := X_INTERFACE_ID;
2503: SEGS_TABLE(I) := X_SEGS;

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

2496: LOOP
2497: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
2498: I := I + 1;
2499: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2500: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
2501: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
2502: INTERFACE_ID_TABLE(I) := X_INTERFACE_ID;
2503: SEGS_TABLE(I) := X_SEGS;
2504: ORG_ID_TABLE(I) := X_ORG_ID;

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

2497: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
2498: I := I + 1;
2499: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2500: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
2501: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
2502: INTERFACE_ID_TABLE(I) := X_INTERFACE_ID;
2503: SEGS_TABLE(I) := X_SEGS;
2504: ORG_ID_TABLE(I) := X_ORG_ID;
2505: ELSE

Line 2511: DBMS_SQL.CLOSE_CURSOR(SOURCE_CURSOR);

2507: END IF;
2508: END LOOP;
2509:
2510: NUM_ROWS := I;
2511: DBMS_SQL.CLOSE_CURSOR(SOURCE_CURSOR);
2512:
2513: FOR I IN 1..NUM_ROWS LOOP
2514: -- For Asset Activities, EAM_ITEM_TYPE is 2
2515: IF (COL_NAME LIKE 'ASSET_ACTIVITY') THEN

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

2638: ID_FIELD := 'ROUTING_REFERENCE_ID';
2639: END IF;
2640:
2641: -- Bug 2941809. Need to use bind variables instead of literal values when
2642: -- using DBMS_SQL.EXECUTE. This is for the SQL Bind Compliance Project.
2643: -- kabalakr
2644:
2645: -- Bug 3136107.suramasw.
2646: -- Replaced :ERR_COL introduced in the version 115.63 by :ERROR_COL_NAME

Line 2662: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;

2658: 'WHERE QIE.TRANSACTION_INTERFACE_ID = ' ||
2659: 'QRI.TRANSACTION_INTERFACE_ID ' ||
2660: 'AND QIE.ERROR_COLUMN IN ( :ERROR_COL_NAME, NULL))';
2661:
2662: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
2663:
2664: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
2665:
2666: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);

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

2660: 'AND QIE.ERROR_COLUMN IN ( :ERROR_COL_NAME, NULL))';
2661:
2662: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
2663:
2664: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
2665:
2666: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
2667: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
2668:

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

2662: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
2663:
2664: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
2665:
2666: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
2667: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
2668:
2669: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2670: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);

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

2663:
2664: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
2665:
2666: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
2667: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
2668:
2669: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2670: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
2671: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);

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

2665:
2666: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
2667: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
2668:
2669: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2670: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
2671: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
2672: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_LINE_ID);
2673:

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

2666: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
2667: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
2668:
2669: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2670: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
2671: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
2672: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_LINE_ID);
2673:
2674: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);

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

2667: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':ERROR_COL_NAME', ERROR_COL_NAME);
2668:
2669: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2670: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
2671: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
2672: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_LINE_ID);
2673:
2674: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
2675:

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

2668:
2669: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2670: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
2671: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
2672: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_LINE_ID);
2673:
2674: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
2675:
2676: LOOP

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

2670: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 2, X_SEGS, 2000);
2671: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 3, X_ORG_ID);
2672: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_LINE_ID);
2673:
2674: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
2675:
2676: LOOP
2677: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
2678: I := I + 1;

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

2673:
2674: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
2675:
2676: LOOP
2677: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
2678: I := I + 1;
2679: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2680: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
2681: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);

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

2675:
2676: LOOP
2677: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
2678: I := I + 1;
2679: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2680: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
2681: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
2682: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_LINE_ID);
2683: INTERFACE_ID_TABLE(I) := X_INTERFACE_ID;

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

2676: LOOP
2677: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
2678: I := I + 1;
2679: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2680: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
2681: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
2682: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_LINE_ID);
2683: INTERFACE_ID_TABLE(I) := X_INTERFACE_ID;
2684: SEGS_TABLE(I) := X_SEGS;

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

2677: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
2678: I := I + 1;
2679: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2680: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
2681: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
2682: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_LINE_ID);
2683: INTERFACE_ID_TABLE(I) := X_INTERFACE_ID;
2684: SEGS_TABLE(I) := X_SEGS;
2685: ORG_ID_TABLE(I) := X_ORG_ID;

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

2678: I := I + 1;
2679: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
2680: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 2, X_SEGS);
2681: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 3, X_ORG_ID);
2682: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 4, X_LINE_ID);
2683: INTERFACE_ID_TABLE(I) := X_INTERFACE_ID;
2684: SEGS_TABLE(I) := X_SEGS;
2685: ORG_ID_TABLE(I) := X_ORG_ID;
2686: LINE_ID_TABLE(I) := X_LINE_ID;

Line 2693: DBMS_SQL.CLOSE_CURSOR(SOURCE_CURSOR);

2689: END IF;
2690: END LOOP;
2691:
2692: NUM_ROWS := I;
2693: DBMS_SQL.CLOSE_CURSOR(SOURCE_CURSOR);
2694:
2695: FOR I IN 1..NUM_ROWS LOOP
2696:
2697: --IF (COL_NAME LIKE 'BILL_REFERENCE') OR (COL_NAME LIKE 'ROUTING_REFERENCE') THEN

Line 4078: CURSOR_HANDLE INTEGER := DBMS_SQL.OPEN_CURSOR;

4074: DATA_TABLE NUMBER_TABLE;
4075: QARES_ROW ROWID;
4076: STMT_OF_ROWIDS VARCHAR2(10000);
4077: MATCH_ERROR BOOLEAN;
4078: CURSOR_HANDLE INTEGER := DBMS_SQL.OPEN_CURSOR;
4079: IGNORE NUMBER;
4080: X_PLAN_NAME QA_PLANS.NAME%TYPE;
4081: MATCHING_ERROR EXCEPTION;
4082: NO_ROWIDS_ERROR EXCEPTION;

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

4355:
4356: END IF;
4357: END LOOP;
4358:
4359: DBMS_SQL.PARSE(CURSOR_HANDLE, SELECT_STMT, DBMS_SQL.NATIVE);
4360: DBMS_SQL.DEFINE_COLUMN_ROWID(CURSOR_HANDLE, 1, QARES_ROW);
4361: DBMS_SQL.BIND_VARIABLE(CURSOR_HANDLE,'X_INTERFACE_ID',X_TRANSACTION_INTERFACE_ID);
4362: IGNORE := DBMS_SQL.EXECUTE(CURSOR_HANDLE);
4363: STMT_OF_ROWIDS := '(''';

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

4356: END IF;
4357: END LOOP;
4358:
4359: DBMS_SQL.PARSE(CURSOR_HANDLE, SELECT_STMT, DBMS_SQL.NATIVE);
4360: DBMS_SQL.DEFINE_COLUMN_ROWID(CURSOR_HANDLE, 1, QARES_ROW);
4361: DBMS_SQL.BIND_VARIABLE(CURSOR_HANDLE,'X_INTERFACE_ID',X_TRANSACTION_INTERFACE_ID);
4362: IGNORE := DBMS_SQL.EXECUTE(CURSOR_HANDLE);
4363: STMT_OF_ROWIDS := '(''';
4364: I := 0;

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

4357: END LOOP;
4358:
4359: DBMS_SQL.PARSE(CURSOR_HANDLE, SELECT_STMT, DBMS_SQL.NATIVE);
4360: DBMS_SQL.DEFINE_COLUMN_ROWID(CURSOR_HANDLE, 1, QARES_ROW);
4361: DBMS_SQL.BIND_VARIABLE(CURSOR_HANDLE,'X_INTERFACE_ID',X_TRANSACTION_INTERFACE_ID);
4362: IGNORE := DBMS_SQL.EXECUTE(CURSOR_HANDLE);
4363: STMT_OF_ROWIDS := '(''';
4364: I := 0;
4365: WHILE DBMS_SQL.FETCH_ROWS(CURSOR_HANDLE) > 0 LOOP

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

4358:
4359: DBMS_SQL.PARSE(CURSOR_HANDLE, SELECT_STMT, DBMS_SQL.NATIVE);
4360: DBMS_SQL.DEFINE_COLUMN_ROWID(CURSOR_HANDLE, 1, QARES_ROW);
4361: DBMS_SQL.BIND_VARIABLE(CURSOR_HANDLE,'X_INTERFACE_ID',X_TRANSACTION_INTERFACE_ID);
4362: IGNORE := DBMS_SQL.EXECUTE(CURSOR_HANDLE);
4363: STMT_OF_ROWIDS := '(''';
4364: I := 0;
4365: WHILE DBMS_SQL.FETCH_ROWS(CURSOR_HANDLE) > 0 LOOP
4366: IF I > 0

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

4361: DBMS_SQL.BIND_VARIABLE(CURSOR_HANDLE,'X_INTERFACE_ID',X_TRANSACTION_INTERFACE_ID);
4362: IGNORE := DBMS_SQL.EXECUTE(CURSOR_HANDLE);
4363: STMT_OF_ROWIDS := '(''';
4364: I := 0;
4365: WHILE DBMS_SQL.FETCH_ROWS(CURSOR_HANDLE) > 0 LOOP
4366: IF I > 0
4367: THEN STMT_OF_ROWIDS := STMT_OF_ROWIDS ||''''||','||'''';
4368: END IF;
4369: I := I + 1;

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

4366: IF I > 0
4367: THEN STMT_OF_ROWIDS := STMT_OF_ROWIDS ||''''||','||'''';
4368: END IF;
4369: I := I + 1;
4370: DBMS_SQL.COLUMN_VALUE_ROWID(CURSOR_HANDLE, 1, QARES_ROW);
4371: STMT_OF_ROWIDS := STMT_OF_ROWIDS || QARES_ROW;
4372: END LOOP;
4373: STMT_OF_ROWIDS := STMT_OF_ROWIDS || ''')';
4374: DBMS_SQL.CLOSE_CURSOR(CURSOR_HANDLE);

Line 4374: DBMS_SQL.CLOSE_CURSOR(CURSOR_HANDLE);

4370: DBMS_SQL.COLUMN_VALUE_ROWID(CURSOR_HANDLE, 1, QARES_ROW);
4371: STMT_OF_ROWIDS := STMT_OF_ROWIDS || QARES_ROW;
4372: END LOOP;
4373: STMT_OF_ROWIDS := STMT_OF_ROWIDS || ''')';
4374: DBMS_SQL.CLOSE_CURSOR(CURSOR_HANDLE);
4375:
4376: IF I = 0
4377: THEN RAISE NO_ROWIDS_ERROR;
4378: ELSIF I > 1

Line 7463: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;

7459: 'FROM QA_INTERFACE_ERRORS QIE ' ||
7460: 'WHERE QIE.TRANSACTION_INTERFACE_ID = ' ||
7461: 'QRI.TRANSACTION_INTERFACE_ID )';
7462:
7463: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
7464: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
7465:
7466: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
7467:

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

7460: 'WHERE QIE.TRANSACTION_INTERFACE_ID = ' ||
7461: 'QRI.TRANSACTION_INTERFACE_ID )';
7462:
7463: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
7464: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
7465:
7466: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
7467:
7468: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);

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

7462:
7463: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
7464: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
7465:
7466: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
7467:
7468: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
7469: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
7470:

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

7464: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
7465:
7466: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
7467:
7468: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
7469: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
7470:
7471: LOOP
7472: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN

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

7465:
7466: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
7467:
7468: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
7469: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
7470:
7471: LOOP
7472: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
7473: K := K + 1;

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

7468: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
7469: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
7470:
7471: LOOP
7472: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
7473: K := K + 1;
7474: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
7475: INTERFACE_ID_TABLE(K) := X_INTERFACE_ID;
7476: ELSE

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

7470:
7471: LOOP
7472: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
7473: K := K + 1;
7474: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
7475: INTERFACE_ID_TABLE(K) := X_INTERFACE_ID;
7476: ELSE
7477: EXIT;
7478: END IF;

Line 7894: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;

7890: 'WHERE QIE.TRANSACTION_INTERFACE_ID = ' ||
7891: 'QRI.TRANSACTION_INTERFACE_ID )';
7892:
7893:
7894: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
7895: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
7896:
7897: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
7898:

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

7891: 'QRI.TRANSACTION_INTERFACE_ID )';
7892:
7893:
7894: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
7895: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
7896:
7897: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
7898:
7899: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);

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

7893:
7894: SOURCE_CURSOR := DBMS_SQL.OPEN_CURSOR;
7895: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
7896:
7897: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
7898:
7899: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
7900: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
7901:

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

7895: DBMS_SQL.PARSE(SOURCE_CURSOR, SQL_STATEMENT, DBMS_SQL.NATIVE);
7896:
7897: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
7898:
7899: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
7900: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
7901:
7902: LOOP
7903: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN

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

7896:
7897: DBMS_SQL.BIND_VARIABLE(SOURCE_CURSOR, ':GROUP_ID', X_GROUP_ID);
7898:
7899: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
7900: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
7901:
7902: LOOP
7903: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
7904: K := K + 1;

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

7899: DBMS_SQL.DEFINE_COLUMN(SOURCE_CURSOR, 1, X_INTERFACE_ID);
7900: IGNORE := DBMS_SQL.EXECUTE(SOURCE_CURSOR);
7901:
7902: LOOP
7903: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
7904: K := K + 1;
7905: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
7906: INTERFACE_ID_TABLE(K) := X_INTERFACE_ID;
7907: ELSE

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

7901:
7902: LOOP
7903: IF (DBMS_SQL.FETCH_ROWS(SOURCE_CURSOR) > 0) THEN
7904: K := K + 1;
7905: DBMS_SQL.COLUMN_VALUE(SOURCE_CURSOR, 1, X_INTERFACE_ID);
7906: INTERFACE_ID_TABLE(K) := X_INTERFACE_ID;
7907: ELSE
7908: EXIT;
7909: END IF;

Line 7912: DBMS_SQL.CLOSE_CURSOR(SOURCE_CURSOR);

7908: EXIT;
7909: END IF;
7910: END LOOP;
7911: NUM_ROWS := K ;
7912: DBMS_SQL.CLOSE_CURSOR(SOURCE_CURSOR);
7913:
7914: -- Before we update, make sure that all the variables are initialized.
7915: -- Exceptions can rise, if its not done.
7916: