ABAP Select data from SAP table T7ROA2 into internal table

Get Example source ABAP code based on a different SAP table
  Get ABAP code

Below is a number of ABAP code snippets to demonstrate how to select data from SAP T7ROA2 table and store it within an internal table, including using the newer @DATA inline declaration methods. It also shows you various ways to process this data using ABAP work area, inline declaration or field symbols including executing all the relevant CONVERSION_EXIT routines specific to T7ROA2. See here for more generic Select statement tips.

Sometimes data within SAP is stored within the database table in a different format to what it is displayed to the user. These input/output conversation FM routines are what translates the data between the two formats.

There is also a full declaration of the T7ROA2 table where each field has a char/string type for you to simply copy and paste. This allows you to use processing that is only available to these field types such as the CONCATENATE statement.

DATA: IT_T7ROA2 TYPE STANDARD TABLE OF T7ROA2,
      WA_T7ROA2 TYPE T7ROA2,
      GD_STR TYPE STRING.

DATA: lo_typedescr type REF TO cl_abap_typedescr.
DATA: lv_fieldname type fieldname.

FIELD-SYMBOLS: <FIELD> TYPE any.
FIELD-SYMBOLS: <T7ROA2> TYPE T7ROA2.

*Process all fields in table header/work area as string values
  PERFORM process_as_string_field_values CHANGING wa_T7ROA2.

SELECT *
*restrict ABAP select to first 10 rows
 UP TO 10 ROWS      
  FROM T7ROA2
  INTO TABLE IT_T7ROA2.

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM T7ROA2
*  INTO TABLE @DATA(IT_T7ROA22).
*--Further methods of using ABAP code to  select data from SAP database tables

*You can also declare the header/work area using the in-line DATA declaration method
READ TABLE IT_T7ROA2 INDEX 1 INTO DATA(WA_T7ROA22).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_T7ROA2 ASSIGNING <T7ROA2>.

*To update a field value using a field symbol simply change the value via the field symbol pointer
<T7ROA2>-MANDT = 1.
<T7ROA2>-PERNR = 1.
<T7ROA2>-SEQNR = 1.
<T7ROA2>-CMODE = 1.
<T7ROA2>-STATU = 1.

ENDLOOP.

LOOP AT IT_T7ROA2 INTO WA_T7ROA2.
*Write horizonal line to screen report.
  WRITE:/ sy-uline.

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_T7ROA2-SENDN, sy-vline,
  WA_T7ROA2-A_INO, sy-vline,
  WA_T7ROA2-B_INO, sy-vline,
  WA_T7ROA2-C_INO, sy-vline,
  WA_T7ROA2-D_INO, sy-vline,
  WA_T7ROA2-E_INO, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_T7ROA2 you want to display...

  WRITE:/ sy-uline.
* Aternatively use generic code to Write field values (and NAME) to screen report
  DO.
    ASSIGN COMPONENT sy-index OF STRUCTURE wa_T7ROA2 TO <field>.
    IF sy-subrc <> 0. EXIT. ENDIF.
    WRITE:/ 'Field Value', <field>, sy-vline.
    gd_str = <field> .
    lo_typedescr ?= CL_ABAP_DATADESCR=>DESCRIBE_BY_DATA( <field> ).
    lv_fieldname = lo_typedescr->GET_RELATIVE_NAME( ).
    WRITE:/ 'Field Name', lv_fieldname.
  ENDDO.

  
*Redo loop but convert all fields from internal to out value  
LOOP AT IT_T7ROA2 INTO WA_T7ROA2.


*Write horizonal line to screen report.
  WRITE:/ sy-uline.

*Convert all fields to display/output versions using conversion routines
  PERFORM convert_all_field_values CHANGING wa_EKKO.
	 
ENDLOOP.

  
*&---------------------------------------------------------------------*
*& Form convert_all_field_values
*&---------------------------------------------------------------------*
FORM convert_all_field_values CHANGING p_EKKO LIKE wa_EKKO.
DATA: ld_input(1000) TYPE c, ld_output(1000) TYPE C.

*Conversion exit HRROA, internal->external for field B_PAR
CALL FUNCTION 'CONVERSION_EXIT_HRROA_OUTPUT'
  EXPORTING
    input =                      WA_T7ROA2-B_PAR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_T7ROA2-B_PAR.
WRITE:/ 'New Value:', ld_input.
ENDFORM. 

*&---------------------------------------------------------------------*
*& Form process_as_string_field_values
*&---------------------------------------------------------------------*
FORM process_as_string_field_values CHANGING p_EKKO LIKE wa_EKKO.

TYPES: BEGIN OF T_T7ROA2_STR, 
MANDT TYPE STRING,
PERNR TYPE STRING,
SEQNR TYPE STRING,
CMODE TYPE STRING,
STATU TYPE STRING,
SENDN TYPE STRING,
A_INO TYPE STRING,
B_INO TYPE STRING,
C_INO TYPE STRING,
D_INO TYPE STRING,
E_INO TYPE STRING,
F_INO TYPE STRING,
G_INO TYPE STRING,
H_INO TYPE STRING,
I_INO TYPE STRING,
J_INO TYPE STRING,
A_BAS TYPE STRING,
A_DIF TYPE STRING,
A_RDT TYPE STRING,
A_RDE TYPE STRING,
A_RDA1 TYPE STRING,
A_RDA2 TYPE STRING,
A_RDA3 TYPE STRING,
A_RDA4 TYPE STRING,
A_RDA5 TYPE STRING,
A_RDA6 TYPE STRING,
A_RDA7 TYPE STRING,
A_RDA8 TYPE STRING,
A_RDA9 TYPE STRING,
A_RDAA TYPE STRING,
A_RDAB TYPE STRING,
A_RDAC TYPE STRING,
A_RDAD TYPE STRING,
A_RDAE TYPE STRING,
A_RDAF TYPE STRING,
A_RDAG TYPE STRING,
A_RDAH TYPE STRING,
A_RDAI TYPE STRING,
A_RDAJ TYPE STRING,
A_RDAK TYPE STRING,
A_TCI TYPE STRING,
A_BC TYPE STRING,
A_BCSC TYPE STRING,
A_TASCA TYPE STRING,
A_NOS TYPE STRING,
A_CON TYPE STRING,
B_TVA TYPE STRING,
B_DVA TYPE STRING,
B_TVN TYPE STRING,
B_DVN TYPE STRING,
B_TVD TYPE STRING,
B_DVD TYPE STRING,
B_TVS TYPE STRING,
B_DVS TYPE STRING,
B_TNN TYPE STRING,
B_TDD TYPE STRING,
B_TSS TYPE STRING,
B_CAS TYPE STRING,
B_CSS TYPE STRING,
B_CON TYPE STRING,
B_PAR TYPE STRING,
B_NOR TYPE STRING,
B_ABS TYPE STRING,
B_SUD TYPE STRING,
B_NRM TYPE STRING,
B_TBN TYPE STRING,
B_TBD TYPE STRING,
B_TBS TYPE STRING,
B_863 TYPE STRING,
B_WKC TYPE STRING,
C_BAS TYPE STRING,
C_DIF TYPE STRING,
D_BAS TYPE STRING,
D_DIF TYPE STRING,
E_BAS TYPE STRING,
E_DIF TYPE STRING,
F_BAS TYPE STRING,
F_DIF TYPE STRING,
G_GRU TYPE STRING,
G_ART TYPE STRING,
G_STP TYPE STRING,
G_AWF TYPE STRING,
G_AWD TYPE STRING,
G_AWC TYPE STRING,
H_BAS TYPE STRING,
H_DIF TYPE STRING,
I_BAS TYPE STRING,
I_DIF TYPE STRING,
J_BAS TYPE STRING,
J_DIF TYPE STRING,
WAERS TYPE STRING,
K_INO TYPE STRING,
K_BAS TYPE STRING,
K_DIF TYPE STRING,
B_TVO TYPE STRING,
B_TBO TYPE STRING,
B_DVO TYPE STRING,
B_TSO TYPE STRING,
L_INO TYPE STRING,
L_BAS TYPE STRING,
L_DIF TYPE STRING,END OF T_EKKO_STR.
DATA: WA_T7ROA2_STR type T_EKKO_STR.

DATA: ld_text TYPE string.

LOOP AT IT_EKKO INTO WA_EKKO.
  MOVE-CORRESPONDING wa_EKKO TO WA_EKKO_STR.
  CONCATENATE: sy-vline
WA_T7ROA2_STR-MANDT sy-vline 
WA_T7ROA2_STR-PERNR sy-vline 
WA_T7ROA2_STR-SEQNR sy-vline 
WA_T7ROA2_STR-CMODE sy-vline 
WA_T7ROA2_STR-STATU sy-vline 
WA_T7ROA2_STR-SENDN sy-vline 
WA_T7ROA2_STR-A_INO sy-vline 
WA_T7ROA2_STR-B_INO sy-vline 
WA_T7ROA2_STR-C_INO sy-vline 
WA_T7ROA2_STR-D_INO sy-vline 
WA_T7ROA2_STR-E_INO sy-vline 
WA_T7ROA2_STR-F_INO sy-vline 
WA_T7ROA2_STR-G_INO sy-vline 
WA_T7ROA2_STR-H_INO sy-vline 
WA_T7ROA2_STR-I_INO sy-vline 
WA_T7ROA2_STR-J_INO sy-vline 
WA_T7ROA2_STR-A_BAS sy-vline 
WA_T7ROA2_STR-A_DIF sy-vline 
WA_T7ROA2_STR-A_RDT sy-vline 
WA_T7ROA2_STR-A_RDE sy-vline 
WA_T7ROA2_STR-A_RDA1 sy-vline 
WA_T7ROA2_STR-A_RDA2 sy-vline 
WA_T7ROA2_STR-A_RDA3 sy-vline 
WA_T7ROA2_STR-A_RDA4 sy-vline 
WA_T7ROA2_STR-A_RDA5 sy-vline 
WA_T7ROA2_STR-A_RDA6 sy-vline 
WA_T7ROA2_STR-A_RDA7 sy-vline 
WA_T7ROA2_STR-A_RDA8 sy-vline 
WA_T7ROA2_STR-A_RDA9 sy-vline 
WA_T7ROA2_STR-A_RDAA sy-vline 
WA_T7ROA2_STR-A_RDAB sy-vline 
WA_T7ROA2_STR-A_RDAC sy-vline 
WA_T7ROA2_STR-A_RDAD sy-vline 
WA_T7ROA2_STR-A_RDAE sy-vline 
WA_T7ROA2_STR-A_RDAF sy-vline 
WA_T7ROA2_STR-A_RDAG sy-vline 
WA_T7ROA2_STR-A_RDAH sy-vline 
WA_T7ROA2_STR-A_RDAI sy-vline 
WA_T7ROA2_STR-A_RDAJ sy-vline 
WA_T7ROA2_STR-A_RDAK sy-vline 
WA_T7ROA2_STR-A_TCI sy-vline 
WA_T7ROA2_STR-A_BC sy-vline 
WA_T7ROA2_STR-A_BCSC sy-vline 
WA_T7ROA2_STR-A_TASCA sy-vline 
WA_T7ROA2_STR-A_NOS sy-vline 
WA_T7ROA2_STR-A_CON sy-vline 
WA_T7ROA2_STR-B_TVA sy-vline 
WA_T7ROA2_STR-B_DVA sy-vline 
WA_T7ROA2_STR-B_TVN sy-vline 
WA_T7ROA2_STR-B_DVN sy-vline 
WA_T7ROA2_STR-B_TVD sy-vline 
WA_T7ROA2_STR-B_DVD sy-vline 
WA_T7ROA2_STR-B_TVS sy-vline 
WA_T7ROA2_STR-B_DVS sy-vline 
WA_T7ROA2_STR-B_TNN sy-vline 
WA_T7ROA2_STR-B_TDD sy-vline 
WA_T7ROA2_STR-B_TSS sy-vline 
WA_T7ROA2_STR-B_CAS sy-vline 
WA_T7ROA2_STR-B_CSS sy-vline 
WA_T7ROA2_STR-B_CON sy-vline 
WA_T7ROA2_STR-B_PAR sy-vline 
WA_T7ROA2_STR-B_NOR sy-vline 
WA_T7ROA2_STR-B_ABS sy-vline 
WA_T7ROA2_STR-B_SUD sy-vline 
WA_T7ROA2_STR-B_NRM sy-vline 
WA_T7ROA2_STR-B_TBN sy-vline 
WA_T7ROA2_STR-B_TBD sy-vline 
WA_T7ROA2_STR-B_TBS sy-vline 
WA_T7ROA2_STR-B_863 sy-vline 
WA_T7ROA2_STR-B_WKC sy-vline 
WA_T7ROA2_STR-C_BAS sy-vline 
WA_T7ROA2_STR-C_DIF sy-vline 
WA_T7ROA2_STR-D_BAS sy-vline 
WA_T7ROA2_STR-D_DIF sy-vline 
WA_T7ROA2_STR-E_BAS sy-vline 
WA_T7ROA2_STR-E_DIF sy-vline 
WA_T7ROA2_STR-F_BAS sy-vline 
WA_T7ROA2_STR-F_DIF sy-vline 
WA_T7ROA2_STR-G_GRU sy-vline 
WA_T7ROA2_STR-G_ART sy-vline 
WA_T7ROA2_STR-G_STP sy-vline 
WA_T7ROA2_STR-G_AWF sy-vline 
WA_T7ROA2_STR-G_AWD sy-vline 
WA_T7ROA2_STR-G_AWC sy-vline 
WA_T7ROA2_STR-H_BAS sy-vline 
WA_T7ROA2_STR-H_DIF sy-vline 
WA_T7ROA2_STR-I_BAS sy-vline 
WA_T7ROA2_STR-I_DIF sy-vline 
WA_T7ROA2_STR-J_BAS sy-vline 
WA_T7ROA2_STR-J_DIF sy-vline 
WA_T7ROA2_STR-WAERS sy-vline 
WA_T7ROA2_STR-K_INO sy-vline 
WA_T7ROA2_STR-K_BAS sy-vline 
WA_T7ROA2_STR-K_DIF sy-vline 
WA_T7ROA2_STR-B_TVO sy-vline 
WA_T7ROA2_STR-B_TBO sy-vline 
WA_T7ROA2_STR-B_DVO sy-vline 
WA_T7ROA2_STR-B_TSO sy-vline 
WA_T7ROA2_STR-L_INO sy-vline 
WA_T7ROA2_STR-L_BAS sy-vline 
WA_T7ROA2_STR-L_DIF sy-vline      INTO ld_text SEPARATED BY SPACE.

*Add any further fields from structure WA_EKKO_STR you want to CONCATENATE...
ENDLOOP.
ENDFORM.