ORA-22922 錯誤 wm_concat 函數的替代方案

CREATE OR REPLACE FORCE VIEW BEFORVIPRESET150630.V_YHJ_VIP_WX_XSMX
( ORDERDATE, MEMBER_CODE, INV_NUM, ZJE, 
  ZFJE, SHOP_CODE, SKU, C_SHORT_DE, 
  SELL_QTY, SERIAL_NO )
AS
SELECT 
       CASE 
           WHEN A.ISDEPOSIT<>1 
           THEN TO_CHAR(A.INV_DATE,'yyyy-mm-dd') 
           ELSE 
               (SELECT TO_CHAR(MAX(PAID_DATE),'yyyy-mm-dd') AS INV_DATE 
                 FROM PAY_DEP E 
                WHERE E.INV_NUM = A.INV_NUM 
               ) 
       END AS "ORDERDATE", 
       TRIM(A.MEMBER_CODE), 
       A.INV_NUM, 
       SUM(B.SELL_QTY)*ABS(SUM(B.DISC_AMT+B.SUBTOTAL)) "zje", 
       SUM(B.SELL_QTY)*ABS(SUM(B.DISC_AMT+B.SUBTOTAL)) "zfje",
              ( 
           CASE 
               WHEN A.INV_TYPE=0 
               THEN S.WARE_CODE 
               ELSE SR.STOREROOM_CODE 
           END 
       ) AS SHOP_CODE, 
       B.BAR_CODE,
       B.C_SHORT_DE,
       SUM(B.SELL_QTY),
       replace(wm_concat(DC.SERIAL_NO),' ','')   
  FROM MEMBERSHIP D 
   LEFT JOIN DINV_HDR A 
       ON D.COM_ID = A.COM_ID 
       AND D.MEMBER_CODE = A.MEMBER_CODE 
       AND 
       ( 
           NOT trim(D.MEMBER_CODE) IS NULL 
       ) 
   INNER JOIN DINV_DTL B 
       ON B.COM_ID = A.COM_ID 
       AND B.SHOP_CODE = A.SHOP_CODE 
       AND B.COUNTER = A.COUNTER 
       AND B.INV_NUM = A.INV_NUM 
   LEFT JOIN STOCK C 
       ON C.COM_ID = A.COM_ID 
       AND C.ITEM_CODE = B.ITEM_CODE 
   INNER JOIN WAREHOUSE S 
       ON S.COM_ID=A.COM_ID 
       AND S.WARE_CODE=A.SHOP_CODE 
   LEFT JOIN SHOP SH 
       ON SH.COM_ID=A.COM_ID 
       AND A.SHOP_CODE =SH.SHOP_CODE 
   LEFT JOIN STOREROOM SR 
       ON SR.COM_ID=A.COM_ID 
       AND SR.WARE_CODE=A.SHOP_CODE 
       AND SR.STOREROOM_CODE=A.WARE_DIST 
   LEFT JOIN dinv_coupon DC ON DC.INV_NUM=A.INV_NUM
 WHERE ( 
           A.ISDEPOSIT=0 
           AND A.VOIDED <> 1 
       ) 
       
 GROUP BY 
       A.MEMBER_CODE,       
       A.INV_DATE, 
       A.ISDEPOSIT, 
       A.INV_NUM, 
       B.C_SHORT_DE,
       B.BAR_CODE, 
       DC.serial_no,
       CASE 
           WHEN A.ISDEPOSIT=1 
           THEN A.INV_DATE 
           ELSE NULL 
       END,A.INV_TYPE,
              A.MEMBER_CODE,
       S.WARE_CODE ,
SR.STOREROOM_CODE 
       
ORDER BY 
       A.INV_DATE DESC

創建視圖，及在視圖裏查詢沒問題，但是在C#一調用，就報ORA-22922 ，找了一些方法，包括用：

listagg(city,',') within GROUP (order by city)  ，感覺多少有點問題，listagg列傳行無分隔，也許我沒理解透，項目着急先上能用的。

後來找到高手的代碼參考複製，居然還能用，zh_concat列傳行用：分隔，還湊合。

使用時，就把wm_concat用zh_concat替換了一下，就Ok了。

create or replace TYPE zh_concat_im
AUTHID CURRENT_USER AS OBJECT
(
  CURR_STR VARCHAR2(32767),
  STATIC FUNCTION ODCIAGGREGATEINITIALIZE(SCTX IN OUT zh_concat_im) RETURN NUMBER,
  MEMBER FUNCTION ODCIAGGREGATEITERATE(SELF IN OUT zh_concat_im,
               P1 IN VARCHAR2) RETURN NUMBER,
  MEMBER FUNCTION ODCIAGGREGATETERMINATE(SELF IN zh_concat_im,
                                 RETURNVALUE OUT VARCHAR2,
                                 FLAGS IN NUMBER)
                     RETURN NUMBER,
  MEMBER FUNCTION ODCIAGGREGATEMERGE(SELF IN OUT zh_concat_im,
                    SCTX2 IN  zh_concat_im) RETURN NUMBER
);
/

create or replace TYPE BODY zh_concat_im
IS
  STATIC FUNCTION ODCIAGGREGATEINITIALIZE(SCTX IN OUT zh_concat_im)
  RETURN NUMBER
  IS
  BEGIN
    SCTX := zh_concat_im(NULL) ;
    RETURN ODCICONST.SUCCESS;
  END;
  MEMBER FUNCTION ODCIAGGREGATEITERATE(SELF IN OUT zh_concat_im,
          P1 IN VARCHAR2)
  RETURN NUMBER
  IS
  BEGIN
    IF(CURR_STR IS NOT NULL) THEN
      CURR_STR := CURR_STR || ':' || P1;
    ELSE
      CURR_STR := P1;
    END IF;
    RETURN ODCICONST.SUCCESS;
  END;
  MEMBER FUNCTION ODCIAGGREGATETERMINATE(SELF IN zh_concat_im,
                                 RETURNVALUE OUT VARCHAR2,
                                 FLAGS IN NUMBER)
    RETURN NUMBER
  IS
  BEGIN
    RETURNVALUE := CURR_STR ;
    RETURN ODCICONST.SUCCESS;
  END;
  MEMBER FUNCTION ODCIAGGREGATEMERGE(SELF IN OUT zh_concat_im,
                                   SCTX2 IN zh_concat_im)
  RETURN NUMBER
  IS
  BEGIN
    IF(SCTX2.CURR_STR IS NOT NULL) THEN
      SELF.CURR_STR := SELF.CURR_STR || ':' || SCTX2.CURR_STR ;
    END IF;
    RETURN ODCICONST.SUCCESS;
  END;
END;
/

函數：
create or replace FUNCTION zh_concat(P1 VARCHAR2)
RETURN VARCHAR2 AGGREGATE USING zh_concat_im ;
/

參考自：

http://blog.csdn.net/cages/article/details/7457549