Connect observer/p@9i


create or replace view open_cursor_sql_text as
  select ar.sql_text /* shows more text than v$open_cursor */
    from v$sqlarea ar inner join v$open_cursor cur
    using ( hash_value, address )

    where cur.user_name = 'PROGRAMMER'
    order by ar.sql_text
/