1

当我列出以parm_list_a. 但是,我想like按照parm_list_b.

我该怎么做才能使此代码正常工作parm_list_b

set serveroutput on;
declare
parm_list_a varchar2(100) := 'ADAR,CADD';
parm_list_b varchar2(100) := 'A%,BE%'; 

cursor c_ok_counties 
is
with ok_counties as
(select 'ALFA' AS cty_code, 'Alfalfa' as cty_name from dual union all
 select 'ATOK' AS cty_code, 'Atoka'   as cty_name from dual union all
 select 'BEAV' AS cty_code, 'Beaver'  as cty_name from dual union all
 select 'BECK' AS cty_code, 'Beckahm' as cty_name from dual union all
 select 'BLAI' AS cty_code, 'Blaine'  as cty_name from dual union all
 select 'CADD' as cty_code, 'Caddo'   as cty_name from dual)
 select cty_code,
        cty_name
 from  ok_counties  
 where cty_code in 
      (select regexp_substr(
      parm_list_a,   -- Replace with parm_list_b
      '[^,]+',1,LEVEL)
      from dual
      connect by regexp_substr(
      parm_list_a  -- Replace with parm_list_b
      ,'[^,]+',1,LEVEL) is not null);

begin
         for county in c_ok_counties loop
         dbms_output.put_line(county.cty_code || ' ' ||county.cty_name);         
         end loop;
end;

期望的结果

   ALFA Alfalfa
   ATOK Atoka
   BEAV Beaver
   BECK Beckham
4

1 回答 1

1

LIKE由于您必须在中使用乘法 IN,您可以更好地编写如下代码:

set serveroutput on;
declare
parm_list_a varchar2(100) := 'ADAR,CADD';
parm_list_b varchar2(100) := 'A|BE'; 

cursor c_ok_counties 
is
with ok_counties as
(select 'ALFA' AS cty_code, 'Alfalfa' as cty_name from dual union all
 select 'ATOK' AS cty_code, 'Atoka'   as cty_name from dual union all
 select 'BEAV' AS cty_code, 'Beaver'  as cty_name from dual union all
 select 'BECK' AS cty_code, 'Beckahm' as cty_name from dual union all
 select 'BLAI' AS cty_code, 'Blaine'  as cty_name from dual union all
 select 'CADD' as cty_code, 'Caddo'   as cty_name from dual)
 select cty_code,
        cty_name
 FROM  OK_COUNTIES  
 where regexp_like(cty_code, '^('||parm_list_b||')');

begin
         for county in c_ok_counties loop
         dbms_output.put_line(county.cty_code || ' ' ||county.cty_name);         
         END LOOP;
end;
于 2013-10-09T05:26:17.080 回答