PACKAGE BODY: APPS.GMA_UTILITIES

Source

1 PACKAGE BODY GMA_UTILITIES AS
2 /* $Header: GMAUTILB.pls 115.2 2002/05/15 12:16:02 pkm ship       $ */
3 
4   procedure do_sql(p_sql_stmt in varchar2) is
5     cursor_id  integer;
6     return_val integer;
7     sql_stmt   varchar2(8192);
8   begin
9     -- set sql statement
10     sql_stmt := p_sql_stmt;
11 
12     -- open a cursor
13     cursor_id  := dbms_sql.open_cursor;
14 
15     -- parse sql statement
16     dbms_sql.parse(cursor_id, sql_stmt, DBMS_SQL.V7);
17 
18     -- execute statement
19     return_val := dbms_sql.execute(cursor_id);
20 
21     -- close cursor
22     dbms_sql.close_cursor(cursor_id);
23   end do_sql;
24 
25 END GMA_UTILITIES;