ABAP Select data from SAP table ACCCLR_ITM 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 ACCCLR_ITM 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 ACCCLR_ITM. 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 ACCCLR_ITM 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_ACCCLR_ITM TYPE STANDARD TABLE OF ACCCLR_ITM,
WA_ACCCLR_ITM TYPE ACCCLR_ITM,
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: <ACCCLR_ITM> TYPE ACCCLR_ITM.
*Process all fields in table header/work area as string values
PERFORM process_as_string_field_values CHANGING wa_ACCCLR_ITM.
SELECT *
*restrict ABAP select to first 10 rows
UP TO 10 ROWS
FROM ACCCLR_ITM
INTO TABLE IT_ACCCLR_ITM.
*Select data and declare internal table using in-line method @DATA
*SELECT *
* FROM ACCCLR_ITM
* INTO TABLE @DATA(IT_ACCCLR_ITM2).
*--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_ACCCLR_ITM INDEX 1 INTO DATA(WA_ACCCLR_ITM2).
*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_ACCCLR_ITM ASSIGNING <ACCCLR_ITM>.
*To update a field value using a field symbol simply change the value via the field symbol pointer<ACCCLR_ITM>-AUFNR = 1.
<ACCCLR_ITM>-BDIF2 = 1.
<ACCCLR_ITM>-BDIF3 = 1.
<ACCCLR_ITM>-BDIFF = 1.
<ACCCLR_ITM>-BELNR = 1.
ENDLOOP. LOOP AT IT_ACCCLR_ITM INTO WA_ACCCLR_ITM. *Write horizonal line to screen report. WRITE:/ sy-uline. *Write selected data to screen/report before conversion. WRITE:/ sy-vline, WA_ACCCLR_ITM-BLART, sy-vline,
WA_ACCCLR_ITM-BLDAT, sy-vline,
WA_ACCCLR_ITM-BSCHL, sy-vline,
WA_ACCCLR_ITM-BSTAT, sy-vline,
WA_ACCCLR_ITM-BUDAT, sy-vline,
WA_ACCCLR_ITM-BUKRS, sy-vline.
ENDLOOP. *Add any further fields from structure WA_ACCCLR_ITM 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_ACCCLR_ITM 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_ACCCLR_ITM INTO WA_ACCCLR_ITM. *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_ACCCLR_ITM-AUFNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-AUFNR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC132, internal->external for field BDIF2 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-BDIF2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-BDIF2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC132, internal->external for field BDIF3 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-BDIF3 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-BDIF3.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC132, internal->external for field BDIFF CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-BDIFF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-BDIFF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field BELNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-BELNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-BELNR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field DMBE2 CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-DMBE2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-DMBE2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field DMBE3 CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-DMBE3 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-DMBE3.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field DMBTR CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-DMBTR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-DMBTR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit FMCIS, internal->external for field FIPOS CALL FUNCTION 'CONVERSION_EXIT_FMCIS_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-FIPOS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-FIPOS.
WRITE:/ 'New Value:', ld_input.
*Conversion exit GJAHR, internal->external for field GJAHR CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-GJAHR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-GJAHR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field GRANT_NBR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-GRANT_NBR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-GRANT_NBR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field HKONT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-HKONT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-HKONT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit IMKEY, internal->external for field IMKEY CALL FUNCTION 'CONVERSION_EXIT_IMKEY_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-IMKEY IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-IMKEY.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field KOSTL CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-KOSTL IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-KOSTL.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field MWST2 CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-MWST2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-MWST2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field MWST3 CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-MWST3 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-MWST3.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field MWSTS CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-MWSTS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-MWSTS.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC132, internal->external for field PPDIF2 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-PPDIF2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-PPDIF2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC132, internal->external for field PPDIF3 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-PPDIF3 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-PPDIF3.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC132, internal->external for field PPDIFF CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-PPDIFF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-PPDIFF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field PPRCT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-PPRCT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-PPRCT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field PRCTR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-PRCTR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-PRCTR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ABPSP, internal->external for field PROJK CALL FUNCTION 'CONVERSION_EXIT_ABPSP_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-PROJK IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-PROJK.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field PSWBT CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-PSWBT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-PSWBT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field VBUND CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-VBUND IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-VBUND.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field WMWST CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-WMWST IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-WMWST.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field WRBTR CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-WRBTR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-WRBTR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field SKTFW CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-SKTFW IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-SKTFW.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field KDWBT CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-KDWBT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-KDWBT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit GJAHR, internal->external for field ANFBJ CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-ANFBJ IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-ANFBJ.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field ANFBN CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-ANFBN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-ANFBN.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field ANLN1 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-ANLN1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-ANLN1.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field ANLN2 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-ANLN2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-ANLN2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC132, internal->external for field DMB21 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-DMB21 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-DMB21.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC132, internal->external for field DMB22 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-DMB22 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-DMB22.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC132, internal->external for field DMB23 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-DMB23 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-DMB23.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC132, internal->external for field DMB31 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-DMB31 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-DMB31.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC132, internal->external for field DMB32 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-DMB32 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-DMB32.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC132, internal->external for field DMB33 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-DMB33 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-DMB33.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC132, internal->external for field DMBT1 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-DMBT1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-DMBT1.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC132, internal->external for field DMBT2 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-DMBT2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-DMBT2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC132, internal->external for field DMBT3 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-DMBT3 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-DMBT3.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field EBELN CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-EBELN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-EBELN.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field EMPFB CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-EMPFB IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-EMPFB.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field FILKD CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-FILKD IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-FILKD.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field KBLNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-KBLNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-KBLNR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field LOTKZ CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-LOTKZ IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-LOTKZ.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field NPLNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-NPLNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-NPLNR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field PYAMT CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-PYAMT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-PYAMT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field QBSHB CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-QBSHB IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-QBSHB.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field QSSHB CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-QSSHB IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-QSSHB.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field REBZG CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-REBZG IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-REBZG.
WRITE:/ 'New Value:', ld_input.
*Conversion exit GJAHR, internal->external for field REBZJ CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-REBZJ IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-REBZJ.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field SAKNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-SAKNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-SAKNR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field SKFBT CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-SKFBT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-SKFBT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field SKNT2 CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-SKNT2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-SKNT2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field SKNT3 CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-SKNT3 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-SKNT3.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field SKNTO CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-SKNTO IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-SKNTO.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field VBEL2 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-VBEL2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-VBEL2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field VBELN CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-VBELN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-VBELN.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field VERTN CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-VERTN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-VERTN.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC132, internal->external for field WRBT1 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-WRBT1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-WRBT1.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC132, internal->external for field WRBT2 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-WRBT2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-WRBT2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC132, internal->external for field WRBT3 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-WRBT3 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-WRBT3.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field WSKTO CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-WSKTO IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-WSKTO.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field KONKO CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-KONKO IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-KONKO.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC132, internal->external for field DIFFW CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-DIFFW IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-DIFFW.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field DIFHW CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-DIFHW IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-DIFHW.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field DIFH2 CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-DIFH2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-DIFH2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field DIFH3 CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_ACCCLR_ITM-DIFH3 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ACCCLR_ITM-DIFH3.
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_ACCCLR_ITM_STR,
AUFNR TYPE STRING,
BDIF2 TYPE STRING,
BDIF3 TYPE STRING,
BDIFF TYPE STRING,
BELNR TYPE STRING,
BLART TYPE STRING,
BLDAT TYPE STRING,
BSCHL TYPE STRING,
BSTAT TYPE STRING,
BUDAT TYPE STRING,
BUKRS TYPE STRING,
BUPLA TYPE STRING,
BUZEI TYPE STRING,
BUZID TYPE STRING,
DABRZ TYPE STRING,
DMBE2 TYPE STRING,
DMBE3 TYPE STRING,
DMBTR TYPE STRING,
FIPOS TYPE STRING,
FISTL TYPE STRING,
FKBER TYPE STRING,
GEBER TYPE STRING,
GJAHR TYPE STRING,
GRANT_NBR TYPE STRING,
GSBER TYPE STRING,
HKONT TYPE STRING,
IMKEY TYPE STRING,
KOSTL TYPE STRING,
MWSKZ TYPE STRING,
MWST2 TYPE STRING,
MWST3 TYPE STRING,
MWSTS TYPE STRING,
PPDIF2 TYPE STRING,
PPDIF3 TYPE STRING,
PPDIFF TYPE STRING,
PPRCT TYPE STRING,
PRCTR TYPE STRING,
PROJK TYPE STRING,
PSWBT TYPE STRING,
PSWSL TYPE STRING,
QSSKZ TYPE STRING,
SGTXT TYPE STRING,
SHKZG TYPE STRING,
VBUND TYPE STRING,
WAERS TYPE STRING,
WMWST TYPE STRING,
WRBTR TYPE STRING,
XBLNR TYPE STRING,
XNEGP TYPE STRING,
XRAGL TYPE STRING,
XREF3 TYPE STRING,
XSTOV TYPE STRING,
ZFBDT TYPE STRING,
ZUONR TYPE STRING,
BUDGET_PD TYPE STRING,
DUMMY_INCL_EEW_COBL TYPE STRING,
SKTFW TYPE STRING,
KDWBT TYPE STRING,
ANFBJ TYPE STRING,
ANFBN TYPE STRING,
ANFBU TYPE STRING,
ANLN1 TYPE STRING,
ANLN2 TYPE STRING,
APLZL TYPE STRING,
AUFPL TYPE STRING,
BVTYP TYPE STRING,
CESSION_KZ TYPE STRING,
DIEKZ TYPE STRING,
DMB21 TYPE STRING,
DMB22 TYPE STRING,
DMB23 TYPE STRING,
DMB31 TYPE STRING,
DMB32 TYPE STRING,
DMB33 TYPE STRING,
DMBT1 TYPE STRING,
DMBT2 TYPE STRING,
DMBT3 TYPE STRING,
DTWS1 TYPE STRING,
DTWS2 TYPE STRING,
DTWS3 TYPE STRING,
DTWS4 TYPE STRING,
EBELN TYPE STRING,
EBELP TYPE STRING,
EGBLD TYPE STRING,
EGLLD TYPE STRING,
EMPFB TYPE STRING,
ETEN2 TYPE STRING,
FILKD TYPE STRING,
HBKID TYPE STRING,
KBLNR TYPE STRING,
KBLPOS TYPE STRING,
KIDNO TYPE STRING,
KKBER TYPE STRING,
LANDL TYPE STRING,
LOTKZ TYPE STRING,
LZBKZ TYPE STRING,
MABER TYPE STRING,
MANSP TYPE STRING,
MANST TYPE STRING,
MWSK1 TYPE STRING,
MWSK2 TYPE STRING,
MWSK3 TYPE STRING,
NPLNR TYPE STRING,
POSN2 TYPE STRING,
PYAMT TYPE STRING,
PYCUR TYPE STRING,
QBSHB TYPE STRING,
QSSHB TYPE STRING,
QSZNR TYPE STRING,
REBZG TYPE STRING,
REBZJ TYPE STRING,
REBZT TYPE STRING,
REBZZ TYPE STRING,
RSTGR TYPE STRING,
SAKNR TYPE STRING,
SAMNR TYPE STRING,
SECCO TYPE STRING,
SKFBT TYPE STRING,
SKNT2 TYPE STRING,
SKNT3 TYPE STRING,
SKNTO TYPE STRING,
STCEG TYPE STRING,
UMSKS TYPE STRING,
UMSKZ TYPE STRING,
UZAWE TYPE STRING,
VBEL2 TYPE STRING,
VBELN TYPE STRING,
VBEWA TYPE STRING,
VERTN TYPE STRING,
VERTT TYPE STRING,
WRBT1 TYPE STRING,
WRBT2 TYPE STRING,
WRBT3 TYPE STRING,
WSKTO TYPE STRING,
XANET TYPE STRING,
XCPDD TYPE STRING,
XEGDR TYPE STRING,
XINVE TYPE STRING,
XNETB TYPE STRING,
XPYPR TYPE STRING,
XREF1 TYPE STRING,
XREF2 TYPE STRING,
ZBD1P TYPE STRING,
ZBD1T TYPE STRING,
ZBD2P TYPE STRING,
ZBD2T TYPE STRING,
ZBD3T TYPE STRING,
ZBFIX TYPE STRING,
ZEKKN TYPE STRING,
ZINKZ TYPE STRING,
ZLSCH TYPE STRING,
ZLSPR TYPE STRING,
ZTERM TYPE STRING,
ZUMSK TYPE STRING,
BEWAR TYPE STRING,
VALUT TYPE STRING,
WERKS TYPE STRING,
KOART TYPE STRING,
KONKO TYPE STRING,
WAERS_CLR TYPE STRING,
STATUS TYPE STRING,
DIFFW TYPE STRING,
DIFHW TYPE STRING,
DIFH2 TYPE STRING,
DIFH3 TYPE STRING,
XAKTS TYPE STRING,
XVORT TYPE STRING,END OF T_EKKO_STR. DATA: WA_ACCCLR_ITM_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_ACCCLR_ITM_STR-AUFNR sy-vline
WA_ACCCLR_ITM_STR-BDIF2 sy-vline
WA_ACCCLR_ITM_STR-BDIF3 sy-vline
WA_ACCCLR_ITM_STR-BDIFF sy-vline
WA_ACCCLR_ITM_STR-BELNR sy-vline
WA_ACCCLR_ITM_STR-BLART sy-vline
WA_ACCCLR_ITM_STR-BLDAT sy-vline
WA_ACCCLR_ITM_STR-BSCHL sy-vline
WA_ACCCLR_ITM_STR-BSTAT sy-vline
WA_ACCCLR_ITM_STR-BUDAT sy-vline
WA_ACCCLR_ITM_STR-BUKRS sy-vline
WA_ACCCLR_ITM_STR-BUPLA sy-vline
WA_ACCCLR_ITM_STR-BUZEI sy-vline
WA_ACCCLR_ITM_STR-BUZID sy-vline
WA_ACCCLR_ITM_STR-DABRZ sy-vline
WA_ACCCLR_ITM_STR-DMBE2 sy-vline
WA_ACCCLR_ITM_STR-DMBE3 sy-vline
WA_ACCCLR_ITM_STR-DMBTR sy-vline
WA_ACCCLR_ITM_STR-FIPOS sy-vline
WA_ACCCLR_ITM_STR-FISTL sy-vline
WA_ACCCLR_ITM_STR-FKBER sy-vline
WA_ACCCLR_ITM_STR-GEBER sy-vline
WA_ACCCLR_ITM_STR-GJAHR sy-vline
WA_ACCCLR_ITM_STR-GRANT_NBR sy-vline
WA_ACCCLR_ITM_STR-GSBER sy-vline
WA_ACCCLR_ITM_STR-HKONT sy-vline
WA_ACCCLR_ITM_STR-IMKEY sy-vline
WA_ACCCLR_ITM_STR-KOSTL sy-vline
WA_ACCCLR_ITM_STR-MWSKZ sy-vline
WA_ACCCLR_ITM_STR-MWST2 sy-vline
WA_ACCCLR_ITM_STR-MWST3 sy-vline
WA_ACCCLR_ITM_STR-MWSTS sy-vline
WA_ACCCLR_ITM_STR-PPDIF2 sy-vline
WA_ACCCLR_ITM_STR-PPDIF3 sy-vline
WA_ACCCLR_ITM_STR-PPDIFF sy-vline
WA_ACCCLR_ITM_STR-PPRCT sy-vline
WA_ACCCLR_ITM_STR-PRCTR sy-vline
WA_ACCCLR_ITM_STR-PROJK sy-vline
WA_ACCCLR_ITM_STR-PSWBT sy-vline
WA_ACCCLR_ITM_STR-PSWSL sy-vline
WA_ACCCLR_ITM_STR-QSSKZ sy-vline
WA_ACCCLR_ITM_STR-SGTXT sy-vline
WA_ACCCLR_ITM_STR-SHKZG sy-vline
WA_ACCCLR_ITM_STR-VBUND sy-vline
WA_ACCCLR_ITM_STR-WAERS sy-vline
WA_ACCCLR_ITM_STR-WMWST sy-vline
WA_ACCCLR_ITM_STR-WRBTR sy-vline
WA_ACCCLR_ITM_STR-XBLNR sy-vline
WA_ACCCLR_ITM_STR-XNEGP sy-vline
WA_ACCCLR_ITM_STR-XRAGL sy-vline
WA_ACCCLR_ITM_STR-XREF3 sy-vline
WA_ACCCLR_ITM_STR-XSTOV sy-vline
WA_ACCCLR_ITM_STR-ZFBDT sy-vline
WA_ACCCLR_ITM_STR-ZUONR sy-vline
WA_ACCCLR_ITM_STR-BUDGET_PD sy-vline
WA_ACCCLR_ITM_STR-DUMMY_INCL_EEW_COBL sy-vline
WA_ACCCLR_ITM_STR-SKTFW sy-vline
WA_ACCCLR_ITM_STR-KDWBT sy-vline
WA_ACCCLR_ITM_STR-ANFBJ sy-vline
WA_ACCCLR_ITM_STR-ANFBN sy-vline
WA_ACCCLR_ITM_STR-ANFBU sy-vline
WA_ACCCLR_ITM_STR-ANLN1 sy-vline
WA_ACCCLR_ITM_STR-ANLN2 sy-vline
WA_ACCCLR_ITM_STR-APLZL sy-vline
WA_ACCCLR_ITM_STR-AUFPL sy-vline
WA_ACCCLR_ITM_STR-BVTYP sy-vline
WA_ACCCLR_ITM_STR-CESSION_KZ sy-vline
WA_ACCCLR_ITM_STR-DIEKZ sy-vline
WA_ACCCLR_ITM_STR-DMB21 sy-vline
WA_ACCCLR_ITM_STR-DMB22 sy-vline
WA_ACCCLR_ITM_STR-DMB23 sy-vline
WA_ACCCLR_ITM_STR-DMB31 sy-vline
WA_ACCCLR_ITM_STR-DMB32 sy-vline
WA_ACCCLR_ITM_STR-DMB33 sy-vline
WA_ACCCLR_ITM_STR-DMBT1 sy-vline
WA_ACCCLR_ITM_STR-DMBT2 sy-vline
WA_ACCCLR_ITM_STR-DMBT3 sy-vline
WA_ACCCLR_ITM_STR-DTWS1 sy-vline
WA_ACCCLR_ITM_STR-DTWS2 sy-vline
WA_ACCCLR_ITM_STR-DTWS3 sy-vline
WA_ACCCLR_ITM_STR-DTWS4 sy-vline
WA_ACCCLR_ITM_STR-EBELN sy-vline
WA_ACCCLR_ITM_STR-EBELP sy-vline
WA_ACCCLR_ITM_STR-EGBLD sy-vline
WA_ACCCLR_ITM_STR-EGLLD sy-vline
WA_ACCCLR_ITM_STR-EMPFB sy-vline
WA_ACCCLR_ITM_STR-ETEN2 sy-vline
WA_ACCCLR_ITM_STR-FILKD sy-vline
WA_ACCCLR_ITM_STR-HBKID sy-vline
WA_ACCCLR_ITM_STR-KBLNR sy-vline
WA_ACCCLR_ITM_STR-KBLPOS sy-vline
WA_ACCCLR_ITM_STR-KIDNO sy-vline
WA_ACCCLR_ITM_STR-KKBER sy-vline
WA_ACCCLR_ITM_STR-LANDL sy-vline
WA_ACCCLR_ITM_STR-LOTKZ sy-vline
WA_ACCCLR_ITM_STR-LZBKZ sy-vline
WA_ACCCLR_ITM_STR-MABER sy-vline
WA_ACCCLR_ITM_STR-MANSP sy-vline
WA_ACCCLR_ITM_STR-MANST sy-vline
WA_ACCCLR_ITM_STR-MWSK1 sy-vline
WA_ACCCLR_ITM_STR-MWSK2 sy-vline
WA_ACCCLR_ITM_STR-MWSK3 sy-vline
WA_ACCCLR_ITM_STR-NPLNR sy-vline
WA_ACCCLR_ITM_STR-POSN2 sy-vline
WA_ACCCLR_ITM_STR-PYAMT sy-vline
WA_ACCCLR_ITM_STR-PYCUR sy-vline
WA_ACCCLR_ITM_STR-QBSHB sy-vline
WA_ACCCLR_ITM_STR-QSSHB sy-vline
WA_ACCCLR_ITM_STR-QSZNR sy-vline
WA_ACCCLR_ITM_STR-REBZG sy-vline
WA_ACCCLR_ITM_STR-REBZJ sy-vline
WA_ACCCLR_ITM_STR-REBZT sy-vline
WA_ACCCLR_ITM_STR-REBZZ sy-vline
WA_ACCCLR_ITM_STR-RSTGR sy-vline
WA_ACCCLR_ITM_STR-SAKNR sy-vline
WA_ACCCLR_ITM_STR-SAMNR sy-vline
WA_ACCCLR_ITM_STR-SECCO sy-vline
WA_ACCCLR_ITM_STR-SKFBT sy-vline
WA_ACCCLR_ITM_STR-SKNT2 sy-vline
WA_ACCCLR_ITM_STR-SKNT3 sy-vline
WA_ACCCLR_ITM_STR-SKNTO sy-vline
WA_ACCCLR_ITM_STR-STCEG sy-vline
WA_ACCCLR_ITM_STR-UMSKS sy-vline
WA_ACCCLR_ITM_STR-UMSKZ sy-vline
WA_ACCCLR_ITM_STR-UZAWE sy-vline
WA_ACCCLR_ITM_STR-VBEL2 sy-vline
WA_ACCCLR_ITM_STR-VBELN sy-vline
WA_ACCCLR_ITM_STR-VBEWA sy-vline
WA_ACCCLR_ITM_STR-VERTN sy-vline
WA_ACCCLR_ITM_STR-VERTT sy-vline
WA_ACCCLR_ITM_STR-WRBT1 sy-vline
WA_ACCCLR_ITM_STR-WRBT2 sy-vline
WA_ACCCLR_ITM_STR-WRBT3 sy-vline
WA_ACCCLR_ITM_STR-WSKTO sy-vline
WA_ACCCLR_ITM_STR-XANET sy-vline
WA_ACCCLR_ITM_STR-XCPDD sy-vline
WA_ACCCLR_ITM_STR-XEGDR sy-vline
WA_ACCCLR_ITM_STR-XINVE sy-vline
WA_ACCCLR_ITM_STR-XNETB sy-vline
WA_ACCCLR_ITM_STR-XPYPR sy-vline
WA_ACCCLR_ITM_STR-XREF1 sy-vline
WA_ACCCLR_ITM_STR-XREF2 sy-vline
WA_ACCCLR_ITM_STR-ZBD1P sy-vline
WA_ACCCLR_ITM_STR-ZBD1T sy-vline
WA_ACCCLR_ITM_STR-ZBD2P sy-vline
WA_ACCCLR_ITM_STR-ZBD2T sy-vline
WA_ACCCLR_ITM_STR-ZBD3T sy-vline
WA_ACCCLR_ITM_STR-ZBFIX sy-vline
WA_ACCCLR_ITM_STR-ZEKKN sy-vline
WA_ACCCLR_ITM_STR-ZINKZ sy-vline
WA_ACCCLR_ITM_STR-ZLSCH sy-vline
WA_ACCCLR_ITM_STR-ZLSPR sy-vline
WA_ACCCLR_ITM_STR-ZTERM sy-vline
WA_ACCCLR_ITM_STR-ZUMSK sy-vline
WA_ACCCLR_ITM_STR-BEWAR sy-vline
WA_ACCCLR_ITM_STR-VALUT sy-vline
WA_ACCCLR_ITM_STR-WERKS sy-vline
WA_ACCCLR_ITM_STR-KOART sy-vline
WA_ACCCLR_ITM_STR-KONKO sy-vline
WA_ACCCLR_ITM_STR-WAERS_CLR sy-vline
WA_ACCCLR_ITM_STR-STATUS sy-vline
WA_ACCCLR_ITM_STR-DIFFW sy-vline
WA_ACCCLR_ITM_STR-DIFHW sy-vline
WA_ACCCLR_ITM_STR-DIFH2 sy-vline
WA_ACCCLR_ITM_STR-DIFH3 sy-vline
WA_ACCCLR_ITM_STR-XAKTS sy-vline
WA_ACCCLR_ITM_STR-XVORT sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.
