程序员刘杨

SELECT 姓名,
  MAX(CASE 课程 WHEN '语文' THEN 课程||',' ELSE '' END) ||
  MAX(CASE 课程 WHEN '数学' THEN 课程||',' ELSE '' END) ||
  MAX(CASE 课程 WHEN '物理' THEN 课程||',' ELSE '' END)
FROM TEST
GROUP BY 姓名

SELECT 姓名, MAX(SUBSTR(课程, 2)) 课程
  FROM (SELECT 姓名, SYS_CONNECT_BY_PATH(课程, ',') 课程
          FROM (SELECT 姓名, 课程,
                       姓名 || RN RCHILD,
                       姓名 || (RN - 1) RFATHER
                  FROM (SELECT 姓名, 课程,
                               ROW_NUMBER() OVER(PARTITION BY 姓名 ORDER BY 课程) RN
                          FROM TEST))
        CONNECT BY PRIOR RCHILD = RFATHER
         START WITH RFATHER LIKE '%0')
 GROUP BY 姓名

CREATE OR REPLACE FUNCTION STRCAT(INPUT VARCHAR2) RETURN VARCHAR2
  PARALLEL_ENABLE
  AGGREGATE USING STRCAT_TYPE;
  TYPE :
       CREATE OR REPLACE TYPE STRCAT_TYPE AS OBJECT(
              CAT_STRING VARCHAR2(4000), 
              STATIC FUNCTION ODCIAGGREGATEINITIALIZE(CS_CTX IN OUT STRCAT_TYPE) RETURN NUMBER, 
              MEMBER FUNCTION ODCIAGGREGATEITERATE(SELF IN OUT STRCAT_TYPE, VALUE IN VARCHAR2) RETURN NUMBER, 
              MEMBER FUNCTION ODCIAGGREGATEMERGE(SELF IN OUT STRCAT_TYPE, CTX2 IN OUT STRCAT_TYPE) RETURN NUMBER, 
              MEMBER FUNCTION ODCIAGGREGATETERMINATE(SELF IN OUT STRCAT_TYPE, RETURNVALUE OUT VARCHAR2, FLAGS IN 
 
NUMBER) RETURN NUMBER
       )
 
-- 使用方法
SELECT 姓名, STRCAT(课程) FROM TEST GROUP BY 姓名;