ABAP Select data from SAP table E3KEVA3 into internal table

Get Example source ABAP code based on a different SAP table
  

Below is a number of ABAP code snippets to demonstrate how to select data from SAP E3KEVA3 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 E3KEVA3. 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 E3KEVA3 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_E3KEVA3 TYPE STANDARD TABLE OF E3KEVA3,
      WA_E3KEVA3 TYPE E3KEVA3,
      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: <E3KEVA3> TYPE E3KEVA3.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM E3KEVA3
*  INTO TABLE @DATA(IT_E3KEVA32).
*--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_E3KEVA3 INDEX 1 INTO DATA(WA_E3KEVA32).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_E3KEVA3 ASSIGNING <E3KEVA3>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<E3KEVA3>-VAL101 = 1.
<E3KEVA3>-VAL102 = 1.
<E3KEVA3>-VAL103 = 1.
<E3KEVA3>-VAL104 = 1.
<E3KEVA3>-VAL105 = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_E3KEVA3-VAL106, sy-vline,
WA_E3KEVA3-VAL107, sy-vline,
WA_E3KEVA3-VAL108, sy-vline,
WA_E3KEVA3-VAL109, sy-vline,
WA_E3KEVA3-VAL110, sy-vline,
WA_E3KEVA3-VAL111, sy-vline.
ENDLOOP. *Add any further fields from structure WA_E3KEVA3 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_E3KEVA3 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_E3KEVA3 INTO WA_E3KEVA3. *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.
ENDFORM. *&---------------------------------------------------------------------* *& Form process_as_string_field_values *&---------------------------------------------------------------------* FORM process_as_string_field_values CHANGING p_EKKO LIKE wa_EKKO. TYPES: BEGIN OF T_E3KEVA3_STR,
VAL101 TYPE STRING,
VAL102 TYPE STRING,
VAL103 TYPE STRING,
VAL104 TYPE STRING,
VAL105 TYPE STRING,
VAL106 TYPE STRING,
VAL107 TYPE STRING,
VAL108 TYPE STRING,
VAL109 TYPE STRING,
VAL110 TYPE STRING,
VAL111 TYPE STRING,
VAL112 TYPE STRING,
VAL113 TYPE STRING,
VAL114 TYPE STRING,
VAL115 TYPE STRING,
VAL116 TYPE STRING,
VAL117 TYPE STRING,
VAL118 TYPE STRING,
VAL119 TYPE STRING,
VAL120 TYPE STRING,
VAL121 TYPE STRING,
VAL122 TYPE STRING,
VAL123 TYPE STRING,
VAL124 TYPE STRING,
VAL125 TYPE STRING,
VAL126 TYPE STRING,
VAL127 TYPE STRING,
VAL128 TYPE STRING,
VAL129 TYPE STRING,
VAL130 TYPE STRING,
VAL131 TYPE STRING,
VAL132 TYPE STRING,
VAL133 TYPE STRING,
VAL134 TYPE STRING,
VAL135 TYPE STRING,
VAL136 TYPE STRING,
VAL137 TYPE STRING,
VAL138 TYPE STRING,
VAL139 TYPE STRING,
VAL140 TYPE STRING,
VAL141 TYPE STRING,
VAL142 TYPE STRING,
VAL143 TYPE STRING,
VAL144 TYPE STRING,
VAL145 TYPE STRING,
VAL146 TYPE STRING,
VAL147 TYPE STRING,
VAL148 TYPE STRING,
VAL149 TYPE STRING,
VAL150 TYPE STRING,END OF T_EKKO_STR. DATA: WA_E3KEVA3_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_E3KEVA3_STR-VAL101 sy-vline
WA_E3KEVA3_STR-VAL102 sy-vline
WA_E3KEVA3_STR-VAL103 sy-vline
WA_E3KEVA3_STR-VAL104 sy-vline
WA_E3KEVA3_STR-VAL105 sy-vline
WA_E3KEVA3_STR-VAL106 sy-vline
WA_E3KEVA3_STR-VAL107 sy-vline
WA_E3KEVA3_STR-VAL108 sy-vline
WA_E3KEVA3_STR-VAL109 sy-vline
WA_E3KEVA3_STR-VAL110 sy-vline
WA_E3KEVA3_STR-VAL111 sy-vline
WA_E3KEVA3_STR-VAL112 sy-vline
WA_E3KEVA3_STR-VAL113 sy-vline
WA_E3KEVA3_STR-VAL114 sy-vline
WA_E3KEVA3_STR-VAL115 sy-vline
WA_E3KEVA3_STR-VAL116 sy-vline
WA_E3KEVA3_STR-VAL117 sy-vline
WA_E3KEVA3_STR-VAL118 sy-vline
WA_E3KEVA3_STR-VAL119 sy-vline
WA_E3KEVA3_STR-VAL120 sy-vline
WA_E3KEVA3_STR-VAL121 sy-vline
WA_E3KEVA3_STR-VAL122 sy-vline
WA_E3KEVA3_STR-VAL123 sy-vline
WA_E3KEVA3_STR-VAL124 sy-vline
WA_E3KEVA3_STR-VAL125 sy-vline
WA_E3KEVA3_STR-VAL126 sy-vline
WA_E3KEVA3_STR-VAL127 sy-vline
WA_E3KEVA3_STR-VAL128 sy-vline
WA_E3KEVA3_STR-VAL129 sy-vline
WA_E3KEVA3_STR-VAL130 sy-vline
WA_E3KEVA3_STR-VAL131 sy-vline
WA_E3KEVA3_STR-VAL132 sy-vline
WA_E3KEVA3_STR-VAL133 sy-vline
WA_E3KEVA3_STR-VAL134 sy-vline
WA_E3KEVA3_STR-VAL135 sy-vline
WA_E3KEVA3_STR-VAL136 sy-vline
WA_E3KEVA3_STR-VAL137 sy-vline
WA_E3KEVA3_STR-VAL138 sy-vline
WA_E3KEVA3_STR-VAL139 sy-vline
WA_E3KEVA3_STR-VAL140 sy-vline
WA_E3KEVA3_STR-VAL141 sy-vline
WA_E3KEVA3_STR-VAL142 sy-vline
WA_E3KEVA3_STR-VAL143 sy-vline
WA_E3KEVA3_STR-VAL144 sy-vline
WA_E3KEVA3_STR-VAL145 sy-vline
WA_E3KEVA3_STR-VAL146 sy-vline
WA_E3KEVA3_STR-VAL147 sy-vline
WA_E3KEVA3_STR-VAL148 sy-vline
WA_E3KEVA3_STR-VAL149 sy-vline
WA_E3KEVA3_STR-VAL150 sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.