View calling SQL query in procedure

Question

Hi,
is it possible to see in SQL procedure the SQL query, which calls this procedure? I want to log that SQL when some error occurs.
Thanks
SASA

Answer 1

I'll be interested to see if anyone has an easy solution to this. Here's a function that will get all the currently open cursors but that's not quite the solution ...
create or replace function f
    return varchar2 is
    v_sql_text varchar2(32767);
begin
    for rec in (
        select v$sqltext_with_newlines.sql_text
        into v_sql_text
        from v$open_cursor,
            v$sqltext_with_newlines
        where v$open_cursor.address = v$sqltext_with_newlines.address
            and v$open_cursor.hash_value = v$sqltext_with_newlines.hash_value
            and v$open_cursor.sid = (
                select sid
                from v$mystat
                where rownum = 1)
            and (v$open_cursor.address, v$open_cursor.hash_value) != (
                select sql_address,
                    sql_hash_value
                from v$session
                where sid = (
                    select sid
                    from v$mystat
                    where rownum = 1))
        order by v$sqltext_with_newlines.address,
            v$sqltext_with_newlines.piece
        ) loop
        v_sql_text := v_sql_text || rec.sql_text;
    end loop;
    return v_sql_text;
end;