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.FND_OAM_DSCRAM_UTILS_PKG dependencies on FND_OAM_DEBUG

Line 272: fnd_oam_debug.log(1, l_ctxt, 'Attempting to stop Task ID: '||l_id);

268: l_current_status VARCHAR2(30);
269: BEGIN
270: IF p_fatality_level = G_TYPE_TASK THEN
271: l_id := FND_OAM_DSCRAM_TASKS_PKG.GET_TASK_ID;
272: fnd_oam_debug.log(1, l_ctxt, 'Attempting to stop Task ID: '||l_id);
273: SELECT task_status
274: INTO l_current_status
275: FROM fnd_oam_dscram_tasks
276: WHERE task_id = l_id

Line 288: fnd_oam_debug.log(1, l_ctxt, 'Skipping stopping task due to current status: '||l_current_status);

284: last_update_date = SYSDATE
285: WHERE task_id = l_id;
286: COMMIT;
287: ELSE
288: fnd_oam_debug.log(1, l_ctxt, 'Skipping stopping task due to current status: '||l_current_status);
289: END IF;
290: ELSIF p_fatality_level = G_TYPE_BUNDLE THEN
291: l_id := FND_OAM_DSCRAM_BUNDLES_PKG.GET_BUNDLE_ID;
292: fnd_oam_debug.log(1, l_ctxt, 'Attempting to stop Bundle ID: '||l_id);

Line 292: fnd_oam_debug.log(1, l_ctxt, 'Attempting to stop Bundle ID: '||l_id);

288: fnd_oam_debug.log(1, l_ctxt, 'Skipping stopping task due to current status: '||l_current_status);
289: END IF;
290: ELSIF p_fatality_level = G_TYPE_BUNDLE THEN
291: l_id := FND_OAM_DSCRAM_BUNDLES_PKG.GET_BUNDLE_ID;
292: fnd_oam_debug.log(1, l_ctxt, 'Attempting to stop Bundle ID: '||l_id);
293: SELECT bundle_status
294: INTO l_current_status
295: FROM fnd_oam_dscram_bundles
296: WHERE bundle_id = l_id

Line 308: fnd_oam_debug.log(1, l_ctxt, 'Skipping stopping bundle due to current status: '||l_current_status);

304: last_update_date = SYSDATE
305: WHERE bundle_id = l_id;
306: COMMIT;
307: ELSE
308: fnd_oam_debug.log(1, l_ctxt, 'Skipping stopping bundle due to current status: '||l_current_status);
309: END IF;
310: ELSIF p_fatality_level = G_TYPE_RUN THEN
311: l_id := FND_OAM_DSCRAM_RUNS_PKG.GET_RUN_ID;
312: fnd_oam_debug.log(1, l_ctxt, 'Attempting to stop Run ID: '||l_id);

Line 312: fnd_oam_debug.log(1, l_ctxt, 'Attempting to stop Run ID: '||l_id);

308: fnd_oam_debug.log(1, l_ctxt, 'Skipping stopping bundle due to current status: '||l_current_status);
309: END IF;
310: ELSIF p_fatality_level = G_TYPE_RUN THEN
311: l_id := FND_OAM_DSCRAM_RUNS_PKG.GET_RUN_ID;
312: fnd_oam_debug.log(1, l_ctxt, 'Attempting to stop Run ID: '||l_id);
313: SELECT run_status
314: INTO l_current_status
315: FROM fnd_oam_dscram_runs_b
316: WHERE run_id = l_id

Line 328: fnd_oam_debug.log(1, l_ctxt, 'Skipping stopping run due to current status: '||l_current_status);

324: last_update_date = SYSDATE
325: WHERE run_id = l_id;
326: COMMIT;
327: ELSE
328: fnd_oam_debug.log(1, l_ctxt, 'Skipping stopping run due to current status: '||l_current_status);
329: END IF;
330: ELSE
331: fnd_oam_debug.log(6, l_ctxt, 'Unknown fatality level: '|| p_fatality_level);
332: ROLLBACK;

Line 331: fnd_oam_debug.log(6, l_ctxt, 'Unknown fatality level: '|| p_fatality_level);

327: ELSE
328: fnd_oam_debug.log(1, l_ctxt, 'Skipping stopping run due to current status: '||l_current_status);
329: END IF;
330: ELSE
331: fnd_oam_debug.log(6, l_ctxt, 'Unknown fatality level: '|| p_fatality_level);
332: ROLLBACK;
333: END IF;
334: EXCEPTION
335: WHEN OTHERS THEN

Line 388: fnd_oam_debug.log(2, l_ctxt, 'ENTER');

384: l_retval NUMBER;
385: l_lock_name VARCHAR2(30);
386: l_lock_handle VARCHAR2(128);
387: BEGIN
388: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
389: l_lock_name := MAKE_RUN_LOCK_NAME(p_run_id);
390:
391: --fnd_oam_debug.log(1, l_ctxt, 'Allocated lock handle: '||l_lock_handle);
392: ALLOCATE_LOCK(l_lock_name,

Line 391: --fnd_oam_debug.log(1, l_ctxt, 'Allocated lock handle: '||l_lock_handle);

387: BEGIN
388: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
389: l_lock_name := MAKE_RUN_LOCK_NAME(p_run_id);
390:
391: --fnd_oam_debug.log(1, l_ctxt, 'Allocated lock handle: '||l_lock_handle);
392: ALLOCATE_LOCK(l_lock_name,
393: l_lock_handle);
394: l_retval := DBMS_LOCK.REQUEST(l_lock_handle,
395: dbms_lock.x_mode,

Line 398: --fnd_oam_debug.log(1, l_ctxt, 'Retval: '||l_retval);

394: l_retval := DBMS_LOCK.REQUEST(l_lock_handle,
395: dbms_lock.x_mode,
396: dbms_lock.maxwait,
397: TRUE);
398: --fnd_oam_debug.log(1, l_ctxt, 'Retval: '||l_retval);
399: IF (l_retval <> 0) THEN
400: fnd_oam_debug.log(6, l_ctxt, 'Run ID ('||p_run_id||'), lock request failed: '||l_retval);
401: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
402: RETURN FALSE;

Line 400: fnd_oam_debug.log(6, l_ctxt, 'Run ID ('||p_run_id||'), lock request failed: '||l_retval);

396: dbms_lock.maxwait,
397: TRUE);
398: --fnd_oam_debug.log(1, l_ctxt, 'Retval: '||l_retval);
399: IF (l_retval <> 0) THEN
400: fnd_oam_debug.log(6, l_ctxt, 'Run ID ('||p_run_id||'), lock request failed: '||l_retval);
401: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
402: RETURN FALSE;
403: END IF;
404:

Line 401: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

397: TRUE);
398: --fnd_oam_debug.log(1, l_ctxt, 'Retval: '||l_retval);
399: IF (l_retval <> 0) THEN
400: fnd_oam_debug.log(6, l_ctxt, 'Run ID ('||p_run_id||'), lock request failed: '||l_retval);
401: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
402: RETURN FALSE;
403: END IF;
404:
405: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

Line 405: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

401: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
402: RETURN FALSE;
403: END IF;
404:
405: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
406: x_lock_handle := l_lock_handle;
407: RETURN TRUE;
408: EXCEPTION
409: WHEN OTHERS THEN

Line 410: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');

406: x_lock_handle := l_lock_handle;
407: RETURN TRUE;
408: EXCEPTION
409: WHEN OTHERS THEN
410: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');
411: IF l_lock_handle IS NOT NULL THEN
412: l_retval := DBMS_LOCK.RELEASE(l_lock_handle);
413: IF l_retval <> 0 THEN
414: fnd_oam_debug.log(6, l_ctxt, 'Failed to release run lock: '||l_retval);

Line 414: fnd_oam_debug.log(6, l_ctxt, 'Failed to release run lock: '||l_retval);

410: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');
411: IF l_lock_handle IS NOT NULL THEN
412: l_retval := DBMS_LOCK.RELEASE(l_lock_handle);
413: IF l_retval <> 0 THEN
414: fnd_oam_debug.log(6, l_ctxt, 'Failed to release run lock: '||l_retval);
415: END IF;
416: END IF;
417: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
418: RETURN FALSE;

Line 417: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

413: IF l_retval <> 0 THEN
414: fnd_oam_debug.log(6, l_ctxt, 'Failed to release run lock: '||l_retval);
415: END IF;
416: END IF;
417: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
418: RETURN FALSE;
419: END;
420:
421: -- helper to lock arg

Line 440: fnd_oam_debug.log(2, l_ctxt, 'ENTER');

436: l_retval NUMBER;
437: l_lock_name VARCHAR2(30);
438: l_lock_handle VARCHAR2(128) := NULL;
439: BEGIN
440: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
441: l_lock_name := MAKE_ARG_LOCK_NAME(p_arg_id);
442:
443: ALLOCATE_LOCK(l_lock_name,
444: l_lock_handle);

Line 445: --fnd_oam_debug.log(1, l_ctxt, 'Allocated lock handle: '||l_lock_handle);

441: l_lock_name := MAKE_ARG_LOCK_NAME(p_arg_id);
442:
443: ALLOCATE_LOCK(l_lock_name,
444: l_lock_handle);
445: --fnd_oam_debug.log(1, l_ctxt, 'Allocated lock handle: '||l_lock_handle);
446:
447: --Allow lock releases on commit/rollback so we can keep write_once args locked when first set until the
448: --batch is comitted or rolled back.
449: l_retval := DBMS_LOCK.REQUEST(l_lock_handle,

Line 453: --fnd_oam_debug.log(1, l_ctxt, 'Retval: '||l_retval);

449: l_retval := DBMS_LOCK.REQUEST(l_lock_handle,
450: dbms_lock.x_mode,
451: dbms_lock.maxwait,
452: TRUE);
453: --fnd_oam_debug.log(1, l_ctxt, 'Retval: '||l_retval);
454: IF (l_retval <> 0) THEN
455: fnd_oam_debug.log(6, l_ctxt, 'Arg ID ('||p_arg_id||'), lock request failed: '||l_retval);
456: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
457: RETURN FALSE;

Line 455: fnd_oam_debug.log(6, l_ctxt, 'Arg ID ('||p_arg_id||'), lock request failed: '||l_retval);

451: dbms_lock.maxwait,
452: TRUE);
453: --fnd_oam_debug.log(1, l_ctxt, 'Retval: '||l_retval);
454: IF (l_retval <> 0) THEN
455: fnd_oam_debug.log(6, l_ctxt, 'Arg ID ('||p_arg_id||'), lock request failed: '||l_retval);
456: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
457: RETURN FALSE;
458: END IF;
459:

Line 456: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

452: TRUE);
453: --fnd_oam_debug.log(1, l_ctxt, 'Retval: '||l_retval);
454: IF (l_retval <> 0) THEN
455: fnd_oam_debug.log(6, l_ctxt, 'Arg ID ('||p_arg_id||'), lock request failed: '||l_retval);
456: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
457: RETURN FALSE;
458: END IF;
459:
460: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

Line 460: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

456: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
457: RETURN FALSE;
458: END IF;
459:
460: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
461: x_lock_handle := l_lock_handle;
462: RETURN TRUE;
463: EXCEPTION
464: WHEN OTHERS THEN

Line 465: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');

461: x_lock_handle := l_lock_handle;
462: RETURN TRUE;
463: EXCEPTION
464: WHEN OTHERS THEN
465: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');
466: IF l_lock_handle IS NOT NULL THEN
467: l_retval := DBMS_LOCK.RELEASE(l_lock_handle);
468: IF l_retval <> 0 THEN
469: fnd_oam_debug.log(6, l_ctxt, 'Failed to release arg lock: '||l_retval);

Line 469: fnd_oam_debug.log(6, l_ctxt, 'Failed to release arg lock: '||l_retval);

465: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');
466: IF l_lock_handle IS NOT NULL THEN
467: l_retval := DBMS_LOCK.RELEASE(l_lock_handle);
468: IF l_retval <> 0 THEN
469: fnd_oam_debug.log(6, l_ctxt, 'Failed to release arg lock: '||l_retval);
470: END IF;
471: END IF;
472: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
473: RETURN FALSE;

Line 472: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

468: IF l_retval <> 0 THEN
469: fnd_oam_debug.log(6, l_ctxt, 'Failed to release arg lock: '||l_retval);
470: END IF;
471: END IF;
472: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
473: RETURN FALSE;
474: END;
475:
476: -- helper to DELETE_ functions

Line 482: fnd_oam_debug.log(2, l_ctxt, 'ENTER');

478: p_object_id IN VARCHAR2)
479: IS
480: l_ctxt VARCHAR2(60) := PKG_NAME||'DELETE_STATS';
481: BEGIN
482: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
483:
484: --fnd_oam_debug.log(1, l_ctxt, 'Deleting stats...');
485: DELETE FROM fnd_oam_dscram_stats
486: WHERE source_object_type = p_object_type

Line 484: --fnd_oam_debug.log(1, l_ctxt, 'Deleting stats...');

480: l_ctxt VARCHAR2(60) := PKG_NAME||'DELETE_STATS';
481: BEGIN
482: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
483:
484: --fnd_oam_debug.log(1, l_ctxt, 'Deleting stats...');
485: DELETE FROM fnd_oam_dscram_stats
486: WHERE source_object_type = p_object_type
487: AND source_object_id = p_object_id;
488:

Line 489: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

485: DELETE FROM fnd_oam_dscram_stats
486: WHERE source_object_type = p_object_type
487: AND source_object_id = p_object_id;
488:
489: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
490: EXCEPTION
491: WHEN OTHERS THEN
492: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');
493: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

Line 492: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');

488:
489: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
490: EXCEPTION
491: WHEN OTHERS THEN
492: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');
493: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
494: END;
495:
496: --helper to DELETE_ functions

Line 493: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

489: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
490: EXCEPTION
491: WHEN OTHERS THEN
492: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');
493: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
494: END;
495:
496: --helper to DELETE_ functions
497: PROCEDURE DELETE_ARGS(p_object_type IN VARCHAR2,

Line 505: fnd_oam_debug.log(2, l_ctxt, 'ENTER');

501: l_ids DBMS_SQL.NUMBER_TABLE;
502: k NUMBER;
503: l_id NUMBER;
504: BEGIN
505: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
506:
507: --fnd_oam_debug.log(1, l_ctxt, 'Deleting args...');
508: SELECT arg_id
509: BULK COLLECT INTO l_ids

Line 507: --fnd_oam_debug.log(1, l_ctxt, 'Deleting args...');

503: l_id NUMBER;
504: BEGIN
505: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
506:
507: --fnd_oam_debug.log(1, l_ctxt, 'Deleting args...');
508: SELECT arg_id
509: BULK COLLECT INTO l_ids
510: FROM fnd_oam_dscram_args_b
511: WHERE parent_type = p_object_type

Line 526: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

522: WHERE arg_id = l_id;
523: k := l_ids.NEXT(k);
524: END LOOP;
525:
526: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
527: EXCEPTION
528: WHEN OTHERS THEN
529: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');
530: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

Line 529: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');

525:
526: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
527: EXCEPTION
528: WHEN OTHERS THEN
529: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');
530: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
531: END;
532:
533: --helper to DELETE_UNIT to delete AD parallel updates info when splitting was involved.

Line 530: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

526: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
527: EXCEPTION
528: WHEN OTHERS THEN
529: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');
530: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
531: END;
532:
533: --helper to DELETE_UNIT to delete AD parallel updates info when splitting was involved.
534: FUNCTION DELETE_AD_DATA(p_run_id IN NUMBER,

Line 548: fnd_oam_debug.log(2, l_ctxt, 'ENTER');

544: l_id NUMBER;
545:
546: k NUMBER;
547: BEGIN
548: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
549: --fnd_oam_debug.log(1, l_ctxt, 'Deleting args...');
550: SELECT update_id
551: BULK COLLECT INTO l_ids
552: FROM ad_parallel_updates

Line 549: --fnd_oam_debug.log(1, l_ctxt, 'Deleting args...');

545:
546: k NUMBER;
547: BEGIN
548: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
549: --fnd_oam_debug.log(1, l_ctxt, 'Deleting args...');
550: SELECT update_id
551: BULK COLLECT INTO l_ids
552: FROM ad_parallel_updates
553: WHERE owner = p_owner

Line 560: fnd_oam_debug.log(1, l_ctxt, 'AD Update ID: '||l_id);

556:
557: k := l_ids.FIRST;
558: WHILE k IS NOT NULL LOOP
559: l_id := l_ids(k);
560: fnd_oam_debug.log(1, l_ctxt, 'AD Update ID: '||l_id);
561: DELETE FROM ad_parallel_workers
562: WHERE update_id = l_id;
563: DELETE FROM ad_parallel_update_units
564: WHERE update_id = l_id;

Line 570: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

566: WHERE update_id = l_id;
567: k := l_ids.NEXT(k);
568: END LOOP;
569:
570: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
571: RETURN TRUE;
572: EXCEPTION
573: WHEN OTHERS THEN
574: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');

Line 574: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');

570: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
571: RETURN TRUE;
572: EXCEPTION
573: WHEN OTHERS THEN
574: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');
575: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
576: RETURN FALSE;
577: END;
578:

Line 575: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

571: RETURN TRUE;
572: EXCEPTION
573: WHEN OTHERS THEN
574: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');
575: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
576: RETURN FALSE;
577: END;
578:
579: --helper to DELETE_UNIT to delete plsqls

Line 589: fnd_oam_debug.log(2, l_ctxt, 'ENTER');

585: l_ids DBMS_SQL.NUMBER_TABLE;
586: k NUMBER;
587:
588: BEGIN
589: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
590:
591: fnd_oam_debug.log(1, l_ctxt, 'PLSQL ID: '||p_plsql_id);
592:
593: DELETE_STATS(FND_OAM_DSCRAM_UTILS_PKG.G_TYPE_PLSQL,

Line 591: fnd_oam_debug.log(1, l_ctxt, 'PLSQL ID: '||p_plsql_id);

587:
588: BEGIN
589: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
590:
591: fnd_oam_debug.log(1, l_ctxt, 'PLSQL ID: '||p_plsql_id);
592:
593: DELETE_STATS(FND_OAM_DSCRAM_UTILS_PKG.G_TYPE_PLSQL,
594: p_plsql_id);
595:

Line 600: fnd_oam_debug.log(1, l_ctxt, 'Deleting entity...');

596: DELETE_ARGS(FND_OAM_DSCRAM_UTILS_PKG.G_TYPE_PLSQL,
597: p_plsql_id);
598:
599: --delete the actual entity
600: fnd_oam_debug.log(1, l_ctxt, 'Deleting entity...');
601: DELETE FROM fnd_oam_dscram_plsqls
602: WHERE plsql_id = p_plsql_id;
603:
604: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

Line 604: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

600: fnd_oam_debug.log(1, l_ctxt, 'Deleting entity...');
601: DELETE FROM fnd_oam_dscram_plsqls
602: WHERE plsql_id = p_plsql_id;
603:
604: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
605: RETURN TRUE;
606: EXCEPTION
607: WHEN OTHERS THEN
608: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');

Line 608: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');

604: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
605: RETURN TRUE;
606: EXCEPTION
607: WHEN OTHERS THEN
608: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');
609: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
610: RETURN FALSE;
611: END;
612:

Line 609: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

605: RETURN TRUE;
606: EXCEPTION
607: WHEN OTHERS THEN
608: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');
609: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
610: RETURN FALSE;
611: END;
612:
613: --helper to DELETE_UNIT

Line 623: fnd_oam_debug.log(2, l_ctxt, 'ENTER');

619: l_ids DBMS_SQL.NUMBER_TABLE;
620: k NUMBER;
621:
622: BEGIN
623: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
624:
625: fnd_oam_debug.log(1, l_ctxt, 'DML ID: '||p_dml_id);
626:
627: DELETE_STATS(FND_OAM_DSCRAM_UTILS_PKG.G_TYPE_DML,

Line 625: fnd_oam_debug.log(1, l_ctxt, 'DML ID: '||p_dml_id);

621:
622: BEGIN
623: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
624:
625: fnd_oam_debug.log(1, l_ctxt, 'DML ID: '||p_dml_id);
626:
627: DELETE_STATS(FND_OAM_DSCRAM_UTILS_PKG.G_TYPE_DML,
628: p_dml_id);
629:

Line 634: fnd_oam_debug.log(1, l_ctxt, 'Deleting entity...');

630: DELETE_ARGS(FND_OAM_DSCRAM_UTILS_PKG.G_TYPE_DML,
631: p_dml_id);
632:
633: --delete the actual entity
634: fnd_oam_debug.log(1, l_ctxt, 'Deleting entity...');
635: DELETE FROM fnd_oam_dscram_dmls
636: WHERE dml_id = p_dml_id;
637:
638: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

Line 638: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

634: fnd_oam_debug.log(1, l_ctxt, 'Deleting entity...');
635: DELETE FROM fnd_oam_dscram_dmls
636: WHERE dml_id = p_dml_id;
637:
638: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
639: RETURN TRUE;
640: EXCEPTION
641: WHEN OTHERS THEN
642: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');

Line 642: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');

638: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
639: RETURN TRUE;
640: EXCEPTION
641: WHEN OTHERS THEN
642: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');
643: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
644: RETURN FALSE;
645: END;
646:

Line 643: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

639: RETURN TRUE;
640: EXCEPTION
641: WHEN OTHERS THEN
642: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');
643: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
644: RETURN FALSE;
645: END;
646:
647: --helper to DELETE_TASK

Line 662: fnd_oam_debug.log(2, l_ctxt, 'ENTER');

658:
659: k NUMBER;
660:
661: BEGIN
662: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
663:
664: fnd_oam_debug.log(1, l_ctxt, 'Unit ID: '||p_unit_id);
665:
666: --get the unit type

Line 664: fnd_oam_debug.log(1, l_ctxt, 'Unit ID: '||p_unit_id);

660:
661: BEGIN
662: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
663:
664: fnd_oam_debug.log(1, l_ctxt, 'Unit ID: '||p_unit_id);
665:
666: --get the unit type
667: SELECT unit_type, unit_object_owner, unit_object_name
668: INTO l_unit_type, l_object_owner, l_object_name

Line 683: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

679: k := l_ids.FIRST;
680: WHILE k IS NOT NULL LOOP
681: IF NOT DELETE_UNIT(p_run_id,
682: l_ids(k)) THEN
683: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
684: RETURN FALSE;
685: END IF;
686:
687: k := l_ids.NEXT(k);

Line 700: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

696: --nuke the dmls
697: k := l_ids.FIRST;
698: WHILE k IS NOT NULL LOOP
699: IF NOT DELETE_DML(l_ids(k)) THEN
700: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
701: RETURN FALSE;
702: END IF;
703:
704: k := l_ids.NEXT(k);

Line 717: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

713: --nuke them
714: k := l_ids.FIRST;
715: WHILE k IS NOT NULL LOOP
716: IF NOT DELETE_PLSQL(l_ids(k)) THEN
717: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
718: RETURN FALSE;
719: END IF;
720:
721: k := l_ids.NEXT(k);

Line 729: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

725: IF NOT DELETE_AD_DATA(p_run_id,
726: p_unit_id,
727: l_object_owner,
728: l_object_name) THEN
729: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
730: RETURN FALSE;
731: END IF;
732:
733: DELETE_STATS(FND_OAM_DSCRAM_UTILS_PKG.G_TYPE_UNIT,

Line 737: fnd_oam_debug.log(1, l_ctxt, 'Deleting entity...');

733: DELETE_STATS(FND_OAM_DSCRAM_UTILS_PKG.G_TYPE_UNIT,
734: p_unit_id);
735:
736: --delete the actual entity
737: fnd_oam_debug.log(1, l_ctxt, 'Deleting entity...');
738: DELETE FROM fnd_oam_dscram_units
739: WHERE unit_id = p_unit_id;
740:
741: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

Line 741: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

737: fnd_oam_debug.log(1, l_ctxt, 'Deleting entity...');
738: DELETE FROM fnd_oam_dscram_units
739: WHERE unit_id = p_unit_id;
740:
741: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
742: RETURN TRUE;
743: EXCEPTION
744: WHEN OTHERS THEN
745: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');

Line 745: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');

741: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
742: RETURN TRUE;
743: EXCEPTION
744: WHEN OTHERS THEN
745: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');
746: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
747: RETURN FALSE;
748: END;
749:

Line 746: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

742: RETURN TRUE;
743: EXCEPTION
744: WHEN OTHERS THEN
745: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');
746: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
747: RETURN FALSE;
748: END;
749:
750: --helper to DELETE_BUNDLE

Line 761: fnd_oam_debug.log(2, l_ctxt, 'ENTER');

757: l_ids DBMS_SQL.NUMBER_TABLE;
758: k NUMBER;
759:
760: BEGIN
761: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
762:
763: fnd_oam_debug.log(1, l_ctxt, 'Task ID: '||p_task_id);
764:
765: --grab the list of top-level units

Line 763: fnd_oam_debug.log(1, l_ctxt, 'Task ID: '||p_task_id);

759:
760: BEGIN
761: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
762:
763: fnd_oam_debug.log(1, l_ctxt, 'Task ID: '||p_task_id);
764:
765: --grab the list of top-level units
766: SELECT unit_id
767: BULK COLLECT INTO l_ids

Line 776: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

772: k := l_ids.FIRST;
773: WHILE k IS NOT NULL LOOP
774: IF NOT DELETE_UNIT(p_run_id,
775: l_ids(k)) THEN
776: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
777: RETURN FALSE;
778: END IF;
779:
780: k := l_ids.NEXT(k);

Line 787: fnd_oam_debug.log(1, l_ctxt, 'Deleting entity...');

783: DELETE_STATS(FND_OAM_DSCRAM_UTILS_PKG.G_TYPE_TASK,
784: p_task_id);
785:
786: --delete the actual entity
787: fnd_oam_debug.log(1, l_ctxt, 'Deleting entity...');
788: DELETE FROM fnd_oam_dscram_tasks
789: WHERE task_id = p_task_id;
790:
791: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

Line 791: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

787: fnd_oam_debug.log(1, l_ctxt, 'Deleting entity...');
788: DELETE FROM fnd_oam_dscram_tasks
789: WHERE task_id = p_task_id;
790:
791: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
792: RETURN TRUE;
793: EXCEPTION
794: WHEN OTHERS THEN
795: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');

Line 795: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');

791: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
792: RETURN TRUE;
793: EXCEPTION
794: WHEN OTHERS THEN
795: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');
796: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
797: RETURN FALSE;
798: END;
799:

Line 796: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

792: RETURN TRUE;
793: EXCEPTION
794: WHEN OTHERS THEN
795: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');
796: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
797: RETURN FALSE;
798: END;
799:
800: --helper to DELETE_RUN

Line 811: fnd_oam_debug.log(2, l_ctxt, 'ENTER');

807: l_ids DBMS_SQL.NUMBER_TABLE;
808: k NUMBER;
809:
810: BEGIN
811: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
812:
813: fnd_oam_debug.log(1, l_ctxt, 'Bundle ID: '||p_bundle_id);
814:
815: --grab the list of tasks

Line 813: fnd_oam_debug.log(1, l_ctxt, 'Bundle ID: '||p_bundle_id);

809:
810: BEGIN
811: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
812:
813: fnd_oam_debug.log(1, l_ctxt, 'Bundle ID: '||p_bundle_id);
814:
815: --grab the list of tasks
816: SELECT task_id
817: BULK COLLECT INTO l_ids

Line 825: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

821: k := l_ids.FIRST;
822: WHILE k IS NOT NULL LOOP
823: IF NOT DELETE_TASK(p_run_id,
824: l_ids(k)) THEN
825: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
826: RETURN FALSE;
827: END IF;
828:
829: k := l_ids.NEXT(k);

Line 836: fnd_oam_debug.log(1, l_ctxt, 'Deleting entity...');

832: DELETE_STATS(FND_OAM_DSCRAM_UTILS_PKG.G_TYPE_BUNDLE,
833: p_bundle_id);
834:
835: --delete the actual entity
836: fnd_oam_debug.log(1, l_ctxt, 'Deleting entity...');
837: DELETE FROM fnd_oam_dscram_bundles
838: WHERE bundle_id = p_bundle_id;
839:
840: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

Line 840: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

836: fnd_oam_debug.log(1, l_ctxt, 'Deleting entity...');
837: DELETE FROM fnd_oam_dscram_bundles
838: WHERE bundle_id = p_bundle_id;
839:
840: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
841: RETURN TRUE;
842: EXCEPTION
843: WHEN OTHERS THEN
844: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');

Line 844: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');

840: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
841: RETURN TRUE;
842: EXCEPTION
843: WHEN OTHERS THEN
844: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');
845: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
846: RETURN FALSE;
847: END;
848:

Line 845: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

841: RETURN TRUE;
842: EXCEPTION
843: WHEN OTHERS THEN
844: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');
845: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
846: RETURN FALSE;
847: END;
848:
849: -- Public: Called before a test invocation to clear space for a test run.

Line 862: fnd_oam_debug.log(2, l_ctxt, 'ENTER');

858: k NUMBER;
859:
860: l_retbool BOOLEAN;
861: BEGIN
862: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
863:
864: --get a lock on the run
865: IF NOT LOCK_RUN(p_run_id,
866: l_lock_handle) THEN

Line 867: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

863:
864: --get a lock on the run
865: IF NOT LOCK_RUN(p_run_id,
866: l_lock_handle) THEN
867: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
868: RETURN FALSE;
869: END IF;
870:
871: fnd_oam_debug.log(1, l_ctxt, 'Run ID: '||p_run_id);

Line 871: fnd_oam_debug.log(1, l_ctxt, 'Run ID: '||p_run_id);

867: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
868: RETURN FALSE;
869: END IF;
870:
871: fnd_oam_debug.log(1, l_ctxt, 'Run ID: '||p_run_id);
872:
873: --grab the list of bundles
874: SELECT bundle_id
875: BULK COLLECT INTO l_ids

Line 900: fnd_oam_debug.log(1, l_ctxt, 'Deleting entity...');

896: DELETE_ARGS(FND_OAM_DSCRAM_UTILS_PKG.G_TYPE_RUN,
897: p_run_id);
898:
899: --delete the actual run
900: fnd_oam_debug.log(1, l_ctxt, 'Deleting entity...');
901: DELETE FROM fnd_oam_dscram_runs_b
902: WHERE run_id = p_run_id;
903: DELETE FROM fnd_oam_dscram_runs_tl
904: WHERE run_id = p_run_id;

Line 909: fnd_oam_debug.log(6, l_ctxt, 'Failed to release run lock: '||l_retval);

905:
906: --release the lock on the run
907: l_retval := DBMS_LOCK.RELEASE(l_lock_handle);
908: IF l_retval <> 0 THEN
909: fnd_oam_debug.log(6, l_ctxt, 'Failed to release run lock: '||l_retval);
910: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
911: RETURN FALSE;
912: END IF;
913:

Line 910: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

906: --release the lock on the run
907: l_retval := DBMS_LOCK.RELEASE(l_lock_handle);
908: IF l_retval <> 0 THEN
909: fnd_oam_debug.log(6, l_ctxt, 'Failed to release run lock: '||l_retval);
910: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
911: RETURN FALSE;
912: END IF;
913:
914: SELECT count(*)

Line 917: fnd_oam_debug.log(1, l_ctxt, 'Found '||k||' remaining base run rows.');

913:
914: SELECT count(*)
915: INTO k
916: FROM fnd_oam_dscram_runs_b;
917: fnd_oam_debug.log(1, l_ctxt, 'Found '||k||' remaining base run rows.');
918: SELECT count(*)
919: INTO k
920: FROM fnd_oam_dscram_runs_tl;
921: fnd_oam_debug.log(1, l_ctxt, 'Found '||k||' remaining trans run rows.');

Line 921: fnd_oam_debug.log(1, l_ctxt, 'Found '||k||' remaining trans run rows.');

917: fnd_oam_debug.log(1, l_ctxt, 'Found '||k||' remaining base run rows.');
918: SELECT count(*)
919: INTO k
920: FROM fnd_oam_dscram_runs_tl;
921: fnd_oam_debug.log(1, l_ctxt, 'Found '||k||' remaining trans run rows.');
922:
923: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
924: RETURN l_retbool;
925: EXCEPTION

Line 923: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

919: INTO k
920: FROM fnd_oam_dscram_runs_tl;
921: fnd_oam_debug.log(1, l_ctxt, 'Found '||k||' remaining trans run rows.');
922:
923: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
924: RETURN l_retbool;
925: EXCEPTION
926: WHEN OTHERS THEN
927: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');

Line 927: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');

923: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
924: RETURN l_retbool;
925: EXCEPTION
926: WHEN OTHERS THEN
927: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');
928: IF l_lock_handle IS NOT NULL THEN
929: l_retval := DBMS_LOCK.RELEASE(l_lock_handle);
930: END IF;
931: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

Line 931: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

927: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');
928: IF l_lock_handle IS NOT NULL THEN
929: l_retval := DBMS_LOCK.RELEASE(l_lock_handle);
930: END IF;
931: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
932: RETURN FALSE;
933: END;
934:
935: -- Public

Line 1008: fnd_oam_debug.log(1, l_ctxt, 'Determined statement length: '||l_stmt_length);

1004: x_return_msg := 'Total length of statement would be '||l_stmt_length||', greater than max ('||l_stmt_maxlen||').';
1005: x_final_stmt := NULL;
1006: RETURN;
1007: END IF;
1008: fnd_oam_debug.log(1, l_ctxt, 'Determined statement length: '||l_stmt_length);
1009:
1010: --form the statement
1011: IF p_where_clause IS NULL THEN
1012: l_final_stmt := p_stmt||' WHERE '||B_ARG_ROWID_CLAUSE;

Line 1026: fnd_oam_debug.log(1, l_ctxt, 'Determined statement length: '||l_stmt_length);

1022: x_return_msg := 'Total length of statement would be '||l_stmt_length||', greater than max '||l_stmt_maxlen||'.';
1023: x_final_stmt := NULL;
1024: RETURN;
1025: END IF;
1026: fnd_oam_debug.log(1, l_ctxt, 'Determined statement length: '||l_stmt_length);
1027:
1028: --no added clauses so just append parts
1029: l_final_stmt := p_stmt||' WHERE '||p_where_clause;
1030: ELSE

Line 1042: fnd_oam_debug.log(6, l_ctxt, x_return_msg);

1038: EXCEPTION
1039: WHEN OTHERS THEN
1040: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1041: x_return_msg := 'Unhandled Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))';
1042: fnd_oam_debug.log(6, l_ctxt, x_return_msg);
1043: x_final_stmt := NULL;
1044: END;
1045:
1046: -- Public

Line 1084: fnd_oam_debug.log(1, l_ctxt, 'Failed to wait for progress alert: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');

1080: --ignore the message and status, we just want the notification
1081: ROLLBACK;
1082: EXCEPTION
1083: WHEN OTHERS THEN
1084: fnd_oam_debug.log(1, l_ctxt, 'Failed to wait for progress alert: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');
1085: ROLLBACK;
1086:
1087: END;
1088:

Line 1103: fnd_oam_debug.log(1, l_ctxt, 'Failed to signal progress alert: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');

1099: NULL);
1100: EXCEPTION
1101: WHEN OTHERS THEN
1102: --log it but don't throw it since this is only to help minimize delay
1103: fnd_oam_debug.log(1, l_ctxt, 'Failed to signal progress alert: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');
1104: END;
1105:
1106: -- Public
1107: PROCEDURE SIGNAL_AUT_PROGRESS_ALERT

Line 1166: fnd_oam_debug.log(2, l_ctxt, 'ENTER');

1162: j NUMBER;
1163: k NUMBER;
1164: l_msg VARCHAR2(4000);
1165: BEGIN
1166: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
1167:
1168: --sanity check
1169: IF (p_plsql_ids.COUNT < 1) THEN
1170: fnd_oam_debug.log(1, l_ctxt, 'No IDs to process.');

Line 1170: fnd_oam_debug.log(1, l_ctxt, 'No IDs to process.');

1166: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
1167:
1168: --sanity check
1169: IF (p_plsql_ids.COUNT < 1) THEN
1170: fnd_oam_debug.log(1, l_ctxt, 'No IDs to process.');
1171: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1172: RETURN;
1173: END IF;
1174:

Line 1171: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

1167:
1168: --sanity check
1169: IF (p_plsql_ids.COUNT < 1) THEN
1170: fnd_oam_debug.log(1, l_ctxt, 'No IDs to process.');
1171: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1172: RETURN;
1173: END IF;
1174:
1175: --handle the parents

Line 1186: fnd_oam_debug.log(1, l_ctxt, 'Adding parent unit_id: '||l_parent_id);

1182:
1183: --add it to the parents_map if not present
1184: IF NOT l_parents_map.EXISTS(l_parent_id) THEN
1185: l_parents_map(l_parent_id) := 1;
1186: fnd_oam_debug.log(1, l_ctxt, 'Adding parent unit_id: '||l_parent_id);
1187: END IF;
1188: END LOOP;
1189:
1190: --delegate the list to the parent prepare_for_retry procedure

Line 1196: fnd_oam_debug.log(1, l_ctxt, 'No parent units found.');

1192: PREPARE_UNITS_FOR_RETRY(GET_MAP_KEYS(l_parents_map),
1193: FND_API.G_TRUE,
1194: FND_API.G_FALSE);
1195: ELSE
1196: fnd_oam_debug.log(1, l_ctxt, 'No parent units found.');
1197: END IF;
1198: END IF;
1199:
1200: --and finally update the local entities

Line 1201: fnd_oam_debug.log(1, l_ctxt, 'Processing '||p_plsql_ids.COUNT||' plsqls...');

1197: END IF;
1198: END IF;
1199:
1200: --and finally update the local entities
1201: fnd_oam_debug.log(1, l_ctxt, 'Processing '||p_plsql_ids.COUNT||' plsqls...');
1202: FORALL k in p_plsql_ids.FIRST..p_plsql_ids.LAST
1203: UPDATE fnd_oam_dscram_plsqls
1204: SET finished_ret_sts = NULL
1205: WHERE plsql_id = p_plsql_ids(k)

Line 1207: fnd_oam_debug.log(1, l_ctxt, 'Done.');

1203: UPDATE fnd_oam_dscram_plsqls
1204: SET finished_ret_sts = NULL
1205: WHERE plsql_id = p_plsql_ids(k)
1206: AND finished_ret_sts <> FND_API.G_RET_STS_SUCCESS;
1207: fnd_oam_debug.log(1, l_ctxt, 'Done.');
1208:
1209: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1210: EXCEPTION
1211: WHEN OTHERS THEN

Line 1209: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

1205: WHERE plsql_id = p_plsql_ids(k)
1206: AND finished_ret_sts <> FND_API.G_RET_STS_SUCCESS;
1207: fnd_oam_debug.log(1, l_ctxt, 'Done.');
1208:
1209: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1210: EXCEPTION
1211: WHEN OTHERS THEN
1212: l_msg := 'Unexpected Error preparing plsqls for retry';
1213: fnd_oam_debug.log(6, l_ctxt, l_msg);

Line 1213: fnd_oam_debug.log(6, l_ctxt, l_msg);

1209: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1210: EXCEPTION
1211: WHEN OTHERS THEN
1212: l_msg := 'Unexpected Error preparing plsqls for retry';
1213: fnd_oam_debug.log(6, l_ctxt, l_msg);
1214: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1215: RAISE_APPLICATION_ERROR(-20000, l_msg, TRUE);
1216: END;
1217:

Line 1214: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

1210: EXCEPTION
1211: WHEN OTHERS THEN
1212: l_msg := 'Unexpected Error preparing plsqls for retry';
1213: fnd_oam_debug.log(6, l_ctxt, l_msg);
1214: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1215: RAISE_APPLICATION_ERROR(-20000, l_msg, TRUE);
1216: END;
1217:
1218: -- Private, prepares multiple dmls for retry at once.

Line 1230: fnd_oam_debug.log(2, l_ctxt, 'ENTER');

1226: j NUMBER;
1227: k NUMBER;
1228: l_msg VARCHAR2(4000);
1229: BEGIN
1230: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
1231:
1232: --sanity check
1233: IF (p_dml_ids.COUNT < 1) THEN
1234: fnd_oam_debug.log(1, l_ctxt, 'No IDs to process.');

Line 1234: fnd_oam_debug.log(1, l_ctxt, 'No IDs to process.');

1230: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
1231:
1232: --sanity check
1233: IF (p_dml_ids.COUNT < 1) THEN
1234: fnd_oam_debug.log(1, l_ctxt, 'No IDs to process.');
1235: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1236: RETURN;
1237: END IF;
1238:

Line 1235: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

1231:
1232: --sanity check
1233: IF (p_dml_ids.COUNT < 1) THEN
1234: fnd_oam_debug.log(1, l_ctxt, 'No IDs to process.');
1235: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1236: RETURN;
1237: END IF;
1238:
1239: --handle the parents

Line 1250: fnd_oam_debug.log(1, l_ctxt, 'Adding parent unit_id: '||l_parent_id);

1246:
1247: --add it to the parents_map if not present
1248: IF NOT l_parents_map.EXISTS(l_parent_id) THEN
1249: l_parents_map(l_parent_id) := 1;
1250: fnd_oam_debug.log(1, l_ctxt, 'Adding parent unit_id: '||l_parent_id);
1251: END IF;
1252: END LOOP;
1253:
1254: --delegate the list to the parent prepare_for_retry procedure

Line 1260: fnd_oam_debug.log(1, l_ctxt, 'No parent units found.');

1256: PREPARE_UNITS_FOR_RETRY(GET_MAP_KEYS(l_parents_map),
1257: FND_API.G_TRUE,
1258: FND_API.G_FALSE);
1259: ELSE
1260: fnd_oam_debug.log(1, l_ctxt, 'No parent units found.');
1261: END IF;
1262: END IF;
1263:
1264: --and finally update the local entities

Line 1265: fnd_oam_debug.log(1, l_ctxt, 'Processing '||p_dml_ids.COUNT||' dmls...');

1261: END IF;
1262: END IF;
1263:
1264: --and finally update the local entities
1265: fnd_oam_debug.log(1, l_ctxt, 'Processing '||p_dml_ids.COUNT||' dmls...');
1266: FORALL k in p_dml_ids.FIRST..p_dml_ids.LAST
1267: UPDATE fnd_oam_dscram_dmls
1268: SET finished_ret_sts = NULL
1269: WHERE dml_id = p_dml_ids(k)

Line 1271: fnd_oam_debug.log(1, l_ctxt, 'Done.');

1267: UPDATE fnd_oam_dscram_dmls
1268: SET finished_ret_sts = NULL
1269: WHERE dml_id = p_dml_ids(k)
1270: AND finished_ret_sts <> FND_API.G_RET_STS_SUCCESS;
1271: fnd_oam_debug.log(1, l_ctxt, 'Done.');
1272:
1273: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1274: EXCEPTION
1275: WHEN OTHERS THEN

Line 1273: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

1269: WHERE dml_id = p_dml_ids(k)
1270: AND finished_ret_sts <> FND_API.G_RET_STS_SUCCESS;
1271: fnd_oam_debug.log(1, l_ctxt, 'Done.');
1272:
1273: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1274: EXCEPTION
1275: WHEN OTHERS THEN
1276: l_msg := 'Unexpected Error preparing dmls for retry.';
1277: fnd_oam_debug.log(6, l_ctxt, l_msg);

Line 1277: fnd_oam_debug.log(6, l_ctxt, l_msg);

1273: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1274: EXCEPTION
1275: WHEN OTHERS THEN
1276: l_msg := 'Unexpected Error preparing dmls for retry.';
1277: fnd_oam_debug.log(6, l_ctxt, l_msg);
1278: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1279: RAISE_APPLICATION_ERROR(-20000, l_msg, TRUE);
1280: END;
1281:

Line 1278: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

1274: EXCEPTION
1275: WHEN OTHERS THEN
1276: l_msg := 'Unexpected Error preparing dmls for retry.';
1277: fnd_oam_debug.log(6, l_ctxt, l_msg);
1278: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1279: RAISE_APPLICATION_ERROR(-20000, l_msg, TRUE);
1280: END;
1281:
1282: -- Private, prepares multiple units for retry at once.

Line 1296: fnd_oam_debug.log(2, l_ctxt, 'ENTER');

1292: j NUMBER;
1293: k NUMBER;
1294: l_msg VARCHAR2(4000);
1295: BEGIN
1296: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
1297:
1298: --sanity check
1299: IF (p_unit_ids.COUNT < 1) THEN
1300: fnd_oam_debug.log(1, l_ctxt, 'No IDs to process.');

Line 1300: fnd_oam_debug.log(1, l_ctxt, 'No IDs to process.');

1296: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
1297:
1298: --sanity check
1299: IF (p_unit_ids.COUNT < 1) THEN
1300: fnd_oam_debug.log(1, l_ctxt, 'No IDs to process.');
1301: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1302: RETURN;
1303: END IF;
1304:

Line 1301: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

1297:
1298: --sanity check
1299: IF (p_unit_ids.COUNT < 1) THEN
1300: fnd_oam_debug.log(1, l_ctxt, 'No IDs to process.');
1301: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1302: RETURN;
1303: END IF;
1304:
1305: --handle the children

Line 1309: fnd_oam_debug.log(1, l_ctxt, 'Processing child units of unit_id: '||p_unit_ids(k));

1305: --handle the children
1306: IF p_recurse_children IS NOT NULL AND p_recurse_children = FND_API.G_TRUE THEN
1307: FOR k in p_unit_ids.FIRST..p_unit_ids.LAST LOOP
1308: --query out any child units
1309: fnd_oam_debug.log(1, l_ctxt, 'Processing child units of unit_id: '||p_unit_ids(k));
1310: SELECT unit_id
1311: BULK COLLECT INTO l_ids
1312: FROM fnd_oam_dscram_units
1313: WHERE concurrent_group_unit_id = p_unit_ids(k);

Line 1319: fnd_oam_debug.log(1, l_ctxt, 'Processing dmls of unit_id: '||p_unit_ids(k));

1315: PREPARE_UNITS_FOR_RETRY(l_ids,
1316: FND_API.G_FALSE,
1317: FND_API.G_TRUE);
1318:
1319: fnd_oam_debug.log(1, l_ctxt, 'Processing dmls of unit_id: '||p_unit_ids(k));
1320:
1321: --get the dmls for the k'th unit
1322: l_ids.DELETE;
1323: SELECT dml_id

Line 1333: fnd_oam_debug.log(1, l_ctxt, 'Processing plsqls of unit_id: '||p_unit_ids(k));

1329: --delegate the list to the child prepare_for_retry procedure
1330: PREPARE_DMLS_FOR_RETRY(l_ids,
1331: FND_API.G_FALSE);
1332:
1333: fnd_oam_debug.log(1, l_ctxt, 'Processing plsqls of unit_id: '||p_unit_ids(k));
1334:
1335: --get the dmls for the k'th unit
1336: l_ids.DELETE;
1337: SELECT plsql_id

Line 1361: fnd_oam_debug.log(1, l_ctxt, 'Adding parent task_id: '||l_parent_id);

1357:
1358: --add it to the parents_map if not present
1359: IF NOT l_parents_map.EXISTS(l_parent_id) THEN
1360: l_parents_map(l_parent_id) := 1;
1361: fnd_oam_debug.log(1, l_ctxt, 'Adding parent task_id: '||l_parent_id);
1362: END IF;
1363: END LOOP;
1364:
1365: --delegate the list to the parent prepare_for_retry procedure

Line 1372: fnd_oam_debug.log(1, l_ctxt, 'No parent tasks found.');

1368: FND_API.G_TRUE,
1369: FND_API.G_FALSE);
1370: ELSE
1371: --this happens for units when they're child units
1372: fnd_oam_debug.log(1, l_ctxt, 'No parent tasks found.');
1373: END IF;
1374: END IF;
1375:
1376: --and finally update the local entities

Line 1377: fnd_oam_debug.log(1, l_ctxt, 'Processing '||p_unit_ids.COUNT||' units...');

1373: END IF;
1374: END IF;
1375:
1376: --and finally update the local entities
1377: fnd_oam_debug.log(1, l_ctxt, 'Processing '||p_unit_ids.COUNT||' units...');
1378: FORALL k in p_unit_ids.FIRST..p_unit_ids.LAST
1379: UPDATE fnd_oam_dscram_units
1380: SET unit_status = G_STATUS_RESTARTABLE,
1381: workers_assigned = 0

Line 1384: fnd_oam_debug.log(1, l_ctxt, 'Done.');

1380: SET unit_status = G_STATUS_RESTARTABLE,
1381: workers_assigned = 0
1382: WHERE unit_id = p_unit_ids(k)
1383: AND unit_status NOT IN (G_STATUS_PROCESSED, G_STATUS_SKIPPED, G_STATUS_NO_STATUS, G_STATUS_UNPROCESSED);
1384: fnd_oam_debug.log(1, l_ctxt, 'Done.');
1385:
1386: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1387: EXCEPTION
1388: WHEN OTHERS THEN

Line 1386: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

1382: WHERE unit_id = p_unit_ids(k)
1383: AND unit_status NOT IN (G_STATUS_PROCESSED, G_STATUS_SKIPPED, G_STATUS_NO_STATUS, G_STATUS_UNPROCESSED);
1384: fnd_oam_debug.log(1, l_ctxt, 'Done.');
1385:
1386: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1387: EXCEPTION
1388: WHEN OTHERS THEN
1389: l_msg := 'Unexpected Error preparing units for retry';
1390: fnd_oam_debug.log(6, l_ctxt, l_msg);

Line 1390: fnd_oam_debug.log(6, l_ctxt, l_msg);

1386: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1387: EXCEPTION
1388: WHEN OTHERS THEN
1389: l_msg := 'Unexpected Error preparing units for retry';
1390: fnd_oam_debug.log(6, l_ctxt, l_msg);
1391: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1392: RAISE_APPLICATION_ERROR(-20000, l_msg, TRUE);
1393: END;
1394:

Line 1391: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

1387: EXCEPTION
1388: WHEN OTHERS THEN
1389: l_msg := 'Unexpected Error preparing units for retry';
1390: fnd_oam_debug.log(6, l_ctxt, l_msg);
1391: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1392: RAISE_APPLICATION_ERROR(-20000, l_msg, TRUE);
1393: END;
1394:
1395: -- Private, prepares multiple tasks for retry at once.

Line 1409: fnd_oam_debug.log(2, l_ctxt, 'ENTER');

1405: j NUMBER;
1406: k NUMBER;
1407: l_msg VARCHAR2(4000);
1408: BEGIN
1409: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
1410:
1411: --sanity check
1412: IF (p_task_ids.COUNT < 1) THEN
1413: fnd_oam_debug.log(1, l_ctxt, 'No IDs to process.');

Line 1413: fnd_oam_debug.log(1, l_ctxt, 'No IDs to process.');

1409: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
1410:
1411: --sanity check
1412: IF (p_task_ids.COUNT < 1) THEN
1413: fnd_oam_debug.log(1, l_ctxt, 'No IDs to process.');
1414: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1415: RETURN;
1416: END IF;
1417:

Line 1414: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

1410:
1411: --sanity check
1412: IF (p_task_ids.COUNT < 1) THEN
1413: fnd_oam_debug.log(1, l_ctxt, 'No IDs to process.');
1414: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1415: RETURN;
1416: END IF;
1417:
1418: --handle the children

Line 1421: fnd_oam_debug.log(1, l_ctxt, 'Processing children of task_id: '||p_task_ids(k));

1417:
1418: --handle the children
1419: IF p_recurse_children IS NOT NULL AND p_recurse_children = FND_API.G_TRUE THEN
1420: FOR k in p_task_ids.FIRST..p_task_ids.LAST LOOP
1421: fnd_oam_debug.log(1, l_ctxt, 'Processing children of task_id: '||p_task_ids(k));
1422:
1423: --get the units for the k'th task
1424: SELECT unit_id
1425: BULK COLLECT INTO l_ids

Line 1448: fnd_oam_debug.log(1, l_ctxt, 'Adding parent bundle_id: '||l_parent_id);

1444:
1445: --add it to the parents_map if not present
1446: IF NOT l_parents_map.EXISTS(l_parent_id) THEN
1447: l_parents_map(l_parent_id) := 1;
1448: fnd_oam_debug.log(1, l_ctxt, 'Adding parent bundle_id: '||l_parent_id);
1449: END IF;
1450: END LOOP;
1451:
1452: --delegate the list to the parent prepare_for_retry procedure

Line 1458: fnd_oam_debug.log(1, l_ctxt, 'No parent bundles found.');

1454: PREPARE_BUNDLES_FOR_RETRY(GET_MAP_KEYS(l_parents_map),
1455: FND_API.G_TRUE,
1456: FND_API.G_FALSE);
1457: ELSE
1458: fnd_oam_debug.log(1, l_ctxt, 'No parent bundles found.');
1459: END IF;
1460: END IF;
1461:
1462: --and finally update the local entities

Line 1463: fnd_oam_debug.log(1, l_ctxt, 'Processing '||p_task_ids.COUNT||' tasks...');

1459: END IF;
1460: END IF;
1461:
1462: --and finally update the local entities
1463: fnd_oam_debug.log(1, l_ctxt, 'Processing '||p_task_ids.COUNT||' tasks...');
1464: FORALL k in p_task_ids.FIRST..p_task_ids.LAST
1465: UPDATE fnd_oam_dscram_tasks
1466: SET task_status = G_STATUS_RESTARTABLE,
1467: workers_assigned = 0

Line 1470: fnd_oam_debug.log(1, l_ctxt, 'Done.');

1466: SET task_status = G_STATUS_RESTARTABLE,
1467: workers_assigned = 0
1468: WHERE task_id = p_task_ids(k)
1469: AND task_status NOT IN (G_STATUS_PROCESSED, G_STATUS_SKIPPED, G_STATUS_UNPROCESSED);
1470: fnd_oam_debug.log(1, l_ctxt, 'Done.');
1471:
1472: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1473: EXCEPTION
1474: WHEN OTHERS THEN

Line 1472: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

1468: WHERE task_id = p_task_ids(k)
1469: AND task_status NOT IN (G_STATUS_PROCESSED, G_STATUS_SKIPPED, G_STATUS_UNPROCESSED);
1470: fnd_oam_debug.log(1, l_ctxt, 'Done.');
1471:
1472: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1473: EXCEPTION
1474: WHEN OTHERS THEN
1475: l_msg := 'Unexpected Error preparing tasks for retry';
1476: fnd_oam_debug.log(6, l_ctxt, l_msg);

Line 1476: fnd_oam_debug.log(6, l_ctxt, l_msg);

1472: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1473: EXCEPTION
1474: WHEN OTHERS THEN
1475: l_msg := 'Unexpected Error preparing tasks for retry';
1476: fnd_oam_debug.log(6, l_ctxt, l_msg);
1477: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1478: RAISE_APPLICATION_ERROR(-20000, l_msg, TRUE);
1479: END;
1480:

Line 1477: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

1473: EXCEPTION
1474: WHEN OTHERS THEN
1475: l_msg := 'Unexpected Error preparing tasks for retry';
1476: fnd_oam_debug.log(6, l_ctxt, l_msg);
1477: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1478: RAISE_APPLICATION_ERROR(-20000, l_msg, TRUE);
1479: END;
1480:
1481: -- Private, prepares multiple bundles for retry at once.

Line 1495: fnd_oam_debug.log(2, l_ctxt, 'ENTER');

1491: j NUMBER;
1492: k NUMBER;
1493: l_msg VARCHAR2(4000);
1494: BEGIN
1495: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
1496:
1497: --sanity check
1498: IF (p_bundle_ids.COUNT < 1) THEN
1499: fnd_oam_debug.log(1, l_ctxt, 'No IDs to process.');

Line 1499: fnd_oam_debug.log(1, l_ctxt, 'No IDs to process.');

1495: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
1496:
1497: --sanity check
1498: IF (p_bundle_ids.COUNT < 1) THEN
1499: fnd_oam_debug.log(1, l_ctxt, 'No IDs to process.');
1500: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1501: RETURN;
1502: END IF;
1503:

Line 1500: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

1496:
1497: --sanity check
1498: IF (p_bundle_ids.COUNT < 1) THEN
1499: fnd_oam_debug.log(1, l_ctxt, 'No IDs to process.');
1500: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1501: RETURN;
1502: END IF;
1503:
1504: --handle the children

Line 1507: fnd_oam_debug.log(1, l_ctxt, 'Processing children of bundle_id: '||p_bundle_ids(k));

1503:
1504: --handle the children
1505: IF p_recurse_children IS NOT NULL AND p_recurse_children = FND_API.G_TRUE THEN
1506: FOR k in p_bundle_ids.FIRST..p_bundle_ids.LAST LOOP
1507: fnd_oam_debug.log(1, l_ctxt, 'Processing children of bundle_id: '||p_bundle_ids(k));
1508:
1509: --get the tasks for the k'th bundle
1510: SELECT task_id
1511: BULK COLLECT INTO l_ids

Line 1534: fnd_oam_debug.log(1, l_ctxt, 'Adding parent run_id: '||l_parent_id);

1530:
1531: --add it to the parents_map if not present
1532: IF NOT l_parents_map.EXISTS(l_parent_id) THEN
1533: l_parents_map(l_parent_id) := 1;
1534: fnd_oam_debug.log(1, l_ctxt, 'Adding parent run_id: '||l_parent_id);
1535: END IF;
1536: END LOOP;
1537:
1538: --delegate the list to the parent prepare_for_retry procedure

Line 1543: fnd_oam_debug.log(1, l_ctxt, 'No parent runs found.');

1539: IF l_parents_map.COUNT > 0 THEN
1540: PREPARE_RUNS_FOR_RETRY(GET_MAP_KEYS(l_parents_map),
1541: FND_API.G_FALSE);
1542: ELSE
1543: fnd_oam_debug.log(1, l_ctxt, 'No parent runs found.');
1544: END IF;
1545: END IF;
1546:
1547: --and finally update the local entities

Line 1548: fnd_oam_debug.log(1, l_ctxt, 'Processing '||p_bundle_ids.COUNT||' bundles...');

1544: END IF;
1545: END IF;
1546:
1547: --and finally update the local entities
1548: fnd_oam_debug.log(1, l_ctxt, 'Processing '||p_bundle_ids.COUNT||' bundles...');
1549: FORALL k in p_bundle_ids.FIRST..p_bundle_ids.LAST
1550: UPDATE fnd_oam_dscram_bundles
1551: SET bundle_status = G_STATUS_RESTARTABLE,
1552: workers_assigned = 0

Line 1555: fnd_oam_debug.log(1, l_ctxt, 'Done.');

1551: SET bundle_status = G_STATUS_RESTARTABLE,
1552: workers_assigned = 0
1553: WHERE bundle_id = p_bundle_ids(k)
1554: AND bundle_status NOT IN (G_STATUS_PROCESSED, G_STATUS_SKIPPED, G_STATUS_UNPROCESSED);
1555: fnd_oam_debug.log(1, l_ctxt, 'Done.');
1556:
1557: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1558: EXCEPTION
1559: WHEN OTHERS THEN

Line 1557: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

1553: WHERE bundle_id = p_bundle_ids(k)
1554: AND bundle_status NOT IN (G_STATUS_PROCESSED, G_STATUS_SKIPPED, G_STATUS_UNPROCESSED);
1555: fnd_oam_debug.log(1, l_ctxt, 'Done.');
1556:
1557: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1558: EXCEPTION
1559: WHEN OTHERS THEN
1560: l_msg := 'Unexpected Error preparing bundles for retry';
1561: fnd_oam_debug.log(6, l_ctxt, l_msg);

Line 1561: fnd_oam_debug.log(6, l_ctxt, l_msg);

1557: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1558: EXCEPTION
1559: WHEN OTHERS THEN
1560: l_msg := 'Unexpected Error preparing bundles for retry';
1561: fnd_oam_debug.log(6, l_ctxt, l_msg);
1562: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1563: RAISE_APPLICATION_ERROR(-20000, l_msg, TRUE);
1564: END;
1565:

Line 1562: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

1558: EXCEPTION
1559: WHEN OTHERS THEN
1560: l_msg := 'Unexpected Error preparing bundles for retry';
1561: fnd_oam_debug.log(6, l_ctxt, l_msg);
1562: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1563: RAISE_APPLICATION_ERROR(-20000, l_msg, TRUE);
1564: END;
1565:
1566: -- Private, prepares multiple runs at once.

Line 1576: fnd_oam_debug.log(2, l_ctxt, 'ENTER');

1572: l_ids DBMS_SQL.NUMBER_TABLE;
1573: k NUMBER;
1574: l_msg VARCHAR2(4000);
1575: BEGIN
1576: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
1577:
1578: --sanity check
1579: IF (p_run_ids.COUNT < 1) THEN
1580: fnd_oam_debug.log(1, l_ctxt, 'No IDs to process.');

Line 1580: fnd_oam_debug.log(1, l_ctxt, 'No IDs to process.');

1576: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
1577:
1578: --sanity check
1579: IF (p_run_ids.COUNT < 1) THEN
1580: fnd_oam_debug.log(1, l_ctxt, 'No IDs to process.');
1581: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1582: RETURN;
1583: END IF;
1584:

Line 1581: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

1577:
1578: --sanity check
1579: IF (p_run_ids.COUNT < 1) THEN
1580: fnd_oam_debug.log(1, l_ctxt, 'No IDs to process.');
1581: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1582: RETURN;
1583: END IF;
1584:
1585: --handle the children

Line 1609: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

1605: SET run_status = G_STATUS_RESTARTABLE
1606: WHERE run_id = p_run_ids(k)
1607: AND run_status NOT IN (G_STATUS_PROCESSED, G_STATUS_SKIPPED, G_STATUS_UNPROCESSED);
1608:
1609: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1610: EXCEPTION
1611: WHEN OTHERS THEN
1612: l_msg := 'Unexpected Error preparing runs for retry.';
1613: fnd_oam_debug.log(6, l_ctxt, l_msg);

Line 1613: fnd_oam_debug.log(6, l_ctxt, l_msg);

1609: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1610: EXCEPTION
1611: WHEN OTHERS THEN
1612: l_msg := 'Unexpected Error preparing runs for retry.';
1613: fnd_oam_debug.log(6, l_ctxt, l_msg);
1614: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1615: RAISE_APPLICATION_ERROR(-20000, l_msg, TRUE);
1616: END;
1617:

Line 1614: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

1610: EXCEPTION
1611: WHEN OTHERS THEN
1612: l_msg := 'Unexpected Error preparing runs for retry.';
1613: fnd_oam_debug.log(6, l_ctxt, l_msg);
1614: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1615: RAISE_APPLICATION_ERROR(-20000, l_msg, TRUE);
1616: END;
1617:
1618: -- Public

Line 1631: fnd_oam_debug.log(2, l_ctxt, 'ENTER');

1627: l_ids DBMS_SQL.NUMBER_TABLE;
1628:
1629: l_msg VARCHAR2(4000);
1630: BEGIN
1631: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
1632:
1633: --get a lock on the run
1634: IF NOT LOCK_RUN(p_run_id,
1635: l_lock_handle) THEN

Line 1639: fnd_oam_debug.log(1, l_ctxt, 'Run ID: '||p_run_id);

1635: l_lock_handle) THEN
1636: RAISE_APPLICATION_ERROR(-20000, 'Failed to get a lock on run_id: '||p_run_id);
1637: END IF;
1638:
1639: fnd_oam_debug.log(1, l_ctxt, 'Run ID: '||p_run_id);
1640:
1641: --make sure the run's in a state where we can retry it
1642: SELECT run_status
1643: INTO l_status

Line 1675: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

1671: IF l_retval <> 0 THEN
1672: RAISE_APPLICATION_ERROR(-20000, 'Failed to release run lock: '||l_retval);
1673: END IF;
1674:
1675: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1676: EXCEPTION
1677: WHEN OTHERS THEN
1678: l_msg := 'Unexpected Error preparing run_id ('||p_run_id||') for retry.';
1679: fnd_oam_debug.log(6, l_ctxt, l_msg);

Line 1679: fnd_oam_debug.log(6, l_ctxt, l_msg);

1675: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1676: EXCEPTION
1677: WHEN OTHERS THEN
1678: l_msg := 'Unexpected Error preparing run_id ('||p_run_id||') for retry.';
1679: fnd_oam_debug.log(6, l_ctxt, l_msg);
1680: IF l_lock_handle IS NOT NULL THEN
1681: l_retval := DBMS_LOCK.RELEASE(l_lock_handle);
1682: END IF;
1683: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

Line 1683: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

1679: fnd_oam_debug.log(6, l_ctxt, l_msg);
1680: IF l_lock_handle IS NOT NULL THEN
1681: l_retval := DBMS_LOCK.RELEASE(l_lock_handle);
1682: END IF;
1683: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
1684: RAISE_APPLICATION_ERROR(-20000, l_msg, TRUE);
1685: END;
1686:
1687: END FND_OAM_DSCRAM_UTILS_PKG;