ABAP Select data from SAP table RJHKOMP1 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 RJHKOMP1 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 RJHKOMP1. 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 RJHKOMP1 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_RJHKOMP1 TYPE STANDARD TABLE OF RJHKOMP1,
      WA_RJHKOMP1 TYPE RJHKOMP1,
      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: <RJHKOMP1> TYPE RJHKOMP1.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM RJHKOMP1
*  INTO TABLE @DATA(IT_RJHKOMP12).
*--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_RJHKOMP1 INDEX 1 INTO DATA(WA_RJHKOMP12).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<RJHKOMP1>-DRUCKERZ = 1.
<RJHKOMP1>-BEINH_BAS = 1.
<RJHKOMP1>-BE_GRP_BAS = 1.
<RJHKOMP1>-BEINH = 1.
<RJHKOMP1>-BE_GRP_UR = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_RJHKOMP1-TERMINSPEZ, sy-vline,
  WA_RJHKOMP1-AZAFOV, sy-vline,
  WA_RJHKOMP1-AZAFA, sy-vline,
  WA_RJHKOMP1-AZAFO, sy-vline,
  WA_RJHKOMP1-AZAGST, sy-vline,
  WA_RJHKOMP1-AZAPLZ, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_RJHKOMP1 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_RJHKOMP1 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_RJHKOMP1 INTO WA_RJHKOMP1.


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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit CUNIT, internal->external for field KMEIN6AB
CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT'
  EXPORTING
    input =                      WA_RJHKOMP1-KMEIN6AB
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RJHKOMP1-KMEIN6AB.
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_RJHKOMP1_STR, 
DRUCKERZ TYPE STRING,
BEINH_BAS TYPE STRING,
BE_GRP_BAS TYPE STRING,
BEINH TYPE STRING,
BE_GRP_UR TYPE STRING,
TERMINSPEZ TYPE STRING,
AZAFOV TYPE STRING,
AZAFA TYPE STRING,
AZAFO TYPE STRING,
AZAGST TYPE STRING,
AZAPLZ TYPE STRING,
IHKOMP TYPE STRING,
IHKTYP TYPE STRING,
INHK_KFM TYPE STRING,
IKOTYP_KFM TYPE STRING,
INHK_TECH1 TYPE STRING,
IKOTYP_PLZ TYPE STRING,
INHK_KLEV1 TYPE STRING,
IKOTYPLEV1 TYPE STRING,
INHK_TECH2 TYPE STRING,
PLZANW TYPE STRING,
VAVTYP TYPE STRING,
PAMPVA TYPE STRING,
DIENSTL TYPE STRING,
DITYP TYPE STRING,
INSERENT TYPE STRING,
FARBANZ TYPE STRING,
CHIFFRE TYPE STRING,
AVMAUART TYPE STRING,
AVMPOS_ART TYPE STRING,
GO_PREIS TYPE STRING,
KARR_KUNDE TYPE STRING,
ABSRB TYPE STRING,
ABSBO TYPE STRING,
ABSFMPR TYPE STRING,
FMP_WAERS TYPE STRING,
FMP_KPEIN TYPE STRING,
FMP_KMEIN TYPE STRING,
FMP_ABRMM TYPE STRING,
BRABS TYPE STRING,
ABSRB2 TYPE STRING,
ABSBO2 TYPE STRING,
ABSFMPR2 TYPE STRING,
FMP_WAERS2 TYPE STRING,
FMP_KPEIN2 TYPE STRING,
FMP_KMEIN2 TYPE STRING,
FMP_ABRMM2 TYPE STRING,
BRABS2 TYPE STRING,
ABSRB3 TYPE STRING,
ABSBO3 TYPE STRING,
ABSFMPR3 TYPE STRING,
FMP_WAERS3 TYPE STRING,
FMP_KPEIN3 TYPE STRING,
FMP_KMEIN3 TYPE STRING,
FMP_ABRMM3 TYPE STRING,
BRABS3 TYPE STRING,
KAUSSCHL TYPE STRING,
AZART_SOND TYPE STRING,
AZART_VORL TYPE STRING,
JAEPRBASIS TYPE STRING,
AEPROV TYPE STRING,
ANZSCHALT TYPE STRING,
ANZWDHLG TYPE STRING,
TBEL TYPE STRING,
PRGRP_FARB TYPE STRING,
XGESTREUT TYPE STRING,
TMOT_KENNZ TYPE STRING,
XUEBERBUND TYPE STRING,
XANSCHNITT TYPE STRING,
XCOUPON TYPE STRING,
KONKAUS TYPE STRING,
SINSBEARB TYPE STRING,
JVTBEPMART TYPE STRING,
SI_TYP TYPE STRING,
SI_ENTSPFL TYPE STRING,
SI_VERBWER TYPE STRING,
SI_SEITEN TYPE STRING,
SI_GEWKL TYPE STRING,
SI_SEKL TYPE STRING,
DSPMGE_PAM TYPE STRING,
VRTMENGE TYPE STRING,
BERMENGE TYPE STRING,
PSTMGE_PAM TYPE STRING,
XRESTHSHLT TYPE STRING,
XFREMDBEIL TYPE STRING,
XTBEL_SI TYPE STRING,
XTBEL_VT TYPE STRING,
BEILAGHW TYPE STRING,
XTRANZ TYPE STRING,
WS_TIMESLC TYPE STRING,
WS_BLOCK TYPE STRING,
WS_STELLE TYPE STRING,
WS_ART TYPE STRING,
WS_SENDFRM TYPE STRING,
WS_TARIFGR TYPE STRING,
WERBK_TYP TYPE STRING,
WERBK_KNZ TYPE STRING,
XAGENAUFTR TYPE STRING,
KAMPAGNE TYPE STRING,
INS_PROZ TYPE STRING,
AZGR_INS TYPE STRING,
FORMAT_ONL TYPE STRING,
BOOK_OL TYPE STRING,
ISM_PFOBJ01 TYPE STRING,
ISM_PFOBJ02 TYPE STRING,
ISM_PFOBJ03 TYPE STRING,
ISM_PFOBJ04 TYPE STRING,
ISM_PFOBJ05 TYPE STRING,
ISM_PFOBJ06 TYPE STRING,
ISM_PFOBJ07 TYPE STRING,
ISM_PFOBJ08 TYPE STRING,
ISM_PFOBJ09 TYPE STRING,
ISM_PFOBJ10 TYPE STRING,
ISM_PFOBJ11 TYPE STRING,
ISM_PFOBJ12 TYPE STRING,
ISM_PFOBJ13 TYPE STRING,
ISM_PFOBJ14 TYPE STRING,
ISM_PFOBJ15 TYPE STRING,
ISM_PFOBJ16 TYPE STRING,
MENGE1616 TYPE STRING,
MENGE2616 TYPE STRING,
UMSATZ616 TYPE STRING,
BEDNR616 TYPE STRING,
KMEIN616 TYPE STRING,
FREQUENCY616 TYPE STRING,
INS_SERIES_RULE TYPE STRING,
INS_SERIES TYPE STRING,
INS_SERIES_NO TYPE STRING,
INS_SERIES_CNT TYPE STRING,
INS_SERIES_BLGMENGE TYPE STRING,
INS_SERIES_DISPMENGE TYPE STRING,
INS_SERIES_BERMENGE TYPE STRING,
INS_SERIES_POSTMENGE TYPE STRING,
INS_SERIES_MGLME TYPE STRING,
INS_SERIES_LAGME TYPE STRING,
PACKAGE_ID TYPE STRING,
PK_REF_AVM_NR TYPE STRING,
PK_REF_POS_NR TYPE STRING,
PK_ELEMENT_ID TYPE STRING,
PK_PSTYV TYPE STRING,
MENGE16A4 TYPE STRING,
MENGE26A4 TYPE STRING,
UMSATZ6A4 TYPE STRING,
BEDNR6A4 TYPE STRING,
KMEIN6A4 TYPE STRING,
FREQUENCY6A4 TYPE STRING,
MENGE16A5 TYPE STRING,
MENGE26A5 TYPE STRING,
UMSATZ6A5 TYPE STRING,
BEDNR6A5 TYPE STRING,
KMEIN6A5 TYPE STRING,
FREQUENCY6A5 TYPE STRING,
MENGE16A6 TYPE STRING,
MENGE26A6 TYPE STRING,
UMSATZ6A6 TYPE STRING,
BEDNR6A6 TYPE STRING,
KMEIN6A6 TYPE STRING,
FREQUENCY6A6 TYPE STRING,
MENGE16A7 TYPE STRING,
MENGE26A7 TYPE STRING,
UMSATZ6A7 TYPE STRING,
BEDNR6A7 TYPE STRING,
KMEIN6A7 TYPE STRING,
FREQUENCY6A7 TYPE STRING,
MENGE16A8 TYPE STRING,
MENGE26A8 TYPE STRING,
UMSATZ6A8 TYPE STRING,
BEDNR6A8 TYPE STRING,
KMEIN6A8 TYPE STRING,
FREQUENCY6A8 TYPE STRING,
MENGE16DE TYPE STRING,
MENGE26DE TYPE STRING,
UMSATZ6DE TYPE STRING,
BEDNR6DE TYPE STRING,
KMEIN6DE TYPE STRING,
FREQUENCY6DE TYPE STRING,
MENGE16A9 TYPE STRING,
MENGE26A9 TYPE STRING,
UMSATZ6A9 TYPE STRING,
BEDNR6A9 TYPE STRING,
KMEIN6A9 TYPE STRING,
FREQUENCY6A9 TYPE STRING,
MENGE16AA TYPE STRING,
MENGE26AA TYPE STRING,
UMSATZ6AA TYPE STRING,
BEDNR6AA TYPE STRING,
KMEIN6AA TYPE STRING,
FREQUENCY6AA TYPE STRING,
MENGE16AB TYPE STRING,
MENGE26AB TYPE STRING,
UMSATZ6AB TYPE STRING,
BEDNR6AB TYPE STRING,
KMEIN6AB TYPE STRING,
FREQUENCY6AB TYPE STRING,END OF T_EKKO_STR.
DATA: WA_RJHKOMP1_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_RJHKOMP1_STR-DRUCKERZ sy-vline 
WA_RJHKOMP1_STR-BEINH_BAS sy-vline 
WA_RJHKOMP1_STR-BE_GRP_BAS sy-vline 
WA_RJHKOMP1_STR-BEINH sy-vline 
WA_RJHKOMP1_STR-BE_GRP_UR sy-vline 
WA_RJHKOMP1_STR-TERMINSPEZ sy-vline 
WA_RJHKOMP1_STR-AZAFOV sy-vline 
WA_RJHKOMP1_STR-AZAFA sy-vline 
WA_RJHKOMP1_STR-AZAFO sy-vline 
WA_RJHKOMP1_STR-AZAGST sy-vline 
WA_RJHKOMP1_STR-AZAPLZ sy-vline 
WA_RJHKOMP1_STR-IHKOMP sy-vline 
WA_RJHKOMP1_STR-IHKTYP sy-vline 
WA_RJHKOMP1_STR-INHK_KFM sy-vline 
WA_RJHKOMP1_STR-IKOTYP_KFM sy-vline 
WA_RJHKOMP1_STR-INHK_TECH1 sy-vline 
WA_RJHKOMP1_STR-IKOTYP_PLZ sy-vline 
WA_RJHKOMP1_STR-INHK_KLEV1 sy-vline 
WA_RJHKOMP1_STR-IKOTYPLEV1 sy-vline 
WA_RJHKOMP1_STR-INHK_TECH2 sy-vline 
WA_RJHKOMP1_STR-PLZANW sy-vline 
WA_RJHKOMP1_STR-VAVTYP sy-vline 
WA_RJHKOMP1_STR-PAMPVA sy-vline 
WA_RJHKOMP1_STR-DIENSTL sy-vline 
WA_RJHKOMP1_STR-DITYP sy-vline 
WA_RJHKOMP1_STR-INSERENT sy-vline 
WA_RJHKOMP1_STR-FARBANZ sy-vline 
WA_RJHKOMP1_STR-CHIFFRE sy-vline 
WA_RJHKOMP1_STR-AVMAUART sy-vline 
WA_RJHKOMP1_STR-AVMPOS_ART sy-vline 
WA_RJHKOMP1_STR-GO_PREIS sy-vline 
WA_RJHKOMP1_STR-KARR_KUNDE sy-vline 
WA_RJHKOMP1_STR-ABSRB sy-vline 
WA_RJHKOMP1_STR-ABSBO sy-vline 
WA_RJHKOMP1_STR-ABSFMPR sy-vline 
WA_RJHKOMP1_STR-FMP_WAERS sy-vline 
WA_RJHKOMP1_STR-FMP_KPEIN sy-vline 
WA_RJHKOMP1_STR-FMP_KMEIN sy-vline 
WA_RJHKOMP1_STR-FMP_ABRMM sy-vline 
WA_RJHKOMP1_STR-BRABS sy-vline 
WA_RJHKOMP1_STR-ABSRB2 sy-vline 
WA_RJHKOMP1_STR-ABSBO2 sy-vline 
WA_RJHKOMP1_STR-ABSFMPR2 sy-vline 
WA_RJHKOMP1_STR-FMP_WAERS2 sy-vline 
WA_RJHKOMP1_STR-FMP_KPEIN2 sy-vline 
WA_RJHKOMP1_STR-FMP_KMEIN2 sy-vline 
WA_RJHKOMP1_STR-FMP_ABRMM2 sy-vline 
WA_RJHKOMP1_STR-BRABS2 sy-vline 
WA_RJHKOMP1_STR-ABSRB3 sy-vline 
WA_RJHKOMP1_STR-ABSBO3 sy-vline 
WA_RJHKOMP1_STR-ABSFMPR3 sy-vline 
WA_RJHKOMP1_STR-FMP_WAERS3 sy-vline 
WA_RJHKOMP1_STR-FMP_KPEIN3 sy-vline 
WA_RJHKOMP1_STR-FMP_KMEIN3 sy-vline 
WA_RJHKOMP1_STR-FMP_ABRMM3 sy-vline 
WA_RJHKOMP1_STR-BRABS3 sy-vline 
WA_RJHKOMP1_STR-KAUSSCHL sy-vline 
WA_RJHKOMP1_STR-AZART_SOND sy-vline 
WA_RJHKOMP1_STR-AZART_VORL sy-vline 
WA_RJHKOMP1_STR-JAEPRBASIS sy-vline 
WA_RJHKOMP1_STR-AEPROV sy-vline 
WA_RJHKOMP1_STR-ANZSCHALT sy-vline 
WA_RJHKOMP1_STR-ANZWDHLG sy-vline 
WA_RJHKOMP1_STR-TBEL sy-vline 
WA_RJHKOMP1_STR-PRGRP_FARB sy-vline 
WA_RJHKOMP1_STR-XGESTREUT sy-vline 
WA_RJHKOMP1_STR-TMOT_KENNZ sy-vline 
WA_RJHKOMP1_STR-XUEBERBUND sy-vline 
WA_RJHKOMP1_STR-XANSCHNITT sy-vline 
WA_RJHKOMP1_STR-XCOUPON sy-vline 
WA_RJHKOMP1_STR-KONKAUS sy-vline 
WA_RJHKOMP1_STR-SINSBEARB sy-vline 
WA_RJHKOMP1_STR-JVTBEPMART sy-vline 
WA_RJHKOMP1_STR-SI_TYP sy-vline 
WA_RJHKOMP1_STR-SI_ENTSPFL sy-vline 
WA_RJHKOMP1_STR-SI_VERBWER sy-vline 
WA_RJHKOMP1_STR-SI_SEITEN sy-vline 
WA_RJHKOMP1_STR-SI_GEWKL sy-vline 
WA_RJHKOMP1_STR-SI_SEKL sy-vline 
WA_RJHKOMP1_STR-DSPMGE_PAM sy-vline 
WA_RJHKOMP1_STR-VRTMENGE sy-vline 
WA_RJHKOMP1_STR-BERMENGE sy-vline 
WA_RJHKOMP1_STR-PSTMGE_PAM sy-vline 
WA_RJHKOMP1_STR-XRESTHSHLT sy-vline 
WA_RJHKOMP1_STR-XFREMDBEIL sy-vline 
WA_RJHKOMP1_STR-XTBEL_SI sy-vline 
WA_RJHKOMP1_STR-XTBEL_VT sy-vline 
WA_RJHKOMP1_STR-BEILAGHW sy-vline 
WA_RJHKOMP1_STR-XTRANZ sy-vline 
WA_RJHKOMP1_STR-WS_TIMESLC sy-vline 
WA_RJHKOMP1_STR-WS_BLOCK sy-vline 
WA_RJHKOMP1_STR-WS_STELLE sy-vline 
WA_RJHKOMP1_STR-WS_ART sy-vline 
WA_RJHKOMP1_STR-WS_SENDFRM sy-vline 
WA_RJHKOMP1_STR-WS_TARIFGR sy-vline 
WA_RJHKOMP1_STR-WERBK_TYP sy-vline 
WA_RJHKOMP1_STR-WERBK_KNZ sy-vline 
WA_RJHKOMP1_STR-XAGENAUFTR sy-vline 
WA_RJHKOMP1_STR-KAMPAGNE sy-vline 
WA_RJHKOMP1_STR-INS_PROZ sy-vline 
WA_RJHKOMP1_STR-AZGR_INS sy-vline 
WA_RJHKOMP1_STR-FORMAT_ONL sy-vline 
WA_RJHKOMP1_STR-BOOK_OL sy-vline 
WA_RJHKOMP1_STR-ISM_PFOBJ01 sy-vline 
WA_RJHKOMP1_STR-ISM_PFOBJ02 sy-vline 
WA_RJHKOMP1_STR-ISM_PFOBJ03 sy-vline 
WA_RJHKOMP1_STR-ISM_PFOBJ04 sy-vline 
WA_RJHKOMP1_STR-ISM_PFOBJ05 sy-vline 
WA_RJHKOMP1_STR-ISM_PFOBJ06 sy-vline 
WA_RJHKOMP1_STR-ISM_PFOBJ07 sy-vline 
WA_RJHKOMP1_STR-ISM_PFOBJ08 sy-vline 
WA_RJHKOMP1_STR-ISM_PFOBJ09 sy-vline 
WA_RJHKOMP1_STR-ISM_PFOBJ10 sy-vline 
WA_RJHKOMP1_STR-ISM_PFOBJ11 sy-vline 
WA_RJHKOMP1_STR-ISM_PFOBJ12 sy-vline 
WA_RJHKOMP1_STR-ISM_PFOBJ13 sy-vline 
WA_RJHKOMP1_STR-ISM_PFOBJ14 sy-vline 
WA_RJHKOMP1_STR-ISM_PFOBJ15 sy-vline 
WA_RJHKOMP1_STR-ISM_PFOBJ16 sy-vline 
WA_RJHKOMP1_STR-MENGE1616 sy-vline 
WA_RJHKOMP1_STR-MENGE2616 sy-vline 
WA_RJHKOMP1_STR-UMSATZ616 sy-vline 
WA_RJHKOMP1_STR-BEDNR616 sy-vline 
WA_RJHKOMP1_STR-KMEIN616 sy-vline 
WA_RJHKOMP1_STR-FREQUENCY616 sy-vline 
WA_RJHKOMP1_STR-INS_SERIES_RULE sy-vline 
WA_RJHKOMP1_STR-INS_SERIES sy-vline 
WA_RJHKOMP1_STR-INS_SERIES_NO sy-vline 
WA_RJHKOMP1_STR-INS_SERIES_CNT sy-vline 
WA_RJHKOMP1_STR-INS_SERIES_BLGMENGE sy-vline 
WA_RJHKOMP1_STR-INS_SERIES_DISPMENGE sy-vline 
WA_RJHKOMP1_STR-INS_SERIES_BERMENGE sy-vline 
WA_RJHKOMP1_STR-INS_SERIES_POSTMENGE sy-vline 
WA_RJHKOMP1_STR-INS_SERIES_MGLME sy-vline 
WA_RJHKOMP1_STR-INS_SERIES_LAGME sy-vline 
WA_RJHKOMP1_STR-PACKAGE_ID sy-vline 
WA_RJHKOMP1_STR-PK_REF_AVM_NR sy-vline 
WA_RJHKOMP1_STR-PK_REF_POS_NR sy-vline 
WA_RJHKOMP1_STR-PK_ELEMENT_ID sy-vline 
WA_RJHKOMP1_STR-PK_PSTYV sy-vline 
WA_RJHKOMP1_STR-MENGE16A4 sy-vline 
WA_RJHKOMP1_STR-MENGE26A4 sy-vline 
WA_RJHKOMP1_STR-UMSATZ6A4 sy-vline 
WA_RJHKOMP1_STR-BEDNR6A4 sy-vline 
WA_RJHKOMP1_STR-KMEIN6A4 sy-vline 
WA_RJHKOMP1_STR-FREQUENCY6A4 sy-vline 
WA_RJHKOMP1_STR-MENGE16A5 sy-vline 
WA_RJHKOMP1_STR-MENGE26A5 sy-vline 
WA_RJHKOMP1_STR-UMSATZ6A5 sy-vline 
WA_RJHKOMP1_STR-BEDNR6A5 sy-vline 
WA_RJHKOMP1_STR-KMEIN6A5 sy-vline 
WA_RJHKOMP1_STR-FREQUENCY6A5 sy-vline 
WA_RJHKOMP1_STR-MENGE16A6 sy-vline 
WA_RJHKOMP1_STR-MENGE26A6 sy-vline 
WA_RJHKOMP1_STR-UMSATZ6A6 sy-vline 
WA_RJHKOMP1_STR-BEDNR6A6 sy-vline 
WA_RJHKOMP1_STR-KMEIN6A6 sy-vline 
WA_RJHKOMP1_STR-FREQUENCY6A6 sy-vline 
WA_RJHKOMP1_STR-MENGE16A7 sy-vline 
WA_RJHKOMP1_STR-MENGE26A7 sy-vline 
WA_RJHKOMP1_STR-UMSATZ6A7 sy-vline 
WA_RJHKOMP1_STR-BEDNR6A7 sy-vline 
WA_RJHKOMP1_STR-KMEIN6A7 sy-vline 
WA_RJHKOMP1_STR-FREQUENCY6A7 sy-vline 
WA_RJHKOMP1_STR-MENGE16A8 sy-vline 
WA_RJHKOMP1_STR-MENGE26A8 sy-vline 
WA_RJHKOMP1_STR-UMSATZ6A8 sy-vline 
WA_RJHKOMP1_STR-BEDNR6A8 sy-vline 
WA_RJHKOMP1_STR-KMEIN6A8 sy-vline 
WA_RJHKOMP1_STR-FREQUENCY6A8 sy-vline 
WA_RJHKOMP1_STR-MENGE16DE sy-vline 
WA_RJHKOMP1_STR-MENGE26DE sy-vline 
WA_RJHKOMP1_STR-UMSATZ6DE sy-vline 
WA_RJHKOMP1_STR-BEDNR6DE sy-vline 
WA_RJHKOMP1_STR-KMEIN6DE sy-vline 
WA_RJHKOMP1_STR-FREQUENCY6DE sy-vline 
WA_RJHKOMP1_STR-MENGE16A9 sy-vline 
WA_RJHKOMP1_STR-MENGE26A9 sy-vline 
WA_RJHKOMP1_STR-UMSATZ6A9 sy-vline 
WA_RJHKOMP1_STR-BEDNR6A9 sy-vline 
WA_RJHKOMP1_STR-KMEIN6A9 sy-vline 
WA_RJHKOMP1_STR-FREQUENCY6A9 sy-vline 
WA_RJHKOMP1_STR-MENGE16AA sy-vline 
WA_RJHKOMP1_STR-MENGE26AA sy-vline 
WA_RJHKOMP1_STR-UMSATZ6AA sy-vline 
WA_RJHKOMP1_STR-BEDNR6AA sy-vline 
WA_RJHKOMP1_STR-KMEIN6AA sy-vline 
WA_RJHKOMP1_STR-FREQUENCY6AA sy-vline 
WA_RJHKOMP1_STR-MENGE16AB sy-vline 
WA_RJHKOMP1_STR-MENGE26AB sy-vline 
WA_RJHKOMP1_STR-UMSATZ6AB sy-vline 
WA_RJHKOMP1_STR-BEDNR6AB sy-vline 
WA_RJHKOMP1_STR-KMEIN6AB sy-vline 
WA_RJHKOMP1_STR-FREQUENCY6AB sy-vline      INTO ld_text SEPARATED BY SPACE.

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