/**********************************************************************
 * File:	px.sql
 * Type:	SQL*Plus script
 * Author:	Tim Gorman (Evergreen Database Technologies, Inc.)
 * Date:	09Sep01
 *
 * Description:
 *	SQL*Plus script to current PX information.
 *
 * Modifications:
 *********************************************************************/
set echo off feedback off timing off pagesize 66 verify off trimspool on linesize 100

col type format a6
col sid format 99990
col username format a10 truncate
col program format a30 truncate
col sql_text format a35 wrap

col instance new_value V_INSTANCE noprint
select instance from v$thread;

spool px_&&V_INSTANCE


select	decode(s.sid, p.qcsid, 'MASTER','SLAVE') type,
	s.sid,
	s.username,
	s.program,
	a.sql_text
from	v$session s,
	v$px_session p,
	v$sqlarea a
where	s.sid = p.sid
and	a.address (+) = s.sql_address
order by type, sid
/
spool off