ABAP Select data from SAP table OREXT 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 OREXT 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 OREXT. 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 OREXT 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_OREXT TYPE STANDARD TABLE OF OREXT,
WA_OREXT TYPE OREXT,
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: <OREXT> TYPE OREXT.
*Process all fields in table header/work area as string values
PERFORM process_as_string_field_values CHANGING wa_OREXT.
SELECT *
*restrict ABAP select to first 10 rows
UP TO 10 ROWS
FROM OREXT
INTO TABLE IT_OREXT.
*Select data and declare internal table using in-line method @DATA
*SELECT *
* FROM OREXT
* INTO TABLE @DATA(IT_OREXT2).
*--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_OREXT INDEX 1 INTO DATA(WA_OREXT2).
*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_OREXT ASSIGNING <OREXT>.
*To update a field value using a field symbol simply change the value via the field symbol pointer<OREXT>-AUFNR = 1.
<OREXT>-AUART = 1.
<OREXT>-KTEXT = 1.
<OREXT>-KOKRS = 1.
<OREXT>-BUKRS = 1.
ENDLOOP. LOOP AT IT_OREXT INTO WA_OREXT. *Write horizonal line to screen report. WRITE:/ sy-uline. *Write selected data to screen/report before conversion. WRITE:/ sy-vline, WA_OREXT-GSBER, sy-vline,
WA_OREXT-WERKS, sy-vline,
WA_OREXT-PRCTR, sy-vline,
WA_OREXT-KOSTV, sy-vline,
WA_OREXT-POSID, sy-vline,
WA_OREXT-STORT, sy-vline.
ENDLOOP. *Add any further fields from structure WA_OREXT 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_OREXT 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_OREXT INTO WA_OREXT. *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 AUFNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-AUFNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-AUFNR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field PRCTR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-PRCTR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-PRCTR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field KOSTV CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-KOSTV IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-KOSTV.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ABPSN, internal->external for field POSID CALL FUNCTION 'CONVERSION_EXIT_ABPSN_OUTPUT' EXPORTING input = WA_OREXT-POSID IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-POSID.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field KSTAR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-KSTAR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-KSTAR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field KOSTL CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-KOSTL IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-KOSTL.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field SAKNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-SAKNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-SAKNR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field VNAME CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-VNAME IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-VNAME.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field RECID CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-RECID IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-RECID.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field ETYPE CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-ETYPE IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-ETYPE.
WRITE:/ 'New Value:', ld_input.
*Conversion exit SCOPE, internal->external for field SCOPE CALL FUNCTION 'CONVERSION_EXIT_SCOPE_OUTPUT' EXPORTING input = WA_OREXT-SCOPE IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-SCOPE.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field KDAUF CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-KDAUF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-KDAUF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field AUFEX CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-AUFEX IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-AUFEX.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field AKSTL CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-AKSTL IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-AKSTL.
WRITE:/ 'New Value:', ld_input.
*Conversion exit PERBZ, internal->external for field PERBZ_1 CALL FUNCTION 'CONVERSION_EXIT_PERBZ_OUTPUT' EXPORTING input = WA_OREXT-PERBZ_1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-PERBZ_1.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field URZUO_1 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-URZUO_1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-URZUO_1.
WRITE:/ 'New Value:', ld_input.
*Conversion exit OBART, internal->external for field KONTY_1 CALL FUNCTION 'CONVERSION_EXIT_OBART_OUTPUT' EXPORTING input = WA_OREXT-KONTY_1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-KONTY_1.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field HKONT_1 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-HKONT_1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-HKONT_1.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field PRCTR_1 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-PRCTR_1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-PRCTR_1.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field KOSTL_1 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-KOSTL_1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-KOSTL_1.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field AUFNR_1 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-AUFNR_1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-AUFNR_1.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ABPSN, internal->external for field POSID_1 CALL FUNCTION 'CONVERSION_EXIT_ABPSN_OUTPUT' EXPORTING input = WA_OREXT-POSID_1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-POSID_1.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field ANLN1_1 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-ANLN1_1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-ANLN1_1.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field ANLN2_1 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-ANLN2_1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-ANLN2_1.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field NPLNR_1 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-NPLNR_1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-NPLNR_1.
WRITE:/ 'New Value:', ld_input.
*Conversion exit NUMCV, internal->external for field VORNR_1 CALL FUNCTION 'CONVERSION_EXIT_NUMCV_OUTPUT' EXPORTING input = WA_OREXT-VORNR_1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-VORNR_1.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field KDAUF_1 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-KDAUF_1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-KDAUF_1.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field PRZNR_1 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-PRZNR_1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-PRZNR_1.
WRITE:/ 'New Value:', ld_input.
*Conversion exit PERBZ, internal->external for field PERBZ_2 CALL FUNCTION 'CONVERSION_EXIT_PERBZ_OUTPUT' EXPORTING input = WA_OREXT-PERBZ_2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-PERBZ_2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field URZUO_2 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-URZUO_2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-URZUO_2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit OBART, internal->external for field KONTY_2 CALL FUNCTION 'CONVERSION_EXIT_OBART_OUTPUT' EXPORTING input = WA_OREXT-KONTY_2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-KONTY_2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field HKONT_2 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-HKONT_2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-HKONT_2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field PRCTR_2 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-PRCTR_2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-PRCTR_2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field KOSTL_2 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-KOSTL_2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-KOSTL_2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field AUFNR_2 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-AUFNR_2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-AUFNR_2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ABPSN, internal->external for field POSID_2 CALL FUNCTION 'CONVERSION_EXIT_ABPSN_OUTPUT' EXPORTING input = WA_OREXT-POSID_2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-POSID_2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field ANLN1_2 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-ANLN1_2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-ANLN1_2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field ANLN2_2 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-ANLN2_2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-ANLN2_2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field NPLNR_2 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-NPLNR_2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-NPLNR_2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit NUMCV, internal->external for field VORNR_2 CALL FUNCTION 'CONVERSION_EXIT_NUMCV_OUTPUT' EXPORTING input = WA_OREXT-VORNR_2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-VORNR_2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field KDAUF_2 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-KDAUF_2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-KDAUF_2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field PRZNR_2 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-PRZNR_2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-PRZNR_2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit PERBZ, internal->external for field PERBZ_3 CALL FUNCTION 'CONVERSION_EXIT_PERBZ_OUTPUT' EXPORTING input = WA_OREXT-PERBZ_3 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-PERBZ_3.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field URZUO_3 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-URZUO_3 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-URZUO_3.
WRITE:/ 'New Value:', ld_input.
*Conversion exit OBART, internal->external for field KONTY_3 CALL FUNCTION 'CONVERSION_EXIT_OBART_OUTPUT' EXPORTING input = WA_OREXT-KONTY_3 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-KONTY_3.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field HKONT_3 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-HKONT_3 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-HKONT_3.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field PRCTR_3 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-PRCTR_3 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-PRCTR_3.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field KOSTL_3 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-KOSTL_3 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-KOSTL_3.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field AUFNR_3 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-AUFNR_3 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-AUFNR_3.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ABPSN, internal->external for field POSID_3 CALL FUNCTION 'CONVERSION_EXIT_ABPSN_OUTPUT' EXPORTING input = WA_OREXT-POSID_3 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-POSID_3.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field ANLN1_3 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-ANLN1_3 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-ANLN1_3.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field ANLN2_3 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-ANLN2_3 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-ANLN2_3.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field NPLNR_3 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-NPLNR_3 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-NPLNR_3.
WRITE:/ 'New Value:', ld_input.
*Conversion exit NUMCV, internal->external for field VORNR_3 CALL FUNCTION 'CONVERSION_EXIT_NUMCV_OUTPUT' EXPORTING input = WA_OREXT-VORNR_3 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-VORNR_3.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field KDAUF_3 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-KDAUF_3 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-KDAUF_3.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field PRZNR_3 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-PRZNR_3 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-PRZNR_3.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field SIZECL CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-SIZECL IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-SIZECL.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field CYCLE CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-CYCLE IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-CYCLE.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field OTYPE CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-OTYPE IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-OTYPE.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field ANFAUFNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OREXT-ANFAUFNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OREXT-ANFAUFNR.
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_OREXT_STR,
AUFNR TYPE STRING,
AUART TYPE STRING,
KTEXT TYPE STRING,
KOKRS TYPE STRING,
BUKRS TYPE STRING,
GSBER TYPE STRING,
WERKS TYPE STRING,
PRCTR TYPE STRING,
KOSTV TYPE STRING,
POSID TYPE STRING,
STORT TYPE STRING,
SOWRK TYPE STRING,
ASTNR TYPE STRING,
VOGRP TYPE STRING,
PDAT1 TYPE STRING,
PDAT2 TYPE STRING,
PDAT3 TYPE STRING,
ASTKZ TYPE STRING,
WAERS TYPE STRING,
KALSM TYPE STRING,
ZSCHL TYPE STRING,
ABGSL TYPE STRING,
AWSLS TYPE STRING,
ABKRS TYPE STRING,
KSTAR TYPE STRING,
KOSTL TYPE STRING,
SAKNR TYPE STRING,
USER0 TYPE STRING,
USER1 TYPE STRING,
USER2 TYPE STRING,
USER3 TYPE STRING,
USER4 TYPE STRING,
USER5 TYPE STRING,
USER6 TYPE STRING,
USER7 TYPE STRING,
USER8 TYPE STRING,
USER9 TYPE STRING,
VNAME TYPE STRING,
RECID TYPE STRING,
ETYPE TYPE STRING,
TXJCD TYPE STRING,
JV_JIBCL TYPE STRING,
JV_JIBSA TYPE STRING,
SCOPE TYPE STRING,
KDAUF TYPE STRING,
KDPOS TYPE STRING,
AUFEX TYPE STRING,
IVPRO TYPE STRING,
AKSTL TYPE STRING,
PERBZ_1 TYPE STRING,
URZUO_1 TYPE STRING,
PROZS_1 TYPE STRING,
AQZIF_1 TYPE STRING,
BETRR_1 TYPE STRING,
KONTY_1 TYPE STRING,
GSBER_1 TYPE STRING,
BUKRS_1 TYPE STRING,
HKONT_1 TYPE STRING,
PRCTR_1 TYPE STRING,
KOSTL_1 TYPE STRING,
AUFNR_1 TYPE STRING,
POSID_1 TYPE STRING,
ANLN1_1 TYPE STRING,
ANLN2_1 TYPE STRING,
NPLNR_1 TYPE STRING,
VORNR_1 TYPE STRING,
KDAUF_1 TYPE STRING,
KDPOS_1 TYPE STRING,
KSTRG_1 TYPE STRING,
PRZNR_1 TYPE STRING,
PERBZ_2 TYPE STRING,
URZUO_2 TYPE STRING,
PROZS_2 TYPE STRING,
AQZIF_2 TYPE STRING,
BETRR_2 TYPE STRING,
KONTY_2 TYPE STRING,
GSBER_2 TYPE STRING,
BUKRS_2 TYPE STRING,
HKONT_2 TYPE STRING,
PRCTR_2 TYPE STRING,
KOSTL_2 TYPE STRING,
AUFNR_2 TYPE STRING,
POSID_2 TYPE STRING,
ANLN1_2 TYPE STRING,
ANLN2_2 TYPE STRING,
NPLNR_2 TYPE STRING,
VORNR_2 TYPE STRING,
KDAUF_2 TYPE STRING,
KDPOS_2 TYPE STRING,
KSTRG_2 TYPE STRING,
PRZNR_2 TYPE STRING,
PERBZ_3 TYPE STRING,
URZUO_3 TYPE STRING,
PROZS_3 TYPE STRING,
AQZIF_3 TYPE STRING,
BETRR_3 TYPE STRING,
KONTY_3 TYPE STRING,
GSBER_3 TYPE STRING,
BUKRS_3 TYPE STRING,
HKONT_3 TYPE STRING,
PRCTR_3 TYPE STRING,
KOSTL_3 TYPE STRING,
AUFNR_3 TYPE STRING,
POSID_3 TYPE STRING,
ANLN1_3 TYPE STRING,
ANLN2_3 TYPE STRING,
NPLNR_3 TYPE STRING,
VORNR_3 TYPE STRING,
KDAUF_3 TYPE STRING,
KDPOS_3 TYPE STRING,
KSTRG_3 TYPE STRING,
PRZNR_3 TYPE STRING,
EEW_AUFK_PS_DUMMY TYPE STRING,
ABUKR TYPE STRING,
SIZECL TYPE STRING,
IZWEK TYPE STRING,
UMWKZ TYPE STRING,
CYCLE TYPE STRING,
PLINT TYPE STRING,
ZSCHM TYPE STRING,
OTYPE TYPE STRING,
JV_OCO TYPE STRING,
ANFAUFNR TYPE STRING,
FUNC_AREA TYPE STRING,
CSTG_VRNT TYPE STRING,
VERAA_USER TYPE STRING,
LOEKZ TYPE STRING,
PLGKZ TYPE STRING,END OF T_EKKO_STR. DATA: WA_OREXT_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_OREXT_STR-AUFNR sy-vline
WA_OREXT_STR-AUART sy-vline
WA_OREXT_STR-KTEXT sy-vline
WA_OREXT_STR-KOKRS sy-vline
WA_OREXT_STR-BUKRS sy-vline
WA_OREXT_STR-GSBER sy-vline
WA_OREXT_STR-WERKS sy-vline
WA_OREXT_STR-PRCTR sy-vline
WA_OREXT_STR-KOSTV sy-vline
WA_OREXT_STR-POSID sy-vline
WA_OREXT_STR-STORT sy-vline
WA_OREXT_STR-SOWRK sy-vline
WA_OREXT_STR-ASTNR sy-vline
WA_OREXT_STR-VOGRP sy-vline
WA_OREXT_STR-PDAT1 sy-vline
WA_OREXT_STR-PDAT2 sy-vline
WA_OREXT_STR-PDAT3 sy-vline
WA_OREXT_STR-ASTKZ sy-vline
WA_OREXT_STR-WAERS sy-vline
WA_OREXT_STR-KALSM sy-vline
WA_OREXT_STR-ZSCHL sy-vline
WA_OREXT_STR-ABGSL sy-vline
WA_OREXT_STR-AWSLS sy-vline
WA_OREXT_STR-ABKRS sy-vline
WA_OREXT_STR-KSTAR sy-vline
WA_OREXT_STR-KOSTL sy-vline
WA_OREXT_STR-SAKNR sy-vline
WA_OREXT_STR-USER0 sy-vline
WA_OREXT_STR-USER1 sy-vline
WA_OREXT_STR-USER2 sy-vline
WA_OREXT_STR-USER3 sy-vline
WA_OREXT_STR-USER4 sy-vline
WA_OREXT_STR-USER5 sy-vline
WA_OREXT_STR-USER6 sy-vline
WA_OREXT_STR-USER7 sy-vline
WA_OREXT_STR-USER8 sy-vline
WA_OREXT_STR-USER9 sy-vline
WA_OREXT_STR-VNAME sy-vline
WA_OREXT_STR-RECID sy-vline
WA_OREXT_STR-ETYPE sy-vline
WA_OREXT_STR-TXJCD sy-vline
WA_OREXT_STR-JV_JIBCL sy-vline
WA_OREXT_STR-JV_JIBSA sy-vline
WA_OREXT_STR-SCOPE sy-vline
WA_OREXT_STR-KDAUF sy-vline
WA_OREXT_STR-KDPOS sy-vline
WA_OREXT_STR-AUFEX sy-vline
WA_OREXT_STR-IVPRO sy-vline
WA_OREXT_STR-AKSTL sy-vline
WA_OREXT_STR-PERBZ_1 sy-vline
WA_OREXT_STR-URZUO_1 sy-vline
WA_OREXT_STR-PROZS_1 sy-vline
WA_OREXT_STR-AQZIF_1 sy-vline
WA_OREXT_STR-BETRR_1 sy-vline
WA_OREXT_STR-KONTY_1 sy-vline
WA_OREXT_STR-GSBER_1 sy-vline
WA_OREXT_STR-BUKRS_1 sy-vline
WA_OREXT_STR-HKONT_1 sy-vline
WA_OREXT_STR-PRCTR_1 sy-vline
WA_OREXT_STR-KOSTL_1 sy-vline
WA_OREXT_STR-AUFNR_1 sy-vline
WA_OREXT_STR-POSID_1 sy-vline
WA_OREXT_STR-ANLN1_1 sy-vline
WA_OREXT_STR-ANLN2_1 sy-vline
WA_OREXT_STR-NPLNR_1 sy-vline
WA_OREXT_STR-VORNR_1 sy-vline
WA_OREXT_STR-KDAUF_1 sy-vline
WA_OREXT_STR-KDPOS_1 sy-vline
WA_OREXT_STR-KSTRG_1 sy-vline
WA_OREXT_STR-PRZNR_1 sy-vline
WA_OREXT_STR-PERBZ_2 sy-vline
WA_OREXT_STR-URZUO_2 sy-vline
WA_OREXT_STR-PROZS_2 sy-vline
WA_OREXT_STR-AQZIF_2 sy-vline
WA_OREXT_STR-BETRR_2 sy-vline
WA_OREXT_STR-KONTY_2 sy-vline
WA_OREXT_STR-GSBER_2 sy-vline
WA_OREXT_STR-BUKRS_2 sy-vline
WA_OREXT_STR-HKONT_2 sy-vline
WA_OREXT_STR-PRCTR_2 sy-vline
WA_OREXT_STR-KOSTL_2 sy-vline
WA_OREXT_STR-AUFNR_2 sy-vline
WA_OREXT_STR-POSID_2 sy-vline
WA_OREXT_STR-ANLN1_2 sy-vline
WA_OREXT_STR-ANLN2_2 sy-vline
WA_OREXT_STR-NPLNR_2 sy-vline
WA_OREXT_STR-VORNR_2 sy-vline
WA_OREXT_STR-KDAUF_2 sy-vline
WA_OREXT_STR-KDPOS_2 sy-vline
WA_OREXT_STR-KSTRG_2 sy-vline
WA_OREXT_STR-PRZNR_2 sy-vline
WA_OREXT_STR-PERBZ_3 sy-vline
WA_OREXT_STR-URZUO_3 sy-vline
WA_OREXT_STR-PROZS_3 sy-vline
WA_OREXT_STR-AQZIF_3 sy-vline
WA_OREXT_STR-BETRR_3 sy-vline
WA_OREXT_STR-KONTY_3 sy-vline
WA_OREXT_STR-GSBER_3 sy-vline
WA_OREXT_STR-BUKRS_3 sy-vline
WA_OREXT_STR-HKONT_3 sy-vline
WA_OREXT_STR-PRCTR_3 sy-vline
WA_OREXT_STR-KOSTL_3 sy-vline
WA_OREXT_STR-AUFNR_3 sy-vline
WA_OREXT_STR-POSID_3 sy-vline
WA_OREXT_STR-ANLN1_3 sy-vline
WA_OREXT_STR-ANLN2_3 sy-vline
WA_OREXT_STR-NPLNR_3 sy-vline
WA_OREXT_STR-VORNR_3 sy-vline
WA_OREXT_STR-KDAUF_3 sy-vline
WA_OREXT_STR-KDPOS_3 sy-vline
WA_OREXT_STR-KSTRG_3 sy-vline
WA_OREXT_STR-PRZNR_3 sy-vline
WA_OREXT_STR-EEW_AUFK_PS_DUMMY sy-vline
WA_OREXT_STR-ABUKR sy-vline
WA_OREXT_STR-SIZECL sy-vline
WA_OREXT_STR-IZWEK sy-vline
WA_OREXT_STR-UMWKZ sy-vline
WA_OREXT_STR-CYCLE sy-vline
WA_OREXT_STR-PLINT sy-vline
WA_OREXT_STR-ZSCHM sy-vline
WA_OREXT_STR-OTYPE sy-vline
WA_OREXT_STR-JV_OCO sy-vline
WA_OREXT_STR-ANFAUFNR sy-vline
WA_OREXT_STR-FUNC_AREA sy-vline
WA_OREXT_STR-CSTG_VRNT sy-vline
WA_OREXT_STR-VERAA_USER sy-vline
WA_OREXT_STR-LOEKZ sy-vline
WA_OREXT_STR-PLGKZ sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.
