Changeing the rows into columns..

Question

Hello Experts,
I have a one requirement which is display rows as columns
for Example:
material
plant
quantity
amount
1000
100
30
60
200
50
100
300
60
120
2000
200
50
100
300
60
120
400
32
64
3000
100
40
80
400
20
40
I need output like this below..
material
100
200
300
400
1000
30
50
60
90
100
120
2000
50
60
32
100
120
64
3000
40
20
80
40
I created the ALV table dynamically using at end of event..
but I am getting the
material
100
200
300
400
1000
30
50
60
90
100
120
2000
60
32
120
64
3000
20
40
the values are missing ..?
I wrote like this:
LOOP AT lt_final INTO ls_final.
    ASSIGN COMPONENT 'matnr' OF STRUCTURE <dyn_wa> TO <fs1>.
     <fs1> = ls_final-matnr.
     ASSIGN COMPONENT ls_final-vkorg OF STRUCTURE <dyn_wa> TO <fs1>.
     <fs1> = ls_final-qunaty.
     ASSIGN COMPONENT ls_final-vkorg OF STRUCTURE <dyn_wa> TO <fs1>.
     <fs1> = ls_final-amount.
     AT END OF matnr.
       APPEND <dyn_wa> TO <dyn_table>.
       CLEAR : <dyn_wa>.
     ENDAT.
   ENDLOOP.

Answer 1

I have written a snippet whose output is:
Take a look at the snippet.
TYPES:
BEGIN OF ty,
  a1 TYPE char10,
  a2 TYPE char10,
  a3 TYPE char10,
  a4 TYPE char10,
END OF ty,
BEGIN OF ty2,
  a1  TYPE char10,
  100 TYPE char10,
  200 TYPE char10,
  300 TYPE char10,
  400 TYPE char10,
  no  TYPE char10,
END OF ty2.
DATA: lt TYPE TABLE OF ty,
      ls TYPE ty,
      lt2 TYPE TABLE OF ty2,
      ls2 TYPE ty2,
      lr TYPE REF TO cl_salv_table.
FIELD-SYMBOLS: <lv>   TYPE char10,
               <ls2>  TYPE ty2.
*material   plant   quantity  amount
ls-a1 = 1000.
ls-a2 = 100. ls-a3 = 30. ls-a4 = 60.  APPEND ls TO lt.
ls-a2 = 200. ls-a3 = 50. ls-a4 = 100. APPEND ls TO lt.
ls-a2 = 300. ls-a3 = 60. ls-a4 = 120. APPEND ls TO lt.
ls-a1 = 2000.
ls-a2 = 200. ls-a3 = 50. ls-a4 = 100. APPEND ls TO lt.
ls-a2 = 300. ls-a3 = 60. ls-a4 = 120. APPEND ls TO lt.
ls-a2 = 400. ls-a3 = 32. ls-a4 = 64.  APPEND ls TO lt.
ls-a1 = 3000.
ls-a2 = 100. ls-a3 = 40. ls-a4 = 80.  APPEND ls TO lt.
ls-a2 = 400. ls-a3 = 20. ls-a4 = 40.  APPEND ls TO lt.
TRY.
    LOOP AT lt INTO ls.
*     index 1 for filling quantity in a3 field
      READ TABLE lt2 ASSIGNING <ls2>
          WITH KEY  a1 = ls-a1
                    no = 1.
      IF sy-subrc NE 0.
        APPEND INITIAL LINE TO lt2 ASSIGNING <ls2>.
        <ls2>-a1 = ls-a1. <ls2>-no = 1.
      ENDIF.
      ASSIGN COMPONENT ls-a2 OF STRUCTURE <ls2> TO <lv>.
      <lv> = ls-a3.
*     index 2 for filling quantity in a4 field
      READ TABLE lt2 ASSIGNING <ls2>
          WITH KEY  a1 = ls-a1
                    no = 2.
      IF sy-subrc NE 0.
        APPEND INITIAL LINE TO lt2 ASSIGNING <ls2>.
        <ls2>-a1 = ls-a1. <ls2>-no = 2.
      ENDIF.
      ASSIGN COMPONENT ls-a2 OF STRUCTURE <ls2> TO <lv>.
      <lv> = ls-a4.
    ENDLOOP.
    cl_salv_table=>factory(
      IMPORTING
        r_salv_table   = lr
      CHANGING
        t_table        = lt2
    lr->display( ).
  CATCH cx_root.
ENDTRY.