ABAP Select data from SAP table VTRLP 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 VTRLP 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 VTRLP. 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 VTRLP 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_VTRLP TYPE STANDARD TABLE OF VTRLP,
      WA_VTRLP TYPE VTRLP,
      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: <VTRLP> TYPE VTRLP.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM VTRLP
*  INTO TABLE @DATA(IT_VTRLP2).
*--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_VTRLP INDEX 1 INTO DATA(WA_VTRLP2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<VTRLP>-VBELN = 1.
<VTRLP>-POSNR = 1.
<VTRLP>-POSEX = 1.
<VTRLP>-MATNR = 1.
<VTRLP>-MATWA = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_VTRLP-IDNKD, sy-vline,
  WA_VTRLP-ARKTX, sy-vline,
  WA_VTRLP-WERKS, sy-vline,
  WA_VTRLP-LGORT, sy-vline,
  WA_VTRLP-VTWEG, sy-vline,
  WA_VTRLP-SPART, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_VTRLP 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_VTRLP 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_VTRLP INTO WA_VTRLP.


*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_VTRLP-VBELN
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_VTRLP-VBELN.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit CUNIT, internal->external for field /CWM/LFIME
CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT'
  EXPORTING
    input =                      WA_VTRLP-/CWM/LFIME
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_VTRLP-/CWM/LFIME.
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_VTRLP_STR, 
VBELN TYPE STRING,
POSNR TYPE STRING,
POSEX TYPE STRING,
MATNR TYPE STRING,
MATWA TYPE STRING,
IDNKD TYPE STRING,
ARKTX TYPE STRING,
WERKS TYPE STRING,
LGORT TYPE STRING,
VTWEG TYPE STRING,
SPART TYPE STRING,
VKBUR TYPE STRING,
CHARG TYPE STRING,
SERNR TYPE STRING,
HERKL TYPE STRING,
HERKR TYPE STRING,
STAWN TYPE STRING,
BRGEW TYPE STRING,
NTGEW TYPE STRING,
GEWEI TYPE STRING,
LFIMG TYPE STRING,
VRKME TYPE STRING,
MBDAT TYPE STRING,
VBELN_VAUF TYPE STRING,
POSNR_VAUF TYPE STRING,
AUDAT_VAUF TYPE STRING,
BSTDK TYPE STRING,
BSTNK TYPE STRING,
BSTZD TYPE STRING,
IHREZ TYPE STRING,
INCO1 TYPE STRING,
INCO2 TYPE STRING,
INCO1_BEZ TYPE STRING,
TDNAME TYPE STRING,
UEPOS TYPE STRING,
VOLUM TYPE STRING,
VOLEH TYPE STRING,
EAN11 TYPE STRING,
EXART TYPE STRING,
EXART_BEZ TYPE STRING,
GRWRT TYPE STRING,
VGBEL TYPE STRING,
VGPOS TYPE STRING,
VGTYP TYPE STRING,
SORTKRI TYPE STRING,
LGMNG TYPE STRING,
KCMENG TYPE STRING,
MEINS TYPE STRING,
UECHA TYPE STRING,
KCBRGEW TYPE STRING,
KCNTGEW TYPE STRING,
KCGEWEI TYPE STRING,
KCVOLUM TYPE STRING,
KCVOLEH TYPE STRING,
KNUMH_CH TYPE STRING,
UMVKZ TYPE STRING,
UMVKN TYPE STRING,
CUOBJ TYPE STRING,
CUOBJ_CH TYPE STRING,
SHKZG TYPE STRING,
PCKPF TYPE STRING,
ABRVW TYPE STRING,
ABART TYPE STRING,
ABRLI TYPE STRING,
AESKD TYPE STRING,
EMPST TYPE STRING,
ABTNR TYPE STRING,
POSAR TYPE STRING,
PSTYV TYPE STRING,
TPREL TYPE STRING,
KZWI1 TYPE STRING,
KPEIN TYPE STRING,
KMEIN TYPE STRING,
NETPR TYPE STRING,
NETWR TYPE STRING,
ANZSN TYPE STRING,
AKTNR TYPE STRING,
SUGRD TYPE STRING,
SUDRU TYPE STRING,
VBRST TYPE STRING,
USR01_VBLB TYPE STRING,
USR02_VBLB TYPE STRING,
USR03_VBLB TYPE STRING,
USR04_VBLB TYPE STRING,
USR05_VBLB TYPE STRING,
PREFE TYPE STRING,
LABNK TYPE STRING,
ABRDT TYPE STRING,
KZUMW TYPE STRING,
PROFL TYPE STRING,
IDGPA TYPE STRING,
IDGCH TYPE STRING,
DGNTGEW TYPE STRING,
DGBRGEW TYPE STRING,
DGGEWEI TYPE STRING,
DGVOLUM TYPE STRING,
DGVOLEH TYPE STRING,
DGARAND TYPE STRING,
DGREPQU TYPE STRING,
DGPULIM TYPE STRING,
DGPAS TYPE STRING,
DGMDDAT TYPE STRING,
BSTKD TYPE STRING,
BSARK TYPE STRING,
BSTKD_E TYPE STRING,
BSTDK_E TYPE STRING,
BSARK_E TYPE STRING,
IHREZ_E TYPE STRING,
POSEX_E TYPE STRING,
VBKLT TYPE STRING,
MATKL TYPE STRING,
MTART TYPE STRING,
PRODH TYPE STRING,
QMNUM TYPE STRING,
QMDAT TYPE STRING,
SGT_RCAT TYPE STRING,
SGT_SCAT TYPE STRING,
MSR_ID TYPE STRING,
MSR_ITEM TYPE STRING,
RMA_CUSTOMER TYPE STRING,
MSR_RET_REASON TYPE STRING,
MSR_RET_REASON_TEXT TYPE STRING,
MSR_MAT_RECEIVED TYPE STRING,
MSR_FU_CODE TYPE STRING,
MSR_FU_CODE_TEXT TYPE STRING,
MSR_FORW_VENDOR TYPE STRING,
MSR_FWV_TITLE TYPE STRING,
MSR_FWV_ADDRNUM TYPE STRING,
MSR_FWV_NAME1 TYPE STRING,
MSR_FWV_NAME2 TYPE STRING,
MSR_FWV_NAME3 TYPE STRING,
MSR_FWV_NAME4 TYPE STRING,
MSR_FWV_STREET TYPE STRING,
MSR_FWV_PO_BOX TYPE STRING,
MSR_FWV_PO_BOX_LOC TYPE STRING,
MSR_FWV_CITY_CODE2 TYPE STRING,
MSR_FWV_COUNTRY TYPE STRING,
MSR_FWV_LANGU TYPE STRING,
MSR_FWV_POST_CODE1 TYPE STRING,
MSR_FWV_CITY1 TYPE STRING,
MSR_FWV_CITY2 TYPE STRING,
MSR_FWV_REGION TYPE STRING,
RMA_VENDOR TYPE STRING,
MSR_REFUND_CODE TYPE STRING,
MSR_REFUND_CODE_TEXT TYPE STRING,
MSR_FORW_PLANT1 TYPE STRING,
MSR_PLANT1_TXT TYPE STRING,
MSR_FORW_PLANT2 TYPE STRING,
MSR_PLANT2_TXT TYPE STRING,
MSR_FORW_PLANT3 TYPE STRING,
MSR_PLANT3_TXT TYPE STRING,
DUMMY TYPE STRING,
INCOV TYPE STRING,
INCO2_L TYPE STRING,
INCO3_L TYPE STRING,
INCO2_L_LBL TYPE STRING,
INCO3_L_LBL TYPE STRING,
BSTOB TYPE STRING,
DUMMY_DELITM_INCL_EEW_PS TYPE STRING,
DUMMY_DELIVERYITEM_INCL_EEW_TR TYPE STRING,
BSTKN TYPE STRING,
/BEV1/EMMVGR1 TYPE STRING,
/BEV1/EMMVGR2 TYPE STRING,
/BEV1/EMMVGR3 TYPE STRING,
/BEV1/EMMVGR4 TYPE STRING,
/BEV1/EMMVGR5 TYPE STRING,
/BEV1/EMNEUPOS TYPE STRING,
FSH_SEASON TYPE STRING,
FSH_SEASON_YEAR TYPE STRING,
FSH_COLLECTION TYPE STRING,
FSH_THEME TYPE STRING,
LIFEXPOS TYPE STRING,
WRF_CHARSTC1 TYPE STRING,
WRF_CHARSTC2 TYPE STRING,
WRF_CHARSTC3 TYPE STRING,
PROSA TYPE STRING,
XCHAR TYPE STRING,
BWART TYPE STRING,
MFRGR TYPE STRING,
GARVZ TYPE STRING,
GTART TYPE STRING,
GTKLS TYPE STRING,
GSBER TYPE STRING,
PAOBJNR TYPE STRING,
PRCTR TYPE STRING,
PS_PSP_PNR TYPE STRING,
AUFNR TYPE STRING,
KZVBR TYPE STRING,
KOSTL TYPE STRING,
KOKRS TYPE STRING,
UEPVW TYPE STRING,
MAGRV TYPE STRING,
ERDAT TYPE STRING,
LADGR TYPE STRING,
TRAGR TYPE STRING,
FKREL TYPE STRING,
KZFME TYPE STRING,
KCMENGVME TYPE STRING,
VBELV TYPE STRING,
POSNV TYPE STRING,
VBTYV TYPE STRING,
/CWM/LFIMG TYPE STRING,
/CWM/LFIME TYPE STRING,END OF T_EKKO_STR.
DATA: WA_VTRLP_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_VTRLP_STR-VBELN sy-vline 
WA_VTRLP_STR-POSNR sy-vline 
WA_VTRLP_STR-POSEX sy-vline 
WA_VTRLP_STR-MATNR sy-vline 
WA_VTRLP_STR-MATWA sy-vline 
WA_VTRLP_STR-IDNKD sy-vline 
WA_VTRLP_STR-ARKTX sy-vline 
WA_VTRLP_STR-WERKS sy-vline 
WA_VTRLP_STR-LGORT sy-vline 
WA_VTRLP_STR-VTWEG sy-vline 
WA_VTRLP_STR-SPART sy-vline 
WA_VTRLP_STR-VKBUR sy-vline 
WA_VTRLP_STR-CHARG sy-vline 
WA_VTRLP_STR-SERNR sy-vline 
WA_VTRLP_STR-HERKL sy-vline 
WA_VTRLP_STR-HERKR sy-vline 
WA_VTRLP_STR-STAWN sy-vline 
WA_VTRLP_STR-BRGEW sy-vline 
WA_VTRLP_STR-NTGEW sy-vline 
WA_VTRLP_STR-GEWEI sy-vline 
WA_VTRLP_STR-LFIMG sy-vline 
WA_VTRLP_STR-VRKME sy-vline 
WA_VTRLP_STR-MBDAT sy-vline 
WA_VTRLP_STR-VBELN_VAUF sy-vline 
WA_VTRLP_STR-POSNR_VAUF sy-vline 
WA_VTRLP_STR-AUDAT_VAUF sy-vline 
WA_VTRLP_STR-BSTDK sy-vline 
WA_VTRLP_STR-BSTNK sy-vline 
WA_VTRLP_STR-BSTZD sy-vline 
WA_VTRLP_STR-IHREZ sy-vline 
WA_VTRLP_STR-INCO1 sy-vline 
WA_VTRLP_STR-INCO2 sy-vline 
WA_VTRLP_STR-INCO1_BEZ sy-vline 
WA_VTRLP_STR-TDNAME sy-vline 
WA_VTRLP_STR-UEPOS sy-vline 
WA_VTRLP_STR-VOLUM sy-vline 
WA_VTRLP_STR-VOLEH sy-vline 
WA_VTRLP_STR-EAN11 sy-vline 
WA_VTRLP_STR-EXART sy-vline 
WA_VTRLP_STR-EXART_BEZ sy-vline 
WA_VTRLP_STR-GRWRT sy-vline 
WA_VTRLP_STR-VGBEL sy-vline 
WA_VTRLP_STR-VGPOS sy-vline 
WA_VTRLP_STR-VGTYP sy-vline 
WA_VTRLP_STR-SORTKRI sy-vline 
WA_VTRLP_STR-LGMNG sy-vline 
WA_VTRLP_STR-KCMENG sy-vline 
WA_VTRLP_STR-MEINS sy-vline 
WA_VTRLP_STR-UECHA sy-vline 
WA_VTRLP_STR-KCBRGEW sy-vline 
WA_VTRLP_STR-KCNTGEW sy-vline 
WA_VTRLP_STR-KCGEWEI sy-vline 
WA_VTRLP_STR-KCVOLUM sy-vline 
WA_VTRLP_STR-KCVOLEH sy-vline 
WA_VTRLP_STR-KNUMH_CH sy-vline 
WA_VTRLP_STR-UMVKZ sy-vline 
WA_VTRLP_STR-UMVKN sy-vline 
WA_VTRLP_STR-CUOBJ sy-vline 
WA_VTRLP_STR-CUOBJ_CH sy-vline 
WA_VTRLP_STR-SHKZG sy-vline 
WA_VTRLP_STR-PCKPF sy-vline 
WA_VTRLP_STR-ABRVW sy-vline 
WA_VTRLP_STR-ABART sy-vline 
WA_VTRLP_STR-ABRLI sy-vline 
WA_VTRLP_STR-AESKD sy-vline 
WA_VTRLP_STR-EMPST sy-vline 
WA_VTRLP_STR-ABTNR sy-vline 
WA_VTRLP_STR-POSAR sy-vline 
WA_VTRLP_STR-PSTYV sy-vline 
WA_VTRLP_STR-TPREL sy-vline 
WA_VTRLP_STR-KZWI1 sy-vline 
WA_VTRLP_STR-KPEIN sy-vline 
WA_VTRLP_STR-KMEIN sy-vline 
WA_VTRLP_STR-NETPR sy-vline 
WA_VTRLP_STR-NETWR sy-vline 
WA_VTRLP_STR-ANZSN sy-vline 
WA_VTRLP_STR-AKTNR sy-vline 
WA_VTRLP_STR-SUGRD sy-vline 
WA_VTRLP_STR-SUDRU sy-vline 
WA_VTRLP_STR-VBRST sy-vline 
WA_VTRLP_STR-USR01_VBLB sy-vline 
WA_VTRLP_STR-USR02_VBLB sy-vline 
WA_VTRLP_STR-USR03_VBLB sy-vline 
WA_VTRLP_STR-USR04_VBLB sy-vline 
WA_VTRLP_STR-USR05_VBLB sy-vline 
WA_VTRLP_STR-PREFE sy-vline 
WA_VTRLP_STR-LABNK sy-vline 
WA_VTRLP_STR-ABRDT sy-vline 
WA_VTRLP_STR-KZUMW sy-vline 
WA_VTRLP_STR-PROFL sy-vline 
WA_VTRLP_STR-IDGPA sy-vline 
WA_VTRLP_STR-IDGCH sy-vline 
WA_VTRLP_STR-DGNTGEW sy-vline 
WA_VTRLP_STR-DGBRGEW sy-vline 
WA_VTRLP_STR-DGGEWEI sy-vline 
WA_VTRLP_STR-DGVOLUM sy-vline 
WA_VTRLP_STR-DGVOLEH sy-vline 
WA_VTRLP_STR-DGARAND sy-vline 
WA_VTRLP_STR-DGREPQU sy-vline 
WA_VTRLP_STR-DGPULIM sy-vline 
WA_VTRLP_STR-DGPAS sy-vline 
WA_VTRLP_STR-DGMDDAT sy-vline 
WA_VTRLP_STR-BSTKD sy-vline 
WA_VTRLP_STR-BSARK sy-vline 
WA_VTRLP_STR-BSTKD_E sy-vline 
WA_VTRLP_STR-BSTDK_E sy-vline 
WA_VTRLP_STR-BSARK_E sy-vline 
WA_VTRLP_STR-IHREZ_E sy-vline 
WA_VTRLP_STR-POSEX_E sy-vline 
WA_VTRLP_STR-VBKLT sy-vline 
WA_VTRLP_STR-MATKL sy-vline 
WA_VTRLP_STR-MTART sy-vline 
WA_VTRLP_STR-PRODH sy-vline 
WA_VTRLP_STR-QMNUM sy-vline 
WA_VTRLP_STR-QMDAT sy-vline 
WA_VTRLP_STR-SGT_RCAT sy-vline 
WA_VTRLP_STR-SGT_SCAT sy-vline 
WA_VTRLP_STR-MSR_ID sy-vline 
WA_VTRLP_STR-MSR_ITEM sy-vline 
WA_VTRLP_STR-RMA_CUSTOMER sy-vline 
WA_VTRLP_STR-MSR_RET_REASON sy-vline 
WA_VTRLP_STR-MSR_RET_REASON_TEXT sy-vline 
WA_VTRLP_STR-MSR_MAT_RECEIVED sy-vline 
WA_VTRLP_STR-MSR_FU_CODE sy-vline 
WA_VTRLP_STR-MSR_FU_CODE_TEXT sy-vline 
WA_VTRLP_STR-MSR_FORW_VENDOR sy-vline 
WA_VTRLP_STR-MSR_FWV_TITLE sy-vline 
WA_VTRLP_STR-MSR_FWV_ADDRNUM sy-vline 
WA_VTRLP_STR-MSR_FWV_NAME1 sy-vline 
WA_VTRLP_STR-MSR_FWV_NAME2 sy-vline 
WA_VTRLP_STR-MSR_FWV_NAME3 sy-vline 
WA_VTRLP_STR-MSR_FWV_NAME4 sy-vline 
WA_VTRLP_STR-MSR_FWV_STREET sy-vline 
WA_VTRLP_STR-MSR_FWV_PO_BOX sy-vline 
WA_VTRLP_STR-MSR_FWV_PO_BOX_LOC sy-vline 
WA_VTRLP_STR-MSR_FWV_CITY_CODE2 sy-vline 
WA_VTRLP_STR-MSR_FWV_COUNTRY sy-vline 
WA_VTRLP_STR-MSR_FWV_LANGU sy-vline 
WA_VTRLP_STR-MSR_FWV_POST_CODE1 sy-vline 
WA_VTRLP_STR-MSR_FWV_CITY1 sy-vline 
WA_VTRLP_STR-MSR_FWV_CITY2 sy-vline 
WA_VTRLP_STR-MSR_FWV_REGION sy-vline 
WA_VTRLP_STR-RMA_VENDOR sy-vline 
WA_VTRLP_STR-MSR_REFUND_CODE sy-vline 
WA_VTRLP_STR-MSR_REFUND_CODE_TEXT sy-vline 
WA_VTRLP_STR-MSR_FORW_PLANT1 sy-vline 
WA_VTRLP_STR-MSR_PLANT1_TXT sy-vline 
WA_VTRLP_STR-MSR_FORW_PLANT2 sy-vline 
WA_VTRLP_STR-MSR_PLANT2_TXT sy-vline 
WA_VTRLP_STR-MSR_FORW_PLANT3 sy-vline 
WA_VTRLP_STR-MSR_PLANT3_TXT sy-vline 
WA_VTRLP_STR-DUMMY sy-vline 
WA_VTRLP_STR-INCOV sy-vline 
WA_VTRLP_STR-INCO2_L sy-vline 
WA_VTRLP_STR-INCO3_L sy-vline 
WA_VTRLP_STR-INCO2_L_LBL sy-vline 
WA_VTRLP_STR-INCO3_L_LBL sy-vline 
WA_VTRLP_STR-BSTOB sy-vline 
WA_VTRLP_STR-DUMMY_DELITM_INCL_EEW_PS sy-vline 
WA_VTRLP_STR-DUMMY_DELIVERYITEM_INCL_EEW_TR sy-vline 
WA_VTRLP_STR-BSTKN sy-vline 
WA_VTRLP_STR-/BEV1/EMMVGR1 sy-vline 
WA_VTRLP_STR-/BEV1/EMMVGR2 sy-vline 
WA_VTRLP_STR-/BEV1/EMMVGR3 sy-vline 
WA_VTRLP_STR-/BEV1/EMMVGR4 sy-vline 
WA_VTRLP_STR-/BEV1/EMMVGR5 sy-vline 
WA_VTRLP_STR-/BEV1/EMNEUPOS sy-vline 
WA_VTRLP_STR-FSH_SEASON sy-vline 
WA_VTRLP_STR-FSH_SEASON_YEAR sy-vline 
WA_VTRLP_STR-FSH_COLLECTION sy-vline 
WA_VTRLP_STR-FSH_THEME sy-vline 
WA_VTRLP_STR-LIFEXPOS sy-vline 
WA_VTRLP_STR-WRF_CHARSTC1 sy-vline 
WA_VTRLP_STR-WRF_CHARSTC2 sy-vline 
WA_VTRLP_STR-WRF_CHARSTC3 sy-vline 
WA_VTRLP_STR-PROSA sy-vline 
WA_VTRLP_STR-XCHAR sy-vline 
WA_VTRLP_STR-BWART sy-vline 
WA_VTRLP_STR-MFRGR sy-vline 
WA_VTRLP_STR-GARVZ sy-vline 
WA_VTRLP_STR-GTART sy-vline 
WA_VTRLP_STR-GTKLS sy-vline 
WA_VTRLP_STR-GSBER sy-vline 
WA_VTRLP_STR-PAOBJNR sy-vline 
WA_VTRLP_STR-PRCTR sy-vline 
WA_VTRLP_STR-PS_PSP_PNR sy-vline 
WA_VTRLP_STR-AUFNR sy-vline 
WA_VTRLP_STR-KZVBR sy-vline 
WA_VTRLP_STR-KOSTL sy-vline 
WA_VTRLP_STR-KOKRS sy-vline 
WA_VTRLP_STR-UEPVW sy-vline 
WA_VTRLP_STR-MAGRV sy-vline 
WA_VTRLP_STR-ERDAT sy-vline 
WA_VTRLP_STR-LADGR sy-vline 
WA_VTRLP_STR-TRAGR sy-vline 
WA_VTRLP_STR-FKREL sy-vline 
WA_VTRLP_STR-KZFME sy-vline 
WA_VTRLP_STR-KCMENGVME sy-vline 
WA_VTRLP_STR-VBELV sy-vline 
WA_VTRLP_STR-POSNV sy-vline 
WA_VTRLP_STR-VBTYV sy-vline 
WA_VTRLP_STR-/CWM/LFIMG sy-vline 
WA_VTRLP_STR-/CWM/LFIME sy-vline      INTO ld_text SEPARATED BY SPACE.

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