DBA Data[Home] [Help]

APPS.WSH_UTIL_CORE dependencies on DBMS_SQL

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

1380: -- prod_name product name to send message for
1381: -- msg_name message to print if duplicate found
1382: --
1383: -- Notes
1384: -- uses DBMS_SQL package to create and execute cursor for given query
1385:
1386:
1387: PROCEDURE Gen_Check_Unique(p_table_name IN VARCHAR2,
1388: p_pkey1 IN VARCHAR2 ,

Line 1528: rec_cursor := dbms_sql.open_cursor;

1524: IF l_debug_on THEN
1525: WSH_DEBUG_SV.log(l_module_name,'query_string',query_string);
1526: END IF;
1527:
1528: rec_cursor := dbms_sql.open_cursor;
1529: dbms_sql.parse(rec_cursor,query_string,dbms_sql.v7);
1530:
1531: IF p_pkey1 IS NOT NULL AND p_pkey1_value IS NOT NULL THEN
1532: IF (p_is_1_char = 'Y') THEN

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

1525: WSH_DEBUG_SV.log(l_module_name,'query_string',query_string);
1526: END IF;
1527:
1528: rec_cursor := dbms_sql.open_cursor;
1529: dbms_sql.parse(rec_cursor,query_string,dbms_sql.v7);
1530:
1531: IF p_pkey1 IS NOT NULL AND p_pkey1_value IS NOT NULL THEN
1532: IF (p_is_1_char = 'Y') THEN
1533: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey1_value', p_pkey1_value);

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

1529: dbms_sql.parse(rec_cursor,query_string,dbms_sql.v7);
1530:
1531: IF p_pkey1 IS NOT NULL AND p_pkey1_value IS NOT NULL THEN
1532: IF (p_is_1_char = 'Y') THEN
1533: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey1_value', p_pkey1_value);
1534: ELSE
1535: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey1_value', TO_NUMBER(p_pkey1_value));
1536: END IF;
1537: END IF;

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

1531: IF p_pkey1 IS NOT NULL AND p_pkey1_value IS NOT NULL THEN
1532: IF (p_is_1_char = 'Y') THEN
1533: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey1_value', p_pkey1_value);
1534: ELSE
1535: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey1_value', TO_NUMBER(p_pkey1_value));
1536: END IF;
1537: END IF;
1538: IF p_pkey2 IS NOT NULL AND p_pkey2_value IS NOT NULL THEN
1539: IF (p_is_2_char = 'Y') THEN

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

1536: END IF;
1537: END IF;
1538: IF p_pkey2 IS NOT NULL AND p_pkey2_value IS NOT NULL THEN
1539: IF (p_is_2_char = 'Y') THEN
1540: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey2_value', p_pkey2_value);
1541: ELSE
1542: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey2_value', TO_NUMBER(p_pkey2_value));
1543: END IF;
1544: END IF;

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

1538: IF p_pkey2 IS NOT NULL AND p_pkey2_value IS NOT NULL THEN
1539: IF (p_is_2_char = 'Y') THEN
1540: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey2_value', p_pkey2_value);
1541: ELSE
1542: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey2_value', TO_NUMBER(p_pkey2_value));
1543: END IF;
1544: END IF;
1545: IF p_pkey3 IS NOT NULL AND p_pkey3_value IS NOT NULL THEN
1546: IF (p_is_3_char = 'Y') THEN

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

1543: END IF;
1544: END IF;
1545: IF p_pkey3 IS NOT NULL AND p_pkey3_value IS NOT NULL THEN
1546: IF (p_is_3_char = 'Y') THEN
1547: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey3_value', p_pkey3_value);
1548: ELSE
1549: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey3_value', TO_NUMBER(p_pkey3_value));
1550: END IF;
1551: END IF;

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

1545: IF p_pkey3 IS NOT NULL AND p_pkey3_value IS NOT NULL THEN
1546: IF (p_is_3_char = 'Y') THEN
1547: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey3_value', p_pkey3_value);
1548: ELSE
1549: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey3_value', TO_NUMBER(p_pkey3_value));
1550: END IF;
1551: END IF;
1552: IF p_pkey4 IS NOT NULL AND p_pkey4_value IS NOT NULL THEN
1553: IF (p_is_4_char = 'Y') THEN

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

1550: END IF;
1551: END IF;
1552: IF p_pkey4 IS NOT NULL AND p_pkey4_value IS NOT NULL THEN
1553: IF (p_is_4_char = 'Y') THEN
1554: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey4_value', p_pkey4_value);
1555: ELSE
1556: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey4_value', TO_NUMBER(p_pkey4_value));
1557: END IF;
1558: END IF;

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

1552: IF p_pkey4 IS NOT NULL AND p_pkey4_value IS NOT NULL THEN
1553: IF (p_is_4_char = 'Y') THEN
1554: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey4_value', p_pkey4_value);
1555: ELSE
1556: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey4_value', TO_NUMBER(p_pkey4_value));
1557: END IF;
1558: END IF;
1559: IF p_pkey5 IS NOT NULL AND p_pkey5_value IS NOT NULL THEN
1560: IF (p_is_5_char = 'Y') THEN

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

1557: END IF;
1558: END IF;
1559: IF p_pkey5 IS NOT NULL AND p_pkey5_value IS NOT NULL THEN
1560: IF (p_is_5_char = 'Y') THEN
1561: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey5_value', p_pkey5_value);
1562: ELSE
1563: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey5_value', TO_NUMBER(p_pkey5_value));
1564: END IF;
1565: END IF;

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

1559: IF p_pkey5 IS NOT NULL AND p_pkey5_value IS NOT NULL THEN
1560: IF (p_is_5_char = 'Y') THEN
1561: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey5_value', p_pkey5_value);
1562: ELSE
1563: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey5_value', TO_NUMBER(p_pkey5_value));
1564: END IF;
1565: END IF;
1566: IF p_pkey6 IS NOT NULL AND p_pkey6_value IS NOT NULL THEN
1567: IF (p_is_6_char = 'Y') THEN

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

1564: END IF;
1565: END IF;
1566: IF p_pkey6 IS NOT NULL AND p_pkey6_value IS NOT NULL THEN
1567: IF (p_is_6_char = 'Y') THEN
1568: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey6_value', p_pkey6_value);
1569: ELSE
1570: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey6_value', TO_NUMBER(p_pkey6_value));
1571: END IF;
1572: END IF;

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

1566: IF p_pkey6 IS NOT NULL AND p_pkey6_value IS NOT NULL THEN
1567: IF (p_is_6_char = 'Y') THEN
1568: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey6_value', p_pkey6_value);
1569: ELSE
1570: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey6_value', TO_NUMBER(p_pkey6_value));
1571: END IF;
1572: END IF;
1573: IF p_pkey7 IS NOT NULL AND p_pkey7_value IS NOT NULL THEN
1574: IF (p_is_7_char = 'Y') THEN

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

1571: END IF;
1572: END IF;
1573: IF p_pkey7 IS NOT NULL AND p_pkey7_value IS NOT NULL THEN
1574: IF (p_is_7_char = 'Y') THEN
1575: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey7_value', p_pkey7_value);
1576: ELSE
1577: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey7_value', TO_NUMBER(p_pkey7_value));
1578: END IF;
1579: END IF;

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

1573: IF p_pkey7 IS NOT NULL AND p_pkey7_value IS NOT NULL THEN
1574: IF (p_is_7_char = 'Y') THEN
1575: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey7_value', p_pkey7_value);
1576: ELSE
1577: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey7_value', TO_NUMBER(p_pkey7_value));
1578: END IF;
1579: END IF;
1580: IF p_pkey8 IS NOT NULL AND p_pkey8_value IS NOT NULL THEN
1581: IF (p_is_8_char = 'Y') THEN

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

1578: END IF;
1579: END IF;
1580: IF p_pkey8 IS NOT NULL AND p_pkey8_value IS NOT NULL THEN
1581: IF (p_is_8_char = 'Y') THEN
1582: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey8_value', p_pkey8_value);
1583: ELSE
1584: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey8_value', TO_NUMBER(p_pkey8_value));
1585: END IF;
1586: END IF;

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

1580: IF p_pkey8 IS NOT NULL AND p_pkey8_value IS NOT NULL THEN
1581: IF (p_is_8_char = 'Y') THEN
1582: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey8_value', p_pkey8_value);
1583: ELSE
1584: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey8_value', TO_NUMBER(p_pkey8_value));
1585: END IF;
1586: END IF;
1587: IF p_row_id IS NOT NULL THEN
1588: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_row_id', CHARTOROWID(p_row_id));

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

1584: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_pkey8_value', TO_NUMBER(p_pkey8_value));
1585: END IF;
1586: END IF;
1587: IF p_row_id IS NOT NULL THEN
1588: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_row_id', CHARTOROWID(p_row_id));
1589: END IF;
1590:
1591:
1592: any_found := dbms_sql.execute_and_fetch(rec_cursor);

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

1588: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_row_id', CHARTOROWID(p_row_id));
1589: END IF;
1590:
1591:
1592: any_found := dbms_sql.execute_and_fetch(rec_cursor);
1593: IF (any_found > 0) THEN
1594: FND_MESSAGE.SET_NAME(p_prod_name,p_msg_name);
1595: APP_EXCEPTION.RAISE_EXCEPTION;
1596: END IF;

Line 1644: rec_cursor := dbms_sql.open_cursor;

1640: WSH_DEBUG_SV.log(l_module_name,'QUERY_TEXT',QUERY_TEXT);
1641: END IF;
1642:
1643: --
1644: rec_cursor := dbms_sql.open_cursor;
1645: dbms_sql.parse(rec_cursor,query_text,dbms_sql.v7);
1646: dbms_sql.define_column(rec_cursor, 1, date_in_table);
1647:
1648: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_row_id', CHARTOROWID(p_row_id));

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

1641: END IF;
1642:
1643: --
1644: rec_cursor := dbms_sql.open_cursor;
1645: dbms_sql.parse(rec_cursor,query_text,dbms_sql.v7);
1646: dbms_sql.define_column(rec_cursor, 1, date_in_table);
1647:
1648: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_row_id', CHARTOROWID(p_row_id));
1649: row_processed := dbms_sql.execute(rec_cursor);

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

1642:
1643: --
1644: rec_cursor := dbms_sql.open_cursor;
1645: dbms_sql.parse(rec_cursor,query_text,dbms_sql.v7);
1646: dbms_sql.define_column(rec_cursor, 1, date_in_table);
1647:
1648: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_row_id', CHARTOROWID(p_row_id));
1649: row_processed := dbms_sql.execute(rec_cursor);
1650:

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

1644: rec_cursor := dbms_sql.open_cursor;
1645: dbms_sql.parse(rec_cursor,query_text,dbms_sql.v7);
1646: dbms_sql.define_column(rec_cursor, 1, date_in_table);
1647:
1648: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_row_id', CHARTOROWID(p_row_id));
1649: row_processed := dbms_sql.execute(rec_cursor);
1650:
1651: IF ( dbms_sql.fetch_rows(rec_cursor) > 0) THEN
1652: dbms_sql.column_value( rec_cursor, 1, date_in_table);

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

1645: dbms_sql.parse(rec_cursor,query_text,dbms_sql.v7);
1646: dbms_sql.define_column(rec_cursor, 1, date_in_table);
1647:
1648: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_row_id', CHARTOROWID(p_row_id));
1649: row_processed := dbms_sql.execute(rec_cursor);
1650:
1651: IF ( dbms_sql.fetch_rows(rec_cursor) > 0) THEN
1652: dbms_sql.column_value( rec_cursor, 1, date_in_table);
1653: ELSE

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

1647:
1648: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_row_id', CHARTOROWID(p_row_id));
1649: row_processed := dbms_sql.execute(rec_cursor);
1650:
1651: IF ( dbms_sql.fetch_rows(rec_cursor) > 0) THEN
1652: dbms_sql.column_value( rec_cursor, 1, date_in_table);
1653: ELSE
1654: RAISE error_out;
1655: END IF;

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

1648: DBMS_SQL.BIND_VARIABLE(rec_cursor,':x_row_id', CHARTOROWID(p_row_id));
1649: row_processed := dbms_sql.execute(rec_cursor);
1650:
1651: IF ( dbms_sql.fetch_rows(rec_cursor) > 0) THEN
1652: dbms_sql.column_value( rec_cursor, 1, date_in_table);
1653: ELSE
1654: RAISE error_out;
1655: END IF;
1656:

Line 1657: dbms_sql.close_cursor(rec_cursor);

1653: ELSE
1654: RAISE error_out;
1655: END IF;
1656:
1657: dbms_sql.close_cursor(rec_cursor);
1658:
1659: x_date_fetched := date_in_table;
1660:
1661: --

Line 1670: dbms_sql.close_cursor(rec_cursor);

1666: END IF;
1667: --
1668: EXCEPTION
1669: WHEN OTHERS THEN
1670: dbms_sql.close_cursor(rec_cursor);
1671: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
1672: FND_MESSAGE.Set_Token('PACKAGE','WSH_UTIL_CORE');
1673: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
1674: FND_MESSAGE.Set_Token('ORA_TEXT',query_text);

Line 1715: rec_cursor := dbms_sql.open_cursor;

1711: --
1712: WSH_DEBUG_SV.log(l_module_name,'QUERY_TEXT',QUERY_TEXT);
1713: END IF;
1714: --
1715: rec_cursor := dbms_sql.open_cursor;
1716: dbms_sql.parse(rec_cursor,query_text,dbms_sql.v7);
1717: dbms_sql.define_column(rec_cursor, 1, date_in_table);
1718: row_processed := dbms_sql.execute(rec_cursor);
1719:

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

1712: WSH_DEBUG_SV.log(l_module_name,'QUERY_TEXT',QUERY_TEXT);
1713: END IF;
1714: --
1715: rec_cursor := dbms_sql.open_cursor;
1716: dbms_sql.parse(rec_cursor,query_text,dbms_sql.v7);
1717: dbms_sql.define_column(rec_cursor, 1, date_in_table);
1718: row_processed := dbms_sql.execute(rec_cursor);
1719:
1720: IF ( dbms_sql.fetch_rows(rec_cursor) > 0) THEN

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

1713: END IF;
1714: --
1715: rec_cursor := dbms_sql.open_cursor;
1716: dbms_sql.parse(rec_cursor,query_text,dbms_sql.v7);
1717: dbms_sql.define_column(rec_cursor, 1, date_in_table);
1718: row_processed := dbms_sql.execute(rec_cursor);
1719:
1720: IF ( dbms_sql.fetch_rows(rec_cursor) > 0) THEN
1721: dbms_sql.column_value( rec_cursor, 1, date_in_table);

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

1714: --
1715: rec_cursor := dbms_sql.open_cursor;
1716: dbms_sql.parse(rec_cursor,query_text,dbms_sql.v7);
1717: dbms_sql.define_column(rec_cursor, 1, date_in_table);
1718: row_processed := dbms_sql.execute(rec_cursor);
1719:
1720: IF ( dbms_sql.fetch_rows(rec_cursor) > 0) THEN
1721: dbms_sql.column_value( rec_cursor, 1, date_in_table);
1722: ELSE

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

1716: dbms_sql.parse(rec_cursor,query_text,dbms_sql.v7);
1717: dbms_sql.define_column(rec_cursor, 1, date_in_table);
1718: row_processed := dbms_sql.execute(rec_cursor);
1719:
1720: IF ( dbms_sql.fetch_rows(rec_cursor) > 0) THEN
1721: dbms_sql.column_value( rec_cursor, 1, date_in_table);
1722: ELSE
1723: RAISE error_out;
1724: END IF;

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

1717: dbms_sql.define_column(rec_cursor, 1, date_in_table);
1718: row_processed := dbms_sql.execute(rec_cursor);
1719:
1720: IF ( dbms_sql.fetch_rows(rec_cursor) > 0) THEN
1721: dbms_sql.column_value( rec_cursor, 1, date_in_table);
1722: ELSE
1723: RAISE error_out;
1724: END IF;
1725:

Line 1726: dbms_sql.close_cursor(rec_cursor);

1722: ELSE
1723: RAISE error_out;
1724: END IF;
1725:
1726: dbms_sql.close_cursor(rec_cursor);
1727:
1728: date_fetched := date_in_table;
1729:
1730: --

Line 1739: dbms_sql.close_cursor(rec_cursor);

1735: END IF;
1736: --
1737: EXCEPTION
1738: WHEN OTHERS THEN
1739: dbms_sql.close_cursor(rec_cursor);
1740: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
1741: FND_MESSAGE.Set_Token('PACKAGE','WSH_UTIL_CORE');
1742: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
1743: FND_MESSAGE.Set_Token('ORA_TEXT',query_text);