ABAP Select data from SAP table EPIC_S_BRS_ITEM 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 EPIC_S_BRS_ITEM 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 EPIC_S_BRS_ITEM. 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 EPIC_S_BRS_ITEM 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_EPIC_S_BRS_ITEM TYPE STANDARD TABLE OF EPIC_S_BRS_ITEM,
      WA_EPIC_S_BRS_ITEM TYPE EPIC_S_BRS_ITEM,
      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: <EPIC_S_BRS_ITEM> TYPE EPIC_S_BRS_ITEM.

*Process all fields in table header/work area as string values
  PERFORM process_as_string_field_values CHANGING wa_EPIC_S_BRS_ITEM.

SELECT *
*restrict ABAP select to first 10 rows
 UP TO 10 ROWS      
  FROM EPIC_S_BRS_ITEM
  INTO TABLE IT_EPIC_S_BRS_ITEM.

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM EPIC_S_BRS_ITEM
*  INTO TABLE @DATA(IT_EPIC_S_BRS_ITEM2).
*--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_EPIC_S_BRS_ITEM INDEX 1 INTO DATA(WA_EPIC_S_BRS_ITEM2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_EPIC_S_BRS_ITEM ASSIGNING <EPIC_S_BRS_ITEM>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<EPIC_S_BRS_ITEM>-ITEM_DATE = 1.
<EPIC_S_BRS_ITEM>-DOCUMENT_NUM = 1.
<EPIC_S_BRS_ITEM>-DOCUMENT_ITEM_NUM = 1.
<EPIC_S_BRS_ITEM>-EBS_NUM = 1.
<EPIC_S_BRS_ITEM>-EBS_ITEM_NUM = 1.
ENDLOOP.

LOOP AT IT_EPIC_S_BRS_ITEM INTO WA_EPIC_S_BRS_ITEM.
*Write horizonal line to screen report.
  WRITE:/ sy-uline.

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_EPIC_S_BRS_ITEM-SUBACCOUNT, sy-vline,
WA_EPIC_S_BRS_ITEM-SGTXT, sy-vline,
WA_EPIC_S_BRS_ITEM-BREM_AMOUNT, sy-vline,
WA_EPIC_S_BRS_ITEM-BPEM_AMOUNT, sy-vline,
WA_EPIC_S_BRS_ITEM-ERBM_AMOUNT, sy-vline,
WA_EPIC_S_BRS_ITEM-EPBM_AMOUNT, sy-vline.
ENDLOOP. *Add any further fields from structure WA_EPIC_S_BRS_ITEM 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_EPIC_S_BRS_ITEM 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_EPIC_S_BRS_ITEM INTO WA_EPIC_S_BRS_ITEM. *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 DOCUMENT_NUM CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-DOCUMENT_NUM IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-DOCUMENT_NUM.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field SUBACCOUNT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-SUBACCOUNT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-SUBACCOUNT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field BREM_AMOUNT CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-BREM_AMOUNT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-BREM_AMOUNT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field BPEM_AMOUNT CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-BPEM_AMOUNT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-BPEM_AMOUNT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field ERBM_AMOUNT CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-ERBM_AMOUNT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-ERBM_AMOUNT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field EPBM_AMOUNT CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-EPBM_AMOUNT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-EPBM_AMOUNT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit GJAHR, internal->external for field DOCUMENT_FISCALYEAR CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-DOCUMENT_FISCALYEAR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-DOCUMENT_FISCALYEAR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit GJAHR, internal->external for field GJAHR CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-GJAHR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-GJAHR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field HKONT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-HKONT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-HKONT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field AUGBL CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-AUGBL IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-AUGBL.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field DMBTR CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-DMBTR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-DMBTR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field WRBTR CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-WRBTR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-WRBTR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field MWSTS CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-MWSTS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-MWSTS.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field WMWST CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-WMWST IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-WMWST.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field AUFNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-AUFNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-AUFNR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field KOSTL CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-KOSTL IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-KOSTL.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field BDIFF CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-BDIFF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-BDIFF.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field BDIF2 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-BDIF2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-BDIF2.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field VBUND CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-VBUND IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-VBUND.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field DMBE2 CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-DMBE2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-DMBE2.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field DMBE3 CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-DMBE3 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-DMBE3.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field MWST2 CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-MWST2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-MWST2.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field MWST3 CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-MWST3 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-MWST3.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field BDIF3 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-BDIF3 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-BDIF3.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field RDIF3 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-RDIF3 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-RDIF3.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ABPSP, internal->external for field PROJK CALL FUNCTION 'CONVERSION_EXIT_ABPSP_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-PROJK IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-PROJK.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field PRCTR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-PRCTR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-PRCTR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field PSWBT CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-PSWBT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-PSWBT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field CCBTC CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-CCBTC IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-CCBTC.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field PPDIFF CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-PPDIFF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-PPDIFF.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field PPDIF2 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-PPDIF2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-PPDIF2.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field PPDIF3 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-PPDIF3 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-PPDIF3.
WRITE:/ 'New Value:', ld_input.

*Conversion exit IMKEY, internal->external for field IMKEY CALL FUNCTION 'CONVERSION_EXIT_IMKEY_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-IMKEY IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-IMKEY.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field GRANT_NBR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-GRANT_NBR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-GRANT_NBR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit FMCIS, internal->external for field FIPOS CALL FUNCTION 'CONVERSION_EXIT_FMCIS_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-FIPOS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-FIPOS.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field PPRCT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-PPRCT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-PPRCT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit GJAHR, internal->external for field AUGGJ CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-AUGGJ IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-AUGGJ.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field SEGMENT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-SEGMENT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-SEGMENT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field PSEGMENT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-PSEGMENT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-PSEGMENT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field PGRANT_NBR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-PGRANT_NBR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-PGRANT_NBR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field KWBTR CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-KWBTR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-KWBTR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field AVKON CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-AVKON IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-AVKON.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field FWBTR CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-FWBTR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-FWBTR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field SPESK CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-SPESK IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-SPESK.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field SPESF CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-SPESF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-SPESF.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field BELNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-BELNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-BELNR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field NBBLN CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-NBBLN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-NBBLN.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field PRCTR_EBS CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-PRCTR_EBS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-PRCTR_EBS.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field VERTN CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-VERTN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-VERTN.
WRITE:/ 'New Value:', ld_input.

*Conversion exit EXCRT, internal->external for field KURSF CALL FUNCTION 'CONVERSION_EXIT_EXCRT_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-KURSF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-KURSF.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field ARRSK CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_EPIC_S_BRS_ITEM-ARRSK IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EPIC_S_BRS_ITEM-ARRSK.
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_EPIC_S_BRS_ITEM_STR,
ITEM_DATE TYPE STRING,
DOCUMENT_NUM TYPE STRING,
DOCUMENT_ITEM_NUM TYPE STRING,
EBS_NUM TYPE STRING,
EBS_ITEM_NUM TYPE STRING,
SUBACCOUNT TYPE STRING,
SGTXT TYPE STRING,
BREM_AMOUNT TYPE STRING,
BPEM_AMOUNT TYPE STRING,
ERBM_AMOUNT TYPE STRING,
EPBM_AMOUNT TYPE STRING,
LOCAL_CURRENCY TYPE STRING,
REMARK TYPE STRING,
SOURCE TYPE STRING,
CATEGORY TYPE STRING,
DELETED TYPE STRING,
BKTXT TYPE STRING,
DOCUMENT_FISCALYEAR TYPE STRING,
DOCUMENT_PERIOD TYPE STRING,
BUKRS TYPE STRING,
CLOSED TYPE STRING,
GJAHR TYPE STRING,
MONAT TYPE STRING,
STMTNUMBER TYPE STRING,
AUTO_CLEARED TYPE STRING,
MANUAL_CLEARED TYPE STRING,
MANUAL_CLEARED_TEMP TYPE STRING,
MANUAL_CLEAR_OPERATIONABLE TYPE STRING,
FLD_STYL TYPE STRING,
HKONT TYPE STRING,
AUGDT TYPE STRING,
AUGBL TYPE STRING,
ZUONR TYPE STRING,
BUDAT TYPE STRING,
BLDAT TYPE STRING,
WAERS TYPE STRING,
XBLNR TYPE STRING,
BLART TYPE STRING,
BSCHL TYPE STRING,
SHKZG TYPE STRING,
GSBER TYPE STRING,
MWSKZ TYPE STRING,
FKONT TYPE STRING,
DMBTR TYPE STRING,
WRBTR TYPE STRING,
MWSTS TYPE STRING,
WMWST TYPE STRING,
PROJN TYPE STRING,
AUFNR TYPE STRING,
WERKS TYPE STRING,
KOSTL TYPE STRING,
ZFBDT TYPE STRING,
XOPVW TYPE STRING,
VALUT TYPE STRING,
BSTAT TYPE STRING,
BDIFF TYPE STRING,
BDIF2 TYPE STRING,
VBUND TYPE STRING,
PSWSL TYPE STRING,
WVERW TYPE STRING,
DMBE2 TYPE STRING,
DMBE3 TYPE STRING,
MWST2 TYPE STRING,
MWST3 TYPE STRING,
BDIF3 TYPE STRING,
RDIF3 TYPE STRING,
XRAGL TYPE STRING,
PROJK TYPE STRING,
PRCTR TYPE STRING,
XSTOV TYPE STRING,
XARCH TYPE STRING,
PSWBT TYPE STRING,
XNEGP TYPE STRING,
RFZEI TYPE STRING,
CCBTC TYPE STRING,
XREF3 TYPE STRING,
BUPLA TYPE STRING,
PPDIFF TYPE STRING,
PPDIF2 TYPE STRING,
PPDIF3 TYPE STRING,
BEWAR TYPE STRING,
IMKEY TYPE STRING,
DABRZ TYPE STRING,
INTRENO TYPE STRING,
GRANT_NBR TYPE STRING,
FKBER TYPE STRING,
FIPOS TYPE STRING,
FISTL TYPE STRING,
GEBER TYPE STRING,
PPRCT TYPE STRING,
BUZID TYPE STRING,
AUGGJ TYPE STRING,
UZAWE TYPE STRING,
SEGMENT TYPE STRING,
PSEGMENT TYPE STRING,
PGEBER TYPE STRING,
PGRANT_NBR TYPE STRING,
MEASURE TYPE STRING,
BUDGET_PD TYPE STRING,
PBUDGET_PD TYPE STRING,
KWBTR TYPE STRING,
KWAER TYPE STRING,
VALUT_EBS TYPE STRING,
VB1OK TYPE STRING,
VB2OK TYPE STRING,
VGINT TYPE STRING,
VWEZW TYPE STRING,
AVKON TYPE STRING,
AVKOA TYPE STRING,
BUTXT TYPE STRING,
FWBTR TYPE STRING,
FWAER TYPE STRING,
SPESK TYPE STRING,
SPESF TYPE STRING,
SGTXT_EBS TYPE STRING,
CHECT TYPE STRING,
GRPNR TYPE STRING,
BELNR TYPE STRING,
NBBLN TYPE STRING,
FNAM1 TYPE STRING,
FVAL1 TYPE STRING,
FKOA1 TYPE STRING,
FNAM2 TYPE STRING,
FVAL2 TYPE STRING,
FKOA2 TYPE STRING,
FNAM3 TYPE STRING,
FVAL3 TYPE STRING,
FKOA3 TYPE STRING,
BVDAT TYPE STRING,
BUTIM TYPE STRING,
VORGC TYPE STRING,
TEXTS TYPE STRING,
VGEXT TYPE STRING,
VGMAN TYPE STRING,
KFMOD TYPE STRING,
XBLNR_EBS TYPE STRING,
ZUONR_EBS TYPE STRING,
PABKS TYPE STRING,
PABLZ TYPE STRING,
PASWI TYPE STRING,
PAKTO TYPE STRING,
PIBAN TYPE STRING,
PARTN TYPE STRING,
GSBER_EBS TYPE STRING,
PRCTR_EBS TYPE STRING,
KOSTL_EBS TYPE STRING,
VERTN TYPE STRING,
VERTT TYPE STRING,
PNOTA TYPE STRING,
INFO1 TYPE STRING,
INFO2 TYPE STRING,
INTAG TYPE STRING,
KURSF TYPE STRING,
VGREF TYPE STRING,
ARRSK TYPE STRING,
PFORM TYPE STRING,
KIDNO TYPE STRING,
MANSP TYPE STRING,
IDENR TYPE STRING,
B1APP TYPE STRING,
B1STD TYPE STRING,
B1DOC TYPE STRING,
B2APP TYPE STRING,
B2STD TYPE STRING,
B2DOC TYPE STRING,
NAME1 TYPE STRING,
VALUE1 TYPE STRING,
NAME2 TYPE STRING,
VALUE2 TYPE STRING,
NAME3 TYPE STRING,
VALUE3 TYPE STRING,
COLOR_ROW TYPE STRING,
COLOR_CELLS TYPE STRING,END OF T_EKKO_STR. DATA: WA_EPIC_S_BRS_ITEM_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_EPIC_S_BRS_ITEM_STR-ITEM_DATE sy-vline
WA_EPIC_S_BRS_ITEM_STR-DOCUMENT_NUM sy-vline
WA_EPIC_S_BRS_ITEM_STR-DOCUMENT_ITEM_NUM sy-vline
WA_EPIC_S_BRS_ITEM_STR-EBS_NUM sy-vline
WA_EPIC_S_BRS_ITEM_STR-EBS_ITEM_NUM sy-vline
WA_EPIC_S_BRS_ITEM_STR-SUBACCOUNT sy-vline
WA_EPIC_S_BRS_ITEM_STR-SGTXT sy-vline
WA_EPIC_S_BRS_ITEM_STR-BREM_AMOUNT sy-vline
WA_EPIC_S_BRS_ITEM_STR-BPEM_AMOUNT sy-vline
WA_EPIC_S_BRS_ITEM_STR-ERBM_AMOUNT sy-vline
WA_EPIC_S_BRS_ITEM_STR-EPBM_AMOUNT sy-vline
WA_EPIC_S_BRS_ITEM_STR-LOCAL_CURRENCY sy-vline
WA_EPIC_S_BRS_ITEM_STR-REMARK sy-vline
WA_EPIC_S_BRS_ITEM_STR-SOURCE sy-vline
WA_EPIC_S_BRS_ITEM_STR-CATEGORY sy-vline
WA_EPIC_S_BRS_ITEM_STR-DELETED sy-vline
WA_EPIC_S_BRS_ITEM_STR-BKTXT sy-vline
WA_EPIC_S_BRS_ITEM_STR-DOCUMENT_FISCALYEAR sy-vline
WA_EPIC_S_BRS_ITEM_STR-DOCUMENT_PERIOD sy-vline
WA_EPIC_S_BRS_ITEM_STR-BUKRS sy-vline
WA_EPIC_S_BRS_ITEM_STR-CLOSED sy-vline
WA_EPIC_S_BRS_ITEM_STR-GJAHR sy-vline
WA_EPIC_S_BRS_ITEM_STR-MONAT sy-vline
WA_EPIC_S_BRS_ITEM_STR-STMTNUMBER sy-vline
WA_EPIC_S_BRS_ITEM_STR-AUTO_CLEARED sy-vline
WA_EPIC_S_BRS_ITEM_STR-MANUAL_CLEARED sy-vline
WA_EPIC_S_BRS_ITEM_STR-MANUAL_CLEARED_TEMP sy-vline
WA_EPIC_S_BRS_ITEM_STR-MANUAL_CLEAR_OPERATIONABLE sy-vline
WA_EPIC_S_BRS_ITEM_STR-FLD_STYL sy-vline
WA_EPIC_S_BRS_ITEM_STR-HKONT sy-vline
WA_EPIC_S_BRS_ITEM_STR-AUGDT sy-vline
WA_EPIC_S_BRS_ITEM_STR-AUGBL sy-vline
WA_EPIC_S_BRS_ITEM_STR-ZUONR sy-vline
WA_EPIC_S_BRS_ITEM_STR-BUDAT sy-vline
WA_EPIC_S_BRS_ITEM_STR-BLDAT sy-vline
WA_EPIC_S_BRS_ITEM_STR-WAERS sy-vline
WA_EPIC_S_BRS_ITEM_STR-XBLNR sy-vline
WA_EPIC_S_BRS_ITEM_STR-BLART sy-vline
WA_EPIC_S_BRS_ITEM_STR-BSCHL sy-vline
WA_EPIC_S_BRS_ITEM_STR-SHKZG sy-vline
WA_EPIC_S_BRS_ITEM_STR-GSBER sy-vline
WA_EPIC_S_BRS_ITEM_STR-MWSKZ sy-vline
WA_EPIC_S_BRS_ITEM_STR-FKONT sy-vline
WA_EPIC_S_BRS_ITEM_STR-DMBTR sy-vline
WA_EPIC_S_BRS_ITEM_STR-WRBTR sy-vline
WA_EPIC_S_BRS_ITEM_STR-MWSTS sy-vline
WA_EPIC_S_BRS_ITEM_STR-WMWST sy-vline
WA_EPIC_S_BRS_ITEM_STR-PROJN sy-vline
WA_EPIC_S_BRS_ITEM_STR-AUFNR sy-vline
WA_EPIC_S_BRS_ITEM_STR-WERKS sy-vline
WA_EPIC_S_BRS_ITEM_STR-KOSTL sy-vline
WA_EPIC_S_BRS_ITEM_STR-ZFBDT sy-vline
WA_EPIC_S_BRS_ITEM_STR-XOPVW sy-vline
WA_EPIC_S_BRS_ITEM_STR-VALUT sy-vline
WA_EPIC_S_BRS_ITEM_STR-BSTAT sy-vline
WA_EPIC_S_BRS_ITEM_STR-BDIFF sy-vline
WA_EPIC_S_BRS_ITEM_STR-BDIF2 sy-vline
WA_EPIC_S_BRS_ITEM_STR-VBUND sy-vline
WA_EPIC_S_BRS_ITEM_STR-PSWSL sy-vline
WA_EPIC_S_BRS_ITEM_STR-WVERW sy-vline
WA_EPIC_S_BRS_ITEM_STR-DMBE2 sy-vline
WA_EPIC_S_BRS_ITEM_STR-DMBE3 sy-vline
WA_EPIC_S_BRS_ITEM_STR-MWST2 sy-vline
WA_EPIC_S_BRS_ITEM_STR-MWST3 sy-vline
WA_EPIC_S_BRS_ITEM_STR-BDIF3 sy-vline
WA_EPIC_S_BRS_ITEM_STR-RDIF3 sy-vline
WA_EPIC_S_BRS_ITEM_STR-XRAGL sy-vline
WA_EPIC_S_BRS_ITEM_STR-PROJK sy-vline
WA_EPIC_S_BRS_ITEM_STR-PRCTR sy-vline
WA_EPIC_S_BRS_ITEM_STR-XSTOV sy-vline
WA_EPIC_S_BRS_ITEM_STR-XARCH sy-vline
WA_EPIC_S_BRS_ITEM_STR-PSWBT sy-vline
WA_EPIC_S_BRS_ITEM_STR-XNEGP sy-vline
WA_EPIC_S_BRS_ITEM_STR-RFZEI sy-vline
WA_EPIC_S_BRS_ITEM_STR-CCBTC sy-vline
WA_EPIC_S_BRS_ITEM_STR-XREF3 sy-vline
WA_EPIC_S_BRS_ITEM_STR-BUPLA sy-vline
WA_EPIC_S_BRS_ITEM_STR-PPDIFF sy-vline
WA_EPIC_S_BRS_ITEM_STR-PPDIF2 sy-vline
WA_EPIC_S_BRS_ITEM_STR-PPDIF3 sy-vline
WA_EPIC_S_BRS_ITEM_STR-BEWAR sy-vline
WA_EPIC_S_BRS_ITEM_STR-IMKEY sy-vline
WA_EPIC_S_BRS_ITEM_STR-DABRZ sy-vline
WA_EPIC_S_BRS_ITEM_STR-INTRENO sy-vline
WA_EPIC_S_BRS_ITEM_STR-GRANT_NBR sy-vline
WA_EPIC_S_BRS_ITEM_STR-FKBER sy-vline
WA_EPIC_S_BRS_ITEM_STR-FIPOS sy-vline
WA_EPIC_S_BRS_ITEM_STR-FISTL sy-vline
WA_EPIC_S_BRS_ITEM_STR-GEBER sy-vline
WA_EPIC_S_BRS_ITEM_STR-PPRCT sy-vline
WA_EPIC_S_BRS_ITEM_STR-BUZID sy-vline
WA_EPIC_S_BRS_ITEM_STR-AUGGJ sy-vline
WA_EPIC_S_BRS_ITEM_STR-UZAWE sy-vline
WA_EPIC_S_BRS_ITEM_STR-SEGMENT sy-vline
WA_EPIC_S_BRS_ITEM_STR-PSEGMENT sy-vline
WA_EPIC_S_BRS_ITEM_STR-PGEBER sy-vline
WA_EPIC_S_BRS_ITEM_STR-PGRANT_NBR sy-vline
WA_EPIC_S_BRS_ITEM_STR-MEASURE sy-vline
WA_EPIC_S_BRS_ITEM_STR-BUDGET_PD sy-vline
WA_EPIC_S_BRS_ITEM_STR-PBUDGET_PD sy-vline
WA_EPIC_S_BRS_ITEM_STR-KWBTR sy-vline
WA_EPIC_S_BRS_ITEM_STR-KWAER sy-vline
WA_EPIC_S_BRS_ITEM_STR-VALUT_EBS sy-vline
WA_EPIC_S_BRS_ITEM_STR-VB1OK sy-vline
WA_EPIC_S_BRS_ITEM_STR-VB2OK sy-vline
WA_EPIC_S_BRS_ITEM_STR-VGINT sy-vline
WA_EPIC_S_BRS_ITEM_STR-VWEZW sy-vline
WA_EPIC_S_BRS_ITEM_STR-AVKON sy-vline
WA_EPIC_S_BRS_ITEM_STR-AVKOA sy-vline
WA_EPIC_S_BRS_ITEM_STR-BUTXT sy-vline
WA_EPIC_S_BRS_ITEM_STR-FWBTR sy-vline
WA_EPIC_S_BRS_ITEM_STR-FWAER sy-vline
WA_EPIC_S_BRS_ITEM_STR-SPESK sy-vline
WA_EPIC_S_BRS_ITEM_STR-SPESF sy-vline
WA_EPIC_S_BRS_ITEM_STR-SGTXT_EBS sy-vline
WA_EPIC_S_BRS_ITEM_STR-CHECT sy-vline
WA_EPIC_S_BRS_ITEM_STR-GRPNR sy-vline
WA_EPIC_S_BRS_ITEM_STR-BELNR sy-vline
WA_EPIC_S_BRS_ITEM_STR-NBBLN sy-vline
WA_EPIC_S_BRS_ITEM_STR-FNAM1 sy-vline
WA_EPIC_S_BRS_ITEM_STR-FVAL1 sy-vline
WA_EPIC_S_BRS_ITEM_STR-FKOA1 sy-vline
WA_EPIC_S_BRS_ITEM_STR-FNAM2 sy-vline
WA_EPIC_S_BRS_ITEM_STR-FVAL2 sy-vline
WA_EPIC_S_BRS_ITEM_STR-FKOA2 sy-vline
WA_EPIC_S_BRS_ITEM_STR-FNAM3 sy-vline
WA_EPIC_S_BRS_ITEM_STR-FVAL3 sy-vline
WA_EPIC_S_BRS_ITEM_STR-FKOA3 sy-vline
WA_EPIC_S_BRS_ITEM_STR-BVDAT sy-vline
WA_EPIC_S_BRS_ITEM_STR-BUTIM sy-vline
WA_EPIC_S_BRS_ITEM_STR-VORGC sy-vline
WA_EPIC_S_BRS_ITEM_STR-TEXTS sy-vline
WA_EPIC_S_BRS_ITEM_STR-VGEXT sy-vline
WA_EPIC_S_BRS_ITEM_STR-VGMAN sy-vline
WA_EPIC_S_BRS_ITEM_STR-KFMOD sy-vline
WA_EPIC_S_BRS_ITEM_STR-XBLNR_EBS sy-vline
WA_EPIC_S_BRS_ITEM_STR-ZUONR_EBS sy-vline
WA_EPIC_S_BRS_ITEM_STR-PABKS sy-vline
WA_EPIC_S_BRS_ITEM_STR-PABLZ sy-vline
WA_EPIC_S_BRS_ITEM_STR-PASWI sy-vline
WA_EPIC_S_BRS_ITEM_STR-PAKTO sy-vline
WA_EPIC_S_BRS_ITEM_STR-PIBAN sy-vline
WA_EPIC_S_BRS_ITEM_STR-PARTN sy-vline
WA_EPIC_S_BRS_ITEM_STR-GSBER_EBS sy-vline
WA_EPIC_S_BRS_ITEM_STR-PRCTR_EBS sy-vline
WA_EPIC_S_BRS_ITEM_STR-KOSTL_EBS sy-vline
WA_EPIC_S_BRS_ITEM_STR-VERTN sy-vline
WA_EPIC_S_BRS_ITEM_STR-VERTT sy-vline
WA_EPIC_S_BRS_ITEM_STR-PNOTA sy-vline
WA_EPIC_S_BRS_ITEM_STR-INFO1 sy-vline
WA_EPIC_S_BRS_ITEM_STR-INFO2 sy-vline
WA_EPIC_S_BRS_ITEM_STR-INTAG sy-vline
WA_EPIC_S_BRS_ITEM_STR-KURSF sy-vline
WA_EPIC_S_BRS_ITEM_STR-VGREF sy-vline
WA_EPIC_S_BRS_ITEM_STR-ARRSK sy-vline
WA_EPIC_S_BRS_ITEM_STR-PFORM sy-vline
WA_EPIC_S_BRS_ITEM_STR-KIDNO sy-vline
WA_EPIC_S_BRS_ITEM_STR-MANSP sy-vline
WA_EPIC_S_BRS_ITEM_STR-IDENR sy-vline
WA_EPIC_S_BRS_ITEM_STR-B1APP sy-vline
WA_EPIC_S_BRS_ITEM_STR-B1STD sy-vline
WA_EPIC_S_BRS_ITEM_STR-B1DOC sy-vline
WA_EPIC_S_BRS_ITEM_STR-B2APP sy-vline
WA_EPIC_S_BRS_ITEM_STR-B2STD sy-vline
WA_EPIC_S_BRS_ITEM_STR-B2DOC sy-vline
WA_EPIC_S_BRS_ITEM_STR-NAME1 sy-vline
WA_EPIC_S_BRS_ITEM_STR-VALUE1 sy-vline
WA_EPIC_S_BRS_ITEM_STR-NAME2 sy-vline
WA_EPIC_S_BRS_ITEM_STR-VALUE2 sy-vline
WA_EPIC_S_BRS_ITEM_STR-NAME3 sy-vline
WA_EPIC_S_BRS_ITEM_STR-VALUE3 sy-vline
WA_EPIC_S_BRS_ITEM_STR-COLOR_ROW sy-vline
WA_EPIC_S_BRS_ITEM_STR-COLOR_CELLS sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.