oracle存储过程的应用案例（一）

需求：统计所有渠道底下的商户总数

数据库情况：

一张user表，通过userTpye来区别是渠道还是商户，并且渠道是有多层级的。

一张机构表，每个机构有个orgCode字段来展示渠道层级，比如：1,12,135：表示135机构的上级是12,12的上级是1

当时库里有28000多条数据，公司是最高层级，底下有100多个渠道。

如果对每个渠道做数状查询计算底下商户总数：

 s.org_id in (select c.id from sys_organization c start with c.id = #{code} connect by prior c.id = c.pid) 

这种数状查询需要检索整个user表，100多渠道就需要检索100多次，每次浏览2万多条数据，计算量非常大。

所以当时我换一个做法，我把user表里的用户org_id对应的机构表orgCode取出来，那么一共有28000个orgCode，然后通过java的for循环来进行统计，比如1,12,135出现的时候，对应的1渠道商户数+1，对应的12渠道和135渠道的商户数也+1.这样只要做一次for循环就能把所有商户的归属渠道统计出来。

这个看似可以解决问题，但是却遇见了一个新的问题，就是我要把商户的code集合从oracle中取出来时，2万多条的数据集合从数据库取到java服务器耗费了大量的时间。我用PL/SQL时也是，查询条件可以0.2秒出结果，但是要展示所有的列却花了十几秒。我猜测这可能是由于数据库需要展示数据时要进行I/O操作，这个操作的读写浪费了大量的时间。

所以我考虑在数据库存储过程里面完成这个统计操作。下面是存储过程全文，这个存储过程里运用了比较多的语法，所以我特地记下来。

create or replace procedure getAgentMerCountMap(orgId varchar2,codeIdList out varchar2,codeNumList out varchar2)
   as
   TYPE c_mer_acount IS RECORD
    (   id number,
        m_count number
    );
  ---根据自定义数据类型创建一个集合
  TYPE c_mer_acount_list IS TABLE OF c_mer_acount INDEX BY BINARY_INTEGER;
  ---集合对象
  mer_acount_list c_mer_acount_list;
  ---数据对象
  mer_acount c_mer_acount;
  ---计数器
  v_counter number;
  ---计算code长度
  code_len number;
  code_count number;
  m_code number;
  cursor c_test is
  select nuse.id,mer_name,nuse.createdatetime,sorg.code org_code from SYS_USER nuse,SYS_ORGANIZATION sorg where sorg.id=nuse.organization_id
      and nuse.ISDEFAULT = '1' and nuse.ISDEL = '0'
      and nuse.ORGANIZATION_ID in (select c.id from sys_organization c start with c.id = orgId connect by prior c.id = c.pid);
  c_t c_test%rowtype;


   begin


     DBMS_OUTPUT.ENABLE (buffer_size=>null);


      --不同code渠道的下属商户数量，key为id，m_count为人数。最后统计时要减一（减自身）
     for c_t in c_test loop


       --dbms_output.put_line( c_t.mer_name || '-0-' ||  c_t.org_code);


       --获取code长度
       code_len:=LENGTH (c_t.org_code) - LENGTH (REPLACE (c_t.org_code, ',', ''))+1;


       --循环取出code并赋值给 mer_acount_list集合
       for code_count in 1..code_len loop
         --注释：REGEXP_SUBSTR('变量','正则分隔符','从第几个算起','取第几个')
         m_code:=REGEXP_SUBSTR(c_t.org_code,'[^,]+',1,code_count);


         --如果code存在则value+1，否则新建该code渠道
         if mer_acount_list.exists(m_code) then
           mer_acount := mer_acount_list(m_code);
           mer_acount.m_count := mer_acount.m_count+1;
           mer_acount_list(m_code) := mer_acount;
         ELSE
           mer_acount.id:=m_code;
           --这里实现了统计减一，将设置初始值为0
           mer_acount.m_count := 0;
           mer_acount_list(m_code) := mer_acount;
         end if;
       end loop;


     end loop;


     codeIdList := '';
     codeNumList := '';
     v_counter := 0;
     code_count := 1;
     --将code集合用‘，’分隔封装进返回参数codeIdList和codeNumList中。
     while v_counter       if mer_acount_list.exists(code_count) then
         mer_acount := mer_acount_list(code_count);
         codeIdList := codeIdList || to_char(code_count) || ',';
         codeNumList := codeNumList || mer_acount.m_count || ',';
         v_counter := v_counter+1;
       end if;
       code_count := code_count+1;


     end loop;


     --dbms_output.put_line( codeIdList || '-0-' ||  codeNumList);
  end;