欢迎您访问程序员文章站本站旨在为大家提供分享程序员计算机编程知识!
您现在的位置是: 首页

查看form中LOV对应的后台代码

程序员文章站 2022-06-14 08:06:53
...

--帮助->关于oracle应用产品获得sid值

--如果你在这个界面没有看到会话sid值,去检查下你的FND:诊断这个配置文件的值是否为是.

DECLARE

  CURSOR cur_lov_sql(p_pre_sql_addr VARCHAR2) IS

    SELECT t.sql_text

      FROM v$sqltext_with_newlines t

     WHERE t.address = p_pre_sql_addr

     ORDER BY t.piece;

  --

  l_lov_sql       VARCHAR2(2400);

  l_prev_sql_addr VARCHAR2(200);

BEGIN

  BEGIN

    SELECT v.prev_sql_addr

      INTO l_prev_sql_addr

      FROM v$session v

     WHERE v.sid = 1161; --

  EXCEPTION

    WHEN OTHERS THEN

      dbms_output.put_line('get prev sql addr error,' || SQLCODE || ':' ||

                           SQLERRM);

  END;

  --

  FOR rec IN cur_lov_sql(l_prev_sql_addr) LOOP

    l_lov_sql := nvl(l_lov_sql, '') || rec.sql_text;

  END LOOP;

  --

  dbms_output.put_line('lov查询sql为: ');

  dbms_output.put_line(l_lov_sql);

END;

 

相关标签: EBS PLSQL LOV