select distinct pkg.name,
pkg.owner,
acc.sid,
ses.serial#,
ses.paddr,
prc.spid,
'alter system kill session ''' || ses.sid || ',' ||
ses.serial# || ''';'
from v$db_object_cache pkg, v$access acc, v$session ses, v$process prc
where pkg.owner = acc.owner
and pkg.name = acc.object
and acc.sid = ses.sid
and prc.addr = ses.paddr(+)
and pkg.owner = 'HBTELEPS' --用户名
and pkg.locks != '0'
and pkg.name like 'BROAD_%'; --包名