eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.GMA_PURGE_DDL dependencies on DBMS_SQL

Line 49: l_cursor := DBMS_SQL.OPEN_CURSOR;

45: BEGIN
46:
47: -- create new table name and create statement
48: l_newtablename := GMA_PURGE_UTILITIES.makearcname(p_purge_id,p_tablename);
49: l_cursor := DBMS_SQL.OPEN_CURSOR;
50:
51: -- coalesce the tablespace
52: GMA_PURGE_DDL.coalescetablespace(p_purge_id,
53: p_tablespace,

Line 66: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);

62: p_arctablename;
63:
64: GMA_PURGE_UTILITIES.printdebug(p_purge_id,l_sqlstatement,p_debug_flag);
65:
66: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);
67: DBMS_SQL.DEFINE_COLUMN(l_cursor,1,l_rowcount);
68: l_dummy := DBMS_SQL.EXECUTE_AND_FETCH(l_cursor);
69: DBMS_SQL.COLUMN_VALUE(l_cursor,1,l_rowcount);
70:

Line 67: DBMS_SQL.DEFINE_COLUMN(l_cursor,1,l_rowcount);

63:
64: GMA_PURGE_UTILITIES.printdebug(p_purge_id,l_sqlstatement,p_debug_flag);
65:
66: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);
67: DBMS_SQL.DEFINE_COLUMN(l_cursor,1,l_rowcount);
68: l_dummy := DBMS_SQL.EXECUTE_AND_FETCH(l_cursor);
69: DBMS_SQL.COLUMN_VALUE(l_cursor,1,l_rowcount);
70:
71: l_bytes := GMA_PURGE_DDL.tab_size(p_purge_id,

Line 68: l_dummy := DBMS_SQL.EXECUTE_AND_FETCH(l_cursor);

64: GMA_PURGE_UTILITIES.printdebug(p_purge_id,l_sqlstatement,p_debug_flag);
65:
66: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);
67: DBMS_SQL.DEFINE_COLUMN(l_cursor,1,l_rowcount);
68: l_dummy := DBMS_SQL.EXECUTE_AND_FETCH(l_cursor);
69: DBMS_SQL.COLUMN_VALUE(l_cursor,1,l_rowcount);
70:
71: l_bytes := GMA_PURGE_DDL.tab_size(p_purge_id,
72: p_tablename,

Line 69: DBMS_SQL.COLUMN_VALUE(l_cursor,1,l_rowcount);

65:
66: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);
67: DBMS_SQL.DEFINE_COLUMN(l_cursor,1,l_rowcount);
68: l_dummy := DBMS_SQL.EXECUTE_AND_FETCH(l_cursor);
69: DBMS_SQL.COLUMN_VALUE(l_cursor,1,l_rowcount);
70:
71: l_bytes := GMA_PURGE_DDL.tab_size(p_purge_id,
72: p_tablename,
73: l_rowcount,

Line 115: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);

111: -- IF (GMA_PURGE_ENGINE.use_ad_ddl = TRUE) THEN
112: -- AD_DDL.DO_DDL(p_owner,p_appl_short_name,AD_DDL.CREATE_TABLE,
113: -- l_sqlstatement,l_newtablename);
114: -- ELSE
115: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);
116: -- END IF;
117:
118: EXCEPTION
119: WHEN l_extent_size THEN

Line 136: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);

132: -- IF (GMA_PURGE_ENGINE.use_ad_ddl = TRUE) THEN
133: -- AD_DDL.DO_DDL(p_owner,p_appl_short_name,AD_DDL.CREATE_TABLE,
134: -- l_sqlstatement,l_newtablename);
135: -- ELSE
136: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);
137: -- END IF;
138: WHEN OTHERS THEN
139: RAISE;
140: END;

Line 142: DBMS_SQL.CLOSE_CURSOR(l_cursor);

138: WHEN OTHERS THEN
139: RAISE;
140: END;
141:
142: DBMS_SQL.CLOSE_CURSOR(l_cursor);
143:
144: GMA_PURGE_UTILITIES.printlong(p_purge_id,l_newtablename || ' table created.');
145:
146: -- make sure table got created

Line 197: l_cursor := DBMS_SQL.OPEN_CURSOR;

193: -- AD_DDL.DO_DDL(p_owner,p_appl_short_name,AD_DDL.DROP_TABLE,
194: -- l_sqlstatement,GMA_PURGE_UTILITIES.makearcname(p_purge_id,
195: -- p_tablename));
196: -- ELSE
197: l_cursor := DBMS_SQL.OPEN_CURSOR;
198: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);
199: DBMS_SQL.CLOSE_CURSOR(l_cursor);
200: -- END IF;
201: GMA_PURGE_UTILITIES.printlong(p_purge_id,p_owner||'.'||GMA_PURGE_UTILITIES.makearcname(p_purge_id,

Line 198: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);

194: -- l_sqlstatement,GMA_PURGE_UTILITIES.makearcname(p_purge_id,
195: -- p_tablename));
196: -- ELSE
197: l_cursor := DBMS_SQL.OPEN_CURSOR;
198: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);
199: DBMS_SQL.CLOSE_CURSOR(l_cursor);
200: -- END IF;
201: GMA_PURGE_UTILITIES.printlong(p_purge_id,p_owner||'.'||GMA_PURGE_UTILITIES.makearcname(p_purge_id,
202: p_tablename)

Line 199: DBMS_SQL.CLOSE_CURSOR(l_cursor);

195: -- p_tablename));
196: -- ELSE
197: l_cursor := DBMS_SQL.OPEN_CURSOR;
198: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);
199: DBMS_SQL.CLOSE_CURSOR(l_cursor);
200: -- END IF;
201: GMA_PURGE_UTILITIES.printlong(p_purge_id,p_owner||'.'||GMA_PURGE_UTILITIES.makearcname(p_purge_id,
202: p_tablename)
203: || ' table dropped.');

Line 269: /* l_cursor := DBMS_SQL.OPEN_CURSOR;

265:
266: -- we are going to create or freshen the view for all of the tables in this
267: -- purge type definition
268:
269: /* l_cursor := DBMS_SQL.OPEN_CURSOR;
270:
271: FOR l_viewtable IN l_viewtables_cur(p_purge_type) LOOP
272: l_tables := 0;
273:

Line 282: DBMS_SQL.PARSE(l_cursor,l_sqlstatement, DBMS_SQL.NATIVE);

278: -- IF (GMA_PURGE_ENGINE.use_ad_ddl = TRUE) THEN
279: -- AD_DDL.DO_DDL(p_owner,p_appl_short_name,AD_DDL.DROP_VIEW,
280: -- l_sqlstatement,'A' || l_viewtable.table_name);
281: -- ELSE
282: DBMS_SQL.PARSE(l_cursor,l_sqlstatement, DBMS_SQL.NATIVE);
283: l_return := DBMS_SQL.EXECUTE(l_cursor);
284: -- END IF;
285: EXCEPTION
286: WHEN l_noobject THEN

Line 283: l_return := DBMS_SQL.EXECUTE(l_cursor);

279: -- AD_DDL.DO_DDL(p_owner,p_appl_short_name,AD_DDL.DROP_VIEW,
280: -- l_sqlstatement,'A' || l_viewtable.table_name);
281: -- ELSE
282: DBMS_SQL.PARSE(l_cursor,l_sqlstatement, DBMS_SQL.NATIVE);
283: l_return := DBMS_SQL.EXECUTE(l_cursor);
284: -- END IF;
285: EXCEPTION
286: WHEN l_noobject THEN
287: NULL;

Line 321: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);

317: -- IF (GMA_PURGE_ENGINE.use_ad_ddl = TRUE) THEN
318: -- AD_DDL.DO_DDL(p_owner,p_appl_short_name,AD_DDL.CREATE_VIEW,
319: -- l_sqlstatement,'A' || l_viewtable.table_name);
320: -- ELSE
321: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);
322: l_return := DBMS_SQL.EXECUTE(l_cursor);
323: -- END IF;
324: GMA_PURGE_UTILITIES.printlong(p_purge_id,
325: 'A' || l_viewtable.table_name || ' view created.');

Line 322: l_return := DBMS_SQL.EXECUTE(l_cursor);

318: -- AD_DDL.DO_DDL(p_owner,p_appl_short_name,AD_DDL.CREATE_VIEW,
319: -- l_sqlstatement,'A' || l_viewtable.table_name);
320: -- ELSE
321: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);
322: l_return := DBMS_SQL.EXECUTE(l_cursor);
323: -- END IF;
324: GMA_PURGE_UTILITIES.printlong(p_purge_id,
325: 'A' || l_viewtable.table_name || ' view created.');
326:

Line 329: DBMS_SQL.CLOSE_CURSOR(l_cursor);

325: 'A' || l_viewtable.table_name || ' view created.');
326:
327: END LOOP; -- each table
328:
329: DBMS_SQL.CLOSE_CURSOR(l_cursor);
330:
331: EXCEPTION
332:
333: WHEN OTHERS THEN

Line 384: l_cursor := DBMS_SQL.OPEN_CURSOR;

380: IF (GMA_PURGE_ENGINE.use_ad_ddl = TRUE) THEN
381: AD_DDL.DO_DDL(p_owner,p_appl_short_name,AD_DDL.ALTER_TABLE,
382: l_sqlstatement,p_tablename);
383: ELSE
384: l_cursor := DBMS_SQL.OPEN_CURSOR;
385: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);
386: DBMS_SQL.CLOSE_CURSOR(l_cursor);
387: END IF;
388:

Line 385: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);

381: AD_DDL.DO_DDL(p_owner,p_appl_short_name,AD_DDL.ALTER_TABLE,
382: l_sqlstatement,p_tablename);
383: ELSE
384: l_cursor := DBMS_SQL.OPEN_CURSOR;
385: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);
386: DBMS_SQL.CLOSE_CURSOR(l_cursor);
387: END IF;
388:
389: RETURN TRUE;

Line 386: DBMS_SQL.CLOSE_CURSOR(l_cursor);

382: l_sqlstatement,p_tablename);
383: ELSE
384: l_cursor := DBMS_SQL.OPEN_CURSOR;
385: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);
386: DBMS_SQL.CLOSE_CURSOR(l_cursor);
387: END IF;
388:
389: RETURN TRUE;
390:

Line 715: l_cursor := DBMS_SQL.OPEN_CURSOR;

711: l_alterstatement := 'ALTER TABLESPACE ' ||
712: p_tablespace_name ||
713: ' COALESCE';
714:
715: l_cursor := DBMS_SQL.OPEN_CURSOR;
716:
717: -- get count from dba_free_space
718: GMA_PURGE_UTILITIES.printdebug(p_purge_id,l_countstatement,p_debug_flag);
719: DBMS_SQL.PARSE(l_cursor,l_countstatement,DBMS_SQL.NATIVE);

Line 719: DBMS_SQL.PARSE(l_cursor,l_countstatement,DBMS_SQL.NATIVE);

715: l_cursor := DBMS_SQL.OPEN_CURSOR;
716:
717: -- get count from dba_free_space
718: GMA_PURGE_UTILITIES.printdebug(p_purge_id,l_countstatement,p_debug_flag);
719: DBMS_SQL.PARSE(l_cursor,l_countstatement,DBMS_SQL.NATIVE);
720: DBMS_SQL.DEFINE_COLUMN(l_cursor,1,l_currval);
721: l_return := DBMS_SQL.EXECUTE_AND_FETCH(l_cursor);
722: DBMS_SQL.COLUMN_VALUE(l_cursor,1,l_currval);
723:

Line 720: DBMS_SQL.DEFINE_COLUMN(l_cursor,1,l_currval);

716:
717: -- get count from dba_free_space
718: GMA_PURGE_UTILITIES.printdebug(p_purge_id,l_countstatement,p_debug_flag);
719: DBMS_SQL.PARSE(l_cursor,l_countstatement,DBMS_SQL.NATIVE);
720: DBMS_SQL.DEFINE_COLUMN(l_cursor,1,l_currval);
721: l_return := DBMS_SQL.EXECUTE_AND_FETCH(l_cursor);
722: DBMS_SQL.COLUMN_VALUE(l_cursor,1,l_currval);
723:
724: -- keep coalescing until effectiveness ends

Line 721: l_return := DBMS_SQL.EXECUTE_AND_FETCH(l_cursor);

717: -- get count from dba_free_space
718: GMA_PURGE_UTILITIES.printdebug(p_purge_id,l_countstatement,p_debug_flag);
719: DBMS_SQL.PARSE(l_cursor,l_countstatement,DBMS_SQL.NATIVE);
720: DBMS_SQL.DEFINE_COLUMN(l_cursor,1,l_currval);
721: l_return := DBMS_SQL.EXECUTE_AND_FETCH(l_cursor);
722: DBMS_SQL.COLUMN_VALUE(l_cursor,1,l_currval);
723:
724: -- keep coalescing until effectiveness ends
725: l_lastval := 0;

Line 722: DBMS_SQL.COLUMN_VALUE(l_cursor,1,l_currval);

718: GMA_PURGE_UTILITIES.printdebug(p_purge_id,l_countstatement,p_debug_flag);
719: DBMS_SQL.PARSE(l_cursor,l_countstatement,DBMS_SQL.NATIVE);
720: DBMS_SQL.DEFINE_COLUMN(l_cursor,1,l_currval);
721: l_return := DBMS_SQL.EXECUTE_AND_FETCH(l_cursor);
722: DBMS_SQL.COLUMN_VALUE(l_cursor,1,l_currval);
723:
724: -- keep coalescing until effectiveness ends
725: l_lastval := 0;
726: WHILE (l_currval <> l_lastval) LOOP

Line 729: DBMS_SQL.PARSE(l_cursor,l_alterstatement,DBMS_SQL.NATIVE);

725: l_lastval := 0;
726: WHILE (l_currval <> l_lastval) LOOP
727: l_lastval := l_currval;
728: GMA_PURGE_UTILITIES.printdebug(p_purge_id,l_alterstatement,p_debug_flag);
729: DBMS_SQL.PARSE(l_cursor,l_alterstatement,DBMS_SQL.NATIVE);
730: GMA_PURGE_UTILITIES.printdebug(p_purge_id,l_countstatement,p_debug_flag);
731: DBMS_SQL.PARSE(l_cursor,l_countstatement,DBMS_SQL.NATIVE);
732: DBMS_SQL.DEFINE_COLUMN(l_cursor,1,l_currval);
733: l_return := DBMS_SQL.EXECUTE_AND_FETCH(l_cursor);

Line 731: DBMS_SQL.PARSE(l_cursor,l_countstatement,DBMS_SQL.NATIVE);

727: l_lastval := l_currval;
728: GMA_PURGE_UTILITIES.printdebug(p_purge_id,l_alterstatement,p_debug_flag);
729: DBMS_SQL.PARSE(l_cursor,l_alterstatement,DBMS_SQL.NATIVE);
730: GMA_PURGE_UTILITIES.printdebug(p_purge_id,l_countstatement,p_debug_flag);
731: DBMS_SQL.PARSE(l_cursor,l_countstatement,DBMS_SQL.NATIVE);
732: DBMS_SQL.DEFINE_COLUMN(l_cursor,1,l_currval);
733: l_return := DBMS_SQL.EXECUTE_AND_FETCH(l_cursor);
734: DBMS_SQL.COLUMN_VALUE(l_cursor,1,l_currval);
735: IF (l_currval <> l_lastval) THEN

Line 732: DBMS_SQL.DEFINE_COLUMN(l_cursor,1,l_currval);

728: GMA_PURGE_UTILITIES.printdebug(p_purge_id,l_alterstatement,p_debug_flag);
729: DBMS_SQL.PARSE(l_cursor,l_alterstatement,DBMS_SQL.NATIVE);
730: GMA_PURGE_UTILITIES.printdebug(p_purge_id,l_countstatement,p_debug_flag);
731: DBMS_SQL.PARSE(l_cursor,l_countstatement,DBMS_SQL.NATIVE);
732: DBMS_SQL.DEFINE_COLUMN(l_cursor,1,l_currval);
733: l_return := DBMS_SQL.EXECUTE_AND_FETCH(l_cursor);
734: DBMS_SQL.COLUMN_VALUE(l_cursor,1,l_currval);
735: IF (l_currval <> l_lastval) THEN
736: GMA_PURGE_UTILITIES.printlong(p_purge_id,

Line 733: l_return := DBMS_SQL.EXECUTE_AND_FETCH(l_cursor);

729: DBMS_SQL.PARSE(l_cursor,l_alterstatement,DBMS_SQL.NATIVE);
730: GMA_PURGE_UTILITIES.printdebug(p_purge_id,l_countstatement,p_debug_flag);
731: DBMS_SQL.PARSE(l_cursor,l_countstatement,DBMS_SQL.NATIVE);
732: DBMS_SQL.DEFINE_COLUMN(l_cursor,1,l_currval);
733: l_return := DBMS_SQL.EXECUTE_AND_FETCH(l_cursor);
734: DBMS_SQL.COLUMN_VALUE(l_cursor,1,l_currval);
735: IF (l_currval <> l_lastval) THEN
736: GMA_PURGE_UTILITIES.printlong(p_purge_id,
737: 'Tablespace ' ||

Line 734: DBMS_SQL.COLUMN_VALUE(l_cursor,1,l_currval);

730: GMA_PURGE_UTILITIES.printdebug(p_purge_id,l_countstatement,p_debug_flag);
731: DBMS_SQL.PARSE(l_cursor,l_countstatement,DBMS_SQL.NATIVE);
732: DBMS_SQL.DEFINE_COLUMN(l_cursor,1,l_currval);
733: l_return := DBMS_SQL.EXECUTE_AND_FETCH(l_cursor);
734: DBMS_SQL.COLUMN_VALUE(l_cursor,1,l_currval);
735: IF (l_currval <> l_lastval) THEN
736: GMA_PURGE_UTILITIES.printlong(p_purge_id,
737: 'Tablespace ' ||
738: p_tablespace_name ||

Line 745: DBMS_SQL.CLOSE_CURSOR(l_cursor);

741: END IF;
742:
743: END LOOP;
744:
745: DBMS_SQL.CLOSE_CURSOR(l_cursor);
746: */
747:
748: RETURN;
749:

Line 838: l_cursor := DBMS_SQL.OPEN_CURSOR;

834: BEGIN
835:
836: p_indexcount := 0;
837:
838: l_cursor := DBMS_SQL.OPEN_CURSOR;
839:
840: -- loop through the tables
841: FOR l_tablecounter IN 0 .. (p_tablecount - 1) LOOP
842: -- we only care about indexes for tables marked for delete

Line 877: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);

873: IF (GMA_PURGE_ENGINE.use_ad_ddl = TRUE) THEN
874: AD_DDL.DO_DDL(p_owner,p_appl_short_name,AD_DDL.DROP_INDEX,
875: l_sqlstatement,l_current_idx);
876: ELSE
877: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);
878: END IF;
879:
880: GMA_PURGE_UTILITIES.printlong(p_purge_id,
881: l_current_idx ||

Line 952: DBMS_SQL.PARSE(l_cursor,l_runstatement,DBMS_SQL.NATIVE);

948: IF (GMA_PURGE_ENGINE.use_ad_ddl = TRUE) THEN
949: AD_DDL.DO_DDL(p_owner,p_appl_short_name,AD_DDL.DROP_INDEX,
950: l_sqlstatement,l_current_idx);
951: ELSE
952: DBMS_SQL.PARSE(l_cursor,l_runstatement,DBMS_SQL.NATIVE);
953: END IF;
954:
955: GMA_PURGE_UTILITIES.printlong(p_purge_id,
956: l_current_idx ||

Line 965: DBMS_SQL.CLOSE_CURSOR(l_cursor);

961: GMA_PURGE_UTILITIES.printlong(p_purge_id,l_sqlstatement);
962:
963: END IF;
964:
965: DBMS_SQL.CLOSE_CURSOR(l_cursor);
966:
967: RETURN;
968:
969: EXCEPTION

Line 999: l_cursor := DBMS_SQL.OPEN_CURSOR;

995: l_parse_success BOOLEAN;
996:
997: BEGIN
998:
999: l_cursor := DBMS_SQL.OPEN_CURSOR;
1000:
1001: -- coalesce any index tablespaces
1002: IF (p_idx_tablespace_count > 0) THEN
1003: FOR l_idx_tablespace_count IN 0 .. (p_idx_tablespace_count - 1) LOOP

Line 1037: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);

1033: IF (GMA_PURGE_ENGINE.use_ad_ddl = TRUE) THEN
1034: AD_DDL.DO_DDL(p_owner,p_appl_short_name,AD_DDL.CREATE_INDEX,
1035: l_sqlstatement,l_indexname);
1036: ELSE
1037: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);
1038: END IF;
1039: EXCEPTION
1040: WHEN OTHERS THEN
1041: l_parse_success := FALSE;

Line 1058: DBMS_SQL.CLOSE_CURSOR(l_cursor);

1054: END IF;
1055:
1056: END LOOP;
1057:
1058: DBMS_SQL.CLOSE_CURSOR(l_cursor);
1059:
1060: RETURN;
1061:
1062: EXCEPTION