oracle利用函数实现多行一列数据合并效果

/* Formatted on 2013-1-11 13:23:55 (QP5 v5.185.11230.41888) */
 CREATE OR REPLACE FUNCTION GetGiftsName (rid  in number)//rid 穿的参数
    RETURN VARCHAR2
  AS
     STR   VARCHAR2 (1000);                                           /*返回的数据集*/
  BEGIN
     DECLARE
        v_medCode VARCHAR2 (100);                                 /*存放临时变量的地方*/
 
       CURSOR D_cursor
       IS
         select b.cproname from cc_promotions a left join cc_progifts b on a.ipromosid=b.ipromosid where a.ipromosid=rid and b.bgift='';
    BEGIN
       OPEN D_cursor;
     loop
     fetch D_cursor into v_medCode;
     EXIT WHEN D_cursor%NOTFOUND;
    if length(STR) > 0 THEN
        STR := STR ||','|| v_medCode;
     ELSE
        STR := STR || v_medCode;
     END IF;
     END LOOP;
     close D_cursor;
    end;
     RETURN STR;
 END GetGiftsName;

创新互联公司是专业的渝中网站建设公司，渝中接单;提供成都网站建设、成都做网站,网页设计,网站设计,建网站,PHP网站建设等专业做网站服务;采用PHP框架,可快速的进行渝中网站开发网页制作和功能扩展;专业做搜索引擎喜爱的网站,专业的做网站团队,希望更多企业前来合作!

select GetGiftsName(428) from dual

实现的效果为可以把相同id下的一个字段数据查询出来并且以逗号分开（ 加州西梅,加州西梅2）