ABAP Select data from SAP table CFG_SD_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 CFG_SD_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 CFG_SD_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 CFG_SD_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_CFG_SD_V_TVAK TYPE STANDARD TABLE OF CFG_SD_V_TVAK,
      WA_CFG_SD_V_TVAK TYPE CFG_SD_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: <CFG_SD_V_TVAK> TYPE CFG_SD_V_TVAK.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM CFG_SD_V_TVAK
*  INTO TABLE @DATA(IT_CFG_SD_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_CFG_SD_V_TVAK INDEX 1 INTO DATA(WA_CFG_SD_V_TVAK2).


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

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_CFG_SD_V_TVAK-NUMKI, sy-vline,
WA_CFG_SD_V_TVAK-NUMKE, sy-vline,
WA_CFG_SD_V_TVAK-INCPO, sy-vline,
WA_CFG_SD_V_TVAK-UEVOR, sy-vline,
WA_CFG_SD_V_TVAK-UMFNG, sy-vline,
WA_CFG_SD_V_TVAK-DABAR, sy-vline.
ENDLOOP. *Add any further fields from structure WA_CFG_SD_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_CFG_SD_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_CFG_SD_V_TVAK INTO WA_CFG_SD_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_CFG_SD_V_TVAK-AUART IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CFG_SD_V_TVAK-AUART.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AUART, internal->external for field AUARA CALL FUNCTION 'CONVERSION_EXIT_AUART_OUTPUT' EXPORTING input = WA_CFG_SD_V_TVAK-AUARA IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CFG_SD_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_CFG_SD_V_TVAK-AUFAK IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CFG_SD_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_CFG_SD_V_TVAK-AAUART1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CFG_SD_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_CFG_SD_V_TVAK-AAUART2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CFG_SD_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_CFG_SD_V_TVAK_STR,
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,
UMFNG TYPE STRING,
DABAR TYPE STRING,
FAKSK TYPE STRING,
LIFSK TYPE STRING,
TRVOG TYPE STRING,
SPAPO TYPE STRING,
DELCF TYPE STRING,
SPAPR TYPE STRING,
TXN08 TYPE STRING,
DATVO TYPE STRING,
AWAHR TYPE STRING,
VBTYP TYPE STRING,
BEZOB TYPE STRING,
TXTGR TYPE STRING,
KALVG TYPE STRING,
INFLS 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,
KSCHL_KO TYPE STRING,
EXMOD TYPE STRING,
EXDIA TYPE STRING,
PRBST TYPE STRING,
VBKLT TYPE STRING,
SCHEME_GRP TYPE STRING,
HNWGK TYPE STRING,
PUSH_GRP TYPE STRING,
ABRUF_PART TYPE STRING,
INCUP 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,
BEWAZ TYPE STRING,
PRE_DOC_DISP TYPE STRING,
VBVWE TYPE STRING,END OF T_EKKO_STR. DATA: WA_CFG_SD_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_CFG_SD_V_TVAK_STR-AUART sy-vline
WA_CFG_SD_V_TVAK_STR-KOPGR sy-vline
WA_CFG_SD_V_TVAK_STR-LFARV sy-vline
WA_CFG_SD_V_TVAK_STR-FKARV sy-vline
WA_CFG_SD_V_TVAK_STR-FKARA sy-vline
WA_CFG_SD_V_TVAK_STR-NUMKI sy-vline
WA_CFG_SD_V_TVAK_STR-NUMKE sy-vline
WA_CFG_SD_V_TVAK_STR-INCPO sy-vline
WA_CFG_SD_V_TVAK_STR-UEVOR sy-vline
WA_CFG_SD_V_TVAK_STR-UMFNG sy-vline
WA_CFG_SD_V_TVAK_STR-DABAR sy-vline
WA_CFG_SD_V_TVAK_STR-FAKSK sy-vline
WA_CFG_SD_V_TVAK_STR-LIFSK sy-vline
WA_CFG_SD_V_TVAK_STR-TRVOG sy-vline
WA_CFG_SD_V_TVAK_STR-SPAPO sy-vline
WA_CFG_SD_V_TVAK_STR-DELCF sy-vline
WA_CFG_SD_V_TVAK_STR-SPAPR sy-vline
WA_CFG_SD_V_TVAK_STR-TXN08 sy-vline
WA_CFG_SD_V_TVAK_STR-DATVO sy-vline
WA_CFG_SD_V_TVAK_STR-AWAHR sy-vline
WA_CFG_SD_V_TVAK_STR-VBTYP sy-vline
WA_CFG_SD_V_TVAK_STR-BEZOB sy-vline
WA_CFG_SD_V_TVAK_STR-TXTGR sy-vline
WA_CFG_SD_V_TVAK_STR-KALVG sy-vline
WA_CFG_SD_V_TVAK_STR-INFLS sy-vline
WA_CFG_SD_V_TVAK_STR-OBJART_HIN sy-vline
WA_CFG_SD_V_TVAK_STR-OBJART_VER sy-vline
WA_CFG_SD_V_TVAK_STR-HITYP_PR sy-vline
WA_CFG_SD_V_TVAK_STR-ABRVW sy-vline
WA_CFG_SD_V_TVAK_STR-ABDIS sy-vline
WA_CFG_SD_V_TVAK_STR-KPRGBZ sy-vline
WA_CFG_SD_V_TVAK_STR-PRDATV sy-vline
WA_CFG_SD_V_TVAK_STR-VLAUF sy-vline
WA_CFG_SD_V_TVAK_STR-GUEBGV sy-vline
WA_CFG_SD_V_TVAK_STR-VTERL sy-vline
WA_CFG_SD_V_TVAK_STR-HNWAG sy-vline
WA_CFG_SD_V_TVAK_STR-HNWKM sy-vline
WA_CFG_SD_V_TVAK_STR-STSMA sy-vline
WA_CFG_SD_V_TVAK_STR-LISOF sy-vline
WA_CFG_SD_V_TVAK_STR-BEZEI sy-vline
WA_CFG_SD_V_TVAK_STR-AUARA sy-vline
WA_CFG_SD_V_TVAK_STR-KORLI sy-vline
WA_CFG_SD_V_TVAK_STR-VPROF sy-vline
WA_CFG_SD_V_TVAK_STR-AUFAK sy-vline
WA_CFG_SD_V_TVAK_STR-DIAPA sy-vline
WA_CFG_SD_V_TVAK_STR-KSKPF sy-vline
WA_CFG_SD_V_TVAK_STR-KSPOS sy-vline
WA_CFG_SD_V_TVAK_STR-FKTKT sy-vline
WA_CFG_SD_V_TVAK_STR-EXCOK sy-vline
WA_CFG_SD_V_TVAK_STR-LIFSM sy-vline
WA_CFG_SD_V_TVAK_STR-KSCHL_KO sy-vline
WA_CFG_SD_V_TVAK_STR-EXMOD sy-vline
WA_CFG_SD_V_TVAK_STR-EXDIA sy-vline
WA_CFG_SD_V_TVAK_STR-PRBST sy-vline
WA_CFG_SD_V_TVAK_STR-VBKLT sy-vline
WA_CFG_SD_V_TVAK_STR-SCHEME_GRP sy-vline
WA_CFG_SD_V_TVAK_STR-HNWGK sy-vline
WA_CFG_SD_V_TVAK_STR-PUSH_GRP sy-vline
WA_CFG_SD_V_TVAK_STR-ABRUF_PART sy-vline
WA_CFG_SD_V_TVAK_STR-INCUP sy-vline
WA_CFG_SD_V_TVAK_STR-HNWK2 sy-vline
WA_CFG_SD_V_TVAK_STR-EXTNR_RMA sy-vline
WA_CFG_SD_V_TVAK_STR-VERLI sy-vline
WA_CFG_SD_V_TVAK_STR-VARIANT sy-vline
WA_CFG_SD_V_TVAK_STR-AAUART1 sy-vline
WA_CFG_SD_V_TVAK_STR-AAUART2 sy-vline
WA_CFG_SD_V_TVAK_STR-FAUPR sy-vline
WA_CFG_SD_V_TVAK_STR-BPROC sy-vline
WA_CFG_SD_V_TVAK_STR-ERMAT sy-vline
WA_CFG_SD_V_TVAK_STR-BSTVO sy-vline
WA_CFG_SD_V_TVAK_STR-BEWAZ sy-vline
WA_CFG_SD_V_TVAK_STR-PRE_DOC_DISP sy-vline
WA_CFG_SD_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.