declare 
  function GetLockHandle(
    spLockName       in varchar2
    , npTime         in number
  ) return varchar2
  as
    pragma autonomous_transaction;
    svLockHandle        varchar2(128);
  begin
    sys.dbms_lock.allocate_unique(spLockName, svLockHandle, npTime);

    commit;
    return svLockHandle;
  end GetLockHandle;
begin
  lockHandle := GetLockHandle('OBJ_161692251001_', 100);
  --lockHandle = 20117893222011789322130
  res := sys.dbms_lock.request(lockhandle => lockHandle, lockmode => 6, timeout => 0, release_on_commit => true);
  --res = 3
end;