ABAP Select data from SAP table KSII_COEJTA 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 KSII_COEJTA 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 KSII_COEJTA. 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 KSII_COEJTA 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_KSII_COEJTA TYPE STANDARD TABLE OF KSII_COEJTA,
      WA_KSII_COEJTA TYPE KSII_COEJTA,
      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: <KSII_COEJTA> TYPE KSII_COEJTA.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM KSII_COEJTA
*  INTO TABLE @DATA(IT_KSII_COEJTA2).
*--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_KSII_COEJTA INDEX 1 INTO DATA(WA_KSII_COEJTA2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<KSII_COEJTA>-KOKRS = 1.
<KSII_COEJTA>-BELNR = 1.
<KSII_COEJTA>-BUZEI = 1.
<KSII_COEJTA>-TXG001 = 1.
<KSII_COEJTA>-TXG002 = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_KSII_COEJTA-TXG003, sy-vline,
  WA_KSII_COEJTA-TXG004, sy-vline,
  WA_KSII_COEJTA-TXG005, sy-vline,
  WA_KSII_COEJTA-TXG006, sy-vline,
  WA_KSII_COEJTA-TXG007, sy-vline,
  WA_KSII_COEJTA-TXG008, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_KSII_COEJTA 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_KSII_COEJTA 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_KSII_COEJTA INTO WA_KSII_COEJTA.


*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 ALPHA, internal->external for field BELNR
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_KSII_COEJTA-BELNR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KSII_COEJTA-BELNR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC112, internal->external for field TXG001
CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT'
  EXPORTING
    input =                      WA_KSII_COEJTA-TXG001
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KSII_COEJTA-TXG001.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC112, internal->external for field TXG002
CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT'
  EXPORTING
    input =                      WA_KSII_COEJTA-TXG002
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KSII_COEJTA-TXG002.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC112, internal->external for field TXG003
CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT'
  EXPORTING
    input =                      WA_KSII_COEJTA-TXG003
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KSII_COEJTA-TXG003.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC112, internal->external for field TXG004
CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT'
  EXPORTING
    input =                      WA_KSII_COEJTA-TXG004
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KSII_COEJTA-TXG004.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC112, internal->external for field TXG005
CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT'
  EXPORTING
    input =                      WA_KSII_COEJTA-TXG005
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KSII_COEJTA-TXG005.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC112, internal->external for field TXG006
CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT'
  EXPORTING
    input =                      WA_KSII_COEJTA-TXG006
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KSII_COEJTA-TXG006.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC112, internal->external for field TXG007
CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT'
  EXPORTING
    input =                      WA_KSII_COEJTA-TXG007
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KSII_COEJTA-TXG007.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC112, internal->external for field TXG008
CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT'
  EXPORTING
    input =                      WA_KSII_COEJTA-TXG008
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KSII_COEJTA-TXG008.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC112, internal->external for field TXG009
CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT'
  EXPORTING
    input =                      WA_KSII_COEJTA-TXG009
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KSII_COEJTA-TXG009.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC112, internal->external for field TXG010
CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT'
  EXPORTING
    input =                      WA_KSII_COEJTA-TXG010
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KSII_COEJTA-TXG010.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC112, internal->external for field TXG011
CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT'
  EXPORTING
    input =                      WA_KSII_COEJTA-TXG011
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KSII_COEJTA-TXG011.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC112, internal->external for field TXG012
CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT'
  EXPORTING
    input =                      WA_KSII_COEJTA-TXG012
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KSII_COEJTA-TXG012.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC112, internal->external for field TXG013
CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT'
  EXPORTING
    input =                      WA_KSII_COEJTA-TXG013
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KSII_COEJTA-TXG013.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC112, internal->external for field TXG014
CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT'
  EXPORTING
    input =                      WA_KSII_COEJTA-TXG014
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KSII_COEJTA-TXG014.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC112, internal->external for field TXG015
CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT'
  EXPORTING
    input =                      WA_KSII_COEJTA-TXG015
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KSII_COEJTA-TXG015.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC112, internal->external for field TXG016
CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT'
  EXPORTING
    input =                      WA_KSII_COEJTA-TXG016
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KSII_COEJTA-TXG016.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC112, internal->external for field TXF001
CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT'
  EXPORTING
    input =                      WA_KSII_COEJTA-TXF001
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KSII_COEJTA-TXF001.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC112, internal->external for field TXF002
CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT'
  EXPORTING
    input =                      WA_KSII_COEJTA-TXF002
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KSII_COEJTA-TXF002.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC112, internal->external for field TXF003
CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT'
  EXPORTING
    input =                      WA_KSII_COEJTA-TXF003
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KSII_COEJTA-TXF003.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC112, internal->external for field TXF004
CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT'
  EXPORTING
    input =                      WA_KSII_COEJTA-TXF004
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KSII_COEJTA-TXF004.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC112, internal->external for field TXF005
CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT'
  EXPORTING
    input =                      WA_KSII_COEJTA-TXF005
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KSII_COEJTA-TXF005.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC112, internal->external for field TXF006
CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT'
  EXPORTING
    input =                      WA_KSII_COEJTA-TXF006
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KSII_COEJTA-TXF006.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC112, internal->external for field TXF007
CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT'
  EXPORTING
    input =                      WA_KSII_COEJTA-TXF007
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KSII_COEJTA-TXF007.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC112, internal->external for field TXF008
CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT'
  EXPORTING
    input =                      WA_KSII_COEJTA-TXF008
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KSII_COEJTA-TXF008.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC112, internal->external for field TXF009
CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT'
  EXPORTING
    input =                      WA_KSII_COEJTA-TXF009
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KSII_COEJTA-TXF009.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC112, internal->external for field TXF010
CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT'
  EXPORTING
    input =                      WA_KSII_COEJTA-TXF010
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KSII_COEJTA-TXF010.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC112, internal->external for field TXF011
CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT'
  EXPORTING
    input =                      WA_KSII_COEJTA-TXF011
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KSII_COEJTA-TXF011.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC112, internal->external for field TXF012
CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT'
  EXPORTING
    input =                      WA_KSII_COEJTA-TXF012
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KSII_COEJTA-TXF012.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC112, internal->external for field TXF013
CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT'
  EXPORTING
    input =                      WA_KSII_COEJTA-TXF013
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KSII_COEJTA-TXF013.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC112, internal->external for field TXF014
CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT'
  EXPORTING
    input =                      WA_KSII_COEJTA-TXF014
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KSII_COEJTA-TXF014.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC112, internal->external for field TXF015
CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT'
  EXPORTING
    input =                      WA_KSII_COEJTA-TXF015
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KSII_COEJTA-TXF015.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC112, internal->external for field TXF016
CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT'
  EXPORTING
    input =                      WA_KSII_COEJTA-TXF016
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KSII_COEJTA-TXF016.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

*Conversion exit ALPHA, internal->external for field TARKZ
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_KSII_COEJTA-TARKZ
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KSII_COEJTA-TARKZ.
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_KSII_COEJTA_STR, 
KOKRS TYPE STRING,
BELNR TYPE STRING,
BUZEI TYPE STRING,
TXG001 TYPE STRING,
TXG002 TYPE STRING,
TXG003 TYPE STRING,
TXG004 TYPE STRING,
TXG005 TYPE STRING,
TXG006 TYPE STRING,
TXG007 TYPE STRING,
TXG008 TYPE STRING,
TXG009 TYPE STRING,
TXG010 TYPE STRING,
TXG011 TYPE STRING,
TXG012 TYPE STRING,
TXG013 TYPE STRING,
TXG014 TYPE STRING,
TXG015 TYPE STRING,
TXG016 TYPE STRING,
TXF001 TYPE STRING,
TXF002 TYPE STRING,
TXF003 TYPE STRING,
TXF004 TYPE STRING,
TXF005 TYPE STRING,
TXF006 TYPE STRING,
TXF007 TYPE STRING,
TXF008 TYPE STRING,
TXF009 TYPE STRING,
TXF010 TYPE STRING,
TXF011 TYPE STRING,
TXF012 TYPE STRING,
TXF013 TYPE STRING,
TXF014 TYPE STRING,
TXF015 TYPE STRING,
TXF016 TYPE STRING,
TXE001 TYPE STRING,
TXE002 TYPE STRING,
TXE003 TYPE STRING,
TXE004 TYPE STRING,
TXE005 TYPE STRING,
TXE006 TYPE STRING,
TXE007 TYPE STRING,
TXE008 TYPE STRING,
TXE009 TYPE STRING,
TXE010 TYPE STRING,
TXE011 TYPE STRING,
TXE012 TYPE STRING,
TXE013 TYPE STRING,
TXE014 TYPE STRING,
TXE015 TYPE STRING,
TXE016 TYPE STRING,
LEDNR TYPE STRING,
OBJNR TYPE STRING,
GJAHR TYPE STRING,
WRTTP TYPE STRING,
VERSN TYPE STRING,
TARKZ TYPE STRING,
VRGNG TYPE STRING,
SGTXT TYPE STRING,
REFBZ TYPE STRING,
ZLENR TYPE STRING,
XISEQ TYPE STRING,END OF T_EKKO_STR.
DATA: WA_KSII_COEJTA_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_KSII_COEJTA_STR-KOKRS sy-vline 
WA_KSII_COEJTA_STR-BELNR sy-vline 
WA_KSII_COEJTA_STR-BUZEI sy-vline 
WA_KSII_COEJTA_STR-TXG001 sy-vline 
WA_KSII_COEJTA_STR-TXG002 sy-vline 
WA_KSII_COEJTA_STR-TXG003 sy-vline 
WA_KSII_COEJTA_STR-TXG004 sy-vline 
WA_KSII_COEJTA_STR-TXG005 sy-vline 
WA_KSII_COEJTA_STR-TXG006 sy-vline 
WA_KSII_COEJTA_STR-TXG007 sy-vline 
WA_KSII_COEJTA_STR-TXG008 sy-vline 
WA_KSII_COEJTA_STR-TXG009 sy-vline 
WA_KSII_COEJTA_STR-TXG010 sy-vline 
WA_KSII_COEJTA_STR-TXG011 sy-vline 
WA_KSII_COEJTA_STR-TXG012 sy-vline 
WA_KSII_COEJTA_STR-TXG013 sy-vline 
WA_KSII_COEJTA_STR-TXG014 sy-vline 
WA_KSII_COEJTA_STR-TXG015 sy-vline 
WA_KSII_COEJTA_STR-TXG016 sy-vline 
WA_KSII_COEJTA_STR-TXF001 sy-vline 
WA_KSII_COEJTA_STR-TXF002 sy-vline 
WA_KSII_COEJTA_STR-TXF003 sy-vline 
WA_KSII_COEJTA_STR-TXF004 sy-vline 
WA_KSII_COEJTA_STR-TXF005 sy-vline 
WA_KSII_COEJTA_STR-TXF006 sy-vline 
WA_KSII_COEJTA_STR-TXF007 sy-vline 
WA_KSII_COEJTA_STR-TXF008 sy-vline 
WA_KSII_COEJTA_STR-TXF009 sy-vline 
WA_KSII_COEJTA_STR-TXF010 sy-vline 
WA_KSII_COEJTA_STR-TXF011 sy-vline 
WA_KSII_COEJTA_STR-TXF012 sy-vline 
WA_KSII_COEJTA_STR-TXF013 sy-vline 
WA_KSII_COEJTA_STR-TXF014 sy-vline 
WA_KSII_COEJTA_STR-TXF015 sy-vline 
WA_KSII_COEJTA_STR-TXF016 sy-vline 
WA_KSII_COEJTA_STR-TXE001 sy-vline 
WA_KSII_COEJTA_STR-TXE002 sy-vline 
WA_KSII_COEJTA_STR-TXE003 sy-vline 
WA_KSII_COEJTA_STR-TXE004 sy-vline 
WA_KSII_COEJTA_STR-TXE005 sy-vline 
WA_KSII_COEJTA_STR-TXE006 sy-vline 
WA_KSII_COEJTA_STR-TXE007 sy-vline 
WA_KSII_COEJTA_STR-TXE008 sy-vline 
WA_KSII_COEJTA_STR-TXE009 sy-vline 
WA_KSII_COEJTA_STR-TXE010 sy-vline 
WA_KSII_COEJTA_STR-TXE011 sy-vline 
WA_KSII_COEJTA_STR-TXE012 sy-vline 
WA_KSII_COEJTA_STR-TXE013 sy-vline 
WA_KSII_COEJTA_STR-TXE014 sy-vline 
WA_KSII_COEJTA_STR-TXE015 sy-vline 
WA_KSII_COEJTA_STR-TXE016 sy-vline 
WA_KSII_COEJTA_STR-LEDNR sy-vline 
WA_KSII_COEJTA_STR-OBJNR sy-vline 
WA_KSII_COEJTA_STR-GJAHR sy-vline 
WA_KSII_COEJTA_STR-WRTTP sy-vline 
WA_KSII_COEJTA_STR-VERSN sy-vline 
WA_KSII_COEJTA_STR-TARKZ sy-vline 
WA_KSII_COEJTA_STR-VRGNG sy-vline 
WA_KSII_COEJTA_STR-SGTXT sy-vline 
WA_KSII_COEJTA_STR-REFBZ sy-vline 
WA_KSII_COEJTA_STR-ZLENR sy-vline 
WA_KSII_COEJTA_STR-XISEQ sy-vline      INTO ld_text SEPARATED BY SPACE.

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