ABAP Select data from SAP table PA0257 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 PA0257 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 PA0257. 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 PA0257 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_PA0257 TYPE STANDARD TABLE OF PA0257,
      WA_PA0257 TYPE PA0257,
      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: <PA0257> TYPE PA0257.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM PA0257
*  INTO TABLE @DATA(IT_PA02572).
*--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_PA0257 INDEX 1 INTO DATA(WA_PA02572).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<PA0257>-MANDT = 1.
<PA0257>-PERNR = 1.
<PA0257>-SUBTY = 1.
<PA0257>-OBJPS = 1.
<PA0257>-SPRPS = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_PA0257-ENDDA, sy-vline,
  WA_PA0257-BEGDA, sy-vline,
  WA_PA0257-SEQNR, sy-vline,
  WA_PA0257-AEDTM, sy-vline,
  WA_PA0257-UNAME, sy-vline,
  WA_PA0257-HISTO, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_PA0257 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_PA0257 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_PA0257 INTO WA_PA0257.


*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 PDATE, internal->external for field TTKGBD01
CALL FUNCTION 'CONVERSION_EXIT_PDATE_OUTPUT'
  EXPORTING
    input =                      WA_PA0257-TTKGBD01
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PA0257-TTKGBD01.
WRITE:/ 'New Value:', ld_input.

*Conversion exit PDATE, internal->external for field TTKGBD02
CALL FUNCTION 'CONVERSION_EXIT_PDATE_OUTPUT'
  EXPORTING
    input =                      WA_PA0257-TTKGBD02
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PA0257-TTKGBD02.
WRITE:/ 'New Value:', ld_input.

*Conversion exit PDATE, internal->external for field TTKGBD03
CALL FUNCTION 'CONVERSION_EXIT_PDATE_OUTPUT'
  EXPORTING
    input =                      WA_PA0257-TTKGBD03
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PA0257-TTKGBD03.
WRITE:/ 'New Value:', ld_input.

*Conversion exit PDATE, internal->external for field TTKGBD04
CALL FUNCTION 'CONVERSION_EXIT_PDATE_OUTPUT'
  EXPORTING
    input =                      WA_PA0257-TTKGBD04
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PA0257-TTKGBD04.
WRITE:/ 'New Value:', ld_input.

*Conversion exit PDATE, internal->external for field TTKGBD05
CALL FUNCTION 'CONVERSION_EXIT_PDATE_OUTPUT'
  EXPORTING
    input =                      WA_PA0257-TTKGBD05
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PA0257-TTKGBD05.
WRITE:/ 'New Value:', ld_input.

*Conversion exit PDATE, internal->external for field TTKGBD06
CALL FUNCTION 'CONVERSION_EXIT_PDATE_OUTPUT'
  EXPORTING
    input =                      WA_PA0257-TTKGBD06
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PA0257-TTKGBD06.
WRITE:/ 'New Value:', ld_input.

*Conversion exit PDATE, internal->external for field TTKGBD07
CALL FUNCTION 'CONVERSION_EXIT_PDATE_OUTPUT'
  EXPORTING
    input =                      WA_PA0257-TTKGBD07
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PA0257-TTKGBD07.
WRITE:/ 'New Value:', ld_input.

*Conversion exit PDATE, internal->external for field TTKGBD08
CALL FUNCTION 'CONVERSION_EXIT_PDATE_OUTPUT'
  EXPORTING
    input =                      WA_PA0257-TTKGBD08
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PA0257-TTKGBD08.
WRITE:/ 'New Value:', ld_input.

*Conversion exit PDATE, internal->external for field TTKGBD09
CALL FUNCTION 'CONVERSION_EXIT_PDATE_OUTPUT'
  EXPORTING
    input =                      WA_PA0257-TTKGBD09
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PA0257-TTKGBD09.
WRITE:/ 'New Value:', ld_input.

*Conversion exit PDATE, internal->external for field TTKGBD10
CALL FUNCTION 'CONVERSION_EXIT_PDATE_OUTPUT'
  EXPORTING
    input =                      WA_PA0257-TTKGBD10
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PA0257-TTKGBD10.
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_PA0257_STR, 
MANDT TYPE STRING,
PERNR TYPE STRING,
SUBTY TYPE STRING,
OBJPS TYPE STRING,
SPRPS TYPE STRING,
ENDDA TYPE STRING,
BEGDA TYPE STRING,
SEQNR TYPE STRING,
AEDTM TYPE STRING,
UNAME TYPE STRING,
HISTO TYPE STRING,
ITXEX TYPE STRING,
REFEX TYPE STRING,
ORDEX TYPE STRING,
ITBLD TYPE STRING,
PREAS TYPE STRING,
FLAG1 TYPE STRING,
FLAG2 TYPE STRING,
FLAG3 TYPE STRING,
FLAG4 TYPE STRING,
RESE1 TYPE STRING,
RESE2 TYPE STRING,
GRPVL TYPE STRING,
TTJJ TYPE STRING,
TTJVSA TYPE STRING,
TTJVSD TYPE STRING,
TTFB5 TYPE STRING,
TFB5N TYPE STRING,
TTFB6 TYPE STRING,
TFB6N TYPE STRING,
WAERS TYPE STRING,
TTFB7 TYPE STRING,
TTFB8 TYPE STRING,
TTFB9 TYPE STRING,
TTFB10 TYPE STRING,
TTFB11 TYPE STRING,
TTFB12 TYPE STRING,
AGPTX TYPE STRING,
AGPTF TYPE STRING,
FINC TYPE STRING,
FINS TYPE STRING,
TTFB13 TYPE STRING,
TTFB101 TYPE STRING,
TTFB102 TYPE STRING,
TTFB103 TYPE STRING,
TTFB104 TYPE STRING,
TTFB105 TYPE STRING,
TTFB106 TYPE STRING,
TTFB107 TYPE STRING,
TTFB108 TYPE STRING,
TTFB109 TYPE STRING,
TTFB110 TYPE STRING,
TTFB111 TYPE STRING,
TTFB112 TYPE STRING,
TTFB201 TYPE STRING,
TTFB202 TYPE STRING,
TTFB203 TYPE STRING,
TTFB204 TYPE STRING,
TTFB205 TYPE STRING,
TTFB206 TYPE STRING,
TTFB207 TYPE STRING,
TTFB208 TYPE STRING,
TTFB209 TYPE STRING,
TTFB210 TYPE STRING,
TTFB211 TYPE STRING,
TTFB212 TYPE STRING,
TTFB301 TYPE STRING,
TTFB302 TYPE STRING,
TTFB303 TYPE STRING,
TTFB304 TYPE STRING,
TTFB305 TYPE STRING,
TTFB306 TYPE STRING,
TTFB307 TYPE STRING,
TTFB308 TYPE STRING,
TTFB309 TYPE STRING,
TTFB310 TYPE STRING,
TTFB311 TYPE STRING,
TTFB312 TYPE STRING,
TTFB401 TYPE STRING,
TTFB402 TYPE STRING,
TTFB403 TYPE STRING,
TTFB404 TYPE STRING,
TTFB405 TYPE STRING,
TTFB406 TYPE STRING,
TTFB407 TYPE STRING,
TTFB408 TYPE STRING,
TTFB409 TYPE STRING,
TTFB410 TYPE STRING,
TTFB411 TYPE STRING,
TTFB412 TYPE STRING,
TTKD0101 TYPE STRING,
TTKD0102 TYPE STRING,
TTKD0103 TYPE STRING,
TTKD0104 TYPE STRING,
TTKD0105 TYPE STRING,
TTKD0106 TYPE STRING,
TTKD0107 TYPE STRING,
TTKD0108 TYPE STRING,
TTKD0109 TYPE STRING,
TTKD0110 TYPE STRING,
TTKD0111 TYPE STRING,
TTKD0112 TYPE STRING,
TTKD0201 TYPE STRING,
TTKD0202 TYPE STRING,
TTKD0203 TYPE STRING,
TTKD0204 TYPE STRING,
TTKD0205 TYPE STRING,
TTKD0206 TYPE STRING,
TTKD0207 TYPE STRING,
TTKD0208 TYPE STRING,
TTKD0209 TYPE STRING,
TTKD0210 TYPE STRING,
TTKD0211 TYPE STRING,
TTKD0212 TYPE STRING,
TTKD0301 TYPE STRING,
TTKD0302 TYPE STRING,
TTKD0303 TYPE STRING,
TTKD0304 TYPE STRING,
TTKD0305 TYPE STRING,
TTKD0306 TYPE STRING,
TTKD0307 TYPE STRING,
TTKD0308 TYPE STRING,
TTKD0309 TYPE STRING,
TTKD0310 TYPE STRING,
TTKD0311 TYPE STRING,
TTKD0312 TYPE STRING,
TTKD0401 TYPE STRING,
TTKD0402 TYPE STRING,
TTKD0403 TYPE STRING,
TTKD0404 TYPE STRING,
TTKD0405 TYPE STRING,
TTKD0406 TYPE STRING,
TTKD0407 TYPE STRING,
TTKD0408 TYPE STRING,
TTKD0409 TYPE STRING,
TTKD0410 TYPE STRING,
TTKD0411 TYPE STRING,
TTKD0412 TYPE STRING,
TTKD0501 TYPE STRING,
TTKD0502 TYPE STRING,
TTKD0503 TYPE STRING,
TTKD0504 TYPE STRING,
TTKD0505 TYPE STRING,
TTKD0506 TYPE STRING,
TTKD0507 TYPE STRING,
TTKD0508 TYPE STRING,
TTKD0509 TYPE STRING,
TTKD0510 TYPE STRING,
TTKD0511 TYPE STRING,
TTKD0512 TYPE STRING,
TTKD0601 TYPE STRING,
TTKD0602 TYPE STRING,
TTKD0603 TYPE STRING,
TTKD0604 TYPE STRING,
TTKD0605 TYPE STRING,
TTKD0606 TYPE STRING,
TTKD0607 TYPE STRING,
TTKD0608 TYPE STRING,
TTKD0609 TYPE STRING,
TTKD0610 TYPE STRING,
TTKD0611 TYPE STRING,
TTKD0612 TYPE STRING,
TTKD0701 TYPE STRING,
TTKD0702 TYPE STRING,
TTKD0703 TYPE STRING,
TTKD0704 TYPE STRING,
TTKD0705 TYPE STRING,
TTKD0706 TYPE STRING,
TTKD0707 TYPE STRING,
TTKD0708 TYPE STRING,
TTKD0709 TYPE STRING,
TTKD0710 TYPE STRING,
TTKD0711 TYPE STRING,
TTKD0712 TYPE STRING,
TTKD0801 TYPE STRING,
TTKD0802 TYPE STRING,
TTKD0803 TYPE STRING,
TTKD0804 TYPE STRING,
TTKD0805 TYPE STRING,
TTKD0806 TYPE STRING,
TTKD0807 TYPE STRING,
TTKD0808 TYPE STRING,
TTKD0809 TYPE STRING,
TTKD0810 TYPE STRING,
TTKD0811 TYPE STRING,
TTKD0812 TYPE STRING,
TTKD0901 TYPE STRING,
TTKD0902 TYPE STRING,
TTKD0903 TYPE STRING,
TTKD0904 TYPE STRING,
TTKD0905 TYPE STRING,
TTKD0906 TYPE STRING,
TTKD0907 TYPE STRING,
TTKD0908 TYPE STRING,
TTKD0909 TYPE STRING,
TTKD0910 TYPE STRING,
TTKD0911 TYPE STRING,
TTKD0912 TYPE STRING,
TTKD1001 TYPE STRING,
TTKD1002 TYPE STRING,
TTKD1003 TYPE STRING,
TTKD1004 TYPE STRING,
TTKD1005 TYPE STRING,
TTKD1006 TYPE STRING,
TTKD1007 TYPE STRING,
TTKD1008 TYPE STRING,
TTKD1009 TYPE STRING,
TTKD1010 TYPE STRING,
TTKD1011 TYPE STRING,
TTKD1012 TYPE STRING,
DDPN TYPE STRING,
DDPZ_PRED TYPE STRING,
TTKGBD01 TYPE STRING,
TTKGBD02 TYPE STRING,
TTKGBD03 TYPE STRING,
TTKGBD04 TYPE STRING,
TTKGBD05 TYPE STRING,
TTKGBD06 TYPE STRING,
TTKGBD07 TYPE STRING,
TTKGBD08 TYPE STRING,
TTKGBD09 TYPE STRING,
TTKGBD10 TYPE STRING,END OF T_EKKO_STR.
DATA: WA_PA0257_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_PA0257_STR-MANDT sy-vline 
WA_PA0257_STR-PERNR sy-vline 
WA_PA0257_STR-SUBTY sy-vline 
WA_PA0257_STR-OBJPS sy-vline 
WA_PA0257_STR-SPRPS sy-vline 
WA_PA0257_STR-ENDDA sy-vline 
WA_PA0257_STR-BEGDA sy-vline 
WA_PA0257_STR-SEQNR sy-vline 
WA_PA0257_STR-AEDTM sy-vline 
WA_PA0257_STR-UNAME sy-vline 
WA_PA0257_STR-HISTO sy-vline 
WA_PA0257_STR-ITXEX sy-vline 
WA_PA0257_STR-REFEX sy-vline 
WA_PA0257_STR-ORDEX sy-vline 
WA_PA0257_STR-ITBLD sy-vline 
WA_PA0257_STR-PREAS sy-vline 
WA_PA0257_STR-FLAG1 sy-vline 
WA_PA0257_STR-FLAG2 sy-vline 
WA_PA0257_STR-FLAG3 sy-vline 
WA_PA0257_STR-FLAG4 sy-vline 
WA_PA0257_STR-RESE1 sy-vline 
WA_PA0257_STR-RESE2 sy-vline 
WA_PA0257_STR-GRPVL sy-vline 
WA_PA0257_STR-TTJJ sy-vline 
WA_PA0257_STR-TTJVSA sy-vline 
WA_PA0257_STR-TTJVSD sy-vline 
WA_PA0257_STR-TTFB5 sy-vline 
WA_PA0257_STR-TFB5N sy-vline 
WA_PA0257_STR-TTFB6 sy-vline 
WA_PA0257_STR-TFB6N sy-vline 
WA_PA0257_STR-WAERS sy-vline 
WA_PA0257_STR-TTFB7 sy-vline 
WA_PA0257_STR-TTFB8 sy-vline 
WA_PA0257_STR-TTFB9 sy-vline 
WA_PA0257_STR-TTFB10 sy-vline 
WA_PA0257_STR-TTFB11 sy-vline 
WA_PA0257_STR-TTFB12 sy-vline 
WA_PA0257_STR-AGPTX sy-vline 
WA_PA0257_STR-AGPTF sy-vline 
WA_PA0257_STR-FINC sy-vline 
WA_PA0257_STR-FINS sy-vline 
WA_PA0257_STR-TTFB13 sy-vline 
WA_PA0257_STR-TTFB101 sy-vline 
WA_PA0257_STR-TTFB102 sy-vline 
WA_PA0257_STR-TTFB103 sy-vline 
WA_PA0257_STR-TTFB104 sy-vline 
WA_PA0257_STR-TTFB105 sy-vline 
WA_PA0257_STR-TTFB106 sy-vline 
WA_PA0257_STR-TTFB107 sy-vline 
WA_PA0257_STR-TTFB108 sy-vline 
WA_PA0257_STR-TTFB109 sy-vline 
WA_PA0257_STR-TTFB110 sy-vline 
WA_PA0257_STR-TTFB111 sy-vline 
WA_PA0257_STR-TTFB112 sy-vline 
WA_PA0257_STR-TTFB201 sy-vline 
WA_PA0257_STR-TTFB202 sy-vline 
WA_PA0257_STR-TTFB203 sy-vline 
WA_PA0257_STR-TTFB204 sy-vline 
WA_PA0257_STR-TTFB205 sy-vline 
WA_PA0257_STR-TTFB206 sy-vline 
WA_PA0257_STR-TTFB207 sy-vline 
WA_PA0257_STR-TTFB208 sy-vline 
WA_PA0257_STR-TTFB209 sy-vline 
WA_PA0257_STR-TTFB210 sy-vline 
WA_PA0257_STR-TTFB211 sy-vline 
WA_PA0257_STR-TTFB212 sy-vline 
WA_PA0257_STR-TTFB301 sy-vline 
WA_PA0257_STR-TTFB302 sy-vline 
WA_PA0257_STR-TTFB303 sy-vline 
WA_PA0257_STR-TTFB304 sy-vline 
WA_PA0257_STR-TTFB305 sy-vline 
WA_PA0257_STR-TTFB306 sy-vline 
WA_PA0257_STR-TTFB307 sy-vline 
WA_PA0257_STR-TTFB308 sy-vline 
WA_PA0257_STR-TTFB309 sy-vline 
WA_PA0257_STR-TTFB310 sy-vline 
WA_PA0257_STR-TTFB311 sy-vline 
WA_PA0257_STR-TTFB312 sy-vline 
WA_PA0257_STR-TTFB401 sy-vline 
WA_PA0257_STR-TTFB402 sy-vline 
WA_PA0257_STR-TTFB403 sy-vline 
WA_PA0257_STR-TTFB404 sy-vline 
WA_PA0257_STR-TTFB405 sy-vline 
WA_PA0257_STR-TTFB406 sy-vline 
WA_PA0257_STR-TTFB407 sy-vline 
WA_PA0257_STR-TTFB408 sy-vline 
WA_PA0257_STR-TTFB409 sy-vline 
WA_PA0257_STR-TTFB410 sy-vline 
WA_PA0257_STR-TTFB411 sy-vline 
WA_PA0257_STR-TTFB412 sy-vline 
WA_PA0257_STR-TTKD0101 sy-vline 
WA_PA0257_STR-TTKD0102 sy-vline 
WA_PA0257_STR-TTKD0103 sy-vline 
WA_PA0257_STR-TTKD0104 sy-vline 
WA_PA0257_STR-TTKD0105 sy-vline 
WA_PA0257_STR-TTKD0106 sy-vline 
WA_PA0257_STR-TTKD0107 sy-vline 
WA_PA0257_STR-TTKD0108 sy-vline 
WA_PA0257_STR-TTKD0109 sy-vline 
WA_PA0257_STR-TTKD0110 sy-vline 
WA_PA0257_STR-TTKD0111 sy-vline 
WA_PA0257_STR-TTKD0112 sy-vline 
WA_PA0257_STR-TTKD0201 sy-vline 
WA_PA0257_STR-TTKD0202 sy-vline 
WA_PA0257_STR-TTKD0203 sy-vline 
WA_PA0257_STR-TTKD0204 sy-vline 
WA_PA0257_STR-TTKD0205 sy-vline 
WA_PA0257_STR-TTKD0206 sy-vline 
WA_PA0257_STR-TTKD0207 sy-vline 
WA_PA0257_STR-TTKD0208 sy-vline 
WA_PA0257_STR-TTKD0209 sy-vline 
WA_PA0257_STR-TTKD0210 sy-vline 
WA_PA0257_STR-TTKD0211 sy-vline 
WA_PA0257_STR-TTKD0212 sy-vline 
WA_PA0257_STR-TTKD0301 sy-vline 
WA_PA0257_STR-TTKD0302 sy-vline 
WA_PA0257_STR-TTKD0303 sy-vline 
WA_PA0257_STR-TTKD0304 sy-vline 
WA_PA0257_STR-TTKD0305 sy-vline 
WA_PA0257_STR-TTKD0306 sy-vline 
WA_PA0257_STR-TTKD0307 sy-vline 
WA_PA0257_STR-TTKD0308 sy-vline 
WA_PA0257_STR-TTKD0309 sy-vline 
WA_PA0257_STR-TTKD0310 sy-vline 
WA_PA0257_STR-TTKD0311 sy-vline 
WA_PA0257_STR-TTKD0312 sy-vline 
WA_PA0257_STR-TTKD0401 sy-vline 
WA_PA0257_STR-TTKD0402 sy-vline 
WA_PA0257_STR-TTKD0403 sy-vline 
WA_PA0257_STR-TTKD0404 sy-vline 
WA_PA0257_STR-TTKD0405 sy-vline 
WA_PA0257_STR-TTKD0406 sy-vline 
WA_PA0257_STR-TTKD0407 sy-vline 
WA_PA0257_STR-TTKD0408 sy-vline 
WA_PA0257_STR-TTKD0409 sy-vline 
WA_PA0257_STR-TTKD0410 sy-vline 
WA_PA0257_STR-TTKD0411 sy-vline 
WA_PA0257_STR-TTKD0412 sy-vline 
WA_PA0257_STR-TTKD0501 sy-vline 
WA_PA0257_STR-TTKD0502 sy-vline 
WA_PA0257_STR-TTKD0503 sy-vline 
WA_PA0257_STR-TTKD0504 sy-vline 
WA_PA0257_STR-TTKD0505 sy-vline 
WA_PA0257_STR-TTKD0506 sy-vline 
WA_PA0257_STR-TTKD0507 sy-vline 
WA_PA0257_STR-TTKD0508 sy-vline 
WA_PA0257_STR-TTKD0509 sy-vline 
WA_PA0257_STR-TTKD0510 sy-vline 
WA_PA0257_STR-TTKD0511 sy-vline 
WA_PA0257_STR-TTKD0512 sy-vline 
WA_PA0257_STR-TTKD0601 sy-vline 
WA_PA0257_STR-TTKD0602 sy-vline 
WA_PA0257_STR-TTKD0603 sy-vline 
WA_PA0257_STR-TTKD0604 sy-vline 
WA_PA0257_STR-TTKD0605 sy-vline 
WA_PA0257_STR-TTKD0606 sy-vline 
WA_PA0257_STR-TTKD0607 sy-vline 
WA_PA0257_STR-TTKD0608 sy-vline 
WA_PA0257_STR-TTKD0609 sy-vline 
WA_PA0257_STR-TTKD0610 sy-vline 
WA_PA0257_STR-TTKD0611 sy-vline 
WA_PA0257_STR-TTKD0612 sy-vline 
WA_PA0257_STR-TTKD0701 sy-vline 
WA_PA0257_STR-TTKD0702 sy-vline 
WA_PA0257_STR-TTKD0703 sy-vline 
WA_PA0257_STR-TTKD0704 sy-vline 
WA_PA0257_STR-TTKD0705 sy-vline 
WA_PA0257_STR-TTKD0706 sy-vline 
WA_PA0257_STR-TTKD0707 sy-vline 
WA_PA0257_STR-TTKD0708 sy-vline 
WA_PA0257_STR-TTKD0709 sy-vline 
WA_PA0257_STR-TTKD0710 sy-vline 
WA_PA0257_STR-TTKD0711 sy-vline 
WA_PA0257_STR-TTKD0712 sy-vline 
WA_PA0257_STR-TTKD0801 sy-vline 
WA_PA0257_STR-TTKD0802 sy-vline 
WA_PA0257_STR-TTKD0803 sy-vline 
WA_PA0257_STR-TTKD0804 sy-vline 
WA_PA0257_STR-TTKD0805 sy-vline 
WA_PA0257_STR-TTKD0806 sy-vline 
WA_PA0257_STR-TTKD0807 sy-vline 
WA_PA0257_STR-TTKD0808 sy-vline 
WA_PA0257_STR-TTKD0809 sy-vline 
WA_PA0257_STR-TTKD0810 sy-vline 
WA_PA0257_STR-TTKD0811 sy-vline 
WA_PA0257_STR-TTKD0812 sy-vline 
WA_PA0257_STR-TTKD0901 sy-vline 
WA_PA0257_STR-TTKD0902 sy-vline 
WA_PA0257_STR-TTKD0903 sy-vline 
WA_PA0257_STR-TTKD0904 sy-vline 
WA_PA0257_STR-TTKD0905 sy-vline 
WA_PA0257_STR-TTKD0906 sy-vline 
WA_PA0257_STR-TTKD0907 sy-vline 
WA_PA0257_STR-TTKD0908 sy-vline 
WA_PA0257_STR-TTKD0909 sy-vline 
WA_PA0257_STR-TTKD0910 sy-vline 
WA_PA0257_STR-TTKD0911 sy-vline 
WA_PA0257_STR-TTKD0912 sy-vline 
WA_PA0257_STR-TTKD1001 sy-vline 
WA_PA0257_STR-TTKD1002 sy-vline 
WA_PA0257_STR-TTKD1003 sy-vline 
WA_PA0257_STR-TTKD1004 sy-vline 
WA_PA0257_STR-TTKD1005 sy-vline 
WA_PA0257_STR-TTKD1006 sy-vline 
WA_PA0257_STR-TTKD1007 sy-vline 
WA_PA0257_STR-TTKD1008 sy-vline 
WA_PA0257_STR-TTKD1009 sy-vline 
WA_PA0257_STR-TTKD1010 sy-vline 
WA_PA0257_STR-TTKD1011 sy-vline 
WA_PA0257_STR-TTKD1012 sy-vline 
WA_PA0257_STR-DDPN sy-vline 
WA_PA0257_STR-DDPZ_PRED sy-vline 
WA_PA0257_STR-TTKGBD01 sy-vline 
WA_PA0257_STR-TTKGBD02 sy-vline 
WA_PA0257_STR-TTKGBD03 sy-vline 
WA_PA0257_STR-TTKGBD04 sy-vline 
WA_PA0257_STR-TTKGBD05 sy-vline 
WA_PA0257_STR-TTKGBD06 sy-vline 
WA_PA0257_STR-TTKGBD07 sy-vline 
WA_PA0257_STR-TTKGBD08 sy-vline 
WA_PA0257_STR-TTKGBD09 sy-vline 
WA_PA0257_STR-TTKGBD10 sy-vline      INTO ld_text SEPARATED BY SPACE.

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