ABAP Select data from SAP table PMY_FORM_TP1 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 PMY_FORM_TP1 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 PMY_FORM_TP1. 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 PMY_FORM_TP1 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_PMY_FORM_TP1 TYPE STANDARD TABLE OF PMY_FORM_TP1,
      WA_PMY_FORM_TP1 TYPE PMY_FORM_TP1,
      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: <PMY_FORM_TP1> TYPE PMY_FORM_TP1.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM PMY_FORM_TP1
*  INTO TABLE @DATA(IT_PMY_FORM_TP12).
*--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_PMY_FORM_TP1 INDEX 1 INTO DATA(WA_PMY_FORM_TP12).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<PMY_FORM_TP1>-DEBEG = 1.
<PMY_FORM_TP1>-DEEND = 1.
<PMY_FORM_TP1>-DEDMN = 1.
<PMY_FORM_TP1>-DEDYR = 1.
<PMY_FORM_TP1>-ERNAM = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_PMY_FORM_TP1-ERNM2, sy-vline,
  WA_PMY_FORM_TP1-ERTXN, sy-vline,
  WA_PMY_FORM_TP1-EENAM, sy-vline,
  WA_PMY_FORM_TP1-EENM2, sy-vline,
  WA_PMY_FORM_TP1-ICNUM, sy-vline,
  WA_PMY_FORM_TP1-PTNUM, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_PMY_FORM_TP1 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_PMY_FORM_TP1 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_PMY_FORM_TP1 INTO WA_PMY_FORM_TP1.


*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_PMY_FORM_TP1_STR, 
DEBEG TYPE STRING,
DEEND TYPE STRING,
DEDMN TYPE STRING,
DEDYR TYPE STRING,
ERNAM TYPE STRING,
ERNM2 TYPE STRING,
ERTXN TYPE STRING,
EENAM TYPE STRING,
EENM2 TYPE STRING,
ICNUM TYPE STRING,
PTNUM TYPE STRING,
EETXN TYPE STRING,
EMPNO TYPE STRING,
TXTYP TYPE STRING,
TNOEE TYPE STRING,
TNOER TYPE STRING,
TXOFF TYPE STRING,
WIFWS TYPE STRING,
NUMCH TYPE STRING,
MARST TYPE STRING,
TXEMR TYPE STRING,
TAXOP TYPE STRING,
TCTGF TYPE STRING,
EXCUR TYPE STRING,
MEDPR TYPE STRING,
EQDIS TYPE STRING,
SFDIS TYPE STRING,
SPDIS TYPE STRING,
EDFEE TYPE STRING,
MEDSD TYPE STRING,
MEDEX TYPE STRING,
BKALW TYPE STRING,
PCALW TYPE STRING,
DSSPN TYPE STRING,
SPCTR TYPE STRING,
ALIMY TYPE STRING,
LFINS TYPE STRING,
EDMIN TYPE STRING,
ZKDED TYPE STRING,
TEMPE TYPE STRING,
GRREN TYPE STRING,
TOTPF TYPE STRING,
PRSTD TYPE STRING,
RELIF TYPE STRING,
ASPRE TYPE STRING,
HSLIN TYPE STRING,
BRBSF TYPE STRING,
DISSF TYPE STRING,
DISSP TYPE STRING,
EECAT TYPE STRING,
PENTP TYPE STRING,
SOCPY TYPE STRING,
PARCA TYPE STRING,
PARCM TYPE STRING,
LIFES TYPE STRING,
BREAS TYPE STRING,
CHIDC TYPE STRING,
DOMTU TYPE STRING,
HPNBT TYPE STRING,
NUCHH TYPE STRING,
TXTYP2 TYPE STRING,
TNOEE2 TYPE STRING,
TNOER2 TYPE STRING,
TXOFF2 TYPE STRING,
WIFWS2 TYPE STRING,
NUMCH2 TYPE STRING,
MARST2 TYPE STRING,
TXEMR2 TYPE STRING,
TAXOP2 TYPE STRING,
TCTGF2 TYPE STRING,
EXCUR2 TYPE STRING,
MEDPR2 TYPE STRING,
EQDIS2 TYPE STRING,
SFDIS2 TYPE STRING,
SPDIS2 TYPE STRING,
EDFEE2 TYPE STRING,
MEDSD2 TYPE STRING,
MEDEX2 TYPE STRING,
BKALW2 TYPE STRING,
PCALW2 TYPE STRING,
DSSPN2 TYPE STRING,
SPCTR2 TYPE STRING,
ALIMY2 TYPE STRING,
LFINS2 TYPE STRING,
EDMIN2 TYPE STRING,
ZKDED2 TYPE STRING,
TEMPE2 TYPE STRING,
GRREN2 TYPE STRING,
TOTPF2 TYPE STRING,
PRSTD2 TYPE STRING,
RELIF2 TYPE STRING,
ASPRE2 TYPE STRING,
HSLIN2 TYPE STRING,
BRBSF2 TYPE STRING,
DISSF2 TYPE STRING,
DISSP2 TYPE STRING,
EECAT2 TYPE STRING,
PENTP2 TYPE STRING,
SOCPY2 TYPE STRING,
PARCA2 TYPE STRING,
PARCM2 TYPE STRING,
LIFES2 TYPE STRING,
BREAS2 TYPE STRING,
CHIDC2 TYPE STRING,
DOMTU2 TYPE STRING,
HPNBT2 TYPE STRING,
NUCHH2 TYPE STRING,
TXTYP3 TYPE STRING,
TNOEE3 TYPE STRING,
TNOER3 TYPE STRING,
TXOFF3 TYPE STRING,
WIFWS3 TYPE STRING,
NUMCH3 TYPE STRING,
MARST3 TYPE STRING,
TXEMR3 TYPE STRING,
TAXOP3 TYPE STRING,
TCTGF3 TYPE STRING,
EXCUR3 TYPE STRING,
MEDPR3 TYPE STRING,
EQDIS3 TYPE STRING,
SFDIS3 TYPE STRING,
SPDIS3 TYPE STRING,
EDFEE3 TYPE STRING,
MEDSD3 TYPE STRING,
MEDEX3 TYPE STRING,
BKALW3 TYPE STRING,
PCALW3 TYPE STRING,
DSSPN3 TYPE STRING,
SPCTR3 TYPE STRING,
ALIMY3 TYPE STRING,
LFINS3 TYPE STRING,
EDMIN3 TYPE STRING,
ZKDED3 TYPE STRING,
TEMPE3 TYPE STRING,
GRREN3 TYPE STRING,
TOTPF3 TYPE STRING,
PRSTD3 TYPE STRING,
RELIF3 TYPE STRING,
ASPRE3 TYPE STRING,
HSLIN3 TYPE STRING,
BRBSF3 TYPE STRING,
DISSF3 TYPE STRING,
DISSP3 TYPE STRING,
EECAT3 TYPE STRING,
PENTP3 TYPE STRING,
SOCPY3 TYPE STRING,
PARCA3 TYPE STRING,
PARCM3 TYPE STRING,
LIFES3 TYPE STRING,
BREAS3 TYPE STRING,
CHIDC3 TYPE STRING,
DOMTU3 TYPE STRING,
HPNBT3 TYPE STRING,
NUCHH3 TYPE STRING,
TXTYP4 TYPE STRING,
TNOEE4 TYPE STRING,
TNOER4 TYPE STRING,
TXOFF4 TYPE STRING,
WIFWS4 TYPE STRING,
NUMCH4 TYPE STRING,
MARST4 TYPE STRING,
TXEMR4 TYPE STRING,
TAXOP4 TYPE STRING,
TCTGF4 TYPE STRING,
EXCUR4 TYPE STRING,
MEDPR4 TYPE STRING,
EQDIS4 TYPE STRING,
SFDIS4 TYPE STRING,
SPDIS4 TYPE STRING,
EDFEE4 TYPE STRING,
MEDSD4 TYPE STRING,
MEDEX4 TYPE STRING,
BKALW4 TYPE STRING,
PCALW4 TYPE STRING,
DSSPN4 TYPE STRING,
SPCTR4 TYPE STRING,
ALIMY4 TYPE STRING,
LFINS4 TYPE STRING,
EDMIN4 TYPE STRING,
ZKDED4 TYPE STRING,
TEMPE4 TYPE STRING,
GRREN4 TYPE STRING,
TOTPF4 TYPE STRING,
PRSTD4 TYPE STRING,
RELIF4 TYPE STRING,
ASPRE4 TYPE STRING,
HSLIN4 TYPE STRING,
BRBSF4 TYPE STRING,
DISSF4 TYPE STRING,
DISSP4 TYPE STRING,
EECAT4 TYPE STRING,
PENTP4 TYPE STRING,
SOCPY4 TYPE STRING,
PARCA4 TYPE STRING,
PARCM4 TYPE STRING,
LIFES4 TYPE STRING,
BREAS4 TYPE STRING,
CHIDC4 TYPE STRING,
DOMTU4 TYPE STRING,
HPNBT4 TYPE STRING,
NUCHH4 TYPE STRING,
ZAKAT TYPE STRING,
MEDA1 TYPE STRING,
MEDA2 TYPE STRING,
EEDT1 TYPE STRING,
EEDT2 TYPE STRING,
EEDT3 TYPE STRING,
ERDT1 TYPE STRING,
ERDT2 TYPE STRING,
ERDT3 TYPE STRING,
SIGEE TYPE STRING,
SIGMN TYPE STRING,
SIGYR TYPE STRING,
SIGER TYPE STRING,
SIGJB TYPE STRING,
SIGDR 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,
LGART TYPE STRING,
OPKEN TYPE STRING,
BETRG TYPE STRING,
WAERS TYPE STRING,
ANZHL TYPE STRING,
ZEINH TYPE STRING,
INDBW TYPE STRING,
ZDATE TYPE STRING,
ZFPER TYPE STRING,
ZANZL TYPE STRING,
ZEINZ TYPE STRING,
ZUORD TYPE STRING,
UWDAT TYPE STRING,
MODEL TYPE STRING,
LFIN0 TYPE STRING,
LFIPS TYPE STRING,
LFIPS2 TYPE STRING,
LFIPS3 TYPE STRING,
LFIPS4 TYPE STRING,
HEADT TYPE STRING,
ENDTX TYPE STRING,
QFLD1 TYPE STRING,
QFLD2 TYPE STRING,
QFLD3 TYPE STRING,
QFLD4 TYPE STRING,
QFLD5 TYPE STRING,END OF T_EKKO_STR.
DATA: WA_PMY_FORM_TP1_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_PMY_FORM_TP1_STR-DEBEG sy-vline 
WA_PMY_FORM_TP1_STR-DEEND sy-vline 
WA_PMY_FORM_TP1_STR-DEDMN sy-vline 
WA_PMY_FORM_TP1_STR-DEDYR sy-vline 
WA_PMY_FORM_TP1_STR-ERNAM sy-vline 
WA_PMY_FORM_TP1_STR-ERNM2 sy-vline 
WA_PMY_FORM_TP1_STR-ERTXN sy-vline 
WA_PMY_FORM_TP1_STR-EENAM sy-vline 
WA_PMY_FORM_TP1_STR-EENM2 sy-vline 
WA_PMY_FORM_TP1_STR-ICNUM sy-vline 
WA_PMY_FORM_TP1_STR-PTNUM sy-vline 
WA_PMY_FORM_TP1_STR-EETXN sy-vline 
WA_PMY_FORM_TP1_STR-EMPNO sy-vline 
WA_PMY_FORM_TP1_STR-TXTYP sy-vline 
WA_PMY_FORM_TP1_STR-TNOEE sy-vline 
WA_PMY_FORM_TP1_STR-TNOER sy-vline 
WA_PMY_FORM_TP1_STR-TXOFF sy-vline 
WA_PMY_FORM_TP1_STR-WIFWS sy-vline 
WA_PMY_FORM_TP1_STR-NUMCH sy-vline 
WA_PMY_FORM_TP1_STR-MARST sy-vline 
WA_PMY_FORM_TP1_STR-TXEMR sy-vline 
WA_PMY_FORM_TP1_STR-TAXOP sy-vline 
WA_PMY_FORM_TP1_STR-TCTGF sy-vline 
WA_PMY_FORM_TP1_STR-EXCUR sy-vline 
WA_PMY_FORM_TP1_STR-MEDPR sy-vline 
WA_PMY_FORM_TP1_STR-EQDIS sy-vline 
WA_PMY_FORM_TP1_STR-SFDIS sy-vline 
WA_PMY_FORM_TP1_STR-SPDIS sy-vline 
WA_PMY_FORM_TP1_STR-EDFEE sy-vline 
WA_PMY_FORM_TP1_STR-MEDSD sy-vline 
WA_PMY_FORM_TP1_STR-MEDEX sy-vline 
WA_PMY_FORM_TP1_STR-BKALW sy-vline 
WA_PMY_FORM_TP1_STR-PCALW sy-vline 
WA_PMY_FORM_TP1_STR-DSSPN sy-vline 
WA_PMY_FORM_TP1_STR-SPCTR sy-vline 
WA_PMY_FORM_TP1_STR-ALIMY sy-vline 
WA_PMY_FORM_TP1_STR-LFINS sy-vline 
WA_PMY_FORM_TP1_STR-EDMIN sy-vline 
WA_PMY_FORM_TP1_STR-ZKDED sy-vline 
WA_PMY_FORM_TP1_STR-TEMPE sy-vline 
WA_PMY_FORM_TP1_STR-GRREN sy-vline 
WA_PMY_FORM_TP1_STR-TOTPF sy-vline 
WA_PMY_FORM_TP1_STR-PRSTD sy-vline 
WA_PMY_FORM_TP1_STR-RELIF sy-vline 
WA_PMY_FORM_TP1_STR-ASPRE sy-vline 
WA_PMY_FORM_TP1_STR-HSLIN sy-vline 
WA_PMY_FORM_TP1_STR-BRBSF sy-vline 
WA_PMY_FORM_TP1_STR-DISSF sy-vline 
WA_PMY_FORM_TP1_STR-DISSP sy-vline 
WA_PMY_FORM_TP1_STR-EECAT sy-vline 
WA_PMY_FORM_TP1_STR-PENTP sy-vline 
WA_PMY_FORM_TP1_STR-SOCPY sy-vline 
WA_PMY_FORM_TP1_STR-PARCA sy-vline 
WA_PMY_FORM_TP1_STR-PARCM sy-vline 
WA_PMY_FORM_TP1_STR-LIFES sy-vline 
WA_PMY_FORM_TP1_STR-BREAS sy-vline 
WA_PMY_FORM_TP1_STR-CHIDC sy-vline 
WA_PMY_FORM_TP1_STR-DOMTU sy-vline 
WA_PMY_FORM_TP1_STR-HPNBT sy-vline 
WA_PMY_FORM_TP1_STR-NUCHH sy-vline 
WA_PMY_FORM_TP1_STR-TXTYP2 sy-vline 
WA_PMY_FORM_TP1_STR-TNOEE2 sy-vline 
WA_PMY_FORM_TP1_STR-TNOER2 sy-vline 
WA_PMY_FORM_TP1_STR-TXOFF2 sy-vline 
WA_PMY_FORM_TP1_STR-WIFWS2 sy-vline 
WA_PMY_FORM_TP1_STR-NUMCH2 sy-vline 
WA_PMY_FORM_TP1_STR-MARST2 sy-vline 
WA_PMY_FORM_TP1_STR-TXEMR2 sy-vline 
WA_PMY_FORM_TP1_STR-TAXOP2 sy-vline 
WA_PMY_FORM_TP1_STR-TCTGF2 sy-vline 
WA_PMY_FORM_TP1_STR-EXCUR2 sy-vline 
WA_PMY_FORM_TP1_STR-MEDPR2 sy-vline 
WA_PMY_FORM_TP1_STR-EQDIS2 sy-vline 
WA_PMY_FORM_TP1_STR-SFDIS2 sy-vline 
WA_PMY_FORM_TP1_STR-SPDIS2 sy-vline 
WA_PMY_FORM_TP1_STR-EDFEE2 sy-vline 
WA_PMY_FORM_TP1_STR-MEDSD2 sy-vline 
WA_PMY_FORM_TP1_STR-MEDEX2 sy-vline 
WA_PMY_FORM_TP1_STR-BKALW2 sy-vline 
WA_PMY_FORM_TP1_STR-PCALW2 sy-vline 
WA_PMY_FORM_TP1_STR-DSSPN2 sy-vline 
WA_PMY_FORM_TP1_STR-SPCTR2 sy-vline 
WA_PMY_FORM_TP1_STR-ALIMY2 sy-vline 
WA_PMY_FORM_TP1_STR-LFINS2 sy-vline 
WA_PMY_FORM_TP1_STR-EDMIN2 sy-vline 
WA_PMY_FORM_TP1_STR-ZKDED2 sy-vline 
WA_PMY_FORM_TP1_STR-TEMPE2 sy-vline 
WA_PMY_FORM_TP1_STR-GRREN2 sy-vline 
WA_PMY_FORM_TP1_STR-TOTPF2 sy-vline 
WA_PMY_FORM_TP1_STR-PRSTD2 sy-vline 
WA_PMY_FORM_TP1_STR-RELIF2 sy-vline 
WA_PMY_FORM_TP1_STR-ASPRE2 sy-vline 
WA_PMY_FORM_TP1_STR-HSLIN2 sy-vline 
WA_PMY_FORM_TP1_STR-BRBSF2 sy-vline 
WA_PMY_FORM_TP1_STR-DISSF2 sy-vline 
WA_PMY_FORM_TP1_STR-DISSP2 sy-vline 
WA_PMY_FORM_TP1_STR-EECAT2 sy-vline 
WA_PMY_FORM_TP1_STR-PENTP2 sy-vline 
WA_PMY_FORM_TP1_STR-SOCPY2 sy-vline 
WA_PMY_FORM_TP1_STR-PARCA2 sy-vline 
WA_PMY_FORM_TP1_STR-PARCM2 sy-vline 
WA_PMY_FORM_TP1_STR-LIFES2 sy-vline 
WA_PMY_FORM_TP1_STR-BREAS2 sy-vline 
WA_PMY_FORM_TP1_STR-CHIDC2 sy-vline 
WA_PMY_FORM_TP1_STR-DOMTU2 sy-vline 
WA_PMY_FORM_TP1_STR-HPNBT2 sy-vline 
WA_PMY_FORM_TP1_STR-NUCHH2 sy-vline 
WA_PMY_FORM_TP1_STR-TXTYP3 sy-vline 
WA_PMY_FORM_TP1_STR-TNOEE3 sy-vline 
WA_PMY_FORM_TP1_STR-TNOER3 sy-vline 
WA_PMY_FORM_TP1_STR-TXOFF3 sy-vline 
WA_PMY_FORM_TP1_STR-WIFWS3 sy-vline 
WA_PMY_FORM_TP1_STR-NUMCH3 sy-vline 
WA_PMY_FORM_TP1_STR-MARST3 sy-vline 
WA_PMY_FORM_TP1_STR-TXEMR3 sy-vline 
WA_PMY_FORM_TP1_STR-TAXOP3 sy-vline 
WA_PMY_FORM_TP1_STR-TCTGF3 sy-vline 
WA_PMY_FORM_TP1_STR-EXCUR3 sy-vline 
WA_PMY_FORM_TP1_STR-MEDPR3 sy-vline 
WA_PMY_FORM_TP1_STR-EQDIS3 sy-vline 
WA_PMY_FORM_TP1_STR-SFDIS3 sy-vline 
WA_PMY_FORM_TP1_STR-SPDIS3 sy-vline 
WA_PMY_FORM_TP1_STR-EDFEE3 sy-vline 
WA_PMY_FORM_TP1_STR-MEDSD3 sy-vline 
WA_PMY_FORM_TP1_STR-MEDEX3 sy-vline 
WA_PMY_FORM_TP1_STR-BKALW3 sy-vline 
WA_PMY_FORM_TP1_STR-PCALW3 sy-vline 
WA_PMY_FORM_TP1_STR-DSSPN3 sy-vline 
WA_PMY_FORM_TP1_STR-SPCTR3 sy-vline 
WA_PMY_FORM_TP1_STR-ALIMY3 sy-vline 
WA_PMY_FORM_TP1_STR-LFINS3 sy-vline 
WA_PMY_FORM_TP1_STR-EDMIN3 sy-vline 
WA_PMY_FORM_TP1_STR-ZKDED3 sy-vline 
WA_PMY_FORM_TP1_STR-TEMPE3 sy-vline 
WA_PMY_FORM_TP1_STR-GRREN3 sy-vline 
WA_PMY_FORM_TP1_STR-TOTPF3 sy-vline 
WA_PMY_FORM_TP1_STR-PRSTD3 sy-vline 
WA_PMY_FORM_TP1_STR-RELIF3 sy-vline 
WA_PMY_FORM_TP1_STR-ASPRE3 sy-vline 
WA_PMY_FORM_TP1_STR-HSLIN3 sy-vline 
WA_PMY_FORM_TP1_STR-BRBSF3 sy-vline 
WA_PMY_FORM_TP1_STR-DISSF3 sy-vline 
WA_PMY_FORM_TP1_STR-DISSP3 sy-vline 
WA_PMY_FORM_TP1_STR-EECAT3 sy-vline 
WA_PMY_FORM_TP1_STR-PENTP3 sy-vline 
WA_PMY_FORM_TP1_STR-SOCPY3 sy-vline 
WA_PMY_FORM_TP1_STR-PARCA3 sy-vline 
WA_PMY_FORM_TP1_STR-PARCM3 sy-vline 
WA_PMY_FORM_TP1_STR-LIFES3 sy-vline 
WA_PMY_FORM_TP1_STR-BREAS3 sy-vline 
WA_PMY_FORM_TP1_STR-CHIDC3 sy-vline 
WA_PMY_FORM_TP1_STR-DOMTU3 sy-vline 
WA_PMY_FORM_TP1_STR-HPNBT3 sy-vline 
WA_PMY_FORM_TP1_STR-NUCHH3 sy-vline 
WA_PMY_FORM_TP1_STR-TXTYP4 sy-vline 
WA_PMY_FORM_TP1_STR-TNOEE4 sy-vline 
WA_PMY_FORM_TP1_STR-TNOER4 sy-vline 
WA_PMY_FORM_TP1_STR-TXOFF4 sy-vline 
WA_PMY_FORM_TP1_STR-WIFWS4 sy-vline 
WA_PMY_FORM_TP1_STR-NUMCH4 sy-vline 
WA_PMY_FORM_TP1_STR-MARST4 sy-vline 
WA_PMY_FORM_TP1_STR-TXEMR4 sy-vline 
WA_PMY_FORM_TP1_STR-TAXOP4 sy-vline 
WA_PMY_FORM_TP1_STR-TCTGF4 sy-vline 
WA_PMY_FORM_TP1_STR-EXCUR4 sy-vline 
WA_PMY_FORM_TP1_STR-MEDPR4 sy-vline 
WA_PMY_FORM_TP1_STR-EQDIS4 sy-vline 
WA_PMY_FORM_TP1_STR-SFDIS4 sy-vline 
WA_PMY_FORM_TP1_STR-SPDIS4 sy-vline 
WA_PMY_FORM_TP1_STR-EDFEE4 sy-vline 
WA_PMY_FORM_TP1_STR-MEDSD4 sy-vline 
WA_PMY_FORM_TP1_STR-MEDEX4 sy-vline 
WA_PMY_FORM_TP1_STR-BKALW4 sy-vline 
WA_PMY_FORM_TP1_STR-PCALW4 sy-vline 
WA_PMY_FORM_TP1_STR-DSSPN4 sy-vline 
WA_PMY_FORM_TP1_STR-SPCTR4 sy-vline 
WA_PMY_FORM_TP1_STR-ALIMY4 sy-vline 
WA_PMY_FORM_TP1_STR-LFINS4 sy-vline 
WA_PMY_FORM_TP1_STR-EDMIN4 sy-vline 
WA_PMY_FORM_TP1_STR-ZKDED4 sy-vline 
WA_PMY_FORM_TP1_STR-TEMPE4 sy-vline 
WA_PMY_FORM_TP1_STR-GRREN4 sy-vline 
WA_PMY_FORM_TP1_STR-TOTPF4 sy-vline 
WA_PMY_FORM_TP1_STR-PRSTD4 sy-vline 
WA_PMY_FORM_TP1_STR-RELIF4 sy-vline 
WA_PMY_FORM_TP1_STR-ASPRE4 sy-vline 
WA_PMY_FORM_TP1_STR-HSLIN4 sy-vline 
WA_PMY_FORM_TP1_STR-BRBSF4 sy-vline 
WA_PMY_FORM_TP1_STR-DISSF4 sy-vline 
WA_PMY_FORM_TP1_STR-DISSP4 sy-vline 
WA_PMY_FORM_TP1_STR-EECAT4 sy-vline 
WA_PMY_FORM_TP1_STR-PENTP4 sy-vline 
WA_PMY_FORM_TP1_STR-SOCPY4 sy-vline 
WA_PMY_FORM_TP1_STR-PARCA4 sy-vline 
WA_PMY_FORM_TP1_STR-PARCM4 sy-vline 
WA_PMY_FORM_TP1_STR-LIFES4 sy-vline 
WA_PMY_FORM_TP1_STR-BREAS4 sy-vline 
WA_PMY_FORM_TP1_STR-CHIDC4 sy-vline 
WA_PMY_FORM_TP1_STR-DOMTU4 sy-vline 
WA_PMY_FORM_TP1_STR-HPNBT4 sy-vline 
WA_PMY_FORM_TP1_STR-NUCHH4 sy-vline 
WA_PMY_FORM_TP1_STR-ZAKAT sy-vline 
WA_PMY_FORM_TP1_STR-MEDA1 sy-vline 
WA_PMY_FORM_TP1_STR-MEDA2 sy-vline 
WA_PMY_FORM_TP1_STR-EEDT1 sy-vline 
WA_PMY_FORM_TP1_STR-EEDT2 sy-vline 
WA_PMY_FORM_TP1_STR-EEDT3 sy-vline 
WA_PMY_FORM_TP1_STR-ERDT1 sy-vline 
WA_PMY_FORM_TP1_STR-ERDT2 sy-vline 
WA_PMY_FORM_TP1_STR-ERDT3 sy-vline 
WA_PMY_FORM_TP1_STR-SIGEE sy-vline 
WA_PMY_FORM_TP1_STR-SIGMN sy-vline 
WA_PMY_FORM_TP1_STR-SIGYR sy-vline 
WA_PMY_FORM_TP1_STR-SIGER sy-vline 
WA_PMY_FORM_TP1_STR-SIGJB sy-vline 
WA_PMY_FORM_TP1_STR-SIGDR sy-vline 
WA_PMY_FORM_TP1_STR-PERNR sy-vline 
WA_PMY_FORM_TP1_STR-SUBTY sy-vline 
WA_PMY_FORM_TP1_STR-OBJPS sy-vline 
WA_PMY_FORM_TP1_STR-SPRPS sy-vline 
WA_PMY_FORM_TP1_STR-ENDDA sy-vline 
WA_PMY_FORM_TP1_STR-BEGDA sy-vline 
WA_PMY_FORM_TP1_STR-SEQNR sy-vline 
WA_PMY_FORM_TP1_STR-AEDTM sy-vline 
WA_PMY_FORM_TP1_STR-UNAME sy-vline 
WA_PMY_FORM_TP1_STR-HISTO sy-vline 
WA_PMY_FORM_TP1_STR-ITXEX sy-vline 
WA_PMY_FORM_TP1_STR-REFEX sy-vline 
WA_PMY_FORM_TP1_STR-ORDEX sy-vline 
WA_PMY_FORM_TP1_STR-ITBLD sy-vline 
WA_PMY_FORM_TP1_STR-PREAS sy-vline 
WA_PMY_FORM_TP1_STR-FLAG1 sy-vline 
WA_PMY_FORM_TP1_STR-FLAG2 sy-vline 
WA_PMY_FORM_TP1_STR-FLAG3 sy-vline 
WA_PMY_FORM_TP1_STR-FLAG4 sy-vline 
WA_PMY_FORM_TP1_STR-RESE1 sy-vline 
WA_PMY_FORM_TP1_STR-RESE2 sy-vline 
WA_PMY_FORM_TP1_STR-GRPVL sy-vline 
WA_PMY_FORM_TP1_STR-LGART sy-vline 
WA_PMY_FORM_TP1_STR-OPKEN sy-vline 
WA_PMY_FORM_TP1_STR-BETRG sy-vline 
WA_PMY_FORM_TP1_STR-WAERS sy-vline 
WA_PMY_FORM_TP1_STR-ANZHL sy-vline 
WA_PMY_FORM_TP1_STR-ZEINH sy-vline 
WA_PMY_FORM_TP1_STR-INDBW sy-vline 
WA_PMY_FORM_TP1_STR-ZDATE sy-vline 
WA_PMY_FORM_TP1_STR-ZFPER sy-vline 
WA_PMY_FORM_TP1_STR-ZANZL sy-vline 
WA_PMY_FORM_TP1_STR-ZEINZ sy-vline 
WA_PMY_FORM_TP1_STR-ZUORD sy-vline 
WA_PMY_FORM_TP1_STR-UWDAT sy-vline 
WA_PMY_FORM_TP1_STR-MODEL sy-vline 
WA_PMY_FORM_TP1_STR-LFIN0 sy-vline 
WA_PMY_FORM_TP1_STR-LFIPS sy-vline 
WA_PMY_FORM_TP1_STR-LFIPS2 sy-vline 
WA_PMY_FORM_TP1_STR-LFIPS3 sy-vline 
WA_PMY_FORM_TP1_STR-LFIPS4 sy-vline 
WA_PMY_FORM_TP1_STR-HEADT sy-vline 
WA_PMY_FORM_TP1_STR-ENDTX sy-vline 
WA_PMY_FORM_TP1_STR-QFLD1 sy-vline 
WA_PMY_FORM_TP1_STR-QFLD2 sy-vline 
WA_PMY_FORM_TP1_STR-QFLD3 sy-vline 
WA_PMY_FORM_TP1_STR-QFLD4 sy-vline 
WA_PMY_FORM_TP1_STR-QFLD5 sy-vline      INTO ld_text SEPARATED BY SPACE.

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