DBA Data[Home] [Help]

APPS.M4U_XML_EXTN_UTILS dependencies on DBMS_SQL

Line 1655: -- create dbms_sql cursor

1651: IF g_log_lvl <= 1 THEN
1652: cln_debug_pub.add('a_view_rec.exec_sql - ' || a_view_rec.exec_sql,1);
1653: END IF;
1654:
1655: -- create dbms_sql cursor
1656: l_cursor := dbms_sql.open_cursor;
1657: dbms_sql.parse(l_cursor,a_view_rec.exec_sql,dbms_sql.NATIVE);
1658:
1659: IF g_log_lvl <= 1 THEN

Line 1656: l_cursor := dbms_sql.open_cursor;

1652: cln_debug_pub.add('a_view_rec.exec_sql - ' || a_view_rec.exec_sql,1);
1653: END IF;
1654:
1655: -- create dbms_sql cursor
1656: l_cursor := dbms_sql.open_cursor;
1657: dbms_sql.parse(l_cursor,a_view_rec.exec_sql,dbms_sql.NATIVE);
1658:
1659: IF g_log_lvl <= 1 THEN
1660: cln_debug_pub.add('a_view_rec.bind_count ' || a_view_rec.bind_count,1);

Line 1657: dbms_sql.parse(l_cursor,a_view_rec.exec_sql,dbms_sql.NATIVE);

1653: END IF;
1654:
1655: -- create dbms_sql cursor
1656: l_cursor := dbms_sql.open_cursor;
1657: dbms_sql.parse(l_cursor,a_view_rec.exec_sql,dbms_sql.NATIVE);
1658:
1659: IF g_log_lvl <= 1 THEN
1660: cln_debug_pub.add('a_view_rec.bind_count ' || a_view_rec.bind_count,1);
1661: END IF;

Line 1682: dbms_sql.bind_variable(l_cursor,l_bind_rec.nam,l_bind_val);

1678: IF x_ret_sts <> g_success_code THEN
1679: RAISE FND_API.G_EXC_ERROR;
1680: END IF;
1681: -- bind it to the sql
1682: dbms_sql.bind_variable(l_cursor,l_bind_rec.nam,l_bind_val);
1683:
1684: l_idx := l_idx + 1;
1685: END LOOP;
1686:

Line 1706: dbms_sql.define_column(l_cursor,l_idx,l_tmp_var,4000);

1702: -- initialize storage for each view.colunm
1703: a_lvl_rec.vals(l_key) := l_vals;
1704:
1705: -- define column in cursor
1706: dbms_sql.define_column(l_cursor,l_idx,l_tmp_var,4000);
1707: l_idx := l_idx + 1;
1708: END LOOP;
1709:
1710: IF g_log_lvl <= 1 THEN

Line 1711: cln_debug_pub.add('dbms_sql.define_column: done ',1);

1707: l_idx := l_idx + 1;
1708: END LOOP;
1709:
1710: IF g_log_lvl <= 1 THEN
1711: cln_debug_pub.add('dbms_sql.define_column: done ',1);
1712: END IF;
1713:
1714: l_discard := dbms_sql.execute(l_cursor);
1715:

Line 1714: l_discard := dbms_sql.execute(l_cursor);

1710: IF g_log_lvl <= 1 THEN
1711: cln_debug_pub.add('dbms_sql.define_column: done ',1);
1712: END IF;
1713:
1714: l_discard := dbms_sql.execute(l_cursor);
1715:
1716: IF g_log_lvl <= 1 THEN
1717: cln_debug_pub.add('Executed cursor',1);
1718: END IF;

Line 1722: l_discard := dbms_sql.fetch_rows(l_cursor);

1718: END IF;
1719:
1720: l_rowcount := 0;
1721: LOOP
1722: l_discard := dbms_sql.fetch_rows(l_cursor);
1723:
1724: IF g_log_lvl <= 1 THEN
1725: cln_debug_pub.add('l_discard - ' || l_discard,1);
1726: cln_debug_pub.add('l_rowcount - ' || l_rowcount,1);

Line 1746: dbms_sql.column_value(l_cursor,l_idx,l_tmp_var);

1742: IF g_log_lvl <= 1 THEN
1743: cln_debug_pub.add('l_key - ' || l_key,1);
1744: END IF;
1745:
1746: dbms_sql.column_value(l_cursor,l_idx,l_tmp_var);
1747:
1748: IF g_log_lvl <= 1 THEN
1749: cln_debug_pub.add('column_value - ' || substr(l_tmp_var,1,255),1);
1750: END IF;

Line 1773: dbms_sql.close_cursor(l_cursor);

1769: cln_debug_pub.add('a_lvl_rec.rpt_count - ' || a_lvl_rec.rpt_count);
1770: END IF;
1771:
1772: -- 5299569
1773: dbms_sql.close_cursor(l_cursor);
1774: -- this makes sense when there are mutliple views for a level
1775: -- level to repeat itself based on view with max records
1776: IF a_lvl_rec.rpt_count < a_view_rec.rowcount THEN
1777: a_lvl_rec.rpt_count := a_view_rec.rowcount;