ABAP Select data from SAP table COD_S_CONTRACT_DATA 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 COD_S_CONTRACT_DATA 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 COD_S_CONTRACT_DATA. 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 COD_S_CONTRACT_DATA 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_COD_S_CONTRACT_DATA TYPE STANDARD TABLE OF COD_S_CONTRACT_DATA,
      WA_COD_S_CONTRACT_DATA TYPE COD_S_CONTRACT_DATA,
      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: <COD_S_CONTRACT_DATA> TYPE COD_S_CONTRACT_DATA.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM COD_S_CONTRACT_DATA
*  INTO TABLE @DATA(IT_COD_S_CONTRACT_DATA2).
*--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_COD_S_CONTRACT_DATA INDEX 1 INTO DATA(WA_COD_S_CONTRACT_DATA2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<COD_S_CONTRACT_DATA>-OPERATION = 1.
<COD_S_CONTRACT_DATA>-DOC_NUMBER = 1.
<COD_S_CONTRACT_DATA>-REC_DATE = 1.
<COD_S_CONTRACT_DATA>-REC_TIME = 1.
<COD_S_CONTRACT_DATA>-CREATED_BY = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_COD_S_CONTRACT_DATA-QT_VALID_F, sy-vline,
  WA_COD_S_CONTRACT_DATA-QT_VALID_T, sy-vline,
  WA_COD_S_CONTRACT_DATA-DOC_DATE, sy-vline,
  WA_COD_S_CONTRACT_DATA-SD_DOC_CAT, sy-vline,
  WA_COD_S_CONTRACT_DATA-TRAN_GROUP, sy-vline,
  WA_COD_S_CONTRACT_DATA-DOC_TYPE, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_COD_S_CONTRACT_DATA 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_COD_S_CONTRACT_DATA 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_COD_S_CONTRACT_DATA INTO WA_COD_S_CONTRACT_DATA.


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

*Conversion exit AUART, internal->external for field DOC_TYPE
CALL FUNCTION 'CONVERSION_EXIT_AUART_OUTPUT'
  EXPORTING
    input =                      WA_COD_S_CONTRACT_DATA-DOC_TYPE
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_COD_S_CONTRACT_DATA-DOC_TYPE.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

*Conversion exit ALPHA, internal->external for field SD_DOC
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_COD_S_CONTRACT_DATA-SD_DOC
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_COD_S_CONTRACT_DATA-SD_DOC.
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_COD_S_CONTRACT_DATA_STR, 
OPERATION TYPE STRING,
DOC_NUMBER TYPE STRING,
REC_DATE TYPE STRING,
REC_TIME TYPE STRING,
CREATED_BY TYPE STRING,
QT_VALID_F TYPE STRING,
QT_VALID_T TYPE STRING,
DOC_DATE TYPE STRING,
SD_DOC_CAT TYPE STRING,
TRAN_GROUP TYPE STRING,
DOC_TYPE TYPE STRING,
ORD_REASON TYPE STRING,
WAR_DATE TYPE STRING,
SD_COL_NUM TYPE STRING,
DLV_BLOCK TYPE STRING,
BILL_BLOCK TYPE STRING,
NET_VAL_HD TYPE STRING,
CURRENCY TYPE STRING,
CURREN_ISO TYPE STRING,
SALES_ORG TYPE STRING,
DISTR_CHAN TYPE STRING,
DIVISION TYPE STRING,
SALES_GRP TYPE STRING,
SALES_OFF TYPE STRING,
BUS_AREA TYPE STRING,
CT_AREA TYPE STRING,
CT_VALID_F TYPE STRING,
CT_VALID_T TYPE STRING,
CONDITIONS TYPE STRING,
REQ_DATE_H TYPE STRING,
DATE_TYPE TYPE STRING,
COMPL_DLV TYPE STRING,
DOC_CLASS TYPE STRING,
DOC_INDIC TYPE STRING,
SD_PRIC_PR TYPE STRING,
SHIP_COND TYPE STRING,
ORDBILLTYP TYPE STRING,
ORD_PROBAB TYPE STRING,
SEAR_PRPR TYPE STRING,
PURCH_NO TYPE STRING,
PO_METHOD TYPE STRING,
PURCH_DATE TYPE STRING,
PO_SUPPLEM TYPE STRING,
REF_1 TYPE STRING,
ORDERER_NA TYPE STRING,
TELEPHONE TYPE STRING,
DUN_COUNT TYPE STRING,
DUN_DATE TYPE STRING,
SOLD_TO TYPE STRING,
COSTCENTER TYPE STRING,
UPDATE_GRP TYPE STRING,
STAT_CURR TYPE STRING,
ISOSTATCUR TYPE STRING,
CH_ON TYPE STRING,
CUST_GRP1 TYPE STRING,
CUST_GRP2 TYPE STRING,
CUST_GRP3 TYPE STRING,
CUST_GRP4 TYPE STRING,
CUST_GRP5 TYPE STRING,
AGREE_COND TYPE STRING,
CO_AREA TYPE STRING,
WBS_ELEM TYPE STRING,
EXCHG_RATE TYPE STRING,
C_CTR_AREA TYPE STRING,
CRED_ACCNT TYPE STRING,
CRED_GROUP TYPE STRING,
REPR_GROUP TYPE STRING,
RISK_CATEG TYPE STRING,
CURR_CRED TYPE STRING,
ISOCURRCRE TYPE STRING,
REL_DAT_DD TYPE STRING,
NEXT_CHDAT TYPE STRING,
NEXT_DATE TYPE STRING,
REL_CREDIT TYPE STRING,
HI_TYPE_PR TYPE STRING,
DLVSCHEDUS TYPE STRING,
PLAN_DLV TYPE STRING,
REF_DOC TYPE STRING,
OB_JNR_HD TYPE STRING,
COMP_CODE TYPE STRING,
ALT_TAX_CL TYPE STRING,
TAX_CLASS2 TYPE STRING,
TAX_CLASS3 TYPE STRING,
TAX_CLASS4 TYPE STRING,
TAX_CLASS5 TYPE STRING,
TAX_CLASS6 TYPE STRING,
TAX_CLASS7 TYPE STRING,
TAX_CLASS8 TYPE STRING,
TAX_CLASS9 TYPE STRING,
REF_DOC_L TYPE STRING,
ASS_NUMBER TYPE STRING,
DOC_CAT_SD TYPE STRING,
KALSM_CH TYPE STRING,
ACC_PERIOD TYPE STRING,
ORDERID TYPE STRING,
NOTIF_NO TYPE STRING,
MASTER_CON TYPE STRING,
REF_PROC TYPE STRING,
CHECK_PART TYPE STRING,
PICK_UP_DA TYPE STRING,
PICK_UP_T1 TYPE STRING,
PICK_UP_T2 TYPE STRING,
NUM_PAY_CA TYPE STRING,
LINE_TIME TYPE STRING,
TAX_DEST_CT TYPE STRING,
ISOTAXDEST TYPE STRING,
TAX_DEPART TYPE STRING,
ISOTAXDEPA TYPE STRING,
EU_TRIANG TYPE STRING,
MAST_CONTR TYPE STRING,
CML_QTY_DA TYPE STRING,
MS_DATE TYPE STRING,
VERSION TYPE STRING,
REF_DOC_L_LONG TYPE STRING,
CRM_GUID TYPE STRING,
SD_DOC_CAT_LONG TYPE STRING,
DOC_CAT_SD_LONG TYPE STRING,
STATUS TYPE STRING,
OPERATION TYPE STRING,
SD_DOC TYPE STRING,
REFDOCHDST TYPE STRING,
TOTREFSTAT TYPE STRING,
CONFIRSTAT TYPE STRING,
DELIV_STAT TYPE STRING,
DLV_STAT_H TYPE STRING,
TOTGOODSMV TYPE STRING,
BILLSTATUS TYPE STRING,
BILLINGSTA TYPE STRING,
ACCOUNTSTA TYPE STRING,
OVERALLREJ TYPE STRING,
PRC_STAT_H TYPE STRING,
OVERALLPIC TYPE STRING,
OVERALL_WM TYPE STRING,
TOTINCOMPL TYPE STRING,
TOTINCOMIT TYPE STRING,
TOTINCOMBI TYPE STRING,
GENINCOMHD TYPE STRING,
HDIMCOMDEL TYPE STRING,
HDINCOMBIL TYPE STRING,
DOCIMCOMPR TYPE STRING,
SD_DOC_CAT TYPE STRING,
SDDOCOBJ TYPE STRING,
CH_ON TYPE STRING,
BILTOTSTAT TYPE STRING,
INVOICSTAT TYPE STRING,
CUSTRESHD1 TYPE STRING,
CUSTRESHD2 TYPE STRING,
CUSTRESHD3 TYPE STRING,
CUSTRESHD4 TYPE STRING,
CUSTRESHD5 TYPE STRING,
CUSTRESIT1 TYPE STRING,
CUSTRESIT2 TYPE STRING,
CUSTRESIT3 TYPE STRING,
CUSTRESIT4 TYPE STRING,
CUSTRESIT5 TYPE STRING,
TOTSTATIT TYPE STRING,
STATSTACLC TYPE STRING,
STATDYNCLC TYPE STRING,
STATCREDCH TYPE STRING,
STATCRECH1 TYPE STRING,
STATCRECH2 TYPE STRING,
STATCRECH3 TYPE STRING,
STATCRECH4 TYPE STRING,
STATCRECH5 TYPE STRING,
STATCRECH6 TYPE STRING,
STATCRECH7 TYPE STRING,
STATCRECH8 TYPE STRING,
STATCRECH9 TYPE STRING,
STATCRECHA TYPE STRING,
STATCRECHB TYPE STRING,
STATCRECHC TYPE STRING,
TOTSTATCCH TYPE STRING,
TRNSPLANST TYPE STRING,
QUITTSTAT TYPE STRING,
CONFIRMSTA TYPE STRING,
SAPRELEASE TYPE STRING,
TOTINCOMI TYPE STRING,
TOTINCOMI1 TYPE STRING,
TOTINCOMI2 TYPE STRING,
HDINCOMPL TYPE STRING,
HDINCOMPL1 TYPE STRING,
HDINCOMPL2 TYPE STRING,
HDINCOMPL3 TYPE STRING,
CREDCHECK TYPE STRING,
DELAYSTAT TYPE STRING,
SHIPPUNIT TYPE STRING,
DISTRISTAT TYPE STRING,
REVDETSTAT TYPE STRING,
INDIDOCACH TYPE STRING,
TOBILBLOST TYPE STRING,
TODELBLOST TYPE STRING,
TOBLOCKSTA TYPE STRING,
LEBHEADSTA TYPE STRING,
FMSTATUS TYPE STRING,
SD_DOC_CAT_LONG TYPE STRING,
GROSS_VAL_HD TYPE STRING,
TAX_AMOUNT_HD TYPE STRING,
PRC_CONDITIONS TYPE STRING,
PRINT_PRC_CONDITIONS TYPE STRING,
PARTNERS TYPE STRING,
ITEMS TYPE STRING,
CREATE_COND_TYPE_HD TYPE STRING,
CREATE_COND_TYPE_IT TYPE STRING,
CREDIT_LIMIT TYPE STRING,
CREDIT_EXPOSURE_AMOUNT TYPE STRING,
CREDIT_EXCEEDED_AMOUNT TYPE STRING,
INVOICE_SCHEDULE_VALUE_HD TYPE STRING,
POSNR TYPE STRING,
NET_VALUE TYPE STRING,
GROSS_VAL TYPE STRING,
TAX_AMOUNT TYPE STRING,
CURREN_ISO TYPE STRING,
BILLING_PLAN TYPE STRING,
CREATE_COND_HD TYPE STRING,
CREATE_COND_IT TYPE STRING,END OF T_EKKO_STR.
DATA: WA_COD_S_CONTRACT_DATA_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_COD_S_CONTRACT_DATA_STR-OPERATION sy-vline 
WA_COD_S_CONTRACT_DATA_STR-DOC_NUMBER sy-vline 
WA_COD_S_CONTRACT_DATA_STR-REC_DATE sy-vline 
WA_COD_S_CONTRACT_DATA_STR-REC_TIME sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CREATED_BY sy-vline 
WA_COD_S_CONTRACT_DATA_STR-QT_VALID_F sy-vline 
WA_COD_S_CONTRACT_DATA_STR-QT_VALID_T sy-vline 
WA_COD_S_CONTRACT_DATA_STR-DOC_DATE sy-vline 
WA_COD_S_CONTRACT_DATA_STR-SD_DOC_CAT sy-vline 
WA_COD_S_CONTRACT_DATA_STR-TRAN_GROUP sy-vline 
WA_COD_S_CONTRACT_DATA_STR-DOC_TYPE sy-vline 
WA_COD_S_CONTRACT_DATA_STR-ORD_REASON sy-vline 
WA_COD_S_CONTRACT_DATA_STR-WAR_DATE sy-vline 
WA_COD_S_CONTRACT_DATA_STR-SD_COL_NUM sy-vline 
WA_COD_S_CONTRACT_DATA_STR-DLV_BLOCK sy-vline 
WA_COD_S_CONTRACT_DATA_STR-BILL_BLOCK sy-vline 
WA_COD_S_CONTRACT_DATA_STR-NET_VAL_HD sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CURRENCY sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CURREN_ISO sy-vline 
WA_COD_S_CONTRACT_DATA_STR-SALES_ORG sy-vline 
WA_COD_S_CONTRACT_DATA_STR-DISTR_CHAN sy-vline 
WA_COD_S_CONTRACT_DATA_STR-DIVISION sy-vline 
WA_COD_S_CONTRACT_DATA_STR-SALES_GRP sy-vline 
WA_COD_S_CONTRACT_DATA_STR-SALES_OFF sy-vline 
WA_COD_S_CONTRACT_DATA_STR-BUS_AREA sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CT_AREA sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CT_VALID_F sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CT_VALID_T sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CONDITIONS sy-vline 
WA_COD_S_CONTRACT_DATA_STR-REQ_DATE_H sy-vline 
WA_COD_S_CONTRACT_DATA_STR-DATE_TYPE sy-vline 
WA_COD_S_CONTRACT_DATA_STR-COMPL_DLV sy-vline 
WA_COD_S_CONTRACT_DATA_STR-DOC_CLASS sy-vline 
WA_COD_S_CONTRACT_DATA_STR-DOC_INDIC sy-vline 
WA_COD_S_CONTRACT_DATA_STR-SD_PRIC_PR sy-vline 
WA_COD_S_CONTRACT_DATA_STR-SHIP_COND sy-vline 
WA_COD_S_CONTRACT_DATA_STR-ORDBILLTYP sy-vline 
WA_COD_S_CONTRACT_DATA_STR-ORD_PROBAB sy-vline 
WA_COD_S_CONTRACT_DATA_STR-SEAR_PRPR sy-vline 
WA_COD_S_CONTRACT_DATA_STR-PURCH_NO sy-vline 
WA_COD_S_CONTRACT_DATA_STR-PO_METHOD sy-vline 
WA_COD_S_CONTRACT_DATA_STR-PURCH_DATE sy-vline 
WA_COD_S_CONTRACT_DATA_STR-PO_SUPPLEM sy-vline 
WA_COD_S_CONTRACT_DATA_STR-REF_1 sy-vline 
WA_COD_S_CONTRACT_DATA_STR-ORDERER_NA sy-vline 
WA_COD_S_CONTRACT_DATA_STR-TELEPHONE sy-vline 
WA_COD_S_CONTRACT_DATA_STR-DUN_COUNT sy-vline 
WA_COD_S_CONTRACT_DATA_STR-DUN_DATE sy-vline 
WA_COD_S_CONTRACT_DATA_STR-SOLD_TO sy-vline 
WA_COD_S_CONTRACT_DATA_STR-COSTCENTER sy-vline 
WA_COD_S_CONTRACT_DATA_STR-UPDATE_GRP sy-vline 
WA_COD_S_CONTRACT_DATA_STR-STAT_CURR sy-vline 
WA_COD_S_CONTRACT_DATA_STR-ISOSTATCUR sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CH_ON sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CUST_GRP1 sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CUST_GRP2 sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CUST_GRP3 sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CUST_GRP4 sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CUST_GRP5 sy-vline 
WA_COD_S_CONTRACT_DATA_STR-AGREE_COND sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CO_AREA sy-vline 
WA_COD_S_CONTRACT_DATA_STR-WBS_ELEM sy-vline 
WA_COD_S_CONTRACT_DATA_STR-EXCHG_RATE sy-vline 
WA_COD_S_CONTRACT_DATA_STR-C_CTR_AREA sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CRED_ACCNT sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CRED_GROUP sy-vline 
WA_COD_S_CONTRACT_DATA_STR-REPR_GROUP sy-vline 
WA_COD_S_CONTRACT_DATA_STR-RISK_CATEG sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CURR_CRED sy-vline 
WA_COD_S_CONTRACT_DATA_STR-ISOCURRCRE sy-vline 
WA_COD_S_CONTRACT_DATA_STR-REL_DAT_DD sy-vline 
WA_COD_S_CONTRACT_DATA_STR-NEXT_CHDAT sy-vline 
WA_COD_S_CONTRACT_DATA_STR-NEXT_DATE sy-vline 
WA_COD_S_CONTRACT_DATA_STR-REL_CREDIT sy-vline 
WA_COD_S_CONTRACT_DATA_STR-HI_TYPE_PR sy-vline 
WA_COD_S_CONTRACT_DATA_STR-DLVSCHEDUS sy-vline 
WA_COD_S_CONTRACT_DATA_STR-PLAN_DLV sy-vline 
WA_COD_S_CONTRACT_DATA_STR-REF_DOC sy-vline 
WA_COD_S_CONTRACT_DATA_STR-OB_JNR_HD sy-vline 
WA_COD_S_CONTRACT_DATA_STR-COMP_CODE sy-vline 
WA_COD_S_CONTRACT_DATA_STR-ALT_TAX_CL sy-vline 
WA_COD_S_CONTRACT_DATA_STR-TAX_CLASS2 sy-vline 
WA_COD_S_CONTRACT_DATA_STR-TAX_CLASS3 sy-vline 
WA_COD_S_CONTRACT_DATA_STR-TAX_CLASS4 sy-vline 
WA_COD_S_CONTRACT_DATA_STR-TAX_CLASS5 sy-vline 
WA_COD_S_CONTRACT_DATA_STR-TAX_CLASS6 sy-vline 
WA_COD_S_CONTRACT_DATA_STR-TAX_CLASS7 sy-vline 
WA_COD_S_CONTRACT_DATA_STR-TAX_CLASS8 sy-vline 
WA_COD_S_CONTRACT_DATA_STR-TAX_CLASS9 sy-vline 
WA_COD_S_CONTRACT_DATA_STR-REF_DOC_L sy-vline 
WA_COD_S_CONTRACT_DATA_STR-ASS_NUMBER sy-vline 
WA_COD_S_CONTRACT_DATA_STR-DOC_CAT_SD sy-vline 
WA_COD_S_CONTRACT_DATA_STR-KALSM_CH sy-vline 
WA_COD_S_CONTRACT_DATA_STR-ACC_PERIOD sy-vline 
WA_COD_S_CONTRACT_DATA_STR-ORDERID sy-vline 
WA_COD_S_CONTRACT_DATA_STR-NOTIF_NO sy-vline 
WA_COD_S_CONTRACT_DATA_STR-MASTER_CON sy-vline 
WA_COD_S_CONTRACT_DATA_STR-REF_PROC sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CHECK_PART sy-vline 
WA_COD_S_CONTRACT_DATA_STR-PICK_UP_DA sy-vline 
WA_COD_S_CONTRACT_DATA_STR-PICK_UP_T1 sy-vline 
WA_COD_S_CONTRACT_DATA_STR-PICK_UP_T2 sy-vline 
WA_COD_S_CONTRACT_DATA_STR-NUM_PAY_CA sy-vline 
WA_COD_S_CONTRACT_DATA_STR-LINE_TIME sy-vline 
WA_COD_S_CONTRACT_DATA_STR-TAX_DEST_CT sy-vline 
WA_COD_S_CONTRACT_DATA_STR-ISOTAXDEST sy-vline 
WA_COD_S_CONTRACT_DATA_STR-TAX_DEPART sy-vline 
WA_COD_S_CONTRACT_DATA_STR-ISOTAXDEPA sy-vline 
WA_COD_S_CONTRACT_DATA_STR-EU_TRIANG sy-vline 
WA_COD_S_CONTRACT_DATA_STR-MAST_CONTR sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CML_QTY_DA sy-vline 
WA_COD_S_CONTRACT_DATA_STR-MS_DATE sy-vline 
WA_COD_S_CONTRACT_DATA_STR-VERSION sy-vline 
WA_COD_S_CONTRACT_DATA_STR-REF_DOC_L_LONG sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CRM_GUID sy-vline 
WA_COD_S_CONTRACT_DATA_STR-SD_DOC_CAT_LONG sy-vline 
WA_COD_S_CONTRACT_DATA_STR-DOC_CAT_SD_LONG sy-vline 
WA_COD_S_CONTRACT_DATA_STR-STATUS sy-vline 
WA_COD_S_CONTRACT_DATA_STR-OPERATION sy-vline 
WA_COD_S_CONTRACT_DATA_STR-SD_DOC sy-vline 
WA_COD_S_CONTRACT_DATA_STR-REFDOCHDST sy-vline 
WA_COD_S_CONTRACT_DATA_STR-TOTREFSTAT sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CONFIRSTAT sy-vline 
WA_COD_S_CONTRACT_DATA_STR-DELIV_STAT sy-vline 
WA_COD_S_CONTRACT_DATA_STR-DLV_STAT_H sy-vline 
WA_COD_S_CONTRACT_DATA_STR-TOTGOODSMV sy-vline 
WA_COD_S_CONTRACT_DATA_STR-BILLSTATUS sy-vline 
WA_COD_S_CONTRACT_DATA_STR-BILLINGSTA sy-vline 
WA_COD_S_CONTRACT_DATA_STR-ACCOUNTSTA sy-vline 
WA_COD_S_CONTRACT_DATA_STR-OVERALLREJ sy-vline 
WA_COD_S_CONTRACT_DATA_STR-PRC_STAT_H sy-vline 
WA_COD_S_CONTRACT_DATA_STR-OVERALLPIC sy-vline 
WA_COD_S_CONTRACT_DATA_STR-OVERALL_WM sy-vline 
WA_COD_S_CONTRACT_DATA_STR-TOTINCOMPL sy-vline 
WA_COD_S_CONTRACT_DATA_STR-TOTINCOMIT sy-vline 
WA_COD_S_CONTRACT_DATA_STR-TOTINCOMBI sy-vline 
WA_COD_S_CONTRACT_DATA_STR-GENINCOMHD sy-vline 
WA_COD_S_CONTRACT_DATA_STR-HDIMCOMDEL sy-vline 
WA_COD_S_CONTRACT_DATA_STR-HDINCOMBIL sy-vline 
WA_COD_S_CONTRACT_DATA_STR-DOCIMCOMPR sy-vline 
WA_COD_S_CONTRACT_DATA_STR-SD_DOC_CAT sy-vline 
WA_COD_S_CONTRACT_DATA_STR-SDDOCOBJ sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CH_ON sy-vline 
WA_COD_S_CONTRACT_DATA_STR-BILTOTSTAT sy-vline 
WA_COD_S_CONTRACT_DATA_STR-INVOICSTAT sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CUSTRESHD1 sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CUSTRESHD2 sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CUSTRESHD3 sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CUSTRESHD4 sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CUSTRESHD5 sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CUSTRESIT1 sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CUSTRESIT2 sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CUSTRESIT3 sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CUSTRESIT4 sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CUSTRESIT5 sy-vline 
WA_COD_S_CONTRACT_DATA_STR-TOTSTATIT sy-vline 
WA_COD_S_CONTRACT_DATA_STR-STATSTACLC sy-vline 
WA_COD_S_CONTRACT_DATA_STR-STATDYNCLC sy-vline 
WA_COD_S_CONTRACT_DATA_STR-STATCREDCH sy-vline 
WA_COD_S_CONTRACT_DATA_STR-STATCRECH1 sy-vline 
WA_COD_S_CONTRACT_DATA_STR-STATCRECH2 sy-vline 
WA_COD_S_CONTRACT_DATA_STR-STATCRECH3 sy-vline 
WA_COD_S_CONTRACT_DATA_STR-STATCRECH4 sy-vline 
WA_COD_S_CONTRACT_DATA_STR-STATCRECH5 sy-vline 
WA_COD_S_CONTRACT_DATA_STR-STATCRECH6 sy-vline 
WA_COD_S_CONTRACT_DATA_STR-STATCRECH7 sy-vline 
WA_COD_S_CONTRACT_DATA_STR-STATCRECH8 sy-vline 
WA_COD_S_CONTRACT_DATA_STR-STATCRECH9 sy-vline 
WA_COD_S_CONTRACT_DATA_STR-STATCRECHA sy-vline 
WA_COD_S_CONTRACT_DATA_STR-STATCRECHB sy-vline 
WA_COD_S_CONTRACT_DATA_STR-STATCRECHC sy-vline 
WA_COD_S_CONTRACT_DATA_STR-TOTSTATCCH sy-vline 
WA_COD_S_CONTRACT_DATA_STR-TRNSPLANST sy-vline 
WA_COD_S_CONTRACT_DATA_STR-QUITTSTAT sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CONFIRMSTA sy-vline 
WA_COD_S_CONTRACT_DATA_STR-SAPRELEASE sy-vline 
WA_COD_S_CONTRACT_DATA_STR-TOTINCOMI sy-vline 
WA_COD_S_CONTRACT_DATA_STR-TOTINCOMI1 sy-vline 
WA_COD_S_CONTRACT_DATA_STR-TOTINCOMI2 sy-vline 
WA_COD_S_CONTRACT_DATA_STR-HDINCOMPL sy-vline 
WA_COD_S_CONTRACT_DATA_STR-HDINCOMPL1 sy-vline 
WA_COD_S_CONTRACT_DATA_STR-HDINCOMPL2 sy-vline 
WA_COD_S_CONTRACT_DATA_STR-HDINCOMPL3 sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CREDCHECK sy-vline 
WA_COD_S_CONTRACT_DATA_STR-DELAYSTAT sy-vline 
WA_COD_S_CONTRACT_DATA_STR-SHIPPUNIT sy-vline 
WA_COD_S_CONTRACT_DATA_STR-DISTRISTAT sy-vline 
WA_COD_S_CONTRACT_DATA_STR-REVDETSTAT sy-vline 
WA_COD_S_CONTRACT_DATA_STR-INDIDOCACH sy-vline 
WA_COD_S_CONTRACT_DATA_STR-TOBILBLOST sy-vline 
WA_COD_S_CONTRACT_DATA_STR-TODELBLOST sy-vline 
WA_COD_S_CONTRACT_DATA_STR-TOBLOCKSTA sy-vline 
WA_COD_S_CONTRACT_DATA_STR-LEBHEADSTA sy-vline 
WA_COD_S_CONTRACT_DATA_STR-FMSTATUS sy-vline 
WA_COD_S_CONTRACT_DATA_STR-SD_DOC_CAT_LONG sy-vline 
WA_COD_S_CONTRACT_DATA_STR-GROSS_VAL_HD sy-vline 
WA_COD_S_CONTRACT_DATA_STR-TAX_AMOUNT_HD sy-vline 
WA_COD_S_CONTRACT_DATA_STR-PRC_CONDITIONS sy-vline 
WA_COD_S_CONTRACT_DATA_STR-PRINT_PRC_CONDITIONS sy-vline 
WA_COD_S_CONTRACT_DATA_STR-PARTNERS sy-vline 
WA_COD_S_CONTRACT_DATA_STR-ITEMS sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CREATE_COND_TYPE_HD sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CREATE_COND_TYPE_IT sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CREDIT_LIMIT sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CREDIT_EXPOSURE_AMOUNT sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CREDIT_EXCEEDED_AMOUNT sy-vline 
WA_COD_S_CONTRACT_DATA_STR-INVOICE_SCHEDULE_VALUE_HD sy-vline 
WA_COD_S_CONTRACT_DATA_STR-POSNR sy-vline 
WA_COD_S_CONTRACT_DATA_STR-NET_VALUE sy-vline 
WA_COD_S_CONTRACT_DATA_STR-GROSS_VAL sy-vline 
WA_COD_S_CONTRACT_DATA_STR-TAX_AMOUNT sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CURREN_ISO sy-vline 
WA_COD_S_CONTRACT_DATA_STR-BILLING_PLAN sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CREATE_COND_HD sy-vline 
WA_COD_S_CONTRACT_DATA_STR-CREATE_COND_IT sy-vline      INTO ld_text SEPARATED BY SPACE.

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