oracle function 动态sql 遍历结果集

最新推荐文章于 2022-07-06 12:05:12 发布

zwxiaole

最新推荐文章于 2022-07-06 12:05:12 发布

阅读量1.4k

点赞数

CC 4.0 BY-SA版权

分类专栏：数据库文章标签：数据库

本文链接：https://blog.youkuaiyun.com/zwxiaole/article/details/84654788

数据库专栏收录该内容

47 篇文章

订阅专栏

本文介绍了如何使用PL/SQL创建动态SQL查询函数，并通过执行这些查询来获取数据集中的特定值。具体展示了如何根据传入的参数进行复杂的查询操作，并进行数据聚合计算。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

用来组织动态sql以及从动态sql查询结果集中取数

的function

--传入模型和扫描标号
create or replace function F_GET_HYNSR(V_MXDM varchar2,V_SMBH varchar2) return varchar2 is
  TYPE ref_type IS REF CURSOR;
  V_NSRHS number;
  V_HY_ZD varchar2(20);
  V_HY_DM varchar2(20);
  V_SQL_NSR varchar2(2000);
  V_SQL_HY varchar2(2000);
  V_NSRHSTEMP number;
  V_SMBHS varchar2(2000);
  cur ref_type;
begin
  V_SMBHS:=''''||REPLACE(V_SMBH,',',''',''')||'''';
  V_SQL_HY:='select wd.tj_zd,wd.tj_z  from fxfx_fxfa_wdtj wd,fxfx_sm_fxfa_dz smdz
  where wd.tj_b = ''DIM_HY'' and wd.fa_bh = smdz.fa_bh and smdz.sm_bh in ('||V_SMBHS||') and smdz.mxdm = '''||V_MXDM||'''';
  dbms_output.put_line(V_SQL_HY);
  open cur for V_SQL_HY; 
  V_NSRHS:=0;
  FETCH cur into V_HY_ZD,V_HY_DM; 
  while cur%FOUND LOOP 
  V_SQL_NSR := 'select count(1) from dim_nsr nsr where nsr.'||V_HY_ZD||'='''||V_HY_DM||'''';
  dbms_output.put_line(V_SQL_NSR);
  EXECUTE IMMEDIATE V_SQL_NSR into V_NSRHSTEMP;
  dbms_output.put_line(V_NSRHSTEMP);
  V_NSRHS:=V_NSRHS+V_NSRHSTEMP;
  dbms_output.put_line(V_NSRHS);
  FETCH cur into V_HY_ZD,V_HY_DM; 
  END LOOP;
  CLOSE cur;
  return V_NSRHS;
end F_GET_HYNSR;






--传入方案编号
create or replace function F_GET_HYNSR(V_FABH varchar2) return varchar2 is
  TYPE ref_type IS REF CURSOR;
  V_NSRHS number;
  V_HY_ZD varchar2(20);
  V_HY_DM varchar2(20);
  V_SQL_NSR varchar2(2000);
  V_NSRHSTEMP number;
  V_FABHS varchar2(2000);
  cur ref_type;
begin
  V_FABHS:=''''||REPLACE(V_FABH,',',''',''')||'''';
  --dbms_output.put_line(V_FABHS);
  open cur for 'select wd.tj_zd,wd.tj_z  from fxfx_fxfa_wdtj wd
  where wd.tj_b = ''DIM_HY'' and wd.fa_bh in ('||V_FABHS||')'; 
  V_NSRHS:=0;
  FETCH cur into V_HY_ZD,V_HY_DM; 
  while cur%FOUND LOOP 
  V_SQL_NSR := 'select count(1) from dim_nsr nsr where nsr.'||V_HY_ZD||'='''||V_HY_DM||'''';
  --dbms_output.put_line(V_SQL_NSR);
  EXECUTE IMMEDIATE V_SQL_NSR into V_NSRHSTEMP;
  --dbms_output.put_line(V_NSRHSTEMP);
  V_NSRHS:=V_NSRHS+V_NSRHSTEMP;
  --dbms_output.put_line(V_NSRHS);
  FETCH cur into V_HY_ZD,V_HY_DM; 
  END LOOP;
  CLOSE cur;
  return V_NSRHS;
end F_GET_HYNSR;