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

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

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

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


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
</SCWM/TMFSCP>-MANDT = 1.
</SCWM/TMFSCP>-LGNUM = 1.
</SCWM/TMFSCP>-PLC = 1.
</SCWM/TMFSCP>-CP = 1.
</SCWM/TMFSCP>-CP_TYPE = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_/SCWM/TMFSCP-CP_CLARIFY, sy-vline,
  WA_/SCWM/TMFSCP-PLC_CLARIFY, sy-vline,
  WA_/SCWM/TMFSCP-NOCHK_CLARI, sy-vline,
  WA_/SCWM/TMFSCP-NOCHK_CLARI_CAPA, sy-vline,
  WA_/SCWM/TMFSCP-FLG_START, sy-vline,
  WA_/SCWM/TMFSCP-FLG_END, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_/SCWM/TMFSCP 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_/SCWM/TMFSCP 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_/SCWM/TMFSCP INTO WA_/SCWM/TMFSCP.


*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 HUID, internal->external for field HUIDENT
CALL FUNCTION 'CONVERSION_EXIT_HUID_OUTPUT'
  EXPORTING
    input =                      WA_/SCWM/TMFSCP-HUIDENT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_/SCWM/TMFSCP-HUIDENT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit MFSTS, internal->external for field TS_RCV
CALL FUNCTION 'CONVERSION_EXIT_MFSTS_OUTPUT'
  EXPORTING
    input =                      WA_/SCWM/TMFSCP-TS_RCV
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_/SCWM/TMFSCP-TS_RCV.
WRITE:/ 'New Value:', ld_input.

*Conversion exit MFSTS, internal->external for field TS_SND
CALL FUNCTION 'CONVERSION_EXIT_MFSTS_OUTPUT'
  EXPORTING
    input =                      WA_/SCWM/TMFSCP-TS_SND
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_/SCWM/TMFSCP-TS_SND.
WRITE:/ 'New Value:', ld_input.

*Conversion exit MFSTS, internal->external for field TS_RCV_L
CALL FUNCTION 'CONVERSION_EXIT_MFSTS_OUTPUT'
  EXPORTING
    input =                      WA_/SCWM/TMFSCP-TS_RCV_L
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_/SCWM/TMFSCP-TS_RCV_L.
WRITE:/ 'New Value:', ld_input.

*Conversion exit MFSTS, internal->external for field TS_SND_L
CALL FUNCTION 'CONVERSION_EXIT_MFSTS_OUTPUT'
  EXPORTING
    input =                      WA_/SCWM/TMFSCP-TS_SND_L
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_/SCWM/TMFSCP-TS_SND_L.
WRITE:/ 'New Value:', ld_input.

*Conversion exit TSTWH, internal->external for field TS_CNT_START
CALL FUNCTION 'CONVERSION_EXIT_TSTWH_OUTPUT'
  EXPORTING
    input =                      WA_/SCWM/TMFSCP-TS_CNT_START
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_/SCWM/TMFSCP-TS_CNT_START.
WRITE:/ 'New Value:', ld_input.

*Conversion exit MATN1, internal->external for field PMAT
CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT'
  EXPORTING
    input =                      WA_/SCWM/TMFSCP-PMAT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_/SCWM/TMFSCP-PMAT.
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_/SCWM/TMFSCP_STR, 
MANDT TYPE STRING,
LGNUM TYPE STRING,
PLC TYPE STRING,
CP TYPE STRING,
CP_TYPE TYPE STRING,
CP_CLARIFY TYPE STRING,
PLC_CLARIFY TYPE STRING,
NOCHK_CLARI TYPE STRING,
NOCHK_CLARI_CAPA TYPE STRING,
FLG_START TYPE STRING,
FLG_END TYPE STRING,
FLG_NIO TYPE STRING,
FLG_SCAN TYPE STRING,
LGPLA TYPE STRING,
NO_FOLLUP TYPE STRING,
FLG_HU_CLR_ERR TYPE STRING,
PROCTYPE TYPE STRING,
EXCCODE_CAPA TYPE STRING,
CAPACITY TYPE STRING,
CAPA_MODE TYPE STRING,
LGTYP_CLF TYPE STRING,
LGBER_CLF TYPE STRING,
LGPLA_CLF TYPE STRING,
PT_CLF TYPE STRING,
LOGGING TYPE STRING,
CP_STEP TYPE STRING,
HUIDENT TYPE STRING,
TELTYP_RCV TYPE STRING,
TELTYP_RCV_L TYPE STRING,
SN_RCV TYPE STRING,
SN_SND TYPE STRING,
TELE_RCV TYPE STRING,
TELE_SND TYPE STRING,
SN_RCV_L TYPE STRING,
SN_SND_L TYPE STRING,
TELE_RCV_L TYPE STRING,
TELE_SND_L TYPE STRING,
TS_RCV TYPE STRING,
TS_SND TYPE STRING,
TS_RCV_L TYPE STRING,
TS_SND_L TYPE STRING,
COUNT_RCV TYPE STRING,
COUNT_SND TYPE STRING,
TS_CNT_START TYPE STRING,
USER_RESET TYPE STRING,
TO_ERROR TYPE STRING,
PMAT TYPE STRING,
CPGRP TYPE STRING,
RETRY_WAIT TYPE STRING,END OF T_EKKO_STR.
DATA: WA_/SCWM/TMFSCP_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_/SCWM/TMFSCP_STR-MANDT sy-vline 
WA_/SCWM/TMFSCP_STR-LGNUM sy-vline 
WA_/SCWM/TMFSCP_STR-PLC sy-vline 
WA_/SCWM/TMFSCP_STR-CP sy-vline 
WA_/SCWM/TMFSCP_STR-CP_TYPE sy-vline 
WA_/SCWM/TMFSCP_STR-CP_CLARIFY sy-vline 
WA_/SCWM/TMFSCP_STR-PLC_CLARIFY sy-vline 
WA_/SCWM/TMFSCP_STR-NOCHK_CLARI sy-vline 
WA_/SCWM/TMFSCP_STR-NOCHK_CLARI_CAPA sy-vline 
WA_/SCWM/TMFSCP_STR-FLG_START sy-vline 
WA_/SCWM/TMFSCP_STR-FLG_END sy-vline 
WA_/SCWM/TMFSCP_STR-FLG_NIO sy-vline 
WA_/SCWM/TMFSCP_STR-FLG_SCAN sy-vline 
WA_/SCWM/TMFSCP_STR-LGPLA sy-vline 
WA_/SCWM/TMFSCP_STR-NO_FOLLUP sy-vline 
WA_/SCWM/TMFSCP_STR-FLG_HU_CLR_ERR sy-vline 
WA_/SCWM/TMFSCP_STR-PROCTYPE sy-vline 
WA_/SCWM/TMFSCP_STR-EXCCODE_CAPA sy-vline 
WA_/SCWM/TMFSCP_STR-CAPACITY sy-vline 
WA_/SCWM/TMFSCP_STR-CAPA_MODE sy-vline 
WA_/SCWM/TMFSCP_STR-LGTYP_CLF sy-vline 
WA_/SCWM/TMFSCP_STR-LGBER_CLF sy-vline 
WA_/SCWM/TMFSCP_STR-LGPLA_CLF sy-vline 
WA_/SCWM/TMFSCP_STR-PT_CLF sy-vline 
WA_/SCWM/TMFSCP_STR-LOGGING sy-vline 
WA_/SCWM/TMFSCP_STR-CP_STEP sy-vline 
WA_/SCWM/TMFSCP_STR-HUIDENT sy-vline 
WA_/SCWM/TMFSCP_STR-TELTYP_RCV sy-vline 
WA_/SCWM/TMFSCP_STR-TELTYP_RCV_L sy-vline 
WA_/SCWM/TMFSCP_STR-SN_RCV sy-vline 
WA_/SCWM/TMFSCP_STR-SN_SND sy-vline 
WA_/SCWM/TMFSCP_STR-TELE_RCV sy-vline 
WA_/SCWM/TMFSCP_STR-TELE_SND sy-vline 
WA_/SCWM/TMFSCP_STR-SN_RCV_L sy-vline 
WA_/SCWM/TMFSCP_STR-SN_SND_L sy-vline 
WA_/SCWM/TMFSCP_STR-TELE_RCV_L sy-vline 
WA_/SCWM/TMFSCP_STR-TELE_SND_L sy-vline 
WA_/SCWM/TMFSCP_STR-TS_RCV sy-vline 
WA_/SCWM/TMFSCP_STR-TS_SND sy-vline 
WA_/SCWM/TMFSCP_STR-TS_RCV_L sy-vline 
WA_/SCWM/TMFSCP_STR-TS_SND_L sy-vline 
WA_/SCWM/TMFSCP_STR-COUNT_RCV sy-vline 
WA_/SCWM/TMFSCP_STR-COUNT_SND sy-vline 
WA_/SCWM/TMFSCP_STR-TS_CNT_START sy-vline 
WA_/SCWM/TMFSCP_STR-USER_RESET sy-vline 
WA_/SCWM/TMFSCP_STR-TO_ERROR sy-vline 
WA_/SCWM/TMFSCP_STR-PMAT sy-vline 
WA_/SCWM/TMFSCP_STR-CPGRP sy-vline 
WA_/SCWM/TMFSCP_STR-RETRY_WAIT sy-vline      INTO ld_text SEPARATED BY SPACE.

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