ABAP Select data from SAP table V_TVAK 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 V_TVAK 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 V_TVAK. 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 V_TVAK 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_V_TVAK TYPE STANDARD TABLE OF V_TVAK,
      WA_V_TVAK TYPE V_TVAK,
      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: <V_TVAK> TYPE V_TVAK.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM V_TVAK
*  INTO TABLE @DATA(IT_V_TVAK2).
*--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_V_TVAK INDEX 1 INTO DATA(WA_V_TVAK2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_V_TVAK ASSIGNING <V_TVAK>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<V_TVAK>-MANDT = 1.
<V_TVAK>-AUART = 1.
<V_TVAK>-KOPGR = 1.
<V_TVAK>-LFARV = 1.
<V_TVAK>-FKARV = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_V_TVAK-FKARA, sy-vline,
WA_V_TVAK-NUMKI, sy-vline,
WA_V_TVAK-NUMKE, sy-vline,
WA_V_TVAK-INCPO, sy-vline,
WA_V_TVAK-UEVOR, sy-vline,
WA_V_TVAK-AUGRP, sy-vline.
ENDLOOP. *Add any further fields from structure WA_V_TVAK 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_V_TVAK 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_V_TVAK INTO WA_V_TVAK. *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 AUART, internal->external for field AUART CALL FUNCTION 'CONVERSION_EXIT_AUART_OUTPUT' EXPORTING input = WA_V_TVAK-AUART IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_V_TVAK-AUART.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

*Conversion exit AUART, internal->external for field AAUART2 CALL FUNCTION 'CONVERSION_EXIT_AUART_OUTPUT' EXPORTING input = WA_V_TVAK-AAUART2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_V_TVAK-AAUART2.
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_V_TVAK_STR,
MANDT TYPE STRING,
AUART TYPE STRING,
KOPGR TYPE STRING,
LFARV TYPE STRING,
FKARV TYPE STRING,
FKARA TYPE STRING,
NUMKI TYPE STRING,
NUMKE TYPE STRING,
INCPO TYPE STRING,
UEVOR TYPE STRING,
AUGRP TYPE STRING,
UMFNG TYPE STRING,
DABAR TYPE STRING,
PARGR TYPE STRING,
FAKSK TYPE STRING,
LIFSK TYPE STRING,
TRVOG TYPE STRING,
SPAPO TYPE STRING,
DELCF TYPE STRING,
SPAPR TYPE STRING,
VSTRM TYPE STRING,
TRTRM TYPE STRING,
TXN08 TYPE STRING,
DIAFE TYPE STRING,
FELDK TYPE STRING,
DATVO TYPE STRING,
AWAHR TYPE STRING,
VBTYP TYPE STRING,
VSBED TYPE STRING,
BEZOB TYPE STRING,
TXTGR TYPE STRING,
KALVG TYPE STRING,
ERNAM TYPE STRING,
FEHGR TYPE STRING,
INFLS TYPE STRING,
KUNN0 TYPE STRING,
KLIMP TYPE STRING,
KALSM TYPE STRING,
KAPPL TYPE STRING,
KSCHL TYPE STRING,
SPERR TYPE STRING,
STGAK TYPE STRING,
KALSU TYPE STRING,
KALLI TYPE STRING,
KALAU TYPE STRING,
FKAIV TYPE STRING,
CMGRA TYPE STRING,
OBJART_HIN TYPE STRING,
OBJART_VER TYPE STRING,
HITYP_PR TYPE STRING,
ABRVW TYPE STRING,
ABDIS TYPE STRING,
KPRGBZ TYPE STRING,
PRDATV TYPE STRING,
VLAUF TYPE STRING,
GUEBGV TYPE STRING,
VTERL TYPE STRING,
HNWAG TYPE STRING,
HNWKM TYPE STRING,
STSMA TYPE STRING,
LISOF TYPE STRING,
BEZEI TYPE STRING,
AUARA TYPE STRING,
KORLI TYPE STRING,
VPROF TYPE STRING,
AUFAK TYPE STRING,
DIAPA TYPE STRING,
KSKPF TYPE STRING,
KSPOS TYPE STRING,
FKTKT TYPE STRING,
EXCOK TYPE STRING,
LIFSM TYPE STRING,
FPART TYPE STRING,
KSCHL_KO TYPE STRING,
EXMOD TYPE STRING,
EXDIA TYPE STRING,
PRBST TYPE STRING,
RPART TYPE STRING,
VBKLT TYPE STRING,
SCHEME_GRP TYPE STRING,
HNWGK TYPE STRING,
PUSH_GRP TYPE STRING,
ABRUF_PART TYPE STRING,
INCUP TYPE STRING,
BABSS TYPE STRING,
CCPGR TYPE STRING,
HNWK2 TYPE STRING,
EXTNR_RMA TYPE STRING,
VERLI TYPE STRING,
VARIANT TYPE STRING,
AAUART1 TYPE STRING,
AAUART2 TYPE STRING,
FAUPR TYPE STRING,
BPROC TYPE STRING,
ERMAT TYPE STRING,
BSTVO TYPE STRING,
RDP_PROFILE TYPE STRING,
BEWAZ TYPE STRING,
PRE_DOC_DISP TYPE STRING,
VBVWE TYPE STRING,END OF T_EKKO_STR. DATA: WA_V_TVAK_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_V_TVAK_STR-MANDT sy-vline
WA_V_TVAK_STR-AUART sy-vline
WA_V_TVAK_STR-KOPGR sy-vline
WA_V_TVAK_STR-LFARV sy-vline
WA_V_TVAK_STR-FKARV sy-vline
WA_V_TVAK_STR-FKARA sy-vline
WA_V_TVAK_STR-NUMKI sy-vline
WA_V_TVAK_STR-NUMKE sy-vline
WA_V_TVAK_STR-INCPO sy-vline
WA_V_TVAK_STR-UEVOR sy-vline
WA_V_TVAK_STR-AUGRP sy-vline
WA_V_TVAK_STR-UMFNG sy-vline
WA_V_TVAK_STR-DABAR sy-vline
WA_V_TVAK_STR-PARGR sy-vline
WA_V_TVAK_STR-FAKSK sy-vline
WA_V_TVAK_STR-LIFSK sy-vline
WA_V_TVAK_STR-TRVOG sy-vline
WA_V_TVAK_STR-SPAPO sy-vline
WA_V_TVAK_STR-DELCF sy-vline
WA_V_TVAK_STR-SPAPR sy-vline
WA_V_TVAK_STR-VSTRM sy-vline
WA_V_TVAK_STR-TRTRM sy-vline
WA_V_TVAK_STR-TXN08 sy-vline
WA_V_TVAK_STR-DIAFE sy-vline
WA_V_TVAK_STR-FELDK sy-vline
WA_V_TVAK_STR-DATVO sy-vline
WA_V_TVAK_STR-AWAHR sy-vline
WA_V_TVAK_STR-VBTYP sy-vline
WA_V_TVAK_STR-VSBED sy-vline
WA_V_TVAK_STR-BEZOB sy-vline
WA_V_TVAK_STR-TXTGR sy-vline
WA_V_TVAK_STR-KALVG sy-vline
WA_V_TVAK_STR-ERNAM sy-vline
WA_V_TVAK_STR-FEHGR sy-vline
WA_V_TVAK_STR-INFLS sy-vline
WA_V_TVAK_STR-KUNN0 sy-vline
WA_V_TVAK_STR-KLIMP sy-vline
WA_V_TVAK_STR-KALSM sy-vline
WA_V_TVAK_STR-KAPPL sy-vline
WA_V_TVAK_STR-KSCHL sy-vline
WA_V_TVAK_STR-SPERR sy-vline
WA_V_TVAK_STR-STGAK sy-vline
WA_V_TVAK_STR-KALSU sy-vline
WA_V_TVAK_STR-KALLI sy-vline
WA_V_TVAK_STR-KALAU sy-vline
WA_V_TVAK_STR-FKAIV sy-vline
WA_V_TVAK_STR-CMGRA sy-vline
WA_V_TVAK_STR-OBJART_HIN sy-vline
WA_V_TVAK_STR-OBJART_VER sy-vline
WA_V_TVAK_STR-HITYP_PR sy-vline
WA_V_TVAK_STR-ABRVW sy-vline
WA_V_TVAK_STR-ABDIS sy-vline
WA_V_TVAK_STR-KPRGBZ sy-vline
WA_V_TVAK_STR-PRDATV sy-vline
WA_V_TVAK_STR-VLAUF sy-vline
WA_V_TVAK_STR-GUEBGV sy-vline
WA_V_TVAK_STR-VTERL sy-vline
WA_V_TVAK_STR-HNWAG sy-vline
WA_V_TVAK_STR-HNWKM sy-vline
WA_V_TVAK_STR-STSMA sy-vline
WA_V_TVAK_STR-LISOF sy-vline
WA_V_TVAK_STR-BEZEI sy-vline
WA_V_TVAK_STR-AUARA sy-vline
WA_V_TVAK_STR-KORLI sy-vline
WA_V_TVAK_STR-VPROF sy-vline
WA_V_TVAK_STR-AUFAK sy-vline
WA_V_TVAK_STR-DIAPA sy-vline
WA_V_TVAK_STR-KSKPF sy-vline
WA_V_TVAK_STR-KSPOS sy-vline
WA_V_TVAK_STR-FKTKT sy-vline
WA_V_TVAK_STR-EXCOK sy-vline
WA_V_TVAK_STR-LIFSM sy-vline
WA_V_TVAK_STR-FPART sy-vline
WA_V_TVAK_STR-KSCHL_KO sy-vline
WA_V_TVAK_STR-EXMOD sy-vline
WA_V_TVAK_STR-EXDIA sy-vline
WA_V_TVAK_STR-PRBST sy-vline
WA_V_TVAK_STR-RPART sy-vline
WA_V_TVAK_STR-VBKLT sy-vline
WA_V_TVAK_STR-SCHEME_GRP sy-vline
WA_V_TVAK_STR-HNWGK sy-vline
WA_V_TVAK_STR-PUSH_GRP sy-vline
WA_V_TVAK_STR-ABRUF_PART sy-vline
WA_V_TVAK_STR-INCUP sy-vline
WA_V_TVAK_STR-BABSS sy-vline
WA_V_TVAK_STR-CCPGR sy-vline
WA_V_TVAK_STR-HNWK2 sy-vline
WA_V_TVAK_STR-EXTNR_RMA sy-vline
WA_V_TVAK_STR-VERLI sy-vline
WA_V_TVAK_STR-VARIANT sy-vline
WA_V_TVAK_STR-AAUART1 sy-vline
WA_V_TVAK_STR-AAUART2 sy-vline
WA_V_TVAK_STR-FAUPR sy-vline
WA_V_TVAK_STR-BPROC sy-vline
WA_V_TVAK_STR-ERMAT sy-vline
WA_V_TVAK_STR-BSTVO sy-vline
WA_V_TVAK_STR-RDP_PROFILE sy-vline
WA_V_TVAK_STR-BEWAZ sy-vline
WA_V_TVAK_STR-PRE_DOC_DISP sy-vline
WA_V_TVAK_STR-VBVWE sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.