如何修改rowconcat函數？

Question

我在網站上找到了以下功能。對於特定的列，此函數將列值作爲逗號分隔值，如a，b，c，d等。有沒有一種方法可以將這些值取爲'a'，'b'，'c'，'d'等。

CREATE OR REPLACE FUNCTION rowconcat(q in VARCHAR2) RETURN VARCHAR2 IS 
    ret VARCHAR2(4000); 
    hold VARCHAR2(4000); 
     cur sys_refcursor; 
    BEGIN 
     OPEN cur FOR q; 
     LOOP 
     FETCH cur INTO hold; 
     EXIT WHEN cur%NOTFOUND; 
     IF ret IS NULL THEN 
      ret := hold; 
     ELSE 
      ret := ret || ',' || hold; 
     END IF; 
    END LOOP; 
    RETURN ret; 
END; 

我已經嘗試

IF ret IS NULL THEN 
    ret := '''|| hold || '''; 
ELSE 
    ret := ret || ',' || '''||hold || '''; 
END IF; 

結果，它給我的是

'|| hold || ','||hold || ','||hold || ','||hold || ','||hold || ','||hold || ','||hold || ','||hold || ','||hold || ','||hold || and so on. 

Answer 1

更換功能的以下部分，

IF ret IS NULL THEN 
     ret := hold; 
    ELSE 
     ret := ret || ',' || hold; 
    END IF; 

這一點，

IF ret IS NULL THEN 
     ret := ''''|| hold ||''''; 
    ELSE 
     ret := ret || ',' || ''''||hold || ''''; 
    END IF;