Oracle 编写函数01

FUNCTION f_get_line_remark_desc_chn(pi_line_remark IN VARCHAR2) RETURN VARCHAR2 IS
    po_remark_desc_chn VARCHAR2(4000) := NULL;
    lv_sql             VARCHAR2(4000) := NULL;
  BEGIN
    lv_sql := 'SELECT wmsys.wm_concat(t.special_requierement_chn)';
    lv_sql := lv_sql || '  FROM bas_standard_line_remarks_t t';
    lv_sql := lv_sql ||
              '          WHERE t.remark_id IN (SELECT DISTINCT to_number(column_value) AS col_val';
    lv_sql := lv_sql || '                  FROM (TABLE(pc_comm_array_type(' || pi_line_remark ||
              '))))';
    EXECUTE IMMEDIATE lv_sql //执行上面的sql语句
      INTO po_remark_desc_chn;
    RETURN po_remark_desc_chn;
  EXCEPTION
    WHEN OTHERS THEN
      RETURN po_remark_desc_chn;
  END f_get_line_remark_desc_chn;