ABAP Select data from SAP table TCORIS_CORRDATA_FORM 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 TCORIS_CORRDATA_FORM 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 TCORIS_CORRDATA_FORM. 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 TCORIS_CORRDATA_FORM 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_TCORIS_CORRDATA_FORM TYPE STANDARD TABLE OF TCORIS_CORRDATA_FORM,
      WA_TCORIS_CORRDATA_FORM TYPE TCORIS_CORRDATA_FORM,
      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: <TCORIS_CORRDATA_FORM> TYPE TCORIS_CORRDATA_FORM.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM TCORIS_CORRDATA_FORM
*  INTO TABLE @DATA(IT_TCORIS_CORRDATA_FORM2).
*--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_TCORIS_CORRDATA_FORM INDEX 1 INTO DATA(WA_TCORIS_CORRDATA_FORM2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<TCORIS_CORRDATA_FORM>-VTBFHA = 1.
<TCORIS_CORRDATA_FORM>-MANDT = 1.
<TCORIS_CORRDATA_FORM>-BUKRS = 1.
<TCORIS_CORRDATA_FORM>-RFHA = 1.
<TCORIS_CORRDATA_FORM>-CRUSER = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_TCORIS_CORRDATA_FORM-DCRDAT, sy-vline,
  WA_TCORIS_CORRDATA_FORM-TCRTIM, sy-vline,
  WA_TCORIS_CORRDATA_FORM-UPUSER, sy-vline,
  WA_TCORIS_CORRDATA_FORM-DUPDAT, sy-vline,
  WA_TCORIS_CORRDATA_FORM-TUPTIM, sy-vline,
  WA_TCORIS_CORRDATA_FORM-RANTYP, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_TCORIS_CORRDATA_FORM 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_TCORIS_CORRDATA_FORM 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_TCORIS_CORRDATA_FORM INTO WA_TCORIS_CORRDATA_FORM.


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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit SPDEV, internal->external for field TDDEST
CALL FUNCTION 'CONVERSION_EXIT_SPDEV_OUTPUT'
  EXPORTING
    input =                      WA_TCORIS_CORRDATA_FORM-TDDEST
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_TCORIS_CORRDATA_FORM-TDDEST.
WRITE:/ 'New Value:', ld_input.

*Conversion exit SPDEV, internal->external for field FDDEST
CALL FUNCTION 'CONVERSION_EXIT_SPDEV_OUTPUT'
  EXPORTING
    input =                      WA_TCORIS_CORRDATA_FORM-FDDEST
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_TCORIS_CORRDATA_FORM-FDDEST.
WRITE:/ 'New Value:', ld_input.

*Conversion exit SXIDN, internal->external for field EMAIL_ADD
CALL FUNCTION 'CONVERSION_EXIT_SXIDN_OUTPUT'
  EXPORTING
    input =                      WA_TCORIS_CORRDATA_FORM-EMAIL_ADD
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_TCORIS_CORRDATA_FORM-EMAIL_ADD.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit ALPHA, internal->external for field DEPO_BANK
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_TCORIS_CORRDATA_FORM-DEPO_BANK
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_TCORIS_CORRDATA_FORM-DEPO_BANK.
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_TCORIS_CORRDATA_FORM_STR, 
VTBFHA TYPE STRING,
MANDT TYPE STRING,
BUKRS TYPE STRING,
RFHA TYPE STRING,
CRUSER TYPE STRING,
DCRDAT TYPE STRING,
TCRTIM TYPE STRING,
UPUSER TYPE STRING,
DUPDAT TYPE STRING,
TUPTIM TYPE STRING,
RANTYP TYPE STRING,
SANLF TYPE STRING,
SFGTYP TYPE STRING,
SGSART TYPE STRING,
SFHAART TYPE STRING,
RGATT TYPE STRING,
RMAID TYPE STRING,
RFHAZUNR TYPE STRING,
RFHAZUL TYPE STRING,
SAKTIV TYPE STRING,
KONTRH TYPE STRING,
SROLEXT TYPE STRING,
RGARANT TYPE STRING,
RREFKONT TYPE STRING,
RREFKONT2 TYPE STRING,
RPORTB TYPE STRING,
WGSCHFT TYPE STRING,
WGSCHFT1 TYPE STRING,
WGSCHFT2 TYPE STRING,
AMTINPUT TYPE STRING,
DBLFZ TYPE STRING,
SKALID TYPE STRING,
SKALID2 TYPE STRING,
JLIMIT TYPE STRING,
AKUEND TYPE STRING,
SKUEND TYPE STRING,
OBJNR TYPE STRING,
RLDEPO TYPE STRING,
ZUONR TYPE STRING,
DELFZ TYPE STRING,
ABWTYP TYPE STRING,
TBEGRU TYPE STRING,
VRFHA TYPE STRING,
SINCLBE TYPE STRING,
SNPVCAL TYPE STRING,
SRNDNG TYPE STRING,
ZUOND TYPE STRING,
REFER TYPE STRING,
MERKM TYPE STRING,
SFRGZUST TYPE STRING,
RANL TYPE STRING,
RCOMVALCL TYPE STRING,
FACILITYNR TYPE STRING,
FACILITYBUKRS TYPE STRING,
POSACC TYPE STRING,
RCOMVALCL2 TYPE STRING,
FUND TYPE STRING,
GRANT_NBR TYPE STRING,
TIMESTAMP_DEAL TYPE STRING,
COMMODITY_ID TYPE STRING,
RPORTB2 TYPE STRING,
COMMODITY_ID1 TYPE STRING,
COMMODITY_ID2 TYPE STRING,
CLEARING_OPTION TYPE STRING,
CLEARING_STATUS TYPE STRING,
CLEARING_DATE TYPE STRING,
EXT_ACCOUNT TYPE STRING,
CLEAR_DATE_ACT TYPE STRING,
SCONDITION TYPE STRING,
RISK_MITIGATING TYPE STRING,
FIMA_CALCULATION TYPE STRING,
TRUSTEE TYPE STRING,
PRCTR TYPE STRING,
RCNTR TYPE STRING,
PS_POSID TYPE STRING,
RBUSA TYPE STRING,
HEDGE_CLASS TYPE STRING,
INIT_CLASSIFIER TYPE STRING,
COUNTRY TYPE STRING,
FB_SEGMENT TYPE STRING,
BEHALF_OF_COMPANY TYPE STRING,
TRADED_CURRENCY TYPE STRING,
HEDGE_REQUEST_ID TYPE STRING,
CFI_CODE TYPE STRING,
ISIN TYPE STRING,
MIC TYPE STRING,
CONTRACT_TIMESTAMP_UTC TYPE STRING,
BUPLA TYPE STRING,
FKBER TYPE STRING,
PRICEINDEX_USED TYPE STRING,
VTBFHAZU TYPE STRING,
MANDT TYPE STRING,
BUKRS TYPE STRING,
RFHA TYPE STRING,
RFHAZU TYPE STRING,
CRUSER TYPE STRING,
DCRDAT TYPE STRING,
TCRTIM TYPE STRING,
UPUSER TYPE STRING,
DUPDAT TYPE STRING,
TUPTIM TYPE STRING,
SGSART TYPE STRING,
SFHAART TYPE STRING,
SFGZUSTT TYPE STRING,
SFUNKTV TYPE STRING,
SFUNKTL TYPE STRING,
ROFHAZU TYPE STRING,
RFHAZUX TYPE STRING,
SAKTIV TYPE STRING,
SSTOGRD TYPE STRING,
RDEALER TYPE STRING,
DVTRAB TYPE STRING,
TVTRAB TYPE STRING,
GSPPART TYPE STRING,
XAKT TYPE STRING,
NORDEXT TYPE STRING,
DBLFZ TYPE STRING,
DELFZ TYPE STRING,
DFIX TYPE STRING,
FIXING_REF_ID TYPE STRING,
SINCLE TYPE STRING,
DZSTND TYPE STRING,
SZNSPRO TYPE STRING,
DZNSSTD TYPE STRING,
KKURS TYPE STRING,
KKASSA TYPE STRING,
KSWAP TYPE STRING,
WLWAERS TYPE STRING,
WFWAERS TYPE STRING,
LIMITART TYPE STRING,
LIMITDAT TYPE STRING,
RKONDGR TYPE STRING,
LIWAERS TYPE STRING,
KWLIQUI TYPE STRING,
SCONFIRM TYPE STRING,
DEXDAT TYPE STRING,
UEXNAM TYPE STRING,
SRECONFIRM TYPE STRING,
DREDAT TYPE STRING,
URENAM TYPE STRING,
DORDER TYPE STRING,
DANST TYPE STRING,
TANST TYPE STRING,
SANST TYPE STRING,
SSPESEN TYPE STRING,
BUPRCLIM TYPE STRING,
SRUNITLIM TYPE STRING,
BPPRCLIM TYPE STRING,
JVERK6B TYPE STRING,
PEFFZINS TYPE STRING,
PEFFZINS_GIVEN TYPE STRING,
PEFFZCALL TYPE STRING,
SEFFMETH TYPE STRING,
NOTICE_DATE TYPE STRING,
ROUNDING_RULE TYPE STRING,
BPPRC_SPOT2 TYPE STRING,
BPPRC_SPOT1 TYPE STRING,
BPPRC_MARG TYPE STRING,
COC_RATE TYPE STRING,
FORWARD_DATE TYPE STRING,
SNOTDELIVERED TYPE STRING,
PEFFZ_WORST TYPE STRING,
PEFFZ_WORST_DT TYPE STRING,
ZVTRAB TYPE STRING,
NOM_UP_LIMIT TYPE STRING,
NOM_LOW_LIMIT TYPE STRING,
VTBFHAPO TYPE STRING,
VTBKORES TYPE STRING,
MANDT TYPE STRING,
BUKRS TYPE STRING,
RFHA TYPE STRING,
RFHAZU TYPE STRING,
RORDER TYPE STRING,
DCRDAT TYPE STRING,
TCTRIM TYPE STRING,
RLFDNR TYPE STRING,
SPLAN TYPE STRING,
SFGZUSTT TYPE STRING,
SFUNKTL TYPE STRING,
CORTYP TYPE STRING,
SPRINT TYPE STRING,
SFAX TYPE STRING,
SSWIFT TYPE STRING,
SIDOC TYPE STRING,
SEMAIL TYPE STRING,
DCIDAT TYPE STRING,
TCIDAT TYPE STRING,
JSENDEN TYPE STRING,
DEXDAT TYPE STRING,
TEXDAT TYPE STRING,
UEXNAM TYPE STRING,
TDSPOOLID TYPE STRING,
TDOBJ_NO TYPE STRING,
SRECONFIRM TYPE STRING,
DREDAT TYPE STRING,
TREDAT TYPE STRING,
URENAM TYPE STRING,
FORMULAR TYPE STRING,
SWIFT_DAT TYPE STRING,
KONTRH TYPE STRING,
ROLETYP TYPE STRING,
URCNAM TYPE STRING,
CORR_AD TYPE STRING,
CRUSER TYPE STRING,
UPUSER TYPE STRING,
DUPDAT TYPE STRING,
TUPTIM TYPE STRING,
JAUTOMAT TYPE STRING,
CORAUT TYPE STRING,
SSTATUS TYPE STRING,
SSTATCHG TYPE STRING,
SREPEAT TYPE STRING,
LAUFD TYPE STRING,
LAUFI TYPE STRING,
DTKEY TYPE STRING,
LFDNR TYPE STRING,
SWIFTREF TYPE STRING,
DOCNUM TYPE STRING,
DOCNUM_IN TYPE STRING,
SFORMCT TYPE STRING,
AT80 TYPE STRING,
MANDT TYPE STRING,
BUKRS TYPE STRING,
SGSART TYPE STRING,
SFHAART TYPE STRING,
SFGZUSTT TYPE STRING,
SFUNKTL TYPE STRING,
CORTYP TYPE STRING,
FORMULAR TYPE STRING,
AUTOMATIC TYPE STRING,
SOBLRECONF TYPE STRING,
TDCOPIES TYPE STRING,
TDDEST TYPE STRING,
TDPREVIEW TYPE STRING,
TDNOPRINT TYPE STRING,
TDNEWID TYPE STRING,
TDDATASET TYPE STRING,
TDSUFFIX1 TYPE STRING,
TDSUFFIX2 TYPE STRING,
TDIMMED TYPE STRING,
TDDELETE TYPE STRING,
TDLIFETIME TYPE STRING,
TDSCHEDULE TYPE STRING,
TDSENDDATE TYPE STRING,
TDSENDTIME TYPE STRING,
TDTITLE TYPE STRING,
TDCOVER TYPE STRING,
TDCOVTITLE TYPE STRING,
TDARMOD TYPE STRING,
FDCOPIES TYPE STRING,
FDDEST TYPE STRING,
FDPREVIEW TYPE STRING,
FDNOPRINT TYPE STRING,
FDNEWID TYPE STRING,
FDDATASET TYPE STRING,
FDSUFFIX1 TYPE STRING,
FDSUFFIX2 TYPE STRING,
FDIMMED TYPE STRING,
FDDELETE TYPE STRING,
FDLIFETIME TYPE STRING,
FDSCHEDULE TYPE STRING,
FDSENDDATE TYPE STRING,
FDSENDTIME TYPE STRING,
FDTITLE TYPE STRING,
FDCOVER TYPE STRING,
FDCOVTITLE TYPE STRING,
FDARMOD TYPE STRING,
SFORMCT TYPE STRING,
TCORS_RECIPIENT_ADDR TYPE STRING,
ADR_COUNTRY TYPE STRING,
FAX_NO TYPE STRING,
EMAIL_ADD TYPE STRING,
CORR_COUNTRY TYPE STRING,
CORR_LANGUAGE TYPE STRING,
CO_UUID TYPE STRING,
SA_MAIN TYPE STRING,
COMP_CODE TYPE STRING,
SEC_ACCOUNT TYPE STRING,
SEC_ACC_ID TYPE STRING,
BANK_GIRO_ACCNO TYPE STRING,
DEPO_BANK TYPE STRING,
SEC_ACC_NO TYPE STRING,
POSITION_DATE TYPE STRING,
EXT_STMT_NAME TYPE STRING,
EXT_STMT_GROUP TYPE STRING,
EXT_STMT_STATUS TYPE STRING,
EXT_REF1 TYPE STRING,
EXT_REF2 TYPE STRING,
DATE_CATEGORY TYPE STRING,
EXT_SEC_ACC_NO TYPE STRING,
SA_FLOWS TYPE STRING,
LOC_ACTIVITY TYPE STRING,END OF T_EKKO_STR.
DATA: WA_TCORIS_CORRDATA_FORM_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_TCORIS_CORRDATA_FORM_STR-VTBFHA sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-MANDT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-BUKRS sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-RFHA sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-CRUSER sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-DCRDAT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-TCRTIM sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-UPUSER sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-DUPDAT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-TUPTIM sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-RANTYP sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SANLF sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SFGTYP sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SGSART sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SFHAART sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-RGATT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-RMAID sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-RFHAZUNR sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-RFHAZUL sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SAKTIV sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-KONTRH sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SROLEXT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-RGARANT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-RREFKONT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-RREFKONT2 sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-RPORTB sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-WGSCHFT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-WGSCHFT1 sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-WGSCHFT2 sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-AMTINPUT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-DBLFZ sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SKALID sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SKALID2 sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-JLIMIT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-AKUEND sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SKUEND sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-OBJNR sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-RLDEPO sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-ZUONR sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-DELFZ sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-ABWTYP sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-TBEGRU sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-VRFHA sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SINCLBE sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SNPVCAL sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SRNDNG sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-ZUOND sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-REFER sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-MERKM sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SFRGZUST sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-RANL sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-RCOMVALCL sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-FACILITYNR sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-FACILITYBUKRS sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-POSACC sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-RCOMVALCL2 sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-FUND sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-GRANT_NBR sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-TIMESTAMP_DEAL sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-COMMODITY_ID sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-RPORTB2 sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-COMMODITY_ID1 sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-COMMODITY_ID2 sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-CLEARING_OPTION sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-CLEARING_STATUS sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-CLEARING_DATE sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-EXT_ACCOUNT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-CLEAR_DATE_ACT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SCONDITION sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-RISK_MITIGATING sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-FIMA_CALCULATION sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-TRUSTEE sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-PRCTR sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-RCNTR sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-PS_POSID sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-RBUSA sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-HEDGE_CLASS sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-INIT_CLASSIFIER sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-COUNTRY sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-FB_SEGMENT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-BEHALF_OF_COMPANY sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-TRADED_CURRENCY sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-HEDGE_REQUEST_ID sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-CFI_CODE sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-ISIN sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-MIC sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-CONTRACT_TIMESTAMP_UTC sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-BUPLA sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-FKBER sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-PRICEINDEX_USED sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-VTBFHAZU sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-MANDT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-BUKRS sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-RFHA sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-RFHAZU sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-CRUSER sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-DCRDAT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-TCRTIM sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-UPUSER sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-DUPDAT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-TUPTIM sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SGSART sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SFHAART sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SFGZUSTT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SFUNKTV sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SFUNKTL sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-ROFHAZU sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-RFHAZUX sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SAKTIV sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SSTOGRD sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-RDEALER sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-DVTRAB sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-TVTRAB sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-GSPPART sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-XAKT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-NORDEXT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-DBLFZ sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-DELFZ sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-DFIX sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-FIXING_REF_ID sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SINCLE sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-DZSTND sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SZNSPRO sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-DZNSSTD sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-KKURS sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-KKASSA sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-KSWAP sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-WLWAERS sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-WFWAERS sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-LIMITART sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-LIMITDAT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-RKONDGR sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-LIWAERS sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-KWLIQUI sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SCONFIRM sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-DEXDAT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-UEXNAM sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SRECONFIRM sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-DREDAT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-URENAM sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-DORDER sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-DANST sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-TANST sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SANST sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SSPESEN sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-BUPRCLIM sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SRUNITLIM sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-BPPRCLIM sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-JVERK6B sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-PEFFZINS sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-PEFFZINS_GIVEN sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-PEFFZCALL sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SEFFMETH sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-NOTICE_DATE sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-ROUNDING_RULE sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-BPPRC_SPOT2 sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-BPPRC_SPOT1 sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-BPPRC_MARG sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-COC_RATE sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-FORWARD_DATE sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SNOTDELIVERED sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-PEFFZ_WORST sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-PEFFZ_WORST_DT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-ZVTRAB sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-NOM_UP_LIMIT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-NOM_LOW_LIMIT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-VTBFHAPO sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-VTBKORES sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-MANDT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-BUKRS sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-RFHA sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-RFHAZU sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-RORDER sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-DCRDAT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-TCTRIM sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-RLFDNR sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SPLAN sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SFGZUSTT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SFUNKTL sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-CORTYP sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SPRINT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SFAX sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SSWIFT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SIDOC sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SEMAIL sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-DCIDAT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-TCIDAT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-JSENDEN sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-DEXDAT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-TEXDAT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-UEXNAM sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-TDSPOOLID sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-TDOBJ_NO sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SRECONFIRM sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-DREDAT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-TREDAT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-URENAM sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-FORMULAR sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SWIFT_DAT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-KONTRH sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-ROLETYP sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-URCNAM sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-CORR_AD sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-CRUSER sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-UPUSER sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-DUPDAT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-TUPTIM sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-JAUTOMAT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-CORAUT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SSTATUS sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SSTATCHG sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SREPEAT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-LAUFD sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-LAUFI sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-DTKEY sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-LFDNR sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SWIFTREF sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-DOCNUM sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-DOCNUM_IN sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SFORMCT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-AT80 sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-MANDT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-BUKRS sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SGSART sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SFHAART sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SFGZUSTT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SFUNKTL sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-CORTYP sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-FORMULAR sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-AUTOMATIC sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SOBLRECONF sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-TDCOPIES sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-TDDEST sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-TDPREVIEW sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-TDNOPRINT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-TDNEWID sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-TDDATASET sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-TDSUFFIX1 sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-TDSUFFIX2 sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-TDIMMED sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-TDDELETE sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-TDLIFETIME sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-TDSCHEDULE sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-TDSENDDATE sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-TDSENDTIME sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-TDTITLE sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-TDCOVER sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-TDCOVTITLE sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-TDARMOD sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-FDCOPIES sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-FDDEST sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-FDPREVIEW sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-FDNOPRINT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-FDNEWID sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-FDDATASET sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-FDSUFFIX1 sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-FDSUFFIX2 sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-FDIMMED sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-FDDELETE sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-FDLIFETIME sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-FDSCHEDULE sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-FDSENDDATE sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-FDSENDTIME sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-FDTITLE sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-FDCOVER sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-FDCOVTITLE sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-FDARMOD sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SFORMCT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-TCORS_RECIPIENT_ADDR sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-ADR_COUNTRY sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-FAX_NO sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-EMAIL_ADD sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-CORR_COUNTRY sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-CORR_LANGUAGE sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-CO_UUID sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SA_MAIN sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-COMP_CODE sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SEC_ACCOUNT sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SEC_ACC_ID sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-BANK_GIRO_ACCNO sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-DEPO_BANK sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SEC_ACC_NO sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-POSITION_DATE sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-EXT_STMT_NAME sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-EXT_STMT_GROUP sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-EXT_STMT_STATUS sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-EXT_REF1 sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-EXT_REF2 sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-DATE_CATEGORY sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-EXT_SEC_ACC_NO sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-SA_FLOWS sy-vline 
WA_TCORIS_CORRDATA_FORM_STR-LOC_ACTIVITY sy-vline      INTO ld_text SEPARATED BY SPACE.

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