ABAP Select data from SAP table T5ITJ1 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 T5ITJ1 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 T5ITJ1. 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 T5ITJ1 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_T5ITJ1 TYPE STANDARD TABLE OF T5ITJ1,
      WA_T5ITJ1 TYPE T5ITJ1,
      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: <T5ITJ1> TYPE T5ITJ1.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM T5ITJ1
*  INTO TABLE @DATA(IT_T5ITJ12).
*--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_T5ITJ1 INDEX 1 INTO DATA(WA_T5ITJ12).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<T5ITJ1>-MANDT = 1.
<T5ITJ1>-DOC_NUM0014 = 1.
<T5ITJ1>-LGART01 = 1.
<T5ITJ1>-OPKEN01 = 1.
<T5ITJ1>-BETRG01 = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_T5ITJ1-WAERS01, sy-vline,
  WA_T5ITJ1-ANZHL01, sy-vline,
  WA_T5ITJ1-ZEINH01, sy-vline,
  WA_T5ITJ1-INDBW01, sy-vline,
  WA_T5ITJ1-LGART02, sy-vline,
  WA_T5ITJ1-OPKEN02, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_T5ITJ1 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_T5ITJ1 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_T5ITJ1 INTO WA_T5ITJ1.


*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_T5ITJ1_STR, 
MANDT TYPE STRING,
DOC_NUM0014 TYPE STRING,
LGART01 TYPE STRING,
OPKEN01 TYPE STRING,
BETRG01 TYPE STRING,
WAERS01 TYPE STRING,
ANZHL01 TYPE STRING,
ZEINH01 TYPE STRING,
INDBW01 TYPE STRING,
LGART02 TYPE STRING,
OPKEN02 TYPE STRING,
BETRG02 TYPE STRING,
WAERS02 TYPE STRING,
ANZHL02 TYPE STRING,
ZEINH02 TYPE STRING,
INDBW02 TYPE STRING,
LGART03 TYPE STRING,
OPKEN03 TYPE STRING,
BETRG03 TYPE STRING,
WAERS03 TYPE STRING,
ANZHL03 TYPE STRING,
ZEINH03 TYPE STRING,
INDBW03 TYPE STRING,
LGART04 TYPE STRING,
OPKEN04 TYPE STRING,
BETRG04 TYPE STRING,
WAERS04 TYPE STRING,
ANZHL04 TYPE STRING,
ZEINH04 TYPE STRING,
INDBW04 TYPE STRING,
LGART05 TYPE STRING,
OPKEN05 TYPE STRING,
BETRG05 TYPE STRING,
WAERS05 TYPE STRING,
ANZHL05 TYPE STRING,
ZEINH05 TYPE STRING,
INDBW05 TYPE STRING,
LGART06 TYPE STRING,
OPKEN06 TYPE STRING,
BETRG06 TYPE STRING,
WAERS06 TYPE STRING,
ANZHL06 TYPE STRING,
ZEINH06 TYPE STRING,
INDBW06 TYPE STRING,
LGART07 TYPE STRING,
OPKEN07 TYPE STRING,
BETRG07 TYPE STRING,
WAERS07 TYPE STRING,
ANZHL07 TYPE STRING,
ZEINH07 TYPE STRING,
INDBW07 TYPE STRING,
LGART08 TYPE STRING,
OPKEN08 TYPE STRING,
BETRG08 TYPE STRING,
WAERS08 TYPE STRING,
ANZHL08 TYPE STRING,
ZEINH08 TYPE STRING,
INDBW08 TYPE STRING,
LGART09 TYPE STRING,
OPKEN09 TYPE STRING,
BETRG09 TYPE STRING,
WAERS09 TYPE STRING,
ANZHL09 TYPE STRING,
ZEINH09 TYPE STRING,
INDBW09 TYPE STRING,
LGART10 TYPE STRING,
OPKEN10 TYPE STRING,
BETRG10 TYPE STRING,
WAERS10 TYPE STRING,
ANZHL10 TYPE STRING,
ZEINH10 TYPE STRING,
INDBW10 TYPE STRING,
LGART11 TYPE STRING,
OPKEN11 TYPE STRING,
BETRG11 TYPE STRING,
WAERS11 TYPE STRING,
ANZHL11 TYPE STRING,
ZEINH11 TYPE STRING,
INDBW11 TYPE STRING,
LGART12 TYPE STRING,
OPKEN12 TYPE STRING,
BETRG12 TYPE STRING,
WAERS12 TYPE STRING,
ANZHL12 TYPE STRING,
ZEINH12 TYPE STRING,
INDBW12 TYPE STRING,
LGART13 TYPE STRING,
OPKEN13 TYPE STRING,
BETRG13 TYPE STRING,
WAERS13 TYPE STRING,
ANZHL13 TYPE STRING,
ZEINH13 TYPE STRING,
INDBW13 TYPE STRING,
LGART14 TYPE STRING,
OPKEN14 TYPE STRING,
BETRG14 TYPE STRING,
WAERS14 TYPE STRING,
ANZHL14 TYPE STRING,
ZEINH14 TYPE STRING,
INDBW14 TYPE STRING,
LGART15 TYPE STRING,
OPKEN15 TYPE STRING,
BETRG15 TYPE STRING,
WAERS15 TYPE STRING,
ANZHL15 TYPE STRING,
ZEINH15 TYPE STRING,
INDBW15 TYPE STRING,
LGART16 TYPE STRING,
OPKEN16 TYPE STRING,
BETRG16 TYPE STRING,
WAERS16 TYPE STRING,
ANZHL16 TYPE STRING,
ZEINH16 TYPE STRING,
INDBW16 TYPE STRING,
LGART17 TYPE STRING,
OPKEN17 TYPE STRING,
BETRG17 TYPE STRING,
WAERS17 TYPE STRING,
ANZHL17 TYPE STRING,
ZEINH17 TYPE STRING,
INDBW17 TYPE STRING,
LGART18 TYPE STRING,
OPKEN18 TYPE STRING,
BETRG18 TYPE STRING,
WAERS18 TYPE STRING,
ANZHL18 TYPE STRING,
ZEINH18 TYPE STRING,
INDBW18 TYPE STRING,
LGART19 TYPE STRING,
OPKEN19 TYPE STRING,
BETRG19 TYPE STRING,
WAERS19 TYPE STRING,
ANZHL19 TYPE STRING,
ZEINH19 TYPE STRING,
INDBW19 TYPE STRING,
LGART20 TYPE STRING,
OPKEN20 TYPE STRING,
BETRG20 TYPE STRING,
WAERS20 TYPE STRING,
ANZHL20 TYPE STRING,
ZEINH20 TYPE STRING,
INDBW20 TYPE STRING,
BEGDA01 TYPE STRING,
ENDDA01 TYPE STRING,
BEGDA02 TYPE STRING,
ENDDA02 TYPE STRING,
BEGDA03 TYPE STRING,
ENDDA03 TYPE STRING,
BEGDA04 TYPE STRING,
ENDDA04 TYPE STRING,
BEGDA05 TYPE STRING,
ENDDA05 TYPE STRING,
BEGDA06 TYPE STRING,
ENDDA06 TYPE STRING,
BEGDA07 TYPE STRING,
ENDDA07 TYPE STRING,
BEGDA08 TYPE STRING,
ENDDA08 TYPE STRING,
BEGDA09 TYPE STRING,
ENDDA09 TYPE STRING,
BEGDA10 TYPE STRING,
ENDDA10 TYPE STRING,
BEGDA11 TYPE STRING,
ENDDA11 TYPE STRING,
BEGDA12 TYPE STRING,
ENDDA12 TYPE STRING,
BEGDA13 TYPE STRING,
ENDDA13 TYPE STRING,
BEGDA14 TYPE STRING,
ENDDA14 TYPE STRING,
BEGDA15 TYPE STRING,
ENDDA15 TYPE STRING,
BEGDA16 TYPE STRING,
ENDDA16 TYPE STRING,
BEGDA17 TYPE STRING,
ENDDA17 TYPE STRING,
BEGDA18 TYPE STRING,
ENDDA18 TYPE STRING,
BEGDA19 TYPE STRING,
ENDDA19 TYPE STRING,
BEGDA20 TYPE STRING,
ENDDA20 TYPE STRING,END OF T_EKKO_STR.
DATA: WA_T5ITJ1_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_T5ITJ1_STR-MANDT sy-vline 
WA_T5ITJ1_STR-DOC_NUM0014 sy-vline 
WA_T5ITJ1_STR-LGART01 sy-vline 
WA_T5ITJ1_STR-OPKEN01 sy-vline 
WA_T5ITJ1_STR-BETRG01 sy-vline 
WA_T5ITJ1_STR-WAERS01 sy-vline 
WA_T5ITJ1_STR-ANZHL01 sy-vline 
WA_T5ITJ1_STR-ZEINH01 sy-vline 
WA_T5ITJ1_STR-INDBW01 sy-vline 
WA_T5ITJ1_STR-LGART02 sy-vline 
WA_T5ITJ1_STR-OPKEN02 sy-vline 
WA_T5ITJ1_STR-BETRG02 sy-vline 
WA_T5ITJ1_STR-WAERS02 sy-vline 
WA_T5ITJ1_STR-ANZHL02 sy-vline 
WA_T5ITJ1_STR-ZEINH02 sy-vline 
WA_T5ITJ1_STR-INDBW02 sy-vline 
WA_T5ITJ1_STR-LGART03 sy-vline 
WA_T5ITJ1_STR-OPKEN03 sy-vline 
WA_T5ITJ1_STR-BETRG03 sy-vline 
WA_T5ITJ1_STR-WAERS03 sy-vline 
WA_T5ITJ1_STR-ANZHL03 sy-vline 
WA_T5ITJ1_STR-ZEINH03 sy-vline 
WA_T5ITJ1_STR-INDBW03 sy-vline 
WA_T5ITJ1_STR-LGART04 sy-vline 
WA_T5ITJ1_STR-OPKEN04 sy-vline 
WA_T5ITJ1_STR-BETRG04 sy-vline 
WA_T5ITJ1_STR-WAERS04 sy-vline 
WA_T5ITJ1_STR-ANZHL04 sy-vline 
WA_T5ITJ1_STR-ZEINH04 sy-vline 
WA_T5ITJ1_STR-INDBW04 sy-vline 
WA_T5ITJ1_STR-LGART05 sy-vline 
WA_T5ITJ1_STR-OPKEN05 sy-vline 
WA_T5ITJ1_STR-BETRG05 sy-vline 
WA_T5ITJ1_STR-WAERS05 sy-vline 
WA_T5ITJ1_STR-ANZHL05 sy-vline 
WA_T5ITJ1_STR-ZEINH05 sy-vline 
WA_T5ITJ1_STR-INDBW05 sy-vline 
WA_T5ITJ1_STR-LGART06 sy-vline 
WA_T5ITJ1_STR-OPKEN06 sy-vline 
WA_T5ITJ1_STR-BETRG06 sy-vline 
WA_T5ITJ1_STR-WAERS06 sy-vline 
WA_T5ITJ1_STR-ANZHL06 sy-vline 
WA_T5ITJ1_STR-ZEINH06 sy-vline 
WA_T5ITJ1_STR-INDBW06 sy-vline 
WA_T5ITJ1_STR-LGART07 sy-vline 
WA_T5ITJ1_STR-OPKEN07 sy-vline 
WA_T5ITJ1_STR-BETRG07 sy-vline 
WA_T5ITJ1_STR-WAERS07 sy-vline 
WA_T5ITJ1_STR-ANZHL07 sy-vline 
WA_T5ITJ1_STR-ZEINH07 sy-vline 
WA_T5ITJ1_STR-INDBW07 sy-vline 
WA_T5ITJ1_STR-LGART08 sy-vline 
WA_T5ITJ1_STR-OPKEN08 sy-vline 
WA_T5ITJ1_STR-BETRG08 sy-vline 
WA_T5ITJ1_STR-WAERS08 sy-vline 
WA_T5ITJ1_STR-ANZHL08 sy-vline 
WA_T5ITJ1_STR-ZEINH08 sy-vline 
WA_T5ITJ1_STR-INDBW08 sy-vline 
WA_T5ITJ1_STR-LGART09 sy-vline 
WA_T5ITJ1_STR-OPKEN09 sy-vline 
WA_T5ITJ1_STR-BETRG09 sy-vline 
WA_T5ITJ1_STR-WAERS09 sy-vline 
WA_T5ITJ1_STR-ANZHL09 sy-vline 
WA_T5ITJ1_STR-ZEINH09 sy-vline 
WA_T5ITJ1_STR-INDBW09 sy-vline 
WA_T5ITJ1_STR-LGART10 sy-vline 
WA_T5ITJ1_STR-OPKEN10 sy-vline 
WA_T5ITJ1_STR-BETRG10 sy-vline 
WA_T5ITJ1_STR-WAERS10 sy-vline 
WA_T5ITJ1_STR-ANZHL10 sy-vline 
WA_T5ITJ1_STR-ZEINH10 sy-vline 
WA_T5ITJ1_STR-INDBW10 sy-vline 
WA_T5ITJ1_STR-LGART11 sy-vline 
WA_T5ITJ1_STR-OPKEN11 sy-vline 
WA_T5ITJ1_STR-BETRG11 sy-vline 
WA_T5ITJ1_STR-WAERS11 sy-vline 
WA_T5ITJ1_STR-ANZHL11 sy-vline 
WA_T5ITJ1_STR-ZEINH11 sy-vline 
WA_T5ITJ1_STR-INDBW11 sy-vline 
WA_T5ITJ1_STR-LGART12 sy-vline 
WA_T5ITJ1_STR-OPKEN12 sy-vline 
WA_T5ITJ1_STR-BETRG12 sy-vline 
WA_T5ITJ1_STR-WAERS12 sy-vline 
WA_T5ITJ1_STR-ANZHL12 sy-vline 
WA_T5ITJ1_STR-ZEINH12 sy-vline 
WA_T5ITJ1_STR-INDBW12 sy-vline 
WA_T5ITJ1_STR-LGART13 sy-vline 
WA_T5ITJ1_STR-OPKEN13 sy-vline 
WA_T5ITJ1_STR-BETRG13 sy-vline 
WA_T5ITJ1_STR-WAERS13 sy-vline 
WA_T5ITJ1_STR-ANZHL13 sy-vline 
WA_T5ITJ1_STR-ZEINH13 sy-vline 
WA_T5ITJ1_STR-INDBW13 sy-vline 
WA_T5ITJ1_STR-LGART14 sy-vline 
WA_T5ITJ1_STR-OPKEN14 sy-vline 
WA_T5ITJ1_STR-BETRG14 sy-vline 
WA_T5ITJ1_STR-WAERS14 sy-vline 
WA_T5ITJ1_STR-ANZHL14 sy-vline 
WA_T5ITJ1_STR-ZEINH14 sy-vline 
WA_T5ITJ1_STR-INDBW14 sy-vline 
WA_T5ITJ1_STR-LGART15 sy-vline 
WA_T5ITJ1_STR-OPKEN15 sy-vline 
WA_T5ITJ1_STR-BETRG15 sy-vline 
WA_T5ITJ1_STR-WAERS15 sy-vline 
WA_T5ITJ1_STR-ANZHL15 sy-vline 
WA_T5ITJ1_STR-ZEINH15 sy-vline 
WA_T5ITJ1_STR-INDBW15 sy-vline 
WA_T5ITJ1_STR-LGART16 sy-vline 
WA_T5ITJ1_STR-OPKEN16 sy-vline 
WA_T5ITJ1_STR-BETRG16 sy-vline 
WA_T5ITJ1_STR-WAERS16 sy-vline 
WA_T5ITJ1_STR-ANZHL16 sy-vline 
WA_T5ITJ1_STR-ZEINH16 sy-vline 
WA_T5ITJ1_STR-INDBW16 sy-vline 
WA_T5ITJ1_STR-LGART17 sy-vline 
WA_T5ITJ1_STR-OPKEN17 sy-vline 
WA_T5ITJ1_STR-BETRG17 sy-vline 
WA_T5ITJ1_STR-WAERS17 sy-vline 
WA_T5ITJ1_STR-ANZHL17 sy-vline 
WA_T5ITJ1_STR-ZEINH17 sy-vline 
WA_T5ITJ1_STR-INDBW17 sy-vline 
WA_T5ITJ1_STR-LGART18 sy-vline 
WA_T5ITJ1_STR-OPKEN18 sy-vline 
WA_T5ITJ1_STR-BETRG18 sy-vline 
WA_T5ITJ1_STR-WAERS18 sy-vline 
WA_T5ITJ1_STR-ANZHL18 sy-vline 
WA_T5ITJ1_STR-ZEINH18 sy-vline 
WA_T5ITJ1_STR-INDBW18 sy-vline 
WA_T5ITJ1_STR-LGART19 sy-vline 
WA_T5ITJ1_STR-OPKEN19 sy-vline 
WA_T5ITJ1_STR-BETRG19 sy-vline 
WA_T5ITJ1_STR-WAERS19 sy-vline 
WA_T5ITJ1_STR-ANZHL19 sy-vline 
WA_T5ITJ1_STR-ZEINH19 sy-vline 
WA_T5ITJ1_STR-INDBW19 sy-vline 
WA_T5ITJ1_STR-LGART20 sy-vline 
WA_T5ITJ1_STR-OPKEN20 sy-vline 
WA_T5ITJ1_STR-BETRG20 sy-vline 
WA_T5ITJ1_STR-WAERS20 sy-vline 
WA_T5ITJ1_STR-ANZHL20 sy-vline 
WA_T5ITJ1_STR-ZEINH20 sy-vline 
WA_T5ITJ1_STR-INDBW20 sy-vline 
WA_T5ITJ1_STR-BEGDA01 sy-vline 
WA_T5ITJ1_STR-ENDDA01 sy-vline 
WA_T5ITJ1_STR-BEGDA02 sy-vline 
WA_T5ITJ1_STR-ENDDA02 sy-vline 
WA_T5ITJ1_STR-BEGDA03 sy-vline 
WA_T5ITJ1_STR-ENDDA03 sy-vline 
WA_T5ITJ1_STR-BEGDA04 sy-vline 
WA_T5ITJ1_STR-ENDDA04 sy-vline 
WA_T5ITJ1_STR-BEGDA05 sy-vline 
WA_T5ITJ1_STR-ENDDA05 sy-vline 
WA_T5ITJ1_STR-BEGDA06 sy-vline 
WA_T5ITJ1_STR-ENDDA06 sy-vline 
WA_T5ITJ1_STR-BEGDA07 sy-vline 
WA_T5ITJ1_STR-ENDDA07 sy-vline 
WA_T5ITJ1_STR-BEGDA08 sy-vline 
WA_T5ITJ1_STR-ENDDA08 sy-vline 
WA_T5ITJ1_STR-BEGDA09 sy-vline 
WA_T5ITJ1_STR-ENDDA09 sy-vline 
WA_T5ITJ1_STR-BEGDA10 sy-vline 
WA_T5ITJ1_STR-ENDDA10 sy-vline 
WA_T5ITJ1_STR-BEGDA11 sy-vline 
WA_T5ITJ1_STR-ENDDA11 sy-vline 
WA_T5ITJ1_STR-BEGDA12 sy-vline 
WA_T5ITJ1_STR-ENDDA12 sy-vline 
WA_T5ITJ1_STR-BEGDA13 sy-vline 
WA_T5ITJ1_STR-ENDDA13 sy-vline 
WA_T5ITJ1_STR-BEGDA14 sy-vline 
WA_T5ITJ1_STR-ENDDA14 sy-vline 
WA_T5ITJ1_STR-BEGDA15 sy-vline 
WA_T5ITJ1_STR-ENDDA15 sy-vline 
WA_T5ITJ1_STR-BEGDA16 sy-vline 
WA_T5ITJ1_STR-ENDDA16 sy-vline 
WA_T5ITJ1_STR-BEGDA17 sy-vline 
WA_T5ITJ1_STR-ENDDA17 sy-vline 
WA_T5ITJ1_STR-BEGDA18 sy-vline 
WA_T5ITJ1_STR-ENDDA18 sy-vline 
WA_T5ITJ1_STR-BEGDA19 sy-vline 
WA_T5ITJ1_STR-ENDDA19 sy-vline 
WA_T5ITJ1_STR-BEGDA20 sy-vline 
WA_T5ITJ1_STR-ENDDA20 sy-vline      INTO ld_text SEPARATED BY SPACE.

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