ABAP Select data from SAP table /KYK/IS_RKKBALV1 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 /KYK/IS_RKKBALV1 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 /KYK/IS_RKKBALV1. 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 /KYK/IS_RKKBALV1 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_/KYK/IS_RKKBALV1 TYPE STANDARD TABLE OF /KYK/IS_RKKBALV1,
      WA_/KYK/IS_RKKBALV1 TYPE /KYK/IS_RKKBALV1,
      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: </KYK/IS_RKKBALV1> TYPE /KYK/IS_RKKBALV1.

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

SELECT *
*restrict ABAP select to first 10 rows
 UP TO 10 ROWS      
  FROM /KYK/IS_RKKBALV1
  INTO TABLE IT_/KYK/IS_RKKBALV1.

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM /KYK/IS_RKKBALV1
*  INTO TABLE @DATA(IT_/KYK/IS_RKKBALV12).
*--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_/KYK/IS_RKKBALV1 INDEX 1 INTO DATA(WA_/KYK/IS_RKKBALV12).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_/KYK/IS_RKKBALV1 ASSIGNING </KYK/IS_RKKBALV1>.

*To update a field value using a field symbol simply change the value via the field symbol pointer
</KYK/IS_RKKBALV1>-AUFNR = 1.
</KYK/IS_RKKBALV1>-MATNR = 1.
</KYK/IS_RKKBALV1>-PLANBEL_G = 1.
</KYK/IS_RKKBALV1>-ISTBEL_G = 1.
</KYK/IS_RKKBALV1>-WAERS = 1.

ENDLOOP.

LOOP AT IT_/KYK/IS_RKKBALV1 INTO WA_/KYK/IS_RKKBALV1.
*Write horizonal line to screen report.
  WRITE:/ sy-uline.

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_/KYK/IS_RKKBALV1-AUTYP, sy-vline,
  WA_/KYK/IS_RKKBALV1-PLANMENGE, sy-vline,
  WA_/KYK/IS_RKKBALV1-ISTMENGE, sy-vline,
  WA_/KYK/IS_RKKBALV1-PLIS_KOST_A, sy-vline,
  WA_/KYK/IS_RKKBALV1-AUART, sy-vline,
  WA_/KYK/IS_RKKBALV1-MEINH, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_/KYK/IS_RKKBALV1 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_/KYK/IS_RKKBALV1 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_/KYK/IS_RKKBALV1 INTO WA_/KYK/IS_RKKBALV1.


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

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

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

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

*Conversion exit ALPHA, internal->external for field AVERS
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_/KYK/IS_RKKBALV1-AVERS
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_/KYK/IS_RKKBALV1-AVERS.
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_/KYK/IS_RKKBALV1_STR, 
AUFNR TYPE STRING,
MATNR TYPE STRING,
PLANBEL_G TYPE STRING,
ISTBEL_G TYPE STRING,
WAERS TYPE STRING,
AUTYP TYPE STRING,
PLANMENGE TYPE STRING,
ISTMENGE TYPE STRING,
PLIS_KOST_A TYPE STRING,
AUART TYPE STRING,
MEINH TYPE STRING,
PLIS_MEABS TYPE STRING,
PLIS_MEPRC TYPE STRING,
WERKS TYPE STRING,
PLIS_KOST_P TYPE STRING,
PLANKOST_G TYPE STRING,
PLANKOST_F TYPE STRING,
PLANBEL_F TYPE STRING,
PLANKOST_V TYPE STRING,
PLANBEL_V TYPE STRING,
SOKO_KOST_P TYPE STRING,
PLANENTL_G TYPE STRING,
PLANENTL_F TYPE STRING,
PLANENTL_V TYPE STRING,
ISTKOST_G TYPE STRING,
ISTKOST_F TYPE STRING,
ISTKOST_V TYPE STRING,
ISTENTL_G TYPE STRING,
SVERS TYPE STRING,
SOLLKOST_G TYPE STRING,
ISTBEL_F TYPE STRING,
SOLLBEL_G TYPE STRING,
ISTBEL_V TYPE STRING,
SOLLENTL_G TYPE STRING,
KONTKOST_G TYPE STRING,
ISTENTL_F TYPE STRING,
KONTBEL_G TYPE STRING,
ISTENTL_V TYPE STRING,
KONTENTL_G TYPE STRING,
ABWPREIS TYPE STRING,
ABWMENG TYPE STRING,
ABWSTRUKT TYPE STRING,
ABWEINS TYPE STRING,
ABWVERRP TYPE STRING,
ABWFIXKO TYPE STRING,
ABWREST TYPE STRING,
ABWGES TYPE STRING,
AUSSCH TYPE STRING,
AVERS TYPE STRING,
ABGRWIP TYPE STRING,
ABGRUEKFK TYPE STRING,
ABGRUEKDV TYPE STRING,
ABGERGERL TYPE STRING,
ABWMISCHP TYPE STRING,
ABGERLBES TYPE STRING,
ABGERLUEB TYPE STRING,
ABWVERM TYPE STRING,
ABGKOUMS TYPE STRING,
ABGBESGES TYPE STRING,
ABGRUKGES TYPE STRING,
ABGERGEB TYPE STRING,
SOIS_KOST_A TYPE STRING,
SOKO_KOST_A TYPE STRING,
SOIS_KOST_P TYPE STRING,
OBJNR TYPE STRING,
LIGHTS TYPE STRING,END OF T_EKKO_STR.
DATA: WA_/KYK/IS_RKKBALV1_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_/KYK/IS_RKKBALV1_STR-AUFNR sy-vline 
WA_/KYK/IS_RKKBALV1_STR-MATNR sy-vline 
WA_/KYK/IS_RKKBALV1_STR-PLANBEL_G sy-vline 
WA_/KYK/IS_RKKBALV1_STR-ISTBEL_G sy-vline 
WA_/KYK/IS_RKKBALV1_STR-WAERS sy-vline 
WA_/KYK/IS_RKKBALV1_STR-AUTYP sy-vline 
WA_/KYK/IS_RKKBALV1_STR-PLANMENGE sy-vline 
WA_/KYK/IS_RKKBALV1_STR-ISTMENGE sy-vline 
WA_/KYK/IS_RKKBALV1_STR-PLIS_KOST_A sy-vline 
WA_/KYK/IS_RKKBALV1_STR-AUART sy-vline 
WA_/KYK/IS_RKKBALV1_STR-MEINH sy-vline 
WA_/KYK/IS_RKKBALV1_STR-PLIS_MEABS sy-vline 
WA_/KYK/IS_RKKBALV1_STR-PLIS_MEPRC sy-vline 
WA_/KYK/IS_RKKBALV1_STR-WERKS sy-vline 
WA_/KYK/IS_RKKBALV1_STR-PLIS_KOST_P sy-vline 
WA_/KYK/IS_RKKBALV1_STR-PLANKOST_G sy-vline 
WA_/KYK/IS_RKKBALV1_STR-PLANKOST_F sy-vline 
WA_/KYK/IS_RKKBALV1_STR-PLANBEL_F sy-vline 
WA_/KYK/IS_RKKBALV1_STR-PLANKOST_V sy-vline 
WA_/KYK/IS_RKKBALV1_STR-PLANBEL_V sy-vline 
WA_/KYK/IS_RKKBALV1_STR-SOKO_KOST_P sy-vline 
WA_/KYK/IS_RKKBALV1_STR-PLANENTL_G sy-vline 
WA_/KYK/IS_RKKBALV1_STR-PLANENTL_F sy-vline 
WA_/KYK/IS_RKKBALV1_STR-PLANENTL_V sy-vline 
WA_/KYK/IS_RKKBALV1_STR-ISTKOST_G sy-vline 
WA_/KYK/IS_RKKBALV1_STR-ISTKOST_F sy-vline 
WA_/KYK/IS_RKKBALV1_STR-ISTKOST_V sy-vline 
WA_/KYK/IS_RKKBALV1_STR-ISTENTL_G sy-vline 
WA_/KYK/IS_RKKBALV1_STR-SVERS sy-vline 
WA_/KYK/IS_RKKBALV1_STR-SOLLKOST_G sy-vline 
WA_/KYK/IS_RKKBALV1_STR-ISTBEL_F sy-vline 
WA_/KYK/IS_RKKBALV1_STR-SOLLBEL_G sy-vline 
WA_/KYK/IS_RKKBALV1_STR-ISTBEL_V sy-vline 
WA_/KYK/IS_RKKBALV1_STR-SOLLENTL_G sy-vline 
WA_/KYK/IS_RKKBALV1_STR-KONTKOST_G sy-vline 
WA_/KYK/IS_RKKBALV1_STR-ISTENTL_F sy-vline 
WA_/KYK/IS_RKKBALV1_STR-KONTBEL_G sy-vline 
WA_/KYK/IS_RKKBALV1_STR-ISTENTL_V sy-vline 
WA_/KYK/IS_RKKBALV1_STR-KONTENTL_G sy-vline 
WA_/KYK/IS_RKKBALV1_STR-ABWPREIS sy-vline 
WA_/KYK/IS_RKKBALV1_STR-ABWMENG sy-vline 
WA_/KYK/IS_RKKBALV1_STR-ABWSTRUKT sy-vline 
WA_/KYK/IS_RKKBALV1_STR-ABWEINS sy-vline 
WA_/KYK/IS_RKKBALV1_STR-ABWVERRP sy-vline 
WA_/KYK/IS_RKKBALV1_STR-ABWFIXKO sy-vline 
WA_/KYK/IS_RKKBALV1_STR-ABWREST sy-vline 
WA_/KYK/IS_RKKBALV1_STR-ABWGES sy-vline 
WA_/KYK/IS_RKKBALV1_STR-AUSSCH sy-vline 
WA_/KYK/IS_RKKBALV1_STR-AVERS sy-vline 
WA_/KYK/IS_RKKBALV1_STR-ABGRWIP sy-vline 
WA_/KYK/IS_RKKBALV1_STR-ABGRUEKFK sy-vline 
WA_/KYK/IS_RKKBALV1_STR-ABGRUEKDV sy-vline 
WA_/KYK/IS_RKKBALV1_STR-ABGERGERL sy-vline 
WA_/KYK/IS_RKKBALV1_STR-ABWMISCHP sy-vline 
WA_/KYK/IS_RKKBALV1_STR-ABGERLBES sy-vline 
WA_/KYK/IS_RKKBALV1_STR-ABGERLUEB sy-vline 
WA_/KYK/IS_RKKBALV1_STR-ABWVERM sy-vline 
WA_/KYK/IS_RKKBALV1_STR-ABGKOUMS sy-vline 
WA_/KYK/IS_RKKBALV1_STR-ABGBESGES sy-vline 
WA_/KYK/IS_RKKBALV1_STR-ABGRUKGES sy-vline 
WA_/KYK/IS_RKKBALV1_STR-ABGERGEB sy-vline 
WA_/KYK/IS_RKKBALV1_STR-SOIS_KOST_A sy-vline 
WA_/KYK/IS_RKKBALV1_STR-SOKO_KOST_A sy-vline 
WA_/KYK/IS_RKKBALV1_STR-SOIS_KOST_P sy-vline 
WA_/KYK/IS_RKKBALV1_STR-OBJNR sy-vline 
WA_/KYK/IS_RKKBALV1_STR-LIGHTS sy-vline      INTO ld_text SEPARATED BY SPACE.

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