oracle中一个表的行列转换

Posted

tags:

篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了oracle中一个表的行列转换相关的知识,希望对你有一定的参考价值。

一个查询出来的结果,有3列N行,行不固定,怎么用一个动态的语句实现行列转换,我用的PL/SQL,oracle10g数据库。
网上找了个方法
declare @sql varchar ( 8000 )
set @sql = ' select Name as ' + ' 姓名 '
select @sql = @sql + ' , max(case Subject when ''' + Subject + ''' then Result else 0 end) [ ' + Subject + ' ] '
from ( select distinct Subject from tb) as a
set @sql = @sql + ' from tb group by name '
exec ( @sql )
plsql不能执行,谁知道该怎么做
由于结果集不固定,所以需要一个动态的语句来完成转换,谁能帮我把它转换成oracle的存储过程也可以

参考技术A --用case when行列装置,然后分组聚合
SELECT DEPTNO AS "部门编号",
DNAME AS "部门名称",
SUM(F1) AS "文员总工资",
SUM(F2) AS "销售总工资",
SUM(F3) AS "经理总工资",
SUM(F4) AS "主管总工资",
SUM(F5) AS "分析师总工资"
FROM
(select E.DEPTNO,D.DNAME,
case when job = 'CLERK' THEN SAL ELSE 0 END F1,
case when job = 'SALESMAN' then SAL else 0 end f2,
case when job = 'MANAGER' then SAL else 0 end f3,
case when job = 'PRESIDENT' then SAL else 0 end f4,
case when job = 'ANALYST' then SAL else 0 end f5
from emp E,DEPT D
WHERE E.DEPTNO = D.DEPTNO
)
GROUP BY DEPTNO,DNAME追问

用这个方法我至少得写2000多个case

追答

可以应对行固定的情况。
如果要写2000多个case,那就说明行是不固定的,或者选的转换字段不对。

参考技术B 结果不固定的行列转换是不可能存在的
原因和简单,比如我有一个表记录为
1 x 2011-11-11
2 y 2011-11-12
转换完应该是把这两行竖起来,
但是你要这每一列的类型都是什么呢???
无法确定,如果你都给定义成nvarchar类型,那长度又是多少?
如果给最大长度,那么字段个数是多少?
如果是根据行数计算,那么表中有百万条记录呢?这拥有百万列的表可能存在吗?

所以说,这东西不可能存在完全通用的,限制条件太多。
只能用固定的或者固定限制的。
参考技术C select WMSYS.WM_CONCAT(col_name) from dual
oralce 9以上这个可以用.
不过大小有限制.自己试试看吧.
参考技术D 你这是个 SQL_Server的存储过程啊!
在Pl/sql里面肯定不行啊!追问

弄到plsql里面该怎么做呢

追答

我给你我以前写的示例 你可以看看 照样子做一个
这个语句只是查询一个系统表 不会对系统表进行任何操作
可以放心使用
SELECT SUM(DECODE(v.NAME,'session logical reads',v.VALUE,0)) AS session_logical_reads,
SUM(DECODE(v.NAME,'physical reads',v.VALUE,0)) AS physical_reads,
SUM(DECODE(v.NAME,'physical reads direct',v.VALUE,0)) AS physical_reads_direct,
SUM(DECODE(v.NAME,'physical reads direct (lob)',v.VALUE,0)) AS physical_reads_direct_lob,
SUM(DECODE(v.NAME,'db block gets',v.VALUE,0)) AS db_block_gets,
SUM(DECODE(v.NAME,'consistent gets',v.VALUE,0)) AS consistent_gets
FROM
(SELECT NAME, VALUE
FROM V$SYSSTAT
WHERE NAME IN ('session logical reads','physical reads',
'physical reads direct','physical reads direct (lob)','db block gets','consistent gets')) v;

追问

这个方法是静态的吧,我需要一个可以随结果集改变的转换,因为查询出来的结果有上千行,并且条件不一样 ,结果也不固定

追答

上千行,你这个需求太夸张了
你查出来,放到excel里面 自己转置吧!

本回答被提问者采纳
第5个回答  2011-11-22 等待高手

ABAP 内表的行列转换-NEW

REPORT Z_TEST_COL_TO_ROW.

TYPE-POOLS: slis.
TABLES: mseg,mkpf.
DATA: gd_fieldcat TYPE slis_t_fieldcat_alv.
DATA: sla TYPE slis_layout_alv ,
      ivariant LIKE disvariant,
      i_repid LIKE sy-repid ,
      i_excluding TYPE slis_t_extab.
TYPESBEGIN OF ty_sum ,
        werks LIKE mseg-werks ,
        matnr LIKE mseg-matnr ,
        lgort LIKE mseg-lgort ,
        bwart LIKE mseg-bwart ,
        menge LIKE mseg-menge ,
END OF ty_sum.

DATA : itab TYPE STANDARD TABLE OF ty_sum WITH HEADER LINE .
DATA : hs_sum TYPE HASHED TABLE OF ty_sum WITH UNIQUE KEY werks matnr lgort bwart WITH HEADER LINE .
DATA : itab_sum TYPE STANDARD TABLE OF ty_sum WITH HEADER LINE .
DATABEGIN OF itab_out OCCURS 0,
        werks LIKE mseg-werks ,
        matnr LIKE mseg-matnr ,
        lgort LIKE mseg-lgort ,
        menge01 TYPE ,
        menge02 TYPE ,
        menge03 TYPE ,
        menge04 TYPE ,
        menge05 TYPE ,
        menge06 TYPE ,
        menge07 TYPE ,
        menge08 TYPE ,
        menge09 TYPE ,
        menge10 TYPE ,
        menge11 TYPE ,
        menge12 TYPE ,
        menge13 TYPE ,
        menge14 TYPE ,
        menge15 TYPE ,
        menge16 TYPE ,
        menge17 TYPE ,
        menge18 TYPE ,
        menge19 TYPE ,
        menge20 TYPE ,
        menge21 TYPE ,
        menge22 TYPE ,
        menge23 TYPE ,
        menge24 TYPE ,
        menge25 TYPE ,
        menge26 TYPE ,
        line_sum TYPE ,
END OF itab_out.

TYPESBEGIN OF ty_bwart ,
      bwart LIKE mseg-bwart ,
END OF ty_bwart.

DATA : hs_bwart TYPE HASHED TABLE OF ty_bwart WITH UNIQUE KEY bwart WITH HEADER LINE .
DATA : itab_bwart TYPE STANDARD TABLE OF ty_bwart WITH HEADER LINE .
FIELD-SYMBOLS: <f_fs1> ,
<f_fs2>.
DATA: max_count TYPE .
SELECT-OPTIONS:
      s_mblnr FOR mseg-mblnr ,
      s_budat FOR mkpf-budat .
PARAMETERS: p_sum AS CHECKBOX .

START-OF-SELECTION.
PERFORM getdata.
PERFORM fixdata.

IF p_sum ‘X‘.
    PERFORM outdata.
ELSE.
    PERFORM outdata2.
ENDIF.
*&---------------------------------------------------------------------*
*& Form GETDATA
*&---------------------------------------------------------------------*
FORM getdata.
SELECT werks matnr lgort bwart menge INTO TABLE itab
    FROM mkpf INNER JOIN mseg ON mkpf~mblnr = mseg~mblnr AND
          mkpf~mjahr = mseg~mjahr
    WHERE mkpf~mblnr IN s_mblnr AND
          mkpf~budat IN s_budat .
ENDFORM" GETDATA
*&---------------------------------------------------------------------*
*& Form FIXDATA
*&---------------------------------------------------------------------*
FORM fixdata.
DATAindex LIKE sy-tabix .
LOOP AT itab.
      hs_sum = itab.
      COLLECT hs_sum.
            hs_bwart = itab-bwart .
      COLLECT hs_bwart.
ENDLOOP.

SORT hs_bwart.
      itab_bwart[] = hs_bwart[].
      itab_sum[] = hs_sum[].
LOOP AT itab_sum.
    itab_out-werks = itab_sum-werks .
    itab_out-matnr = itab_sum-matnr .
    itab_out-lgort = itab_sum-lgort .
READ TABLE itab_bwart WITH KEY bwart = itab_sum-bwart .
index = sy-tabix + 3.
ASSIGN COMPONENT index OF STRUCTURE itab_out TO <f_fs1>.
<f_fs1> = itab_sum-menge.
itab_out-line_sum = itab_sum-menge.
COLLECT itab_out.
CLEAR itab_out.
ENDLOOP.
ENDFORM" FIXDATA
*&---------------------------------------------------------------------*
*& Form outdata
*&---------------------------------------------------------------------*
FORM outdata.
PERFORM fieldcat_init .
sla-colwidth_optimize ‘X‘.
sla-zebra ‘X‘.
i_repid = sy-repid.
CALL FUNCTION ‘REUSE_ALV_GRID_DISPLAY‘
EXPORTING
i_callback_program = i_repid
it_fieldcat = gd_fieldcat[]
i_save ‘A‘
is_variant = ivariant
is_layout = sla
it_excluding = i_excluding
i_callback_user_command ‘USER_COMMAND‘
TABLES
t_outtab = itab_sum
EXCEPTIONS
program_error 1
OTHERS 2.
ENDFORM" outdata
*---------------------------------------------------------------------*
* FORM fieldcat_init *
*---------------------------------------------------------------------*
FORM fieldcat_init .
PERFORM frm_catlg_set USING:
      ‘WERKS‘ ‘WERKS‘ ‘X‘ ,
      ‘MATNR‘ ‘MATNR‘ ‘X‘ ,
      ‘LGORT‘ ‘LGORT‘ ‘X‘ ,
      ‘BWART‘ ‘BWART‘ ‘X‘ ,
      ‘MENGE‘ ‘MENGE‘ ‘‘ .
ENDFORM"fieldcat_init
*---------------------------------------------------------------------*
* FORM frm_catlg_set *
*---------------------------------------------------------------------*
FORM frm_catlg_set USING p_field p_text  p_key.

DATA: ls_fieldcat TYPE slis_fieldcat_alv.
      ls_fieldcat-fieldname = p_field.
      ls_fieldcat-seltext_l = p_text.
      ls_fieldcat-key = p_key.
      IF p_field ‘LINE_SUM‘.
          ls_fieldcat-emphasize ‘C700‘.
      ENDIF.
APPEND ls_fieldcat TO gd_fieldcat .
CLEAR ls_fieldcat .
ENDFORM"frm_catlg_set
*&--------------------------------------------------------------------*
*& Form user_command
*&--------------------------------------------------------------------*
FORM user_command USING r_ucomm LIKE sy-ucomm
rs_selfield TYPE slis_selfield.
READ TABLE itab INDEX rs_selfield-tabindex.
CASE r_ucomm.
WHEN ‘&IC1‘"双击
WHEN ‘EXIT‘.
LEAVE PROGRAM.
ENDCASE.
rs_selfield-refresh ‘X‘"自动刷新
ENDFORM"user_com
*---------------------------------------------------------------------*
* FORM outdata2 *
*---------------------------------------------------------------------*
FORM outdata2.
PERFORM fieldcat_init2 . sla
-colwidth_optimize ‘X‘. sla
-zebra ‘X‘. i_repid 
= sy-repid.
CALL FUNCTION ‘REUSE_ALV_GRID_DISPLAY‘
EXPORTING i_callback_program 
= i_repid it_fieldcat 
= gd_fieldcat[] i_save 
‘A‘ is_variant 
= ivariant is_layout 
= sla it_excluding 
= i_excluding i_callback_user_command 
‘USER_COMMAND‘
TABLES t_outtab 
= itab_out
EXCEPTIONS program_error 
1
OTHERS 2.
ENDFORM" outdata
*---------------------------------------------------------------------*
* FORM fieldcat_init2 *
*---------------------------------------------------------------------*
FORM fieldcat_init2 .
DATAc(2TYPE n , txt
(20TYPE .
PERFORM frm_catlg_set USING:       
‘WERKS‘ ‘WERKS‘ ‘X‘ ,       
‘MATNR‘ ‘MATNR‘ ‘X‘ ,       
‘LGORT‘ ‘LGORT‘ ‘X‘ .
LOOP AT hs_bwart .
c + 1.
CONCATENATE ‘MENGE‘ INTO txt.
PERFORM frm_catlg_set USING: txt hs_bwart-bwart ‘‘ .
ENDLOOP.
PERFORM frm_catlg_set USING‘LINE_SUM‘ ‘SUM‘ ‘‘ .
ENDFORM"fieldcat_init

以上是关于oracle中一个表的行列转换的主要内容,如果未能解决你的问题,请参考以下文章

SqlServer 行列转换

oracle行列转换问题

Oracle 表格行列转换,高手请进

特殊EXCEL行列转换

求oracle大神帮忙解决下面这个行列转换问题,谢谢!

oracle 行列转换问题