col machine format a30
col program format a40
col osuser format a20
col MACHINE format a25
set line 200
select sid,serial# ,username,osuser,machine,program,process,to_char(logon_time,'yyyy/mm/dd hh24:mi:ss')
from v\$session
where paddr in
( select addr from v\$process where spid in($1));
SELECT sql_text
FROM v\$sqltext a
WHERE a.hash_value = (SELECT sql_hash_value
FROM v\$session b, v\$process c
WHERE b.paddr = c.addr
AND c.spid=$1)
ORDER BY piece ASC ;
exit;
EOF