APPS.CE_ZBA_DEAL_GENERATION dependencies on DBMS_LOCK

Line 195: -- dbms_lock of row to deal with other locking

191: lockmode := 6;
192: expiration_secs := 10;
193: release_on_commit := FALSE;
194: --
195: -- dbms_lock of row to deal with other locking
196: --
197: cep_standard.debug('>>CE_ZBA_DEAL_GENERATION.Allocating unique');
198: dbms_lock.allocate_unique (lockname, lockhandle, expiration_secs);
199: lock_status := dbms_lock.request( lockhandle, lockmode, timeout,

Line 198: dbms_lock.allocate_unique (lockname, lockhandle, expiration_secs);

194: --
195: -- dbms_lock of row to deal with other locking
196: --
197: cep_standard.debug('>>CE_ZBA_DEAL_GENERATION.Allocating unique');
198: dbms_lock.allocate_unique (lockname, lockhandle, expiration_secs);
199: lock_status := dbms_lock.request( lockhandle, lockmode, timeout,
200: release_on_commit );
201: IF (lock_status <> 0) THEN
202: lock_status := dbms_lock.release(lockhandle);

Line 199: lock_status := dbms_lock.request( lockhandle, lockmode, timeout,

195: -- dbms_lock of row to deal with other locking
196: --
197: cep_standard.debug('>>CE_ZBA_DEAL_GENERATION.Allocating unique');
198: dbms_lock.allocate_unique (lockname, lockhandle, expiration_secs);
199: lock_status := dbms_lock.request( lockhandle, lockmode, timeout,
200: release_on_commit );
201: IF (lock_status <> 0) THEN
202: lock_status := dbms_lock.release(lockhandle);
203: RAISE APP_EXCEPTIONS.record_lock_exception;

Line 202: lock_status := dbms_lock.release(lockhandle);

198: dbms_lock.allocate_unique (lockname, lockhandle, expiration_secs);
199: lock_status := dbms_lock.request( lockhandle, lockmode, timeout,
200: release_on_commit );
201: IF (lock_status <> 0) THEN
202: lock_status := dbms_lock.release(lockhandle);
203: RAISE APP_EXCEPTIONS.record_lock_exception;
204: END IF;
205: cep_standard.debug('< 206: RETURN(TRUE);

Line 824: lock_status := dbms_lock.release(lockhandle);

820: CE_ZBA_DEAL_INF_PKG.insert_row(
821: CE_ZBA_DEAL_GENERATION.csh_statement_header_id,to_number(NULL),
822: 'CE_LOCK_STATEMENT_HEADER_ERR');
823: END IF;
824: lock_status := dbms_lock.release(lockhandle);
825:
826: ELSE -- check digits failed
827: CE_ZBA_DEAL_INF_PKG.delete_row(
828: CE_ZBA_DEAL_GENERATION.csh_statement_header_id, to_number(NULL));

Line 923: lock_status := dbms_lock.release(lockhandle);

919: END IF;
920: IF line_cursor%ISOPEN THEN
921: CLOSE line_cursor;
922: END IF;
923: lock_status := dbms_lock.release(lockhandle);
924: cep_standard.debug('DEBUG: sqlcode:' || sqlcode );
925: cep_standard.debug('DEBUG: sqlerrm:' || sqlerrm);
926: RAISE;
927: END zba_generation;