ABAP Select data from SAP table MDFE 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 MDFE 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 MDFE. 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 MDFE 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_MDFE TYPE STANDARD TABLE OF MDFE,
      WA_MDFE TYPE MDFE,
      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: <MDFE> TYPE MDFE.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM MDFE
*  INTO TABLE @DATA(IT_MDFE2).
*--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_MDFE INDEX 1 INTO DATA(WA_MDFE2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<MDFE>-ZEILE = 1.
<MDFE>-SPALT = 1.
<MDFE>-MATNR = 1.
<MDFE>-PLAAB = 1.
<MDFE>-PLANR = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_MDFE-DAT00, sy-vline,
  WA_MDFE-DELKZ, sy-vline,
  WA_MDFE-FREKZ, sy-vline,
  WA_MDFE-INDEX, sy-vline,
  WA_MDFE-AEFLG, sy-vline,
  WA_MDFE-MNG01, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_MDFE 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_MDFE 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_MDFE INTO WA_MDFE.


*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.

*Conversion exit MATN1, internal->external for field MATNR
CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT'
  EXPORTING
    input =                      WA_MDFE-MATNR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_MDFE-MATNR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field AUFNR
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_MDFE-AUFNR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_MDFE-AUFNR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit CUNIT, internal->external for field GMEIN
CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT'
  EXPORTING
    input =                      WA_MDFE-GMEIN
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_MDFE-GMEIN.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field PLNUM
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_MDFE-PLNUM
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_MDFE-PLNUM.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field FAUFN
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_MDFE-FAUFN
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_MDFE-FAUFN.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field AUFN1
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_MDFE-AUFN1
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_MDFE-AUFN1.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field KDAUF
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_MDFE-KDAUF
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_MDFE-KDAUF.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ABPSP, internal->external for field PSPEL
CALL FUNCTION 'CONVERSION_EXIT_ABPSP_OUTPUT'
  EXPORTING
    input =                      WA_MDFE-PSPEL
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_MDFE-PSPEL.
WRITE:/ 'New Value:', ld_input.
ENDFORM. 

*&---------------------------------------------------------------------*
*& Form process_as_string_field_values
*&---------------------------------------------------------------------*
FORM process_as_string_field_values CHANGING p_EKKO LIKE wa_EKKO.

TYPES: BEGIN OF T_MDFE_STR, 
ZEILE TYPE STRING,
SPALT TYPE STRING,
MATNR TYPE STRING,
PLAAB TYPE STRING,
PLANR TYPE STRING,
DAT00 TYPE STRING,
DELKZ TYPE STRING,
FREKZ TYPE STRING,
INDEX TYPE STRING,
AEFLG TYPE STRING,
MNG01 TYPE STRING,
MNG02 TYPE STRING,
MNG03 TYPE STRING,
MNG04 TYPE STRING,
MNG05 TYPE STRING,
MNG06 TYPE STRING,
DAT01 TYPE STRING,
DAT02 TYPE STRING,
DAT03 TYPE STRING,
FIX01 TYPE STRING,
FIX02 TYPE STRING,
AUFNR TYPE STRING,
GMEIN TYPE STRING,
PLWRK TYPE STRING,
PWWRK TYPE STRING,
LGORT TYPE STRING,
VERID TYPE STRING,
PLNUM TYPE STRING,
LINID TYPE STRING,
MDV01 TYPE STRING,
MDV02 TYPE STRING,
LINHI TYPE STRING,
VERTL TYPE STRING,
SELEC TYPE STRING,
FAUFN TYPE STRING,
POSNR TYPE STRING,
ELIKZ TYPE STRING,
RSNUM TYPE STRING,
ERUKZ TYPE STRING,
EENKZ TYPE STRING,
NFRKZ TYPE STRING,
AFGKA TYPE STRING,
KPART TYPE STRING,
SCHIV TYPE STRING,
ZEITV TYPE STRING,
ZEITB TYPE STRING,
AUFN1 TYPE STRING,
KAPFX TYPE STRING,
ETART TYPE STRING,
SHTNR TYPE STRING,
ETLNR TYPE STRING,
DISPO TYPE STRING,
DAT04 TYPE STRING,
DAT05 TYPE STRING,
DTBDV TYPE STRING,
DTBZV TYPE STRING,
DTBDB TYPE STRING,
DTBZB TYPE STRING,
ANVER TYPE STRING,
PLUMI TYPE STRING,
ZLART TYPE STRING,
VRFKZ TYPE STRING,
KDAUF TYPE STRING,
KDPOS TYPE STRING,
DELPS TYPE STRING,
DELET TYPE STRING,
PSPEL TYPE STRING,
WEBAZ TYPE STRING,
BAART TYPE STRING,
TRMKZ TYPE STRING,END OF T_EKKO_STR.
DATA: WA_MDFE_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_MDFE_STR-ZEILE sy-vline 
WA_MDFE_STR-SPALT sy-vline 
WA_MDFE_STR-MATNR sy-vline 
WA_MDFE_STR-PLAAB sy-vline 
WA_MDFE_STR-PLANR sy-vline 
WA_MDFE_STR-DAT00 sy-vline 
WA_MDFE_STR-DELKZ sy-vline 
WA_MDFE_STR-FREKZ sy-vline 
WA_MDFE_STR-INDEX sy-vline 
WA_MDFE_STR-AEFLG sy-vline 
WA_MDFE_STR-MNG01 sy-vline 
WA_MDFE_STR-MNG02 sy-vline 
WA_MDFE_STR-MNG03 sy-vline 
WA_MDFE_STR-MNG04 sy-vline 
WA_MDFE_STR-MNG05 sy-vline 
WA_MDFE_STR-MNG06 sy-vline 
WA_MDFE_STR-DAT01 sy-vline 
WA_MDFE_STR-DAT02 sy-vline 
WA_MDFE_STR-DAT03 sy-vline 
WA_MDFE_STR-FIX01 sy-vline 
WA_MDFE_STR-FIX02 sy-vline 
WA_MDFE_STR-AUFNR sy-vline 
WA_MDFE_STR-GMEIN sy-vline 
WA_MDFE_STR-PLWRK sy-vline 
WA_MDFE_STR-PWWRK sy-vline 
WA_MDFE_STR-LGORT sy-vline 
WA_MDFE_STR-VERID sy-vline 
WA_MDFE_STR-PLNUM sy-vline 
WA_MDFE_STR-LINID sy-vline 
WA_MDFE_STR-MDV01 sy-vline 
WA_MDFE_STR-MDV02 sy-vline 
WA_MDFE_STR-LINHI sy-vline 
WA_MDFE_STR-VERTL sy-vline 
WA_MDFE_STR-SELEC sy-vline 
WA_MDFE_STR-FAUFN sy-vline 
WA_MDFE_STR-POSNR sy-vline 
WA_MDFE_STR-ELIKZ sy-vline 
WA_MDFE_STR-RSNUM sy-vline 
WA_MDFE_STR-ERUKZ sy-vline 
WA_MDFE_STR-EENKZ sy-vline 
WA_MDFE_STR-NFRKZ sy-vline 
WA_MDFE_STR-AFGKA sy-vline 
WA_MDFE_STR-KPART sy-vline 
WA_MDFE_STR-SCHIV sy-vline 
WA_MDFE_STR-ZEITV sy-vline 
WA_MDFE_STR-ZEITB sy-vline 
WA_MDFE_STR-AUFN1 sy-vline 
WA_MDFE_STR-KAPFX sy-vline 
WA_MDFE_STR-ETART sy-vline 
WA_MDFE_STR-SHTNR sy-vline 
WA_MDFE_STR-ETLNR sy-vline 
WA_MDFE_STR-DISPO sy-vline 
WA_MDFE_STR-DAT04 sy-vline 
WA_MDFE_STR-DAT05 sy-vline 
WA_MDFE_STR-DTBDV sy-vline 
WA_MDFE_STR-DTBZV sy-vline 
WA_MDFE_STR-DTBDB sy-vline 
WA_MDFE_STR-DTBZB sy-vline 
WA_MDFE_STR-ANVER sy-vline 
WA_MDFE_STR-PLUMI sy-vline 
WA_MDFE_STR-ZLART sy-vline 
WA_MDFE_STR-VRFKZ sy-vline 
WA_MDFE_STR-KDAUF sy-vline 
WA_MDFE_STR-KDPOS sy-vline 
WA_MDFE_STR-DELPS sy-vline 
WA_MDFE_STR-DELET sy-vline 
WA_MDFE_STR-PSPEL sy-vline 
WA_MDFE_STR-WEBAZ sy-vline 
WA_MDFE_STR-BAART sy-vline 
WA_MDFE_STR-TRMKZ sy-vline      INTO ld_text SEPARATED BY SPACE.

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