[Home] [Help]
1240: l_lock_name VARCHAR2(30);
1241: BEGIN
1242: l_lock_name := p_lock_prefix || p_org_id;
1243: trace_log('get_lock_handle: lock_name='||l_lock_name);
1244: dbms_lock.allocate_unique(
1245: lockname => l_lock_name
1246: ,lockhandle => l_lock_handle);
1247: trace_log('get_lock_handle: lock_handle='||l_lock_handle);
1248: return l_lock_handle;
1263: l_lock_handle := get_lock_handle (p_org_id => p_org_id,
1264: p_lock_prefix => p_lock_prefix);
1265: -- request lock with release_on_commit TRUE so that we dont have to manually
1266: -- release the lock later.
1267: x_lock_status := dbms_lock.request(
1268: lockhandle => l_lock_handle,
1269: lockmode => dbms_lock.x_mode,
1270: timeout => dbms_lock.maxwait,
1271: release_on_commit => TRUE);
1265: -- request lock with release_on_commit TRUE so that we dont have to manually
1266: -- release the lock later.
1267: x_lock_status := dbms_lock.request(
1268: lockhandle => l_lock_handle,
1269: lockmode => dbms_lock.x_mode,
1270: timeout => dbms_lock.maxwait,
1271: release_on_commit => TRUE);
1272: trace_log('get_lock: got lock for lock handle with status ='||x_lock_status);
1273: trace_log('get_lock: Returning from lock_for_match');
1266: -- release the lock later.
1267: x_lock_status := dbms_lock.request(
1268: lockhandle => l_lock_handle,
1269: lockmode => dbms_lock.x_mode,
1270: timeout => dbms_lock.maxwait,
1271: release_on_commit => TRUE);
1272: trace_log('get_lock: got lock for lock handle with status ='||x_lock_status);
1273: trace_log('get_lock: Returning from lock_for_match');
1274: EXCEPTION
1299: l_lock_handle := get_lock_handle(p_org_id => p_org_id,
1300: p_lock_prefix => p_lock_prefix);
1301: trace_log('release_lock: lock_handle='||l_lock_handle);
1302:
1303: l_status := dbms_lock.release(l_lock_handle);
1304: trace_log('release_lock: release returned with status:'||l_status);
1305:
1306: --if success (status = 0) or session does not own lock (status=4),
1307: -- do nothing