ABAP Select data from SAP table MDSP 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 MDSP 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 MDSP. 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 MDSP 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_MDSP TYPE STANDARD TABLE OF MDSP,
      WA_MDSP TYPE MDSP,
      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: <MDSP> TYPE MDSP.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM MDSP
*  INTO TABLE @DATA(IT_MDSP2).
*--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_MDSP INDEX 1 INTO DATA(WA_MDSP2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_MDSP ASSIGNING <MDSP>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<MDSP>-STKZA = 1.
<MDSP>-DATUV = 1.
<MDSP>-DATUB = 1.
<MDSP>-TECHV = 1.
<MDSP>-TECHB = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_MDSP-AENNR, sy-vline,
WA_MDSP-STSOR, sy-vline,
WA_MDSP-POSNR, sy-vline,
WA_MDSP-POSTP, sy-vline,
WA_MDSP-UPSKZ, sy-vline,
WA_MDSP-SCHGT, sy-vline.
ENDLOOP. *Add any further fields from structure WA_MDSP 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_MDSP 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_MDSP INTO WA_MDSP. *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 ALPHA, internal->external for field AENNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_MDSP-AENNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_MDSP-AENNR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit NUMCV, internal->external for field POSNR CALL FUNCTION 'CONVERSION_EXIT_NUMCV_OUTPUT' EXPORTING input = WA_MDSP-POSNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_MDSP-POSNR.
WRITE:/ 'New Value:', ld_input.

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

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

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

*Conversion exit ISOLA, internal->external for field STLTX CALL FUNCTION 'CONVERSION_EXIT_ISOLA_OUTPUT' EXPORTING input = WA_MDSP-STLTX IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_MDSP-STLTX.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

*Conversion exit CUNIT, internal->external for field NLFMV CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_MDSP-NLFMV IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_MDSP-NLFMV.
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_MDSP_STR,
STKZA TYPE STRING,
DATUV TYPE STRING,
DATUB TYPE STRING,
TECHV TYPE STRING,
TECHB TYPE STRING,
AENNR TYPE STRING,
STSOR TYPE STRING,
POSNR TYPE STRING,
POSTP TYPE STRING,
UPSKZ TYPE STRING,
SCHGT TYPE STRING,
KMPFE TYPE STRING,
KMPKA TYPE STRING,
KMPMT TYPE STRING,
KMPME TYPE STRING,
KMPMG TYPE STRING,
FMENG TYPE STRING,
ALPOS TYPE STRING,
EWAHR TYPE STRING,
ALPGR TYPE STRING,
ALPRF TYPE STRING,
ALPST TYPE STRING,
KMPAS TYPE STRING,
AVOAS TYPE STRING,
AVONT TYPE STRING,
BEIKZ TYPE STRING,
ERSKZ TYPE STRING,
REKRI TYPE STRING,
REKRS TYPE STRING,
KZDUM TYPE STRING,
KZMFG TYPE STRING,
KZVPL TYPE STRING,
KZLFP TYPE STRING,
NLFZT TYPE STRING,
KFPOS TYPE STRING,
KNOBJ TYPE STRING,
KLPOS TYPE STRING,
KZCLB TYPE STRING,
KLART TYPE STRING,
KFKLA TYPE STRING,
CLSZU TYPE STRING,
ROMNG TYPE STRING,
ROMEI TYPE STRING,
ROANZ TYPE STRING,
ROMS1 TYPE STRING,
ROMS2 TYPE STRING,
ROMS3 TYPE STRING,
RFORM TYPE STRING,
LGORT TYPE STRING,
PRVBE TYPE STRING,
NFPKZ TYPE STRING,
NFEAG TYPE STRING,
NFGRP TYPE STRING,
STLTX TYPE STRING,
STTX1 TYPE STRING,
STTX2 TYPE STRING,
EKGRP TYPE STRING,
LIFZT TYPE STRING,
WEBAZ TYPE STRING,
LIFNR TYPE STRING,
PREIS TYPE STRING,
PEINH TYPE STRING,
VERTI TYPE STRING,
WAERS TYPE STRING,
SAKTO TYPE STRING,
EKORG TYPE STRING,
STVKN TYPE STRING,
STKNR TYPE STRING,
TXPOS TYPE STRING,
RTPOS TYPE STRING,
INPOS TYPE STRING,
KZKUP TYPE STRING,
KZBSF TYPE STRING,
MTMTA TYPE STRING,
MATKL TYPE STRING,
MTWRK TYPE STRING,
MTLME TYPE STRING,
MTAME TYPE STRING,
MTURZ TYPE STRING,
MTURN TYPE STRING,
MTDIM TYPE STRING,
MTMIS TYPE STRING,
MTDVF TYPE STRING,
MTDST TYPE STRING,
MTBES TYPE STRING,
MTSOB TYPE STRING,
MTCHA TYPE STRING,
MTSEK TYPE STRING,
MTALT TYPE STRING,
MTAUS TYPE STRING,
MTKFM TYPE STRING,
MTREV TYPE STRING,
MTDZT TYPE STRING,
MTPZT TYPE STRING,
MTWZT TYPE STRING,
MTBZT TYPE STRING,
MTRZT TYPE STRING,
MTTZT TYPE STRING,
MTBMG TYPE STRING,
MTAKZ TYPE STRING,
MTADT TYPE STRING,
MTNMT TYPE STRING,
MTLPR TYPE STRING,
MTEPR TYPE STRING,
MTSGT TYPE STRING,
MTMNG TYPE STRING,
MTWRT TYPE STRING,
MTPIO TYPE STRING,
MTPIZ TYPE STRING,
MTRCD TYPE STRING,
MTVFP TYPE STRING,
CUOBJ TYPE STRING,
KZBED TYPE STRING,
DSPST TYPE STRING,
MTPVB TYPE STRING,
APOKZ TYPE STRING,
NLFZV TYPE STRING,
NLFMV TYPE STRING,
ITSOB TYPE STRING,
SGT_CMKZ TYPE STRING,
SGT_RCAT TYPE STRING,
SGT_SCAT TYPE STRING,
FSH_CRITICAL_COMP TYPE STRING,
FSH_CRITICAL_LEVEL TYPE STRING,END OF T_EKKO_STR. DATA: WA_MDSP_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_MDSP_STR-STKZA sy-vline
WA_MDSP_STR-DATUV sy-vline
WA_MDSP_STR-DATUB sy-vline
WA_MDSP_STR-TECHV sy-vline
WA_MDSP_STR-TECHB sy-vline
WA_MDSP_STR-AENNR sy-vline
WA_MDSP_STR-STSOR sy-vline
WA_MDSP_STR-POSNR sy-vline
WA_MDSP_STR-POSTP sy-vline
WA_MDSP_STR-UPSKZ sy-vline
WA_MDSP_STR-SCHGT sy-vline
WA_MDSP_STR-KMPFE sy-vline
WA_MDSP_STR-KMPKA sy-vline
WA_MDSP_STR-KMPMT sy-vline
WA_MDSP_STR-KMPME sy-vline
WA_MDSP_STR-KMPMG sy-vline
WA_MDSP_STR-FMENG sy-vline
WA_MDSP_STR-ALPOS sy-vline
WA_MDSP_STR-EWAHR sy-vline
WA_MDSP_STR-ALPGR sy-vline
WA_MDSP_STR-ALPRF sy-vline
WA_MDSP_STR-ALPST sy-vline
WA_MDSP_STR-KMPAS sy-vline
WA_MDSP_STR-AVOAS sy-vline
WA_MDSP_STR-AVONT sy-vline
WA_MDSP_STR-BEIKZ sy-vline
WA_MDSP_STR-ERSKZ sy-vline
WA_MDSP_STR-REKRI sy-vline
WA_MDSP_STR-REKRS sy-vline
WA_MDSP_STR-KZDUM sy-vline
WA_MDSP_STR-KZMFG sy-vline
WA_MDSP_STR-KZVPL sy-vline
WA_MDSP_STR-KZLFP sy-vline
WA_MDSP_STR-NLFZT sy-vline
WA_MDSP_STR-KFPOS sy-vline
WA_MDSP_STR-KNOBJ sy-vline
WA_MDSP_STR-KLPOS sy-vline
WA_MDSP_STR-KZCLB sy-vline
WA_MDSP_STR-KLART sy-vline
WA_MDSP_STR-KFKLA sy-vline
WA_MDSP_STR-CLSZU sy-vline
WA_MDSP_STR-ROMNG sy-vline
WA_MDSP_STR-ROMEI sy-vline
WA_MDSP_STR-ROANZ sy-vline
WA_MDSP_STR-ROMS1 sy-vline
WA_MDSP_STR-ROMS2 sy-vline
WA_MDSP_STR-ROMS3 sy-vline
WA_MDSP_STR-RFORM sy-vline
WA_MDSP_STR-LGORT sy-vline
WA_MDSP_STR-PRVBE sy-vline
WA_MDSP_STR-NFPKZ sy-vline
WA_MDSP_STR-NFEAG sy-vline
WA_MDSP_STR-NFGRP sy-vline
WA_MDSP_STR-STLTX sy-vline
WA_MDSP_STR-STTX1 sy-vline
WA_MDSP_STR-STTX2 sy-vline
WA_MDSP_STR-EKGRP sy-vline
WA_MDSP_STR-LIFZT sy-vline
WA_MDSP_STR-WEBAZ sy-vline
WA_MDSP_STR-LIFNR sy-vline
WA_MDSP_STR-PREIS sy-vline
WA_MDSP_STR-PEINH sy-vline
WA_MDSP_STR-VERTI sy-vline
WA_MDSP_STR-WAERS sy-vline
WA_MDSP_STR-SAKTO sy-vline
WA_MDSP_STR-EKORG sy-vline
WA_MDSP_STR-STVKN sy-vline
WA_MDSP_STR-STKNR sy-vline
WA_MDSP_STR-TXPOS sy-vline
WA_MDSP_STR-RTPOS sy-vline
WA_MDSP_STR-INPOS sy-vline
WA_MDSP_STR-KZKUP sy-vline
WA_MDSP_STR-KZBSF sy-vline
WA_MDSP_STR-MTMTA sy-vline
WA_MDSP_STR-MATKL sy-vline
WA_MDSP_STR-MTWRK sy-vline
WA_MDSP_STR-MTLME sy-vline
WA_MDSP_STR-MTAME sy-vline
WA_MDSP_STR-MTURZ sy-vline
WA_MDSP_STR-MTURN sy-vline
WA_MDSP_STR-MTDIM sy-vline
WA_MDSP_STR-MTMIS sy-vline
WA_MDSP_STR-MTDVF sy-vline
WA_MDSP_STR-MTDST sy-vline
WA_MDSP_STR-MTBES sy-vline
WA_MDSP_STR-MTSOB sy-vline
WA_MDSP_STR-MTCHA sy-vline
WA_MDSP_STR-MTSEK sy-vline
WA_MDSP_STR-MTALT sy-vline
WA_MDSP_STR-MTAUS sy-vline
WA_MDSP_STR-MTKFM sy-vline
WA_MDSP_STR-MTREV sy-vline
WA_MDSP_STR-MTDZT sy-vline
WA_MDSP_STR-MTPZT sy-vline
WA_MDSP_STR-MTWZT sy-vline
WA_MDSP_STR-MTBZT sy-vline
WA_MDSP_STR-MTRZT sy-vline
WA_MDSP_STR-MTTZT sy-vline
WA_MDSP_STR-MTBMG sy-vline
WA_MDSP_STR-MTAKZ sy-vline
WA_MDSP_STR-MTADT sy-vline
WA_MDSP_STR-MTNMT sy-vline
WA_MDSP_STR-MTLPR sy-vline
WA_MDSP_STR-MTEPR sy-vline
WA_MDSP_STR-MTSGT sy-vline
WA_MDSP_STR-MTMNG sy-vline
WA_MDSP_STR-MTWRT sy-vline
WA_MDSP_STR-MTPIO sy-vline
WA_MDSP_STR-MTPIZ sy-vline
WA_MDSP_STR-MTRCD sy-vline
WA_MDSP_STR-MTVFP sy-vline
WA_MDSP_STR-CUOBJ sy-vline
WA_MDSP_STR-KZBED sy-vline
WA_MDSP_STR-DSPST sy-vline
WA_MDSP_STR-MTPVB sy-vline
WA_MDSP_STR-APOKZ sy-vline
WA_MDSP_STR-NLFZV sy-vline
WA_MDSP_STR-NLFMV sy-vline
WA_MDSP_STR-ITSOB sy-vline
WA_MDSP_STR-SGT_CMKZ sy-vline
WA_MDSP_STR-SGT_RCAT sy-vline
WA_MDSP_STR-SGT_SCAT sy-vline
WA_MDSP_STR-FSH_CRITICAL_COMP sy-vline
WA_MDSP_STR-FSH_CRITICAL_LEVEL sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.