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_ENGINE dependencies on DBMS_SQL

Line 1116: -- DBMS_SQL.CLOSE_CURSOR(NULL);

1112: end if;
1113:
1114: GMA_PURGE_ENGINE.report_exit(p_purge_id,l_status);
1115:
1116: -- DBMS_SQL.CLOSE_CURSOR(NULL);
1117: RETURN; -- Exit program.
1118:
1119: EXCEPTION
1120:

Line 1181: -- DBMS_SQL.CLOSE_CURSOR(NULL);

1177: end if;
1178:
1179: COMMIT;
1180:
1181: -- DBMS_SQL.CLOSE_CURSOR(NULL);
1182:
1183: END main;
1184:
1185: /***********************************************************/

Line 1205: l_cursor := DBMS_SQL.OPEN_CURSOR;

1201: l_sqlstatement sy_purg_def.sqlstatement%TYPE;
1202:
1203: BEGIN
1204:
1205: l_cursor := DBMS_SQL.OPEN_CURSOR;
1206:
1207: l_sqlstatement := 'CREATE TABLE ' || p_owner || '.' ||
1208: p_arcrowtable || ' TABLESPACE ' ||
1209: p_tablespace || ' nologging AS ' ||

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

1216: -- IF (GMA_PURGE_ENGINE.use_ad_ddl = TRUE) THEN
1217: -- AD_DDL.DO_DDL(p_owner,p_appl_short_name,AD_DDL.CREATE_TABLE,
1218: -- l_sqlstatement,p_arcrowtable);
1219: -- ELSE
1220: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);
1221: l_result := DBMS_SQL.EXECUTE(l_cursor);
1222: -- END IF;
1223:
1224: IF l_result <> 0 THEN

Line 1221: l_result := DBMS_SQL.EXECUTE(l_cursor);

1217: -- AD_DDL.DO_DDL(p_owner,p_appl_short_name,AD_DDL.CREATE_TABLE,
1218: -- l_sqlstatement,p_arcrowtable);
1219: -- ELSE
1220: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);
1221: l_result := DBMS_SQL.EXECUTE(l_cursor);
1222: -- END IF;
1223:
1224: IF l_result <> 0 THEN
1225: RAISE l_badstatement;

Line 1228: DBMS_SQL.CLOSE_CURSOR(l_cursor);

1224: IF l_result <> 0 THEN
1225: RAISE l_badstatement;
1226: END IF;
1227:
1228: DBMS_SQL.CLOSE_CURSOR(l_cursor);
1229:
1230: RETURN;
1231:
1232: EXCEPTION

Line 1276: l_cursor := DBMS_SQL.OPEN_CURSOR;

1272: -- lpad('Deleted',10)); --commented
1273: GMA_PURGE_UTILITIES.printlong(p_purge_id,
1274: '');
1275:
1276: l_cursor := DBMS_SQL.OPEN_CURSOR;
1277:
1278: FOR l_tableno IN 0 .. p_tablecount LOOP
1279:
1280:

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

1285: l_sqlstatement := 'SELECT COUNT(*) FROM ' ||Get_GmaSchemaName||'.'||
1286: GMA_PURGE_UTILITIES.makearcname(p_purge_id,
1287: p_arctables_tab(l_tableno));
1288:
1289: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);
1290: DBMS_SQL.DEFINE_COLUMN(l_cursor,1,l_archiverows);
1291: l_result := DBMS_SQL.EXECUTE_AND_FETCH(l_cursor);
1292: DBMS_SQL.COLUMN_VALUE(l_cursor,1,l_archiverows);
1293:

Line 1290: DBMS_SQL.DEFINE_COLUMN(l_cursor,1,l_archiverows);

1286: GMA_PURGE_UTILITIES.makearcname(p_purge_id,
1287: p_arctables_tab(l_tableno));
1288:
1289: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);
1290: DBMS_SQL.DEFINE_COLUMN(l_cursor,1,l_archiverows);
1291: l_result := DBMS_SQL.EXECUTE_AND_FETCH(l_cursor);
1292: DBMS_SQL.COLUMN_VALUE(l_cursor,1,l_archiverows);
1293:
1294: -- did we delete any rows?

Line 1291: l_result := DBMS_SQL.EXECUTE_AND_FETCH(l_cursor);

1287: p_arctables_tab(l_tableno));
1288:
1289: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);
1290: DBMS_SQL.DEFINE_COLUMN(l_cursor,1,l_archiverows);
1291: l_result := DBMS_SQL.EXECUTE_AND_FETCH(l_cursor);
1292: DBMS_SQL.COLUMN_VALUE(l_cursor,1,l_archiverows);
1293:
1294: -- did we delete any rows?
1295: IF p_arcactions_tab(l_tableno) = 'D' THEN

Line 1292: DBMS_SQL.COLUMN_VALUE(l_cursor,1,l_archiverows);

1288:
1289: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);
1290: DBMS_SQL.DEFINE_COLUMN(l_cursor,1,l_archiverows);
1291: l_result := DBMS_SQL.EXECUTE_AND_FETCH(l_cursor);
1292: DBMS_SQL.COLUMN_VALUE(l_cursor,1,l_archiverows);
1293:
1294: -- did we delete any rows?
1295: IF p_arcactions_tab(l_tableno) = 'D' THEN
1296: l_deleterows := l_archiverows;

Line 1335: DBMS_SQL.CLOSE_CURSOR(l_cursor);

1331: p_totdeleterows := p_totdeleterows + l_deleterows;
1332:
1333: END LOOP;
1334:
1335: DBMS_SQL.CLOSE_CURSOR(l_cursor);
1336:
1337: EXCEPTION
1338:
1339: WHEN OTHERS THEN

Line 2170: l_cursor := DBMS_SQL.OPEN_CURSOR;

2166: -- l_temptable:=p_purge_type||'_'||P_purge_id;
2167: l_temptable:=GMA_PURGE_UTILITIES.makearcname(p_purge_id,
2168: 'TEMP');
2169:
2170: l_cursor := DBMS_SQL.OPEN_CURSOR;
2171:
2172: l_sqlstatement := 'CREATE TABLE ' || p_owner || '.' ||
2173: l_temptable|| ' (all_ids varchar2(100)) nologging';
2174:

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

2178: GMA_PURGE_UTILITIES.printlong(p_purge_id,l_sqlstatement);
2179: END IF;
2180: -- MADE BY KHAJA
2181:
2182: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);
2183: l_result := DBMS_SQL.EXECUTE(l_cursor);
2184:
2185: IF l_result=0 then
2186:

Line 2183: l_result := DBMS_SQL.EXECUTE(l_cursor);

2179: END IF;
2180: -- MADE BY KHAJA
2181:
2182: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);
2183: l_result := DBMS_SQL.EXECUTE(l_cursor);
2184:
2185: IF l_result=0 then
2186:
2187: l_sqlstatement := 'INSERT INTO '||p_owner ||'.'||l_temptable|| ' values(:V_bindfix)';

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

2196: IF (p_debug_flag = TRUE) THEN
2197: GMA_PURGE_UTILITIES.printlong(p_purge_id,l_sqlstatement);
2198: END IF;
2199:
2200: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);
2201: --added by Khaja for SQL BIND VARIABLE project fix see 2935158
2202: dbms_sql.bind_variable(l_cursor, 'V_bindfix','-9999');
2203: l_result := DBMS_SQL.EXECUTE(l_cursor);
2204:

Line 2202: dbms_sql.bind_variable(l_cursor, 'V_bindfix','-9999');

2198: END IF;
2199:
2200: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);
2201: --added by Khaja for SQL BIND VARIABLE project fix see 2935158
2202: dbms_sql.bind_variable(l_cursor, 'V_bindfix','-9999');
2203: l_result := DBMS_SQL.EXECUTE(l_cursor);
2204:
2205: END IF;
2206:

Line 2203: l_result := DBMS_SQL.EXECUTE(l_cursor);

2199:
2200: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);
2201: --added by Khaja for SQL BIND VARIABLE project fix see 2935158
2202: dbms_sql.bind_variable(l_cursor, 'V_bindfix','-9999');
2203: l_result := DBMS_SQL.EXECUTE(l_cursor);
2204:
2205: END IF;
2206:
2207: /* IF l_result <> 0 THEN

Line 2213: DBMS_SQL.CLOSE_CURSOR(l_cursor);

2209: END IF;
2210: */
2211:
2212:
2213: DBMS_SQL.CLOSE_CURSOR(l_cursor);
2214:
2215: RETURN p_owner||'.'||l_temptable;
2216:
2217: EXCEPTION

Line 2260: l_cursor := DBMS_SQL.OPEN_CURSOR;

2256: -- l_temptable:=p_purge_type||'_'||p_purge_id;
2257: l_temptable:=GMA_PURGE_UTILITIES.makearcname(p_purge_id,
2258: 'TEMP');
2259:
2260: l_cursor := DBMS_SQL.OPEN_CURSOR;
2261:
2262: -- l_sqlstatement := 'INSERT INTO ' || 'GMA' || '.' ||
2263: -- Created a FUNCTION for GSCC standard fix bug 3871659
2264: -- Standard: File.Sql.6 - Do NOT include any references to hardcoded schema

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

2271: GMA_PURGE_UTILITIES.printlong(p_purge_id,l_sqlstatement);
2272: END IF;
2273: */
2274:
2275: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);
2276: dbms_sql.bind_variable(l_cursor, 'all_ids',p_all_ids);
2277: l_result := DBMS_SQL.EXECUTE(l_cursor);
2278:
2279: /* IF l_result <> 0 THEN

Line 2276: dbms_sql.bind_variable(l_cursor, 'all_ids',p_all_ids);

2272: END IF;
2273: */
2274:
2275: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);
2276: dbms_sql.bind_variable(l_cursor, 'all_ids',p_all_ids);
2277: l_result := DBMS_SQL.EXECUTE(l_cursor);
2278:
2279: /* IF l_result <> 0 THEN
2280: RAISE l_badstatement;

Line 2277: l_result := DBMS_SQL.EXECUTE(l_cursor);

2273: */
2274:
2275: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);
2276: dbms_sql.bind_variable(l_cursor, 'all_ids',p_all_ids);
2277: l_result := DBMS_SQL.EXECUTE(l_cursor);
2278:
2279: /* IF l_result <> 0 THEN
2280: RAISE l_badstatement;
2281: END IF;

Line 2285: DBMS_SQL.CLOSE_CURSOR(l_cursor);

2281: END IF;
2282: */
2283:
2284:
2285: DBMS_SQL.CLOSE_CURSOR(l_cursor);
2286:
2287: EXCEPTION
2288: WHEN l_badstatement THEN
2289: GMA_PURGE_UTILITIES.printlong(p_purge_id,

Line 2329: l_cursor := DBMS_SQL.OPEN_CURSOR;

2325: -- l_temptable:=P_purge_type||'_'||p_purge_id;
2326: l_temptable:=GMA_PURGE_UTILITIES.makearcname(p_purge_id,
2327: 'TEMP');
2328:
2329: l_cursor := DBMS_SQL.OPEN_CURSOR;
2330:
2331: -- l_sqlstatement := 'DROP TABLE ' || 'GMA' || '.' ||l_temptable;
2332: -- Created a FUNCTION for GSCC standard fix bug 3871659
2333: -- Standard: File.Sql.6 - Do NOT include any references to hardcoded schema

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

2337: IF (p_debug_flag = TRUE) THEN
2338: GMA_PURGE_UTILITIES.printlong(p_purge_id,l_sqlstatement);
2339: END IF;
2340:
2341: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);
2342: l_result := DBMS_SQL.EXECUTE(l_cursor);
2343:
2344: IF l_result <> 0 THEN
2345: RAISE l_badstatement;

Line 2342: l_result := DBMS_SQL.EXECUTE(l_cursor);

2338: GMA_PURGE_UTILITIES.printlong(p_purge_id,l_sqlstatement);
2339: END IF;
2340:
2341: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);
2342: l_result := DBMS_SQL.EXECUTE(l_cursor);
2343:
2344: IF l_result <> 0 THEN
2345: RAISE l_badstatement;
2346: END IF;

Line 2355: DBMS_SQL.CLOSE_CURSOR(l_cursor);

2351: GMA_PURGE_UTILITIES.printlong(p_purge_id,
2352: 'Temporary table '||Get_GmaSchemaName||'.'||l_temptable||' dropped.');
2353: -- 'Temporary table '||l_temptable||' dropped.');
2354:
2355: DBMS_SQL.CLOSE_CURSOR(l_cursor);
2356:
2357: EXCEPTION
2358: WHEN l_badstatement THEN
2359: GMA_PURGE_UTILITIES.printlong(p_purge_id,

Line 2426: l_cursor := DBMS_SQL.OPEN_CURSOR;

2422: 'TEMP');
2423: GMA_PURGE_UTILITIES.printlong(p_purge_id,
2424: 'Reset Process initiated.');
2425:
2426: l_cursor := DBMS_SQL.OPEN_CURSOR;
2427: FOR rec in Cur_DropTbl(P_purge_id, l_schema_name)
2428: Loop
2429: if l_rows=0 then
2430: Update sy_purg_mst set status=0 where purge_id=P_purge_id;

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

2440: GMA_PURGE_UTILITIES.printlong(p_purge_id,l_sqlstatement);
2441: END IF;
2442:
2443: --parse the RENAME stmt if table not found.
2444: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);
2445: l_result := DBMS_SQL.EXECUTE(l_cursor);
2446:
2447:
2448: IF l_result <> 0 THEN

Line 2445: l_result := DBMS_SQL.EXECUTE(l_cursor);

2441: END IF;
2442:
2443: --parse the RENAME stmt if table not found.
2444: DBMS_SQL.PARSE(l_cursor,l_sqlstatement,DBMS_SQL.NATIVE);
2445: l_result := DBMS_SQL.EXECUTE(l_cursor);
2446:
2447:
2448: IF l_result <> 0 THEN
2449: RAISE l_badstatement;

Line 2460: DBMS_SQL.CLOSE_CURSOR(l_cursor);

2456: GMA_PURGE_UTILITIES.printlong(p_purge_id,
2457: 'Reset Process completed successfully.');
2458:
2459: -- Close the cursor
2460: DBMS_SQL.CLOSE_CURSOR(l_cursor);
2461:
2462: EXCEPTION
2463: WHEN l_badstatement THEN
2464: GMA_PURGE_UTILITIES.printlong(p_purge_id,