ABAP Select data from SAP table E1ICIT3 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 E1ICIT3 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 E1ICIT3. 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 E1ICIT3 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_E1ICIT3 TYPE STANDARD TABLE OF E1ICIT3,
      WA_E1ICIT3 TYPE E1ICIT3,
      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: <E1ICIT3> TYPE E1ICIT3.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM E1ICIT3
*  INTO TABLE @DATA(IT_E1ICIT32).
*--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_E1ICIT3 INDEX 1 INTO DATA(WA_E1ICIT32).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<E1ICIT3>-AUEGVP = 1.
<E1ICIT3>-AUEGEW = 1.
<E1ICIT3>-AUEVOL = 1.
<E1ICIT3>-AUAMNG = 1.
<E1ICIT3>-AUAGEO = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_E1ICIT3-AUAGVO, sy-vline,
  WA_E1ICIT3-AUAGVP, sy-vline,
  WA_E1ICIT3-AUAGEW, sy-vline,
  WA_E1ICIT3-AUAVOL, sy-vline,
  WA_E1ICIT3-BKGRND, sy-vline,
  WA_E1ICIT3-BKPMNG, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_E1ICIT3 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_E1ICIT3 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_E1ICIT3 INTO WA_E1ICIT3.


*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_E1ICIT3_STR, 
AUEGVP TYPE STRING,
AUEGEW TYPE STRING,
AUEVOL TYPE STRING,
AUAMNG TYPE STRING,
AUAGEO TYPE STRING,
AUAGVO TYPE STRING,
AUAGVP TYPE STRING,
AUAGEW TYPE STRING,
AUAVOL TYPE STRING,
BKGRND TYPE STRING,
BKPMNG TYPE STRING,
BKPGEO TYPE STRING,
BKPGVO TYPE STRING,
BKPGVP TYPE STRING,
BKPGEW TYPE STRING,
BKPVOL TYPE STRING,
BKMMNG TYPE STRING,
BKMGEO TYPE STRING,
BKMGVO TYPE STRING,
BKMGVP TYPE STRING,
BKMGEW TYPE STRING,
BKMVOL TYPE STRING,
KMEMNG TYPE STRING,
KMEGEO TYPE STRING,
KMEGVO TYPE STRING,
KMEGVP TYPE STRING,
KMEGEW TYPE STRING,
KMEVOL TYPE STRING,
KMAMNG TYPE STRING,
KMAGEO TYPE STRING,
KMAGVO TYPE STRING,
KMAGVP TYPE STRING,
KMAGEW TYPE STRING,
KMAVOL TYPE STRING,
PVGRND TYPE STRING,
UBPEPM TYPE STRING,
UBPGEO TYPE STRING,
UBMEPM TYPE STRING,
UBMGEO TYPE STRING,
BIWMNG TYPE STRING,
BIWGEO TYPE STRING,
BIWGVO TYPE STRING,
BIWGVP TYPE STRING,
BRELEV TYPE STRING,
ADDMNG TYPE STRING,
ADDANZ TYPE STRING,
ADDTIM TYPE STRING,
ADDKMW TYPE STRING,
ADDKAL TYPE STRING,
ADDIAPPL TYPE STRING,
ADDI1 TYPE STRING,
ADDI2 TYPE STRING,
ADDI3 TYPE STRING,
BWVORG TYPE STRING,
FILGRP TYPE STRING,
PSWAE TYPE STRING,
PLMHT TYPE STRING,
XCHAR TYPE STRING,
KZBWS TYPE STRING,END OF T_EKKO_STR.
DATA: WA_E1ICIT3_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_E1ICIT3_STR-AUEGVP sy-vline 
WA_E1ICIT3_STR-AUEGEW sy-vline 
WA_E1ICIT3_STR-AUEVOL sy-vline 
WA_E1ICIT3_STR-AUAMNG sy-vline 
WA_E1ICIT3_STR-AUAGEO sy-vline 
WA_E1ICIT3_STR-AUAGVO sy-vline 
WA_E1ICIT3_STR-AUAGVP sy-vline 
WA_E1ICIT3_STR-AUAGEW sy-vline 
WA_E1ICIT3_STR-AUAVOL sy-vline 
WA_E1ICIT3_STR-BKGRND sy-vline 
WA_E1ICIT3_STR-BKPMNG sy-vline 
WA_E1ICIT3_STR-BKPGEO sy-vline 
WA_E1ICIT3_STR-BKPGVO sy-vline 
WA_E1ICIT3_STR-BKPGVP sy-vline 
WA_E1ICIT3_STR-BKPGEW sy-vline 
WA_E1ICIT3_STR-BKPVOL sy-vline 
WA_E1ICIT3_STR-BKMMNG sy-vline 
WA_E1ICIT3_STR-BKMGEO sy-vline 
WA_E1ICIT3_STR-BKMGVO sy-vline 
WA_E1ICIT3_STR-BKMGVP sy-vline 
WA_E1ICIT3_STR-BKMGEW sy-vline 
WA_E1ICIT3_STR-BKMVOL sy-vline 
WA_E1ICIT3_STR-KMEMNG sy-vline 
WA_E1ICIT3_STR-KMEGEO sy-vline 
WA_E1ICIT3_STR-KMEGVO sy-vline 
WA_E1ICIT3_STR-KMEGVP sy-vline 
WA_E1ICIT3_STR-KMEGEW sy-vline 
WA_E1ICIT3_STR-KMEVOL sy-vline 
WA_E1ICIT3_STR-KMAMNG sy-vline 
WA_E1ICIT3_STR-KMAGEO sy-vline 
WA_E1ICIT3_STR-KMAGVO sy-vline 
WA_E1ICIT3_STR-KMAGVP sy-vline 
WA_E1ICIT3_STR-KMAGEW sy-vline 
WA_E1ICIT3_STR-KMAVOL sy-vline 
WA_E1ICIT3_STR-PVGRND sy-vline 
WA_E1ICIT3_STR-UBPEPM sy-vline 
WA_E1ICIT3_STR-UBPGEO sy-vline 
WA_E1ICIT3_STR-UBMEPM sy-vline 
WA_E1ICIT3_STR-UBMGEO sy-vline 
WA_E1ICIT3_STR-BIWMNG sy-vline 
WA_E1ICIT3_STR-BIWGEO sy-vline 
WA_E1ICIT3_STR-BIWGVO sy-vline 
WA_E1ICIT3_STR-BIWGVP sy-vline 
WA_E1ICIT3_STR-BRELEV sy-vline 
WA_E1ICIT3_STR-ADDMNG sy-vline 
WA_E1ICIT3_STR-ADDANZ sy-vline 
WA_E1ICIT3_STR-ADDTIM sy-vline 
WA_E1ICIT3_STR-ADDKMW sy-vline 
WA_E1ICIT3_STR-ADDKAL sy-vline 
WA_E1ICIT3_STR-ADDIAPPL sy-vline 
WA_E1ICIT3_STR-ADDI1 sy-vline 
WA_E1ICIT3_STR-ADDI2 sy-vline 
WA_E1ICIT3_STR-ADDI3 sy-vline 
WA_E1ICIT3_STR-BWVORG sy-vline 
WA_E1ICIT3_STR-FILGRP sy-vline 
WA_E1ICIT3_STR-PSWAE sy-vline 
WA_E1ICIT3_STR-PLMHT sy-vline 
WA_E1ICIT3_STR-XCHAR sy-vline 
WA_E1ICIT3_STR-KZBWS sy-vline      INTO ld_text SEPARATED BY SPACE.

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