ORACLE PL/SQL：集合类型tCamRow数据未在SELECT语句输出中显示

问题根源 #

1. 行类型变量未赋值：你在函数内部声明了tCamRow sample_data.assign_rules%rowtype;，但该变量未通过参数传入或内部查询赋值，所有字段默认值为NULL，导致两个IF条件中的is not null判断全部不成立，无法拼接任何查询条件。
2. 字段名笔误：第一个条件判断中使用了carrier_cd，但预期SQL中是car_cd，即使变量被赋值，这个条件也不会触发。

修复方案 #

方案1：通过函数参数传入行数据

这是最合理的方式，让调用方传入需要的行类型数据：

function SelectStmt(pCamRow sample_data.assign_rules%rowtype) return clob is
          
    vReturn clob;
    vFirstCondAdded boolean := false; /* Add to "where" vs create "and..." */

  begin
  
    vReturn := 'select ctbt.car_key' || chr(10) ||
               '                                    from sample_data.claims ctbt' || chr(10) ||
               '                                   where ';

    /* CarCd check - 修正字段名笔误 */
    if((pCamRow.car_cd is not null) and (upper(pCamRow.car_cd) != 'ALL')) then
      vReturn := vReturn || 'ctbt.car_cd = ''' || replace(pCamRow.car_cd, '''', '''''') || '''';
      vFirstCondAdded := true;
    end if;

    /* Acc check */
    if((pCamRow.acc is not null) and (upper(pCamRow.acc) != 'ALL')) then
      if(vFirstCondAdded) then
        vReturn := vReturn || chr(10) || '                                     and ctbt.acc = ''' || replace(pCamRow.acc, '''', '''''') || '''';
      else
        vReturn := vReturn || 'ctbt.acc = ''' || replace(pCamRow.acc, '''', '''''') || '''';
      end if;
      vFirstCondAdded := true;
    end if;

    -- 处理无任何条件的情况，避免无效WHERE子句
    if not vFirstCondAdded then
      vReturn := substr(vReturn, 1, length(vReturn) - 7); -- 移除末尾的" where "
    end if;

    dbms_output.put_line(vReturn);
    return(vReturn);
    
  exception
    when others then
      dbms_output.put_line('***SelectStmt***');
      raise;
end SelectStmt;

方案2：函数内部查询赋值

如果需要在函数内部从assign_rules表获取数据，添加查询语句（需处理异常）：

function SelectStmt return clob is
          
    vReturn clob;
    vFirstCondAdded boolean := false;
    tCamRow sample_data.assign_rules%rowtype;

  begin
    -- 示例：根据业务条件查询行数据，替换为实际条件
    select * into tCamRow 
    from sample_data.assign_rules 
    where rule_id = 'YOUR_RULE_ID';

    vReturn := 'select ctbt.car_key' || chr(10) ||
               '                                    from sample_data.claims ctbt' || chr(10) ||
               '                                   where ';

    /* CarCd check - 修正字段名笔误 */
    if((tCamRow.car_cd is not null) and (upper(tCamRow.car_cd) != 'ALL')) then
      vReturn := vReturn || 'ctbt.car_cd = ''' || replace(tCamRow.car_cd, '''', '''''') || '''';
      vFirstCondAdded := true;
    end if;

    /* Acc check */
    if((tCamRow.acc is not null) and (upper(tCamRow.acc) != 'ALL')) then
      if(vFirstCondAdded) then
        vReturn := vReturn || chr(10) || '                                     and ctbt.acc = ''' || replace(tCamRow.acc, '''', '''''') || '''';
      else
        vReturn := vReturn || 'ctbt.acc = ''' || replace(tCamRow.acc, '''', '''''') || '''';
      end if;
      vFirstCondAdded := true;
    end if;

    -- 处理无任何条件的情况
    if not vFirstCondAdded then
      vReturn := substr(vReturn, 1, length(vReturn) - 7);
    end if;

    dbms_output.put_line(vReturn);
    return(vReturn);
    
  exception
    when no_data_found then
      dbms_output.put_line('***SelectStmt: No matching rule found***');
      raise;
    when too_many_rows then
      dbms_output.put_line('***SelectStmt: Multiple rules found***');
      raise;
    when others then
      dbms_output.put_line('***SelectStmt***');
      raise;
end SelectStmt;

额外注意事项 #

• SQL注入风险：直接拼接字符串生成SQL存在注入风险，建议使用绑定变量或DBMS_SQL包构建动态SQL。如果必须拼接，用replace函数转义单引号（如示例中的replace(pCamRow.car_cd, '''', '''''')）。
• 异常处理：内部查询时必须处理NO_DATA_FOUND和TOO_MANY_ROWS异常，避免函数崩溃。

内容的提问来源于stack exchange，提问作者jack opol trades