APPS.FND_FLEX_SERVER dependencies on DBMS_LOCK

Line 5695: -- Bug 4725016 dbms_lock.allocate_unique issues a commit, this

5691: END get_kfv_concat_segs_by_rowid;
5692:
5693:
5694: -- ==============================================================
5695: -- Bug 4725016 dbms_lock.allocate_unique issues a commit, this
5696: -- is a problem during transactionis that are opening cursors
5697: -- with 'select on update'. A commit issued at this point
5698: -- can invalidate those types of cursors. We created a private
5699: -- package that uses autonomous transaction that then calls

Line 5700: -- dbms_lock.allocate_unique. In this way the commit will not

5696: -- is a problem during transactionis that are opening cursors
5697: -- with 'select on update'. A commit issued at this point
5698: -- can invalidate those types of cursors. We created a private
5699: -- package that uses autonomous transaction that then calls
5700: -- dbms_lock.allocate_unique. In this way the commit will not
5701: -- affect the cursor.
5702: -- ==============================================================
5703: PROCEDURE autonomous_allocate_unique(p_lock_name IN VARCHAR2,
5704: px_lock_handle IN OUT nocopy VARCHAR2)

Line 5709: dbms_lock.allocate_unique(lockname => p_lock_name,

5705: IS
5706: PRAGMA AUTONOMOUS_TRANSACTION;
5707: BEGIN
5708:
5709: dbms_lock.allocate_unique(lockname => p_lock_name,
5710: lockhandle => px_lock_handle,
5711: expiration_secs => 1*24*60*60); -- 1 day.
5712:
5713: COMMIT;

Line 5726: l_lock_status := dbms_lock.request(lockhandle => px_lock_handle,

5722: BEGIN
5723:
5724: autonomous_allocate_unique(p_lock_name, px_lock_handle);
5725:
5726: l_lock_status := dbms_lock.request(lockhandle => px_lock_handle,
5727: lockmode => dbms_lock.x_mode,
5728: timeout => dbms_lock.maxwait,
5729: release_on_commit => FALSE);
5730:

Line 5727: lockmode => dbms_lock.x_mode,

5723:
5724: autonomous_allocate_unique(p_lock_name, px_lock_handle);
5725:
5726: l_lock_status := dbms_lock.request(lockhandle => px_lock_handle,
5727: lockmode => dbms_lock.x_mode,
5728: timeout => dbms_lock.maxwait,
5729: release_on_commit => FALSE);
5730:
5731: IF (l_lock_status <> 0) THEN

Line 5728: timeout => dbms_lock.maxwait,

5724: autonomous_allocate_unique(p_lock_name, px_lock_handle);
5725:
5726: l_lock_status := dbms_lock.request(lockhandle => px_lock_handle,
5727: lockmode => dbms_lock.x_mode,
5728: timeout => dbms_lock.maxwait,
5729: release_on_commit => FALSE);
5730:
5731: IF (l_lock_status <> 0) THEN
5732: raise_application_error(-20001,

Line 5734: '. dbms_lock.request() returned : ' ||

5730:
5731: IF (l_lock_status <> 0) THEN
5732: raise_application_error(-20001,
5733: 'Unable to request lock ' || p_lock_name ||
5734: '. dbms_lock.request() returned : ' ||
5735: l_lock_status);
5736: END IF;
5737: END request_lock;
5738:

Line 5745: l_lock_status := dbms_lock.release(lockhandle => p_lock_handle);

5741: p_lock_handle IN VARCHAR2)
5742: IS
5743: l_lock_status INTEGER;
5744: BEGIN
5745: l_lock_status := dbms_lock.release(lockhandle => p_lock_handle);
5746:
5747: IF (l_lock_status <> 0) THEN
5748: raise_application_error(-20001,
5749: 'Unable to release lock ' || p_lock_name ||

Line 5750: '. dbms_lock.release() returned : ' ||

5746:
5747: IF (l_lock_status <> 0) THEN
5748: raise_application_error(-20001,
5749: 'Unable to release lock ' || p_lock_name ||
5750: '. dbms_lock.release() returned : ' ||
5751: l_lock_status);
5752: END IF;
5753: END release_lock;
5754: