DBA Data[Home] [Help]

APPS.WSH_UTIL_CORE dependencies on DBMS_SQL

Line 1376: -- uses DBMS_SQL package to create and execute cursor for given query

1372: -- prod_name product name to send message for
1373: -- msg_name message to print if duplicate found
1374: --
1375: -- Notes
1376: -- uses DBMS_SQL package to create and execute cursor for given query
1377:
1378:
1379: PROCEDURE Gen_Check_Unique(p_table_name IN VARCHAR2,
1380: p_pkey1 IN VARCHAR2 ,

Line 1520: rec_cursor := dbms_sql.open_cursor;

1516: IF l_debug_on THEN
1517: WSH_DEBUG_SV.log(l_module_name,'query_string',query_string);
1518: END IF;
1519:
1520: rec_cursor := dbms_sql.open_cursor;
1521: dbms_sql.parse(rec_cursor,query_string,dbms_sql.v7);
1522:
1523: IF p_pkey1 IS NOT NULL AND p_pkey1_value IS NOT NULL THEN
1524: IF (p_is_1_char = 'Y') THEN

Line 1521: dbms_sql.parse(rec_cursor,query_string,dbms_sql.v7);

1517: WSH_DEBUG_SV.log(l_module_name,'query_string',query_string);
1518: END IF;
1519:
1520: rec_cursor := dbms_sql.open_cursor;
1521: dbms_sql.parse(rec_cursor,query_string,dbms_sql.v7);
1522:
1523: IF p_pkey1 IS NOT NULL AND p_pkey1_value IS NOT NULL THEN
1524: IF (p_is_1_char = 'Y') THEN
1525: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey1_value', p_pkey1_value);

Line 1525: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey1_value', p_pkey1_value);

1521: dbms_sql.parse(rec_cursor,query_string,dbms_sql.v7);
1522:
1523: IF p_pkey1 IS NOT NULL AND p_pkey1_value IS NOT NULL THEN
1524: IF (p_is_1_char = 'Y') THEN
1525: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey1_value', p_pkey1_value);
1526: ELSE
1527: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey1_value', TO_NUMBER(p_pkey1_value));
1528: END IF;
1529: END IF;

Line 1527: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey1_value', TO_NUMBER(p_pkey1_value));

1523: IF p_pkey1 IS NOT NULL AND p_pkey1_value IS NOT NULL THEN
1524: IF (p_is_1_char = 'Y') THEN
1525: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey1_value', p_pkey1_value);
1526: ELSE
1527: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey1_value', TO_NUMBER(p_pkey1_value));
1528: END IF;
1529: END IF;
1530: IF p_pkey2 IS NOT NULL AND p_pkey2_value IS NOT NULL THEN
1531: IF (p_is_2_char = 'Y') THEN

Line 1532: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey2_value', p_pkey2_value);

1528: END IF;
1529: END IF;
1530: IF p_pkey2 IS NOT NULL AND p_pkey2_value IS NOT NULL THEN
1531: IF (p_is_2_char = 'Y') THEN
1532: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey2_value', p_pkey2_value);
1533: ELSE
1534: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey2_value', TO_NUMBER(p_pkey2_value));
1535: END IF;
1536: END IF;

Line 1534: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey2_value', TO_NUMBER(p_pkey2_value));

1530: IF p_pkey2 IS NOT NULL AND p_pkey2_value IS NOT NULL THEN
1531: IF (p_is_2_char = 'Y') THEN
1532: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey2_value', p_pkey2_value);
1533: ELSE
1534: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey2_value', TO_NUMBER(p_pkey2_value));
1535: END IF;
1536: END IF;
1537: IF p_pkey3 IS NOT NULL AND p_pkey3_value IS NOT NULL THEN
1538: IF (p_is_3_char = 'Y') THEN

Line 1539: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey3_value', p_pkey3_value);

1535: END IF;
1536: END IF;
1537: IF p_pkey3 IS NOT NULL AND p_pkey3_value IS NOT NULL THEN
1538: IF (p_is_3_char = 'Y') THEN
1539: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey3_value', p_pkey3_value);
1540: ELSE
1541: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey3_value', TO_NUMBER(p_pkey3_value));
1542: END IF;
1543: END IF;

Line 1541: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey3_value', TO_NUMBER(p_pkey3_value));

1537: IF p_pkey3 IS NOT NULL AND p_pkey3_value IS NOT NULL THEN
1538: IF (p_is_3_char = 'Y') THEN
1539: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey3_value', p_pkey3_value);
1540: ELSE
1541: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey3_value', TO_NUMBER(p_pkey3_value));
1542: END IF;
1543: END IF;
1544: IF p_pkey4 IS NOT NULL AND p_pkey4_value IS NOT NULL THEN
1545: IF (p_is_4_char = 'Y') THEN

Line 1546: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey4_value', p_pkey4_value);

1542: END IF;
1543: END IF;
1544: IF p_pkey4 IS NOT NULL AND p_pkey4_value IS NOT NULL THEN
1545: IF (p_is_4_char = 'Y') THEN
1546: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey4_value', p_pkey4_value);
1547: ELSE
1548: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey4_value', TO_NUMBER(p_pkey4_value));
1549: END IF;
1550: END IF;

Line 1548: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey4_value', TO_NUMBER(p_pkey4_value));

1544: IF p_pkey4 IS NOT NULL AND p_pkey4_value IS NOT NULL THEN
1545: IF (p_is_4_char = 'Y') THEN
1546: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey4_value', p_pkey4_value);
1547: ELSE
1548: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey4_value', TO_NUMBER(p_pkey4_value));
1549: END IF;
1550: END IF;
1551: IF p_pkey5 IS NOT NULL AND p_pkey5_value IS NOT NULL THEN
1552: IF (p_is_5_char = 'Y') THEN

Line 1553: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey5_value', p_pkey5_value);

1549: END IF;
1550: END IF;
1551: IF p_pkey5 IS NOT NULL AND p_pkey5_value IS NOT NULL THEN
1552: IF (p_is_5_char = 'Y') THEN
1553: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey5_value', p_pkey5_value);
1554: ELSE
1555: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey5_value', TO_NUMBER(p_pkey5_value));
1556: END IF;
1557: END IF;

Line 1555: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey5_value', TO_NUMBER(p_pkey5_value));

1551: IF p_pkey5 IS NOT NULL AND p_pkey5_value IS NOT NULL THEN
1552: IF (p_is_5_char = 'Y') THEN
1553: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey5_value', p_pkey5_value);
1554: ELSE
1555: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey5_value', TO_NUMBER(p_pkey5_value));
1556: END IF;
1557: END IF;
1558: IF p_pkey6 IS NOT NULL AND p_pkey6_value IS NOT NULL THEN
1559: IF (p_is_6_char = 'Y') THEN

Line 1560: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey6_value', p_pkey6_value);

1556: END IF;
1557: END IF;
1558: IF p_pkey6 IS NOT NULL AND p_pkey6_value IS NOT NULL THEN
1559: IF (p_is_6_char = 'Y') THEN
1560: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey6_value', p_pkey6_value);
1561: ELSE
1562: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey6_value', TO_NUMBER(p_pkey6_value));
1563: END IF;
1564: END IF;

Line 1562: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey6_value', TO_NUMBER(p_pkey6_value));

1558: IF p_pkey6 IS NOT NULL AND p_pkey6_value IS NOT NULL THEN
1559: IF (p_is_6_char = 'Y') THEN
1560: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey6_value', p_pkey6_value);
1561: ELSE
1562: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey6_value', TO_NUMBER(p_pkey6_value));
1563: END IF;
1564: END IF;
1565: IF p_pkey7 IS NOT NULL AND p_pkey7_value IS NOT NULL THEN
1566: IF (p_is_7_char = 'Y') THEN

Line 1567: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey7_value', p_pkey7_value);

1563: END IF;
1564: END IF;
1565: IF p_pkey7 IS NOT NULL AND p_pkey7_value IS NOT NULL THEN
1566: IF (p_is_7_char = 'Y') THEN
1567: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey7_value', p_pkey7_value);
1568: ELSE
1569: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey7_value', TO_NUMBER(p_pkey7_value));
1570: END IF;
1571: END IF;

Line 1569: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey7_value', TO_NUMBER(p_pkey7_value));

1565: IF p_pkey7 IS NOT NULL AND p_pkey7_value IS NOT NULL THEN
1566: IF (p_is_7_char = 'Y') THEN
1567: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey7_value', p_pkey7_value);
1568: ELSE
1569: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey7_value', TO_NUMBER(p_pkey7_value));
1570: END IF;
1571: END IF;
1572: IF p_pkey8 IS NOT NULL AND p_pkey8_value IS NOT NULL THEN
1573: IF (p_is_8_char = 'Y') THEN

Line 1574: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey8_value', p_pkey8_value);

1570: END IF;
1571: END IF;
1572: IF p_pkey8 IS NOT NULL AND p_pkey8_value IS NOT NULL THEN
1573: IF (p_is_8_char = 'Y') THEN
1574: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey8_value', p_pkey8_value);
1575: ELSE
1576: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey8_value', TO_NUMBER(p_pkey8_value));
1577: END IF;
1578: END IF;

Line 1576: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey8_value', TO_NUMBER(p_pkey8_value));

1572: IF p_pkey8 IS NOT NULL AND p_pkey8_value IS NOT NULL THEN
1573: IF (p_is_8_char = 'Y') THEN
1574: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey8_value', p_pkey8_value);
1575: ELSE
1576: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey8_value', TO_NUMBER(p_pkey8_value));
1577: END IF;
1578: END IF;
1579: IF p_row_id IS NOT NULL THEN
1580: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_row_id', CHARTOROWID(p_row_id));

Line 1580: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_row_id', CHARTOROWID(p_row_id));

1576: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey8_value', TO_NUMBER(p_pkey8_value));
1577: END IF;
1578: END IF;
1579: IF p_row_id IS NOT NULL THEN
1580: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_row_id', CHARTOROWID(p_row_id));
1581: END IF;
1582:
1583:
1584: any_found := dbms_sql.execute_and_fetch(rec_cursor);

Line 1584: any_found := dbms_sql.execute_and_fetch(rec_cursor);

1580: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_row_id', CHARTOROWID(p_row_id));
1581: END IF;
1582:
1583:
1584: any_found := dbms_sql.execute_and_fetch(rec_cursor);
1585: IF (any_found > 0) THEN
1586: FND_MESSAGE.SET_NAME(p_prod_name,p_msg_name);
1587: APP_EXCEPTION.RAISE_EXCEPTION;
1588: END IF;

Line 1636: rec_cursor := dbms_sql.open_cursor;

1632: WSH_DEBUG_SV.log(l_module_name,'QUERY_TEXT',QUERY_TEXT);
1633: END IF;
1634:
1635: --
1636: rec_cursor := dbms_sql.open_cursor;
1637: dbms_sql.parse(rec_cursor,query_text,dbms_sql.v7);
1638: dbms_sql.define_column(rec_cursor, 1, date_in_table);
1639:
1640: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_row_id', CHARTOROWID(p_row_id));

Line 1637: dbms_sql.parse(rec_cursor,query_text,dbms_sql.v7);

1633: END IF;
1634:
1635: --
1636: rec_cursor := dbms_sql.open_cursor;
1637: dbms_sql.parse(rec_cursor,query_text,dbms_sql.v7);
1638: dbms_sql.define_column(rec_cursor, 1, date_in_table);
1639:
1640: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_row_id', CHARTOROWID(p_row_id));
1641: row_processed := dbms_sql.execute(rec_cursor);

Line 1638: dbms_sql.define_column(rec_cursor, 1, date_in_table);

1634:
1635: --
1636: rec_cursor := dbms_sql.open_cursor;
1637: dbms_sql.parse(rec_cursor,query_text,dbms_sql.v7);
1638: dbms_sql.define_column(rec_cursor, 1, date_in_table);
1639:
1640: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_row_id', CHARTOROWID(p_row_id));
1641: row_processed := dbms_sql.execute(rec_cursor);
1642:

Line 1640: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_row_id', CHARTOROWID(p_row_id));

1636: rec_cursor := dbms_sql.open_cursor;
1637: dbms_sql.parse(rec_cursor,query_text,dbms_sql.v7);
1638: dbms_sql.define_column(rec_cursor, 1, date_in_table);
1639:
1640: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_row_id', CHARTOROWID(p_row_id));
1641: row_processed := dbms_sql.execute(rec_cursor);
1642:
1643: IF ( dbms_sql.fetch_rows(rec_cursor) > 0) THEN
1644: dbms_sql.column_value( rec_cursor, 1, date_in_table);

Line 1641: row_processed := dbms_sql.execute(rec_cursor);

1637: dbms_sql.parse(rec_cursor,query_text,dbms_sql.v7);
1638: dbms_sql.define_column(rec_cursor, 1, date_in_table);
1639:
1640: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_row_id', CHARTOROWID(p_row_id));
1641: row_processed := dbms_sql.execute(rec_cursor);
1642:
1643: IF ( dbms_sql.fetch_rows(rec_cursor) > 0) THEN
1644: dbms_sql.column_value( rec_cursor, 1, date_in_table);
1645: ELSE

Line 1643: IF ( dbms_sql.fetch_rows(rec_cursor) > 0) THEN

1639:
1640: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_row_id', CHARTOROWID(p_row_id));
1641: row_processed := dbms_sql.execute(rec_cursor);
1642:
1643: IF ( dbms_sql.fetch_rows(rec_cursor) > 0) THEN
1644: dbms_sql.column_value( rec_cursor, 1, date_in_table);
1645: ELSE
1646: RAISE error_out;
1647: END IF;

Line 1644: dbms_sql.column_value( rec_cursor, 1, date_in_table);

1640: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_row_id', CHARTOROWID(p_row_id));
1641: row_processed := dbms_sql.execute(rec_cursor);
1642:
1643: IF ( dbms_sql.fetch_rows(rec_cursor) > 0) THEN
1644: dbms_sql.column_value( rec_cursor, 1, date_in_table);
1645: ELSE
1646: RAISE error_out;
1647: END IF;
1648:

Line 1649: dbms_sql.close_cursor(rec_cursor);

1645: ELSE
1646: RAISE error_out;
1647: END IF;
1648:
1649: dbms_sql.close_cursor(rec_cursor);
1650:
1651: x_date_fetched := date_in_table;
1652:
1653: --

Line 1662: dbms_sql.close_cursor(rec_cursor);

1658: END IF;
1659: --
1660: EXCEPTION
1661: WHEN OTHERS THEN
1662: dbms_sql.close_cursor(rec_cursor);
1663: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
1664: FND_MESSAGE.Set_Token('PACKAGE','WSH_UTIL_CORE');
1665: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
1666: FND_MESSAGE.Set_Token('ORA_TEXT',query_text);

Line 1707: rec_cursor := dbms_sql.open_cursor;

1703: --
1704: WSH_DEBUG_SV.log(l_module_name,'QUERY_TEXT',QUERY_TEXT);
1705: END IF;
1706: --
1707: rec_cursor := dbms_sql.open_cursor;
1708: dbms_sql.parse(rec_cursor,query_text,dbms_sql.v7);
1709: dbms_sql.define_column(rec_cursor, 1, date_in_table);
1710: row_processed := dbms_sql.execute(rec_cursor);
1711:

Line 1708: dbms_sql.parse(rec_cursor,query_text,dbms_sql.v7);

1704: WSH_DEBUG_SV.log(l_module_name,'QUERY_TEXT',QUERY_TEXT);
1705: END IF;
1706: --
1707: rec_cursor := dbms_sql.open_cursor;
1708: dbms_sql.parse(rec_cursor,query_text,dbms_sql.v7);
1709: dbms_sql.define_column(rec_cursor, 1, date_in_table);
1710: row_processed := dbms_sql.execute(rec_cursor);
1711:
1712: IF ( dbms_sql.fetch_rows(rec_cursor) > 0) THEN

Line 1709: dbms_sql.define_column(rec_cursor, 1, date_in_table);

1705: END IF;
1706: --
1707: rec_cursor := dbms_sql.open_cursor;
1708: dbms_sql.parse(rec_cursor,query_text,dbms_sql.v7);
1709: dbms_sql.define_column(rec_cursor, 1, date_in_table);
1710: row_processed := dbms_sql.execute(rec_cursor);
1711:
1712: IF ( dbms_sql.fetch_rows(rec_cursor) > 0) THEN
1713: dbms_sql.column_value( rec_cursor, 1, date_in_table);

Line 1710: row_processed := dbms_sql.execute(rec_cursor);

1706: --
1707: rec_cursor := dbms_sql.open_cursor;
1708: dbms_sql.parse(rec_cursor,query_text,dbms_sql.v7);
1709: dbms_sql.define_column(rec_cursor, 1, date_in_table);
1710: row_processed := dbms_sql.execute(rec_cursor);
1711:
1712: IF ( dbms_sql.fetch_rows(rec_cursor) > 0) THEN
1713: dbms_sql.column_value( rec_cursor, 1, date_in_table);
1714: ELSE

Line 1712: IF ( dbms_sql.fetch_rows(rec_cursor) > 0) THEN

1708: dbms_sql.parse(rec_cursor,query_text,dbms_sql.v7);
1709: dbms_sql.define_column(rec_cursor, 1, date_in_table);
1710: row_processed := dbms_sql.execute(rec_cursor);
1711:
1712: IF ( dbms_sql.fetch_rows(rec_cursor) > 0) THEN
1713: dbms_sql.column_value( rec_cursor, 1, date_in_table);
1714: ELSE
1715: RAISE error_out;
1716: END IF;

Line 1713: dbms_sql.column_value( rec_cursor, 1, date_in_table);

1709: dbms_sql.define_column(rec_cursor, 1, date_in_table);
1710: row_processed := dbms_sql.execute(rec_cursor);
1711:
1712: IF ( dbms_sql.fetch_rows(rec_cursor) > 0) THEN
1713: dbms_sql.column_value( rec_cursor, 1, date_in_table);
1714: ELSE
1715: RAISE error_out;
1716: END IF;
1717:

Line 1718: dbms_sql.close_cursor(rec_cursor);

1714: ELSE
1715: RAISE error_out;
1716: END IF;
1717:
1718: dbms_sql.close_cursor(rec_cursor);
1719:
1720: date_fetched := date_in_table;
1721:
1722: --

Line 1731: dbms_sql.close_cursor(rec_cursor);

1727: END IF;
1728: --
1729: EXCEPTION
1730: WHEN OTHERS THEN
1731: dbms_sql.close_cursor(rec_cursor);
1732: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
1733: FND_MESSAGE.Set_Token('PACKAGE','WSH_UTIL_CORE');
1734: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
1735: FND_MESSAGE.Set_Token('ORA_TEXT',query_text);