ABAP Select data from SAP table RNSTAT 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 RNSTAT 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 RNSTAT. 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 RNSTAT 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_RNSTAT TYPE STANDARD TABLE OF RNSTAT,
      WA_RNSTAT TYPE RNSTAT,
      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: <RNSTAT> TYPE RNSTAT.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM RNSTAT
*  INTO TABLE @DATA(IT_RNSTAT2).
*--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_RNSTAT INDEX 1 INTO DATA(WA_RNSTAT2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_RNSTAT ASSIGNING <RNSTAT>.

*To update a field value using a field symbol simply change the value via the field symbol pointer
<RNSTAT>-MANDT = 1.
<RNSTAT>-FATYP = 1.
<RNSTAT>-EINRI = 1.
<RNSTAT>-FACHR = 1.
<RNSTAT>-ORGID = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_RNSTAT-AUSBEGDT, sy-vline,
  WA_RNSTAT-AUSENDDT, sy-vline,
  WA_RNSTAT-VERBEGDT, sy-vline,
  WA_RNSTAT-VERENDDT, sy-vline,
  WA_RNSTAT-FILENAME, sy-vline,
  WA_RNSTAT-LINE_SIZE, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_RNSTAT 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_RNSTAT 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_RNSTAT INTO WA_RNSTAT.


*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 EINRI
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_RNSTAT-EINRI
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RNSTAT-EINRI.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit ALPHA, internal->external for field OEBIS
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_RNSTAT-OEBIS
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RNSTAT-OEBIS.
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_RNSTAT_STR, 
MANDT TYPE STRING,
FATYP TYPE STRING,
EINRI TYPE STRING,
FACHR TYPE STRING,
ORGID TYPE STRING,
AUSBEGDT TYPE STRING,
AUSENDDT TYPE STRING,
VERBEGDT TYPE STRING,
VERENDDT TYPE STRING,
FILENAME TYPE STRING,
LINE_SIZE TYPE STRING,
TITLE_LIN1 TYPE STRING,
TITLE_LIN2 TYPE STRING,
REPID TYPE STRING,
ULINE TYPE STRING,
STATGMANN TYPE STRING,
STATGWEIB TYPE STRING,
STATGUNB TYPE STRING,
STATFSTAT TYPE STRING,
STATFAMBU TYPE STRING,
STATFTSTA TYPE STRING,
STATNEUSE TYPE STRING,
STATUNTOE TYPE STRING,
STATSIFACH TYPE STRING,
STATSIPFLE TYPE STRING,
STATPROT TYPE STRING,
BEGMONAUS TYPE STRING,
BEGJAAUS TYPE STRING,
ENDMONAUS TYPE STRING,
ENDJAAUS TYPE STRING,
BEGMONVER TYPE STRING,
BEGJAVER TYPE STRING,
ENDMONVER TYPE STRING,
ENDJAVER TYPE STRING,
KZNLSU TYPE STRING,
STATID_VOR TYPE STRING,
STATID TYPE STRING,
ZETXT TYPE STRING,
DRUKZ TYPE STRING,
TARID TYPE STRING,
LEVON TYPE STRING,
LEBIS TYPE STRING,
LEOPT TYPE STRING,
LESIG TYPE STRING,
OEVON TYPE STRING,
OEBIS TYPE STRING,
OEOPT TYPE STRING,
OESIG TYPE STRING,
DIASTAT TYPE STRING,
OPSTAT TYPE STRING,
KHART TYPE STRING,
TRART TYPE STRING,
AUSBTH TYPE STRING,
AUSBDI TYPE STRING,
AUSBHE TYPE STRING,
AUSBGY TYPE STRING,
AUSBPF TYPE STRING,
AUSBKI TYPE STRING,
AUSBHF TYPE STRING,
AUSBML TYPE STRING,
AUSBMR TYPE STRING,
AUSBLO TYPE STRING,
AUSBOR TYPE STRING,
ARZNEI TYPE STRING,
MTGRCT TYPE STRING,
MTGREC TYPE STRING,
MTGRGK TYPE STRING,
MTGRMR TYPE STRING,
MTGRKA TYPE STRING,
MTGRSA TYPE STRING,
MTGRKB TYPE STRING,
MTGRKT TYPE STRING,
MTGRLB TYPE STRING,
MTGRSL TYPE STRING,
COR_MOD_PR TYPE STRING,
STASP TYPE STRING,
FPROT TYPE STRING,
MOD_ALL_PR TYPE STRING,
MOD_ENT_PR TYPE STRING,
MOD_ERW_PR TYPE STRING,
MOD_JUG_PR TYPE STRING,
MOD_KLK_PR TYPE STRING,
MOD_NGB_PR TYPE STRING,
MOD_OE_PPR TYPE STRING,
MOD_QU_PPR TYPE STRING,
MOD_PR_PPR TYPE STRING,
MOD_M1_PPR TYPE STRING,
MOD_M2_PPR TYPE STRING,
MOD_FP_PPR TYPE STRING,
ZIBETT_OFF TYPE STRING,
CODEP TYPE STRING,END OF T_EKKO_STR.
DATA: WA_RNSTAT_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_RNSTAT_STR-MANDT sy-vline 
WA_RNSTAT_STR-FATYP sy-vline 
WA_RNSTAT_STR-EINRI sy-vline 
WA_RNSTAT_STR-FACHR sy-vline 
WA_RNSTAT_STR-ORGID sy-vline 
WA_RNSTAT_STR-AUSBEGDT sy-vline 
WA_RNSTAT_STR-AUSENDDT sy-vline 
WA_RNSTAT_STR-VERBEGDT sy-vline 
WA_RNSTAT_STR-VERENDDT sy-vline 
WA_RNSTAT_STR-FILENAME sy-vline 
WA_RNSTAT_STR-LINE_SIZE sy-vline 
WA_RNSTAT_STR-TITLE_LIN1 sy-vline 
WA_RNSTAT_STR-TITLE_LIN2 sy-vline 
WA_RNSTAT_STR-REPID sy-vline 
WA_RNSTAT_STR-ULINE sy-vline 
WA_RNSTAT_STR-STATGMANN sy-vline 
WA_RNSTAT_STR-STATGWEIB sy-vline 
WA_RNSTAT_STR-STATGUNB sy-vline 
WA_RNSTAT_STR-STATFSTAT sy-vline 
WA_RNSTAT_STR-STATFAMBU sy-vline 
WA_RNSTAT_STR-STATFTSTA sy-vline 
WA_RNSTAT_STR-STATNEUSE sy-vline 
WA_RNSTAT_STR-STATUNTOE sy-vline 
WA_RNSTAT_STR-STATSIFACH sy-vline 
WA_RNSTAT_STR-STATSIPFLE sy-vline 
WA_RNSTAT_STR-STATPROT sy-vline 
WA_RNSTAT_STR-BEGMONAUS sy-vline 
WA_RNSTAT_STR-BEGJAAUS sy-vline 
WA_RNSTAT_STR-ENDMONAUS sy-vline 
WA_RNSTAT_STR-ENDJAAUS sy-vline 
WA_RNSTAT_STR-BEGMONVER sy-vline 
WA_RNSTAT_STR-BEGJAVER sy-vline 
WA_RNSTAT_STR-ENDMONVER sy-vline 
WA_RNSTAT_STR-ENDJAVER sy-vline 
WA_RNSTAT_STR-KZNLSU sy-vline 
WA_RNSTAT_STR-STATID_VOR sy-vline 
WA_RNSTAT_STR-STATID sy-vline 
WA_RNSTAT_STR-ZETXT sy-vline 
WA_RNSTAT_STR-DRUKZ sy-vline 
WA_RNSTAT_STR-TARID sy-vline 
WA_RNSTAT_STR-LEVON sy-vline 
WA_RNSTAT_STR-LEBIS sy-vline 
WA_RNSTAT_STR-LEOPT sy-vline 
WA_RNSTAT_STR-LESIG sy-vline 
WA_RNSTAT_STR-OEVON sy-vline 
WA_RNSTAT_STR-OEBIS sy-vline 
WA_RNSTAT_STR-OEOPT sy-vline 
WA_RNSTAT_STR-OESIG sy-vline 
WA_RNSTAT_STR-DIASTAT sy-vline 
WA_RNSTAT_STR-OPSTAT sy-vline 
WA_RNSTAT_STR-KHART sy-vline 
WA_RNSTAT_STR-TRART sy-vline 
WA_RNSTAT_STR-AUSBTH sy-vline 
WA_RNSTAT_STR-AUSBDI sy-vline 
WA_RNSTAT_STR-AUSBHE sy-vline 
WA_RNSTAT_STR-AUSBGY sy-vline 
WA_RNSTAT_STR-AUSBPF sy-vline 
WA_RNSTAT_STR-AUSBKI sy-vline 
WA_RNSTAT_STR-AUSBHF sy-vline 
WA_RNSTAT_STR-AUSBML sy-vline 
WA_RNSTAT_STR-AUSBMR sy-vline 
WA_RNSTAT_STR-AUSBLO sy-vline 
WA_RNSTAT_STR-AUSBOR sy-vline 
WA_RNSTAT_STR-ARZNEI sy-vline 
WA_RNSTAT_STR-MTGRCT sy-vline 
WA_RNSTAT_STR-MTGREC sy-vline 
WA_RNSTAT_STR-MTGRGK sy-vline 
WA_RNSTAT_STR-MTGRMR sy-vline 
WA_RNSTAT_STR-MTGRKA sy-vline 
WA_RNSTAT_STR-MTGRSA sy-vline 
WA_RNSTAT_STR-MTGRKB sy-vline 
WA_RNSTAT_STR-MTGRKT sy-vline 
WA_RNSTAT_STR-MTGRLB sy-vline 
WA_RNSTAT_STR-MTGRSL sy-vline 
WA_RNSTAT_STR-COR_MOD_PR sy-vline 
WA_RNSTAT_STR-STASP sy-vline 
WA_RNSTAT_STR-FPROT sy-vline 
WA_RNSTAT_STR-MOD_ALL_PR sy-vline 
WA_RNSTAT_STR-MOD_ENT_PR sy-vline 
WA_RNSTAT_STR-MOD_ERW_PR sy-vline 
WA_RNSTAT_STR-MOD_JUG_PR sy-vline 
WA_RNSTAT_STR-MOD_KLK_PR sy-vline 
WA_RNSTAT_STR-MOD_NGB_PR sy-vline 
WA_RNSTAT_STR-MOD_OE_PPR sy-vline 
WA_RNSTAT_STR-MOD_QU_PPR sy-vline 
WA_RNSTAT_STR-MOD_PR_PPR sy-vline 
WA_RNSTAT_STR-MOD_M1_PPR sy-vline 
WA_RNSTAT_STR-MOD_M2_PPR sy-vline 
WA_RNSTAT_STR-MOD_FP_PPR sy-vline 
WA_RNSTAT_STR-ZIBETT_OFF sy-vline 
WA_RNSTAT_STR-CODEP sy-vline      INTO ld_text SEPARATED BY SPACE.

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