ABAP Select data from SAP table VBMTV 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 VBMTV 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 VBMTV. 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 VBMTV 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_VBMTV TYPE STANDARD TABLE OF VBMTV,
      WA_VBMTV TYPE VBMTV,
      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: <VBMTV> TYPE VBMTV.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM VBMTV
*  INTO TABLE @DATA(IT_VBMTV2).
*--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_VBMTV INDEX 1 INTO DATA(WA_VBMTV2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<VBMTV>-VBELN = 1.
<VBMTV>-POSNR = 1.
<VBMTV>-ETENR = 1.
<VBMTV>-SELKZ = 1.
<VBMTV>-ARKTX = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_VBMTV-AUART, sy-vline,
  WA_VBMTV-AUDAT, sy-vline,
  WA_VBMTV-BMENG, sy-vline,
  WA_VBMTV-BSTNK, sy-vline,
  WA_VBMTV-BSTKD, sy-vline,
  WA_VBMTV-CHARG, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_VBMTV 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_VBMTV 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_VBMTV INTO WA_VBMTV.


*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_VBMTV-VBELN
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_VBMTV-VBELN.
WRITE:/ 'New Value:', ld_input.

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

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

*Conversion exit EXCRT, internal->external for field KURSK
CALL FUNCTION 'CONVERSION_EXIT_EXCRT_OUTPUT'
  EXPORTING
    input =                      WA_VBMTV-KURSK
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_VBMTV-KURSK.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

*Conversion exit AUART, internal->external for field AUARA
CALL FUNCTION 'CONVERSION_EXIT_AUART_OUTPUT'
  EXPORTING
    input =                      WA_VBMTV-AUARA
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_VBMTV-AUARA.
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_VBMTV_STR, 
VBELN TYPE STRING,
POSNR TYPE STRING,
ETENR TYPE STRING,
SELKZ TYPE STRING,
ARKTX TYPE STRING,
AUART TYPE STRING,
AUDAT TYPE STRING,
BMENG TYPE STRING,
BSTNK TYPE STRING,
BSTKD TYPE STRING,
CHARG TYPE STRING,
DATAB TYPE STRING,
DATBI TYPE STRING,
EDATU TYPE STRING,
ERNAM TYPE STRING,
FAKSK TYPE STRING,
KUNNR TYPE STRING,
KURSK TYPE STRING,
KWMENG TYPE STRING,
LGORT TYPE STRING,
LFIMG TYPE STRING,
LIFSK TYPE STRING,
MATNR TYPE STRING,
MEINS TYPE STRING,
NAME1 TYPE STRING,
CBETR TYPE STRING,
CSEPR TYPE STRING,
CSEIN TYPE STRING,
CMEIN TYPE STRING,
CNETW TYPE STRING,
CWAER TYPE STRING,
NETPR TYPE STRING,
KPEIN TYPE STRING,
KMEIN TYPE STRING,
NETWR_AK TYPE STRING,
NETWR TYPE STRING,
SPART TYPE STRING,
STATUS TYPE STRING,
STATU TYPE STRING,
VKBUR TYPE STRING,
VKGRP TYPE STRING,
VKORG TYPE STRING,
VRKME TYPE STRING,
VSTEL TYPE STRING,
VTWEG TYPE STRING,
WADAT TYPE STRING,
WAERK TYPE STRING,
WERKS TYPE STRING,
WMENG TYPE STRING,
WLDAT TYPE STRING,
KTEXT TYPE STRING,
AUGRU TYPE STRING,
ABGRU TYPE STRING,
AWAHR TYPE STRING,
ADRNR TYPE STRING,
VBTYP TYPE STRING,
SHKZG TYPE STRING,
ACTIV TYPE STRING,
AUARA TYPE STRING,
PRSDT TYPE STRING,
KURSK_DAT TYPE STRING,
KURRF_DAT TYPE STRING,
KURST TYPE STRING,
SGT_RCAT TYPE STRING,
VLAUFZ TYPE STRING,
VLAUEZ TYPE STRING,
VLAUFK TYPE STRING,
VINSDAT TYPE STRING,
VABNDAT TYPE STRING,
VUNTDAT TYPE STRING,
VKUESCH TYPE STRING,
VAKTSCH TYPE STRING,
VEINDAT TYPE STRING,
VWUNDAT TYPE STRING,
VKUEPAR TYPE STRING,
VKUEGRU TYPE STRING,
VBELKUE TYPE STRING,
VBEDKUE TYPE STRING,
VDEMDAT TYPE STRING,
VASDA TYPE STRING,
AKTVT TYPE STRING,
BEZEI TYPE STRING,
DUMMY TYPE STRING,
ERDAT TYPE STRING,
ERZET TYPE STRING,
RWAER TYPE STRING,
FSH_SEASON_YEAR TYPE STRING,
FSH_SEASON TYPE STRING,
FSH_COLLECTION TYPE STRING,
FSH_THEME TYPE STRING,
FSH_CANDATE TYPE STRING,
FSH_VAS_REL TYPE STRING,
FSH_VAS_PRNT_ID TYPE STRING,
FSH_TRANSACTION TYPE STRING,
FSH_ITEM_GROUP TYPE STRING,
FSH_ITEM TYPE STRING,
FSH_VASREF TYPE STRING,
FSH_KVGR6 TYPE STRING,
FSH_KVGR7 TYPE STRING,
FSH_KVGR8 TYPE STRING,
FSH_KVGR9 TYPE STRING,
FSH_KVGR10 TYPE STRING,
FSH_REREG TYPE STRING,
WRF_CHARSTC1 TYPE STRING,
WRF_CHARSTC1_TXT TYPE STRING,
WRF_CHARSTC2 TYPE STRING,
WRF_CHARSTC2_TXT TYPE STRING,
WRF_CHARSTC3 TYPE STRING,
WRF_CHARSTC3_TXT TYPE STRING,END OF T_EKKO_STR.
DATA: WA_VBMTV_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_VBMTV_STR-VBELN sy-vline 
WA_VBMTV_STR-POSNR sy-vline 
WA_VBMTV_STR-ETENR sy-vline 
WA_VBMTV_STR-SELKZ sy-vline 
WA_VBMTV_STR-ARKTX sy-vline 
WA_VBMTV_STR-AUART sy-vline 
WA_VBMTV_STR-AUDAT sy-vline 
WA_VBMTV_STR-BMENG sy-vline 
WA_VBMTV_STR-BSTNK sy-vline 
WA_VBMTV_STR-BSTKD sy-vline 
WA_VBMTV_STR-CHARG sy-vline 
WA_VBMTV_STR-DATAB sy-vline 
WA_VBMTV_STR-DATBI sy-vline 
WA_VBMTV_STR-EDATU sy-vline 
WA_VBMTV_STR-ERNAM sy-vline 
WA_VBMTV_STR-FAKSK sy-vline 
WA_VBMTV_STR-KUNNR sy-vline 
WA_VBMTV_STR-KURSK sy-vline 
WA_VBMTV_STR-KWMENG sy-vline 
WA_VBMTV_STR-LGORT sy-vline 
WA_VBMTV_STR-LFIMG sy-vline 
WA_VBMTV_STR-LIFSK sy-vline 
WA_VBMTV_STR-MATNR sy-vline 
WA_VBMTV_STR-MEINS sy-vline 
WA_VBMTV_STR-NAME1 sy-vline 
WA_VBMTV_STR-CBETR sy-vline 
WA_VBMTV_STR-CSEPR sy-vline 
WA_VBMTV_STR-CSEIN sy-vline 
WA_VBMTV_STR-CMEIN sy-vline 
WA_VBMTV_STR-CNETW sy-vline 
WA_VBMTV_STR-CWAER sy-vline 
WA_VBMTV_STR-NETPR sy-vline 
WA_VBMTV_STR-KPEIN sy-vline 
WA_VBMTV_STR-KMEIN sy-vline 
WA_VBMTV_STR-NETWR_AK sy-vline 
WA_VBMTV_STR-NETWR sy-vline 
WA_VBMTV_STR-SPART sy-vline 
WA_VBMTV_STR-STATUS sy-vline 
WA_VBMTV_STR-STATU sy-vline 
WA_VBMTV_STR-VKBUR sy-vline 
WA_VBMTV_STR-VKGRP sy-vline 
WA_VBMTV_STR-VKORG sy-vline 
WA_VBMTV_STR-VRKME sy-vline 
WA_VBMTV_STR-VSTEL sy-vline 
WA_VBMTV_STR-VTWEG sy-vline 
WA_VBMTV_STR-WADAT sy-vline 
WA_VBMTV_STR-WAERK sy-vline 
WA_VBMTV_STR-WERKS sy-vline 
WA_VBMTV_STR-WMENG sy-vline 
WA_VBMTV_STR-WLDAT sy-vline 
WA_VBMTV_STR-KTEXT sy-vline 
WA_VBMTV_STR-AUGRU sy-vline 
WA_VBMTV_STR-ABGRU sy-vline 
WA_VBMTV_STR-AWAHR sy-vline 
WA_VBMTV_STR-ADRNR sy-vline 
WA_VBMTV_STR-VBTYP sy-vline 
WA_VBMTV_STR-SHKZG sy-vline 
WA_VBMTV_STR-ACTIV sy-vline 
WA_VBMTV_STR-AUARA sy-vline 
WA_VBMTV_STR-PRSDT sy-vline 
WA_VBMTV_STR-KURSK_DAT sy-vline 
WA_VBMTV_STR-KURRF_DAT sy-vline 
WA_VBMTV_STR-KURST sy-vline 
WA_VBMTV_STR-SGT_RCAT sy-vline 
WA_VBMTV_STR-VLAUFZ sy-vline 
WA_VBMTV_STR-VLAUEZ sy-vline 
WA_VBMTV_STR-VLAUFK sy-vline 
WA_VBMTV_STR-VINSDAT sy-vline 
WA_VBMTV_STR-VABNDAT sy-vline 
WA_VBMTV_STR-VUNTDAT sy-vline 
WA_VBMTV_STR-VKUESCH sy-vline 
WA_VBMTV_STR-VAKTSCH sy-vline 
WA_VBMTV_STR-VEINDAT sy-vline 
WA_VBMTV_STR-VWUNDAT sy-vline 
WA_VBMTV_STR-VKUEPAR sy-vline 
WA_VBMTV_STR-VKUEGRU sy-vline 
WA_VBMTV_STR-VBELKUE sy-vline 
WA_VBMTV_STR-VBEDKUE sy-vline 
WA_VBMTV_STR-VDEMDAT sy-vline 
WA_VBMTV_STR-VASDA sy-vline 
WA_VBMTV_STR-AKTVT sy-vline 
WA_VBMTV_STR-BEZEI sy-vline 
WA_VBMTV_STR-DUMMY sy-vline 
WA_VBMTV_STR-ERDAT sy-vline 
WA_VBMTV_STR-ERZET sy-vline 
WA_VBMTV_STR-RWAER sy-vline 
WA_VBMTV_STR-FSH_SEASON_YEAR sy-vline 
WA_VBMTV_STR-FSH_SEASON sy-vline 
WA_VBMTV_STR-FSH_COLLECTION sy-vline 
WA_VBMTV_STR-FSH_THEME sy-vline 
WA_VBMTV_STR-FSH_CANDATE sy-vline 
WA_VBMTV_STR-FSH_VAS_REL sy-vline 
WA_VBMTV_STR-FSH_VAS_PRNT_ID sy-vline 
WA_VBMTV_STR-FSH_TRANSACTION sy-vline 
WA_VBMTV_STR-FSH_ITEM_GROUP sy-vline 
WA_VBMTV_STR-FSH_ITEM sy-vline 
WA_VBMTV_STR-FSH_VASREF sy-vline 
WA_VBMTV_STR-FSH_KVGR6 sy-vline 
WA_VBMTV_STR-FSH_KVGR7 sy-vline 
WA_VBMTV_STR-FSH_KVGR8 sy-vline 
WA_VBMTV_STR-FSH_KVGR9 sy-vline 
WA_VBMTV_STR-FSH_KVGR10 sy-vline 
WA_VBMTV_STR-FSH_REREG sy-vline 
WA_VBMTV_STR-WRF_CHARSTC1 sy-vline 
WA_VBMTV_STR-WRF_CHARSTC1_TXT sy-vline 
WA_VBMTV_STR-WRF_CHARSTC2 sy-vline 
WA_VBMTV_STR-WRF_CHARSTC2_TXT sy-vline 
WA_VBMTV_STR-WRF_CHARSTC3 sy-vline 
WA_VBMTV_STR-WRF_CHARSTC3_TXT sy-vline      INTO ld_text SEPARATED BY SPACE.

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