加入收藏 | 设为首页 | 会员中心 | 我要投稿 湖南网 (https://www.hunanwang.cn/)- 科技、建站、经验、云计算、5G、大数据,站长网!
当前位置: 首页 > 编程 > 正文

array to csv

发布时间:2021-01-16 12:49:50 所属栏目:编程 来源:网络整理
导读:本日PHP站长网 52php.cn把网络自互联网的代码分享给各人,仅供参考。 type t_str_array as table of varchar2(4000);function array_to_csv (p_values in t_str_array,p_separator in varchar2 := g_default_separator) r

以下代码由PHP站长网 52php.cn网络自互联网

此刻PHP站长网小编把它分享给各人,仅供参考

type t_str_array as table of varchar2(4000);
function array_to_csv (p_values in t_str_array,p_separator in varchar2 := g_default_separator) return varchar2
as
  l_value       varchar2(32000);
  l_returnvalue varchar2(32000);
begin

  /*

  Purpose:      convert array of values to CSV

  Remarks:

  Who     Date        Description
  ------  ----------  --------------------------------
  MBR     31.03.2010  Created
  fartpig 07.03.2011  noted
  */
  --遍历值 数组
  for i in p_values.first .. p_values.last loop    
    l_value := p_values(i);
    --假如个中包括了 支解标记,
    if instr(l_value,p_separator) > 0 then
      --行使 双引号 将其包罗起来
      l_value := '"' || l_value || '"';
    end if;
    --假如 是第一次 赋值
    if l_returnvalue is null then
      --直接 赋值
      l_returnvalue := l_value;
    else
      --行使 脱离符,举办响应的 值的支解
      l_returnvalue := l_returnvalue || p_separator || l_value;
    end if;
  end loop;

  return l_returnvalue;

end array_to_csv;

以上内容由PHP站长网【52php.cn】网络清算供各人参考研究

假如以上内容对您有辅佐,接待保藏、点赞、保举、分享。

(编辑:湖南网)

【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!

    热点阅读