ABAP Select data from SAP table RFMSCCSOBASICV into internal table

Get Example source ABAP code based on a different SAP table
  

Below is a number of ABAP code snippets to demonstrate how to select data from SAP RFMSCCSOBASICV 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 RFMSCCSOBASICV. 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 RFMSCCSOBASICV 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_RFMSCCSOBASICV TYPE STANDARD TABLE OF RFMSCCSOBASICV,
      WA_RFMSCCSOBASICV TYPE RFMSCCSOBASICV,
      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: <RFMSCCSOBASICV> TYPE RFMSCCSOBASICV.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM RFMSCCSOBASICV
*  INTO TABLE @DATA(IT_RFMSCCSOBASICV2).
*--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_RFMSCCSOBASICV INDEX 1 INTO DATA(WA_RFMSCCSOBASICV2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_RFMSCCSOBASICV ASSIGNING <RFMSCCSOBASICV>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<RFMSCCSOBASICV>-MANDT = 1.
<RFMSCCSOBASICV>-VBELN = 1.
<RFMSCCSOBASICV>-POSNR = 1.
<RFMSCCSOBASICV>-KUNNR = 1.
<RFMSCCSOBASICV>-AUART = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_RFMSCCSOBASICV-VKORG, sy-vline,
WA_RFMSCCSOBASICV-VTWEG, sy-vline,
WA_RFMSCCSOBASICV-FSH_CANDATE, sy-vline,
WA_RFMSCCSOBASICV-FSH_SEASON_YEAR, sy-vline,
WA_RFMSCCSOBASICV-FSH_SEASON, sy-vline,
WA_RFMSCCSOBASICV-FSH_COLLECTION, sy-vline.
ENDLOOP. *Add any further fields from structure WA_RFMSCCSOBASICV 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_RFMSCCSOBASICV 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_RFMSCCSOBASICV INTO WA_RFMSCCSOBASICV. *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 VBELN CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_RFMSCCSOBASICV-VBELN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RFMSCCSOBASICV-VBELN.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit AUART, internal->external for field AUART CALL FUNCTION 'CONVERSION_EXIT_AUART_OUTPUT' EXPORTING input = WA_RFMSCCSOBASICV-AUART IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RFMSCCSOBASICV-AUART.
WRITE:/ 'New Value:', ld_input.

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

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

*Conversion exit ATINN, internal->external for field COLOR_ATINN CALL FUNCTION 'CONVERSION_EXIT_ATINN_OUTPUT' EXPORTING input = WA_RFMSCCSOBASICV-COLOR_ATINN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RFMSCCSOBASICV-COLOR_ATINN.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ATINN, internal->external for field SIZE1_ATINN CALL FUNCTION 'CONVERSION_EXIT_ATINN_OUTPUT' EXPORTING input = WA_RFMSCCSOBASICV-SIZE1_ATINN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RFMSCCSOBASICV-SIZE1_ATINN.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ATINN, internal->external for field SIZE2_ATINN CALL FUNCTION 'CONVERSION_EXIT_ATINN_OUTPUT' EXPORTING input = WA_RFMSCCSOBASICV-SIZE2_ATINN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RFMSCCSOBASICV-SIZE2_ATINN.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field SHIPTOPARTY CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_RFMSCCSOBASICV-SHIPTOPARTY IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RFMSCCSOBASICV-SHIPTOPARTY.
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_RFMSCCSOBASICV_STR,
MANDT TYPE STRING,
VBELN TYPE STRING,
POSNR TYPE STRING,
KUNNR TYPE STRING,
AUART TYPE STRING,
VKORG TYPE STRING,
VTWEG TYPE STRING,
FSH_CANDATE TYPE STRING,
FSH_SEASON_YEAR TYPE STRING,
FSH_SEASON TYPE STRING,
FSH_COLLECTION TYPE STRING,
FSH_THEME TYPE STRING,
SEASON_PRIORITY TYPE STRING,
SEASONCATEGORY TYPE STRING,
SEASONCATEGORY_TEXT TYPE STRING,
SEASONCOMPLETENESSINDICATOR TYPE STRING,
SEASONCOMPLETENESSINDICATORTXT TYPE STRING,
MATNR TYPE STRING,
KWMENG TYPE STRING,
VRKME TYPE STRING,
WERKS TYPE STRING,
SPART TYPE STRING,
SIZE1 TYPE STRING,
SIZE2 TYPE STRING,
COLOR TYPE STRING,
COLOR_ATINN TYPE STRING,
SIZE1_ATINN TYPE STRING,
SIZE2_ATINN TYPE STRING,
MTART TYPE STRING,
MATKL TYPE STRING,
ATTYP TYPE STRING,
SHIPTOPARTY TYPE STRING,
EDATU TYPE STRING,
SGT_RCAT TYPE STRING,
ATTYP_TEXT TYPE STRING,
MAKTX TYPE STRING,
MATKL_WGBEZ TYPE STRING,
COLOR_DESC TYPE STRING,
SIZE1_DESC TYPE STRING,
SIZE2_DESC TYPE STRING,
MTART_MTBEZ TYPE STRING,
VKORG_VTXTK TYPE STRING,
VTWEG_VTXTK TYPE STRING,
SPART_VTXTK TYPE STRING,
WERKS_NAME1 TYPE STRING,
KUNNR_NAME1 TYPE STRING,
SHIPTOPARTY_NAME1 TYPE STRING,
RFM_SEASON_TEXT TYPE STRING,
RFM_COLLECTION_TEXT TYPE STRING,
RFM_THEME_TEXT TYPE STRING,
AUART_BEZEI TYPE STRING,END OF T_EKKO_STR. DATA: WA_RFMSCCSOBASICV_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_RFMSCCSOBASICV_STR-MANDT sy-vline
WA_RFMSCCSOBASICV_STR-VBELN sy-vline
WA_RFMSCCSOBASICV_STR-POSNR sy-vline
WA_RFMSCCSOBASICV_STR-KUNNR sy-vline
WA_RFMSCCSOBASICV_STR-AUART sy-vline
WA_RFMSCCSOBASICV_STR-VKORG sy-vline
WA_RFMSCCSOBASICV_STR-VTWEG sy-vline
WA_RFMSCCSOBASICV_STR-FSH_CANDATE sy-vline
WA_RFMSCCSOBASICV_STR-FSH_SEASON_YEAR sy-vline
WA_RFMSCCSOBASICV_STR-FSH_SEASON sy-vline
WA_RFMSCCSOBASICV_STR-FSH_COLLECTION sy-vline
WA_RFMSCCSOBASICV_STR-FSH_THEME sy-vline
WA_RFMSCCSOBASICV_STR-SEASON_PRIORITY sy-vline
WA_RFMSCCSOBASICV_STR-SEASONCATEGORY sy-vline
WA_RFMSCCSOBASICV_STR-SEASONCATEGORY_TEXT sy-vline
WA_RFMSCCSOBASICV_STR-SEASONCOMPLETENESSINDICATOR sy-vline
WA_RFMSCCSOBASICV_STR-SEASONCOMPLETENESSINDICATORTXT sy-vline
WA_RFMSCCSOBASICV_STR-MATNR sy-vline
WA_RFMSCCSOBASICV_STR-KWMENG sy-vline
WA_RFMSCCSOBASICV_STR-VRKME sy-vline
WA_RFMSCCSOBASICV_STR-WERKS sy-vline
WA_RFMSCCSOBASICV_STR-SPART sy-vline
WA_RFMSCCSOBASICV_STR-SIZE1 sy-vline
WA_RFMSCCSOBASICV_STR-SIZE2 sy-vline
WA_RFMSCCSOBASICV_STR-COLOR sy-vline
WA_RFMSCCSOBASICV_STR-COLOR_ATINN sy-vline
WA_RFMSCCSOBASICV_STR-SIZE1_ATINN sy-vline
WA_RFMSCCSOBASICV_STR-SIZE2_ATINN sy-vline
WA_RFMSCCSOBASICV_STR-MTART sy-vline
WA_RFMSCCSOBASICV_STR-MATKL sy-vline
WA_RFMSCCSOBASICV_STR-ATTYP sy-vline
WA_RFMSCCSOBASICV_STR-SHIPTOPARTY sy-vline
WA_RFMSCCSOBASICV_STR-EDATU sy-vline
WA_RFMSCCSOBASICV_STR-SGT_RCAT sy-vline
WA_RFMSCCSOBASICV_STR-ATTYP_TEXT sy-vline
WA_RFMSCCSOBASICV_STR-MAKTX sy-vline
WA_RFMSCCSOBASICV_STR-MATKL_WGBEZ sy-vline
WA_RFMSCCSOBASICV_STR-COLOR_DESC sy-vline
WA_RFMSCCSOBASICV_STR-SIZE1_DESC sy-vline
WA_RFMSCCSOBASICV_STR-SIZE2_DESC sy-vline
WA_RFMSCCSOBASICV_STR-MTART_MTBEZ sy-vline
WA_RFMSCCSOBASICV_STR-VKORG_VTXTK sy-vline
WA_RFMSCCSOBASICV_STR-VTWEG_VTXTK sy-vline
WA_RFMSCCSOBASICV_STR-SPART_VTXTK sy-vline
WA_RFMSCCSOBASICV_STR-WERKS_NAME1 sy-vline
WA_RFMSCCSOBASICV_STR-KUNNR_NAME1 sy-vline
WA_RFMSCCSOBASICV_STR-SHIPTOPARTY_NAME1 sy-vline
WA_RFMSCCSOBASICV_STR-RFM_SEASON_TEXT sy-vline
WA_RFMSCCSOBASICV_STR-RFM_COLLECTION_TEXT sy-vline
WA_RFMSCCSOBASICV_STR-RFM_THEME_TEXT sy-vline
WA_RFMSCCSOBASICV_STR-AUART_BEZEI sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.