ABAP Select data from SAP table KUAGV 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 KUAGV 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 KUAGV. 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 KUAGV 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_KUAGV TYPE STANDARD TABLE OF KUAGV,
      WA_KUAGV TYPE KUAGV,
      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: <KUAGV> TYPE KUAGV.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM KUAGV
*  INTO TABLE @DATA(IT_KUAGV2).
*--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_KUAGV INDEX 1 INTO DATA(WA_KUAGV2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<KUAGV>-KUNNR = 1.
<KUAGV>-NAME1 = 1.
<KUAGV>-NAME2 = 1.
<KUAGV>-STRAS = 1.
<KUAGV>-PFACH = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_KUAGV-PSTLZ, sy-vline,
  WA_KUAGV-PSTL2, sy-vline,
  WA_KUAGV-ORT01, sy-vline,
  WA_KUAGV-SPRAS, sy-vline,
  WA_KUAGV-LAND1, sy-vline,
  WA_KUAGV-BLAND, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_KUAGV 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_KUAGV 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_KUAGV INTO WA_KUAGV.


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

*Conversion exit ISOLA, internal->external for field SPRAS
CALL FUNCTION 'CONVERSION_EXIT_ISOLA_OUTPUT'
  EXPORTING
    input =                      WA_KUAGV-SPRAS
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KUAGV-SPRAS.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

*Conversion exit ID004, internal->external for field INCO2_KEY
CALL FUNCTION 'CONVERSION_EXIT_ID004_OUTPUT'
  EXPORTING
    input =                      WA_KUAGV-INCO2_KEY
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KUAGV-INCO2_KEY.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ID004, internal->external for field INCO3_KEY
CALL FUNCTION 'CONVERSION_EXIT_ID004_OUTPUT'
  EXPORTING
    input =                      WA_KUAGV-INCO3_KEY
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KUAGV-INCO3_KEY.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ID004, internal->external for field INCO4_KEY
CALL FUNCTION 'CONVERSION_EXIT_ID004_OUTPUT'
  EXPORTING
    input =                      WA_KUAGV-INCO4_KEY
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KUAGV-INCO4_KEY.
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_KUAGV_STR, 
KUNNR TYPE STRING,
NAME1 TYPE STRING,
NAME2 TYPE STRING,
STRAS TYPE STRING,
PFACH TYPE STRING,
PSTLZ TYPE STRING,
PSTL2 TYPE STRING,
ORT01 TYPE STRING,
SPRAS TYPE STRING,
LAND1 TYPE STRING,
BLAND TYPE STRING,
TELF1 TYPE STRING,
VERSG TYPE STRING,
AUFSD TYPE STRING,
KALKS TYPE STRING,
KDGRP TYPE STRING,
BZIRK TYPE STRING,
KONDA TYPE STRING,
PLTYP TYPE STRING,
INCO1 TYPE STRING,
INCO2 TYPE STRING,
AUTLF TYPE STRING,
ANTLF TYPE STRING,
KZAZU TYPE STRING,
CHSPL TYPE STRING,
LPRIO TYPE STRING,
WAERK TYPE STRING,
KURST TYPE STRING,
VSBED TYPE STRING,
KZTLF TYPE STRING,
AWAHR TYPE STRING,
LIFSD TYPE STRING,
VSORT TYPE STRING,
XCPDK TYPE STRING,
VKBUR TYPE STRING,
VKGRP TYPE STRING,
STCEG TYPE STRING,
STCEG_L TYPE STRING,
TAXK1 TYPE STRING,
TAXK2 TYPE STRING,
TAXK3 TYPE STRING,
TAXK4 TYPE STRING,
TAXK5 TYPE STRING,
TAXK6 TYPE STRING,
TAXK7 TYPE STRING,
TAXK8 TYPE STRING,
TAXK9 TYPE STRING,
VBUND TYPE STRING,
TXTPA TYPE STRING,
RDOFF TYPE STRING,
KVGR1 TYPE STRING,
KVGR2 TYPE STRING,
KVGR3 TYPE STRING,
KVGR4 TYPE STRING,
KVGR5 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,
FSH_VAS_CG TYPE STRING,
KDKG1 TYPE STRING,
KDKG2 TYPE STRING,
KDKG3 TYPE STRING,
KDKG4 TYPE STRING,
KDKG5 TYPE STRING,
ADRNR TYPE STRING,
ADRNP TYPE STRING,
ADDRESS_TYPE TYPE STRING,
DEAR5 TYPE STRING,
DEAR6 TYPE STRING,
UEBTO TYPE STRING,
UNTTO TYPE STRING,
UEBTK TYPE STRING,
PVKSM TYPE STRING,
BRSCH TYPE STRING,
CVP_XBLCK TYPE STRING,
INCOV TYPE STRING,
INCO2_L TYPE STRING,
INCO3_L TYPE STRING,
INCO2_KEY TYPE STRING,
INCO3_KEY TYPE STRING,
INCO4_KEY TYPE STRING,END OF T_EKKO_STR.
DATA: WA_KUAGV_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_KUAGV_STR-KUNNR sy-vline 
WA_KUAGV_STR-NAME1 sy-vline 
WA_KUAGV_STR-NAME2 sy-vline 
WA_KUAGV_STR-STRAS sy-vline 
WA_KUAGV_STR-PFACH sy-vline 
WA_KUAGV_STR-PSTLZ sy-vline 
WA_KUAGV_STR-PSTL2 sy-vline 
WA_KUAGV_STR-ORT01 sy-vline 
WA_KUAGV_STR-SPRAS sy-vline 
WA_KUAGV_STR-LAND1 sy-vline 
WA_KUAGV_STR-BLAND sy-vline 
WA_KUAGV_STR-TELF1 sy-vline 
WA_KUAGV_STR-VERSG sy-vline 
WA_KUAGV_STR-AUFSD sy-vline 
WA_KUAGV_STR-KALKS sy-vline 
WA_KUAGV_STR-KDGRP sy-vline 
WA_KUAGV_STR-BZIRK sy-vline 
WA_KUAGV_STR-KONDA sy-vline 
WA_KUAGV_STR-PLTYP sy-vline 
WA_KUAGV_STR-INCO1 sy-vline 
WA_KUAGV_STR-INCO2 sy-vline 
WA_KUAGV_STR-AUTLF sy-vline 
WA_KUAGV_STR-ANTLF sy-vline 
WA_KUAGV_STR-KZAZU sy-vline 
WA_KUAGV_STR-CHSPL sy-vline 
WA_KUAGV_STR-LPRIO sy-vline 
WA_KUAGV_STR-WAERK sy-vline 
WA_KUAGV_STR-KURST sy-vline 
WA_KUAGV_STR-VSBED sy-vline 
WA_KUAGV_STR-KZTLF sy-vline 
WA_KUAGV_STR-AWAHR sy-vline 
WA_KUAGV_STR-LIFSD sy-vline 
WA_KUAGV_STR-VSORT sy-vline 
WA_KUAGV_STR-XCPDK sy-vline 
WA_KUAGV_STR-VKBUR sy-vline 
WA_KUAGV_STR-VKGRP sy-vline 
WA_KUAGV_STR-STCEG sy-vline 
WA_KUAGV_STR-STCEG_L sy-vline 
WA_KUAGV_STR-TAXK1 sy-vline 
WA_KUAGV_STR-TAXK2 sy-vline 
WA_KUAGV_STR-TAXK3 sy-vline 
WA_KUAGV_STR-TAXK4 sy-vline 
WA_KUAGV_STR-TAXK5 sy-vline 
WA_KUAGV_STR-TAXK6 sy-vline 
WA_KUAGV_STR-TAXK7 sy-vline 
WA_KUAGV_STR-TAXK8 sy-vline 
WA_KUAGV_STR-TAXK9 sy-vline 
WA_KUAGV_STR-VBUND sy-vline 
WA_KUAGV_STR-TXTPA sy-vline 
WA_KUAGV_STR-RDOFF sy-vline 
WA_KUAGV_STR-KVGR1 sy-vline 
WA_KUAGV_STR-KVGR2 sy-vline 
WA_KUAGV_STR-KVGR3 sy-vline 
WA_KUAGV_STR-KVGR4 sy-vline 
WA_KUAGV_STR-KVGR5 sy-vline 
WA_KUAGV_STR-FSH_KVGR6 sy-vline 
WA_KUAGV_STR-FSH_KVGR7 sy-vline 
WA_KUAGV_STR-FSH_KVGR8 sy-vline 
WA_KUAGV_STR-FSH_KVGR9 sy-vline 
WA_KUAGV_STR-FSH_KVGR10 sy-vline 
WA_KUAGV_STR-FSH_REREG sy-vline 
WA_KUAGV_STR-FSH_VAS_CG sy-vline 
WA_KUAGV_STR-KDKG1 sy-vline 
WA_KUAGV_STR-KDKG2 sy-vline 
WA_KUAGV_STR-KDKG3 sy-vline 
WA_KUAGV_STR-KDKG4 sy-vline 
WA_KUAGV_STR-KDKG5 sy-vline 
WA_KUAGV_STR-ADRNR sy-vline 
WA_KUAGV_STR-ADRNP sy-vline 
WA_KUAGV_STR-ADDRESS_TYPE sy-vline 
WA_KUAGV_STR-DEAR5 sy-vline 
WA_KUAGV_STR-DEAR6 sy-vline 
WA_KUAGV_STR-UEBTO sy-vline 
WA_KUAGV_STR-UNTTO sy-vline 
WA_KUAGV_STR-UEBTK sy-vline 
WA_KUAGV_STR-PVKSM sy-vline 
WA_KUAGV_STR-BRSCH sy-vline 
WA_KUAGV_STR-CVP_XBLCK sy-vline 
WA_KUAGV_STR-INCOV sy-vline 
WA_KUAGV_STR-INCO2_L sy-vline 
WA_KUAGV_STR-INCO3_L sy-vline 
WA_KUAGV_STR-INCO2_KEY sy-vline 
WA_KUAGV_STR-INCO3_KEY sy-vline 
WA_KUAGV_STR-INCO4_KEY sy-vline      INTO ld_text SEPARATED BY SPACE.

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