ABAP Select data from SAP table WRF_PPW_PPDPA_CHG_STY 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 WRF_PPW_PPDPA_CHG_STY 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 WRF_PPW_PPDPA_CHG_STY. 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 WRF_PPW_PPDPA_CHG_STY 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_WRF_PPW_PPDPA_CHG_STY TYPE STANDARD TABLE OF WRF_PPW_PPDPA_CHG_STY,
      WA_WRF_PPW_PPDPA_CHG_STY TYPE WRF_PPW_PPDPA_CHG_STY,
      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: <WRF_PPW_PPDPA_CHG_STY> TYPE WRF_PPW_PPDPA_CHG_STY.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM WRF_PPW_PPDPA_CHG_STY
*  INTO TABLE @DATA(IT_WRF_PPW_PPDPA_CHG_STY2).
*--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_WRF_PPW_PPDPA_CHG_STY INDEX 1 INTO DATA(WA_WRF_PPW_PPDPA_CHG_STY2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<WRF_PPW_PPDPA_CHG_STY>-CONT = 1.
<WRF_PPW_PPDPA_CHG_STY>-MANDT = 1.
<WRF_PPW_PPDPA_CHG_STY>-GUID = 1.
<WRF_PPW_PPDPA_CHG_STY>-PARENT = 1.
<WRF_PPW_PPDPA_CHG_STY>-REFERENCE = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_WRF_PPW_PPDPA_CHG_STY-DEVI_PRICE, sy-vline,
  WA_WRF_PPW_PPDPA_CHG_STY-SISTER, sy-vline,
  WA_WRF_PPW_PPDPA_CHG_STY-NO_OF_STORES, sy-vline,
  WA_WRF_PPW_PPDPA_CHG_STY-GUID_BG, sy-vline,
  WA_WRF_PPW_PPDPA_CHG_STY-BUDGET_VP_ACCU, sy-vline,
  WA_WRF_PPW_PPDPA_CHG_STY-BG, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_WRF_PPW_PPDPA_CHG_STY 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_WRF_PPW_PPDPA_CHG_STY 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_WRF_PPW_PPDPA_CHG_STY INTO WA_WRF_PPW_PPDPA_CHG_STY.


*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 CUNIT, internal->external for field STOCKUNIT
CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT'
  EXPORTING
    input =                      WA_WRF_PPW_PPDPA_CHG_STY-STOCKUNIT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_WRF_PPW_PPDPA_CHG_STY-STOCKUNIT.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

*Conversion exit ALPHA, internal->external for field KBELN_COPY
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_WRF_PPW_PPDPA_CHG_STY-KBELN_COPY
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_WRF_PPW_PPDPA_CHG_STY-KBELN_COPY.
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_WRF_PPW_PPDPA_CHG_STY_STR, 
CONT TYPE STRING,
MANDT TYPE STRING,
GUID TYPE STRING,
PARENT TYPE STRING,
REFERENCE TYPE STRING,
DEVI_PRICE TYPE STRING,
SISTER TYPE STRING,
NO_OF_STORES TYPE STRING,
GUID_BG TYPE STRING,
BUDGET_VP_ACCU TYPE STRING,
BG TYPE STRING,
BUDGET_NR TYPE STRING,
PROCESS_ID TYPE STRING,
BUDGET_VP TYPE STRING,
DATE_FROM TYPE STRING,
DATE_TO TYPE STRING,
WAERS_BG TYPE STRING,
BUDGET_VP_REL TYPE STRING,
BUDGET_VP_SOLD TYPE STRING,
BG_TAB TYPE STRING,
GUID_STOCK TYPE STRING,
STOCK TYPE STRING,
STOCK TYPE STRING,
STOCK_IA TYPE STRING,
STOCK_NIA TYPE STRING,
STOCKUNIT TYPE STRING,
PLND_SALES_QTY TYPE STRING,
STOCK_DIFF TYPE STRING,
PLND_QTY_COMPL TYPE STRING,
GUID_MDP TYPE STRING,
MDP TYPE STRING,
ABV_SOLL TYPE STRING,
ABV_IST TYPE STRING,
MDPRC TYPE STRING,
SELLPER TYPE STRING,
MAXPER TYPE STRING,
MDPROF TYPE STRING,
GUID_AV TYPE STRING,
RUN_NO TYPE STRING,
CALCITEM TYPE STRING,
GUID_CALC TYPE STRING,
MATNR TYPE STRING,
VRKME TYPE STRING,
EAN11 TYPE STRING,
VKORG TYPE STRING,
VTWEG TYPE STRING,
WERKS TYPE STRING,
PLTYP TYPE STRING,
BGINT TYPE STRING,
VKKAB TYPE STRING,
VKKBI TYPE STRING,
VKKAM TYPE STRING,
VRKPE TYPE STRING,
VLGWK TYPE STRING,
EKORG TYPE STRING,
HWAER TYPE STRING,
LIFNR TYPE STRING,
INFNR TYPE STRING,
KURST TYPE STRING,
WAERS TYPE STRING,
EKPGR TYPE STRING,
KWAER TYPE STRING,
EKPNN TYPE STRING,
AUFSG TYPE STRING,
PAUFS TYPE STRING,
PENDP TYPE STRING,
VKPNE TYPE STRING,
VKPBR TYPE STRING,
VWAER TYPE STRING,
ENDPR TYPE STRING,
KALEB TYPE STRING,
SPANE TYPE STRING,
SPABR TYPE STRING,
ENDPA TYPE STRING,
KALEA TYPE STRING,
SPANA TYPE STRING,
SPABA TYPE STRING,
ROTPR TYPE STRING,
MITPR TYPE STRING,
EMPPR TYPE STRING,
VORPR TYPE STRING,
VKP01 TYPE STRING,
VKP02 TYPE STRING,
VKP03 TYPE STRING,
PROZ1 TYPE STRING,
PROZ2 TYPE STRING,
MPROZ TYPE STRING,
LOEVM TYPE STRING,
EKERV TYPE STRING,
EKERA TYPE STRING,
VKERV TYPE STRING,
VKERA TYPE STRING,
EPTYP TYPE STRING,
RKTYP TYPE STRING,
EPRGR TYPE STRING,
PVGRD TYPE STRING,
ENDNE TYPE STRING,
ENDBR TYPE STRING,
ENDPA_PROMO TYPE STRING,
ENDNA TYPE STRING,
ENDBA TYPE STRING,
MABSO TYPE STRING,
NABSO TYPE STRING,
INIAM TYPE STRING,
INIPR TYPE STRING,
IPROZ TYPE STRING,
IABSO TYPE STRING,
EPROZ TYPE STRING,
EABSO TYPE STRING,
PPROZ TYPE STRING,
PABSO TYPE STRING,
NWLEV TYPE STRING,
ENDPA_PROMO_CHECKED TYPE STRING,
DEC_POS TYPE STRING,
RECAL TYPE STRING,
ROUND TYPE STRING,
DECPL TYPE STRING,
BONKZ TYPE STRING,
NEPGR TYPE STRING,
PMATN TYPE STRING,
SATNR TYPE STRING,
KBELN TYPE STRING,
KBELP TYPE STRING,
KBELN_COPY TYPE STRING,
KBELP_COPY TYPE STRING,
KNUMH_V TYPE STRING,
BPSTA TYPE STRING,
SUBRC TYPE STRING,
HERKU TYPE STRING,
GUID_VERS TYPE STRING,
TIMEST_CALC TYPE STRING,
FILGR TYPE STRING,
REFSITE_VK TYPE STRING,
WEIGH_AVERAGE_VK TYPE STRING,
AVERAGE_VK TYPE STRING,
MIN_VK TYPE STRING,
REFERENCE_PRICE TYPE STRING,
SORTKEY_PA TYPE STRING,
AKTIV TYPE STRING,
DEVI_PRICE_EXIST TYPE STRING,
LOEKZ TYPE STRING,
PROMO_CHANGED TYPE STRING,
DEAKT TYPE STRING,
BUDGET_VP_ACCU_REL TYPE STRING,
REFSITE_VK_ORIG TYPE STRING,
WEIGH_AVRG_VK_OR TYPE STRING,
AVERAGE_VK_ORIG TYPE STRING,
BUDGET_VP_ACCU_SOLD TYPE STRING,
CHGID TYPE STRING,END OF T_EKKO_STR.
DATA: WA_WRF_PPW_PPDPA_CHG_STY_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_WRF_PPW_PPDPA_CHG_STY_STR-CONT sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-MANDT sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-GUID sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-PARENT sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-REFERENCE sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-DEVI_PRICE sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-SISTER sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-NO_OF_STORES sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-GUID_BG sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-BUDGET_VP_ACCU sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-BG sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-BUDGET_NR sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-PROCESS_ID sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-BUDGET_VP sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-DATE_FROM sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-DATE_TO sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-WAERS_BG sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-BUDGET_VP_REL sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-BUDGET_VP_SOLD sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-BG_TAB sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-GUID_STOCK sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-STOCK sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-STOCK sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-STOCK_IA sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-STOCK_NIA sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-STOCKUNIT sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-PLND_SALES_QTY sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-STOCK_DIFF sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-PLND_QTY_COMPL sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-GUID_MDP sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-MDP sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-ABV_SOLL sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-ABV_IST sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-MDPRC sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-SELLPER sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-MAXPER sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-MDPROF sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-GUID_AV sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-RUN_NO sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-CALCITEM sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-GUID_CALC sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-MATNR sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-VRKME sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-EAN11 sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-VKORG sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-VTWEG sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-WERKS sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-PLTYP sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-BGINT sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-VKKAB sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-VKKBI sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-VKKAM sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-VRKPE sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-VLGWK sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-EKORG sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-HWAER sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-LIFNR sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-INFNR sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-KURST sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-WAERS sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-EKPGR sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-KWAER sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-EKPNN sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-AUFSG sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-PAUFS sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-PENDP sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-VKPNE sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-VKPBR sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-VWAER sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-ENDPR sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-KALEB sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-SPANE sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-SPABR sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-ENDPA sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-KALEA sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-SPANA sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-SPABA sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-ROTPR sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-MITPR sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-EMPPR sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-VORPR sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-VKP01 sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-VKP02 sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-VKP03 sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-PROZ1 sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-PROZ2 sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-MPROZ sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-LOEVM sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-EKERV sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-EKERA sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-VKERV sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-VKERA sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-EPTYP sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-RKTYP sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-EPRGR sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-PVGRD sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-ENDNE sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-ENDBR sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-ENDPA_PROMO sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-ENDNA sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-ENDBA sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-MABSO sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-NABSO sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-INIAM sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-INIPR sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-IPROZ sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-IABSO sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-EPROZ sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-EABSO sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-PPROZ sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-PABSO sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-NWLEV sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-ENDPA_PROMO_CHECKED sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-DEC_POS sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-RECAL sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-ROUND sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-DECPL sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-BONKZ sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-NEPGR sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-PMATN sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-SATNR sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-KBELN sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-KBELP sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-KBELN_COPY sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-KBELP_COPY sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-KNUMH_V sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-BPSTA sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-SUBRC sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-HERKU sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-GUID_VERS sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-TIMEST_CALC sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-FILGR sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-REFSITE_VK sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-WEIGH_AVERAGE_VK sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-AVERAGE_VK sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-MIN_VK sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-REFERENCE_PRICE sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-SORTKEY_PA sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-AKTIV sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-DEVI_PRICE_EXIST sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-LOEKZ sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-PROMO_CHANGED sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-DEAKT sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-BUDGET_VP_ACCU_REL sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-REFSITE_VK_ORIG sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-WEIGH_AVRG_VK_OR sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-AVERAGE_VK_ORIG sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-BUDGET_VP_ACCU_SOLD sy-vline 
WA_WRF_PPW_PPDPA_CHG_STY_STR-CHGID sy-vline      INTO ld_text SEPARATED BY SPACE.

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