ABAP Select data from SAP table KPARALLEL_VAL 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 KPARALLEL_VAL 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 KPARALLEL_VAL. 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 KPARALLEL_VAL 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_KPARALLEL_VAL TYPE STANDARD TABLE OF KPARALLEL_VAL,
WA_KPARALLEL_VAL TYPE KPARALLEL_VAL,
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: <KPARALLEL_VAL> TYPE KPARALLEL_VAL.
*Process all fields in table header/work area as string values
PERFORM process_as_string_field_values CHANGING wa_KPARALLEL_VAL.
SELECT *
*restrict ABAP select to first 10 rows
UP TO 10 ROWS
FROM KPARALLEL_VAL
INTO TABLE IT_KPARALLEL_VAL.
*Select data and declare internal table using in-line method @DATA
*SELECT *
* FROM KPARALLEL_VAL
* INTO TABLE @DATA(IT_KPARALLEL_VAL2).
*--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_KPARALLEL_VAL INDEX 1 INTO DATA(WA_KPARALLEL_VAL2).
*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_KPARALLEL_VAL ASSIGNING <KPARALLEL_VAL>.
*To update a field value using a field symbol simply change the value via the field symbol pointer<KPARALLEL_VAL>-WKG_0 = 1.
<KPARALLEL_VAL>-WKG_1 = 1.
<KPARALLEL_VAL>-WKG_2 = 1.
<KPARALLEL_VAL>-WOG_0 = 1.
<KPARALLEL_VAL>-WOG_1 = 1.
ENDLOOP. LOOP AT IT_KPARALLEL_VAL INTO WA_KPARALLEL_VAL. *Write horizonal line to screen report. WRITE:/ sy-uline. *Write selected data to screen/report before conversion. WRITE:/ sy-vline, WA_KPARALLEL_VAL-WOG_2, sy-vline,
WA_KPARALLEL_VAL-WKG_5, sy-vline,
WA_KPARALLEL_VAL-WKG_6, sy-vline,
WA_KPARALLEL_VAL-WKG_7, sy-vline,
WA_KPARALLEL_VAL-WOG_5, sy-vline,
WA_KPARALLEL_VAL-WOG_6, sy-vline.
ENDLOOP. *Add any further fields from structure WA_KPARALLEL_VAL 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_KPARALLEL_VAL 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_KPARALLEL_VAL INTO WA_KPARALLEL_VAL. *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 AC152, internal->external for field WKG_0 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WKG_0 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WKG_0.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKG_1 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WKG_1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WKG_1.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKG_2 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WKG_2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WKG_2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WOG_0 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WOG_0 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WOG_0.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WOG_1 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WOG_1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WOG_1.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WOG_2 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WOG_2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WOG_2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKG_5 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WKG_5 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WKG_5.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKG_6 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WKG_6 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WKG_6.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKG_7 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WKG_7 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WKG_7.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WOG_5 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WOG_5 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WOG_5.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WOG_6 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WOG_6 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WOG_6.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WOG_7 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WOG_7 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WOG_7.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WAG_0 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WAG_0 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WAG_0.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WAG_1 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WAG_1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WAG_1.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WAG_2 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WAG_2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WAG_2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WAG_5 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WAG_5 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WAG_5.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WAG_6 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WAG_6 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WAG_6.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WAG_7 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WAG_7 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WAG_7.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WVG_0 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WVG_0 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WVG_0.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WVG_1 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WVG_1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WVG_1.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WVG_2 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WVG_2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WVG_2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WVG_5 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WVG_5 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WVG_5.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WVG_6 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WVG_6 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WVG_6.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WVG_7 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WVG_7 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WVG_7.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WBG_0 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WBG_0 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WBG_0.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WBG_1 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WBG_1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WBG_1.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WBG_2 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WBG_2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WBG_2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WBG_5 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WBG_5 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WBG_5.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WBG_6 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WBG_6 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WBG_6.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WBG_7 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WBG_7 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WBG_7.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WCG_0 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WCG_0 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WCG_0.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WCG_1 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WCG_1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WCG_1.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WCG_2 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WCG_2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WCG_2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WCG_5 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WCG_5 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WCG_5.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WCG_6 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WCG_6 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WCG_6.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WCG_7 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WCG_7 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WCG_7.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WDG_0 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WDG_0 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WDG_0.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WDG_1 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WDG_1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WDG_1.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WDG_2 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WDG_2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WDG_2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WDG_5 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WDG_5 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WDG_5.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WDG_6 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WDG_6 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WDG_6.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WDG_7 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WDG_7 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WDG_7.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WEG_0 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WEG_0 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WEG_0.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WEG_1 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WEG_1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WEG_1.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WEG_2 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WEG_2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WEG_2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WEG_5 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WEG_5 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WEG_5.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WEG_6 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WEG_6 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WEG_6.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WEG_7 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WEG_7 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WEG_7.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WFG_0 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WFG_0 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WFG_0.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WFG_1 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WFG_1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WFG_1.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WFG_2 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WFG_2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WFG_2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WFG_5 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WFG_5 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WFG_5.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WFG_6 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WFG_6 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WFG_6.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WFG_7 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WFG_7 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WFG_7.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WGG_0 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WGG_0 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WGG_0.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WGG_1 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WGG_1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WGG_1.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WGG_2 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WGG_2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WGG_2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WGG_5 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WGG_5 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WGG_5.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WGG_6 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WGG_6 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WGG_6.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WGG_7 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WGG_7 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WGG_7.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WHG_0 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WHG_0 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WHG_0.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WHG_1 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WHG_1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WHG_1.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WHG_2 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WHG_2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WHG_2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WHG_5 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WHG_5 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WHG_5.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WHG_6 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WHG_6 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WHG_6.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WHG_7 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WHG_7 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WHG_7.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WSG_0 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WSG_0 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WSG_0.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WSG_1 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WSG_1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WSG_1.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WSG_2 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WSG_2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WSG_2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WSG_5 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WSG_5 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WSG_5.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WSG_6 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WSG_6 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WSG_6.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WSG_7 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KPARALLEL_VAL-WSG_7 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KPARALLEL_VAL-WSG_7.
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_KPARALLEL_VAL_STR,
WKG_0 TYPE STRING,
WKG_1 TYPE STRING,
WKG_2 TYPE STRING,
WOG_0 TYPE STRING,
WOG_1 TYPE STRING,
WOG_2 TYPE STRING,
WKG_5 TYPE STRING,
WKG_6 TYPE STRING,
WKG_7 TYPE STRING,
WOG_5 TYPE STRING,
WOG_6 TYPE STRING,
WOG_7 TYPE STRING,
WAG_0 TYPE STRING,
WAG_1 TYPE STRING,
WAG_2 TYPE STRING,
WAG_5 TYPE STRING,
WAG_6 TYPE STRING,
WAG_7 TYPE STRING,
WVG_0 TYPE STRING,
WVG_1 TYPE STRING,
WVG_2 TYPE STRING,
WVG_5 TYPE STRING,
WVG_6 TYPE STRING,
WVG_7 TYPE STRING,
WBG_0 TYPE STRING,
WBG_1 TYPE STRING,
WBG_2 TYPE STRING,
WBG_5 TYPE STRING,
WBG_6 TYPE STRING,
WBG_7 TYPE STRING,
WCG_0 TYPE STRING,
WCG_1 TYPE STRING,
WCG_2 TYPE STRING,
WCG_5 TYPE STRING,
WCG_6 TYPE STRING,
WCG_7 TYPE STRING,
WDG_0 TYPE STRING,
WDG_1 TYPE STRING,
WDG_2 TYPE STRING,
WDG_5 TYPE STRING,
WDG_6 TYPE STRING,
WDG_7 TYPE STRING,
WEG_0 TYPE STRING,
WEG_1 TYPE STRING,
WEG_2 TYPE STRING,
WEG_5 TYPE STRING,
WEG_6 TYPE STRING,
WEG_7 TYPE STRING,
WFG_0 TYPE STRING,
WFG_1 TYPE STRING,
WFG_2 TYPE STRING,
WFG_5 TYPE STRING,
WFG_6 TYPE STRING,
WFG_7 TYPE STRING,
WGG_0 TYPE STRING,
WGG_1 TYPE STRING,
WGG_2 TYPE STRING,
WGG_5 TYPE STRING,
WGG_6 TYPE STRING,
WGG_7 TYPE STRING,
WHG_0 TYPE STRING,
WHG_1 TYPE STRING,
WHG_2 TYPE STRING,
WHG_5 TYPE STRING,
WHG_6 TYPE STRING,
WHG_7 TYPE STRING,
WSG_0 TYPE STRING,
WSG_1 TYPE STRING,
WSG_2 TYPE STRING,
WSG_5 TYPE STRING,
WSG_6 TYPE STRING,
WSG_7 TYPE STRING,END OF T_EKKO_STR. DATA: WA_KPARALLEL_VAL_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_KPARALLEL_VAL_STR-WKG_0 sy-vline
WA_KPARALLEL_VAL_STR-WKG_1 sy-vline
WA_KPARALLEL_VAL_STR-WKG_2 sy-vline
WA_KPARALLEL_VAL_STR-WOG_0 sy-vline
WA_KPARALLEL_VAL_STR-WOG_1 sy-vline
WA_KPARALLEL_VAL_STR-WOG_2 sy-vline
WA_KPARALLEL_VAL_STR-WKG_5 sy-vline
WA_KPARALLEL_VAL_STR-WKG_6 sy-vline
WA_KPARALLEL_VAL_STR-WKG_7 sy-vline
WA_KPARALLEL_VAL_STR-WOG_5 sy-vline
WA_KPARALLEL_VAL_STR-WOG_6 sy-vline
WA_KPARALLEL_VAL_STR-WOG_7 sy-vline
WA_KPARALLEL_VAL_STR-WAG_0 sy-vline
WA_KPARALLEL_VAL_STR-WAG_1 sy-vline
WA_KPARALLEL_VAL_STR-WAG_2 sy-vline
WA_KPARALLEL_VAL_STR-WAG_5 sy-vline
WA_KPARALLEL_VAL_STR-WAG_6 sy-vline
WA_KPARALLEL_VAL_STR-WAG_7 sy-vline
WA_KPARALLEL_VAL_STR-WVG_0 sy-vline
WA_KPARALLEL_VAL_STR-WVG_1 sy-vline
WA_KPARALLEL_VAL_STR-WVG_2 sy-vline
WA_KPARALLEL_VAL_STR-WVG_5 sy-vline
WA_KPARALLEL_VAL_STR-WVG_6 sy-vline
WA_KPARALLEL_VAL_STR-WVG_7 sy-vline
WA_KPARALLEL_VAL_STR-WBG_0 sy-vline
WA_KPARALLEL_VAL_STR-WBG_1 sy-vline
WA_KPARALLEL_VAL_STR-WBG_2 sy-vline
WA_KPARALLEL_VAL_STR-WBG_5 sy-vline
WA_KPARALLEL_VAL_STR-WBG_6 sy-vline
WA_KPARALLEL_VAL_STR-WBG_7 sy-vline
WA_KPARALLEL_VAL_STR-WCG_0 sy-vline
WA_KPARALLEL_VAL_STR-WCG_1 sy-vline
WA_KPARALLEL_VAL_STR-WCG_2 sy-vline
WA_KPARALLEL_VAL_STR-WCG_5 sy-vline
WA_KPARALLEL_VAL_STR-WCG_6 sy-vline
WA_KPARALLEL_VAL_STR-WCG_7 sy-vline
WA_KPARALLEL_VAL_STR-WDG_0 sy-vline
WA_KPARALLEL_VAL_STR-WDG_1 sy-vline
WA_KPARALLEL_VAL_STR-WDG_2 sy-vline
WA_KPARALLEL_VAL_STR-WDG_5 sy-vline
WA_KPARALLEL_VAL_STR-WDG_6 sy-vline
WA_KPARALLEL_VAL_STR-WDG_7 sy-vline
WA_KPARALLEL_VAL_STR-WEG_0 sy-vline
WA_KPARALLEL_VAL_STR-WEG_1 sy-vline
WA_KPARALLEL_VAL_STR-WEG_2 sy-vline
WA_KPARALLEL_VAL_STR-WEG_5 sy-vline
WA_KPARALLEL_VAL_STR-WEG_6 sy-vline
WA_KPARALLEL_VAL_STR-WEG_7 sy-vline
WA_KPARALLEL_VAL_STR-WFG_0 sy-vline
WA_KPARALLEL_VAL_STR-WFG_1 sy-vline
WA_KPARALLEL_VAL_STR-WFG_2 sy-vline
WA_KPARALLEL_VAL_STR-WFG_5 sy-vline
WA_KPARALLEL_VAL_STR-WFG_6 sy-vline
WA_KPARALLEL_VAL_STR-WFG_7 sy-vline
WA_KPARALLEL_VAL_STR-WGG_0 sy-vline
WA_KPARALLEL_VAL_STR-WGG_1 sy-vline
WA_KPARALLEL_VAL_STR-WGG_2 sy-vline
WA_KPARALLEL_VAL_STR-WGG_5 sy-vline
WA_KPARALLEL_VAL_STR-WGG_6 sy-vline
WA_KPARALLEL_VAL_STR-WGG_7 sy-vline
WA_KPARALLEL_VAL_STR-WHG_0 sy-vline
WA_KPARALLEL_VAL_STR-WHG_1 sy-vline
WA_KPARALLEL_VAL_STR-WHG_2 sy-vline
WA_KPARALLEL_VAL_STR-WHG_5 sy-vline
WA_KPARALLEL_VAL_STR-WHG_6 sy-vline
WA_KPARALLEL_VAL_STR-WHG_7 sy-vline
WA_KPARALLEL_VAL_STR-WSG_0 sy-vline
WA_KPARALLEL_VAL_STR-WSG_1 sy-vline
WA_KPARALLEL_VAL_STR-WSG_2 sy-vline
WA_KPARALLEL_VAL_STR-WSG_5 sy-vline
WA_KPARALLEL_VAL_STR-WSG_6 sy-vline
WA_KPARALLEL_VAL_STR-WSG_7 sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.
