表t1中有两个字段NO(NUMBER类型),ST(VARCHAR2类型)
表中有如下值
NO           ST
1        'A1A3BCLKMBNK'
2        'A2A4MBKLDMSK'

注：ST字段中的值长度都是2的整数倍;


有一变量V_E,变量值为'A3MLLKNKDS'

现在将t1表中的ST字符与变量V_E进行比较，比较的方法如下：
V_E变量中每两个字符为一个基本单位，ST字段也是以两个字符为一个基本单位，让V_E与ST字段进行比较，得出ST中与V_E基本单位相同的数量

即：
t1表中的值可以看做
NO           ST

1        'A1  A3  BC  LK  MB  NK'
2        'A2  A4  MB  KL  DM  SK'
.        ......................................
.        ......................................
---------------------------------------------
变量V_E可以看做
V_E  -->  'A3 ML LK NK DS'
---------------------------------------------


比较之后得出：

NO           ST                         相同值     相同数量
1        'A1A3BCLKMBNK'      A3 LK NK        3
2        'A2A4MBKLDMSK'                            0
.        ............................         ...               .
.        ............................         ...               .


暂有如下函数，本人感觉效率稍低
------------------------------------------------------------------------------------------------------------------------------------
CREATE OR REPLACE FUNCTION FUN_MATCH_CNT(P_STR VARCHAR2, P_STR2 VARCHAR2) RETURN VARCHAR2 IS
    V_MOTHER VARCHAR2(200);
    V_MATCH  VARCHAR2(20);
    V_LENGTH NUMBER;
    V_LENM   NUMBER :=2;
    V_NUM    NUMBER := 0;
    V_CNT    NUMBER ;
                V_MATCHSTR VARCHAR2(200):=' ';
                V_MATECHED VARCHAR2(200):=' ';
  BEGIN     
          V_CNT  := 0;
    V_MOTHER := P_STR;
                --V_MATCH := P_STR2;
    --将 V_MOTHER值改变成每两个字符被逗号隔开的值
                V_LENGTH := LENGTH(REPLACE(P_STR,',','')) / 2;
    V_LENM   := LENGTH(P_STR2) / 2;
                IF(INSTR(V_MOTHER,',')= 0 ) THEN      
                        FOR X IN 1 .. (V_LENGTH - 1) LOOP
          V_MOTHER := SUBSTR(V_MOTHER, 1, (V_LENGTH - X) * 2) || ',' ||
                  SUBSTR(V_MOTHER, (V_LENGTH - X) * 2 + 1);
      END LOOP;
                END IF;
    --DBMS_OUTPUT.PUT_LINE(V_MOTHER);
    --针对每个基本单位进行比较
    FOR Y IN 1 .. V_LENM LOOP      
                   V_MATCH := SUBSTR(P_STR2, Y * 2 - 1, 2);
       SELECT SIGN(INSTR(V_MOTHER,V_MATCH ))
        INTO V_NUM
        FROM DUAL;
                                IF V_NUM = 1 THEN
                                      V_MATECHED := TRIM(V_MATECHED||V_MATCH);
                                      SELECT SUBSTR(V_MOTHER,1,INSTR(V_MOTHER, V_MATCH)-1)||SUBSTR(V_MOTHER,INSTR(V_MOTHER, V_MATCH)+3)
                                                        INTO V_MOTHER
                                                        FROM DUAL;
              V_CNT := V_CNT + V_NUM;
                                                        --V_CNT := V_CNT + FUN_MATCH_CNT(V_MOTHER,V_MATCH);
                                                        V_MATECHED := TRIM(V_MATECHED||NVL(FUN_MATCH_CNT(V_MOTHER,V_MATCH),' '));
                          END IF;
    END LOOP;                
    ---DBMS_OUTPUT.PUT_LINE(V_CNT);
   -- RETURN V_CNT;
         RETURN TRIM(V_MATECHED);
  END;




SELECT NO,ST ,fun_match_cnt(ST,'A3MLLKNKDS') AS 相同值,NVl(LENGTH(fun_match_cnt(ST,'A3MLLKNKDS')),0)/2 as 相同数量 FROM T1;
-------------------------------------------------------------------------------------------------------------------
NO           ST                         相同值     相同数量
1        'A1A3BCLKMBNK'      A3 LK NK        3
2        'A2A4MBKLDMSK'                            0
.        ............................         ...               .
.        ............................         ...               .


使用递归或者循环匹配方式效率太低，希望各路高人能有更好的方法

感谢各位的踊跃参与，个人不关心是否用到函数或者过程，关键是想提高效率，找高效的方法

[ 本帖最后由 wghxwl12 于 2008-3-18 14:50 编辑 ]