多行记录 某字段 转为一行以逗号分隔的字符串

/**多行记录 某字段 转为一行以逗号分隔的字符串
*使用范围：Oracle使用
*使用事例：select a.itemid,f_m_t(a.itemid) from ftstockaccount
*输入：物料ID
*输出：返回使用该物料的所有单号（重复的单号作为一个单号）以逗号分隔的字符串
*描述：1、 使用varchar2(5000)作为中间量，足够的大小是必要的。
           并不会占用太多的空间，因为它是可变长的，
           Oracle使用时，每条记录都将调用该函数，每次函数调用完成后，释放varchar2(5000)所占空间。
       2、 使用游标每次都会进行数据库查询，并循环取得数据记录，这将会造成速度的问题
       3、 下面的Oracle两种游标(普通游标与FOR游标)都可以使用（通过测试）
*使用时修改的地方：游标查询语句  修改后可直接使用
*作者：张贞亮
*/
create or replace function F_M_T(INitemid in varchar2) return varchar2 is
  MergeStr varchar2(5000);
  cursor cur is
    select distinct nvl(a.docno, '') BaseValue
      from ftstockaccount a
     where a.itemid = INitemid;
  cur_row cur%ROWTYPE;
begin
  MergeStr := '';
  --普通游标
/*  open cur;
  loop
    fetch  cur into  cur_row;
    exit when  cur%NOTFOUND;
    MergeStr := MergeStr||',' || cur_row.BaseValue;
  end loop;
   close cur;*/
  
  ----FOR游标
  for cur_row in cur
  loop
    if Mergestr<>'' then 
       MergeStr := MergeStr||',' || cur_row.BaseValue;
    else
       MergeStr :=cur_row.BaseValue;
    end if;
  end loop;

  return(MergeStr);
end;