--正则表达式regexp_substr解决where in list问题
/*'^' 匹配输入字符串的开始位置,在方括号表达式中使用,此时它表示不接受该字符集合。
'+' 匹配前面的子表达式一次或多次
所以regexp_substr(:str,'[^,]+',1,LEVEL)表示从字符串:str中的第一个字母一直到第level个字母,按逗号截取,
得到的结果赋给value_str*/
VAR str VARCHAR2(100);
EXEC :str:='XY,YZ';
SELECT COUNT(*) FROM t1 WHERE object_name IN
(SELECT regexp_substr(:str,'[^,]+',1,LEVEL)AS value_str FROM dual
CONNECT BY LEVEL <= LENGTH(TRIM(TRANSLATE(:str,TRANSLATE(:str,',',' '),' ')))+1);
/*'^' 匹配输入字符串的开始位置,在方括号表达式中使用,此时它表示不接受该字符集合。
'+' 匹配前面的子表达式一次或多次
所以regexp_substr(:str,'[^,]+',1,LEVEL)表示从字符串:str中的第一个字母一直到第level个字母,按逗号截取,
得到的结果赋给value_str*/