Script to kill the locks

Question

Hi all,
Good day..
DB version is 10.2.0.4 I need to write a script which has to kill any table locks in the DB which is more than 10 minutes.
thanks,
baskar.l

Answer 1

hi thanks saad for your valuable suggestions..
i modified the script accordingly and it executed.
SQL> DECLARE
  2  CURSOR c IS
  3  SELECT c.owner,
  4        c.object_name,
  5        c.object_type,
  6        b.SID,
  7        b.serial#,
  8        b.status,
  9        b.osuser,
10        b.machine
11   FROM v$locked_object a, v$session b, dba_objects c
12   WHERE b.SID = a.session_id AND a.object_id = c.object_id
13   and c.object_name in ('JSW_CRM_C_HR_COIL_INFO','T_SPCL_BARCODE_CRS2');
14  c_row c%ROWTYPE;
15  l_sql VARCHAR2(100);
16  BEGIN
17  OPEN c;
18  LOOP
19  FETCH c INTO c_row;
20  EXIT WHEN c%NOTFOUND;
21  l_sql := 'alter system kill session '''||c_row.SID||','||c_row.serial#||'''';
22  EXECUTE IMMEDIATE l_sql;
23  END LOOP;
24  CLOSE c;
25  END;
26  /
PL/SQL procedure successfully completed.thanks,
baskar.l