ORACLE lock query statement

SELECTsubstr (v $ lock. sid,) SID, substr (username,) UserName, substr (object_name,) ObjectName, v $ lock. typeLockType, decode (rtrim (substr (lmode, 1, 4), 2, Row-S (SS), 3, Row-X (SX), 4, Share, 5, SRow-X (SSX), 6, Exclus

SELECT substr (v $ lock. sid,) SID, substr (username,) UserName, substr (object_name,) ObjectName, v $ lock. type LockType, decode (rtrim (substr (lmode, 1, 4), '2', 'row-S (SS) ', '3', 'row-X (SX) ', '4', 'share', '5','s/Row-X (SSX) ', '6', 'exclus

SELECT substr (v $ lock. sid, 1, 4) "SID ",

Substr (username, 1, 12) "UserName ",

Substr (object_name, 1,25) "ObjectName ",

V $ lock. type "LockType ",

Decode (rtrim (substr (lmode, 1, 4 )),

'2', 'row-S (SS) ', '3', 'row-X (SX )',

'4', 'share', '5','s/Row-X (SSX )',

'6', 'clusive ', 'other') "LockMode ",

Substr (v $ session. program, 25-25) "ProgramName"

From v $ LOCK, SYS. DBA_OBJECTS, V $ SESSION

WHERE (OBJECT_ID = v $ lock. id1

AND v $ lock. sid = v $ session. sid

AND username IS NOT NULL

AND username not in ('sys ', 'system ')

And serial #! = 1 );

Select a. sid, a. SERIAL #, B. spid, a. status, a. PROGRAM

From v $ session a, V $ PROCESS B

Where a. paddr = B. ADDR

Order by a. sid;

Alter system kill session '2014, 68 'immediate;

,