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

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

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

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


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
</RTF/_S_SOURCE_FIELDS_DS>-BWVORG = 1.
</RTF/_S_SOURCE_FIELDS_DS>-MATNR = 1.
</RTF/_S_SOURCE_FIELDS_DS>-AKTNR = 1.
</RTF/_S_SOURCE_FIELDS_DS>-PROMOTIONID = 1.
</RTF/_S_SOURCE_FIELDS_DS>-BSTTYP = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_/RTF/_S_SOURCE_FIELDS_DS-BWBREL, sy-vline,
  WA_/RTF/_S_SOURCE_FIELDS_DS-BWART, sy-vline,
  WA_/RTF/_S_SOURCE_FIELDS_DS-GRUND, sy-vline,
  WA_/RTF/_S_SOURCE_FIELDS_DS-RECORDQUALIFIER, sy-vline,
  WA_/RTF/_S_SOURCE_FIELDS_DS-BUSINESSTYPE, sy-vline,
  WA_/RTF/_S_SOURCE_FIELDS_DS-ENDTIMESTAMP, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_/RTF/_S_SOURCE_FIELDS_DS 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_/RTF/_S_SOURCE_FIELDS_DS 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_/RTF/_S_SOURCE_FIELDS_DS INTO WA_/RTF/_S_SOURCE_FIELDS_DS.


*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_/RTF/_S_SOURCE_FIELDS_DS-MATNR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_/RTF/_S_SOURCE_FIELDS_DS-MATNR.
WRITE:/ 'New Value:', ld_input.

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

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

*Conversion exit CUNIT, internal->external for field VRKME
CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT'
  EXPORTING
    input =                      WA_/RTF/_S_SOURCE_FIELDS_DS-VRKME
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_/RTF/_S_SOURCE_FIELDS_DS-VRKME.
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_/RTF/_S_SOURCE_FIELDS_DS_STR, 
BWVORG TYPE STRING,
MATNR TYPE STRING,
AKTNR TYPE STRING,
PROMOTIONID TYPE STRING,
BSTTYP TYPE STRING,
BWBREL TYPE STRING,
BWART TYPE STRING,
GRUND TYPE STRING,
RECORDQUALIFIER TYPE STRING,
BUSINESSTYPE TYPE STRING,
ENDTIMESTAMP TYPE STRING,
TAXAMOUNT TYPE STRING,
TAXINCLUDEDFLAG TYPE STRING,
BWMNG TYPE STRING,
BWGEO TYPE STRING,
BWGVO TYPE STRING,
BWGVP TYPE STRING,
NOPOS TYPE STRING,
REDUCTIONAMOUNT TYPE STRING,
WAERS TYPE STRING,
HWAER TYPE STRING,
STORECURRENCY TYPE STRING,
TRANSCURRENCY TYPE STRING,
MEINS TYPE STRING,
LMEIN TYPE STRING,
SALESAMOUNT TYPE STRING,
DISTDISC TYPE STRING,
RETAILQUANTITY TYPE STRING,
COST TYPE STRING,
TENDERAMOUNT TYPE STRING,
NORMALSALESAMT TYPE STRING,
BASEQUANTITY TYPE STRING,
COMMAMOUNT TYPE STRING,
DISTTAX TYPE STRING,
DISTTENDER TYPE STRING,
TOTALSALESAMOUNT TYPE STRING,
TURNOVER TYPE STRING,
LINEITEMCOUNT TYPE STRING,
ACTUALAMOUNT TYPE STRING,
SHORTAMOUNT TYPE STRING,
OVERAMOUNT TYPE STRING,
REMOVALAMOUNT TYPE STRING,
REMOVALCOUNT TYPE STRING,
BANKAMOUNT TYPE STRING,
TRANSCNT TYPE STRING,
NOSALETRANSCNT TYPE STRING,
IMMEDIATEVOIDCNT TYPE STRING,
IMMEDIATEVOIDAMT TYPE STRING,
LINEITEMVOIDCNT TYPE STRING,
LINEITEMVOIDAMT TYPE STRING,
POSTVOIDCNT TYPE STRING,
POSTVOIDAMT TYPE STRING,
TERMINATIONCNT TYPE STRING,
TERMINATIONAMT TYPE STRING,
REPORTCNT TYPE STRING,
FAILEDLOGONCNT TYPE STRING,
SCANNEDITEMCNT TYPE STRING,
SCANNEDITEMAMT TYPE STRING,
OPENDEPARTMNTCNT TYPE STRING,
OPENDEPARTMNTAMT TYPE STRING,
CHECKSOVERCNT TYPE STRING,
CHECKSOVERAMT TYPE STRING,
DISCCOUNT TYPE STRING,
LOCKTIME TYPE STRING,
IDLETIME TYPE STRING,
LOGONTIME TYPE STRING,
RINGTIME TYPE STRING,
TAXCOUNT TYPE STRING,
TENDERCOUNT TYPE STRING,
AMOUNT TYPE STRING,
UNITCOUNT TYPE STRING,
EXTVALUATIONAMT TYPE STRING,
UNITSSHIPPEDCNT TYPE STRING,
REVERSALFLAG TYPE STRING,
RETL_ITEM_CAT TYPE STRING,
RETL_ITEM_SCAT TYPE STRING,
FKIMG TYPE STRING,
WAVWR TYPE STRING,
NETWR TYPE STRING,
BRTWR TYPE STRING,
MWSBP TYPE STRING,
ANZFKPOS TYPE STRING,
VRKME TYPE STRING,
UMVKZ TYPE STRING,
UMREZ TYPE STRING,
UMVKN TYPE STRING,
UMREN TYPE STRING,
KURSK_DAT TYPE STRING,
KURSK TYPE STRING,
WKURS TYPE STRING,
WAERK TYPE STRING,
DBWGEO TYPE STRING,
DBWMNG TYPE STRING,
BWGEOO TYPE STRING,
DATS TYPE STRING,
NOSCL TYPE STRING,
BUDAT TYPE STRING,
REDUCTIONAMOUNTN TYPE STRING,
REDUCTIONAMOUNTG TYPE STRING,END OF T_EKKO_STR.
DATA: WA_/RTF/_S_SOURCE_FIELDS_DS_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_/RTF/_S_SOURCE_FIELDS_DS_STR-BWVORG sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-MATNR sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-AKTNR sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-PROMOTIONID sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-BSTTYP sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-BWBREL sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-BWART sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-GRUND sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-RECORDQUALIFIER sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-BUSINESSTYPE sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-ENDTIMESTAMP sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-TAXAMOUNT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-TAXINCLUDEDFLAG sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-BWMNG sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-BWGEO sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-BWGVO sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-BWGVP sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-NOPOS sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-REDUCTIONAMOUNT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-WAERS sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-HWAER sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-STORECURRENCY sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-TRANSCURRENCY sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-MEINS sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-LMEIN sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-SALESAMOUNT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-DISTDISC sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-RETAILQUANTITY sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-COST sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-TENDERAMOUNT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-NORMALSALESAMT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-BASEQUANTITY sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-COMMAMOUNT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-DISTTAX sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-DISTTENDER sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-TOTALSALESAMOUNT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-TURNOVER sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-LINEITEMCOUNT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-ACTUALAMOUNT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-SHORTAMOUNT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-OVERAMOUNT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-REMOVALAMOUNT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-REMOVALCOUNT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-BANKAMOUNT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-TRANSCNT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-NOSALETRANSCNT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-IMMEDIATEVOIDCNT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-IMMEDIATEVOIDAMT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-LINEITEMVOIDCNT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-LINEITEMVOIDAMT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-POSTVOIDCNT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-POSTVOIDAMT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-TERMINATIONCNT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-TERMINATIONAMT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-REPORTCNT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-FAILEDLOGONCNT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-SCANNEDITEMCNT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-SCANNEDITEMAMT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-OPENDEPARTMNTCNT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-OPENDEPARTMNTAMT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-CHECKSOVERCNT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-CHECKSOVERAMT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-DISCCOUNT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-LOCKTIME sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-IDLETIME sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-LOGONTIME sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-RINGTIME sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-TAXCOUNT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-TENDERCOUNT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-AMOUNT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-UNITCOUNT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-EXTVALUATIONAMT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-UNITSSHIPPEDCNT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-REVERSALFLAG sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-RETL_ITEM_CAT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-RETL_ITEM_SCAT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-FKIMG sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-WAVWR sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-NETWR sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-BRTWR sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-MWSBP sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-ANZFKPOS sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-VRKME sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-UMVKZ sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-UMREZ sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-UMVKN sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-UMREN sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-KURSK_DAT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-KURSK sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-WKURS sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-WAERK sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-DBWGEO sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-DBWMNG sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-BWGEOO sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-DATS sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-NOSCL sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-BUDAT sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-REDUCTIONAMOUNTN sy-vline 
WA_/RTF/_S_SOURCE_FIELDS_DS_STR-REDUCTIONAMOUNTG sy-vline      INTO ld_text SEPARATED BY SPACE.

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