ABAP Select data from SAP table FISV_BSEG_EV into internal table

Get Example source ABAP code based on a different SAP table
  Get ABAP code

Below is a number of ABAP code snippets to demonstrate how to select data from SAP FISV_BSEG_EV 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 FISV_BSEG_EV. 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 FISV_BSEG_EV 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_FISV_BSEG_EV TYPE STANDARD TABLE OF FISV_BSEG_EV,
      WA_FISV_BSEG_EV TYPE FISV_BSEG_EV,
      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: <FISV_BSEG_EV> TYPE FISV_BSEG_EV.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM FISV_BSEG_EV
*  INTO TABLE @DATA(IT_FISV_BSEG_EV2).
*--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_FISV_BSEG_EV INDEX 1 INTO DATA(WA_FISV_BSEG_EV2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_FISV_BSEG_EV ASSIGNING <FISV_BSEG_EV>.

*To update a field value using a field symbol simply change the value via the field symbol pointer
<FISV_BSEG_EV>-MANDT = 1.
<FISV_BSEG_EV>-BUKRS = 1.
<FISV_BSEG_EV>-BELNR = 1.
<FISV_BSEG_EV>-GJAHR = 1.
<FISV_BSEG_EV>-RLDNR = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_FISV_BSEG_EV-BUZEI, sy-vline,
  WA_FISV_BSEG_EV-BSCHL, sy-vline,
  WA_FISV_BSEG_EV-KOART, sy-vline,
  WA_FISV_BSEG_EV-HKONT, sy-vline,
  WA_FISV_BSEG_EV-SHKZG, sy-vline,
  WA_FISV_BSEG_EV-DMBTR, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_FISV_BSEG_EV 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_FISV_BSEG_EV 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_FISV_BSEG_EV INTO WA_FISV_BSEG_EV.


*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 BELNR
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_FISV_BSEG_EV-BELNR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_FISV_BSEG_EV-BELNR.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit MATN1, internal->external for field MATNR
CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT'
  EXPORTING
    input =                      WA_FISV_BSEG_EV-MATNR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_FISV_BSEG_EV-MATNR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit CUNIT, internal->external for field MEINS
CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT'
  EXPORTING
    input =                      WA_FISV_BSEG_EV-MEINS
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_FISV_BSEG_EV-MEINS.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit ISOLA, internal->external for field BSEC_SPRAS
CALL FUNCTION 'CONVERSION_EXIT_ISOLA_OUTPUT'
  EXPORTING
    input =                      WA_FISV_BSEG_EV-BSEC_SPRAS
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_FISV_BSEG_EV-BSEC_SPRAS.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field BSEC_ADRNR
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_FISV_BSEG_EV-BSEC_ADRNR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_FISV_BSEG_EV-BSEC_ADRNR.
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_FISV_BSEG_EV_STR, 
MANDT TYPE STRING,
BUKRS TYPE STRING,
BELNR TYPE STRING,
GJAHR TYPE STRING,
RLDNR TYPE STRING,
BUZEI TYPE STRING,
BSCHL TYPE STRING,
KOART TYPE STRING,
HKONT TYPE STRING,
SHKZG TYPE STRING,
DMBTR TYPE STRING,
WRBTR TYPE STRING,
DMBE2 TYPE STRING,
DMBE3 TYPE STRING,
XNEGP TYPE STRING,
SGTXT TYPE STRING,
ZUONR TYPE STRING,
MWSKZ TYPE STRING,
TXBFW TYPE STRING,
TXJCD TYPE STRING,
XSKRL TYPE STRING,
HWMET TYPE STRING,
HWBAS TYPE STRING,
FWBAS TYPE STRING,
KURSR TYPE STRING,
AUGBL TYPE STRING,
AUGDT TYPE STRING,
LANDL TYPE STRING,
LZBKZ TYPE STRING,
XEGDR TYPE STRING,
STCEG TYPE STRING,
EGBLD TYPE STRING,
HBKID TYPE STRING,
HKTID TYPE STRING,
CCBTC TYPE STRING,
UZAWE TYPE STRING,
KIDNO TYPE STRING,
BUPLA TYPE STRING,
VBUND TYPE STRING,
RSTGR TYPE STRING,
XREF1 TYPE STRING,
XREF2 TYPE STRING,
XREF3 TYPE STRING,
PRCTR TYPE STRING,
PPRCTR TYPE STRING,
SEGMENT TYPE STRING,
PSEGMENT TYPE STRING,
GSBER TYPE STRING,
PARGB TYPE STRING,
KDAUF TYPE STRING,
KDPOS TYPE STRING,
KDEIN TYPE STRING,
EBELN TYPE STRING,
EBELP TYPE STRING,
ZEKKN TYPE STRING,
PERNR TYPE STRING,
ANLN1 TYPE STRING,
ANLN2 TYPE STRING,
ABPER TYPE STRING,
WERKS TYPE STRING,
MATNR TYPE STRING,
MENGE TYPE STRING,
MEINS TYPE STRING,
RMVCT TYPE STRING,
PAOBJNR TYPE STRING,
PROJK TYPE STRING,
NPLNR TYPE STRING,
AUFPL TYPE STRING,
APLZL TYPE STRING,
KOKRS TYPE STRING,
KOSTL TYPE STRING,
KSTRG TYPE STRING,
LSTAR TYPE STRING,
PRZNR TYPE STRING,
AUFNR TYPE STRING,
IMKEY TYPE STRING,
DABRZ TYPE STRING,
FIPOS TYPE STRING,
FISTL TYPE STRING,
GEBER TYPE STRING,
GRANT_NBR TYPE STRING,
PGRANT_NBR TYPE STRING,
GMVKZ TYPE STRING,
SRTYPE TYPE STRING,
FKBER TYPE STRING,
PFKBER TYPE STRING,
KBLNR TYPE STRING,
KBLPOS TYPE STRING,
BUDGET_PD TYPE STRING,
PBUDGET_PD TYPE STRING,
VNAME TYPE STRING,
RECID TYPE STRING,
EGRUP TYPE STRING,
VPTNR TYPE STRING,
PRODPER TYPE STRING,
QSSKZ TYPE STRING,
MWART TYPE STRING,
PAYS_PROV TYPE STRING,
QSFBT TYPE STRING,
QSSHB TYPE STRING,
GITYP TYPE STRING,
GRICD TYPE STRING,
GRIRG TYPE STRING,
IDXSP TYPE STRING,
LIFNR TYPE STRING,
KUNNR TYPE STRING,
FILKD TYPE STRING,
UMSKZ TYPE STRING,
UMSKS TYPE STRING,
ZUMSK TYPE STRING,
HZUON TYPE STRING,
WSKTO TYPE STRING,
SKNTO TYPE STRING,
SKFBT TYPE STRING,
ZTERM TYPE STRING,
ZFBDT TYPE STRING,
ZBD1P TYPE STRING,
ZBD1T TYPE STRING,
ZBD2P TYPE STRING,
ZBD2T TYPE STRING,
ZBD3T TYPE STRING,
ZBFIX TYPE STRING,
ZLSPR TYPE STRING,
ZLSCH TYPE STRING,
REBZG TYPE STRING,
REBZJ TYPE STRING,
REBZZ TYPE STRING,
REBZT TYPE STRING,
FDLEV TYPE STRING,
FDGRP TYPE STRING,
EMPFB TYPE STRING,
BVTYP TYPE STRING,
SAKNR TYPE STRING,
XCPDD TYPE STRING,
DIEKZ TYPE STRING,
SAMNR TYPE STRING,
VERTN TYPE STRING,
VERTT TYPE STRING,
VBEWA TYPE STRING,
DTWS1 TYPE STRING,
DTWS2 TYPE STRING,
DTWS3 TYPE STRING,
DTWS4 TYPE STRING,
PYCUR TYPE STRING,
PYAMT TYPE STRING,
MNDID TYPE STRING,
SECCO TYPE STRING,
MABER TYPE STRING,
MADAT TYPE STRING,
MANST TYPE STRING,
MANSP TYPE STRING,
MSCHL TYPE STRING,
KKBER TYPE STRING,
CESSION_KZ TYPE STRING,
ZINKZ TYPE STRING,
BTYPE TYPE STRING,
VRSKZ TYPE STRING,
VRSDT TYPE STRING,
ANFBN TYPE STRING,
ANFBU TYPE STRING,
ANFBJ TYPE STRING,
XINVE TYPE STRING,
ZOLLT TYPE STRING,
ZOLLD TYPE STRING,
VALUT TYPE STRING,
VBELN TYPE STRING,
XAUTO TYPE STRING,
NEBTR TYPE STRING,
ANBWA TYPE STRING,
BZDAT TYPE STRING,
QSZNR TYPE STRING,
QBSHB TYPE STRING,
DMSOL TYPE STRING,
DMHAB TYPE STRING,
WRSOL TYPE STRING,
WRHAB TYPE STRING,
DMSO2 TYPE STRING,
DMHA2 TYPE STRING,
DMSO3 TYPE STRING,
DMHA3 TYPE STRING,
BUDAT TYPE STRING,
WAERS TYPE STRING,
HWAER TYPE STRING,
HWAE2 TYPE STRING,
HWAE3 TYPE STRING,
KZWRS TYPE STRING,
BSTAT TYPE STRING,
BVORG TYPE STRING,
BSEC_NAME1 TYPE STRING,
BSEC_NAME2 TYPE STRING,
BSEC_NAME3 TYPE STRING,
BSEC_NAME4 TYPE STRING,
BSEC_PSTLZ TYPE STRING,
BSEC_ORT01 TYPE STRING,
BSEC_LAND1 TYPE STRING,
BSEC_STRAS TYPE STRING,
BSEC_PFACH TYPE STRING,
BSEC_PSTL2 TYPE STRING,
BSEC_PSKTO TYPE STRING,
BSEC_BANKN TYPE STRING,
BSEC_BANKL TYPE STRING,
BSEC_BANKS TYPE STRING,
BSEC_STCD1 TYPE STRING,
BSEC_STCD2 TYPE STRING,
BSEC_STKZU TYPE STRING,
BSEC_STKZA TYPE STRING,
BSEC_REGIO TYPE STRING,
BSEC_BKONT TYPE STRING,
BSEC_DTAWS TYPE STRING,
BSEC_DTAMS TYPE STRING,
BSEC_XCPDK TYPE STRING,
BSEC_EMPFG TYPE STRING,
BSEC_SPRAS TYPE STRING,
BSEC_FITYP TYPE STRING,
BSEC_STCDT TYPE STRING,
BSEC_STKZN TYPE STRING,
BSEC_STCD3 TYPE STRING,
BSEC_STCD4 TYPE STRING,
BSEC_BKREF TYPE STRING,
BSEC_J_1KFREPRE TYPE STRING,
BSEC_J_1KFTBUS TYPE STRING,
BSEC_J_1KFTIND TYPE STRING,
BSEC_ANRED TYPE STRING,
BSEC_ADRNR TYPE STRING,
BSEC_XRGUH TYPE STRING,
BSEC_PO_BOX_NUM TYPE STRING,
BSEC_BEGRU TYPE STRING,
BSEC_DATAAGING TYPE STRING,
BSEC_IBAN TYPE STRING,
BSEC_IBAN_VALID_FROM TYPE STRING,
VKORG TYPE STRING,
VTWEG TYPE STRING,
KNA1_LAND1 TYPE STRING,
KNA1_STCEG TYPE STRING,
REGIO TYPE STRING,
BRSCH TYPE STRING,
KUNNR_TXT TYPE STRING,
LIFNR_TXT TYPE STRING,
LFA1_STCEG TYPE STRING,
LFA1_LAND1 TYPE STRING,
SKB1_BEGRU TYPE STRING,
T001_LAND1 TYPE STRING,
KTOPL TYPE STRING,
LAND1 TYPE STRING,
KALSM TYPE STRING,
BUKRS_TXT TYPE STRING,
VBUND_TXT TYPE STRING,
WERKS_TXT TYPE STRING,END OF T_EKKO_STR.
DATA: WA_FISV_BSEG_EV_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_FISV_BSEG_EV_STR-MANDT sy-vline 
WA_FISV_BSEG_EV_STR-BUKRS sy-vline 
WA_FISV_BSEG_EV_STR-BELNR sy-vline 
WA_FISV_BSEG_EV_STR-GJAHR sy-vline 
WA_FISV_BSEG_EV_STR-RLDNR sy-vline 
WA_FISV_BSEG_EV_STR-BUZEI sy-vline 
WA_FISV_BSEG_EV_STR-BSCHL sy-vline 
WA_FISV_BSEG_EV_STR-KOART sy-vline 
WA_FISV_BSEG_EV_STR-HKONT sy-vline 
WA_FISV_BSEG_EV_STR-SHKZG sy-vline 
WA_FISV_BSEG_EV_STR-DMBTR sy-vline 
WA_FISV_BSEG_EV_STR-WRBTR sy-vline 
WA_FISV_BSEG_EV_STR-DMBE2 sy-vline 
WA_FISV_BSEG_EV_STR-DMBE3 sy-vline 
WA_FISV_BSEG_EV_STR-XNEGP sy-vline 
WA_FISV_BSEG_EV_STR-SGTXT sy-vline 
WA_FISV_BSEG_EV_STR-ZUONR sy-vline 
WA_FISV_BSEG_EV_STR-MWSKZ sy-vline 
WA_FISV_BSEG_EV_STR-TXBFW sy-vline 
WA_FISV_BSEG_EV_STR-TXJCD sy-vline 
WA_FISV_BSEG_EV_STR-XSKRL sy-vline 
WA_FISV_BSEG_EV_STR-HWMET sy-vline 
WA_FISV_BSEG_EV_STR-HWBAS sy-vline 
WA_FISV_BSEG_EV_STR-FWBAS sy-vline 
WA_FISV_BSEG_EV_STR-KURSR sy-vline 
WA_FISV_BSEG_EV_STR-AUGBL sy-vline 
WA_FISV_BSEG_EV_STR-AUGDT sy-vline 
WA_FISV_BSEG_EV_STR-LANDL sy-vline 
WA_FISV_BSEG_EV_STR-LZBKZ sy-vline 
WA_FISV_BSEG_EV_STR-XEGDR sy-vline 
WA_FISV_BSEG_EV_STR-STCEG sy-vline 
WA_FISV_BSEG_EV_STR-EGBLD sy-vline 
WA_FISV_BSEG_EV_STR-HBKID sy-vline 
WA_FISV_BSEG_EV_STR-HKTID sy-vline 
WA_FISV_BSEG_EV_STR-CCBTC sy-vline 
WA_FISV_BSEG_EV_STR-UZAWE sy-vline 
WA_FISV_BSEG_EV_STR-KIDNO sy-vline 
WA_FISV_BSEG_EV_STR-BUPLA sy-vline 
WA_FISV_BSEG_EV_STR-VBUND sy-vline 
WA_FISV_BSEG_EV_STR-RSTGR sy-vline 
WA_FISV_BSEG_EV_STR-XREF1 sy-vline 
WA_FISV_BSEG_EV_STR-XREF2 sy-vline 
WA_FISV_BSEG_EV_STR-XREF3 sy-vline 
WA_FISV_BSEG_EV_STR-PRCTR sy-vline 
WA_FISV_BSEG_EV_STR-PPRCTR sy-vline 
WA_FISV_BSEG_EV_STR-SEGMENT sy-vline 
WA_FISV_BSEG_EV_STR-PSEGMENT sy-vline 
WA_FISV_BSEG_EV_STR-GSBER sy-vline 
WA_FISV_BSEG_EV_STR-PARGB sy-vline 
WA_FISV_BSEG_EV_STR-KDAUF sy-vline 
WA_FISV_BSEG_EV_STR-KDPOS sy-vline 
WA_FISV_BSEG_EV_STR-KDEIN sy-vline 
WA_FISV_BSEG_EV_STR-EBELN sy-vline 
WA_FISV_BSEG_EV_STR-EBELP sy-vline 
WA_FISV_BSEG_EV_STR-ZEKKN sy-vline 
WA_FISV_BSEG_EV_STR-PERNR sy-vline 
WA_FISV_BSEG_EV_STR-ANLN1 sy-vline 
WA_FISV_BSEG_EV_STR-ANLN2 sy-vline 
WA_FISV_BSEG_EV_STR-ABPER sy-vline 
WA_FISV_BSEG_EV_STR-WERKS sy-vline 
WA_FISV_BSEG_EV_STR-MATNR sy-vline 
WA_FISV_BSEG_EV_STR-MENGE sy-vline 
WA_FISV_BSEG_EV_STR-MEINS sy-vline 
WA_FISV_BSEG_EV_STR-RMVCT sy-vline 
WA_FISV_BSEG_EV_STR-PAOBJNR sy-vline 
WA_FISV_BSEG_EV_STR-PROJK sy-vline 
WA_FISV_BSEG_EV_STR-NPLNR sy-vline 
WA_FISV_BSEG_EV_STR-AUFPL sy-vline 
WA_FISV_BSEG_EV_STR-APLZL sy-vline 
WA_FISV_BSEG_EV_STR-KOKRS sy-vline 
WA_FISV_BSEG_EV_STR-KOSTL sy-vline 
WA_FISV_BSEG_EV_STR-KSTRG sy-vline 
WA_FISV_BSEG_EV_STR-LSTAR sy-vline 
WA_FISV_BSEG_EV_STR-PRZNR sy-vline 
WA_FISV_BSEG_EV_STR-AUFNR sy-vline 
WA_FISV_BSEG_EV_STR-IMKEY sy-vline 
WA_FISV_BSEG_EV_STR-DABRZ sy-vline 
WA_FISV_BSEG_EV_STR-FIPOS sy-vline 
WA_FISV_BSEG_EV_STR-FISTL sy-vline 
WA_FISV_BSEG_EV_STR-GEBER sy-vline 
WA_FISV_BSEG_EV_STR-GRANT_NBR sy-vline 
WA_FISV_BSEG_EV_STR-PGRANT_NBR sy-vline 
WA_FISV_BSEG_EV_STR-GMVKZ sy-vline 
WA_FISV_BSEG_EV_STR-SRTYPE sy-vline 
WA_FISV_BSEG_EV_STR-FKBER sy-vline 
WA_FISV_BSEG_EV_STR-PFKBER sy-vline 
WA_FISV_BSEG_EV_STR-KBLNR sy-vline 
WA_FISV_BSEG_EV_STR-KBLPOS sy-vline 
WA_FISV_BSEG_EV_STR-BUDGET_PD sy-vline 
WA_FISV_BSEG_EV_STR-PBUDGET_PD sy-vline 
WA_FISV_BSEG_EV_STR-VNAME sy-vline 
WA_FISV_BSEG_EV_STR-RECID sy-vline 
WA_FISV_BSEG_EV_STR-EGRUP sy-vline 
WA_FISV_BSEG_EV_STR-VPTNR sy-vline 
WA_FISV_BSEG_EV_STR-PRODPER sy-vline 
WA_FISV_BSEG_EV_STR-QSSKZ sy-vline 
WA_FISV_BSEG_EV_STR-MWART sy-vline 
WA_FISV_BSEG_EV_STR-PAYS_PROV sy-vline 
WA_FISV_BSEG_EV_STR-QSFBT sy-vline 
WA_FISV_BSEG_EV_STR-QSSHB sy-vline 
WA_FISV_BSEG_EV_STR-GITYP sy-vline 
WA_FISV_BSEG_EV_STR-GRICD sy-vline 
WA_FISV_BSEG_EV_STR-GRIRG sy-vline 
WA_FISV_BSEG_EV_STR-IDXSP sy-vline 
WA_FISV_BSEG_EV_STR-LIFNR sy-vline 
WA_FISV_BSEG_EV_STR-KUNNR sy-vline 
WA_FISV_BSEG_EV_STR-FILKD sy-vline 
WA_FISV_BSEG_EV_STR-UMSKZ sy-vline 
WA_FISV_BSEG_EV_STR-UMSKS sy-vline 
WA_FISV_BSEG_EV_STR-ZUMSK sy-vline 
WA_FISV_BSEG_EV_STR-HZUON sy-vline 
WA_FISV_BSEG_EV_STR-WSKTO sy-vline 
WA_FISV_BSEG_EV_STR-SKNTO sy-vline 
WA_FISV_BSEG_EV_STR-SKFBT sy-vline 
WA_FISV_BSEG_EV_STR-ZTERM sy-vline 
WA_FISV_BSEG_EV_STR-ZFBDT sy-vline 
WA_FISV_BSEG_EV_STR-ZBD1P sy-vline 
WA_FISV_BSEG_EV_STR-ZBD1T sy-vline 
WA_FISV_BSEG_EV_STR-ZBD2P sy-vline 
WA_FISV_BSEG_EV_STR-ZBD2T sy-vline 
WA_FISV_BSEG_EV_STR-ZBD3T sy-vline 
WA_FISV_BSEG_EV_STR-ZBFIX sy-vline 
WA_FISV_BSEG_EV_STR-ZLSPR sy-vline 
WA_FISV_BSEG_EV_STR-ZLSCH sy-vline 
WA_FISV_BSEG_EV_STR-REBZG sy-vline 
WA_FISV_BSEG_EV_STR-REBZJ sy-vline 
WA_FISV_BSEG_EV_STR-REBZZ sy-vline 
WA_FISV_BSEG_EV_STR-REBZT sy-vline 
WA_FISV_BSEG_EV_STR-FDLEV sy-vline 
WA_FISV_BSEG_EV_STR-FDGRP sy-vline 
WA_FISV_BSEG_EV_STR-EMPFB sy-vline 
WA_FISV_BSEG_EV_STR-BVTYP sy-vline 
WA_FISV_BSEG_EV_STR-SAKNR sy-vline 
WA_FISV_BSEG_EV_STR-XCPDD sy-vline 
WA_FISV_BSEG_EV_STR-DIEKZ sy-vline 
WA_FISV_BSEG_EV_STR-SAMNR sy-vline 
WA_FISV_BSEG_EV_STR-VERTN sy-vline 
WA_FISV_BSEG_EV_STR-VERTT sy-vline 
WA_FISV_BSEG_EV_STR-VBEWA sy-vline 
WA_FISV_BSEG_EV_STR-DTWS1 sy-vline 
WA_FISV_BSEG_EV_STR-DTWS2 sy-vline 
WA_FISV_BSEG_EV_STR-DTWS3 sy-vline 
WA_FISV_BSEG_EV_STR-DTWS4 sy-vline 
WA_FISV_BSEG_EV_STR-PYCUR sy-vline 
WA_FISV_BSEG_EV_STR-PYAMT sy-vline 
WA_FISV_BSEG_EV_STR-MNDID sy-vline 
WA_FISV_BSEG_EV_STR-SECCO sy-vline 
WA_FISV_BSEG_EV_STR-MABER sy-vline 
WA_FISV_BSEG_EV_STR-MADAT sy-vline 
WA_FISV_BSEG_EV_STR-MANST sy-vline 
WA_FISV_BSEG_EV_STR-MANSP sy-vline 
WA_FISV_BSEG_EV_STR-MSCHL sy-vline 
WA_FISV_BSEG_EV_STR-KKBER sy-vline 
WA_FISV_BSEG_EV_STR-CESSION_KZ sy-vline 
WA_FISV_BSEG_EV_STR-ZINKZ sy-vline 
WA_FISV_BSEG_EV_STR-BTYPE sy-vline 
WA_FISV_BSEG_EV_STR-VRSKZ sy-vline 
WA_FISV_BSEG_EV_STR-VRSDT sy-vline 
WA_FISV_BSEG_EV_STR-ANFBN sy-vline 
WA_FISV_BSEG_EV_STR-ANFBU sy-vline 
WA_FISV_BSEG_EV_STR-ANFBJ sy-vline 
WA_FISV_BSEG_EV_STR-XINVE sy-vline 
WA_FISV_BSEG_EV_STR-ZOLLT sy-vline 
WA_FISV_BSEG_EV_STR-ZOLLD sy-vline 
WA_FISV_BSEG_EV_STR-VALUT sy-vline 
WA_FISV_BSEG_EV_STR-VBELN sy-vline 
WA_FISV_BSEG_EV_STR-XAUTO sy-vline 
WA_FISV_BSEG_EV_STR-NEBTR sy-vline 
WA_FISV_BSEG_EV_STR-ANBWA sy-vline 
WA_FISV_BSEG_EV_STR-BZDAT sy-vline 
WA_FISV_BSEG_EV_STR-QSZNR sy-vline 
WA_FISV_BSEG_EV_STR-QBSHB sy-vline 
WA_FISV_BSEG_EV_STR-DMSOL sy-vline 
WA_FISV_BSEG_EV_STR-DMHAB sy-vline 
WA_FISV_BSEG_EV_STR-WRSOL sy-vline 
WA_FISV_BSEG_EV_STR-WRHAB sy-vline 
WA_FISV_BSEG_EV_STR-DMSO2 sy-vline 
WA_FISV_BSEG_EV_STR-DMHA2 sy-vline 
WA_FISV_BSEG_EV_STR-DMSO3 sy-vline 
WA_FISV_BSEG_EV_STR-DMHA3 sy-vline 
WA_FISV_BSEG_EV_STR-BUDAT sy-vline 
WA_FISV_BSEG_EV_STR-WAERS sy-vline 
WA_FISV_BSEG_EV_STR-HWAER sy-vline 
WA_FISV_BSEG_EV_STR-HWAE2 sy-vline 
WA_FISV_BSEG_EV_STR-HWAE3 sy-vline 
WA_FISV_BSEG_EV_STR-KZWRS sy-vline 
WA_FISV_BSEG_EV_STR-BSTAT sy-vline 
WA_FISV_BSEG_EV_STR-BVORG sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_NAME1 sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_NAME2 sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_NAME3 sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_NAME4 sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_PSTLZ sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_ORT01 sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_LAND1 sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_STRAS sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_PFACH sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_PSTL2 sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_PSKTO sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_BANKN sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_BANKL sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_BANKS sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_STCD1 sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_STCD2 sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_STKZU sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_STKZA sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_REGIO sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_BKONT sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_DTAWS sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_DTAMS sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_XCPDK sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_EMPFG sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_SPRAS sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_FITYP sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_STCDT sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_STKZN sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_STCD3 sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_STCD4 sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_BKREF sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_J_1KFREPRE sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_J_1KFTBUS sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_J_1KFTIND sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_ANRED sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_ADRNR sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_XRGUH sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_PO_BOX_NUM sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_BEGRU sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_DATAAGING sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_IBAN sy-vline 
WA_FISV_BSEG_EV_STR-BSEC_IBAN_VALID_FROM sy-vline 
WA_FISV_BSEG_EV_STR-VKORG sy-vline 
WA_FISV_BSEG_EV_STR-VTWEG sy-vline 
WA_FISV_BSEG_EV_STR-KNA1_LAND1 sy-vline 
WA_FISV_BSEG_EV_STR-KNA1_STCEG sy-vline 
WA_FISV_BSEG_EV_STR-REGIO sy-vline 
WA_FISV_BSEG_EV_STR-BRSCH sy-vline 
WA_FISV_BSEG_EV_STR-KUNNR_TXT sy-vline 
WA_FISV_BSEG_EV_STR-LIFNR_TXT sy-vline 
WA_FISV_BSEG_EV_STR-LFA1_STCEG sy-vline 
WA_FISV_BSEG_EV_STR-LFA1_LAND1 sy-vline 
WA_FISV_BSEG_EV_STR-SKB1_BEGRU sy-vline 
WA_FISV_BSEG_EV_STR-T001_LAND1 sy-vline 
WA_FISV_BSEG_EV_STR-KTOPL sy-vline 
WA_FISV_BSEG_EV_STR-LAND1 sy-vline 
WA_FISV_BSEG_EV_STR-KALSM sy-vline 
WA_FISV_BSEG_EV_STR-BUKRS_TXT sy-vline 
WA_FISV_BSEG_EV_STR-VBUND_TXT sy-vline 
WA_FISV_BSEG_EV_STR-WERKS_TXT sy-vline      INTO ld_text SEPARATED BY SPACE.

*Add any further fields from structure WA_EKKO_STR you want to CONCATENATE...
ENDLOOP.
ENDFORM.