ABAP Select data from SAP table PS0201 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 PS0201 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 PS0201. 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 PS0201 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_PS0201 TYPE STANDARD TABLE OF PS0201,
      WA_PS0201 TYPE PS0201,
      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: <PS0201> TYPE PS0201.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM PS0201
*  INTO TABLE @DATA(IT_PS02012).
*--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_PS0201 INDEX 1 INTO DATA(WA_PS02012).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<PS0201>-RNTYP = 1.
<PS0201>-WAERS = 1.
<PS0201>-ANG01 = 1.
<PS0201>-HAN01 = 1.
<PS0201>-AAN01 = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_PS0201-MBV01, sy-vline,
  WA_PS0201-LUR01, sy-vline,
  WA_PS0201-NAR01, sy-vline,
  WA_PS0201-LGA01, sy-vline,
  WA_PS0201-BET01, sy-vline,
  WA_PS0201-APD01, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_PS0201 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_PS0201 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_PS0201 INTO WA_PS0201.


*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.
ENDFORM. 

*&---------------------------------------------------------------------*
*& Form process_as_string_field_values
*&---------------------------------------------------------------------*
FORM process_as_string_field_values CHANGING p_EKKO LIKE wa_EKKO.

TYPES: BEGIN OF T_PS0201_STR, 
RNTYP TYPE STRING,
WAERS TYPE STRING,
ANG01 TYPE STRING,
HAN01 TYPE STRING,
AAN01 TYPE STRING,
MBV01 TYPE STRING,
LUR01 TYPE STRING,
NAR01 TYPE STRING,
LGA01 TYPE STRING,
BET01 TYPE STRING,
APD01 TYPE STRING,
LTR01 TYPE STRING,
LFD01 TYPE STRING,
ANG02 TYPE STRING,
HAN02 TYPE STRING,
AAN02 TYPE STRING,
MBV02 TYPE STRING,
LUR02 TYPE STRING,
NAR02 TYPE STRING,
LGA02 TYPE STRING,
BET02 TYPE STRING,
APD02 TYPE STRING,
LTR02 TYPE STRING,
LFD02 TYPE STRING,
ANG03 TYPE STRING,
HAN03 TYPE STRING,
AAN03 TYPE STRING,
MBV03 TYPE STRING,
LUR03 TYPE STRING,
NAR03 TYPE STRING,
LGA03 TYPE STRING,
BET03 TYPE STRING,
APD03 TYPE STRING,
LTR03 TYPE STRING,
LFD03 TYPE STRING,
ANG04 TYPE STRING,
HAN04 TYPE STRING,
AAN04 TYPE STRING,
MBV04 TYPE STRING,
LUR04 TYPE STRING,
NAR04 TYPE STRING,
LGA04 TYPE STRING,
BET04 TYPE STRING,
APD04 TYPE STRING,
LTR04 TYPE STRING,
LFD04 TYPE STRING,
ANG05 TYPE STRING,
HAN05 TYPE STRING,
AAN05 TYPE STRING,
MBV05 TYPE STRING,
LUR05 TYPE STRING,
NAR05 TYPE STRING,
LGA05 TYPE STRING,
BET05 TYPE STRING,
APD05 TYPE STRING,
LTR05 TYPE STRING,
LFD05 TYPE STRING,
ANG06 TYPE STRING,
HAN06 TYPE STRING,
AAN06 TYPE STRING,
MBV06 TYPE STRING,
LUR06 TYPE STRING,
NAR06 TYPE STRING,
LGA06 TYPE STRING,
BET06 TYPE STRING,
APD06 TYPE STRING,
LTR06 TYPE STRING,
LFD06 TYPE STRING,
ANG07 TYPE STRING,
HAN07 TYPE STRING,
AAN07 TYPE STRING,
MBV07 TYPE STRING,
LUR07 TYPE STRING,
NAR07 TYPE STRING,
LGA07 TYPE STRING,
BET07 TYPE STRING,
APD07 TYPE STRING,
LTR07 TYPE STRING,
LFD07 TYPE STRING,
ANG08 TYPE STRING,
HAN08 TYPE STRING,
AAN08 TYPE STRING,
MBV08 TYPE STRING,
LUR08 TYPE STRING,
NAR08 TYPE STRING,
LGA08 TYPE STRING,
BET08 TYPE STRING,
APD08 TYPE STRING,
LTR08 TYPE STRING,
LFD08 TYPE STRING,
ANG09 TYPE STRING,
HAN09 TYPE STRING,
AAN09 TYPE STRING,
MBV09 TYPE STRING,
LUR09 TYPE STRING,
NAR09 TYPE STRING,
LGA09 TYPE STRING,
BET09 TYPE STRING,
APD09 TYPE STRING,
LTR09 TYPE STRING,
LFD09 TYPE STRING,
ANG10 TYPE STRING,
HAN10 TYPE STRING,
AAN10 TYPE STRING,
MBV10 TYPE STRING,
LUR10 TYPE STRING,
NAR10 TYPE STRING,
LGA10 TYPE STRING,
BET10 TYPE STRING,
APD10 TYPE STRING,
LTR10 TYPE STRING,
LFD10 TYPE STRING,
ANG11 TYPE STRING,
HAN11 TYPE STRING,
AAN11 TYPE STRING,
MBV11 TYPE STRING,
LUR11 TYPE STRING,
NAR11 TYPE STRING,
LGA11 TYPE STRING,
BET11 TYPE STRING,
APD11 TYPE STRING,
LTR11 TYPE STRING,
LFD11 TYPE STRING,
ANG12 TYPE STRING,
HAN12 TYPE STRING,
AAN12 TYPE STRING,
MBV12 TYPE STRING,
LUR12 TYPE STRING,
NAR12 TYPE STRING,
LGA12 TYPE STRING,
BET12 TYPE STRING,
APD12 TYPE STRING,
LTR12 TYPE STRING,
LFD12 TYPE STRING,
ANG13 TYPE STRING,
HAN13 TYPE STRING,
AAN13 TYPE STRING,
MBV13 TYPE STRING,
LUR13 TYPE STRING,
NAR13 TYPE STRING,
LGA13 TYPE STRING,
BET13 TYPE STRING,
APD13 TYPE STRING,
LTR13 TYPE STRING,
LFD13 TYPE STRING,
ANG14 TYPE STRING,
HAN14 TYPE STRING,
AAN14 TYPE STRING,
MBV14 TYPE STRING,
LUR14 TYPE STRING,
NAR14 TYPE STRING,
LGA14 TYPE STRING,
BET14 TYPE STRING,
APD14 TYPE STRING,
LTR14 TYPE STRING,
LFD14 TYPE STRING,
ANG15 TYPE STRING,
HAN15 TYPE STRING,
AAN15 TYPE STRING,
MBV15 TYPE STRING,
LUR15 TYPE STRING,
NAR15 TYPE STRING,
LGA15 TYPE STRING,
BET15 TYPE STRING,
APD15 TYPE STRING,
LTR15 TYPE STRING,
LFD15 TYPE STRING,
ANG16 TYPE STRING,
HAN16 TYPE STRING,
AAN16 TYPE STRING,
MBV16 TYPE STRING,
LUR16 TYPE STRING,
NAR16 TYPE STRING,
LGA16 TYPE STRING,
BET16 TYPE STRING,
APD16 TYPE STRING,
LTR16 TYPE STRING,
LFD16 TYPE STRING,
ANG17 TYPE STRING,
HAN17 TYPE STRING,
AAN17 TYPE STRING,
MBV17 TYPE STRING,
LUR17 TYPE STRING,
NAR17 TYPE STRING,
LGA17 TYPE STRING,
BET17 TYPE STRING,
APD17 TYPE STRING,
LTR17 TYPE STRING,
LFD17 TYPE STRING,
ANG18 TYPE STRING,
HAN18 TYPE STRING,
AAN18 TYPE STRING,
MBV18 TYPE STRING,
LUR18 TYPE STRING,
NAR18 TYPE STRING,
LGA18 TYPE STRING,
BET18 TYPE STRING,
APD18 TYPE STRING,
LTR18 TYPE STRING,
LFD18 TYPE STRING,
ANG19 TYPE STRING,
HAN19 TYPE STRING,
AAN19 TYPE STRING,
MBV19 TYPE STRING,
LUR19 TYPE STRING,
NAR19 TYPE STRING,
LGA19 TYPE STRING,
BET19 TYPE STRING,
APD19 TYPE STRING,
LTR19 TYPE STRING,
LFD19 TYPE STRING,
ANG20 TYPE STRING,
HAN20 TYPE STRING,
AAN20 TYPE STRING,
MBV20 TYPE STRING,
LUR20 TYPE STRING,
NAR20 TYPE STRING,
LGA20 TYPE STRING,
BET20 TYPE STRING,
APD20 TYPE STRING,
LTR20 TYPE STRING,
LFD20 TYPE STRING,
ANG21 TYPE STRING,
HAN21 TYPE STRING,
AAN21 TYPE STRING,
MBV21 TYPE STRING,
LUR21 TYPE STRING,
NAR21 TYPE STRING,
LGA21 TYPE STRING,
BET21 TYPE STRING,
APD21 TYPE STRING,
LTR21 TYPE STRING,
LFD21 TYPE STRING,
ANG22 TYPE STRING,
HAN22 TYPE STRING,
AAN22 TYPE STRING,
MBV22 TYPE STRING,
LUR22 TYPE STRING,
NAR22 TYPE STRING,
LGA22 TYPE STRING,
BET22 TYPE STRING,
APD22 TYPE STRING,
LTR22 TYPE STRING,
LFD22 TYPE STRING,
ANG23 TYPE STRING,
HAN23 TYPE STRING,
AAN23 TYPE STRING,
MBV23 TYPE STRING,
LUR23 TYPE STRING,
NAR23 TYPE STRING,
LGA23 TYPE STRING,
BET23 TYPE STRING,
APD23 TYPE STRING,
LTR23 TYPE STRING,
LFD23 TYPE STRING,
ANG24 TYPE STRING,
HAN24 TYPE STRING,
AAN24 TYPE STRING,
MBV24 TYPE STRING,
LUR24 TYPE STRING,
NAR24 TYPE STRING,
LGA24 TYPE STRING,
BET24 TYPE STRING,
APD24 TYPE STRING,
LTR24 TYPE STRING,
LFD24 TYPE STRING,
ANG25 TYPE STRING,
HAN25 TYPE STRING,
AAN25 TYPE STRING,
MBV25 TYPE STRING,
LUR25 TYPE STRING,
NAR25 TYPE STRING,
LGA25 TYPE STRING,
BET25 TYPE STRING,
APD25 TYPE STRING,
LTR25 TYPE STRING,
LFD25 TYPE STRING,
ANG26 TYPE STRING,
HAN26 TYPE STRING,
AAN26 TYPE STRING,
MBV26 TYPE STRING,
LUR26 TYPE STRING,
NAR26 TYPE STRING,
LGA26 TYPE STRING,
BET26 TYPE STRING,
APD26 TYPE STRING,
LTR26 TYPE STRING,
LFD26 TYPE STRING,
ANG27 TYPE STRING,
HAN27 TYPE STRING,
AAN27 TYPE STRING,
MBV27 TYPE STRING,
LUR27 TYPE STRING,
NAR27 TYPE STRING,
LGA27 TYPE STRING,
BET27 TYPE STRING,
APD27 TYPE STRING,
LTR27 TYPE STRING,
LFD27 TYPE STRING,
ANG28 TYPE STRING,
HAN28 TYPE STRING,
AAN28 TYPE STRING,
MBV28 TYPE STRING,
LUR28 TYPE STRING,
NAR28 TYPE STRING,
LGA28 TYPE STRING,
BET28 TYPE STRING,
APD28 TYPE STRING,
LTR28 TYPE STRING,
LFD28 TYPE STRING,
ANG29 TYPE STRING,
HAN29 TYPE STRING,
AAN29 TYPE STRING,
MBV29 TYPE STRING,
LUR29 TYPE STRING,
NAR29 TYPE STRING,
LGA29 TYPE STRING,
BET29 TYPE STRING,
APD29 TYPE STRING,
LTR29 TYPE STRING,
LFD29 TYPE STRING,
ANG30 TYPE STRING,
HAN30 TYPE STRING,
AAN30 TYPE STRING,
MBV30 TYPE STRING,
LUR30 TYPE STRING,
NAR30 TYPE STRING,
LGA30 TYPE STRING,
BET30 TYPE STRING,
APD30 TYPE STRING,
LTR30 TYPE STRING,
LFD30 TYPE STRING,END OF T_EKKO_STR.
DATA: WA_PS0201_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_PS0201_STR-RNTYP sy-vline 
WA_PS0201_STR-WAERS sy-vline 
WA_PS0201_STR-ANG01 sy-vline 
WA_PS0201_STR-HAN01 sy-vline 
WA_PS0201_STR-AAN01 sy-vline 
WA_PS0201_STR-MBV01 sy-vline 
WA_PS0201_STR-LUR01 sy-vline 
WA_PS0201_STR-NAR01 sy-vline 
WA_PS0201_STR-LGA01 sy-vline 
WA_PS0201_STR-BET01 sy-vline 
WA_PS0201_STR-APD01 sy-vline 
WA_PS0201_STR-LTR01 sy-vline 
WA_PS0201_STR-LFD01 sy-vline 
WA_PS0201_STR-ANG02 sy-vline 
WA_PS0201_STR-HAN02 sy-vline 
WA_PS0201_STR-AAN02 sy-vline 
WA_PS0201_STR-MBV02 sy-vline 
WA_PS0201_STR-LUR02 sy-vline 
WA_PS0201_STR-NAR02 sy-vline 
WA_PS0201_STR-LGA02 sy-vline 
WA_PS0201_STR-BET02 sy-vline 
WA_PS0201_STR-APD02 sy-vline 
WA_PS0201_STR-LTR02 sy-vline 
WA_PS0201_STR-LFD02 sy-vline 
WA_PS0201_STR-ANG03 sy-vline 
WA_PS0201_STR-HAN03 sy-vline 
WA_PS0201_STR-AAN03 sy-vline 
WA_PS0201_STR-MBV03 sy-vline 
WA_PS0201_STR-LUR03 sy-vline 
WA_PS0201_STR-NAR03 sy-vline 
WA_PS0201_STR-LGA03 sy-vline 
WA_PS0201_STR-BET03 sy-vline 
WA_PS0201_STR-APD03 sy-vline 
WA_PS0201_STR-LTR03 sy-vline 
WA_PS0201_STR-LFD03 sy-vline 
WA_PS0201_STR-ANG04 sy-vline 
WA_PS0201_STR-HAN04 sy-vline 
WA_PS0201_STR-AAN04 sy-vline 
WA_PS0201_STR-MBV04 sy-vline 
WA_PS0201_STR-LUR04 sy-vline 
WA_PS0201_STR-NAR04 sy-vline 
WA_PS0201_STR-LGA04 sy-vline 
WA_PS0201_STR-BET04 sy-vline 
WA_PS0201_STR-APD04 sy-vline 
WA_PS0201_STR-LTR04 sy-vline 
WA_PS0201_STR-LFD04 sy-vline 
WA_PS0201_STR-ANG05 sy-vline 
WA_PS0201_STR-HAN05 sy-vline 
WA_PS0201_STR-AAN05 sy-vline 
WA_PS0201_STR-MBV05 sy-vline 
WA_PS0201_STR-LUR05 sy-vline 
WA_PS0201_STR-NAR05 sy-vline 
WA_PS0201_STR-LGA05 sy-vline 
WA_PS0201_STR-BET05 sy-vline 
WA_PS0201_STR-APD05 sy-vline 
WA_PS0201_STR-LTR05 sy-vline 
WA_PS0201_STR-LFD05 sy-vline 
WA_PS0201_STR-ANG06 sy-vline 
WA_PS0201_STR-HAN06 sy-vline 
WA_PS0201_STR-AAN06 sy-vline 
WA_PS0201_STR-MBV06 sy-vline 
WA_PS0201_STR-LUR06 sy-vline 
WA_PS0201_STR-NAR06 sy-vline 
WA_PS0201_STR-LGA06 sy-vline 
WA_PS0201_STR-BET06 sy-vline 
WA_PS0201_STR-APD06 sy-vline 
WA_PS0201_STR-LTR06 sy-vline 
WA_PS0201_STR-LFD06 sy-vline 
WA_PS0201_STR-ANG07 sy-vline 
WA_PS0201_STR-HAN07 sy-vline 
WA_PS0201_STR-AAN07 sy-vline 
WA_PS0201_STR-MBV07 sy-vline 
WA_PS0201_STR-LUR07 sy-vline 
WA_PS0201_STR-NAR07 sy-vline 
WA_PS0201_STR-LGA07 sy-vline 
WA_PS0201_STR-BET07 sy-vline 
WA_PS0201_STR-APD07 sy-vline 
WA_PS0201_STR-LTR07 sy-vline 
WA_PS0201_STR-LFD07 sy-vline 
WA_PS0201_STR-ANG08 sy-vline 
WA_PS0201_STR-HAN08 sy-vline 
WA_PS0201_STR-AAN08 sy-vline 
WA_PS0201_STR-MBV08 sy-vline 
WA_PS0201_STR-LUR08 sy-vline 
WA_PS0201_STR-NAR08 sy-vline 
WA_PS0201_STR-LGA08 sy-vline 
WA_PS0201_STR-BET08 sy-vline 
WA_PS0201_STR-APD08 sy-vline 
WA_PS0201_STR-LTR08 sy-vline 
WA_PS0201_STR-LFD08 sy-vline 
WA_PS0201_STR-ANG09 sy-vline 
WA_PS0201_STR-HAN09 sy-vline 
WA_PS0201_STR-AAN09 sy-vline 
WA_PS0201_STR-MBV09 sy-vline 
WA_PS0201_STR-LUR09 sy-vline 
WA_PS0201_STR-NAR09 sy-vline 
WA_PS0201_STR-LGA09 sy-vline 
WA_PS0201_STR-BET09 sy-vline 
WA_PS0201_STR-APD09 sy-vline 
WA_PS0201_STR-LTR09 sy-vline 
WA_PS0201_STR-LFD09 sy-vline 
WA_PS0201_STR-ANG10 sy-vline 
WA_PS0201_STR-HAN10 sy-vline 
WA_PS0201_STR-AAN10 sy-vline 
WA_PS0201_STR-MBV10 sy-vline 
WA_PS0201_STR-LUR10 sy-vline 
WA_PS0201_STR-NAR10 sy-vline 
WA_PS0201_STR-LGA10 sy-vline 
WA_PS0201_STR-BET10 sy-vline 
WA_PS0201_STR-APD10 sy-vline 
WA_PS0201_STR-LTR10 sy-vline 
WA_PS0201_STR-LFD10 sy-vline 
WA_PS0201_STR-ANG11 sy-vline 
WA_PS0201_STR-HAN11 sy-vline 
WA_PS0201_STR-AAN11 sy-vline 
WA_PS0201_STR-MBV11 sy-vline 
WA_PS0201_STR-LUR11 sy-vline 
WA_PS0201_STR-NAR11 sy-vline 
WA_PS0201_STR-LGA11 sy-vline 
WA_PS0201_STR-BET11 sy-vline 
WA_PS0201_STR-APD11 sy-vline 
WA_PS0201_STR-LTR11 sy-vline 
WA_PS0201_STR-LFD11 sy-vline 
WA_PS0201_STR-ANG12 sy-vline 
WA_PS0201_STR-HAN12 sy-vline 
WA_PS0201_STR-AAN12 sy-vline 
WA_PS0201_STR-MBV12 sy-vline 
WA_PS0201_STR-LUR12 sy-vline 
WA_PS0201_STR-NAR12 sy-vline 
WA_PS0201_STR-LGA12 sy-vline 
WA_PS0201_STR-BET12 sy-vline 
WA_PS0201_STR-APD12 sy-vline 
WA_PS0201_STR-LTR12 sy-vline 
WA_PS0201_STR-LFD12 sy-vline 
WA_PS0201_STR-ANG13 sy-vline 
WA_PS0201_STR-HAN13 sy-vline 
WA_PS0201_STR-AAN13 sy-vline 
WA_PS0201_STR-MBV13 sy-vline 
WA_PS0201_STR-LUR13 sy-vline 
WA_PS0201_STR-NAR13 sy-vline 
WA_PS0201_STR-LGA13 sy-vline 
WA_PS0201_STR-BET13 sy-vline 
WA_PS0201_STR-APD13 sy-vline 
WA_PS0201_STR-LTR13 sy-vline 
WA_PS0201_STR-LFD13 sy-vline 
WA_PS0201_STR-ANG14 sy-vline 
WA_PS0201_STR-HAN14 sy-vline 
WA_PS0201_STR-AAN14 sy-vline 
WA_PS0201_STR-MBV14 sy-vline 
WA_PS0201_STR-LUR14 sy-vline 
WA_PS0201_STR-NAR14 sy-vline 
WA_PS0201_STR-LGA14 sy-vline 
WA_PS0201_STR-BET14 sy-vline 
WA_PS0201_STR-APD14 sy-vline 
WA_PS0201_STR-LTR14 sy-vline 
WA_PS0201_STR-LFD14 sy-vline 
WA_PS0201_STR-ANG15 sy-vline 
WA_PS0201_STR-HAN15 sy-vline 
WA_PS0201_STR-AAN15 sy-vline 
WA_PS0201_STR-MBV15 sy-vline 
WA_PS0201_STR-LUR15 sy-vline 
WA_PS0201_STR-NAR15 sy-vline 
WA_PS0201_STR-LGA15 sy-vline 
WA_PS0201_STR-BET15 sy-vline 
WA_PS0201_STR-APD15 sy-vline 
WA_PS0201_STR-LTR15 sy-vline 
WA_PS0201_STR-LFD15 sy-vline 
WA_PS0201_STR-ANG16 sy-vline 
WA_PS0201_STR-HAN16 sy-vline 
WA_PS0201_STR-AAN16 sy-vline 
WA_PS0201_STR-MBV16 sy-vline 
WA_PS0201_STR-LUR16 sy-vline 
WA_PS0201_STR-NAR16 sy-vline 
WA_PS0201_STR-LGA16 sy-vline 
WA_PS0201_STR-BET16 sy-vline 
WA_PS0201_STR-APD16 sy-vline 
WA_PS0201_STR-LTR16 sy-vline 
WA_PS0201_STR-LFD16 sy-vline 
WA_PS0201_STR-ANG17 sy-vline 
WA_PS0201_STR-HAN17 sy-vline 
WA_PS0201_STR-AAN17 sy-vline 
WA_PS0201_STR-MBV17 sy-vline 
WA_PS0201_STR-LUR17 sy-vline 
WA_PS0201_STR-NAR17 sy-vline 
WA_PS0201_STR-LGA17 sy-vline 
WA_PS0201_STR-BET17 sy-vline 
WA_PS0201_STR-APD17 sy-vline 
WA_PS0201_STR-LTR17 sy-vline 
WA_PS0201_STR-LFD17 sy-vline 
WA_PS0201_STR-ANG18 sy-vline 
WA_PS0201_STR-HAN18 sy-vline 
WA_PS0201_STR-AAN18 sy-vline 
WA_PS0201_STR-MBV18 sy-vline 
WA_PS0201_STR-LUR18 sy-vline 
WA_PS0201_STR-NAR18 sy-vline 
WA_PS0201_STR-LGA18 sy-vline 
WA_PS0201_STR-BET18 sy-vline 
WA_PS0201_STR-APD18 sy-vline 
WA_PS0201_STR-LTR18 sy-vline 
WA_PS0201_STR-LFD18 sy-vline 
WA_PS0201_STR-ANG19 sy-vline 
WA_PS0201_STR-HAN19 sy-vline 
WA_PS0201_STR-AAN19 sy-vline 
WA_PS0201_STR-MBV19 sy-vline 
WA_PS0201_STR-LUR19 sy-vline 
WA_PS0201_STR-NAR19 sy-vline 
WA_PS0201_STR-LGA19 sy-vline 
WA_PS0201_STR-BET19 sy-vline 
WA_PS0201_STR-APD19 sy-vline 
WA_PS0201_STR-LTR19 sy-vline 
WA_PS0201_STR-LFD19 sy-vline 
WA_PS0201_STR-ANG20 sy-vline 
WA_PS0201_STR-HAN20 sy-vline 
WA_PS0201_STR-AAN20 sy-vline 
WA_PS0201_STR-MBV20 sy-vline 
WA_PS0201_STR-LUR20 sy-vline 
WA_PS0201_STR-NAR20 sy-vline 
WA_PS0201_STR-LGA20 sy-vline 
WA_PS0201_STR-BET20 sy-vline 
WA_PS0201_STR-APD20 sy-vline 
WA_PS0201_STR-LTR20 sy-vline 
WA_PS0201_STR-LFD20 sy-vline 
WA_PS0201_STR-ANG21 sy-vline 
WA_PS0201_STR-HAN21 sy-vline 
WA_PS0201_STR-AAN21 sy-vline 
WA_PS0201_STR-MBV21 sy-vline 
WA_PS0201_STR-LUR21 sy-vline 
WA_PS0201_STR-NAR21 sy-vline 
WA_PS0201_STR-LGA21 sy-vline 
WA_PS0201_STR-BET21 sy-vline 
WA_PS0201_STR-APD21 sy-vline 
WA_PS0201_STR-LTR21 sy-vline 
WA_PS0201_STR-LFD21 sy-vline 
WA_PS0201_STR-ANG22 sy-vline 
WA_PS0201_STR-HAN22 sy-vline 
WA_PS0201_STR-AAN22 sy-vline 
WA_PS0201_STR-MBV22 sy-vline 
WA_PS0201_STR-LUR22 sy-vline 
WA_PS0201_STR-NAR22 sy-vline 
WA_PS0201_STR-LGA22 sy-vline 
WA_PS0201_STR-BET22 sy-vline 
WA_PS0201_STR-APD22 sy-vline 
WA_PS0201_STR-LTR22 sy-vline 
WA_PS0201_STR-LFD22 sy-vline 
WA_PS0201_STR-ANG23 sy-vline 
WA_PS0201_STR-HAN23 sy-vline 
WA_PS0201_STR-AAN23 sy-vline 
WA_PS0201_STR-MBV23 sy-vline 
WA_PS0201_STR-LUR23 sy-vline 
WA_PS0201_STR-NAR23 sy-vline 
WA_PS0201_STR-LGA23 sy-vline 
WA_PS0201_STR-BET23 sy-vline 
WA_PS0201_STR-APD23 sy-vline 
WA_PS0201_STR-LTR23 sy-vline 
WA_PS0201_STR-LFD23 sy-vline 
WA_PS0201_STR-ANG24 sy-vline 
WA_PS0201_STR-HAN24 sy-vline 
WA_PS0201_STR-AAN24 sy-vline 
WA_PS0201_STR-MBV24 sy-vline 
WA_PS0201_STR-LUR24 sy-vline 
WA_PS0201_STR-NAR24 sy-vline 
WA_PS0201_STR-LGA24 sy-vline 
WA_PS0201_STR-BET24 sy-vline 
WA_PS0201_STR-APD24 sy-vline 
WA_PS0201_STR-LTR24 sy-vline 
WA_PS0201_STR-LFD24 sy-vline 
WA_PS0201_STR-ANG25 sy-vline 
WA_PS0201_STR-HAN25 sy-vline 
WA_PS0201_STR-AAN25 sy-vline 
WA_PS0201_STR-MBV25 sy-vline 
WA_PS0201_STR-LUR25 sy-vline 
WA_PS0201_STR-NAR25 sy-vline 
WA_PS0201_STR-LGA25 sy-vline 
WA_PS0201_STR-BET25 sy-vline 
WA_PS0201_STR-APD25 sy-vline 
WA_PS0201_STR-LTR25 sy-vline 
WA_PS0201_STR-LFD25 sy-vline 
WA_PS0201_STR-ANG26 sy-vline 
WA_PS0201_STR-HAN26 sy-vline 
WA_PS0201_STR-AAN26 sy-vline 
WA_PS0201_STR-MBV26 sy-vline 
WA_PS0201_STR-LUR26 sy-vline 
WA_PS0201_STR-NAR26 sy-vline 
WA_PS0201_STR-LGA26 sy-vline 
WA_PS0201_STR-BET26 sy-vline 
WA_PS0201_STR-APD26 sy-vline 
WA_PS0201_STR-LTR26 sy-vline 
WA_PS0201_STR-LFD26 sy-vline 
WA_PS0201_STR-ANG27 sy-vline 
WA_PS0201_STR-HAN27 sy-vline 
WA_PS0201_STR-AAN27 sy-vline 
WA_PS0201_STR-MBV27 sy-vline 
WA_PS0201_STR-LUR27 sy-vline 
WA_PS0201_STR-NAR27 sy-vline 
WA_PS0201_STR-LGA27 sy-vline 
WA_PS0201_STR-BET27 sy-vline 
WA_PS0201_STR-APD27 sy-vline 
WA_PS0201_STR-LTR27 sy-vline 
WA_PS0201_STR-LFD27 sy-vline 
WA_PS0201_STR-ANG28 sy-vline 
WA_PS0201_STR-HAN28 sy-vline 
WA_PS0201_STR-AAN28 sy-vline 
WA_PS0201_STR-MBV28 sy-vline 
WA_PS0201_STR-LUR28 sy-vline 
WA_PS0201_STR-NAR28 sy-vline 
WA_PS0201_STR-LGA28 sy-vline 
WA_PS0201_STR-BET28 sy-vline 
WA_PS0201_STR-APD28 sy-vline 
WA_PS0201_STR-LTR28 sy-vline 
WA_PS0201_STR-LFD28 sy-vline 
WA_PS0201_STR-ANG29 sy-vline 
WA_PS0201_STR-HAN29 sy-vline 
WA_PS0201_STR-AAN29 sy-vline 
WA_PS0201_STR-MBV29 sy-vline 
WA_PS0201_STR-LUR29 sy-vline 
WA_PS0201_STR-NAR29 sy-vline 
WA_PS0201_STR-LGA29 sy-vline 
WA_PS0201_STR-BET29 sy-vline 
WA_PS0201_STR-APD29 sy-vline 
WA_PS0201_STR-LTR29 sy-vline 
WA_PS0201_STR-LFD29 sy-vline 
WA_PS0201_STR-ANG30 sy-vline 
WA_PS0201_STR-HAN30 sy-vline 
WA_PS0201_STR-AAN30 sy-vline 
WA_PS0201_STR-MBV30 sy-vline 
WA_PS0201_STR-LUR30 sy-vline 
WA_PS0201_STR-NAR30 sy-vline 
WA_PS0201_STR-LGA30 sy-vline 
WA_PS0201_STR-BET30 sy-vline 
WA_PS0201_STR-APD30 sy-vline 
WA_PS0201_STR-LTR30 sy-vline 
WA_PS0201_STR-LFD30 sy-vline      INTO ld_text SEPARATED BY SPACE.

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