ABAP Select data from SAP table E1P0056 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 E1P0056 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 E1P0056. 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 E1P0056 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_E1P0056 TYPE STANDARD TABLE OF E1P0056,
      WA_E1P0056 TYPE E1P0056,
      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: <E1P0056> TYPE E1P0056.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM E1P0056
*  INTO TABLE @DATA(IT_E1P00562).
*--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_E1P0056 INDEX 1 INTO DATA(WA_E1P00562).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<E1P0056>-PERNR = 1.
<E1P0056>-INFTY = 1.
<E1P0056>-SUBTY = 1.
<E1P0056>-OBJPS = 1.
<E1P0056>-SPRPS = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_E1P0056-ENDDA, sy-vline,
  WA_E1P0056-BEGDA, sy-vline,
  WA_E1P0056-SEQNR, sy-vline,
  WA_E1P0056-AEDTM, sy-vline,
  WA_E1P0056-UNAME, sy-vline,
  WA_E1P0056-HISTO, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_E1P0056 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_E1P0056 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_E1P0056 INTO WA_E1P0056.


*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_E1P0056_STR, 
PERNR TYPE STRING,
INFTY TYPE STRING,
SUBTY TYPE STRING,
OBJPS TYPE STRING,
SPRPS TYPE STRING,
ENDDA TYPE STRING,
BEGDA TYPE STRING,
SEQNR TYPE STRING,
AEDTM TYPE STRING,
UNAME TYPE STRING,
HISTO TYPE STRING,
ITXEX TYPE STRING,
REFEX TYPE STRING,
ORDEX TYPE STRING,
ITBLD TYPE STRING,
PREAS TYPE STRING,
FLAG1 TYPE STRING,
FLAG2 TYPE STRING,
FLAG3 TYPE STRING,
FLAG4 TYPE STRING,
RESE1 TYPE STRING,
RESE2 TYPE STRING,
FAMSA TYPE STRING,
OBJID TYPE STRING,
MACOD TYPE STRING,
DOC01 TYPE STRING,
ADT01 TYPE STRING,
UVN01 TYPE STRING,
UBS01 TYPE STRING,
ULD01 TYPE STRING,
DOC02 TYPE STRING,
ADT02 TYPE STRING,
UVN02 TYPE STRING,
UBS02 TYPE STRING,
ULD02 TYPE STRING,
DOC03 TYPE STRING,
ADT03 TYPE STRING,
UVN03 TYPE STRING,
UBS03 TYPE STRING,
ULD03 TYPE STRING,
DOC04 TYPE STRING,
ADT04 TYPE STRING,
UVN04 TYPE STRING,
UBS04 TYPE STRING,
ULD04 TYPE STRING,
DOC05 TYPE STRING,
ADT05 TYPE STRING,
UVN05 TYPE STRING,
UBS05 TYPE STRING,
ULD05 TYPE STRING,
DOC06 TYPE STRING,
ADT06 TYPE STRING,
UVN06 TYPE STRING,
UBS06 TYPE STRING,
ULD06 TYPE STRING,
DOC07 TYPE STRING,
ADT07 TYPE STRING,
UVN07 TYPE STRING,
UBS07 TYPE STRING,
ULD07 TYPE STRING,
DOC08 TYPE STRING,
ADT08 TYPE STRING,
UVN08 TYPE STRING,
UBS08 TYPE STRING,
ULD08 TYPE STRING,
DOC09 TYPE STRING,
ADT09 TYPE STRING,
UVN09 TYPE STRING,
UBS09 TYPE STRING,
ULD09 TYPE STRING,
DOC10 TYPE STRING,
ADT10 TYPE STRING,
UVN10 TYPE STRING,
UBS10 TYPE STRING,
ULD10 TYPE STRING,
DOC11 TYPE STRING,
ADT11 TYPE STRING,
UVN11 TYPE STRING,
UBS11 TYPE STRING,
ULD11 TYPE STRING,
DOC12 TYPE STRING,
ADT12 TYPE STRING,
UVN12 TYPE STRING,
UBS12 TYPE STRING,
ULD12 TYPE STRING,
DOC13 TYPE STRING,
ADT13 TYPE STRING,
UVN13 TYPE STRING,
UBS13 TYPE STRING,
ULD13 TYPE STRING,
DOC14 TYPE STRING,
ADT14 TYPE STRING,
UVN14 TYPE STRING,
UBS14 TYPE STRING,
ULD14 TYPE STRING,
DOC15 TYPE STRING,
ADT15 TYPE STRING,
UVN15 TYPE STRING,
UBS15 TYPE STRING,
ULD15 TYPE STRING,
DOC16 TYPE STRING,
ADT16 TYPE STRING,
UVN16 TYPE STRING,
UBS16 TYPE STRING,
ULD16 TYPE STRING,
DOC17 TYPE STRING,
ADT17 TYPE STRING,
UVN17 TYPE STRING,
UBS17 TYPE STRING,
ULD17 TYPE STRING,
DOC18 TYPE STRING,
ADT18 TYPE STRING,
UVN18 TYPE STRING,
UBS18 TYPE STRING,
ULD18 TYPE STRING,
DOC19 TYPE STRING,
ADT19 TYPE STRING,
UVN19 TYPE STRING,
UBS19 TYPE STRING,
ULD19 TYPE STRING,
DOC20 TYPE STRING,
ADT20 TYPE STRING,
UVN20 TYPE STRING,
UBS20 TYPE STRING,
ULD20 TYPE STRING,
PRT01 TYPE STRING,
DPL01 TYPE STRING,
ADR01 TYPE STRING,
PRT02 TYPE STRING,
DPL02 TYPE STRING,
ADR02 TYPE STRING,
PRT03 TYPE STRING,
DPL03 TYPE STRING,
ADR03 TYPE STRING,
PRT04 TYPE STRING,
DPL04 TYPE STRING,
ADR04 TYPE STRING,
PRT05 TYPE STRING,
DPL05 TYPE STRING,
ADR05 TYPE STRING,
PRT06 TYPE STRING,
DPL06 TYPE STRING,
ADR06 TYPE STRING,
PRT07 TYPE STRING,
DPL07 TYPE STRING,
ADR07 TYPE STRING,
PRT08 TYPE STRING,
DPL08 TYPE STRING,
ADR08 TYPE STRING,
PRT09 TYPE STRING,
DPL09 TYPE STRING,
ADR09 TYPE STRING,
PRT10 TYPE STRING,
DPL10 TYPE STRING,
ADR10 TYPE STRING,
PRT11 TYPE STRING,
DPL11 TYPE STRING,
ADR11 TYPE STRING,
PRT12 TYPE STRING,
DPL12 TYPE STRING,
ADR12 TYPE STRING,
PRT13 TYPE STRING,
DPL13 TYPE STRING,
ADR13 TYPE STRING,
PRT14 TYPE STRING,
DPL14 TYPE STRING,
ADR14 TYPE STRING,
PRT15 TYPE STRING,
DPL15 TYPE STRING,
ADR15 TYPE STRING,
PRT16 TYPE STRING,
DPL16 TYPE STRING,
ADR16 TYPE STRING,
PRT17 TYPE STRING,
DPL17 TYPE STRING,
ADR17 TYPE STRING,
PRT18 TYPE STRING,
DPL18 TYPE STRING,
ADR18 TYPE STRING,
PRT19 TYPE STRING,
DPL19 TYPE STRING,
ADR19 TYPE STRING,
PRT20 TYPE STRING,
DPL20 TYPE STRING,
ADR20 TYPE STRING,
GRPVL TYPE STRING,END OF T_EKKO_STR.
DATA: WA_E1P0056_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_E1P0056_STR-PERNR sy-vline 
WA_E1P0056_STR-INFTY sy-vline 
WA_E1P0056_STR-SUBTY sy-vline 
WA_E1P0056_STR-OBJPS sy-vline 
WA_E1P0056_STR-SPRPS sy-vline 
WA_E1P0056_STR-ENDDA sy-vline 
WA_E1P0056_STR-BEGDA sy-vline 
WA_E1P0056_STR-SEQNR sy-vline 
WA_E1P0056_STR-AEDTM sy-vline 
WA_E1P0056_STR-UNAME sy-vline 
WA_E1P0056_STR-HISTO sy-vline 
WA_E1P0056_STR-ITXEX sy-vline 
WA_E1P0056_STR-REFEX sy-vline 
WA_E1P0056_STR-ORDEX sy-vline 
WA_E1P0056_STR-ITBLD sy-vline 
WA_E1P0056_STR-PREAS sy-vline 
WA_E1P0056_STR-FLAG1 sy-vline 
WA_E1P0056_STR-FLAG2 sy-vline 
WA_E1P0056_STR-FLAG3 sy-vline 
WA_E1P0056_STR-FLAG4 sy-vline 
WA_E1P0056_STR-RESE1 sy-vline 
WA_E1P0056_STR-RESE2 sy-vline 
WA_E1P0056_STR-FAMSA sy-vline 
WA_E1P0056_STR-OBJID sy-vline 
WA_E1P0056_STR-MACOD sy-vline 
WA_E1P0056_STR-DOC01 sy-vline 
WA_E1P0056_STR-ADT01 sy-vline 
WA_E1P0056_STR-UVN01 sy-vline 
WA_E1P0056_STR-UBS01 sy-vline 
WA_E1P0056_STR-ULD01 sy-vline 
WA_E1P0056_STR-DOC02 sy-vline 
WA_E1P0056_STR-ADT02 sy-vline 
WA_E1P0056_STR-UVN02 sy-vline 
WA_E1P0056_STR-UBS02 sy-vline 
WA_E1P0056_STR-ULD02 sy-vline 
WA_E1P0056_STR-DOC03 sy-vline 
WA_E1P0056_STR-ADT03 sy-vline 
WA_E1P0056_STR-UVN03 sy-vline 
WA_E1P0056_STR-UBS03 sy-vline 
WA_E1P0056_STR-ULD03 sy-vline 
WA_E1P0056_STR-DOC04 sy-vline 
WA_E1P0056_STR-ADT04 sy-vline 
WA_E1P0056_STR-UVN04 sy-vline 
WA_E1P0056_STR-UBS04 sy-vline 
WA_E1P0056_STR-ULD04 sy-vline 
WA_E1P0056_STR-DOC05 sy-vline 
WA_E1P0056_STR-ADT05 sy-vline 
WA_E1P0056_STR-UVN05 sy-vline 
WA_E1P0056_STR-UBS05 sy-vline 
WA_E1P0056_STR-ULD05 sy-vline 
WA_E1P0056_STR-DOC06 sy-vline 
WA_E1P0056_STR-ADT06 sy-vline 
WA_E1P0056_STR-UVN06 sy-vline 
WA_E1P0056_STR-UBS06 sy-vline 
WA_E1P0056_STR-ULD06 sy-vline 
WA_E1P0056_STR-DOC07 sy-vline 
WA_E1P0056_STR-ADT07 sy-vline 
WA_E1P0056_STR-UVN07 sy-vline 
WA_E1P0056_STR-UBS07 sy-vline 
WA_E1P0056_STR-ULD07 sy-vline 
WA_E1P0056_STR-DOC08 sy-vline 
WA_E1P0056_STR-ADT08 sy-vline 
WA_E1P0056_STR-UVN08 sy-vline 
WA_E1P0056_STR-UBS08 sy-vline 
WA_E1P0056_STR-ULD08 sy-vline 
WA_E1P0056_STR-DOC09 sy-vline 
WA_E1P0056_STR-ADT09 sy-vline 
WA_E1P0056_STR-UVN09 sy-vline 
WA_E1P0056_STR-UBS09 sy-vline 
WA_E1P0056_STR-ULD09 sy-vline 
WA_E1P0056_STR-DOC10 sy-vline 
WA_E1P0056_STR-ADT10 sy-vline 
WA_E1P0056_STR-UVN10 sy-vline 
WA_E1P0056_STR-UBS10 sy-vline 
WA_E1P0056_STR-ULD10 sy-vline 
WA_E1P0056_STR-DOC11 sy-vline 
WA_E1P0056_STR-ADT11 sy-vline 
WA_E1P0056_STR-UVN11 sy-vline 
WA_E1P0056_STR-UBS11 sy-vline 
WA_E1P0056_STR-ULD11 sy-vline 
WA_E1P0056_STR-DOC12 sy-vline 
WA_E1P0056_STR-ADT12 sy-vline 
WA_E1P0056_STR-UVN12 sy-vline 
WA_E1P0056_STR-UBS12 sy-vline 
WA_E1P0056_STR-ULD12 sy-vline 
WA_E1P0056_STR-DOC13 sy-vline 
WA_E1P0056_STR-ADT13 sy-vline 
WA_E1P0056_STR-UVN13 sy-vline 
WA_E1P0056_STR-UBS13 sy-vline 
WA_E1P0056_STR-ULD13 sy-vline 
WA_E1P0056_STR-DOC14 sy-vline 
WA_E1P0056_STR-ADT14 sy-vline 
WA_E1P0056_STR-UVN14 sy-vline 
WA_E1P0056_STR-UBS14 sy-vline 
WA_E1P0056_STR-ULD14 sy-vline 
WA_E1P0056_STR-DOC15 sy-vline 
WA_E1P0056_STR-ADT15 sy-vline 
WA_E1P0056_STR-UVN15 sy-vline 
WA_E1P0056_STR-UBS15 sy-vline 
WA_E1P0056_STR-ULD15 sy-vline 
WA_E1P0056_STR-DOC16 sy-vline 
WA_E1P0056_STR-ADT16 sy-vline 
WA_E1P0056_STR-UVN16 sy-vline 
WA_E1P0056_STR-UBS16 sy-vline 
WA_E1P0056_STR-ULD16 sy-vline 
WA_E1P0056_STR-DOC17 sy-vline 
WA_E1P0056_STR-ADT17 sy-vline 
WA_E1P0056_STR-UVN17 sy-vline 
WA_E1P0056_STR-UBS17 sy-vline 
WA_E1P0056_STR-ULD17 sy-vline 
WA_E1P0056_STR-DOC18 sy-vline 
WA_E1P0056_STR-ADT18 sy-vline 
WA_E1P0056_STR-UVN18 sy-vline 
WA_E1P0056_STR-UBS18 sy-vline 
WA_E1P0056_STR-ULD18 sy-vline 
WA_E1P0056_STR-DOC19 sy-vline 
WA_E1P0056_STR-ADT19 sy-vline 
WA_E1P0056_STR-UVN19 sy-vline 
WA_E1P0056_STR-UBS19 sy-vline 
WA_E1P0056_STR-ULD19 sy-vline 
WA_E1P0056_STR-DOC20 sy-vline 
WA_E1P0056_STR-ADT20 sy-vline 
WA_E1P0056_STR-UVN20 sy-vline 
WA_E1P0056_STR-UBS20 sy-vline 
WA_E1P0056_STR-ULD20 sy-vline 
WA_E1P0056_STR-PRT01 sy-vline 
WA_E1P0056_STR-DPL01 sy-vline 
WA_E1P0056_STR-ADR01 sy-vline 
WA_E1P0056_STR-PRT02 sy-vline 
WA_E1P0056_STR-DPL02 sy-vline 
WA_E1P0056_STR-ADR02 sy-vline 
WA_E1P0056_STR-PRT03 sy-vline 
WA_E1P0056_STR-DPL03 sy-vline 
WA_E1P0056_STR-ADR03 sy-vline 
WA_E1P0056_STR-PRT04 sy-vline 
WA_E1P0056_STR-DPL04 sy-vline 
WA_E1P0056_STR-ADR04 sy-vline 
WA_E1P0056_STR-PRT05 sy-vline 
WA_E1P0056_STR-DPL05 sy-vline 
WA_E1P0056_STR-ADR05 sy-vline 
WA_E1P0056_STR-PRT06 sy-vline 
WA_E1P0056_STR-DPL06 sy-vline 
WA_E1P0056_STR-ADR06 sy-vline 
WA_E1P0056_STR-PRT07 sy-vline 
WA_E1P0056_STR-DPL07 sy-vline 
WA_E1P0056_STR-ADR07 sy-vline 
WA_E1P0056_STR-PRT08 sy-vline 
WA_E1P0056_STR-DPL08 sy-vline 
WA_E1P0056_STR-ADR08 sy-vline 
WA_E1P0056_STR-PRT09 sy-vline 
WA_E1P0056_STR-DPL09 sy-vline 
WA_E1P0056_STR-ADR09 sy-vline 
WA_E1P0056_STR-PRT10 sy-vline 
WA_E1P0056_STR-DPL10 sy-vline 
WA_E1P0056_STR-ADR10 sy-vline 
WA_E1P0056_STR-PRT11 sy-vline 
WA_E1P0056_STR-DPL11 sy-vline 
WA_E1P0056_STR-ADR11 sy-vline 
WA_E1P0056_STR-PRT12 sy-vline 
WA_E1P0056_STR-DPL12 sy-vline 
WA_E1P0056_STR-ADR12 sy-vline 
WA_E1P0056_STR-PRT13 sy-vline 
WA_E1P0056_STR-DPL13 sy-vline 
WA_E1P0056_STR-ADR13 sy-vline 
WA_E1P0056_STR-PRT14 sy-vline 
WA_E1P0056_STR-DPL14 sy-vline 
WA_E1P0056_STR-ADR14 sy-vline 
WA_E1P0056_STR-PRT15 sy-vline 
WA_E1P0056_STR-DPL15 sy-vline 
WA_E1P0056_STR-ADR15 sy-vline 
WA_E1P0056_STR-PRT16 sy-vline 
WA_E1P0056_STR-DPL16 sy-vline 
WA_E1P0056_STR-ADR16 sy-vline 
WA_E1P0056_STR-PRT17 sy-vline 
WA_E1P0056_STR-DPL17 sy-vline 
WA_E1P0056_STR-ADR17 sy-vline 
WA_E1P0056_STR-PRT18 sy-vline 
WA_E1P0056_STR-DPL18 sy-vline 
WA_E1P0056_STR-ADR18 sy-vline 
WA_E1P0056_STR-PRT19 sy-vline 
WA_E1P0056_STR-DPL19 sy-vline 
WA_E1P0056_STR-ADR19 sy-vline 
WA_E1P0056_STR-PRT20 sy-vline 
WA_E1P0056_STR-DPL20 sy-vline 
WA_E1P0056_STR-ADR20 sy-vline 
WA_E1P0056_STR-GRPVL sy-vline      INTO ld_text SEPARATED BY SPACE.

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