REPORT FOR INFO TYPE 586

Question

Hi All
I am trying to create a report for INFO TYPE 586  in HR ABAP,where  in a table apporx 30 investment codes , proposed investment and actual amount are apperaring .
Now My problem is,  I do not want to use IF .... ENDIF statment. Is there any other way to write the code .
Please Help.
Thanks in advance.

Answer 1

Hi,
In this situation you can use field-symbols and/or a internal table. Like this:
tables: pa0586.
field-symbols: <ff1> type any,
               <ff2> type any,
               <ff3> type any.
data: w_campo1(30),
      w_campo2(30),
      w_campo3(30),
data: w_nx(2) type n.
data: begin of i_myitc occurs,
        itc like pa0586-itc01,
        dsc(30),
      end of i_myitc.
* fixed selection or may be from a z table
i_myitc-itc = '01'. i_myitc-dsc = 'AAAAA'. append i_myitc.
i_myitc-itc = '02'. i_myitc-dsc = 'BBBBB'. append i_myitc.
i_myitc-itc = '03'. i_myitc-dsc = 'CCCCC'. append i_myitc.
select single * from pa0586.
do 30 times.
   w_nx = sy-index.
   concatenate 'PA0586-ITC' w_nx into w_campo1.
   concatenate 'PA0586-PIN' w_nx into w_campo2.
   concatenate 'PA0586-AIN' w_nx into w_campo3.
   assign (w_campo1) to <ff1>.
   assign (w_campo2) to <ff2>.
   assign (w_campo3) to <ff3>.
   read table i_myitc with key itc = <ff1>.
   write: / <ff1>, <ff2>, <ff3>, i_myitc-dsc.
enddo.
Best regards,
Leandro Mengue