两个字符串无序匹配问题

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

注：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 NUMBER IS
    V_MOTHER VARCHAR2(200);
    V_MATCH  VARCHAR2(20);
    V_LENGTH NUMBER;
    V_LENM   NUMBER :=2;
    V_NUM    NUMBER := 0;
    V_CNT    NUMBER ;
  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
                                      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);
                          END IF;
    END LOOP;
    ---DBMS_OUTPUT.PUT_LINE(V_CNT);
    RETURN V_CNT;
  END;

-------------------------------------------------------------------------------------------------------------------------------------
SELECT NO,ST,FUN_MATCH_CNT(ST,'A3MLLKNKDS') FROM T1;

NO           ST                             相同数量
1        'A1A3BCLKMBNK'              3
2        'A2A4MBKLDMSK'              0

-------------------------------------------------------------------------------------------------------------------------------------

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

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