分类：
2008-10-28 18:10:18
使用绑定变量带来的好处不用多说，但是遇到SQL条件中条件值不固定的这类SQL在普通方式下就不能使用绑定变量，看到Tom网站上提供了一种可行的办法。
网上有不少的地方也提到了这种方法，那就是，先定义一个表类型，将个数不定的参数转换成这种表类型，再将查询结果传给IN子句，这样就可以实现了SQL语句中的绑定变量方式。
例如：
Select * From 病人费用记录 Where NO IN(Select * From Table(Cast(zlTools.f_Str2List ('A01,A02,A03') as zlTools. t_StrList)));
Select * From 病人费用记录 Where NO IN(Select * From The(Select Cast(zlTools.f_Str2List ('A01,A02,A03') as zlTools. t_StrList) From Dual));
Select A.* From 病人费用记录 A,Table(Cast(zlTools.f_Str2List ('A01,A02,A03') as zlTools. t_StrList)) B Where A.NO=B.Column_Value;
提供了一个包dbms_utility.comma_to_table可以将参数列表转换为一个类型表，但是由于结果是通过参数传出的,无法用于应用程序的SQL语句中。
于是,我们仍然选择通过创建SQL表类型和相关函数来实现,Type：t_StrList, t_NumList， 函数：f_Str2List, f_Num2List，如下:
Create Or Replace type zltools.t_StrList as table of varchar2(4000)
/
Create Or Replace Function zltools.f_Str2List(Str_In In Varchar2) Return zltools.t_StrList As
v_Str Long Default Str_In || ',';
v_Index Number;
v_List zltools.t_StrList := zltools.t_StrList();
--功能：将由逗号分隔的不带引号的字符序列转换为数据表
--参数：Str_In如:G0000123,G0000124,G0000125...
Begin
Loop
v_Index := Instr(v_Str, ',');
Exit When(Nvl(v_Index, 0) = 0);
v_List.Extend;
v_List(v_List.Count) := Trim(Substr(v_Str, 1, v_Index - 1));
v_Str := Substr(v_Str, v_Index + 1);
End Loop;
Return v_List;
End;
/
Create Or Replace type zltools.t_NumList as table of number
/
Create Or Replace Function zltools.f_Num2List(Str_In In Varchar2) Return zltools.t_NumList As
v_Str Long Default Str_In || ',';
v_Index Number;
v_List zltools.t_NumList := zltools.t_NumList();
--功能：将由逗号分隔的数字序列转换为数据表
--参数：Str_In如:73265,73266,73267....
Begin
Loop
v_Index := Instr(v_Str, ',');
Exit When(Nvl(v_Index, 0) = 0);
v_List.Extend;
v_List(v_List.Count) := To_Number(Trim(Substr(v_Str, 1, v_Index - 1)));
v_Str := Substr(v_Str, v_Index + 1);
End Loop;
Return v_List;
End;
/
但是这种方法有一个问题：
如果用户使用CBO,使用这种方式的SQL语句，不加处理的话一般(要根据具体SQL分析)会错误的使用Hash连接来产生执行计划，不能正确使用索引从而引发性能问题，
因为Type Table不具备统计信息，在计算成本时，始终认为它有8168行，在基于成本的优化器模式下，多表连接时一般就会选择Hash连接，一般比使用索引的嵌套连接效率差。
目前，已知的解决办法有两种：
%2B%2BCONSTRAINT%2Bindex
1. 对构造表的返回记录集加RowNum条件，通过子查询的实体化视图来改变执行计划，例如：
select * from table(Cast(zlTools.f_Str2List (v_str) as zlTools.t_StrList)) where rownum<5
2. 在SQL中加入优化器提示，例如：/*+ rule*/，或者/*+ ordered use_nl(t)*/，或者/*+ index(t ind_object_id)*/
第1种方式，需要对rownum的条件赋值，如果条件值采用动态的值，那么就达不到使用绑定变量的效果，如果采用固定值，有两种方案：
一种是使用一个固定的极限值，例如：99999，另一种是使用绑定变量。
试验结果见文末，这两种方式产生的执行计划采用了Hash连接，执行计划比不使用RowNum实体化视图更差。
第2种方式，如果使用指定嵌套连接提示或指定索引提示则需要对每个SQL针对性处理，需要分析具体的SQL。所以，一般情况建议在SQL中使用/*+ rule*/提示来固定执行计划。
--0.准备
--先创建表类型及转换函数: t_StrList,f_Str2List和t_NumList,f_Num2List
SQL> alter session set optimizer_mode=all_rows;
Session altered
SQL> var v_str varchar2(4000);
SQL> exec :v_str :='H0000005,H0000006,H0000007';
PL/SQL 过程已成功完成。
--1.当类型表不使用Rownum实体化视图时，错误地采用了Hash连接的执行计划，产生了6575块逻辑读+6909块物理读
SQL> Select a.No, a.结算方式, Nvl(b.性质, 1) As 性质, a.金额, a.摘要, a.结算号码
2 From (Select b.No, Decode(a.记录性质, 3, a.结算方式, Null) As 结算方式, a.摘要, a.结算号码, Sum
(1 * a.冲预交) As 金额
3 From 病人预交记录 a,
4 (Select Distinct No, 结帐id
5 From 病人费用记录
6 Where 记录性质 = 1 And No In (
7 Select * From Table(Cast(f_Str2List(:v_str) as t_StrList))
8 ) And 记录状态 In (1, 3)) b
9 Where a.结帐id = b.结帐id And a.记录性质 In (1, 11, 3) And Nvl(a.冲预交, 0) <> 0
10 Group By b.No, Decode(a.记录性质, 3, a.结算方式, Null), a.摘要, a.结算号码) a, 结算方式 b
11 Where a.结算方式 = b.名称(+);
[1]
