DBA Data[Home] [Help]

APPS.EDW_DB_STATUS dependencies on DBMS_SQL

Line 167: cid := DBMS_SQL.open_cursor;

163: edw_misc_util.globalNamesOff;
164:
165: -- Check to make sure that all the enabled OLTP sources are up and running
166:
167: cid := DBMS_SQL.open_cursor;
168:
169: OPEN instances;
170:
171: LOOP

Line 180: DBMS_SQL.PARSE(cid, 'SELECT 1 FROM sys.dual@'||l_db_link, dbms_sql.native);

176: EXIT WHEN instances%NOTFOUND;
177:
178: -- Store the instance name in the out parameter to return
179:
180: DBMS_SQL.PARSE(cid, 'SELECT 1 FROM sys.dual@'||l_db_link, dbms_sql.native);
181: l_dummy_int := DBMS_SQL.EXECUTE(cid);
182:
183: l_progress := '030';
184: EXCEPTION

Line 181: l_dummy_int := DBMS_SQL.EXECUTE(cid);

177:
178: -- Store the instance name in the out parameter to return
179:
180: DBMS_SQL.PARSE(cid, 'SELECT 1 FROM sys.dual@'||l_db_link, dbms_sql.native);
181: l_dummy_int := DBMS_SQL.EXECUTE(cid);
182:
183: l_progress := '030';
184: EXCEPTION
185: when others then

Line 194: DBMS_SQL.close_cursor(cid);

190: END LOOP;
191:
192: CLOSE instances;
193:
194: DBMS_SQL.close_cursor(cid);
195:
196: return l_status;
197:
198: EXCEPTION when others then

Line 230: cid := DBMS_SQL.open_cursor;

226:
227: edw_misc_util.globalNamesOff;
228: -- Check to make sure that all the enabled OLTP sources are up and running
229:
230: cid := DBMS_SQL.open_cursor;
231:
232: OPEN instances;
233:
234: l_progress := '020';

Line 240: DBMS_SQL.PARSE(cid, 'SELECT 1 FROM sys.dual@'||l_db_link, dbms_sql.native);

236: FETCH instances INTO l_instance_code, l_db_link;
237:
238: -- Store the instance name in the out parameter to return
239:
240: DBMS_SQL.PARSE(cid, 'SELECT 1 FROM sys.dual@'||l_db_link, dbms_sql.native);
241: l_dummy_int:=DBMS_SQL.EXECUTE(cid);
242:
243:
244: l_progress := '030';

Line 241: l_dummy_int:=DBMS_SQL.EXECUTE(cid);

237:
238: -- Store the instance name in the out parameter to return
239:
240: DBMS_SQL.PARSE(cid, 'SELECT 1 FROM sys.dual@'||l_db_link, dbms_sql.native);
241: l_dummy_int:=DBMS_SQL.EXECUTE(cid);
242:
243:
244: l_progress := '030';
245:

Line 248: DBMS_SQL.close_cursor(cid);

244: l_progress := '030';
245:
246: CLOSE instances;
247:
248: DBMS_SQL.close_cursor(cid);
249:
250: return l_status;
251:
252: EXCEPTION

Line 254: DBMS_SQL.close_cursor(cid);

250: return l_status;
251:
252: EXCEPTION
253: when others then
254: DBMS_SQL.close_cursor(cid);
255: l_status := FALSE;
256: edw_message_s.sql_error('check_db_status',l_progress,sqlcode);
257:
258: END check_db_status_site;

Line 283: cid := DBMS_SQL.open_cursor;

279:
280: l_progress := '010';
281: edw_misc_util.globalNamesOff;
282:
283: cid := DBMS_SQL.open_cursor;
284: cid1 := DBMS_SQL.open_cursor;
285: cid2 := DBMS_SQL.open_cursor;
286:
287:

Line 284: cid1 := DBMS_SQL.open_cursor;

280: l_progress := '010';
281: edw_misc_util.globalNamesOff;
282:
283: cid := DBMS_SQL.open_cursor;
284: cid1 := DBMS_SQL.open_cursor;
285: cid2 := DBMS_SQL.open_cursor;
286:
287:
288: BEGIN

Line 285: cid2 := DBMS_SQL.open_cursor;

281: edw_misc_util.globalNamesOff;
282:
283: cid := DBMS_SQL.open_cursor;
284: cid1 := DBMS_SQL.open_cursor;
285: cid2 := DBMS_SQL.open_cursor;
286:
287:
288: BEGIN
289:

Line 291: DBMS_SQL.PARSE(cid, l_sql_stmt ,dbms_sql.V7);

287:
288: BEGIN
289:
290: l_sql_stmt := ' SELECT 1 FROM dual@edw_wh_to_rep';
291: DBMS_SQL.PARSE(cid, l_sql_stmt ,dbms_sql.V7);
292:
293: l_dummy_int :=DBMS_SQL.EXECUTE(cid);
294:
295: l_progress := '015';

Line 293: l_dummy_int :=DBMS_SQL.EXECUTE(cid);

289:
290: l_sql_stmt := ' SELECT 1 FROM dual@edw_wh_to_rep';
291: DBMS_SQL.PARSE(cid, l_sql_stmt ,dbms_sql.V7);
292:
293: l_dummy_int :=DBMS_SQL.EXECUTE(cid);
294:
295: l_progress := '015';
296:
297: EXCEPTION

Line 320: DBMS_SQL.PARSE(cid1, l_sql_stmt ,dbms_sql.V7);

316: */
317:
318: l_sql_stmt := 'SELECT inst_mod_id FROM wh_inst_mods_v@edw_wh_to_rep WHERE sw_mod_type_code = ''DTWH''';
319:
320: DBMS_SQL.PARSE(cid1, l_sql_stmt ,dbms_sql.V7);
321: DBMS_SQL.DEFINE_COLUMN(cid1, 1, l_inst_mod_id);
322: l_dummy_int :=DBMS_SQL.EXECUTE(cid1);
323:
324: l_num := DBMS_SQL.FETCH_ROWS(cid1);

Line 321: DBMS_SQL.DEFINE_COLUMN(cid1, 1, l_inst_mod_id);

317:
318: l_sql_stmt := 'SELECT inst_mod_id FROM wh_inst_mods_v@edw_wh_to_rep WHERE sw_mod_type_code = ''DTWH''';
319:
320: DBMS_SQL.PARSE(cid1, l_sql_stmt ,dbms_sql.V7);
321: DBMS_SQL.DEFINE_COLUMN(cid1, 1, l_inst_mod_id);
322: l_dummy_int :=DBMS_SQL.EXECUTE(cid1);
323:
324: l_num := DBMS_SQL.FETCH_ROWS(cid1);
325: DBMS_SQL.COLUMN_VALUE(cid1, 1, l_inst_mod_id);

Line 322: l_dummy_int :=DBMS_SQL.EXECUTE(cid1);

318: l_sql_stmt := 'SELECT inst_mod_id FROM wh_inst_mods_v@edw_wh_to_rep WHERE sw_mod_type_code = ''DTWH''';
319:
320: DBMS_SQL.PARSE(cid1, l_sql_stmt ,dbms_sql.V7);
321: DBMS_SQL.DEFINE_COLUMN(cid1, 1, l_inst_mod_id);
322: l_dummy_int :=DBMS_SQL.EXECUTE(cid1);
323:
324: l_num := DBMS_SQL.FETCH_ROWS(cid1);
325: DBMS_SQL.COLUMN_VALUE(cid1, 1, l_inst_mod_id);
326:

Line 324: l_num := DBMS_SQL.FETCH_ROWS(cid1);

320: DBMS_SQL.PARSE(cid1, l_sql_stmt ,dbms_sql.V7);
321: DBMS_SQL.DEFINE_COLUMN(cid1, 1, l_inst_mod_id);
322: l_dummy_int :=DBMS_SQL.EXECUTE(cid1);
323:
324: l_num := DBMS_SQL.FETCH_ROWS(cid1);
325: DBMS_SQL.COLUMN_VALUE(cid1, 1, l_inst_mod_id);
326:
327:
328: -- l_status_flag := wh_inst_mods_pkg.freeze_check@EDW_WH_TO_REP(l_inst_mod_id);

Line 325: DBMS_SQL.COLUMN_VALUE(cid1, 1, l_inst_mod_id);

321: DBMS_SQL.DEFINE_COLUMN(cid1, 1, l_inst_mod_id);
322: l_dummy_int :=DBMS_SQL.EXECUTE(cid1);
323:
324: l_num := DBMS_SQL.FETCH_ROWS(cid1);
325: DBMS_SQL.COLUMN_VALUE(cid1, 1, l_inst_mod_id);
326:
327:
328: -- l_status_flag := wh_inst_mods_pkg.freeze_check@EDW_WH_TO_REP(l_inst_mod_id);
329:

Line 336: dbms_sql.parse(cid2, l_sql_stmt1,dbms_sql.native);

332: ':l_status_flag := x;'||
333: 'end;';
334:
335:
336: dbms_sql.parse(cid2, l_sql_stmt1,dbms_sql.native);
337: dbms_sql.bind_variable(cid2, 'l_status_flag', l_status_flag, 1) ;
338: l_dummy_int := dbms_sql.execute(cid2);
339: dbms_sql.variable_value(cid2, 'l_status_flag', l_status_flag) ;
340:

Line 337: dbms_sql.bind_variable(cid2, 'l_status_flag', l_status_flag, 1) ;

333: 'end;';
334:
335:
336: dbms_sql.parse(cid2, l_sql_stmt1,dbms_sql.native);
337: dbms_sql.bind_variable(cid2, 'l_status_flag', l_status_flag, 1) ;
338: l_dummy_int := dbms_sql.execute(cid2);
339: dbms_sql.variable_value(cid2, 'l_status_flag', l_status_flag) ;
340:
341:

Line 338: l_dummy_int := dbms_sql.execute(cid2);

334:
335:
336: dbms_sql.parse(cid2, l_sql_stmt1,dbms_sql.native);
337: dbms_sql.bind_variable(cid2, 'l_status_flag', l_status_flag, 1) ;
338: l_dummy_int := dbms_sql.execute(cid2);
339: dbms_sql.variable_value(cid2, 'l_status_flag', l_status_flag) ;
340:
341:
342: IF (l_status_flag = 'Y') THEN

Line 339: dbms_sql.variable_value(cid2, 'l_status_flag', l_status_flag) ;

335:
336: dbms_sql.parse(cid2, l_sql_stmt1,dbms_sql.native);
337: dbms_sql.bind_variable(cid2, 'l_status_flag', l_status_flag, 1) ;
338: l_dummy_int := dbms_sql.execute(cid2);
339: dbms_sql.variable_value(cid2, 'l_status_flag', l_status_flag) ;
340:
341:
342: IF (l_status_flag = 'Y') THEN
343: fnd_message.set_name('BIS', 'EDW_REP_META_FROZEN');

Line 346: DBMS_SQL.close_cursor(cid);

342: IF (l_status_flag = 'Y') THEN
343: fnd_message.set_name('BIS', 'EDW_REP_META_FROZEN');
344: END IF;
345:
346: DBMS_SQL.close_cursor(cid);
347: DBMS_SQL.close_cursor(cid1);
348: DBMS_SQL.close_cursor(cid2);
349:
350: return l_status_flag;

Line 347: DBMS_SQL.close_cursor(cid1);

343: fnd_message.set_name('BIS', 'EDW_REP_META_FROZEN');
344: END IF;
345:
346: DBMS_SQL.close_cursor(cid);
347: DBMS_SQL.close_cursor(cid1);
348: DBMS_SQL.close_cursor(cid2);
349:
350: return l_status_flag;
351:

Line 348: DBMS_SQL.close_cursor(cid2);

344: END IF;
345:
346: DBMS_SQL.close_cursor(cid);
347: DBMS_SQL.close_cursor(cid1);
348: DBMS_SQL.close_cursor(cid2);
349:
350: return l_status_flag;
351:
352: EXCEPTION

Line 355: DBMS_SQL.close_cursor(cid);

351:
352: EXCEPTION
353: when others then
354:
355: DBMS_SQL.close_cursor(cid);
356: DBMS_SQL.close_cursor(cid1);
357: DBMS_SQL.close_cursor(cid2);
358:
359: edw_message_s.sql_error('check_repository_status',l_progress,sqlcode);

Line 356: DBMS_SQL.close_cursor(cid1);

352: EXCEPTION
353: when others then
354:
355: DBMS_SQL.close_cursor(cid);
356: DBMS_SQL.close_cursor(cid1);
357: DBMS_SQL.close_cursor(cid2);
358:
359: edw_message_s.sql_error('check_repository_status',l_progress,sqlcode);
360:

Line 357: DBMS_SQL.close_cursor(cid2);

353: when others then
354:
355: DBMS_SQL.close_cursor(cid);
356: DBMS_SQL.close_cursor(cid1);
357: DBMS_SQL.close_cursor(cid2);
358:
359: edw_message_s.sql_error('check_repository_status',l_progress,sqlcode);
360:
361:

Line 383: cid := DBMS_SQL.open_cursor;

379:
380: BEGIN
381: l_progress := '010';
382: edw_misc_util.globalNamesOff;
383: cid := DBMS_SQL.open_cursor;
384:
385: OPEN instances;
386:
387: LOOP

Line 408: DBMS_SQL.PARSE(cid, l_sql_stmt, dbms_sql.native);

404: l_progress := '030';
405:
406: l_sql_stmt:=' DELETE '||p_table_name||'@'||l_db_link;
407:
408: DBMS_SQL.PARSE(cid, l_sql_stmt, dbms_sql.native);
409:
410: l_dummy := dbms_sql.execute(cid);
411:
412: l_progress := '040';

Line 410: l_dummy := dbms_sql.execute(cid);

406: l_sql_stmt:=' DELETE '||p_table_name||'@'||l_db_link;
407:
408: DBMS_SQL.PARSE(cid, l_sql_stmt, dbms_sql.native);
409:
410: l_dummy := dbms_sql.execute(cid);
411:
412: l_progress := '040';
413:
414: l_sql_stmt:=' INSERT INTO '||p_table_name||'@'||l_db_link||' SELECT * FROM '||p_table_name;

Line 415: DBMS_SQL.PARSE(cid,l_sql_stmt, dbms_sql.native);

411:
412: l_progress := '040';
413:
414: l_sql_stmt:=' INSERT INTO '||p_table_name||'@'||l_db_link||' SELECT * FROM '||p_table_name;
415: DBMS_SQL.PARSE(cid,l_sql_stmt, dbms_sql.native);
416:
417: l_dummy := dbms_sql.execute(cid);
418:
419: END IF;

Line 417: l_dummy := dbms_sql.execute(cid);

413:
414: l_sql_stmt:=' INSERT INTO '||p_table_name||'@'||l_db_link||' SELECT * FROM '||p_table_name;
415: DBMS_SQL.PARSE(cid,l_sql_stmt, dbms_sql.native);
416:
417: l_dummy := dbms_sql.execute(cid);
418:
419: END IF;
420:
421: EXCEPTION

Line 429: DBMS_SQL.close_cursor(cid);

425: END;
426:
427: END LOOP;
428:
429: DBMS_SQL.close_cursor(cid);
430:
431: CLOSE instances;
432:
433: return l_status;

Line 458: cid := DBMS_SQL.open_cursor;

454: BEGIN
455:
456: l_progress := '010';
457:
458: cid := DBMS_SQL.open_cursor;
459:
460: edw_misc_util.globalNamesOff;
461: OPEN instances;
462:

Line 474: DBMS_SQL.PARSE(cid, l_sql_stmt, dbms_sql.native);

470: l_progress := '020';
471:
472: l_sql_stmt:=' DELETE '||p_table_name||'@'||l_db_link;
473:
474: DBMS_SQL.PARSE(cid, l_sql_stmt, dbms_sql.native);
475: l_dummy := dbms_sql.execute(cid);
476:
477: l_progress := '040';
478:

Line 475: l_dummy := dbms_sql.execute(cid);

471:
472: l_sql_stmt:=' DELETE '||p_table_name||'@'||l_db_link;
473:
474: DBMS_SQL.PARSE(cid, l_sql_stmt, dbms_sql.native);
475: l_dummy := dbms_sql.execute(cid);
476:
477: l_progress := '040';
478:
479: l_sql_stmt:=' INSERT INTO '||p_table_name||'@'||l_db_link

Line 482: DBMS_SQL.PARSE(cid,l_sql_stmt, dbms_sql.native);

478:
479: l_sql_stmt:=' INSERT INTO '||p_table_name||'@'||l_db_link
480: ||' SELECT * FROM '||p_table_name;
481:
482: DBMS_SQL.PARSE(cid,l_sql_stmt, dbms_sql.native);
483:
484: l_dummy := dbms_sql.execute(cid);
485:
486: DBMS_SQL.close_cursor(cid);

Line 484: l_dummy := dbms_sql.execute(cid);

480: ||' SELECT * FROM '||p_table_name;
481:
482: DBMS_SQL.PARSE(cid,l_sql_stmt, dbms_sql.native);
483:
484: l_dummy := dbms_sql.execute(cid);
485:
486: DBMS_SQL.close_cursor(cid);
487:
488: END IF;

Line 486: DBMS_SQL.close_cursor(cid);

482: DBMS_SQL.PARSE(cid,l_sql_stmt, dbms_sql.native);
483:
484: l_dummy := dbms_sql.execute(cid);
485:
486: DBMS_SQL.close_cursor(cid);
487:
488: END IF;
489:
490: CLOSE instances;

Line 497: DBMS_SQL.close_cursor(cid);

493:
494:
495: EXCEPTION
496: when others then
497: DBMS_SQL.close_cursor(cid);
498: edw_message_s.sql_error('replicate_table_to_all_site1',l_progress,sqlcode);
499: l_status:='FALSE';
500: return l_status;
501: