ABAP Select data from SAP table E1ICIT2 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 E1ICIT2 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 E1ICIT2. 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 E1ICIT2 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_E1ICIT2 TYPE STANDARD TABLE OF E1ICIT2,
      WA_E1ICIT2 TYPE E1ICIT2,
      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: <E1ICIT2> TYPE E1ICIT2.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM E1ICIT2
*  INTO TABLE @DATA(IT_E1ICIT22).
*--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_E1ICIT2 INDEX 1 INTO DATA(WA_E1ICIT22).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_E1ICIT2 ASSIGNING <E1ICIT2>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<E1ICIT2>-AKTYP = 1.
<E1ICIT2>-AKTHE = 1.
<E1ICIT2>-PLGTP = 1.
<E1ICIT2>-SAISO = 1.
<E1ICIT2>-SAISJ = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_E1ICIT2-BWVOR, sy-vline,
WA_E1ICIT2-BWSCL, sy-vline,
WA_E1ICIT2-SERVG, sy-vline,
WA_E1ICIT2-BRGEW, sy-vline,
WA_E1ICIT2-NTGEW, sy-vline,
WA_E1ICIT2-GEWEI, sy-vline.
ENDLOOP. *Add any further fields from structure WA_E1ICIT2 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_E1ICIT2 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_E1ICIT2 INTO WA_E1ICIT2. *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_E1ICIT2_STR,
AKTYP TYPE STRING,
AKTHE TYPE STRING,
PLGTP TYPE STRING,
SAISO TYPE STRING,
SAISJ TYPE STRING,
BWVOR TYPE STRING,
BWSCL TYPE STRING,
SERVG TYPE STRING,
BRGEW TYPE STRING,
NTGEW TYPE STRING,
GEWEI TYPE STRING,
VOLUM TYPE STRING,
VOLEH TYPE STRING,
LANDLF TYPE STRING,
RLIFN TYPE STRING,
LAND1 TYPE STRING,
RLTSNR TYPE STRING,
RIDNLF TYPE STRING,
RKOLIF TYPE STRING,
MTART TYPE STRING,
WMAKG TYPE STRING,
WRKGR2 TYPE STRING,
WRKGR1 TYPE STRING,
VKWRA TYPE STRING,
DPFLG TYPE STRING,
ERFME TYPE STRING,
ERFMG TYPE STRING,
EAN11 TYPE STRING,
IDNLF TYPE STRING,
KOLIF TYPE STRING,
ATINM1 TYPE STRING,
ATINM2 TYPE STRING,
ATINM3 TYPE STRING,
STRNR TYPE STRING,
WKUNNR TYPE STRING,
SSTUF TYPE STRING,
ZUGMNG TYPE STRING,
ZUGGEO TYPE STRING,
ZUGGVO TYPE STRING,
ZUGGVP TYPE STRING,
ZUGGEW TYPE STRING,
ZUGVOL TYPE STRING,
ABGMNG TYPE STRING,
ABGGEO TYPE STRING,
ABGGVO TYPE STRING,
ABGGVP TYPE STRING,
ABGGEW TYPE STRING,
ABGVOL TYPE STRING,
WESMNG TYPE STRING,
WESGEO TYPE STRING,
WESGVO TYPE STRING,
WESGVP TYPE STRING,
WESGEW TYPE STRING,
WESVOL TYPE STRING,
RTEMNG TYPE STRING,
RTEGEO TYPE STRING,
RTEGVO TYPE STRING,
RTEGVP TYPE STRING,
RTEGEW TYPE STRING,
RTEVOL TYPE STRING,
ULEMNG TYPE STRING,
ULEGEO TYPE STRING,
ULEGVO TYPE STRING,
ULEGVP TYPE STRING,
ULEGEW TYPE STRING,
ULEVOL TYPE STRING,
ULAMNG TYPE STRING,
ULAGEO TYPE STRING,
ULAGVO TYPE STRING,END OF T_EKKO_STR. DATA: WA_E1ICIT2_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_E1ICIT2_STR-AKTYP sy-vline
WA_E1ICIT2_STR-AKTHE sy-vline
WA_E1ICIT2_STR-PLGTP sy-vline
WA_E1ICIT2_STR-SAISO sy-vline
WA_E1ICIT2_STR-SAISJ sy-vline
WA_E1ICIT2_STR-BWVOR sy-vline
WA_E1ICIT2_STR-BWSCL sy-vline
WA_E1ICIT2_STR-SERVG sy-vline
WA_E1ICIT2_STR-BRGEW sy-vline
WA_E1ICIT2_STR-NTGEW sy-vline
WA_E1ICIT2_STR-GEWEI sy-vline
WA_E1ICIT2_STR-VOLUM sy-vline
WA_E1ICIT2_STR-VOLEH sy-vline
WA_E1ICIT2_STR-LANDLF sy-vline
WA_E1ICIT2_STR-RLIFN sy-vline
WA_E1ICIT2_STR-LAND1 sy-vline
WA_E1ICIT2_STR-RLTSNR sy-vline
WA_E1ICIT2_STR-RIDNLF sy-vline
WA_E1ICIT2_STR-RKOLIF sy-vline
WA_E1ICIT2_STR-MTART sy-vline
WA_E1ICIT2_STR-WMAKG sy-vline
WA_E1ICIT2_STR-WRKGR2 sy-vline
WA_E1ICIT2_STR-WRKGR1 sy-vline
WA_E1ICIT2_STR-VKWRA sy-vline
WA_E1ICIT2_STR-DPFLG sy-vline
WA_E1ICIT2_STR-ERFME sy-vline
WA_E1ICIT2_STR-ERFMG sy-vline
WA_E1ICIT2_STR-EAN11 sy-vline
WA_E1ICIT2_STR-IDNLF sy-vline
WA_E1ICIT2_STR-KOLIF sy-vline
WA_E1ICIT2_STR-ATINM1 sy-vline
WA_E1ICIT2_STR-ATINM2 sy-vline
WA_E1ICIT2_STR-ATINM3 sy-vline
WA_E1ICIT2_STR-STRNR sy-vline
WA_E1ICIT2_STR-WKUNNR sy-vline
WA_E1ICIT2_STR-SSTUF sy-vline
WA_E1ICIT2_STR-ZUGMNG sy-vline
WA_E1ICIT2_STR-ZUGGEO sy-vline
WA_E1ICIT2_STR-ZUGGVO sy-vline
WA_E1ICIT2_STR-ZUGGVP sy-vline
WA_E1ICIT2_STR-ZUGGEW sy-vline
WA_E1ICIT2_STR-ZUGVOL sy-vline
WA_E1ICIT2_STR-ABGMNG sy-vline
WA_E1ICIT2_STR-ABGGEO sy-vline
WA_E1ICIT2_STR-ABGGVO sy-vline
WA_E1ICIT2_STR-ABGGVP sy-vline
WA_E1ICIT2_STR-ABGGEW sy-vline
WA_E1ICIT2_STR-ABGVOL sy-vline
WA_E1ICIT2_STR-WESMNG sy-vline
WA_E1ICIT2_STR-WESGEO sy-vline
WA_E1ICIT2_STR-WESGVO sy-vline
WA_E1ICIT2_STR-WESGVP sy-vline
WA_E1ICIT2_STR-WESGEW sy-vline
WA_E1ICIT2_STR-WESVOL sy-vline
WA_E1ICIT2_STR-RTEMNG sy-vline
WA_E1ICIT2_STR-RTEGEO sy-vline
WA_E1ICIT2_STR-RTEGVO sy-vline
WA_E1ICIT2_STR-RTEGVP sy-vline
WA_E1ICIT2_STR-RTEGEW sy-vline
WA_E1ICIT2_STR-RTEVOL sy-vline
WA_E1ICIT2_STR-ULEMNG sy-vline
WA_E1ICIT2_STR-ULEGEO sy-vline
WA_E1ICIT2_STR-ULEGVO sy-vline
WA_E1ICIT2_STR-ULEGVP sy-vline
WA_E1ICIT2_STR-ULEGEW sy-vline
WA_E1ICIT2_STR-ULEVOL sy-vline
WA_E1ICIT2_STR-ULAMNG sy-vline
WA_E1ICIT2_STR-ULAGEO sy-vline
WA_E1ICIT2_STR-ULAGVO sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.