Could not reserve record (2). Keep trying ?.... - More Details required

Question

Hi all,
I would like to display the User who has locked the record.
Is there any possibility to implement that?
Thanks.

Answer 1

create DB function:
CREATE OR REPLACE FUNCTION record_locked_by (
   p_table    VARCHAR2,
   p_rowid    ROWID
   RETURN VARCHAR2
IS
   v_locker        VARCHAR2 (100);
   resource_busy   EXCEPTION;
   PRAGMA EXCEPTION_INIT (resource_busy, -54);
BEGIN
   EXECUTE IMMEDIATE    'select 1 from '|| p_table|| ' where rowid = :r for update nowait'
               USING p_rowid;
   RETURN NULL;
EXCEPTION
   WHEN resource_busy
   THEN
      SELECT se.username INTO v_locker
        FROM gv$lock lk, dba_objects ob, gv$session se
       WHERE lk.SID = se.SID
         AND lk.id1 = ob.object_id
         AND object_name = UPPER (p_table)
         AND lk.inst_id = se.inst_id
         AND audsid <> USERENV('SESSIONID');
      RETURN v_locker;
END;Now in ON-LOCK trigger you can use this code (generic)
DECLARE
   v_locker   VARCHAR2 (100);
BEGIN
   v_locker :=record_locked_by (GET_BLOCK_PROPERTY (:SYSTEM.trigger_block,query_data_source_name),
                                NAME_IN (:SYSTEM.trigger_block || '.rowid'));
   IF v_locker IS NOT NULL
   THEN
      MESSAGE (   'Record is being updated by '|| v_locker|| '. Please try again later');
      RAISE form_trigger_failure;
   ELSE
    lock_record;
   END IF;
END;