[Home] [Help]
2050: FROM fnd_oam_dscram_runs_b
2051: WHERE run_id = p_run_id;
2052:
2053: --select suceeded, release and return
2054: l_retval := DBMS_LOCK.RELEASE(l_lock_handle);
2055: IF l_retval <> 0 THEN
2056: fnd_oam_debug.log(6, l_ctxt, 'Failed to release run lock: '||l_retval);
2057: END IF;
2058: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
2065: END;
2066:
2067: --shouldn't get here
2068: fnd_oam_debug.log(1, l_ctxt, 'Bad spot?');
2069: l_retval := DBMS_LOCK.RELEASE(l_lock_handle);
2070: IF l_retval <> 0 THEN
2071: fnd_oam_debug.log(6, l_ctxt, 'Failed to release run lock: '||l_retval);
2072: END IF;
2073: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
2075: EXCEPTION
2076: WHEN OTHERS THEN
2077: fnd_oam_debug.log(6, l_ctxt, 'Unexpected Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');
2078: --try to release the lock
2079: l_retval := DBMS_LOCK.RELEASE(l_lock_handle);
2080: IF l_retval <> 0 THEN
2081: fnd_oam_debug.log(6, l_ctxt, 'Failed to release run lock: '||l_retval);
2082: END IF;
2083: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
2214: END IF;
2215: EXCEPTION
2216: WHEN INIT_FAILED THEN
2217: --release the run lock on failure just in case
2218: l_retval := DBMS_LOCK.RELEASE(l_lock_handle);
2219: IF l_retval <> 0 THEN
2220: fnd_oam_debug.log(6, l_ctxt, 'Failed to release run lock: '||l_retval);
2221: END IF;
2222: ROLLBACK;
2321: END IF;
2322: EXCEPTION
2323: WHEN INIT_FAILED THEN
2324: --release the run lock on failure just in case
2325: l_retval := DBMS_LOCK.RELEASE(l_lock_handle);
2326: IF l_retval <> 0 THEN
2327: fnd_oam_debug.log(6, l_ctxt, 'Failed to release run lock: '||l_retval);
2328: END IF;
2329: ROLLBACK;
2606: END IF;
2607: EXCEPTION
2608: WHEN INIT_FAILED THEN
2609: --release the run lock on failure just in case
2610: l_retval := DBMS_LOCK.RELEASE(l_lock_handle);
2611: IF l_retval <> 0 THEN
2612: fnd_oam_debug.log(6, l_ctxt, 'Failed to release run lock: '||l_retval);
2613: END IF;
2614: ROLLBACK;
2817: END IF;
2818: EXCEPTION
2819: WHEN INIT_FAILED THEN
2820: --release the run lock on failure just in case
2821: l_retval := DBMS_LOCK.RELEASE(l_lock_handle);
2822: IF l_retval <> 0 THEN
2823: fnd_oam_debug.log(6, l_ctxt, 'Failed to release run lock: '||l_retval);
2824: END IF;
2825: ROLLBACK;
3030: END IF;
3031: EXCEPTION
3032: WHEN INIT_FAILED THEN
3033: --release the run lock on failure just in case
3034: l_retval := DBMS_LOCK.RELEASE(l_lock_handle);
3035: IF l_retval <> 0 THEN
3036: fnd_oam_debug.log(6, l_ctxt, 'Failed to release run lock: '||l_retval);
3037: END IF;
3038: ROLLBACK;
3322: END IF;
3323: EXCEPTION
3324: WHEN INIT_FAILED THEN
3325: --release the run lock on failure just in case
3326: l_retval := DBMS_LOCK.RELEASE(l_lock_handle);
3327: IF l_retval <> 0 THEN
3328: fnd_oam_debug.log(6, l_ctxt, 'Failed to release run lock: '||l_retval);
3329: END IF;
3330: ROLLBACK;
3665: END IF;
3666: EXCEPTION
3667: WHEN INIT_FAILED THEN
3668: --release the run lock on failure just in case
3669: l_retval := DBMS_LOCK.RELEASE(l_lock_handle);
3670: IF l_retval <> 0 THEN
3671: fnd_oam_debug.log(6, l_ctxt, 'Failed to release run lock: '||l_retval);
3672: END IF;
3673: ROLLBACK;
4325: END IF;
4326: EXCEPTION
4327: WHEN INIT_FAILED THEN
4328: --release the run lock on failure just in case
4329: l_retval := DBMS_LOCK.RELEASE(l_lock_handle);
4330: IF l_retval <> 0 THEN
4331: fnd_oam_debug.log(6, l_ctxt, 'Failed to release run lock: '||l_retval);
4332: END IF;
4333: ROLLBACK;
4834: END IF;
4835: EXCEPTION
4836: WHEN INIT_FAILED THEN
4837: --release the run lock on failure just in case
4838: l_retval := DBMS_LOCK.RELEASE(l_lock_handle);
4839: IF l_retval <> 0 THEN
4840: fnd_oam_debug.log(6, l_ctxt, 'Failed to release run lock: '||l_retval);
4841: END IF;
4842: ROLLBACK;
5554: END IF;
5555: EXCEPTION
5556: WHEN INIT_FAILED THEN
5557: --release the run lock on failure just in case
5558: l_retval := DBMS_LOCK.RELEASE(l_lock_handle);
5559: IF l_retval <> 0 THEN
5560: fnd_oam_debug.log(6, l_ctxt, 'Failed to release run lock: '||l_retval);
5561: END IF;
5562: ROLLBACK;