DBA Data[Home] [Help]

OWAPUB.DEBUG_CARTX dependencies on DBMS_SQL

Line 211: curs := sys.dbms_sql.open_cursor;

207: qry := qry || 'where OWNER = :owner_name and OBJECT_NAME = :proc_name ';
208: qry := qry || 'and ARGUMENT_NAME = :arg_name';
209: end if;
210:
211: curs := sys.dbms_sql.open_cursor;
212:
213: --sys.dbms_sql.parse(curs, qry, 1);
214: sys.dbms_sys_sql.parse_as_user(curs, qry, 1);
215:

Line 213: --sys.dbms_sql.parse(curs, qry, 1);

209: end if;
210:
211: curs := sys.dbms_sql.open_cursor;
212:
213: --sys.dbms_sql.parse(curs, qry, 1);
214: sys.dbms_sys_sql.parse_as_user(curs, qry, 1);
215:
216: if (package_name IS NOT NULL) then
217: DBMS_SQL.BIND_VARIABLE(curs, ':package_name', package_name);

Line 217: DBMS_SQL.BIND_VARIABLE(curs, ':package_name', package_name);

213: --sys.dbms_sql.parse(curs, qry, 1);
214: sys.dbms_sys_sql.parse_as_user(curs, qry, 1);
215:
216: if (package_name IS NOT NULL) then
217: DBMS_SQL.BIND_VARIABLE(curs, ':package_name', package_name);
218: end if;
219:
220: DBMS_SQL.BIND_VARIABLE(curs, ':proc_name', proc_name);
221: DBMS_SQL.BIND_VARIABLE(curs, ':owner_name', owner_name);

Line 220: DBMS_SQL.BIND_VARIABLE(curs, ':proc_name', proc_name);

216: if (package_name IS NOT NULL) then
217: DBMS_SQL.BIND_VARIABLE(curs, ':package_name', package_name);
218: end if;
219:
220: DBMS_SQL.BIND_VARIABLE(curs, ':proc_name', proc_name);
221: DBMS_SQL.BIND_VARIABLE(curs, ':owner_name', owner_name);
222: DBMS_SQL.BIND_VARIABLE(curs, ':arg_name', arg_name);
223:
224: sys.dbms_sql.define_column(curs, 1, datatype, 30);

Line 221: DBMS_SQL.BIND_VARIABLE(curs, ':owner_name', owner_name);

217: DBMS_SQL.BIND_VARIABLE(curs, ':package_name', package_name);
218: end if;
219:
220: DBMS_SQL.BIND_VARIABLE(curs, ':proc_name', proc_name);
221: DBMS_SQL.BIND_VARIABLE(curs, ':owner_name', owner_name);
222: DBMS_SQL.BIND_VARIABLE(curs, ':arg_name', arg_name);
223:
224: sys.dbms_sql.define_column(curs, 1, datatype, 30);
225: ignore := sys.dbms_sql.execute(curs);

Line 222: DBMS_SQL.BIND_VARIABLE(curs, ':arg_name', arg_name);

218: end if;
219:
220: DBMS_SQL.BIND_VARIABLE(curs, ':proc_name', proc_name);
221: DBMS_SQL.BIND_VARIABLE(curs, ':owner_name', owner_name);
222: DBMS_SQL.BIND_VARIABLE(curs, ':arg_name', arg_name);
223:
224: sys.dbms_sql.define_column(curs, 1, datatype, 30);
225: ignore := sys.dbms_sql.execute(curs);
226: if (sys.dbms_sql.fetch_rows(curs) > 0) then

Line 224: sys.dbms_sql.define_column(curs, 1, datatype, 30);

220: DBMS_SQL.BIND_VARIABLE(curs, ':proc_name', proc_name);
221: DBMS_SQL.BIND_VARIABLE(curs, ':owner_name', owner_name);
222: DBMS_SQL.BIND_VARIABLE(curs, ':arg_name', arg_name);
223:
224: sys.dbms_sql.define_column(curs, 1, datatype, 30);
225: ignore := sys.dbms_sql.execute(curs);
226: if (sys.dbms_sql.fetch_rows(curs) > 0) then
227: sys.dbms_sql.Column_value(curs, 1, datatype);
228: end if;

Line 225: ignore := sys.dbms_sql.execute(curs);

221: DBMS_SQL.BIND_VARIABLE(curs, ':owner_name', owner_name);
222: DBMS_SQL.BIND_VARIABLE(curs, ':arg_name', arg_name);
223:
224: sys.dbms_sql.define_column(curs, 1, datatype, 30);
225: ignore := sys.dbms_sql.execute(curs);
226: if (sys.dbms_sql.fetch_rows(curs) > 0) then
227: sys.dbms_sql.Column_value(curs, 1, datatype);
228: end if;
229: sys.dbms_sql.close_cursor(curs);

Line 226: if (sys.dbms_sql.fetch_rows(curs) > 0) then

222: DBMS_SQL.BIND_VARIABLE(curs, ':arg_name', arg_name);
223:
224: sys.dbms_sql.define_column(curs, 1, datatype, 30);
225: ignore := sys.dbms_sql.execute(curs);
226: if (sys.dbms_sql.fetch_rows(curs) > 0) then
227: sys.dbms_sql.Column_value(curs, 1, datatype);
228: end if;
229: sys.dbms_sql.close_cursor(curs);
230: curs := 0;

Line 227: sys.dbms_sql.Column_value(curs, 1, datatype);

223:
224: sys.dbms_sql.define_column(curs, 1, datatype, 30);
225: ignore := sys.dbms_sql.execute(curs);
226: if (sys.dbms_sql.fetch_rows(curs) > 0) then
227: sys.dbms_sql.Column_value(curs, 1, datatype);
228: end if;
229: sys.dbms_sql.close_cursor(curs);
230: curs := 0;
231: if (datatype = 'PL/SQL TABLE') then

Line 229: sys.dbms_sql.close_cursor(curs);

225: ignore := sys.dbms_sql.execute(curs);
226: if (sys.dbms_sql.fetch_rows(curs) > 0) then
227: sys.dbms_sql.Column_value(curs, 1, datatype);
228: end if;
229: sys.dbms_sql.close_cursor(curs);
230: curs := 0;
231: if (datatype = 'PL/SQL TABLE') then
232:
233: qry := 'select DATA_TYPE, TYPE_NAME, TYPE_SUBNAME from ALL_ARGUMENTS ';

Line 245: curs := sys.dbms_sql.open_cursor;

241: end if;
242:
243: qry := qry || ' and ARGUMENT_NAME = :arg_name';
244:
245: curs := sys.dbms_sql.open_cursor;
246:
247: --sys.dbms_sql.parse(curs, qry, 1);
248: sys.dbms_sys_sql.parse_as_user(curs, qry, 1);
249:

Line 247: --sys.dbms_sql.parse(curs, qry, 1);

243: qry := qry || ' and ARGUMENT_NAME = :arg_name';
244:
245: curs := sys.dbms_sql.open_cursor;
246:
247: --sys.dbms_sql.parse(curs, qry, 1);
248: sys.dbms_sys_sql.parse_as_user(curs, qry, 1);
249:
250: sys.dbms_sql.define_column(curs, 1, datatype, 30);
251: sys.dbms_sql.define_column(curs, 2, typename, 30);

Line 250: sys.dbms_sql.define_column(curs, 1, datatype, 30);

246:
247: --sys.dbms_sql.parse(curs, qry, 1);
248: sys.dbms_sys_sql.parse_as_user(curs, qry, 1);
249:
250: sys.dbms_sql.define_column(curs, 1, datatype, 30);
251: sys.dbms_sql.define_column(curs, 2, typename, 30);
252: sys.dbms_sql.define_column(curs, 3, typesubname, 30);
253:
254: if (package_name IS NOT NULL) then

Line 251: sys.dbms_sql.define_column(curs, 2, typename, 30);

247: --sys.dbms_sql.parse(curs, qry, 1);
248: sys.dbms_sys_sql.parse_as_user(curs, qry, 1);
249:
250: sys.dbms_sql.define_column(curs, 1, datatype, 30);
251: sys.dbms_sql.define_column(curs, 2, typename, 30);
252: sys.dbms_sql.define_column(curs, 3, typesubname, 30);
253:
254: if (package_name IS NOT NULL) then
255: DBMS_SQL.BIND_VARIABLE(curs, ':package_name', package_name);

Line 252: sys.dbms_sql.define_column(curs, 3, typesubname, 30);

248: sys.dbms_sys_sql.parse_as_user(curs, qry, 1);
249:
250: sys.dbms_sql.define_column(curs, 1, datatype, 30);
251: sys.dbms_sql.define_column(curs, 2, typename, 30);
252: sys.dbms_sql.define_column(curs, 3, typesubname, 30);
253:
254: if (package_name IS NOT NULL) then
255: DBMS_SQL.BIND_VARIABLE(curs, ':package_name', package_name);
256: end if;

Line 255: DBMS_SQL.BIND_VARIABLE(curs, ':package_name', package_name);

251: sys.dbms_sql.define_column(curs, 2, typename, 30);
252: sys.dbms_sql.define_column(curs, 3, typesubname, 30);
253:
254: if (package_name IS NOT NULL) then
255: DBMS_SQL.BIND_VARIABLE(curs, ':package_name', package_name);
256: end if;
257:
258: DBMS_SQL.BIND_VARIABLE(curs, ':proc_name', proc_name);
259: DBMS_SQL.BIND_VARIABLE(curs, ':owner_name', owner_name);

Line 258: DBMS_SQL.BIND_VARIABLE(curs, ':proc_name', proc_name);

254: if (package_name IS NOT NULL) then
255: DBMS_SQL.BIND_VARIABLE(curs, ':package_name', package_name);
256: end if;
257:
258: DBMS_SQL.BIND_VARIABLE(curs, ':proc_name', proc_name);
259: DBMS_SQL.BIND_VARIABLE(curs, ':owner_name', owner_name);
260: DBMS_SQL.BIND_VARIABLE(curs, ':arg_name', arg_name);
261:
262: ignore := sys.dbms_sql.execute(curs);

Line 259: DBMS_SQL.BIND_VARIABLE(curs, ':owner_name', owner_name);

255: DBMS_SQL.BIND_VARIABLE(curs, ':package_name', package_name);
256: end if;
257:
258: DBMS_SQL.BIND_VARIABLE(curs, ':proc_name', proc_name);
259: DBMS_SQL.BIND_VARIABLE(curs, ':owner_name', owner_name);
260: DBMS_SQL.BIND_VARIABLE(curs, ':arg_name', arg_name);
261:
262: ignore := sys.dbms_sql.execute(curs);
263:

Line 260: DBMS_SQL.BIND_VARIABLE(curs, ':arg_name', arg_name);

256: end if;
257:
258: DBMS_SQL.BIND_VARIABLE(curs, ':proc_name', proc_name);
259: DBMS_SQL.BIND_VARIABLE(curs, ':owner_name', owner_name);
260: DBMS_SQL.BIND_VARIABLE(curs, ':arg_name', arg_name);
261:
262: ignore := sys.dbms_sql.execute(curs);
263:
264: if (sys.dbms_sql.fetch_rows(curs) > 0) then

Line 262: ignore := sys.dbms_sql.execute(curs);

258: DBMS_SQL.BIND_VARIABLE(curs, ':proc_name', proc_name);
259: DBMS_SQL.BIND_VARIABLE(curs, ':owner_name', owner_name);
260: DBMS_SQL.BIND_VARIABLE(curs, ':arg_name', arg_name);
261:
262: ignore := sys.dbms_sql.execute(curs);
263:
264: if (sys.dbms_sql.fetch_rows(curs) > 0) then
265: sys.dbms_sql.Column_value(curs, 1, datatype);
266: sys.dbms_sql.Column_value(curs, 2, typename);

Line 264: if (sys.dbms_sql.fetch_rows(curs) > 0) then

260: DBMS_SQL.BIND_VARIABLE(curs, ':arg_name', arg_name);
261:
262: ignore := sys.dbms_sql.execute(curs);
263:
264: if (sys.dbms_sql.fetch_rows(curs) > 0) then
265: sys.dbms_sql.Column_value(curs, 1, datatype);
266: sys.dbms_sql.Column_value(curs, 2, typename);
267: sys.dbms_sql.Column_value(curs, 3, typesubname);
268: arg_type_name := typename || '.' || typesubname;

Line 265: sys.dbms_sql.Column_value(curs, 1, datatype);

261:
262: ignore := sys.dbms_sql.execute(curs);
263:
264: if (sys.dbms_sql.fetch_rows(curs) > 0) then
265: sys.dbms_sql.Column_value(curs, 1, datatype);
266: sys.dbms_sql.Column_value(curs, 2, typename);
267: sys.dbms_sql.Column_value(curs, 3, typesubname);
268: arg_type_name := typename || '.' || typesubname;
269: end if;

Line 266: sys.dbms_sql.Column_value(curs, 2, typename);

262: ignore := sys.dbms_sql.execute(curs);
263:
264: if (sys.dbms_sql.fetch_rows(curs) > 0) then
265: sys.dbms_sql.Column_value(curs, 1, datatype);
266: sys.dbms_sql.Column_value(curs, 2, typename);
267: sys.dbms_sql.Column_value(curs, 3, typesubname);
268: arg_type_name := typename || '.' || typesubname;
269: end if;
270: sys.dbms_sql.close_cursor(curs);

Line 267: sys.dbms_sql.Column_value(curs, 3, typesubname);

263:
264: if (sys.dbms_sql.fetch_rows(curs) > 0) then
265: sys.dbms_sql.Column_value(curs, 1, datatype);
266: sys.dbms_sql.Column_value(curs, 2, typename);
267: sys.dbms_sql.Column_value(curs, 3, typesubname);
268: arg_type_name := typename || '.' || typesubname;
269: end if;
270: sys.dbms_sql.close_cursor(curs);
271:

Line 270: sys.dbms_sql.close_cursor(curs);

266: sys.dbms_sql.Column_value(curs, 2, typename);
267: sys.dbms_sql.Column_value(curs, 3, typesubname);
268: arg_type_name := typename || '.' || typesubname;
269: end if;
270: sys.dbms_sql.close_cursor(curs);
271:
272: else
273: arg_type_name := datatype;
274: end if;

Line 280: sys.dbms_sql.close_cursor(curs);

276:
277: exception
278: when others then
279: if (curs > 0) then
280: sys.dbms_sql.close_cursor(curs);
281: end if;
282: arg_type_name := '';
283: end;
284: