ABAP Select data from SAP table KKATAB7 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 KKATAB7 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 KKATAB7. 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 KKATAB7 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_KKATAB7 TYPE STANDARD TABLE OF KKATAB7,
WA_KKATAB7 TYPE KKATAB7,
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: <KKATAB7> TYPE KKATAB7.
*Process all fields in table header/work area as string values
PERFORM process_as_string_field_values CHANGING wa_KKATAB7.
SELECT *
*restrict ABAP select to first 10 rows
UP TO 10 ROWS
FROM KKATAB7
INTO TABLE IT_KKATAB7.
*Select data and declare internal table using in-line method @DATA
*SELECT *
* FROM KKATAB7
* INTO TABLE @DATA(IT_KKATAB72).
*--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_KKATAB7 INDEX 1 INTO DATA(WA_KKATAB72).
*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_KKATAB7 ASSIGNING <KKATAB7>.
*To update a field value using a field symbol simply change the value via the field symbol pointer<KKATAB7>-NR = 1.
<KKATAB7>-WRTTP = 1.
<KKATAB7>-VERSN = 1.
<KKATAB7>-GJAHR = 1.
<KKATAB7>-SBJHR = 1.
ENDLOOP. LOOP AT IT_KKATAB7 INTO WA_KKATAB7. *Write horizonal line to screen report. WRITE:/ sy-uline. *Write selected data to screen/report before conversion. WRITE:/ sy-vline, WA_KKATAB7-WRT01K, sy-vline,
WA_KKATAB7-WRT02K, sy-vline,
WA_KKATAB7-WRT03K, sy-vline,
WA_KKATAB7-WRT04K, sy-vline,
WA_KKATAB7-WRT05K, sy-vline,
WA_KKATAB7-WRT06K, sy-vline.
ENDLOOP. *Add any further fields from structure WA_KKATAB7 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_KKATAB7 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_KKATAB7 INTO WA_KKATAB7. *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_KKATAB7-WRTTP IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRTTP.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field VERSN CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_KKATAB7-VERSN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-VERSN.
WRITE:/ 'New Value:', ld_input.
*Conversion exit GJAHR, internal->external for field GJAHR CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT' EXPORTING input = WA_KKATAB7-GJAHR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-GJAHR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT01K CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT01K IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT01K.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT02K CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT02K IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT02K.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT03K CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT03K IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT03K.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT04K CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT04K IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT04K.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT05K CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT05K IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT05K.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT06K CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT06K IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT06K.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT07K CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT07K IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT07K.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT08K CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT08K IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT08K.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT09K CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT09K IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT09K.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT10K CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT10K IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT10K.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT11K CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT11K IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT11K.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT12K CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT12K IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT12K.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT13K CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT13K IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT13K.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT14K CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT14K IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT14K.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT15K CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT15K IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT15K.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT16K CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT16K IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT16K.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT01KF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT01KF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT01KF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT02KF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT02KF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT02KF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT03KF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT03KF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT03KF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT04KF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT04KF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT04KF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT05KF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT05KF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT05KF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT06KF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT06KF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT06KF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT07KF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT07KF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT07KF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT08KF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT08KF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT08KF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT09KF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT09KF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT09KF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT10KF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT10KF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT10KF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT11KF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT11KF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT11KF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT12KF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT12KF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT12KF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT13KF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT13KF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT13KF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT14KF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT14KF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT14KF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT15KF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT15KF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT15KF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT16KF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT16KF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT16KF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT01KB CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT01KB IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT01KB.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT02KB CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT02KB IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT02KB.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT03KB CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT03KB IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT03KB.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT04KB CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT04KB IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT04KB.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT05KB CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT05KB IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT05KB.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT06KB CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT06KB IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT06KB.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT07KB CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT07KB IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT07KB.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT08KB CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT08KB IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT08KB.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT09KB CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT09KB IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT09KB.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT10KB CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT10KB IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT10KB.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT11KB CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT11KB IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT11KB.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT12KB CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT12KB IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT12KB.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT13KB CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT13KB IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT13KB.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT14KB CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT14KB IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT14KB.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT15KB CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT15KB IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT15KB.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT16KB CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT16KB IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT16KB.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT01KBF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT01KBF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT01KBF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT02KBF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT02KBF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT02KBF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT03KBF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT03KBF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT03KBF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT04KBF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT04KBF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT04KBF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT05KBF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT05KBF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT05KBF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT06KBF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT06KBF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT06KBF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT07KBF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT07KBF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT07KBF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT08KBF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT08KBF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT08KBF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT09KBF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT09KBF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT09KBF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT10KBF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT10KBF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT10KBF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT11KBF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT11KBF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT11KBF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT12KBF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT12KBF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT12KBF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT13KBF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT13KBF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT13KBF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT14KBF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT14KBF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT14KBF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT15KBF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT15KBF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT15KBF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WRT16KBF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKATAB7-WRT16KBF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKATAB7-WRT16KBF.
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_KKATAB7_STR,
NR TYPE STRING,
WRTTP TYPE STRING,
VERSN TYPE STRING,
GJAHR TYPE STRING,
SBJHR 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,
WRT01KB TYPE STRING,
WRT02KB TYPE STRING,
WRT03KB TYPE STRING,
WRT04KB TYPE STRING,
WRT05KB TYPE STRING,
WRT06KB TYPE STRING,
WRT07KB TYPE STRING,
WRT08KB TYPE STRING,
WRT09KB TYPE STRING,
WRT10KB TYPE STRING,
WRT11KB TYPE STRING,
WRT12KB TYPE STRING,
WRT13KB TYPE STRING,
WRT14KB TYPE STRING,
WRT15KB TYPE STRING,
WRT16KB TYPE STRING,
WRT01KBF TYPE STRING,
WRT02KBF TYPE STRING,
WRT03KBF TYPE STRING,
WRT04KBF TYPE STRING,
WRT05KBF TYPE STRING,
WRT06KBF TYPE STRING,
WRT07KBF TYPE STRING,
WRT08KBF TYPE STRING,
WRT09KBF TYPE STRING,
WRT10KBF TYPE STRING,
WRT11KBF TYPE STRING,
WRT12KBF TYPE STRING,
WRT13KBF TYPE STRING,
WRT14KBF TYPE STRING,
WRT15KBF TYPE STRING,
WRT16KBF TYPE STRING,END OF T_EKKO_STR. DATA: WA_KKATAB7_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_KKATAB7_STR-NR sy-vline
WA_KKATAB7_STR-WRTTP sy-vline
WA_KKATAB7_STR-VERSN sy-vline
WA_KKATAB7_STR-GJAHR sy-vline
WA_KKATAB7_STR-SBJHR sy-vline
WA_KKATAB7_STR-WRT01K sy-vline
WA_KKATAB7_STR-WRT02K sy-vline
WA_KKATAB7_STR-WRT03K sy-vline
WA_KKATAB7_STR-WRT04K sy-vline
WA_KKATAB7_STR-WRT05K sy-vline
WA_KKATAB7_STR-WRT06K sy-vline
WA_KKATAB7_STR-WRT07K sy-vline
WA_KKATAB7_STR-WRT08K sy-vline
WA_KKATAB7_STR-WRT09K sy-vline
WA_KKATAB7_STR-WRT10K sy-vline
WA_KKATAB7_STR-WRT11K sy-vline
WA_KKATAB7_STR-WRT12K sy-vline
WA_KKATAB7_STR-WRT13K sy-vline
WA_KKATAB7_STR-WRT14K sy-vline
WA_KKATAB7_STR-WRT15K sy-vline
WA_KKATAB7_STR-WRT16K sy-vline
WA_KKATAB7_STR-WRT01KF sy-vline
WA_KKATAB7_STR-WRT02KF sy-vline
WA_KKATAB7_STR-WRT03KF sy-vline
WA_KKATAB7_STR-WRT04KF sy-vline
WA_KKATAB7_STR-WRT05KF sy-vline
WA_KKATAB7_STR-WRT06KF sy-vline
WA_KKATAB7_STR-WRT07KF sy-vline
WA_KKATAB7_STR-WRT08KF sy-vline
WA_KKATAB7_STR-WRT09KF sy-vline
WA_KKATAB7_STR-WRT10KF sy-vline
WA_KKATAB7_STR-WRT11KF sy-vline
WA_KKATAB7_STR-WRT12KF sy-vline
WA_KKATAB7_STR-WRT13KF sy-vline
WA_KKATAB7_STR-WRT14KF sy-vline
WA_KKATAB7_STR-WRT15KF sy-vline
WA_KKATAB7_STR-WRT16KF sy-vline
WA_KKATAB7_STR-WRT01KB sy-vline
WA_KKATAB7_STR-WRT02KB sy-vline
WA_KKATAB7_STR-WRT03KB sy-vline
WA_KKATAB7_STR-WRT04KB sy-vline
WA_KKATAB7_STR-WRT05KB sy-vline
WA_KKATAB7_STR-WRT06KB sy-vline
WA_KKATAB7_STR-WRT07KB sy-vline
WA_KKATAB7_STR-WRT08KB sy-vline
WA_KKATAB7_STR-WRT09KB sy-vline
WA_KKATAB7_STR-WRT10KB sy-vline
WA_KKATAB7_STR-WRT11KB sy-vline
WA_KKATAB7_STR-WRT12KB sy-vline
WA_KKATAB7_STR-WRT13KB sy-vline
WA_KKATAB7_STR-WRT14KB sy-vline
WA_KKATAB7_STR-WRT15KB sy-vline
WA_KKATAB7_STR-WRT16KB sy-vline
WA_KKATAB7_STR-WRT01KBF sy-vline
WA_KKATAB7_STR-WRT02KBF sy-vline
WA_KKATAB7_STR-WRT03KBF sy-vline
WA_KKATAB7_STR-WRT04KBF sy-vline
WA_KKATAB7_STR-WRT05KBF sy-vline
WA_KKATAB7_STR-WRT06KBF sy-vline
WA_KKATAB7_STR-WRT07KBF sy-vline
WA_KKATAB7_STR-WRT08KBF sy-vline
WA_KKATAB7_STR-WRT09KBF sy-vline
WA_KKATAB7_STR-WRT10KBF sy-vline
WA_KKATAB7_STR-WRT11KBF sy-vline
WA_KKATAB7_STR-WRT12KBF sy-vline
WA_KKATAB7_STR-WRT13KBF sy-vline
WA_KKATAB7_STR-WRT14KBF sy-vline
WA_KKATAB7_STR-WRT15KBF sy-vline
WA_KKATAB7_STR-WRT16KBF sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.
