How to Output data in vertically from a horizontal format.

Question

Hello
I have some difficulties how to display my data in my output table. I am greatful for
every tips provided. The data in my it_tab is in a horizontal format but I want to
display this data vertically in my output_tab.
My it_tab looks like this:
table: it_tab
id   date   amnt
011  2007   1200
011  2008   1400
011  2009   6700
011  2010   3500
012  2007   ---
013  2007   3000
013  2008   1300
014  2007   1200
014  2008   ---
014  2009   9000
015  2007   2500
I would like my output_tab should look like this:
table: t_output
id  name  date amnt  date1  amnt1 date2  amnt2 date3  amnt3
011 jx    2007 1200  2008   1400  2009   6700  2010   3500
012 tx    --
014 gx    2007 3000  2008   --    2009   9000   --    ---
015 hx    2007 2500
t_output already has some data init like id and name.
This is what I have done but I don't output all the data as I want.
clear w_output.
loop at t_output into w_output.
clear w_itab.
loop at it_tab into w_itab where id = w_output-id.
case sy-tabix.
WHEN '1'.
w_output-date = w_itab-date.
w_output-amnt = w_itab-amnt.
WHEN '2'.
w_output-date1 = w_itab-date.
w_output-amnt1 = w_itab-amnt.
WHEN '3'.
w_output-date2 = w_itab-date.
w_output-amnt2 = w_itab-amnt.
WHEN '4'.
w_output-date3 = w_itab-date.
w_output-amnt3 = w_itab-amnt.
endcase.
endloop.
modify t_output from w_output.
endloop.
Could some body please tell me how to do this? I think many people in here have come
across this type of problem before.
Thank you all for helping out.
Nadin

Answer 1

Hi, Nadin!
I suggest you to create a dynamic internal table with variable number of columns. You can do as follows:
1. Create basic fieldcatalog for ALV list (or object) output
CALL FUNCTION 'LVC_FIELDCATALOG_MERGE'
          EXPORTING i_structure_name       = 'ZYOUR_BASIC_STRUC'         
          CHANGING  ct_fieldcat = lt_fcat.
2. Determine max number of columns (that is, max number of dates for each ID)
SORT it_tab BY id.
LOOP AT it_tab INTO is_tab.
  AT NEW id.
    ADD 1 TO l_count.
  ENDAT.
  AT END OF id.
    IF l_count > l_max_count.
      l_max_count = l_count.
    ENDIF.
    CLEAR l_count.
  ENDAT.
ENDLOOP.
3. Add one entry to fieldcat for each column
DO l_max_count TIMES.
  l_index_char = sy-index.
  CONCATENATE 'DATE' l_index_char INTO ls_fcat-fieldname.
*... other fieldcat fields, like texts etc.
  APPEND ls_fcat TO lt_fcat.
  CONCATENATE 'AMNT' l_index_char INTO ls_fcat-fieldname.
*... other fieldcat fields, like texts etc.
  APPEND ls_fcat TO lt_fcat.
ENDDO.
4. Create dynamic table from fieldcat using:
DATA: dt_outtab TYPE REF TO data. "IMPORTANT: make this declaration global, otherwise error
FIELD-SYMBOLS: <table> TYPE STANDARD TABLE.
CALL METHOD cl_alv_table_create=>create_dynamic_table
       EXPORTING it_fieldcatalog = lt_fcat
       IMPORTING ep_table        = dt_outtab.
ASSIGN dt_outtab->* TO <table>.
5. Fill this table. To do this you need special techniques since you have a generic table with no static structure. For example:
FIELD-SYMBOLS: <line>  TYPE ANY,
               <field> TYPE ANY.
DATA: l_field_inex TYPE i.
LOOP AT it_tab INTO is_tab.
  AT NEW id.
    APPEND INITIAL LINE TO <table>.
    READ TABLE <table> INDEX sy-tfill ASSIGNING <line>.
    l_field_index = 3. "you start from 3rd field - #1 is ID, #2 is NAME
  ENDAT.
  ASSIGN COMPONENT l_field_index OF STRUCUTRE <line> TO <field>.
  <field> = is_tab-date.
  ADD 1 TO l_field_index.
  ASSIGN COMPONENT l_field_index OF STRUCUTRE <line> TO <field>.
  <field> = is_tab-amnt.
  ADD 1 TO l_field_index.
ENDLOOP.
6. Display your report in alv. You have valid fieldcat and output table which is created dynamically.
CALL METHOD o_alv->set_table_for_first_display
          CHANGING  it_outtab       = <table>
                    it_fieldcatalog = lt_fcat.
If you don't use ALV object but rather ALV list, it's similar. Just use corresponding functions for ALV creation and list display.
Note that this is not a tested code. Just an idea to help you procede.
<b><REMOVED BY MODERATOR></b>
HTH.
Regards,
Igor
Message was edited by:
        Alvaro Tejada Galindo