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

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

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

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


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
</SCMTMS/S_FUB_FU>-FU_NR = 1.
</SCMTMS/S_FUB_FU>-FU_KEY = 1.
</SCMTMS/S_FUB_FU>-FU_KEY_PCS = 1.
</SCMTMS/S_FUB_FU>-FU_PCS_NO_STOP_TAKEOVER = 1.
</SCMTMS/S_FUB_FU>-BO_ROOT_KEY = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_/SCMTMS/S_FUB_FU-KEEP_IN_PLANNING, sy-vline,
  WA_/SCMTMS/S_FUB_FU-EMPTY_FU_ALLOWED, sy-vline,
  WA_/SCMTMS/S_FUB_FU-UPDATE_ALLOWED, sy-vline,
  WA_/SCMTMS/S_FUB_FU-INITIAL_FU, sy-vline,
  WA_/SCMTMS/S_FUB_FU-IGNORE_STAGES, sy-vline,
  WA_/SCMTMS/S_FUB_FU-FUBR_KEY, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_/SCMTMS/S_FUB_FU 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_/SCMTMS/S_FUB_FU 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_/SCMTMS/S_FUB_FU INTO WA_/SCMTMS/S_FUB_FU.


*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 FUBRU, internal->external for field FUBR_KEY
CALL FUNCTION 'CONVERSION_EXIT_FUBRU_OUTPUT'
  EXPORTING
    input =                      WA_/SCMTMS/S_FUB_FU-FUBR_KEY
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_/SCMTMS/S_FUB_FU-FUBR_KEY.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit QTYRN, internal->external for field BASE_QTY
CALL FUNCTION 'CONVERSION_EXIT_QTYRN_OUTPUT'
  EXPORTING
    input =                      WA_/SCMTMS/S_FUB_FU-BASE_QTY
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_/SCMTMS/S_FUB_FU-BASE_QTY.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit ALPHA, internal->external for field LOGSYS
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_/SCMTMS/S_FUB_FU-LOGSYS
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_/SCMTMS/S_FUB_FU-LOGSYS.
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_/SCMTMS/S_FUB_FU_STR, 
FU_NR TYPE STRING,
FU_KEY TYPE STRING,
FU_KEY_PCS TYPE STRING,
FU_PCS_NO_STOP_TAKEOVER TYPE STRING,
BO_ROOT_KEY TYPE STRING,
KEEP_IN_PLANNING TYPE STRING,
EMPTY_FU_ALLOWED TYPE STRING,
UPDATE_ALLOWED TYPE STRING,
INITIAL_FU TYPE STRING,
IGNORE_STAGES TYPE STRING,
FUBR_KEY TYPE STRING,
BASE_UOM TYPE STRING,
BASE_QTY TYPE STRING,
FU_IS_FULL TYPE STRING,
POSSIBLE_TARGET TYPE STRING,
FUB_FIXATION TYPE STRING,
FU_FIXED TYPE STRING,
FU_EXEC_STATUS TYPE STRING,
FU_PLAN_STATUS TYPE STRING,
FU_SEPARATE_PAL TYPE STRING,
NR_OF_ITEMS TYPE STRING,
ACS_RELEVANT TYPE STRING,
INCOMP_ERROR TYPE STRING,
TOTAL_QTYS TYPE STRING,
FU_ITEMS TYPE STRING,
FU_STOPS TYPE STRING,
FUB_MOD_STATUS TYPE STRING,
INCOMP_VALUES TYPE STRING,
CHANGED_BY_IL TYPE STRING,
STOP_STRING TYPE STRING,
TIME_STRING TYPE STRING,
CONSOL_LEVEL TYPE STRING,
INCOMP_STRING TYPE STRING,
EQUIPMENT TYPE STRING,
EQUI_GROUP TYPE STRING,
EQUI_TYPE TYPE STRING,
GROUP_CAT TYPE STRING,
EXEC_DOC_KEY TYPE STRING,
FUB_ITEM_COMPAT_GRP TYPE STRING,
FUB_EMPTY_PROV_RET TYPE STRING,
HC_TRQ TYPE STRING,
TSP_KEY TYPE STRING,
INC_CLASS_CODE TYPE STRING,
TRANSP_SERV_LEVEL_CODE TYPE STRING,
MOT TYPE STRING,
SHIPPING_TYPE TYPE STRING,
DG_ADR_NO_EXEMPTION TYPE STRING,
FUB_EMPTY_PROV_RET TYPE STRING,
EMPTY_BY_ORD_PARTY TYPE STRING,
DIRECT_EWM_ACTIVE TYPE STRING,
BLOCK TYPE STRING,
PUDL_SPECIFICATION TYPE STRING,
LGLC_LIC_IND TYPE STRING,
WM_LOGSYS TYPE STRING,
WM_WH_NUMBER TYPE STRING,
WM_WH_CAT TYPE STRING,
LOGSYS TYPE STRING,
BASE_BTD_TCO TYPE STRING,
DLV_RETURN TYPE STRING,
DLV_FU_BTD_TCO TYPE STRING,
DT_ORD_COMB_IND TYPE STRING,
QTY_DTM_FIXED TYPE STRING,
PRD_TRANSP_GRP TYPE STRING,
STOP_STRING TYPE STRING,END OF T_EKKO_STR.
DATA: WA_/SCMTMS/S_FUB_FU_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_/SCMTMS/S_FUB_FU_STR-FU_NR sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-FU_KEY sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-FU_KEY_PCS sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-FU_PCS_NO_STOP_TAKEOVER sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-BO_ROOT_KEY sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-KEEP_IN_PLANNING sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-EMPTY_FU_ALLOWED sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-UPDATE_ALLOWED sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-INITIAL_FU sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-IGNORE_STAGES sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-FUBR_KEY sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-BASE_UOM sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-BASE_QTY sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-FU_IS_FULL sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-POSSIBLE_TARGET sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-FUB_FIXATION sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-FU_FIXED sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-FU_EXEC_STATUS sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-FU_PLAN_STATUS sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-FU_SEPARATE_PAL sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-NR_OF_ITEMS sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-ACS_RELEVANT sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-INCOMP_ERROR sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-TOTAL_QTYS sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-FU_ITEMS sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-FU_STOPS sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-FUB_MOD_STATUS sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-INCOMP_VALUES sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-CHANGED_BY_IL sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-STOP_STRING sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-TIME_STRING sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-CONSOL_LEVEL sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-INCOMP_STRING sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-EQUIPMENT sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-EQUI_GROUP sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-EQUI_TYPE sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-GROUP_CAT sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-EXEC_DOC_KEY sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-FUB_ITEM_COMPAT_GRP sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-FUB_EMPTY_PROV_RET sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-HC_TRQ sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-TSP_KEY sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-INC_CLASS_CODE sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-TRANSP_SERV_LEVEL_CODE sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-MOT sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-SHIPPING_TYPE sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-DG_ADR_NO_EXEMPTION sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-FUB_EMPTY_PROV_RET sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-EMPTY_BY_ORD_PARTY sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-DIRECT_EWM_ACTIVE sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-BLOCK sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-PUDL_SPECIFICATION sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-LGLC_LIC_IND sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-WM_LOGSYS sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-WM_WH_NUMBER sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-WM_WH_CAT sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-LOGSYS sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-BASE_BTD_TCO sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-DLV_RETURN sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-DLV_FU_BTD_TCO sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-DT_ORD_COMB_IND sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-QTY_DTM_FIXED sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-PRD_TRANSP_GRP sy-vline 
WA_/SCMTMS/S_FUB_FU_STR-STOP_STRING sy-vline      INTO ld_text SEPARATED BY SPACE.

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