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

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

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

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


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
</PM0/ABD_VVSCPO_ERP>-MANDT = 1.
</PM0/ABD_VVSCPO_ERP>-GPART = 1.
</PM0/ABD_VVSCPO_ERP>-VTREF = 1.
</PM0/ABD_VVSCPO_ERP>-POSNR = 1.
</PM0/ABD_VVSCPO_ERP>-SCPOSNR = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_/PM0/ABD_VVSCPO_ERP-BLTYP, sy-vline,
  WA_/PM0/ABD_VVSCPO_ERP-STATPOST, sy-vline,
  WA_/PM0/ABD_VVSCPO_ERP-ARCHI, sy-vline,
  WA_/PM0/ABD_VVSCPO_ERP-XLOCK, sy-vline,
  WA_/PM0/ABD_VVSCPO_ERP-PSNGL, sy-vline,
  WA_/PM0/ABD_VVSCPO_ERP-PMTFR, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_/PM0/ABD_VVSCPO_ERP 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_/PM0/ABD_VVSCPO_ERP 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_/PM0/ABD_VVSCPO_ERP INTO WA_/PM0/ABD_VVSCPO_ERP.


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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit ALPHA, internal->external for field FDGRP
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_/PM0/ABD_VVSCPO_ERP-FDGRP
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_/PM0/ABD_VVSCPO_ERP-FDGRP.
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_/PM0/ABD_VVSCPO_ERP_STR, 
MANDT TYPE STRING,
GPART TYPE STRING,
VTREF TYPE STRING,
POSNR TYPE STRING,
SCPOSNR TYPE STRING,
BLTYP TYPE STRING,
STATPOST TYPE STRING,
ARCHI TYPE STRING,
XLOCK TYPE STRING,
PSNGL TYPE STRING,
PMTFR TYPE STRING,
PMTTO TYPE STRING,
RISKFR TYPE STRING,
RISKTO TYPE STRING,
PERFR TYPE STRING,
PMEND TYPE STRING,
PMEND_TIME TYPE STRING,
RENEW TYPE STRING,
RNEWX TYPE STRING,
RNEWD TYPE STRING,
RENEW_EXEC TYPE STRING,
CCODE TYPE STRING,
OPCCODE TYPE STRING,
GSBER TYPE STRING,
OPGSBER TYPE STRING,
PRGRP TYPE STRING,
SEGMENT TYPE STRING,
VSARL_VX TYPE STRING,
INSTAXS TYPE STRING,
TXPOS TYPE STRING,
AMOUNT_TOTAL TYPE STRING,
AMOUNT_INST TYPE STRING,
ATFRD TYPE STRING,
ATFRD_TIME TYPE STRING,
AMOUNT_DIFF TYPE STRING,
AMOUNT_TRANS TYPE STRING,
ENDTYPE TYPE STRING,
AMOUNT_NEED TYPE STRING,
AMOUNT_END TYPE STRING,
CHARGE_NEED TYPE STRING,
GLAET_AMT TYPE STRING,
CURR TYPE STRING,
PAYMENTFR TYPE STRING,
PAYMENTTO TYPE STRING,
CRDATE TYPE STRING,
CRTIME TYPE STRING,
CRUSER TYPE STRING,
CHDATE TYPE STRING,
CHTIME TYPE STRING,
CHUSER TYPE STRING,
POKEY TYPE STRING,
PKEY TYPE STRING,
PKEYFD TYPE STRING,
HVORG TYPE STRING,
TVORG TYPE STRING,
OPHVORG TYPE STRING,
OPTVORG TYPE STRING,
S_HKONT TYPE STRING,
H_HKONT TYPE STRING,
PAOBJNR TYPE STRING,
VBUND TYPE STRING,
KONTT TYPE STRING,
KONTL TYPE STRING,
BLART TYPE STRING,
VTRE2 TYPE STRING,
VTRE3 TYPE STRING,
XREVE TYPE STRING,
XDIST TYPE STRING,
BUGRD TYPE STRING,
PNTYP TYPE STRING,
XDERE TYPE STRING,
AMOUNT_DERE TYPE STRING,
VGPART2 TYPE STRING,
VGPART3 TYPE STRING,
GSFNR TYPE STRING,
BELNR TYPE STRING,
PEROFF TYPE STRING,
PRCTR TYPE STRING,
KOSTL TYPE STRING,
AUFNR TYPE STRING,
PYGRP TYPE STRING,
PDTYP TYPE STRING,
GRKEY TYPE STRING,
XBEENDET TYPE STRING,
CFSET TYPE STRING,
CFPPC TYPE STRING,
CFAC TYPE STRING,
CFPE TYPE STRING,
FDDATE TYPE STRING,
FDDATE_FROM TYPE STRING,
FDDATE_TO TYPE STRING,
SCFDGRP TYPE STRING,
SCFDZTG TYPE STRING,
VOPBEL TYPE STRING,
MWSKZ TYPE STRING,
QSSKZ TYPE STRING,
STRKZ TYPE STRING,
OPKONTT TYPE STRING,
OPKONTL TYPE STRING,
STRNETTO TYPE STRING,
KTOSL TYPE STRING,
TXT TYPE STRING,
ORIGIN TYPE STRING,
MPPLAN TYPE STRING,
XEIBH_KO TYPE STRING,
XEIPH_OPK TYPE STRING,
HZUON TYPE STRING,
SGTXT TYPE STRING,
XEIPH_OP TYPE STRING,
FINRE TYPE STRING,
COINS_CODE TYPE STRING,
COINS_CAT TYPE STRING,
VERSION TYPE STRING,
EMGPA TYPE STRING,
EMBVT TYPE STRING,
EMADR TYPE STRING,
EMCCID TYPE STRING,
PYMET TYPE STRING,
PYBUK TYPE STRING,
FDGRP TYPE STRING,
FDZTG TYPE STRING,
FAEDS TYPE STRING,
SKTPZ TYPE STRING,
FAEDN TYPE STRING,
IKEY TYPE STRING,
BUDAT TYPE STRING,
STUDT TYPE STRING,
BLDAT TYPE STRING,
DUN_REASON TYPE STRING,
DUN_REASON_DAYS TYPE STRING,
PAY_REASON TYPE STRING,
PAY_REASON_DAYS TYPE STRING,
CLR_REASON TYPE STRING,
CLR_REASON_DAYS TYPE STRING,
INT_REASON TYPE STRING,
INT_REASON_DAYS TYPE STRING,
REFCLAIM TYPE STRING,
WWERT TYPE STRING,END OF T_EKKO_STR.
DATA: WA_/PM0/ABD_VVSCPO_ERP_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_/PM0/ABD_VVSCPO_ERP_STR-MANDT sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-GPART sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-VTREF sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-POSNR sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-SCPOSNR sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-BLTYP sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-STATPOST sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-ARCHI sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-XLOCK sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-PSNGL sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-PMTFR sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-PMTTO sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-RISKFR sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-RISKTO sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-PERFR sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-PMEND sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-PMEND_TIME sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-RENEW sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-RNEWX sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-RNEWD sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-RENEW_EXEC sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-CCODE sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-OPCCODE sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-GSBER sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-OPGSBER sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-PRGRP sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-SEGMENT sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-VSARL_VX sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-INSTAXS sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-TXPOS sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-AMOUNT_TOTAL sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-AMOUNT_INST sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-ATFRD sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-ATFRD_TIME sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-AMOUNT_DIFF sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-AMOUNT_TRANS sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-ENDTYPE sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-AMOUNT_NEED sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-AMOUNT_END sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-CHARGE_NEED sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-GLAET_AMT sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-CURR sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-PAYMENTFR sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-PAYMENTTO sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-CRDATE sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-CRTIME sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-CRUSER sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-CHDATE sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-CHTIME sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-CHUSER sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-POKEY sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-PKEY sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-PKEYFD sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-HVORG sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-TVORG sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-OPHVORG sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-OPTVORG sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-S_HKONT sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-H_HKONT sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-PAOBJNR sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-VBUND sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-KONTT sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-KONTL sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-BLART sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-VTRE2 sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-VTRE3 sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-XREVE sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-XDIST sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-BUGRD sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-PNTYP sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-XDERE sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-AMOUNT_DERE sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-VGPART2 sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-VGPART3 sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-GSFNR sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-BELNR sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-PEROFF sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-PRCTR sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-KOSTL sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-AUFNR sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-PYGRP sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-PDTYP sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-GRKEY sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-XBEENDET sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-CFSET sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-CFPPC sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-CFAC sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-CFPE sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-FDDATE sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-FDDATE_FROM sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-FDDATE_TO sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-SCFDGRP sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-SCFDZTG sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-VOPBEL sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-MWSKZ sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-QSSKZ sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-STRKZ sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-OPKONTT sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-OPKONTL sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-STRNETTO sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-KTOSL sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-TXT sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-ORIGIN sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-MPPLAN sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-XEIBH_KO sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-XEIPH_OPK sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-HZUON sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-SGTXT sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-XEIPH_OP sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-FINRE sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-COINS_CODE sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-COINS_CAT sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-VERSION sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-EMGPA sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-EMBVT sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-EMADR sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-EMCCID sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-PYMET sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-PYBUK sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-FDGRP sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-FDZTG sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-FAEDS sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-SKTPZ sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-FAEDN sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-IKEY sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-BUDAT sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-STUDT sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-BLDAT sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-DUN_REASON sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-DUN_REASON_DAYS sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-PAY_REASON sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-PAY_REASON_DAYS sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-CLR_REASON sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-CLR_REASON_DAYS sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-INT_REASON sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-INT_REASON_DAYS sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-REFCLAIM sy-vline 
WA_/PM0/ABD_VVSCPO_ERP_STR-WWERT sy-vline      INTO ld_text SEPARATED BY SPACE.

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