ABAP Select data from SAP table KKA1000 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 KKA1000 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 KKA1000. 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 KKA1000 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_KKA1000 TYPE STANDARD TABLE OF KKA1000,
WA_KKA1000 TYPE KKA1000,
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: <KKA1000> TYPE KKA1000.
*Process all fields in table header/work area as string values
PERFORM process_as_string_field_values CHANGING wa_KKA1000.
SELECT *
*restrict ABAP select to first 10 rows
UP TO 10 ROWS
FROM KKA1000
INTO TABLE IT_KKA1000.
*Select data and declare internal table using in-line method @DATA
*SELECT *
* FROM KKA1000
* INTO TABLE @DATA(IT_KKA10002).
*--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_KKA1000 INDEX 1 INTO DATA(WA_KKA10002).
*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_KKA1000 ASSIGNING <KKA1000>.
*To update a field value using a field symbol simply change the value via the field symbol pointer<KKA1000>-KEYPERIODE = 1.
<KKA1000>-PLAN_KOS = 1.
<KKA1000>-PLAN_ERL = 1.
<KKA1000>-PLAN_PRO = 1.
<KKA1000>-PLAN_DIR = 1.
ENDLOOP. LOOP AT IT_KKA1000 INTO WA_KKA1000. *Write horizonal line to screen report. WRITE:/ sy-uline. *Write selected data to screen/report before conversion. WRITE:/ sy-vline, WA_KKA1000-PLAN_NIB, sy-vline,
WA_KKA1000-PLAN_ERG, sy-vline,
WA_KKA1000-IST_KOS, sy-vline,
WA_KKA1000-IST_ERL, sy-vline,
WA_KKA1000-IST_PRO, sy-vline,
WA_KKA1000-IST_DIR, sy-vline.
ENDLOOP. *Add any further fields from structure WA_KKA1000 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_KKA1000 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_KKA1000 INTO WA_KKA1000. *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 PLAN_KOS CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-PLAN_KOS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-PLAN_KOS.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field PLAN_ERL CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-PLAN_ERL IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-PLAN_ERL.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field PLAN_PRO CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-PLAN_PRO IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-PLAN_PRO.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field PLAN_DIR CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-PLAN_DIR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-PLAN_DIR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field PLAN_NIB CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-PLAN_NIB IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-PLAN_NIB.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field PLAN_ERG CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-PLAN_ERG IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-PLAN_ERG.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field IST_KOS CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-IST_KOS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-IST_KOS.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field IST_ERL CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-IST_ERL IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-IST_ERL.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field IST_PRO CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-IST_PRO IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-IST_PRO.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field IST_DIR CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-IST_DIR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-IST_DIR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field IST_NIB CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-IST_NIB IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-IST_NIB.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field IST_RAD CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-IST_RAD IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-IST_RAD.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field IST_ABR CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-IST_ABR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-IST_ABR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field ERR_KOS CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-ERR_KOS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-ERR_KOS.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field ERR_ERL CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-ERR_ERL IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-ERR_ERL.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field RUE_KOS CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-RUE_KOS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-RUE_KOS.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field BST_KOS CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-BST_KOS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-BST_KOS.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field KDU CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-KDU IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-KDU.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field EWE_RAD CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-EWE_RAD IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-EWE_RAD.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field EWE CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-EWE IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-EWE.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field RDV_SA CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-RDV_SA IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-RDV_SA.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field RUE_PRO CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-RUE_PRO IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-RUE_PRO.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field IST_KOS_P CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-IST_KOS_P IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-IST_KOS_P.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field IST_ERL_P CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-IST_ERL_P IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-IST_ERL_P.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field IST_PRO_P CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-IST_PRO_P IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-IST_PRO_P.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field IST_DIR_P CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-IST_DIR_P IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-IST_DIR_P.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field IST_NIB_P CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-IST_NIB_P IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-IST_NIB_P.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field IST_RAD_P CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-IST_RAD_P IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-IST_RAD_P.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field IST_ABR_P CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-IST_ABR_P IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-IST_ABR_P.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field POC_GEW CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-POC_GEW IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-POC_GEW.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field POC_VRL CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-POC_VRL IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-POC_VRL.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field POC_BST_ER CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-POC_BST_ER IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-POC_BST_ER.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field POC_RUE_ER CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-POC_RUE_ER IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-POC_RUE_ER.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field POC_VREAL CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-POC_VREAL IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-POC_VREAL.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field VERSN CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_KKA1000-VERSN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-VERSN.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field EWE_P CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-EWE_P IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-EWE_P.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field KDU_P CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-KDU_P IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-KDU_P.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field RDV CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-RDV IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-RDV.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field RDV_P CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-RDV_P IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-RDV_P.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field ERG CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-ERG IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-ERG.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field ERG_P CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-ERG_P IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-ERG_P.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field BST_KOS_A CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-BST_KOS_A IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-BST_KOS_A.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field BST_KOS_W CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-BST_KOS_W IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-BST_KOS_W.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field BST_KOS_N CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-BST_KOS_N IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-BST_KOS_N.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field BST_KOS_A_P CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-BST_KOS_A_P IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-BST_KOS_A_P.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field BST_KOS_W_P CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-BST_KOS_W_P IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-BST_KOS_W_P.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field BST_KOS_N_P CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-BST_KOS_N_P IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-BST_KOS_N_P.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field BST_GEW CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-BST_GEW IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-BST_GEW.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field BST_GEW_P CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-BST_GEW_P IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-BST_GEW_P.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field RDV_PAS CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-RDV_PAS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-RDV_PAS.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field RDV_PAS_P CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-RDV_PAS_P IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-RDV_PAS_P.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field RDV_VER CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-RDV_VER IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-RDV_VER.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field RDV_VER_P CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-RDV_VER_P IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-RDV_VER_P.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field ANZ CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-ANZ IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-ANZ.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field ANZ_P CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-ANZ_P IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-ANZ_P.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field ANZ_UEB CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-ANZ_UEB IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-ANZ_UEB.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field ANZ_UEB_P CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-ANZ_UEB_P IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-ANZ_UEB_P.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field ANZ_VER CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-ANZ_VER IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-ANZ_VER.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field ANZ_VER_P CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-ANZ_VER_P IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-ANZ_VER_P.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field PLAN_KOS_AE CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-PLAN_KOS_AE IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-PLAN_KOS_AE.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field PLAN_ERL_AE CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-PLAN_ERL_AE IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-PLAN_ERL_AE.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field PLAN_ERG_AE CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-PLAN_ERG_AE IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-PLAN_ERG_AE.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field ERR_KOS_P CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-ERR_KOS_P IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-ERR_KOS_P.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field ERR_ERL_P CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-ERR_ERL_P IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-ERR_ERL_P.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field RUE_KOS_P CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-RUE_KOS_P IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-RUE_KOS_P.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field BST_KOS_P CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-BST_KOS_P IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-BST_KOS_P.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field RUE_PRO_P CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-RUE_PRO_P IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-RUE_PRO_P.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field POC_BST_ER_P CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-POC_BST_ER_P IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-POC_BST_ER_P.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field POC_RUE_ER_P CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-POC_RUE_ER_P IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-POC_RUE_ER_P.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field RDV_SA_P CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-RDV_SA_P IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-RDV_SA_P.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field POC_VRL_P CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-POC_VRL_P IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-POC_VRL_P.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field POC_GEW_P CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-POC_GEW_P IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-POC_GEW_P.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field POC_VREAL_P CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-POC_VREAL_P IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-POC_VREAL_P.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field RDV1 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-RDV1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-RDV1.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field RDV1_P CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-RDV1_P IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-RDV1_P.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field RDV2 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-RDV2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-RDV2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field RDV2_P CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-RDV2_P IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-RDV2_P.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field RUE_KOS_BI CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-RUE_KOS_BI IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-RUE_KOS_BI.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field RUE_KOS_VB CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-RUE_KOS_VB IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-RUE_KOS_VB.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field RUE_PRO_BI CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-RUE_PRO_BI IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-RUE_PRO_BI.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field RUE_PRO_VB CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-RUE_PRO_VB IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-RUE_PRO_VB.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field RDV_BI CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-RDV_BI IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-RDV_BI.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field RDV_VB CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-RDV_VB IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-RDV_VB.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field PLAN_KOS_ORG CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-PLAN_KOS_ORG IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-PLAN_KOS_ORG.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field PLAN_KOS_ANP CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-PLAN_KOS_ANP IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-PLAN_KOS_ANP.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field PLAN_KOS_AEN CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-PLAN_KOS_AEN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-PLAN_KOS_AEN.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field PLAN_ERL_ORG CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-PLAN_ERL_ORG IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-PLAN_ERL_ORG.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field PLAN_ERL_ANP CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-PLAN_ERL_ANP IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-PLAN_ERL_ANP.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field PLAN_ERL_AEN CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-PLAN_ERL_AEN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-PLAN_ERL_AEN.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field PLAN_REST_AEN CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-PLAN_REST_AEN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-PLAN_REST_AEN.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field PLAN_ERG_AEN CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-PLAN_ERG_AEN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-PLAN_ERG_AEN.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field PLAN_KOS_GES CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-PLAN_KOS_GES IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-PLAN_KOS_GES.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field PLAN_ERL_GES CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-PLAN_ERL_GES IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-PLAN_ERL_GES.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field PLAN_REST_GES CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-PLAN_REST_GES IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-PLAN_REST_GES.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field PLAN_ERG_GES CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KKA1000-PLAN_ERG_GES IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KKA1000-PLAN_ERG_GES.
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_KKA1000_STR,
KEYPERIODE TYPE STRING,
PLAN_KOS TYPE STRING,
PLAN_ERL TYPE STRING,
PLAN_PRO TYPE STRING,
PLAN_DIR TYPE STRING,
PLAN_NIB TYPE STRING,
PLAN_ERG TYPE STRING,
IST_KOS TYPE STRING,
IST_ERL TYPE STRING,
IST_PRO TYPE STRING,
IST_DIR TYPE STRING,
IST_NIB TYPE STRING,
IST_RAD TYPE STRING,
IST_ABR TYPE STRING,
ERR_KOS TYPE STRING,
ERR_ERL TYPE STRING,
RUE_KOS TYPE STRING,
BST_KOS TYPE STRING,
KDU TYPE STRING,
EWE_RAD TYPE STRING,
EWE TYPE STRING,
RDV_SA TYPE STRING,
RUE_PRO TYPE STRING,
PERIODE TYPE STRING,
OBJEKT TYPE STRING,
IST_KOS_P TYPE STRING,
IST_ERL_P TYPE STRING,
IST_PRO_P TYPE STRING,
IST_DIR_P TYPE STRING,
IST_NIB_P TYPE STRING,
IST_RAD_P TYPE STRING,
IST_ABR_P TYPE STRING,
PERIODE1 TYPE STRING,
PERIODE2 TYPE STRING,
PERIODE3 TYPE STRING,
PERIODE4 TYPE STRING,
POC_GEW TYPE STRING,
POC_VRL TYPE STRING,
POC_BST_ER TYPE STRING,
POC_RUE_ER TYPE STRING,
POC_VREAL TYPE STRING,
PLAN_MNG TYPE STRING,
IST_MNG TYPE STRING,
IST_MNG_P TYPE STRING,
TWAER TYPE STRING,
VERSN TYPE STRING,
WAER_ZAEHLER TYPE STRING,
POC_PZ TYPE STRING,
EWE_P TYPE STRING,
KDU_P TYPE STRING,
RDV TYPE STRING,
RDV_P TYPE STRING,
ERG TYPE STRING,
ERG_P TYPE STRING,
BST_KOS_A TYPE STRING,
BST_KOS_W TYPE STRING,
BST_KOS_N TYPE STRING,
BST_KOS_A_P TYPE STRING,
BST_KOS_W_P TYPE STRING,
BST_KOS_N_P TYPE STRING,
BST_GEW TYPE STRING,
BST_GEW_P TYPE STRING,
RDV_PAS TYPE STRING,
RDV_PAS_P TYPE STRING,
RDV_VER TYPE STRING,
RDV_VER_P TYPE STRING,
ANZ TYPE STRING,
ANZ_P TYPE STRING,
ANZ_UEB TYPE STRING,
ANZ_UEB_P TYPE STRING,
ANZ_VER TYPE STRING,
ANZ_VER_P TYPE STRING,
ANZAHL_UOBJ TYPE STRING,
METHO TYPE STRING,
METHO_EXP TYPE STRING,
ABART TYPE STRING,
GEWKZ TYPE STRING,
ERWEITERUNGEN_AKTIV TYPE STRING,
PLAN_KOS_AE TYPE STRING,
PLAN_ERL_AE TYPE STRING,
PLAN_ERG_AE TYPE STRING,
ERR_KOS_P TYPE STRING,
ERR_ERL_P TYPE STRING,
RUE_KOS_P TYPE STRING,
BST_KOS_P TYPE STRING,
RUE_PRO_P TYPE STRING,
POC_BST_ER_P TYPE STRING,
POC_RUE_ER_P TYPE STRING,
RDV_SA_P TYPE STRING,
POC_VRL_P TYPE STRING,
POC_GEW_P TYPE STRING,
GEW_PZ TYPE STRING,
POC_VREAL_P TYPE STRING,
VALUTYP TYPE STRING,
RDV1 TYPE STRING,
RDV1_P TYPE STRING,
RDV2 TYPE STRING,
RDV2_P TYPE STRING,
RUE_KOS_BI TYPE STRING,
RUE_KOS_VB TYPE STRING,
RUE_PRO_BI TYPE STRING,
RUE_PRO_VB TYPE STRING,
RDV_BI TYPE STRING,
RDV_VB TYPE STRING,
PLAN_KOS_ORG TYPE STRING,
PLAN_KOS_ANP TYPE STRING,
PLAN_KOS_AEN TYPE STRING,
PLAN_ERL_ORG TYPE STRING,
PLAN_ERL_ANP TYPE STRING,
PLAN_ERL_AEN TYPE STRING,
PLAN_REST_AEN TYPE STRING,
PLAN_ERG_AEN TYPE STRING,
PLAN_KOS_GES TYPE STRING,
PLAN_ERL_GES TYPE STRING,
PLAN_REST_GES TYPE STRING,
PLAN_ERG_GES TYPE STRING,
INV2_PLV TYPE STRING,
INV2_ANZ TYPE STRING,
INV2_MNG TYPE STRING,
INV2_BVK TYPE STRING,
INV2_AKT TYPE STRING,
INV2_VLV TYPE STRING,
INV3_KTD TYPE STRING,
INV3_KTP TYPE STRING,
INV1_BEW TYPE STRING,
INV1_SHW TYPE STRING,
ENDABGR TYPE STRING,
INV1_KNZ TYPE STRING,
FARR_RAD_ACTIVE TYPE STRING,END OF T_EKKO_STR. DATA: WA_KKA1000_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_KKA1000_STR-KEYPERIODE sy-vline
WA_KKA1000_STR-PLAN_KOS sy-vline
WA_KKA1000_STR-PLAN_ERL sy-vline
WA_KKA1000_STR-PLAN_PRO sy-vline
WA_KKA1000_STR-PLAN_DIR sy-vline
WA_KKA1000_STR-PLAN_NIB sy-vline
WA_KKA1000_STR-PLAN_ERG sy-vline
WA_KKA1000_STR-IST_KOS sy-vline
WA_KKA1000_STR-IST_ERL sy-vline
WA_KKA1000_STR-IST_PRO sy-vline
WA_KKA1000_STR-IST_DIR sy-vline
WA_KKA1000_STR-IST_NIB sy-vline
WA_KKA1000_STR-IST_RAD sy-vline
WA_KKA1000_STR-IST_ABR sy-vline
WA_KKA1000_STR-ERR_KOS sy-vline
WA_KKA1000_STR-ERR_ERL sy-vline
WA_KKA1000_STR-RUE_KOS sy-vline
WA_KKA1000_STR-BST_KOS sy-vline
WA_KKA1000_STR-KDU sy-vline
WA_KKA1000_STR-EWE_RAD sy-vline
WA_KKA1000_STR-EWE sy-vline
WA_KKA1000_STR-RDV_SA sy-vline
WA_KKA1000_STR-RUE_PRO sy-vline
WA_KKA1000_STR-PERIODE sy-vline
WA_KKA1000_STR-OBJEKT sy-vline
WA_KKA1000_STR-IST_KOS_P sy-vline
WA_KKA1000_STR-IST_ERL_P sy-vline
WA_KKA1000_STR-IST_PRO_P sy-vline
WA_KKA1000_STR-IST_DIR_P sy-vline
WA_KKA1000_STR-IST_NIB_P sy-vline
WA_KKA1000_STR-IST_RAD_P sy-vline
WA_KKA1000_STR-IST_ABR_P sy-vline
WA_KKA1000_STR-PERIODE1 sy-vline
WA_KKA1000_STR-PERIODE2 sy-vline
WA_KKA1000_STR-PERIODE3 sy-vline
WA_KKA1000_STR-PERIODE4 sy-vline
WA_KKA1000_STR-POC_GEW sy-vline
WA_KKA1000_STR-POC_VRL sy-vline
WA_KKA1000_STR-POC_BST_ER sy-vline
WA_KKA1000_STR-POC_RUE_ER sy-vline
WA_KKA1000_STR-POC_VREAL sy-vline
WA_KKA1000_STR-PLAN_MNG sy-vline
WA_KKA1000_STR-IST_MNG sy-vline
WA_KKA1000_STR-IST_MNG_P sy-vline
WA_KKA1000_STR-TWAER sy-vline
WA_KKA1000_STR-VERSN sy-vline
WA_KKA1000_STR-WAER_ZAEHLER sy-vline
WA_KKA1000_STR-POC_PZ sy-vline
WA_KKA1000_STR-EWE_P sy-vline
WA_KKA1000_STR-KDU_P sy-vline
WA_KKA1000_STR-RDV sy-vline
WA_KKA1000_STR-RDV_P sy-vline
WA_KKA1000_STR-ERG sy-vline
WA_KKA1000_STR-ERG_P sy-vline
WA_KKA1000_STR-BST_KOS_A sy-vline
WA_KKA1000_STR-BST_KOS_W sy-vline
WA_KKA1000_STR-BST_KOS_N sy-vline
WA_KKA1000_STR-BST_KOS_A_P sy-vline
WA_KKA1000_STR-BST_KOS_W_P sy-vline
WA_KKA1000_STR-BST_KOS_N_P sy-vline
WA_KKA1000_STR-BST_GEW sy-vline
WA_KKA1000_STR-BST_GEW_P sy-vline
WA_KKA1000_STR-RDV_PAS sy-vline
WA_KKA1000_STR-RDV_PAS_P sy-vline
WA_KKA1000_STR-RDV_VER sy-vline
WA_KKA1000_STR-RDV_VER_P sy-vline
WA_KKA1000_STR-ANZ sy-vline
WA_KKA1000_STR-ANZ_P sy-vline
WA_KKA1000_STR-ANZ_UEB sy-vline
WA_KKA1000_STR-ANZ_UEB_P sy-vline
WA_KKA1000_STR-ANZ_VER sy-vline
WA_KKA1000_STR-ANZ_VER_P sy-vline
WA_KKA1000_STR-ANZAHL_UOBJ sy-vline
WA_KKA1000_STR-METHO sy-vline
WA_KKA1000_STR-METHO_EXP sy-vline
WA_KKA1000_STR-ABART sy-vline
WA_KKA1000_STR-GEWKZ sy-vline
WA_KKA1000_STR-ERWEITERUNGEN_AKTIV sy-vline
WA_KKA1000_STR-PLAN_KOS_AE sy-vline
WA_KKA1000_STR-PLAN_ERL_AE sy-vline
WA_KKA1000_STR-PLAN_ERG_AE sy-vline
WA_KKA1000_STR-ERR_KOS_P sy-vline
WA_KKA1000_STR-ERR_ERL_P sy-vline
WA_KKA1000_STR-RUE_KOS_P sy-vline
WA_KKA1000_STR-BST_KOS_P sy-vline
WA_KKA1000_STR-RUE_PRO_P sy-vline
WA_KKA1000_STR-POC_BST_ER_P sy-vline
WA_KKA1000_STR-POC_RUE_ER_P sy-vline
WA_KKA1000_STR-RDV_SA_P sy-vline
WA_KKA1000_STR-POC_VRL_P sy-vline
WA_KKA1000_STR-POC_GEW_P sy-vline
WA_KKA1000_STR-GEW_PZ sy-vline
WA_KKA1000_STR-POC_VREAL_P sy-vline
WA_KKA1000_STR-VALUTYP sy-vline
WA_KKA1000_STR-RDV1 sy-vline
WA_KKA1000_STR-RDV1_P sy-vline
WA_KKA1000_STR-RDV2 sy-vline
WA_KKA1000_STR-RDV2_P sy-vline
WA_KKA1000_STR-RUE_KOS_BI sy-vline
WA_KKA1000_STR-RUE_KOS_VB sy-vline
WA_KKA1000_STR-RUE_PRO_BI sy-vline
WA_KKA1000_STR-RUE_PRO_VB sy-vline
WA_KKA1000_STR-RDV_BI sy-vline
WA_KKA1000_STR-RDV_VB sy-vline
WA_KKA1000_STR-PLAN_KOS_ORG sy-vline
WA_KKA1000_STR-PLAN_KOS_ANP sy-vline
WA_KKA1000_STR-PLAN_KOS_AEN sy-vline
WA_KKA1000_STR-PLAN_ERL_ORG sy-vline
WA_KKA1000_STR-PLAN_ERL_ANP sy-vline
WA_KKA1000_STR-PLAN_ERL_AEN sy-vline
WA_KKA1000_STR-PLAN_REST_AEN sy-vline
WA_KKA1000_STR-PLAN_ERG_AEN sy-vline
WA_KKA1000_STR-PLAN_KOS_GES sy-vline
WA_KKA1000_STR-PLAN_ERL_GES sy-vline
WA_KKA1000_STR-PLAN_REST_GES sy-vline
WA_KKA1000_STR-PLAN_ERG_GES sy-vline
WA_KKA1000_STR-INV2_PLV sy-vline
WA_KKA1000_STR-INV2_ANZ sy-vline
WA_KKA1000_STR-INV2_MNG sy-vline
WA_KKA1000_STR-INV2_BVK sy-vline
WA_KKA1000_STR-INV2_AKT sy-vline
WA_KKA1000_STR-INV2_VLV sy-vline
WA_KKA1000_STR-INV3_KTD sy-vline
WA_KKA1000_STR-INV3_KTP sy-vline
WA_KKA1000_STR-INV1_BEW sy-vline
WA_KKA1000_STR-INV1_SHW sy-vline
WA_KKA1000_STR-ENDABGR sy-vline
WA_KKA1000_STR-INV1_KNZ sy-vline
WA_KKA1000_STR-FARR_RAD_ACTIVE sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.
