create table dropme_t as select rownum N, 'Value for row '||rownum||rpad(' ',500,' ') V from dual connect by level < 10;
Table created

declare
  cursor c is select * from dropme_t for update SKIP LOCKED;
  function check_lock_n(i_n number) return varchar2 is
    pragma autonomous_transaction;
    ResourceBusy exception; pragma exception_init(ResourceBusy, -54);
    result varchar2(100);
  begin
    select N ||' is Not locked' into result from dropme_t where n = i_n for update nowait;
    rollback;
    return result;
  exception
    when ResourceBusy then return i_n || ' is Locked';
  end;
begin
  for i in c loop
   dbms_output.put_line('Fetched: '||i.n||', '||check_lock_n(9));
  end loop;
  rollback;
end;
/

Fetched: 1, 9 is Not locked
Fetched: 2, 9 is Not locked
Fetched: 3, 9 is Not locked
Fetched: 4, 9 is Not locked
Fetched: 5, 9 is Not locked
Fetched: 6, 9 is Not locked
Fetched: 7, 9 is Not locked
Fetched: 8, 9 is Not locked
Fetched: 9, 9 is Locked

PL/SQL procedure successfully completed

SQL>