Oracle PL/SQL - 识别和提取两个字符串之间的匹配词答案

【问题标题】：Oracle PL/SQL - Identify and Extract Matching Words between two StringsOracle PL/SQL - 识别和提取两个字符串之间的匹配词
【发布时间】：2018-02-23 09:15:15
【问题描述】：

我对 Oracle Functions 还很陌生，因此为我的天真道歉。

我正在寻找一个函数，将COL_A 中的字符串与COL_B 中的字符串进行比较，然后将字符串中的任何匹配单词输出到COL_C。

例如

COL_A = ‘Microsoft Office’，COL_B = ‘Windows Microsoft’，因此 COL_C 的预期结果是 ‘Microsoft’
COL_A = ‘Microsoft Office’，COL_B = ‘Microsoft Office’，因此 COL_C 的预期结果是 ‘Microsoft Office’
COL_A = ‘Microsoft Office’，COL_B = ‘Microsoft Windows'，因此 COL_C 的预期结果是 ‘Microsoft’
COL_A = ‘Microsoft Office’，COL_B = ‘Outlook’，因此预期结果COL_C 将是NULL

我确实找到了一个几乎满足要求的函数 (Count sequential matching words in two strings oracle)，但是，此函数输出匹配单词的计数，并且仅对单词顺序也匹配的匹配进行分类（出于我的目的，顺序是无关紧要的，并且理想情况下，我希望显示匹配的单词）。

CREATE OR REPLACE FUNCTION STR_WORD_MATCH(
  P_STR1 IN VARCHAR2,
  P_STR2 IN VARCHAR2 )
 RETURN NUMBER
IS
 L_STR1 VARCHAR2(4000) := P_STR1;
 L_STR2 VARCHAR2(4000) := P_STR2;
 L_RES NUMBER DEFAULT 0;
 L_DEL_POS1 NUMBER;
 L_DEL_POS2 NUMBER;
 L_WORD1 VARCHAR2(1000);
 L_WORD2 VARCHAR2(1000);
BEGIN
 LOOP
  L_DEL_POS1 := INSTR(L_STR1,' ');
  L_DEL_POS2 := INSTR(L_STR2,' ');
  CASE L_DEL_POS1
  WHEN 0 THEN
   L_WORD1 := L_STR1;
   L_STR1 := '';
  ELSE
   L_WORD1 := SUBSTR(L_STR1,1,L_DEL_POS1 - 1);
  END CASE;
  CASE L_DEL_POS2
  WHEN 0 THEN
   L_WORD2 := L_STR2;
   L_STR2 := '';
  ELSE
   L_WORD2 := SUBSTR(L_STR2,1,L_DEL_POS2 - 1);
  END CASE;
  EXIT
 WHEN (L_WORD1 <> L_WORD2) OR ((L_WORD1 IS NULL) OR (L_WORD2 IS NULL));
  L_RES := L_RES + 1;
  L_STR1 := SUBSTR(L_STR1,L_DEL_POS1 + 1);
  L_STR2 := SUBSTR(L_STR2,L_DEL_POS2 + 1);
 END LOOP;
RETURN L_RES;
END;

一如既往，我们将不胜感激。

【问题讨论】：

标签： oracle function plsql

【解决方案1】：

您可以在一个查询中执行此操作，但为了简化语法，我创建了短函数来拆分单词。接下来我用了这个函数和listagg()：

select rn, max(c1) c1, max(c2) c2, 
       listagg(t2.column_value, ' ') within group (order by rn, c1, c2) common
  from (select rownum rn, c1, c2 from t) t 
  cross join table(split(c1)) t1 
   left join table(split(c2)) t2 on t2.column_value = t1.column_value
  group by rn

功能：

create or replace function split(i_str in varchar2) 
  return sys.odcivarchar2list pipelined is
begin
  for i in 1..length(' '||regexp_replace(i_str, '[^ ]+')) loop
    pipe row (regexp_substr(i_str, '[^ ]+', 1, i));
  end loop;
end;

例子：

with t (c1, c2) as (
    select 'Microsoft Office', 'Windows Microsoft' from dual union all
    select 'Microsoft Office', 'Microsoft Office'  from dual union all
    select 'Microsoft Office', 'Microsoft Windows' from dual union all
    select 'Microsoft Office', 'Outlook' from dual )
select rn, max(c1) c1, max(c2) c2, 
       listagg(t2.column_value, ' ') within group (order by rn, c1, c2) common
  from (select rownum rn, c1, c2 from t) t 
  cross join table(split(c1)) t1 
   left join table(split(c2)) t2 on t2.column_value = t1.column_value
  group by rn

结果：

        RN C1               C2                COMMON
---------- ---------------- ----------------- -----------------
         1 Microsoft Office Windows Microsoft Microsoft
         2 Microsoft Office Microsoft Office  Microsoft Office
         3 Microsoft Office Microsoft Windows Microsoft
         4 Microsoft Office Outlook

【讨论】：