替代Oracle函数wmsys_wm_concat()函数

返回ODCICONST.成功； END;END;/函数：创建或替换 FUNCTION zh_concat(P1 VARCHAR2) RETURN VARCHAR2 AGGREGATE U

1.

从双中选择 postgresql('emp','ename')

2.sys_connect_by_path

3.创建或替换类型 zh_concat_im
AUTHID CURRENT_USER AS OBJECT
(
   CURR_STR VARCHAR2(32767),
   静态函数 ODCIAGGREGATEINITIALIZE(SCTX IN OUT zh_concat_im) RETURN NUM误码率，
   成员函数 ODCIAGGREGATEITERATE(SELF IN OUT zh_concat_im,
            P1 IN VARCHAR2) 返回数字，
   成员函数 ODCIAGGREGATETERMINATE(SELF IN zh_concat_im,
                              VARCHAR2 返回值，
                              标志编号)
                  返回编号,
   成员函数 ODCIAGGREGATEMERGE(SELF IN OUT zh_concat_im,
                   SCTX2 IN   zh_concat_im) 返回编号
);
/

创建或替换类型主体 zh_concat_我
是
静态函数 ODCIAGGREGATEINITIALIZE(SCTX IN OUT zh_concat_im)
   返回数字
   IS
   BEGIN
SCTX := zh_concat_im(NULL) ;
返回 ODCICONST.SUCCESS;
   END;
   会员FUNCTION ODCIAGGREGATEITERATE(SELF IN OUT zh_concat_im,
      P1 IN VARCHAR2)
   返回数字
   IS
   BEGIN
IF(CURR_STR 不为空) THEN
   CURR_STR := CURR_STR || ':' || P1;
ELSE
   CURR_STR := P1;
END IF;
返回 ODCICONST.SUCCESS;
   END;
   成员函数 ODCIAGGREGATETERMINATE(SELF IN zh_concat_im,
                             VARCHAR2 的返回值,
                              标志数量)
返回数字
   IS
   BEGIN
RETURNVALUE := CURR_STR ;
RETURN ODCICONST.SUCCESS;
   END;
   成员函数 ODCIAGGREGATEMERGE(SELF IN OUT zh_concat_im,
                                  SCTX2 IN zh_concat_im)
   返回数字
   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;
/

函数：
创建或替换 FUNCTION zh_concat(P1 VARCHAR2)
RETURN VARCHAR2 AGGREGATE USING zh_concat_im ;


修改标红分区，，可调整字段间分隔符