ABAP Select data from SAP table PIN_EAST_DOVS 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 PIN_EAST_DOVS 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 PIN_EAST_DOVS. 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 PIN_EAST_DOVS 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_PIN_EAST_DOVS TYPE STANDARD TABLE OF PIN_EAST_DOVS,
      WA_PIN_EAST_DOVS TYPE PIN_EAST_DOVS,
      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: <PIN_EAST_DOVS> TYPE PIN_EAST_DOVS.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM PIN_EAST_DOVS
*  INTO TABLE @DATA(IT_PIN_EAST_DOVS2).
*--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_PIN_EAST_DOVS INDEX 1 INTO DATA(WA_PIN_EAST_DOVS2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<PIN_EAST_DOVS>-EASQN = 1.
<PIN_EAST_DOVS>-EAIBR = 1.
<PIN_EAST_DOVS>-EAIBU = 1.
<PIN_EAST_DOVS>-EAIOD = 1.
<PIN_EAST_DOVS>-EAIOT = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_PIN_EAST_DOVS-EALBU, sy-vline,
  WA_PIN_EAST_DOVS-EALOD, sy-vline,
  WA_PIN_EAST_DOVS-EALOT, sy-vline,
  WA_PIN_EAST_DOVS-EATLV, sy-vline,
  WA_PIN_EAST_DOVS-EAITG, sy-vline,
  WA_PIN_EAST_DOVS-EATID, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_PIN_EAST_DOVS 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_PIN_EAST_DOVS 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_PIN_EAST_DOVS INTO WA_PIN_EAST_DOVS.


*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 EAUNT
CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT'
  EXPORTING
    input =                      WA_PIN_EAST_DOVS-EAUNT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PIN_EAST_DOVS-EAUNT.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

*Conversion exit CUNIT, internal->external for field X_UNT05
CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT'
  EXPORTING
    input =                      WA_PIN_EAST_DOVS-X_UNT05
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PIN_EAST_DOVS-X_UNT05.
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_PIN_EAST_DOVS_STR, 
EASQN TYPE STRING,
EAIBR TYPE STRING,
EAIBU TYPE STRING,
EAIOD TYPE STRING,
EAIOT TYPE STRING,
EALBU TYPE STRING,
EALOD TYPE STRING,
EALOT TYPE STRING,
EATLV TYPE STRING,
EAITG TYPE STRING,
EATID TYPE STRING,
EATAN TYPE STRING,
EAPEC TYPE STRING,
EAEVI TYPE STRING,
EATSD TYPE STRING,
EATLD TYPE STRING,
EARBT TYPE STRING,
EAOID TYPE STRING,
EAQTY TYPE STRING,
EAUNT TYPE STRING,
EAPPA TYPE STRING,
WEPPA TYPE STRING,
EAAPA TYPE STRING,
WEAPA TYPE STRING,
EAATS TYPE STRING,
EATOW TYPE STRING,
EADEP TYPE STRING,
EATST TYPE STRING,
EAWID TYPE STRING,
EATFN TYPE STRING,
EAFRZ TYPE STRING,
EAISQ TYPE STRING,
EAOSQ TYPE STRING,
X_DAT01 TYPE STRING,
X_DAT02 TYPE STRING,
X_DAT03 TYPE STRING,
X_DAT04 TYPE STRING,
X_DAT05 TYPE STRING,
X_CBX01 TYPE STRING,
X_CBX02 TYPE STRING,
X_CBX03 TYPE STRING,
X_CBX04 TYPE STRING,
X_CBX05 TYPE STRING,
X_AMT01 TYPE STRING,
X_AMT02 TYPE STRING,
X_AMT03 TYPE STRING,
X_AMT04 TYPE STRING,
X_AMT05 TYPE STRING,
X_WEA01 TYPE STRING,
X_WEA02 TYPE STRING,
X_WEA03 TYPE STRING,
X_WEA04 TYPE STRING,
X_WEA05 TYPE STRING,
X_QTY01 TYPE STRING,
X_QTY02 TYPE STRING,
X_QTY03 TYPE STRING,
X_QTY04 TYPE STRING,
X_QTY05 TYPE STRING,
X_UNT01 TYPE STRING,
X_UNT02 TYPE STRING,
X_UNT03 TYPE STRING,
X_UNT04 TYPE STRING,
X_UNT05 TYPE STRING,
X_DEC01 TYPE STRING,
X_DEC02 TYPE STRING,
X_DEC03 TYPE STRING,
X_DEC04 TYPE STRING,
X_DEC05 TYPE STRING,
X_C01F0 TYPE STRING,
X_C01F1 TYPE STRING,
X_C01F2 TYPE STRING,
X_C01F3 TYPE STRING,
X_C01F4 TYPE STRING,
X_C02F0 TYPE STRING,
X_C02F1 TYPE STRING,
X_C02F2 TYPE STRING,
X_C02F3 TYPE STRING,
X_C02F4 TYPE STRING,
X_C04F0 TYPE STRING,
X_C04F1 TYPE STRING,
X_C04F2 TYPE STRING,
X_C04F3 TYPE STRING,
X_C04F4 TYPE STRING,
X_C10F0 TYPE STRING,
X_C10F1 TYPE STRING,
X_C10F2 TYPE STRING,
X_C10F3 TYPE STRING,
X_C10F4 TYPE STRING,
X_C20F0 TYPE STRING,
X_C20F1 TYPE STRING,
X_C20F2 TYPE STRING,
X_C20F3 TYPE STRING,
X_C20F4 TYPE STRING,
X_N03F0 TYPE STRING,
X_N03F1 TYPE STRING,
X_N03F2 TYPE STRING,
X_N03F3 TYPE STRING,
X_N03F4 TYPE STRING,
X_N05F0 TYPE STRING,
X_N05F1 TYPE STRING,
X_N05F2 TYPE STRING,
X_N05F3 TYPE STRING,
X_N05F4 TYPE STRING,
X_N10F0 TYPE STRING,
X_N10F1 TYPE STRING,
X_N10F2 TYPE STRING,
X_N10F3 TYPE STRING,
X_N10F4 TYPE STRING,
X_N16F0 TYPE STRING,
X_N16F1 TYPE STRING,
X_N16F2 TYPE STRING,
X_N16F3 TYPE STRING,
X_N16F4 TYPE STRING,
X_N20F0 TYPE STRING,
X_N20F1 TYPE STRING,
X_N20F2 TYPE STRING,
X_N20F3 TYPE STRING,
X_N20F4 TYPE STRING,
X_T50F0 TYPE STRING,
X_T50F1 TYPE STRING,
X_T50F2 TYPE STRING,
X_T50F3 TYPE STRING,
X_T50F4 TYPE STRING,
X_T80F0 TYPE STRING,
X_T80F1 TYPE STRING,
X_T80F2 TYPE STRING,
X_T80F3 TYPE STRING,
X_T80F4 TYPE STRING,
X_T4096F0 TYPE STRING,
X_T4096F1 TYPE STRING,
X_T4096F2 TYPE STRING,
X_T4096F3 TYPE STRING,
X_T4096F4 TYPE STRING,
EASTP TYPE STRING,
EARQN TYPE STRING,
PERNR TYPE STRING,
EAWSE TYPE STRING,
EAWSE_EDT TYPE STRING,
PERNR_TXT TYPE STRING,
EAIBR_TXT TYPE STRING,
EAIBU_TXT TYPE STRING,
EALBU_TXT TYPE STRING,
EAITG_TXT TYPE STRING,
EATOW_TXT TYPE STRING,
EADEP_TXT TYPE STRING,
EAPEC_TXT TYPE STRING,
EAUNT_TXT TYPE STRING,
WEPPA_TXT TYPE STRING,
WEAPA_TXT TYPE STRING,
EAATS_TXT TYPE STRING,
EATST_TXT TYPE STRING,
EADEL_EDT TYPE STRING,
EAREM_EDT TYPE STRING,
EATFN_EDT TYPE STRING,
EATOA_DOM TYPE STRING,
EANTT_DOM TYPE STRING,
EAUDT TYPE STRING,END OF T_EKKO_STR.
DATA: WA_PIN_EAST_DOVS_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_PIN_EAST_DOVS_STR-EASQN sy-vline 
WA_PIN_EAST_DOVS_STR-EAIBR sy-vline 
WA_PIN_EAST_DOVS_STR-EAIBU sy-vline 
WA_PIN_EAST_DOVS_STR-EAIOD sy-vline 
WA_PIN_EAST_DOVS_STR-EAIOT sy-vline 
WA_PIN_EAST_DOVS_STR-EALBU sy-vline 
WA_PIN_EAST_DOVS_STR-EALOD sy-vline 
WA_PIN_EAST_DOVS_STR-EALOT sy-vline 
WA_PIN_EAST_DOVS_STR-EATLV sy-vline 
WA_PIN_EAST_DOVS_STR-EAITG sy-vline 
WA_PIN_EAST_DOVS_STR-EATID sy-vline 
WA_PIN_EAST_DOVS_STR-EATAN sy-vline 
WA_PIN_EAST_DOVS_STR-EAPEC sy-vline 
WA_PIN_EAST_DOVS_STR-EAEVI sy-vline 
WA_PIN_EAST_DOVS_STR-EATSD sy-vline 
WA_PIN_EAST_DOVS_STR-EATLD sy-vline 
WA_PIN_EAST_DOVS_STR-EARBT sy-vline 
WA_PIN_EAST_DOVS_STR-EAOID sy-vline 
WA_PIN_EAST_DOVS_STR-EAQTY sy-vline 
WA_PIN_EAST_DOVS_STR-EAUNT sy-vline 
WA_PIN_EAST_DOVS_STR-EAPPA sy-vline 
WA_PIN_EAST_DOVS_STR-WEPPA sy-vline 
WA_PIN_EAST_DOVS_STR-EAAPA sy-vline 
WA_PIN_EAST_DOVS_STR-WEAPA sy-vline 
WA_PIN_EAST_DOVS_STR-EAATS sy-vline 
WA_PIN_EAST_DOVS_STR-EATOW sy-vline 
WA_PIN_EAST_DOVS_STR-EADEP sy-vline 
WA_PIN_EAST_DOVS_STR-EATST sy-vline 
WA_PIN_EAST_DOVS_STR-EAWID sy-vline 
WA_PIN_EAST_DOVS_STR-EATFN sy-vline 
WA_PIN_EAST_DOVS_STR-EAFRZ sy-vline 
WA_PIN_EAST_DOVS_STR-EAISQ sy-vline 
WA_PIN_EAST_DOVS_STR-EAOSQ sy-vline 
WA_PIN_EAST_DOVS_STR-X_DAT01 sy-vline 
WA_PIN_EAST_DOVS_STR-X_DAT02 sy-vline 
WA_PIN_EAST_DOVS_STR-X_DAT03 sy-vline 
WA_PIN_EAST_DOVS_STR-X_DAT04 sy-vline 
WA_PIN_EAST_DOVS_STR-X_DAT05 sy-vline 
WA_PIN_EAST_DOVS_STR-X_CBX01 sy-vline 
WA_PIN_EAST_DOVS_STR-X_CBX02 sy-vline 
WA_PIN_EAST_DOVS_STR-X_CBX03 sy-vline 
WA_PIN_EAST_DOVS_STR-X_CBX04 sy-vline 
WA_PIN_EAST_DOVS_STR-X_CBX05 sy-vline 
WA_PIN_EAST_DOVS_STR-X_AMT01 sy-vline 
WA_PIN_EAST_DOVS_STR-X_AMT02 sy-vline 
WA_PIN_EAST_DOVS_STR-X_AMT03 sy-vline 
WA_PIN_EAST_DOVS_STR-X_AMT04 sy-vline 
WA_PIN_EAST_DOVS_STR-X_AMT05 sy-vline 
WA_PIN_EAST_DOVS_STR-X_WEA01 sy-vline 
WA_PIN_EAST_DOVS_STR-X_WEA02 sy-vline 
WA_PIN_EAST_DOVS_STR-X_WEA03 sy-vline 
WA_PIN_EAST_DOVS_STR-X_WEA04 sy-vline 
WA_PIN_EAST_DOVS_STR-X_WEA05 sy-vline 
WA_PIN_EAST_DOVS_STR-X_QTY01 sy-vline 
WA_PIN_EAST_DOVS_STR-X_QTY02 sy-vline 
WA_PIN_EAST_DOVS_STR-X_QTY03 sy-vline 
WA_PIN_EAST_DOVS_STR-X_QTY04 sy-vline 
WA_PIN_EAST_DOVS_STR-X_QTY05 sy-vline 
WA_PIN_EAST_DOVS_STR-X_UNT01 sy-vline 
WA_PIN_EAST_DOVS_STR-X_UNT02 sy-vline 
WA_PIN_EAST_DOVS_STR-X_UNT03 sy-vline 
WA_PIN_EAST_DOVS_STR-X_UNT04 sy-vline 
WA_PIN_EAST_DOVS_STR-X_UNT05 sy-vline 
WA_PIN_EAST_DOVS_STR-X_DEC01 sy-vline 
WA_PIN_EAST_DOVS_STR-X_DEC02 sy-vline 
WA_PIN_EAST_DOVS_STR-X_DEC03 sy-vline 
WA_PIN_EAST_DOVS_STR-X_DEC04 sy-vline 
WA_PIN_EAST_DOVS_STR-X_DEC05 sy-vline 
WA_PIN_EAST_DOVS_STR-X_C01F0 sy-vline 
WA_PIN_EAST_DOVS_STR-X_C01F1 sy-vline 
WA_PIN_EAST_DOVS_STR-X_C01F2 sy-vline 
WA_PIN_EAST_DOVS_STR-X_C01F3 sy-vline 
WA_PIN_EAST_DOVS_STR-X_C01F4 sy-vline 
WA_PIN_EAST_DOVS_STR-X_C02F0 sy-vline 
WA_PIN_EAST_DOVS_STR-X_C02F1 sy-vline 
WA_PIN_EAST_DOVS_STR-X_C02F2 sy-vline 
WA_PIN_EAST_DOVS_STR-X_C02F3 sy-vline 
WA_PIN_EAST_DOVS_STR-X_C02F4 sy-vline 
WA_PIN_EAST_DOVS_STR-X_C04F0 sy-vline 
WA_PIN_EAST_DOVS_STR-X_C04F1 sy-vline 
WA_PIN_EAST_DOVS_STR-X_C04F2 sy-vline 
WA_PIN_EAST_DOVS_STR-X_C04F3 sy-vline 
WA_PIN_EAST_DOVS_STR-X_C04F4 sy-vline 
WA_PIN_EAST_DOVS_STR-X_C10F0 sy-vline 
WA_PIN_EAST_DOVS_STR-X_C10F1 sy-vline 
WA_PIN_EAST_DOVS_STR-X_C10F2 sy-vline 
WA_PIN_EAST_DOVS_STR-X_C10F3 sy-vline 
WA_PIN_EAST_DOVS_STR-X_C10F4 sy-vline 
WA_PIN_EAST_DOVS_STR-X_C20F0 sy-vline 
WA_PIN_EAST_DOVS_STR-X_C20F1 sy-vline 
WA_PIN_EAST_DOVS_STR-X_C20F2 sy-vline 
WA_PIN_EAST_DOVS_STR-X_C20F3 sy-vline 
WA_PIN_EAST_DOVS_STR-X_C20F4 sy-vline 
WA_PIN_EAST_DOVS_STR-X_N03F0 sy-vline 
WA_PIN_EAST_DOVS_STR-X_N03F1 sy-vline 
WA_PIN_EAST_DOVS_STR-X_N03F2 sy-vline 
WA_PIN_EAST_DOVS_STR-X_N03F3 sy-vline 
WA_PIN_EAST_DOVS_STR-X_N03F4 sy-vline 
WA_PIN_EAST_DOVS_STR-X_N05F0 sy-vline 
WA_PIN_EAST_DOVS_STR-X_N05F1 sy-vline 
WA_PIN_EAST_DOVS_STR-X_N05F2 sy-vline 
WA_PIN_EAST_DOVS_STR-X_N05F3 sy-vline 
WA_PIN_EAST_DOVS_STR-X_N05F4 sy-vline 
WA_PIN_EAST_DOVS_STR-X_N10F0 sy-vline 
WA_PIN_EAST_DOVS_STR-X_N10F1 sy-vline 
WA_PIN_EAST_DOVS_STR-X_N10F2 sy-vline 
WA_PIN_EAST_DOVS_STR-X_N10F3 sy-vline 
WA_PIN_EAST_DOVS_STR-X_N10F4 sy-vline 
WA_PIN_EAST_DOVS_STR-X_N16F0 sy-vline 
WA_PIN_EAST_DOVS_STR-X_N16F1 sy-vline 
WA_PIN_EAST_DOVS_STR-X_N16F2 sy-vline 
WA_PIN_EAST_DOVS_STR-X_N16F3 sy-vline 
WA_PIN_EAST_DOVS_STR-X_N16F4 sy-vline 
WA_PIN_EAST_DOVS_STR-X_N20F0 sy-vline 
WA_PIN_EAST_DOVS_STR-X_N20F1 sy-vline 
WA_PIN_EAST_DOVS_STR-X_N20F2 sy-vline 
WA_PIN_EAST_DOVS_STR-X_N20F3 sy-vline 
WA_PIN_EAST_DOVS_STR-X_N20F4 sy-vline 
WA_PIN_EAST_DOVS_STR-X_T50F0 sy-vline 
WA_PIN_EAST_DOVS_STR-X_T50F1 sy-vline 
WA_PIN_EAST_DOVS_STR-X_T50F2 sy-vline 
WA_PIN_EAST_DOVS_STR-X_T50F3 sy-vline 
WA_PIN_EAST_DOVS_STR-X_T50F4 sy-vline 
WA_PIN_EAST_DOVS_STR-X_T80F0 sy-vline 
WA_PIN_EAST_DOVS_STR-X_T80F1 sy-vline 
WA_PIN_EAST_DOVS_STR-X_T80F2 sy-vline 
WA_PIN_EAST_DOVS_STR-X_T80F3 sy-vline 
WA_PIN_EAST_DOVS_STR-X_T80F4 sy-vline 
WA_PIN_EAST_DOVS_STR-X_T4096F0 sy-vline 
WA_PIN_EAST_DOVS_STR-X_T4096F1 sy-vline 
WA_PIN_EAST_DOVS_STR-X_T4096F2 sy-vline 
WA_PIN_EAST_DOVS_STR-X_T4096F3 sy-vline 
WA_PIN_EAST_DOVS_STR-X_T4096F4 sy-vline 
WA_PIN_EAST_DOVS_STR-EASTP sy-vline 
WA_PIN_EAST_DOVS_STR-EARQN sy-vline 
WA_PIN_EAST_DOVS_STR-PERNR sy-vline 
WA_PIN_EAST_DOVS_STR-EAWSE sy-vline 
WA_PIN_EAST_DOVS_STR-EAWSE_EDT sy-vline 
WA_PIN_EAST_DOVS_STR-PERNR_TXT sy-vline 
WA_PIN_EAST_DOVS_STR-EAIBR_TXT sy-vline 
WA_PIN_EAST_DOVS_STR-EAIBU_TXT sy-vline 
WA_PIN_EAST_DOVS_STR-EALBU_TXT sy-vline 
WA_PIN_EAST_DOVS_STR-EAITG_TXT sy-vline 
WA_PIN_EAST_DOVS_STR-EATOW_TXT sy-vline 
WA_PIN_EAST_DOVS_STR-EADEP_TXT sy-vline 
WA_PIN_EAST_DOVS_STR-EAPEC_TXT sy-vline 
WA_PIN_EAST_DOVS_STR-EAUNT_TXT sy-vline 
WA_PIN_EAST_DOVS_STR-WEPPA_TXT sy-vline 
WA_PIN_EAST_DOVS_STR-WEAPA_TXT sy-vline 
WA_PIN_EAST_DOVS_STR-EAATS_TXT sy-vline 
WA_PIN_EAST_DOVS_STR-EATST_TXT sy-vline 
WA_PIN_EAST_DOVS_STR-EADEL_EDT sy-vline 
WA_PIN_EAST_DOVS_STR-EAREM_EDT sy-vline 
WA_PIN_EAST_DOVS_STR-EATFN_EDT sy-vline 
WA_PIN_EAST_DOVS_STR-EATOA_DOM sy-vline 
WA_PIN_EAST_DOVS_STR-EANTT_DOM sy-vline 
WA_PIN_EAST_DOVS_STR-EAUDT sy-vline      INTO ld_text SEPARATED BY SPACE.

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