ABAP Select data from SAP table KSS03 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 KSS03 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 KSS03. 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 KSS03 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_KSS03 TYPE STANDARD TABLE OF KSS03,
WA_KSS03 TYPE KSS03,
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: <KSS03> TYPE KSS03.
*Process all fields in table header/work area as string values
PERFORM process_as_string_field_values CHANGING wa_KSS03.
SELECT *
*restrict ABAP select to first 10 rows
UP TO 10 ROWS
FROM KSS03
INTO TABLE IT_KSS03.
*Select data and declare internal table using in-line method @DATA
*SELECT *
* FROM KSS03
* INTO TABLE @DATA(IT_KSS032).
*--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_KSS03 INDEX 1 INTO DATA(WA_KSS032).
*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_KSS03 ASSIGNING <KSS03>.
*To update a field value using a field symbol simply change the value via the field symbol pointer<KSS03>-AWVRS = 1.
<KSS03>-VALUTYP = 1.
<KSS03>-WAFLG = 1.
<KSS03>-OBJNR = 1.
<KSS03>-KOSTL = 1.
ENDLOOP. LOOP AT IT_KSS03 INTO WA_KSS03. *Write horizonal line to screen report. WRITE:/ sy-uline. *Write selected data to screen/report before conversion. WRITE:/ sy-vline, WA_KSS03-LSTAR, sy-vline,
WA_KSS03-KSTRG, sy-vline,
WA_KSS03-AUFNR, sy-vline,
WA_KSS03-AUTYP, sy-vline,
WA_KSS03-POSNR, sy-vline,
WA_KSS03-WERKS, sy-vline.
ENDLOOP. *Add any further fields from structure WA_KSS03 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_KSS03 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_KSS03 INTO WA_KSS03. *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 AWVRS CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_KSS03-AWVRS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-AWVRS.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field KOSTL CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_KSS03-KOSTL IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-KOSTL.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field AUFNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_KSS03-AUFNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-AUFNR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit MATN1, internal->external for field MATNR CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT' EXPORTING input = WA_KSS03-MATNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-MATNR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field SAFNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_KSS03-SAFNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-SAFNR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit CUNIT, internal->external for field OMEIH CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_KSS03-OMEIH IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-OMEIH.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKGS CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-WKGS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-WKGS.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKFS CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-WKFS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-WKFS.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKVS CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-WKVS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-WKVS.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKLFS CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-WKLFS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-WKLFS.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKLVS CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-WKLVS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-WKLVS.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKGSM CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-WKGSM IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-WKGSM.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKFSM CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-WKFSM IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-WKFSM.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKVSM CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-WKVSM IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-WKVSM.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKGIB CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-WKGIB IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-WKGIB.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKFIB CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-WKFIB IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-WKFIB.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKVIB CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-WKVIB IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-WKVIB.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKGI CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-WKGI IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-WKGI.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKFI CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-WKFI IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-WKFI.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKVI CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-WKVI IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-WKVI.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKGIV CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-WKGIV IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-WKGIV.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKFIV CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-WKFIV IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-WKFIV.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKVIV CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-WKVIV IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-WKVIV.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field GAG CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-GAG IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-GAG.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field GAF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-GAF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-GAF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field GAV CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-GAV IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-GAV.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field PAG CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-PAG IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-PAG.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field PAF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-PAF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-PAF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field PAV CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-PAV IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-PAV.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field MAG CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-MAG IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-MAG.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field MAF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-MAF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-MAF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field MAV CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-MAV IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-MAV.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field SAG CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-SAG IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-SAG.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field SAF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-SAF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-SAF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field SAV CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-SAV IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-SAV.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field EAG CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-EAG IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-EAG.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field EAF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-EAF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-EAF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field EAV CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-EAV IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-EAV.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field VAG CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-VAG IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-VAG.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field VAF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-VAF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-VAF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field VAV CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-VAV IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-VAV.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field MPG CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-MPG IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-MPG.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field MPF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-MPF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-MPF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field MPV CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-MPV IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-MPV.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field VGG CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-VGG IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-VGG.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field VGF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-VGF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-VGF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field VGV CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-VGV IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-VGV.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field LAG CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-LAG IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-LAG.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field LAF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-LAF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-LAF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field LAV CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-LAV IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-LAV.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field FAG CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-FAG IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-FAG.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field RAG CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-RAG IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-RAG.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field RAF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-RAF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-RAF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field RAV CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-RAV IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-RAV.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field AUG CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-AUG IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-AUG.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field AUF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-AUF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-AUF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field AUV CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-AUV IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-AUV.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WIG CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-WIG IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-WIG.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WIF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-WIF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-WIF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WIV CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-WIV IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-WIV.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field TRG CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-TRG IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-TRG.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field TRF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-TRF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-TRF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field TRV CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-TRV IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-TRV.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field IPG CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-IPG IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-IPG.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field IPF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-IPF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-IPF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field IPV CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-IPV IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-IPV.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field OPG CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-OPG IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-OPG.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field OPF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-OPF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-OPF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field OPV CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_KSS03-OPV IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KSS03-OPV.
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_KSS03_STR,
AWVRS TYPE STRING,
VALUTYP TYPE STRING,
WAFLG TYPE STRING,
OBJNR TYPE STRING,
KOSTL TYPE STRING,
LSTAR TYPE STRING,
KSTRG TYPE STRING,
AUFNR TYPE STRING,
AUTYP TYPE STRING,
POSNR TYPE STRING,
WERKS TYPE STRING,
MATNR TYPE STRING,
VERID TYPE STRING,
PROCNR TYPE STRING,
SAFNR TYPE STRING,
OBJID TYPE STRING,
KTEXT TYPE STRING,
MEGPLA TYPE STRING,
MEGACT TYPE STRING,
MEGDIS TYPE STRING,
OMEIH TYPE STRING,
AWEAU TYPE STRING,
AWEWP TYPE STRING,
FIXVO_S TYPE STRING,
FIXVO_E TYPE STRING,
WAERS TYPE STRING,
WKGS TYPE STRING,
WKFS TYPE STRING,
WKVS TYPE STRING,
WKLFS TYPE STRING,
WKLVS TYPE STRING,
WKGSM TYPE STRING,
WKFSM TYPE STRING,
WKVSM TYPE STRING,
WKGIB TYPE STRING,
WKFIB TYPE STRING,
WKVIB TYPE STRING,
MEGIB TYPE STRING,
WKGI TYPE STRING,
WKFI TYPE STRING,
WKVI TYPE STRING,
WKGIV TYPE STRING,
WKFIV TYPE STRING,
WKVIV TYPE STRING,
BSG TYPE STRING,
GAG TYPE STRING,
GAF TYPE STRING,
GAV TYPE STRING,
GAG_PROZ TYPE STRING,
PAG TYPE STRING,
PAF TYPE STRING,
PAV TYPE STRING,
MAG TYPE STRING,
MAF TYPE STRING,
MAV TYPE STRING,
SAG TYPE STRING,
SAF TYPE STRING,
SAV TYPE STRING,
EAG TYPE STRING,
EAF TYPE STRING,
EAV TYPE STRING,
VAG TYPE STRING,
VAF TYPE STRING,
VAV TYPE STRING,
MPG TYPE STRING,
MPF TYPE STRING,
MPV TYPE STRING,
VGG TYPE STRING,
VGF TYPE STRING,
VGV TYPE STRING,
LAG TYPE STRING,
LAF TYPE STRING,
LAV TYPE STRING,
FAG TYPE STRING,
RAG TYPE STRING,
RAF TYPE STRING,
RAV TYPE STRING,
AUG TYPE STRING,
AUF TYPE STRING,
AUV TYPE STRING,
MEGA TYPE STRING,
WIG TYPE STRING,
WIF TYPE STRING,
WIV TYPE STRING,
MEGW TYPE STRING,
TRG TYPE STRING,
TRF TYPE STRING,
TRV TYPE STRING,
IPG TYPE STRING,
IPF TYPE STRING,
IPV TYPE STRING,
RAKDF TYPE STRING,
OPG TYPE STRING,
OPF TYPE STRING,
OPV TYPE STRING,END OF T_EKKO_STR. DATA: WA_KSS03_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_KSS03_STR-AWVRS sy-vline
WA_KSS03_STR-VALUTYP sy-vline
WA_KSS03_STR-WAFLG sy-vline
WA_KSS03_STR-OBJNR sy-vline
WA_KSS03_STR-KOSTL sy-vline
WA_KSS03_STR-LSTAR sy-vline
WA_KSS03_STR-KSTRG sy-vline
WA_KSS03_STR-AUFNR sy-vline
WA_KSS03_STR-AUTYP sy-vline
WA_KSS03_STR-POSNR sy-vline
WA_KSS03_STR-WERKS sy-vline
WA_KSS03_STR-MATNR sy-vline
WA_KSS03_STR-VERID sy-vline
WA_KSS03_STR-PROCNR sy-vline
WA_KSS03_STR-SAFNR sy-vline
WA_KSS03_STR-OBJID sy-vline
WA_KSS03_STR-KTEXT sy-vline
WA_KSS03_STR-MEGPLA sy-vline
WA_KSS03_STR-MEGACT sy-vline
WA_KSS03_STR-MEGDIS sy-vline
WA_KSS03_STR-OMEIH sy-vline
WA_KSS03_STR-AWEAU sy-vline
WA_KSS03_STR-AWEWP sy-vline
WA_KSS03_STR-FIXVO_S sy-vline
WA_KSS03_STR-FIXVO_E sy-vline
WA_KSS03_STR-WAERS sy-vline
WA_KSS03_STR-WKGS sy-vline
WA_KSS03_STR-WKFS sy-vline
WA_KSS03_STR-WKVS sy-vline
WA_KSS03_STR-WKLFS sy-vline
WA_KSS03_STR-WKLVS sy-vline
WA_KSS03_STR-WKGSM sy-vline
WA_KSS03_STR-WKFSM sy-vline
WA_KSS03_STR-WKVSM sy-vline
WA_KSS03_STR-WKGIB sy-vline
WA_KSS03_STR-WKFIB sy-vline
WA_KSS03_STR-WKVIB sy-vline
WA_KSS03_STR-MEGIB sy-vline
WA_KSS03_STR-WKGI sy-vline
WA_KSS03_STR-WKFI sy-vline
WA_KSS03_STR-WKVI sy-vline
WA_KSS03_STR-WKGIV sy-vline
WA_KSS03_STR-WKFIV sy-vline
WA_KSS03_STR-WKVIV sy-vline
WA_KSS03_STR-BSG sy-vline
WA_KSS03_STR-GAG sy-vline
WA_KSS03_STR-GAF sy-vline
WA_KSS03_STR-GAV sy-vline
WA_KSS03_STR-GAG_PROZ sy-vline
WA_KSS03_STR-PAG sy-vline
WA_KSS03_STR-PAF sy-vline
WA_KSS03_STR-PAV sy-vline
WA_KSS03_STR-MAG sy-vline
WA_KSS03_STR-MAF sy-vline
WA_KSS03_STR-MAV sy-vline
WA_KSS03_STR-SAG sy-vline
WA_KSS03_STR-SAF sy-vline
WA_KSS03_STR-SAV sy-vline
WA_KSS03_STR-EAG sy-vline
WA_KSS03_STR-EAF sy-vline
WA_KSS03_STR-EAV sy-vline
WA_KSS03_STR-VAG sy-vline
WA_KSS03_STR-VAF sy-vline
WA_KSS03_STR-VAV sy-vline
WA_KSS03_STR-MPG sy-vline
WA_KSS03_STR-MPF sy-vline
WA_KSS03_STR-MPV sy-vline
WA_KSS03_STR-VGG sy-vline
WA_KSS03_STR-VGF sy-vline
WA_KSS03_STR-VGV sy-vline
WA_KSS03_STR-LAG sy-vline
WA_KSS03_STR-LAF sy-vline
WA_KSS03_STR-LAV sy-vline
WA_KSS03_STR-FAG sy-vline
WA_KSS03_STR-RAG sy-vline
WA_KSS03_STR-RAF sy-vline
WA_KSS03_STR-RAV sy-vline
WA_KSS03_STR-AUG sy-vline
WA_KSS03_STR-AUF sy-vline
WA_KSS03_STR-AUV sy-vline
WA_KSS03_STR-MEGA sy-vline
WA_KSS03_STR-WIG sy-vline
WA_KSS03_STR-WIF sy-vline
WA_KSS03_STR-WIV sy-vline
WA_KSS03_STR-MEGW sy-vline
WA_KSS03_STR-TRG sy-vline
WA_KSS03_STR-TRF sy-vline
WA_KSS03_STR-TRV sy-vline
WA_KSS03_STR-IPG sy-vline
WA_KSS03_STR-IPF sy-vline
WA_KSS03_STR-IPV sy-vline
WA_KSS03_STR-RAKDF sy-vline
WA_KSS03_STR-OPG sy-vline
WA_KSS03_STR-OPF sy-vline
WA_KSS03_STR-OPV sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.
