Victor,

Here is the script I use, I have included line number, cut and paste
should work ( remove line number using vi editor.
Jim t
----------------script-------------
1 PROMPT PLEASE WAIT WHILE SQL RETREIVES RECORDS
2 SET VERIFY OFF
3 SET NEWPAGE 0
4 SET PAGESIZE 55
5 SET LINESIZE 160
6 COLUMN dbuser FORMAT A8 HEADING 'DBUSER' TRUNC
7 COLUMN osuser FORMAT A15 HEADING 'OSUSER'
8 COLUMN lk.SID FORMAT 9999999999 HEADING 'SID'
9 COLUMN lock_type FORMAT A2 HEADING 'LT'
10 COLUMN lk.lmode FORMAT A15 HEADING 'LOCKMODE'
11 COLUMN Object FORMAT A40 HEADING'OBJECT'
12 SELECT s.username dbuser, s.osuser,
13 lk.SID, lk.TYPE lock_type,
14 DECODE (lk.lmode,
15 0, 'None',
16 1, 'Null',
17 2, 'Row-S',
18 3, 'Row-X',
19 4, 'Share',
20 5, 'S/Row-X',
21 6, 'Exclusive',
22 TO_CHAR (lk.lmode)
23 ) lockmode,
24 owner || '.' || object_name "Object"
25 FROM v$lock lk, v$session s, dba_objects
26 WHERE lk.lmode > 1
27 AND s.username IS NOT NULL
28 AND lk.SID = s.SID
29 AND dba_objects.object_id(+) = lk.id1
30 ;
31 exit;

Oracle LazyDBA home page