ABAP Select data from SAP table /SPE/LIKPUK 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 /SPE/LIKPUK 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 /SPE/LIKPUK. 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 /SPE/LIKPUK 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_/SPE/LIKPUK TYPE STANDARD TABLE OF /SPE/LIKPUK,
      WA_/SPE/LIKPUK TYPE /SPE/LIKPUK,
      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: </SPE/LIKPUK> TYPE /SPE/LIKPUK.

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

SELECT *
*restrict ABAP select to first 10 rows
 UP TO 10 ROWS      
  FROM /SPE/LIKPUK
  INTO TABLE IT_/SPE/LIKPUK.

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM /SPE/LIKPUK
*  INTO TABLE @DATA(IT_/SPE/LIKPUK2).
*--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_/SPE/LIKPUK INDEX 1 INTO DATA(WA_/SPE/LIKPUK2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_/SPE/LIKPUK ASSIGNING </SPE/LIKPUK>.

*To update a field value using a field symbol simply change the value via the field symbol pointer
</SPE/LIKPUK>-MANDT = 1.
</SPE/LIKPUK>-VBELN = 1.
</SPE/LIKPUK>-ERNAM = 1.
</SPE/LIKPUK>-ERZET = 1.
</SPE/LIKPUK>-ERDAT = 1.

ENDLOOP.

LOOP AT IT_/SPE/LIKPUK INTO WA_/SPE/LIKPUK.
*Write horizonal line to screen report.
  WRITE:/ sy-uline.

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


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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit ALPHA, internal->external for field HANDOVERLOC
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_/SPE/LIKPUK-HANDOVERLOC
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_/SPE/LIKPUK-HANDOVERLOC.
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_/SPE/LIKPUK_STR, 
MANDT TYPE STRING,
VBELN 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,
TPQUA TYPE STRING,
TPGRP TYPE STRING,
LPRIO TYPE STRING,
VSBED TYPE STRING,
KUNNR TYPE STRING,
KUNAG TYPE STRING,
KDGRP TYPE STRING,
STZKL TYPE STRING,
STZZU 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,
IMWRK TYPE STRING,
SPE_LOEKZ TYPE STRING,
SPE_LOC_SEQ TYPE STRING,
SPE_ACC_APP_STS TYPE STRING,
SPE_SHP_INF_STS TYPE STRING,
SPE_RET_CANC TYPE STRING,
SPE_WAUHR_IST TYPE STRING,
SPE_WAZONE_IST TYPE STRING,
SPE_REV_VLSTK TYPE STRING,
SPE_LE_SCENARIO TYPE STRING,
SPE_ORIG_SYS TYPE STRING,
SPE_CHNG_SYS TYPE STRING,
SPE_GEOROUTE TYPE STRING,
SPE_GEOROUTEIND TYPE STRING,
SPE_CARRIER_IND TYPE STRING,
SPE_GTS_REL TYPE STRING,
SPE_GTS_RT_CDE TYPE STRING,
SPE_REL_TMSTMP TYPE STRING,
SPE_UNIT_SYSTEM TYPE STRING,
SPE_INV_BFR_GI TYPE STRING,
SPE_QI_STATUS TYPE STRING,
SPE_RED_IND TYPE STRING,
SAKES TYPE STRING,
SPE_LIFEX_TYPE TYPE STRING,
SPE_TTYPE TYPE STRING,
SPE_PRO_NUMBER TYPE STRING,
LOC_GUID TYPE STRING,
SPE_BILLING_IND TYPE STRING,
PRINTER_PROFILE TYPE STRING,
MSR_ACTIVE TYPE STRING,
PRTNR TYPE STRING,
STGE_LOC_CHANGE TYPE STRING,
TM_CTRL_KEY TYPE STRING,
DLV_SPLIT_INITIA TYPE STRING,
DLV_VERSION TYPE STRING,
HANDOVERLOC TYPE STRING,
HANDOVERDATE TYPE STRING,
HANDOVERTIME TYPE STRING,
HANDOVERTZONE TYPE STRING,
/BEV1/LULEINH TYPE STRING,
/BEV1/RPFAESS TYPE STRING,
/BEV1/RPKIST TYPE STRING,
/BEV1/RPCONT TYPE STRING,
/BEV1/RPSONST TYPE STRING,
/BEV1/RPFLGNR TYPE STRING,
IDT_CUR_EVTLOC TYPE STRING,
IDT_CUR_EVTQUA TYPE STRING,
IDT_CUR_EVTTST TYPE STRING,
IDT_CUR_ESTLOC TYPE STRING,
IDT_CUR_ESTQUA TYPE STRING,
IDT_CUR_ESTTST TYPE STRING,
IDT_CUR_WRKQUA TYPE STRING,
IDT_PRE_EVTLOC TYPE STRING,
IDT_PRE_EVTQUA TYPE STRING,
IDT_PRE_EVTTST TYPE STRING,
IDT_PRE_ESTLOC TYPE STRING,
IDT_PRE_ESTQUA TYPE STRING,
IDT_PRE_ESTTST TYPE STRING,
IDT_PRE_WRKQUA TYPE STRING,
IDT_REF_ESTLOC TYPE STRING,
IDT_REF_ESTQUA TYPE STRING,
IDT_REF_ESTTST TYPE STRING,
IDT_FIRM_LFDAT TYPE STRING,
IDT_DOCNUM TYPE STRING,
BORGR_GRP TYPE STRING,
KBNKZ TYPE STRING,
PODVWK_TST TYPE STRING,
ZZFIELD1 TYPE STRING,
ZZFIELD2 TYPE STRING,
RFSTK TYPE STRING,
RFGSK TYPE STRING,
BESTK TYPE STRING,
LFSTK TYPE STRING,
LFGSK TYPE STRING,
WBSTK TYPE STRING,
FKSTK TYPE STRING,
FKSAK TYPE STRING,
BUCHK TYPE STRING,
ABSTK TYPE STRING,
GBSTK TYPE STRING,
KOSTK TYPE STRING,
LVSTK TYPE STRING,
UVALS TYPE STRING,
UVVLS TYPE STRING,
UVFAS TYPE STRING,
UVALL TYPE STRING,
UVVLK TYPE STRING,
UVFAK TYPE STRING,
UVPRS TYPE STRING,
VBOBJ TYPE STRING,
FKIVK TYPE STRING,
RELIK TYPE STRING,
UVK01 TYPE STRING,
UVK02 TYPE STRING,
UVK03 TYPE STRING,
UVK04 TYPE STRING,
UVK05 TYPE STRING,
UVS01 TYPE STRING,
UVS02 TYPE STRING,
UVS03 TYPE STRING,
UVS04 TYPE STRING,
UVS05 TYPE STRING,
PKSTK TYPE STRING,
CMPSA TYPE STRING,
CMPSB TYPE STRING,
CMPSC TYPE STRING,
CMPSD TYPE STRING,
CMPSE TYPE STRING,
CMPSF TYPE STRING,
CMPSG TYPE STRING,
CMPSH TYPE STRING,
CMPSI TYPE STRING,
CMPSJ TYPE STRING,
CMPSK TYPE STRING,
CMPSL TYPE STRING,
CMPS0 TYPE STRING,
CMPS1 TYPE STRING,
CMPS2 TYPE STRING,
CMGST TYPE STRING,
TRSTA TYPE STRING,
KOQUK TYPE STRING,
COSTA TYPE STRING,
SAPRL TYPE STRING,
UVPAS TYPE STRING,
UVPIS TYPE STRING,
UVWAS TYPE STRING,
UVPAK TYPE STRING,
UVPIK TYPE STRING,
UVWAK TYPE STRING,
UVGEK TYPE STRING,
CMPSM TYPE STRING,
DCSTK TYPE STRING,
VESTK TYPE STRING,
RRSTA TYPE STRING,
BLOCK TYPE STRING,
FSSTK TYPE STRING,
LSSTK TYPE STRING,
SPSTG TYPE STRING,
PDSTK TYPE STRING,
FMSTK TYPE STRING,
MANEK TYPE STRING,
SPE_TMPID TYPE STRING,
HDALL TYPE STRING,
HDALS TYPE STRING,
CMPS_CM TYPE STRING,
CMPS_TE TYPE STRING,
VBTYP_EXT TYPE STRING,
/SAPMP/LBASK TYPE STRING,
PODVWK TYPE STRING,END OF T_EKKO_STR.
DATA: WA_/SPE/LIKPUK_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_/SPE/LIKPUK_STR-MANDT sy-vline 
WA_/SPE/LIKPUK_STR-VBELN sy-vline 
WA_/SPE/LIKPUK_STR-ERNAM sy-vline 
WA_/SPE/LIKPUK_STR-ERZET sy-vline 
WA_/SPE/LIKPUK_STR-ERDAT sy-vline 
WA_/SPE/LIKPUK_STR-BZIRK sy-vline 
WA_/SPE/LIKPUK_STR-VSTEL sy-vline 
WA_/SPE/LIKPUK_STR-VKORG sy-vline 
WA_/SPE/LIKPUK_STR-LFART sy-vline 
WA_/SPE/LIKPUK_STR-AUTLF sy-vline 
WA_/SPE/LIKPUK_STR-KZAZU sy-vline 
WA_/SPE/LIKPUK_STR-WADAT sy-vline 
WA_/SPE/LIKPUK_STR-LDDAT sy-vline 
WA_/SPE/LIKPUK_STR-TDDAT sy-vline 
WA_/SPE/LIKPUK_STR-LFDAT sy-vline 
WA_/SPE/LIKPUK_STR-KODAT sy-vline 
WA_/SPE/LIKPUK_STR-ABLAD sy-vline 
WA_/SPE/LIKPUK_STR-INCO1 sy-vline 
WA_/SPE/LIKPUK_STR-INCO2 sy-vline 
WA_/SPE/LIKPUK_STR-EXPKZ sy-vline 
WA_/SPE/LIKPUK_STR-ROUTE sy-vline 
WA_/SPE/LIKPUK_STR-FAKSK sy-vline 
WA_/SPE/LIKPUK_STR-LIFSK sy-vline 
WA_/SPE/LIKPUK_STR-VBTYP sy-vline 
WA_/SPE/LIKPUK_STR-KNFAK sy-vline 
WA_/SPE/LIKPUK_STR-TPQUA sy-vline 
WA_/SPE/LIKPUK_STR-TPGRP sy-vline 
WA_/SPE/LIKPUK_STR-LPRIO sy-vline 
WA_/SPE/LIKPUK_STR-VSBED sy-vline 
WA_/SPE/LIKPUK_STR-KUNNR sy-vline 
WA_/SPE/LIKPUK_STR-KUNAG sy-vline 
WA_/SPE/LIKPUK_STR-KDGRP sy-vline 
WA_/SPE/LIKPUK_STR-STZKL sy-vline 
WA_/SPE/LIKPUK_STR-STZZU sy-vline 
WA_/SPE/LIKPUK_STR-BTGEW sy-vline 
WA_/SPE/LIKPUK_STR-NTGEW sy-vline 
WA_/SPE/LIKPUK_STR-GEWEI sy-vline 
WA_/SPE/LIKPUK_STR-VOLUM sy-vline 
WA_/SPE/LIKPUK_STR-VOLEH sy-vline 
WA_/SPE/LIKPUK_STR-ANZPK sy-vline 
WA_/SPE/LIKPUK_STR-BEROT sy-vline 
WA_/SPE/LIKPUK_STR-LFUHR sy-vline 
WA_/SPE/LIKPUK_STR-GRULG sy-vline 
WA_/SPE/LIKPUK_STR-LSTEL sy-vline 
WA_/SPE/LIKPUK_STR-TRAGR sy-vline 
WA_/SPE/LIKPUK_STR-FKARV sy-vline 
WA_/SPE/LIKPUK_STR-FKDAT sy-vline 
WA_/SPE/LIKPUK_STR-PERFK sy-vline 
WA_/SPE/LIKPUK_STR-ROUTA sy-vline 
WA_/SPE/LIKPUK_STR-STAFO sy-vline 
WA_/SPE/LIKPUK_STR-KALSM sy-vline 
WA_/SPE/LIKPUK_STR-KNUMV sy-vline 
WA_/SPE/LIKPUK_STR-WAERK sy-vline 
WA_/SPE/LIKPUK_STR-VKBUR sy-vline 
WA_/SPE/LIKPUK_STR-VBEAK sy-vline 
WA_/SPE/LIKPUK_STR-ZUKRL sy-vline 
WA_/SPE/LIKPUK_STR-VERUR sy-vline 
WA_/SPE/LIKPUK_STR-COMMN sy-vline 
WA_/SPE/LIKPUK_STR-STWAE sy-vline 
WA_/SPE/LIKPUK_STR-STCUR sy-vline 
WA_/SPE/LIKPUK_STR-EXNUM sy-vline 
WA_/SPE/LIKPUK_STR-AENAM sy-vline 
WA_/SPE/LIKPUK_STR-AEDAT sy-vline 
WA_/SPE/LIKPUK_STR-LGNUM sy-vline 
WA_/SPE/LIKPUK_STR-LISPL sy-vline 
WA_/SPE/LIKPUK_STR-VKOIV sy-vline 
WA_/SPE/LIKPUK_STR-VTWIV sy-vline 
WA_/SPE/LIKPUK_STR-SPAIV sy-vline 
WA_/SPE/LIKPUK_STR-FKAIV sy-vline 
WA_/SPE/LIKPUK_STR-PIOIV sy-vline 
WA_/SPE/LIKPUK_STR-FKDIV sy-vline 
WA_/SPE/LIKPUK_STR-KUNIV sy-vline 
WA_/SPE/LIKPUK_STR-KKBER sy-vline 
WA_/SPE/LIKPUK_STR-KNKLI sy-vline 
WA_/SPE/LIKPUK_STR-GRUPP sy-vline 
WA_/SPE/LIKPUK_STR-SBGRP sy-vline 
WA_/SPE/LIKPUK_STR-CTLPC sy-vline 
WA_/SPE/LIKPUK_STR-CMWAE sy-vline 
WA_/SPE/LIKPUK_STR-AMTBL sy-vline 
WA_/SPE/LIKPUK_STR-BOLNR sy-vline 
WA_/SPE/LIKPUK_STR-LIFNR sy-vline 
WA_/SPE/LIKPUK_STR-TRATY sy-vline 
WA_/SPE/LIKPUK_STR-TRAID sy-vline 
WA_/SPE/LIKPUK_STR-CMFRE sy-vline 
WA_/SPE/LIKPUK_STR-CMNGV sy-vline 
WA_/SPE/LIKPUK_STR-XABLN sy-vline 
WA_/SPE/LIKPUK_STR-BLDAT sy-vline 
WA_/SPE/LIKPUK_STR-WADAT_IST sy-vline 
WA_/SPE/LIKPUK_STR-TRSPG sy-vline 
WA_/SPE/LIKPUK_STR-TPSID sy-vline 
WA_/SPE/LIKPUK_STR-LIFEX sy-vline 
WA_/SPE/LIKPUK_STR-TERNR sy-vline 
WA_/SPE/LIKPUK_STR-KALSM_CH sy-vline 
WA_/SPE/LIKPUK_STR-KLIEF sy-vline 
WA_/SPE/LIKPUK_STR-KALSP sy-vline 
WA_/SPE/LIKPUK_STR-KNUMP sy-vline 
WA_/SPE/LIKPUK_STR-NETWR sy-vline 
WA_/SPE/LIKPUK_STR-AULWE sy-vline 
WA_/SPE/LIKPUK_STR-WERKS sy-vline 
WA_/SPE/LIKPUK_STR-LCNUM sy-vline 
WA_/SPE/LIKPUK_STR-ABSSC sy-vline 
WA_/SPE/LIKPUK_STR-KOUHR sy-vline 
WA_/SPE/LIKPUK_STR-TDUHR sy-vline 
WA_/SPE/LIKPUK_STR-LDUHR sy-vline 
WA_/SPE/LIKPUK_STR-WAUHR sy-vline 
WA_/SPE/LIKPUK_STR-LGTOR sy-vline 
WA_/SPE/LIKPUK_STR-LGBZO sy-vline 
WA_/SPE/LIKPUK_STR-AKWAE sy-vline 
WA_/SPE/LIKPUK_STR-AKKUR sy-vline 
WA_/SPE/LIKPUK_STR-AKPRZ sy-vline 
WA_/SPE/LIKPUK_STR-PROLI sy-vline 
WA_/SPE/LIKPUK_STR-XBLNR sy-vline 
WA_/SPE/LIKPUK_STR-HANDLE sy-vline 
WA_/SPE/LIKPUK_STR-TSEGFL sy-vline 
WA_/SPE/LIKPUK_STR-TSEGTP sy-vline 
WA_/SPE/LIKPUK_STR-TZONIS sy-vline 
WA_/SPE/LIKPUK_STR-TZONRC sy-vline 
WA_/SPE/LIKPUK_STR-CONT_DG sy-vline 
WA_/SPE/LIKPUK_STR-VERURSYS sy-vline 
WA_/SPE/LIKPUK_STR-KZWAB sy-vline 
WA_/SPE/LIKPUK_STR-VLSTK sy-vline 
WA_/SPE/LIKPUK_STR-TCODE sy-vline 
WA_/SPE/LIKPUK_STR-VSART sy-vline 
WA_/SPE/LIKPUK_STR-TRMTYP sy-vline 
WA_/SPE/LIKPUK_STR-SDABW sy-vline 
WA_/SPE/LIKPUK_STR-VBUND sy-vline 
WA_/SPE/LIKPUK_STR-XWOFF sy-vline 
WA_/SPE/LIKPUK_STR-DIRTA sy-vline 
WA_/SPE/LIKPUK_STR-PRVBE sy-vline 
WA_/SPE/LIKPUK_STR-FOLAR sy-vline 
WA_/SPE/LIKPUK_STR-PODAT sy-vline 
WA_/SPE/LIKPUK_STR-POTIM sy-vline 
WA_/SPE/LIKPUK_STR-VGANZ sy-vline 
WA_/SPE/LIKPUK_STR-IMWRK sy-vline 
WA_/SPE/LIKPUK_STR-SPE_LOEKZ sy-vline 
WA_/SPE/LIKPUK_STR-SPE_LOC_SEQ sy-vline 
WA_/SPE/LIKPUK_STR-SPE_ACC_APP_STS sy-vline 
WA_/SPE/LIKPUK_STR-SPE_SHP_INF_STS sy-vline 
WA_/SPE/LIKPUK_STR-SPE_RET_CANC sy-vline 
WA_/SPE/LIKPUK_STR-SPE_WAUHR_IST sy-vline 
WA_/SPE/LIKPUK_STR-SPE_WAZONE_IST sy-vline 
WA_/SPE/LIKPUK_STR-SPE_REV_VLSTK sy-vline 
WA_/SPE/LIKPUK_STR-SPE_LE_SCENARIO sy-vline 
WA_/SPE/LIKPUK_STR-SPE_ORIG_SYS sy-vline 
WA_/SPE/LIKPUK_STR-SPE_CHNG_SYS sy-vline 
WA_/SPE/LIKPUK_STR-SPE_GEOROUTE sy-vline 
WA_/SPE/LIKPUK_STR-SPE_GEOROUTEIND sy-vline 
WA_/SPE/LIKPUK_STR-SPE_CARRIER_IND sy-vline 
WA_/SPE/LIKPUK_STR-SPE_GTS_REL sy-vline 
WA_/SPE/LIKPUK_STR-SPE_GTS_RT_CDE sy-vline 
WA_/SPE/LIKPUK_STR-SPE_REL_TMSTMP sy-vline 
WA_/SPE/LIKPUK_STR-SPE_UNIT_SYSTEM sy-vline 
WA_/SPE/LIKPUK_STR-SPE_INV_BFR_GI sy-vline 
WA_/SPE/LIKPUK_STR-SPE_QI_STATUS sy-vline 
WA_/SPE/LIKPUK_STR-SPE_RED_IND sy-vline 
WA_/SPE/LIKPUK_STR-SAKES sy-vline 
WA_/SPE/LIKPUK_STR-SPE_LIFEX_TYPE sy-vline 
WA_/SPE/LIKPUK_STR-SPE_TTYPE sy-vline 
WA_/SPE/LIKPUK_STR-SPE_PRO_NUMBER sy-vline 
WA_/SPE/LIKPUK_STR-LOC_GUID sy-vline 
WA_/SPE/LIKPUK_STR-SPE_BILLING_IND sy-vline 
WA_/SPE/LIKPUK_STR-PRINTER_PROFILE sy-vline 
WA_/SPE/LIKPUK_STR-MSR_ACTIVE sy-vline 
WA_/SPE/LIKPUK_STR-PRTNR sy-vline 
WA_/SPE/LIKPUK_STR-STGE_LOC_CHANGE sy-vline 
WA_/SPE/LIKPUK_STR-TM_CTRL_KEY sy-vline 
WA_/SPE/LIKPUK_STR-DLV_SPLIT_INITIA sy-vline 
WA_/SPE/LIKPUK_STR-DLV_VERSION sy-vline 
WA_/SPE/LIKPUK_STR-HANDOVERLOC sy-vline 
WA_/SPE/LIKPUK_STR-HANDOVERDATE sy-vline 
WA_/SPE/LIKPUK_STR-HANDOVERTIME sy-vline 
WA_/SPE/LIKPUK_STR-HANDOVERTZONE sy-vline 
WA_/SPE/LIKPUK_STR-/BEV1/LULEINH sy-vline 
WA_/SPE/LIKPUK_STR-/BEV1/RPFAESS sy-vline 
WA_/SPE/LIKPUK_STR-/BEV1/RPKIST sy-vline 
WA_/SPE/LIKPUK_STR-/BEV1/RPCONT sy-vline 
WA_/SPE/LIKPUK_STR-/BEV1/RPSONST sy-vline 
WA_/SPE/LIKPUK_STR-/BEV1/RPFLGNR sy-vline 
WA_/SPE/LIKPUK_STR-IDT_CUR_EVTLOC sy-vline 
WA_/SPE/LIKPUK_STR-IDT_CUR_EVTQUA sy-vline 
WA_/SPE/LIKPUK_STR-IDT_CUR_EVTTST sy-vline 
WA_/SPE/LIKPUK_STR-IDT_CUR_ESTLOC sy-vline 
WA_/SPE/LIKPUK_STR-IDT_CUR_ESTQUA sy-vline 
WA_/SPE/LIKPUK_STR-IDT_CUR_ESTTST sy-vline 
WA_/SPE/LIKPUK_STR-IDT_CUR_WRKQUA sy-vline 
WA_/SPE/LIKPUK_STR-IDT_PRE_EVTLOC sy-vline 
WA_/SPE/LIKPUK_STR-IDT_PRE_EVTQUA sy-vline 
WA_/SPE/LIKPUK_STR-IDT_PRE_EVTTST sy-vline 
WA_/SPE/LIKPUK_STR-IDT_PRE_ESTLOC sy-vline 
WA_/SPE/LIKPUK_STR-IDT_PRE_ESTQUA sy-vline 
WA_/SPE/LIKPUK_STR-IDT_PRE_ESTTST sy-vline 
WA_/SPE/LIKPUK_STR-IDT_PRE_WRKQUA sy-vline 
WA_/SPE/LIKPUK_STR-IDT_REF_ESTLOC sy-vline 
WA_/SPE/LIKPUK_STR-IDT_REF_ESTQUA sy-vline 
WA_/SPE/LIKPUK_STR-IDT_REF_ESTTST sy-vline 
WA_/SPE/LIKPUK_STR-IDT_FIRM_LFDAT sy-vline 
WA_/SPE/LIKPUK_STR-IDT_DOCNUM sy-vline 
WA_/SPE/LIKPUK_STR-BORGR_GRP sy-vline 
WA_/SPE/LIKPUK_STR-KBNKZ sy-vline 
WA_/SPE/LIKPUK_STR-PODVWK_TST sy-vline 
WA_/SPE/LIKPUK_STR-ZZFIELD1 sy-vline 
WA_/SPE/LIKPUK_STR-ZZFIELD2 sy-vline 
WA_/SPE/LIKPUK_STR-RFSTK sy-vline 
WA_/SPE/LIKPUK_STR-RFGSK sy-vline 
WA_/SPE/LIKPUK_STR-BESTK sy-vline 
WA_/SPE/LIKPUK_STR-LFSTK sy-vline 
WA_/SPE/LIKPUK_STR-LFGSK sy-vline 
WA_/SPE/LIKPUK_STR-WBSTK sy-vline 
WA_/SPE/LIKPUK_STR-FKSTK sy-vline 
WA_/SPE/LIKPUK_STR-FKSAK sy-vline 
WA_/SPE/LIKPUK_STR-BUCHK sy-vline 
WA_/SPE/LIKPUK_STR-ABSTK sy-vline 
WA_/SPE/LIKPUK_STR-GBSTK sy-vline 
WA_/SPE/LIKPUK_STR-KOSTK sy-vline 
WA_/SPE/LIKPUK_STR-LVSTK sy-vline 
WA_/SPE/LIKPUK_STR-UVALS sy-vline 
WA_/SPE/LIKPUK_STR-UVVLS sy-vline 
WA_/SPE/LIKPUK_STR-UVFAS sy-vline 
WA_/SPE/LIKPUK_STR-UVALL sy-vline 
WA_/SPE/LIKPUK_STR-UVVLK sy-vline 
WA_/SPE/LIKPUK_STR-UVFAK sy-vline 
WA_/SPE/LIKPUK_STR-UVPRS sy-vline 
WA_/SPE/LIKPUK_STR-VBOBJ sy-vline 
WA_/SPE/LIKPUK_STR-FKIVK sy-vline 
WA_/SPE/LIKPUK_STR-RELIK sy-vline 
WA_/SPE/LIKPUK_STR-UVK01 sy-vline 
WA_/SPE/LIKPUK_STR-UVK02 sy-vline 
WA_/SPE/LIKPUK_STR-UVK03 sy-vline 
WA_/SPE/LIKPUK_STR-UVK04 sy-vline 
WA_/SPE/LIKPUK_STR-UVK05 sy-vline 
WA_/SPE/LIKPUK_STR-UVS01 sy-vline 
WA_/SPE/LIKPUK_STR-UVS02 sy-vline 
WA_/SPE/LIKPUK_STR-UVS03 sy-vline 
WA_/SPE/LIKPUK_STR-UVS04 sy-vline 
WA_/SPE/LIKPUK_STR-UVS05 sy-vline 
WA_/SPE/LIKPUK_STR-PKSTK sy-vline 
WA_/SPE/LIKPUK_STR-CMPSA sy-vline 
WA_/SPE/LIKPUK_STR-CMPSB sy-vline 
WA_/SPE/LIKPUK_STR-CMPSC sy-vline 
WA_/SPE/LIKPUK_STR-CMPSD sy-vline 
WA_/SPE/LIKPUK_STR-CMPSE sy-vline 
WA_/SPE/LIKPUK_STR-CMPSF sy-vline 
WA_/SPE/LIKPUK_STR-CMPSG sy-vline 
WA_/SPE/LIKPUK_STR-CMPSH sy-vline 
WA_/SPE/LIKPUK_STR-CMPSI sy-vline 
WA_/SPE/LIKPUK_STR-CMPSJ sy-vline 
WA_/SPE/LIKPUK_STR-CMPSK sy-vline 
WA_/SPE/LIKPUK_STR-CMPSL sy-vline 
WA_/SPE/LIKPUK_STR-CMPS0 sy-vline 
WA_/SPE/LIKPUK_STR-CMPS1 sy-vline 
WA_/SPE/LIKPUK_STR-CMPS2 sy-vline 
WA_/SPE/LIKPUK_STR-CMGST sy-vline 
WA_/SPE/LIKPUK_STR-TRSTA sy-vline 
WA_/SPE/LIKPUK_STR-KOQUK sy-vline 
WA_/SPE/LIKPUK_STR-COSTA sy-vline 
WA_/SPE/LIKPUK_STR-SAPRL sy-vline 
WA_/SPE/LIKPUK_STR-UVPAS sy-vline 
WA_/SPE/LIKPUK_STR-UVPIS sy-vline 
WA_/SPE/LIKPUK_STR-UVWAS sy-vline 
WA_/SPE/LIKPUK_STR-UVPAK sy-vline 
WA_/SPE/LIKPUK_STR-UVPIK sy-vline 
WA_/SPE/LIKPUK_STR-UVWAK sy-vline 
WA_/SPE/LIKPUK_STR-UVGEK sy-vline 
WA_/SPE/LIKPUK_STR-CMPSM sy-vline 
WA_/SPE/LIKPUK_STR-DCSTK sy-vline 
WA_/SPE/LIKPUK_STR-VESTK sy-vline 
WA_/SPE/LIKPUK_STR-RRSTA sy-vline 
WA_/SPE/LIKPUK_STR-BLOCK sy-vline 
WA_/SPE/LIKPUK_STR-FSSTK sy-vline 
WA_/SPE/LIKPUK_STR-LSSTK sy-vline 
WA_/SPE/LIKPUK_STR-SPSTG sy-vline 
WA_/SPE/LIKPUK_STR-PDSTK sy-vline 
WA_/SPE/LIKPUK_STR-FMSTK sy-vline 
WA_/SPE/LIKPUK_STR-MANEK sy-vline 
WA_/SPE/LIKPUK_STR-SPE_TMPID sy-vline 
WA_/SPE/LIKPUK_STR-HDALL sy-vline 
WA_/SPE/LIKPUK_STR-HDALS sy-vline 
WA_/SPE/LIKPUK_STR-CMPS_CM sy-vline 
WA_/SPE/LIKPUK_STR-CMPS_TE sy-vline 
WA_/SPE/LIKPUK_STR-VBTYP_EXT sy-vline 
WA_/SPE/LIKPUK_STR-/SAPMP/LBASK sy-vline 
WA_/SPE/LIKPUK_STR-PODVWK sy-vline      INTO ld_text SEPARATED BY SPACE.

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