ABAP Select data from SAP table LEINT_SHRDFLD_DELIVERY 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 LEINT_SHRDFLD_DELIVERY 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 LEINT_SHRDFLD_DELIVERY. 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 LEINT_SHRDFLD_DELIVERY 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_LEINT_SHRDFLD_DELIVERY TYPE STANDARD TABLE OF LEINT_SHRDFLD_DELIVERY,
      WA_LEINT_SHRDFLD_DELIVERY TYPE LEINT_SHRDFLD_DELIVERY,
      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: <LEINT_SHRDFLD_DELIVERY> TYPE LEINT_SHRDFLD_DELIVERY.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM LEINT_SHRDFLD_DELIVERY
*  INTO TABLE @DATA(IT_LEINT_SHRDFLD_DELIVERY2).
*--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_LEINT_SHRDFLD_DELIVERY INDEX 1 INTO DATA(WA_LEINT_SHRDFLD_DELIVERY2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<LEINT_SHRDFLD_DELIVERY>-TKNUM = 1.
<LEINT_SHRDFLD_DELIVERY>-IMWRK = 1.
<LEINT_SHRDFLD_DELIVERY>-ERNAM = 1.
<LEINT_SHRDFLD_DELIVERY>-ERZET = 1.
<LEINT_SHRDFLD_DELIVERY>-ERDAT = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_LEINT_SHRDFLD_DELIVERY-BZIRK, sy-vline,
  WA_LEINT_SHRDFLD_DELIVERY-VSTEL, sy-vline,
  WA_LEINT_SHRDFLD_DELIVERY-VKORG, sy-vline,
  WA_LEINT_SHRDFLD_DELIVERY-LFART, sy-vline,
  WA_LEINT_SHRDFLD_DELIVERY-AUTLF, sy-vline,
  WA_LEINT_SHRDFLD_DELIVERY-KZAZU, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_LEINT_SHRDFLD_DELIVERY 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_LEINT_SHRDFLD_DELIVERY 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_LEINT_SHRDFLD_DELIVERY INTO WA_LEINT_SHRDFLD_DELIVERY.


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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit TMPLA, internal->external for field TSEGTP
CALL FUNCTION 'CONVERSION_EXIT_TMPLA_OUTPUT'
  EXPORTING
    input =                      WA_LEINT_SHRDFLD_DELIVERY-TSEGTP
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_LEINT_SHRDFLD_DELIVERY-TSEGTP.
WRITE:/ 'New Value:', ld_input.

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

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

*Conversion exit ALPHA, internal->external for field VBUND
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_LEINT_SHRDFLD_DELIVERY-VBUND
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_LEINT_SHRDFLD_DELIVERY-VBUND.
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_LEINT_SHRDFLD_DELIVERY_STR, 
TKNUM TYPE STRING,
IMWRK TYPE STRING,
ERNAM TYPE STRING,
ERZET TYPE STRING,
ERDAT TYPE STRING,
BZIRK TYPE STRING,
VSTEL TYPE STRING,
VKORG TYPE STRING,
LFART TYPE STRING,
AUTLF TYPE STRING,
KZAZU TYPE STRING,
WADAT TYPE STRING,
LDDAT TYPE STRING,
TDDAT TYPE STRING,
LFDAT TYPE STRING,
KODAT TYPE STRING,
ABLAD TYPE STRING,
INCO1 TYPE STRING,
INCO2 TYPE STRING,
EXPKZ TYPE STRING,
ROUTE TYPE STRING,
FAKSK TYPE STRING,
LIFSK TYPE STRING,
VBTYP TYPE STRING,
KNFAK TYPE STRING,
LPRIO TYPE STRING,
VSBED TYPE STRING,
KUNNR TYPE STRING,
KUNAG TYPE STRING,
KDGRP TYPE STRING,
BTGEW TYPE STRING,
NTGEW TYPE STRING,
GEWEI TYPE STRING,
VOLUM TYPE STRING,
VOLEH TYPE STRING,
ANZPK TYPE STRING,
BEROT TYPE STRING,
LFUHR TYPE STRING,
GRULG TYPE STRING,
LSTEL TYPE STRING,
TRAGR TYPE STRING,
FKARV TYPE STRING,
FKDAT TYPE STRING,
PERFK TYPE STRING,
ROUTA TYPE STRING,
STAFO TYPE STRING,
KALSM TYPE STRING,
KNUMV TYPE STRING,
WAERK TYPE STRING,
VKBUR TYPE STRING,
VBEAK TYPE STRING,
ZUKRL TYPE STRING,
VERUR TYPE STRING,
COMMN TYPE STRING,
STWAE TYPE STRING,
STCUR TYPE STRING,
EXNUM TYPE STRING,
AENAM TYPE STRING,
AEDAT TYPE STRING,
LGNUM TYPE STRING,
LISPL TYPE STRING,
VKOIV TYPE STRING,
VTWIV TYPE STRING,
SPAIV TYPE STRING,
FKAIV TYPE STRING,
PIOIV TYPE STRING,
FKDIV TYPE STRING,
KUNIV TYPE STRING,
KKBER TYPE STRING,
KNKLI TYPE STRING,
GRUPP TYPE STRING,
SBGRP TYPE STRING,
CTLPC TYPE STRING,
CMWAE TYPE STRING,
AMTBL TYPE STRING,
BOLNR TYPE STRING,
LIFNR TYPE STRING,
TRATY TYPE STRING,
TRAID TYPE STRING,
CMFRE TYPE STRING,
CMNGV TYPE STRING,
XABLN TYPE STRING,
BLDAT TYPE STRING,
WADAT_IST TYPE STRING,
TRSPG TYPE STRING,
TPSID TYPE STRING,
LIFEX TYPE STRING,
TERNR TYPE STRING,
KALSM_CH TYPE STRING,
KLIEF TYPE STRING,
KALSP TYPE STRING,
KNUMP TYPE STRING,
NETWR TYPE STRING,
AULWE TYPE STRING,
WERKS TYPE STRING,
LCNUM TYPE STRING,
ABSSC TYPE STRING,
KOUHR TYPE STRING,
TDUHR TYPE STRING,
LDUHR TYPE STRING,
WAUHR TYPE STRING,
LGTOR TYPE STRING,
LGBZO TYPE STRING,
AKWAE TYPE STRING,
AKKUR TYPE STRING,
AKPRZ TYPE STRING,
PROLI TYPE STRING,
XBLNR TYPE STRING,
HANDLE TYPE STRING,
TSEGFL TYPE STRING,
TSEGTP TYPE STRING,
TZONIS TYPE STRING,
TZONRC TYPE STRING,
CONT_DG TYPE STRING,
VERURSYS TYPE STRING,
KZWAB TYPE STRING,
VLSTK TYPE STRING,
TCODE TYPE STRING,
VSART TYPE STRING,
TRMTYP TYPE STRING,
SDABW TYPE STRING,
VBUND TYPE STRING,
XWOFF TYPE STRING,
DIRTA TYPE STRING,
PRVBE TYPE STRING,
FOLAR TYPE STRING,
PODAT TYPE STRING,
POTIM TYPE STRING,
VGANZ TYPE STRING,END OF T_EKKO_STR.
DATA: WA_LEINT_SHRDFLD_DELIVERY_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_LEINT_SHRDFLD_DELIVERY_STR-TKNUM sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-IMWRK sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-ERNAM sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-ERZET sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-ERDAT sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-BZIRK sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-VSTEL sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-VKORG sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-LFART sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-AUTLF sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-KZAZU sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-WADAT sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-LDDAT sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-TDDAT sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-LFDAT sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-KODAT sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-ABLAD sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-INCO1 sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-INCO2 sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-EXPKZ sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-ROUTE sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-FAKSK sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-LIFSK sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-VBTYP sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-KNFAK sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-LPRIO sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-VSBED sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-KUNNR sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-KUNAG sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-KDGRP sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-BTGEW sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-NTGEW sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-GEWEI sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-VOLUM sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-VOLEH sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-ANZPK sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-BEROT sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-LFUHR sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-GRULG sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-LSTEL sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-TRAGR sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-FKARV sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-FKDAT sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-PERFK sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-ROUTA sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-STAFO sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-KALSM sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-KNUMV sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-WAERK sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-VKBUR sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-VBEAK sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-ZUKRL sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-VERUR sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-COMMN sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-STWAE sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-STCUR sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-EXNUM sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-AENAM sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-AEDAT sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-LGNUM sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-LISPL sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-VKOIV sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-VTWIV sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-SPAIV sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-FKAIV sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-PIOIV sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-FKDIV sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-KUNIV sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-KKBER sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-KNKLI sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-GRUPP sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-SBGRP sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-CTLPC sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-CMWAE sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-AMTBL sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-BOLNR sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-LIFNR sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-TRATY sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-TRAID sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-CMFRE sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-CMNGV sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-XABLN sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-BLDAT sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-WADAT_IST sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-TRSPG sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-TPSID sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-LIFEX sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-TERNR sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-KALSM_CH sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-KLIEF sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-KALSP sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-KNUMP sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-NETWR sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-AULWE sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-WERKS sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-LCNUM sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-ABSSC sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-KOUHR sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-TDUHR sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-LDUHR sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-WAUHR sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-LGTOR sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-LGBZO sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-AKWAE sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-AKKUR sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-AKPRZ sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-PROLI sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-XBLNR sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-HANDLE sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-TSEGFL sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-TSEGTP sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-TZONIS sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-TZONRC sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-CONT_DG sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-VERURSYS sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-KZWAB sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-VLSTK sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-TCODE sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-VSART sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-TRMTYP sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-SDABW sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-VBUND sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-XWOFF sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-DIRTA sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-PRVBE sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-FOLAR sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-PODAT sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-POTIM sy-vline 
WA_LEINT_SHRDFLD_DELIVERY_STR-VGANZ sy-vline      INTO ld_text SEPARATED BY SPACE.

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