ABAP Select data from SAP table /MAP/S_TARGET_FIELDS 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 /MAP/S_TARGET_FIELDS 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 /MAP/S_TARGET_FIELDS. 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 /MAP/S_TARGET_FIELDS 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_/MAP/S_TARGET_FIELDS TYPE STANDARD TABLE OF /MAP/S_TARGET_FIELDS,
      WA_/MAP/S_TARGET_FIELDS TYPE /MAP/S_TARGET_FIELDS,
      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: </MAP/S_TARGET_FIELDS> TYPE /MAP/S_TARGET_FIELDS.

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

SELECT *
*restrict ABAP select to first 10 rows
 UP TO 10 ROWS      
  FROM /MAP/S_TARGET_FIELDS
  INTO TABLE IT_/MAP/S_TARGET_FIELDS.

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM /MAP/S_TARGET_FIELDS
*  INTO TABLE @DATA(IT_/MAP/S_TARGET_FIELDS2).
*--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_/MAP/S_TARGET_FIELDS INDEX 1 INTO DATA(WA_/MAP/S_TARGET_FIELDS2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_/MAP/S_TARGET_FIELDS ASSIGNING </MAP/S_TARGET_FIELDS>.

*To update a field value using a field symbol simply change the value via the field symbol pointer
</MAP/S_TARGET_FIELDS>-CM_HIEID = 1.
</MAP/S_TARGET_FIELDS>-CM_MCATDIV = 1.
</MAP/S_TARGET_FIELDS>-CM_CDT1 = 1.
</MAP/S_TARGET_FIELDS>-CM_CDT2 = 1.
</MAP/S_TARGET_FIELDS>-CM_CDT3 = 1.

ENDLOOP.

LOOP AT IT_/MAP/S_TARGET_FIELDS INTO WA_/MAP/S_TARGET_FIELDS.
*Write horizonal line to screen report.
  WRITE:/ sy-uline.

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_/MAP/S_TARGET_FIELDS-MATERIAL, sy-vline,
  WA_/MAP/S_TARGET_FIELDS-RT_COLOR, sy-vline,
  WA_/MAP/S_TARGET_FIELDS-RT_SIZE, sy-vline,
  WA_/MAP/S_TARGET_FIELDS-RT_ASORT, sy-vline,
  WA_/MAP/S_TARGET_FIELDS-RT_ASRTVRS, sy-vline,
  WA_/MAP/S_TARGET_FIELDS-PLANT, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_/MAP/S_TARGET_FIELDS 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_/MAP/S_TARGET_FIELDS 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_/MAP/S_TARGET_FIELDS INTO WA_/MAP/S_TARGET_FIELDS.


*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 MATERIAL
CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT'
  EXPORTING
    input =                      WA_/MAP/S_TARGET_FIELDS-MATERIAL
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_/MAP/S_TARGET_FIELDS-MATERIAL.
WRITE:/ 'New Value:', ld_input.

*Conversion exit GJAHR, internal->external for field RT_SEASYR
CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT'
  EXPORTING
    input =                      WA_/MAP/S_TARGET_FIELDS-RT_SEASYR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_/MAP/S_TARGET_FIELDS-RT_SEASYR.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit CUNIT, internal->external for field BASE_UOM
CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT'
  EXPORTING
    input =                      WA_/MAP/S_TARGET_FIELDS-BASE_UOM
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_/MAP/S_TARGET_FIELDS-BASE_UOM.
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_/MAP/S_TARGET_FIELDS_STR, 
CM_HIEID TYPE STRING,
CM_MCATDIV TYPE STRING,
CM_CDT1 TYPE STRING,
CM_CDT2 TYPE STRING,
CM_CDT3 TYPE STRING,
MATERIAL TYPE STRING,
RT_COLOR TYPE STRING,
RT_SIZE TYPE STRING,
RT_ASORT TYPE STRING,
RT_ASRTVRS TYPE STRING,
PLANT TYPE STRING,
FISCVARNT TYPE STRING,
FISCPER TYPE STRING,
RT_MTFYVRN TYPE STRING,
RT_MTFPER TYPE STRING,
VERSION TYPE STRING,
RT_SEASON TYPE STRING,
RT_SEASYR TYPE STRING,
RT_SKUROLL TYPE STRING,
SALESORG TYPE STRING,
DISTR_CHAN TYPE STRING,
FISCPER3 TYPE STRING,
FISCYEAR TYPE STRING,
RT_MTFPER3 TYPE STRING,
RT_MTFYEAR TYPE STRING,
CM_SKU TYPE STRING,
LOC_CURRCY TYPE STRING,
BASE_UOM TYPE STRING,
CPTSTREBU TYPE STRING,
CPTSTREPV TYPE STRING,
RTTSTREST TYPE STRING,
RTTSTRESV TYPE STRING,
CPTSTISBU TYPE STRING,
CPTSTISPV TYPE STRING,
RTTSTISST TYPE STRING,
RTTSTISSV TYPE STRING,
CPTOTSTOBU TYPE STRING,
CPTOTSTOPV TYPE STRING,
RTTOTSTOST TYPE STRING,
RTTOTSTOSV TYPE STRING,
RTINCOBU TYPE STRING,
RTINCOPV TYPE STRING,
RTINCOST TYPE STRING,
RTINCOSV TYPE STRING,
RTMTRFBU TYPE STRING,
RTMTRFPV TYPE STRING,
RTMTRFST TYPE STRING,
RTMTRFSV TYPE STRING,
CPINCOINBU TYPE STRING,
CPINCOINPV TYPE STRING,
RTINCOINST TYPE STRING,
RTINCOINSV TYPE STRING,
CPSPRENBU TYPE STRING,
RTSPRENST TYPE STRING,
RTSPRENSV TYPE STRING,
RTGRPDVST TYPE STRING,
RTGRPDVSV TYPE STRING,
CPGRPDVBU TYPE STRING,
CPGRPDVPV TYPE STRING,
RTMAUPSV TYPE STRING,
RTSTSRPV TYPE STRING,
RTSTSRSV TYPE STRING,
RTSTSSPV TYPE STRING,
RTSTSSSV TYPE STRING,
RTRETVPV TYPE STRING,
RTRETVSV TYPE STRING,
RTGRPDVPV TYPE STRING,
RTAFSLPV TYPE STRING,
RTAFSLSV TYPE STRING,
RTRETVBU TYPE STRING,
RTSTSRBU TYPE STRING,
RTSTSSBU TYPE STRING,
CPBAINSABU TYPE STRING,
CPBAINSAPV TYPE STRING,
RTBAINSAST TYPE STRING,
RTBAINSASV TYPE STRING,
RTINSADIST TYPE STRING,
RTPRINSABU TYPE STRING,
RTPRINSAPV TYPE STRING,
RTPRINSAST TYPE STRING,
RTPRINSASV TYPE STRING,
RTMADPSV TYPE STRING,
RTEMPDCSV TYPE STRING,END OF T_EKKO_STR.
DATA: WA_/MAP/S_TARGET_FIELDS_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_/MAP/S_TARGET_FIELDS_STR-CM_HIEID sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-CM_MCATDIV sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-CM_CDT1 sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-CM_CDT2 sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-CM_CDT3 sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-MATERIAL sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RT_COLOR sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RT_SIZE sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RT_ASORT sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RT_ASRTVRS sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-PLANT sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-FISCVARNT sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-FISCPER sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RT_MTFYVRN sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RT_MTFPER sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-VERSION sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RT_SEASON sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RT_SEASYR sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RT_SKUROLL sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-SALESORG sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-DISTR_CHAN sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-FISCPER3 sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-FISCYEAR sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RT_MTFPER3 sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RT_MTFYEAR sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-CM_SKU sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-LOC_CURRCY sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-BASE_UOM sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-CPTSTREBU sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-CPTSTREPV sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTTSTREST sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTTSTRESV sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-CPTSTISBU sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-CPTSTISPV sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTTSTISST sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTTSTISSV sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-CPTOTSTOBU sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-CPTOTSTOPV sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTTOTSTOST sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTTOTSTOSV sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTINCOBU sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTINCOPV sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTINCOST sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTINCOSV sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTMTRFBU sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTMTRFPV sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTMTRFST sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTMTRFSV sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-CPINCOINBU sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-CPINCOINPV sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTINCOINST sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTINCOINSV sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-CPSPRENBU sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTSPRENST sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTSPRENSV sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTGRPDVST sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTGRPDVSV sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-CPGRPDVBU sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-CPGRPDVPV sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTMAUPSV sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTSTSRPV sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTSTSRSV sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTSTSSPV sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTSTSSSV sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTRETVPV sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTRETVSV sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTGRPDVPV sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTAFSLPV sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTAFSLSV sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTRETVBU sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTSTSRBU sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTSTSSBU sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-CPBAINSABU sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-CPBAINSAPV sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTBAINSAST sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTBAINSASV sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTINSADIST sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTPRINSABU sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTPRINSAPV sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTPRINSAST sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTPRINSASV sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTMADPSV sy-vline 
WA_/MAP/S_TARGET_FIELDS_STR-RTEMPDCSV sy-vline      INTO ld_text SEPARATED BY SPACE.

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