This thread is getting painful to watch . . . try this:
Code:
select 'set sqlprompt'||' "' || a.username ||'-'|| b.terminal ||'> "'
from v$session a, v$process b
where a.paddr = b.addr
and a.audsid = (SELECT USERENV('SESSIONID') FROM Sys.Dual)