ABAP Select data from SAP table KKATAB1 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 KKATAB1 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 KKATAB1. 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 KKATAB1 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_KKATAB1 TYPE STANDARD TABLE OF KKATAB1,
WA_KKATAB1 TYPE KKATAB1,
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: <KKATAB1> TYPE KKATAB1.
*Process all fields in table header/work area as string values
PERFORM process_as_string_field_values CHANGING wa_KKATAB1.
SELECT *
*restrict ABAP select to first 10 rows
UP TO 10 ROWS
FROM KKATAB1
INTO TABLE IT_KKATAB1.
*Select data and declare internal table using in-line method @DATA
*SELECT *
* FROM KKATAB1
* INTO TABLE @DATA(IT_KKATAB12).
*--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_KKATAB1 INDEX 1 INTO DATA(WA_KKATAB12).
*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_KKATAB1 ASSIGNING <KKATAB1>.
*To update a field value using a field symbol simply change the value via the field symbol pointer<KKATAB1>-NR = 1.
<KKATAB1>-WRTTP = 1.
<KKATAB1>-VERSN = 1.
<KKATAB1>-GJAHR = 1.
<KKATAB1>-SBJHR = 1.
ENDLOOP. LOOP AT IT_KKATAB1 INTO WA_KKATAB1. *Write horizonal line to screen report. WRITE:/ sy-uline. *Write selected data to screen/report before conversion. WRITE:/ sy-vline, WA_KKATAB1-WRT01, sy-vline,
WA_KKATAB1-WRT02, sy-vline,
WA_KKATAB1-WRT03, sy-vline,
WA_KKATAB1-WRT04, sy-vline,
WA_KKATAB1-WRT05, sy-vline,
WA_KKATAB1-WRT06, sy-vline.
ENDLOOP. *Add any further fields from structure WA_KKATAB1 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_KKATAB1 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_KKATAB1 INTO WA_KKATAB1. *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 WRTTP CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_KKATAB1-WRTTP IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRTTP.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field VERSN CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_KKATAB1-VERSN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-VERSN.
WRITE:/ 'New Value:', ld_input.
*Conversion exit GJAHR, internal->external for field GJAHR CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT' EXPORTING input = WA_KKATAB1-GJAHR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-GJAHR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT01 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT01 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT01.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT02 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT02 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT02.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT03 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT03 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT03.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT04 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT04 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT04.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT05 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT05 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT05.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT06 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT06 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT06.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT07 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT07 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT07.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT08 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT08 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT08.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT09 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT09 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT09.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT10 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT10 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT10.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT11 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT11 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT11.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT12 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT12 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT12.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT13 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT13 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT13.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT14 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT14 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT14.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT15 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT15 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT15.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT16 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT16 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT16.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT01F CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT01F IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT01F.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT02F CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT02F IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT02F.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT03F CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT03F IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT03F.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT04F CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT04F IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT04F.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT05F CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT05F IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT05F.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT06F CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT06F IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT06F.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT07F CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT07F IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT07F.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT08F CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT08F IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT08F.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT09F CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT09F IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT09F.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT10F CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT10F IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT10F.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT11F CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT11F IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT11F.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT12F CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT12F IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT12F.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT13F CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT13F IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT13F.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT14F CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT14F IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT14F.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT15F CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT15F IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT15F.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT16F CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT16F IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT16F.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT01K CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT01K IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT01K.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT02K CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT02K IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT02K.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT03K CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT03K IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT03K.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT04K CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT04K IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT04K.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT05K CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT05K IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT05K.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT06K CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT06K IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT06K.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT07K CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT07K IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT07K.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT08K CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT08K IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT08K.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT09K CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT09K IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT09K.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT10K CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT10K IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT10K.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT11K CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT11K IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT11K.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT12K CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT12K IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT12K.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT13K CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT13K IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT13K.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT14K CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT14K IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT14K.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT15K CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT15K IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT15K.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT16K CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT16K IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT16K.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT01KF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT01KF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT01KF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT02KF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT02KF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT02KF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT03KF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT03KF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT03KF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT04KF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT04KF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT04KF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT05KF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT05KF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT05KF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT06KF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT06KF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT06KF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT07KF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT07KF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT07KF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT08KF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT08KF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT08KF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT09KF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT09KF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT09KF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT10KF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT10KF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT10KF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT11KF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT11KF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT11KF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT12KF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT12KF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT12KF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT13KF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT13KF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT13KF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT14KF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT14KF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT14KF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT15KF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT15KF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT15KF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT16KF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB1-WRT16KF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB1-WRT16KF.
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_KKATAB1_STR,
NR TYPE STRING,
WRTTP TYPE STRING,
VERSN TYPE STRING,
GJAHR TYPE STRING,
SBJHR TYPE STRING,
WRT01 TYPE STRING,
WRT02 TYPE STRING,
WRT03 TYPE STRING,
WRT04 TYPE STRING,
WRT05 TYPE STRING,
WRT06 TYPE STRING,
WRT07 TYPE STRING,
WRT08 TYPE STRING,
WRT09 TYPE STRING,
WRT10 TYPE STRING,
WRT11 TYPE STRING,
WRT12 TYPE STRING,
WRT13 TYPE STRING,
WRT14 TYPE STRING,
WRT15 TYPE STRING,
WRT16 TYPE STRING,
WRT01F TYPE STRING,
WRT02F TYPE STRING,
WRT03F TYPE STRING,
WRT04F TYPE STRING,
WRT05F TYPE STRING,
WRT06F TYPE STRING,
WRT07F TYPE STRING,
WRT08F TYPE STRING,
WRT09F TYPE STRING,
WRT10F TYPE STRING,
WRT11F TYPE STRING,
WRT12F TYPE STRING,
WRT13F TYPE STRING,
WRT14F TYPE STRING,
WRT15F TYPE STRING,
WRT16F TYPE STRING,
WRT01K TYPE STRING,
WRT02K TYPE STRING,
WRT03K TYPE STRING,
WRT04K TYPE STRING,
WRT05K TYPE STRING,
WRT06K TYPE STRING,
WRT07K TYPE STRING,
WRT08K TYPE STRING,
WRT09K TYPE STRING,
WRT10K TYPE STRING,
WRT11K TYPE STRING,
WRT12K TYPE STRING,
WRT13K TYPE STRING,
WRT14K TYPE STRING,
WRT15K TYPE STRING,
WRT16K TYPE STRING,
WRT01KF TYPE STRING,
WRT02KF TYPE STRING,
WRT03KF TYPE STRING,
WRT04KF TYPE STRING,
WRT05KF TYPE STRING,
WRT06KF TYPE STRING,
WRT07KF TYPE STRING,
WRT08KF TYPE STRING,
WRT09KF TYPE STRING,
WRT10KF TYPE STRING,
WRT11KF TYPE STRING,
WRT12KF TYPE STRING,
WRT13KF TYPE STRING,
WRT14KF TYPE STRING,
WRT15KF TYPE STRING,
WRT16KF TYPE STRING,END OF T_EKKO_STR. DATA: WA_KKATAB1_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_KKATAB1_STR-NR sy-vline
WA_KKATAB1_STR-WRTTP sy-vline
WA_KKATAB1_STR-VERSN sy-vline
WA_KKATAB1_STR-GJAHR sy-vline
WA_KKATAB1_STR-SBJHR sy-vline
WA_KKATAB1_STR-WRT01 sy-vline
WA_KKATAB1_STR-WRT02 sy-vline
WA_KKATAB1_STR-WRT03 sy-vline
WA_KKATAB1_STR-WRT04 sy-vline
WA_KKATAB1_STR-WRT05 sy-vline
WA_KKATAB1_STR-WRT06 sy-vline
WA_KKATAB1_STR-WRT07 sy-vline
WA_KKATAB1_STR-WRT08 sy-vline
WA_KKATAB1_STR-WRT09 sy-vline
WA_KKATAB1_STR-WRT10 sy-vline
WA_KKATAB1_STR-WRT11 sy-vline
WA_KKATAB1_STR-WRT12 sy-vline
WA_KKATAB1_STR-WRT13 sy-vline
WA_KKATAB1_STR-WRT14 sy-vline
WA_KKATAB1_STR-WRT15 sy-vline
WA_KKATAB1_STR-WRT16 sy-vline
WA_KKATAB1_STR-WRT01F sy-vline
WA_KKATAB1_STR-WRT02F sy-vline
WA_KKATAB1_STR-WRT03F sy-vline
WA_KKATAB1_STR-WRT04F sy-vline
WA_KKATAB1_STR-WRT05F sy-vline
WA_KKATAB1_STR-WRT06F sy-vline
WA_KKATAB1_STR-WRT07F sy-vline
WA_KKATAB1_STR-WRT08F sy-vline
WA_KKATAB1_STR-WRT09F sy-vline
WA_KKATAB1_STR-WRT10F sy-vline
WA_KKATAB1_STR-WRT11F sy-vline
WA_KKATAB1_STR-WRT12F sy-vline
WA_KKATAB1_STR-WRT13F sy-vline
WA_KKATAB1_STR-WRT14F sy-vline
WA_KKATAB1_STR-WRT15F sy-vline
WA_KKATAB1_STR-WRT16F sy-vline
WA_KKATAB1_STR-WRT01K sy-vline
WA_KKATAB1_STR-WRT02K sy-vline
WA_KKATAB1_STR-WRT03K sy-vline
WA_KKATAB1_STR-WRT04K sy-vline
WA_KKATAB1_STR-WRT05K sy-vline
WA_KKATAB1_STR-WRT06K sy-vline
WA_KKATAB1_STR-WRT07K sy-vline
WA_KKATAB1_STR-WRT08K sy-vline
WA_KKATAB1_STR-WRT09K sy-vline
WA_KKATAB1_STR-WRT10K sy-vline
WA_KKATAB1_STR-WRT11K sy-vline
WA_KKATAB1_STR-WRT12K sy-vline
WA_KKATAB1_STR-WRT13K sy-vline
WA_KKATAB1_STR-WRT14K sy-vline
WA_KKATAB1_STR-WRT15K sy-vline
WA_KKATAB1_STR-WRT16K sy-vline
WA_KKATAB1_STR-WRT01KF sy-vline
WA_KKATAB1_STR-WRT02KF sy-vline
WA_KKATAB1_STR-WRT03KF sy-vline
WA_KKATAB1_STR-WRT04KF sy-vline
WA_KKATAB1_STR-WRT05KF sy-vline
WA_KKATAB1_STR-WRT06KF sy-vline
WA_KKATAB1_STR-WRT07KF sy-vline
WA_KKATAB1_STR-WRT08KF sy-vline
WA_KKATAB1_STR-WRT09KF sy-vline
WA_KKATAB1_STR-WRT10KF sy-vline
WA_KKATAB1_STR-WRT11KF sy-vline
WA_KKATAB1_STR-WRT12KF sy-vline
WA_KKATAB1_STR-WRT13KF sy-vline
WA_KKATAB1_STR-WRT14KF sy-vline
WA_KKATAB1_STR-WRT15KF sy-vline
WA_KKATAB1_STR-WRT16KF sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.
