ABAP Select data from SAP table ANLA 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 ANLA 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 ANLA. 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 ANLA 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_ANLA TYPE STANDARD TABLE OF ANLA,
      WA_ANLA TYPE ANLA,
      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: <ANLA> TYPE ANLA.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM ANLA
*  INTO TABLE @DATA(IT_ANLA2).
*--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_ANLA INDEX 1 INTO DATA(WA_ANLA2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<ANLA>-MANDT = 1.
<ANLA>-BUKRS = 1.
<ANLA>-ANLN1 = 1.
<ANLA>-ANLN2 = 1.
<ANLA>-ANLKL = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_ANLA-GEGST, sy-vline,
  WA_ANLA-ANLAR, sy-vline,
  WA_ANLA-ERNAM, sy-vline,
  WA_ANLA-ERDAT, sy-vline,
  WA_ANLA-AENAM, sy-vline,
  WA_ANLA-AEDAT, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_ANLA 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_ANLA 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_ANLA INTO WA_ANLA.


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

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

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

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

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

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

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

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

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

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

*Conversion exit AC132, internal->external for field URWRT
CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT'
  EXPORTING
    input =                      WA_ANLA-URWRT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_ANLA-URWRT.
WRITE:/ 'New Value:', ld_input.

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

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

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

*Conversion exit AC132, internal->external for field WRTMA
CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT'
  EXPORTING
    input =                      WA_ANLA-WRTMA
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_ANLA-WRTMA.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field EHWRT
CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT'
  EXPORTING
    input =                      WA_ANLA-EHWRT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_ANLA-EHWRT.
WRITE:/ 'New Value:', ld_input.

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

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

*Conversion exit ISOLA, internal->external for field SPRAS
CALL FUNCTION 'CONVERSION_EXIT_ISOLA_OUTPUT'
  EXPORTING
    input =                      WA_ANLA-SPRAS
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_ANLA-SPRAS.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit AC132, internal->external for field LEGEB
CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT'
  EXPORTING
    input =                      WA_ANLA-LEGEB
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_ANLA-LEGEB.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field LBASW
CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT'
  EXPORTING
    input =                      WA_ANLA-LBASW
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_ANLA-LBASW.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field LKAUF
CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT'
  EXPORTING
    input =                      WA_ANLA-LKAUF
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_ANLA-LKAUF.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field LKUZA
CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT'
  EXPORTING
    input =                      WA_ANLA-LKUZA
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_ANLA-LKUZA.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field LKUZI
CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT'
  EXPORTING
    input =                      WA_ANLA-LKUZI
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_ANLA-LKUZI.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field LLAVB
CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT'
  EXPORTING
    input =                      WA_ANLA-LLAVB
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_ANLA-LLAVB.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit ABPSP, internal->external for field POSNR
CALL FUNCTION 'CONVERSION_EXIT_ABPSP_OUTPUT'
  EXPORTING
    input =                      WA_ANLA-POSNR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_ANLA-POSNR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit GERNR, internal->external for field SERNR
CALL FUNCTION 'CONVERSION_EXIT_GERNR_OUTPUT'
  EXPORTING
    input =                      WA_ANLA-SERNR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_ANLA-SERNR.
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_ANLA_STR, 
MANDT TYPE STRING,
BUKRS TYPE STRING,
ANLN1 TYPE STRING,
ANLN2 TYPE STRING,
ANLKL TYPE STRING,
GEGST TYPE STRING,
ANLAR TYPE STRING,
ERNAM TYPE STRING,
ERDAT TYPE STRING,
AENAM TYPE STRING,
AEDAT TYPE STRING,
XLOEV TYPE STRING,
XSPEB TYPE STRING,
FELEI TYPE STRING,
KTOGR TYPE STRING,
XOPVW TYPE STRING,
ANLTP TYPE STRING,
ZUJHR TYPE STRING,
ZUPER TYPE STRING,
ZUGDT TYPE STRING,
AKTIV TYPE STRING,
ABGDT TYPE STRING,
DEAKT TYPE STRING,
GPLAB TYPE STRING,
BSTDT TYPE STRING,
ORD41 TYPE STRING,
ORD42 TYPE STRING,
ORD43 TYPE STRING,
ORD44 TYPE STRING,
ANLUE TYPE STRING,
ZUAWA TYPE STRING,
ANEQK TYPE STRING,
ANEQS TYPE STRING,
LIFNR TYPE STRING,
LAND1 TYPE STRING,
LIEFE TYPE STRING,
HERST TYPE STRING,
EIGKZ TYPE STRING,
AIBN1 TYPE STRING,
AIBN2 TYPE STRING,
AIBDT TYPE STRING,
URJHR TYPE STRING,
URWRT TYPE STRING,
ANTEI TYPE STRING,
PROJN TYPE STRING,
EAUFN TYPE STRING,
MEINS TYPE STRING,
MENGE TYPE STRING,
TYPBZ TYPE STRING,
IZWEK TYPE STRING,
INKEN TYPE STRING,
IVDAT TYPE STRING,
INVZU TYPE STRING,
VMGLI TYPE STRING,
XVRMW TYPE STRING,
WRTMA TYPE STRING,
EHWRT TYPE STRING,
AUFLA TYPE STRING,
EHWZU TYPE STRING,
EHWNR TYPE STRING,
GRUVO TYPE STRING,
GREIN TYPE STRING,
GRBND TYPE STRING,
GRBLT TYPE STRING,
GRLFD TYPE STRING,
FLURK TYPE STRING,
FLURN TYPE STRING,
FIAMT TYPE STRING,
STADT TYPE STRING,
GRUND TYPE STRING,
FEINS TYPE STRING,
GRUFL TYPE STRING,
INVNR TYPE STRING,
VBUND TYPE STRING,
SPRAS TYPE STRING,
TXT50 TYPE STRING,
TXA50 TYPE STRING,
XLTXID TYPE STRING,
XVERID TYPE STRING,
XTCHID TYPE STRING,
XKALID TYPE STRING,
XHERID TYPE STRING,
XLEAID TYPE STRING,
LEAFI TYPE STRING,
LVDAT TYPE STRING,
LKDAT TYPE STRING,
LEABG TYPE STRING,
LEJAR TYPE STRING,
LEPER TYPE STRING,
LRYTH TYPE STRING,
LEGEB TYPE STRING,
LBASW TYPE STRING,
LKAUF TYPE STRING,
LMZIN TYPE STRING,
LZINS TYPE STRING,
LTZBW TYPE STRING,
LKUZA TYPE STRING,
LKUZI TYPE STRING,
LLAVB TYPE STRING,
LEANZ TYPE STRING,
LVTNR TYPE STRING,
LETXT TYPE STRING,
XAKTIV TYPE STRING,
ANUPD TYPE STRING,
LBLNR TYPE STRING,
XV0DT TYPE STRING,
XV0NM TYPE STRING,
XV1DT TYPE STRING,
XV1NM TYPE STRING,
XV2DT TYPE STRING,
XV2NM TYPE STRING,
XV3DT TYPE STRING,
XV3NM TYPE STRING,
XV4DT TYPE STRING,
XV4NM TYPE STRING,
XV5DT TYPE STRING,
XV5NM TYPE STRING,
XV6DT TYPE STRING,
XV6NM TYPE STRING,
AIMMO TYPE STRING,
OBJNR TYPE STRING,
LEART TYPE STRING,
LVORS TYPE STRING,
GDLGRP TYPE STRING,
POSNR TYPE STRING,
XERWRT TYPE STRING,
XAFABCH TYPE STRING,
XANLGR TYPE STRING,
MCOA1 TYPE STRING,
XINVM TYPE STRING,
SERNR TYPE STRING,
UMWKZ TYPE STRING,
LRVDAT TYPE STRING,
ACT_CHANGE_PM TYPE STRING,
HAS_TDDP TYPE STRING,
LAST_REORG_DATE TYPE STRING,
LDT_DATE TYPE STRING,
LDT_SEQNO TYPE STRING,
SDM_STATUS TYPE STRING,
DUMMY_FAA_ASSET_INCL_EEW_PS TYPE STRING,
INTERNAL_CODE TYPE STRING,
APPROVAL_NUMBER TYPE STRING,
APPROVAL_VERSION TYPE STRING,
BOGUS_ANLN1 TYPE STRING,
ASSET_VERSION TYPE STRING,END OF T_EKKO_STR.
DATA: WA_ANLA_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_ANLA_STR-MANDT sy-vline 
WA_ANLA_STR-BUKRS sy-vline 
WA_ANLA_STR-ANLN1 sy-vline 
WA_ANLA_STR-ANLN2 sy-vline 
WA_ANLA_STR-ANLKL sy-vline 
WA_ANLA_STR-GEGST sy-vline 
WA_ANLA_STR-ANLAR sy-vline 
WA_ANLA_STR-ERNAM sy-vline 
WA_ANLA_STR-ERDAT sy-vline 
WA_ANLA_STR-AENAM sy-vline 
WA_ANLA_STR-AEDAT sy-vline 
WA_ANLA_STR-XLOEV sy-vline 
WA_ANLA_STR-XSPEB sy-vline 
WA_ANLA_STR-FELEI sy-vline 
WA_ANLA_STR-KTOGR sy-vline 
WA_ANLA_STR-XOPVW sy-vline 
WA_ANLA_STR-ANLTP sy-vline 
WA_ANLA_STR-ZUJHR sy-vline 
WA_ANLA_STR-ZUPER sy-vline 
WA_ANLA_STR-ZUGDT sy-vline 
WA_ANLA_STR-AKTIV sy-vline 
WA_ANLA_STR-ABGDT sy-vline 
WA_ANLA_STR-DEAKT sy-vline 
WA_ANLA_STR-GPLAB sy-vline 
WA_ANLA_STR-BSTDT sy-vline 
WA_ANLA_STR-ORD41 sy-vline 
WA_ANLA_STR-ORD42 sy-vline 
WA_ANLA_STR-ORD43 sy-vline 
WA_ANLA_STR-ORD44 sy-vline 
WA_ANLA_STR-ANLUE sy-vline 
WA_ANLA_STR-ZUAWA sy-vline 
WA_ANLA_STR-ANEQK sy-vline 
WA_ANLA_STR-ANEQS sy-vline 
WA_ANLA_STR-LIFNR sy-vline 
WA_ANLA_STR-LAND1 sy-vline 
WA_ANLA_STR-LIEFE sy-vline 
WA_ANLA_STR-HERST sy-vline 
WA_ANLA_STR-EIGKZ sy-vline 
WA_ANLA_STR-AIBN1 sy-vline 
WA_ANLA_STR-AIBN2 sy-vline 
WA_ANLA_STR-AIBDT sy-vline 
WA_ANLA_STR-URJHR sy-vline 
WA_ANLA_STR-URWRT sy-vline 
WA_ANLA_STR-ANTEI sy-vline 
WA_ANLA_STR-PROJN sy-vline 
WA_ANLA_STR-EAUFN sy-vline 
WA_ANLA_STR-MEINS sy-vline 
WA_ANLA_STR-MENGE sy-vline 
WA_ANLA_STR-TYPBZ sy-vline 
WA_ANLA_STR-IZWEK sy-vline 
WA_ANLA_STR-INKEN sy-vline 
WA_ANLA_STR-IVDAT sy-vline 
WA_ANLA_STR-INVZU sy-vline 
WA_ANLA_STR-VMGLI sy-vline 
WA_ANLA_STR-XVRMW sy-vline 
WA_ANLA_STR-WRTMA sy-vline 
WA_ANLA_STR-EHWRT sy-vline 
WA_ANLA_STR-AUFLA sy-vline 
WA_ANLA_STR-EHWZU sy-vline 
WA_ANLA_STR-EHWNR sy-vline 
WA_ANLA_STR-GRUVO sy-vline 
WA_ANLA_STR-GREIN sy-vline 
WA_ANLA_STR-GRBND sy-vline 
WA_ANLA_STR-GRBLT sy-vline 
WA_ANLA_STR-GRLFD sy-vline 
WA_ANLA_STR-FLURK sy-vline 
WA_ANLA_STR-FLURN sy-vline 
WA_ANLA_STR-FIAMT sy-vline 
WA_ANLA_STR-STADT sy-vline 
WA_ANLA_STR-GRUND sy-vline 
WA_ANLA_STR-FEINS sy-vline 
WA_ANLA_STR-GRUFL sy-vline 
WA_ANLA_STR-INVNR sy-vline 
WA_ANLA_STR-VBUND sy-vline 
WA_ANLA_STR-SPRAS sy-vline 
WA_ANLA_STR-TXT50 sy-vline 
WA_ANLA_STR-TXA50 sy-vline 
WA_ANLA_STR-XLTXID sy-vline 
WA_ANLA_STR-XVERID sy-vline 
WA_ANLA_STR-XTCHID sy-vline 
WA_ANLA_STR-XKALID sy-vline 
WA_ANLA_STR-XHERID sy-vline 
WA_ANLA_STR-XLEAID sy-vline 
WA_ANLA_STR-LEAFI sy-vline 
WA_ANLA_STR-LVDAT sy-vline 
WA_ANLA_STR-LKDAT sy-vline 
WA_ANLA_STR-LEABG sy-vline 
WA_ANLA_STR-LEJAR sy-vline 
WA_ANLA_STR-LEPER sy-vline 
WA_ANLA_STR-LRYTH sy-vline 
WA_ANLA_STR-LEGEB sy-vline 
WA_ANLA_STR-LBASW sy-vline 
WA_ANLA_STR-LKAUF sy-vline 
WA_ANLA_STR-LMZIN sy-vline 
WA_ANLA_STR-LZINS sy-vline 
WA_ANLA_STR-LTZBW sy-vline 
WA_ANLA_STR-LKUZA sy-vline 
WA_ANLA_STR-LKUZI sy-vline 
WA_ANLA_STR-LLAVB sy-vline 
WA_ANLA_STR-LEANZ sy-vline 
WA_ANLA_STR-LVTNR sy-vline 
WA_ANLA_STR-LETXT sy-vline 
WA_ANLA_STR-XAKTIV sy-vline 
WA_ANLA_STR-ANUPD sy-vline 
WA_ANLA_STR-LBLNR sy-vline 
WA_ANLA_STR-XV0DT sy-vline 
WA_ANLA_STR-XV0NM sy-vline 
WA_ANLA_STR-XV1DT sy-vline 
WA_ANLA_STR-XV1NM sy-vline 
WA_ANLA_STR-XV2DT sy-vline 
WA_ANLA_STR-XV2NM sy-vline 
WA_ANLA_STR-XV3DT sy-vline 
WA_ANLA_STR-XV3NM sy-vline 
WA_ANLA_STR-XV4DT sy-vline 
WA_ANLA_STR-XV4NM sy-vline 
WA_ANLA_STR-XV5DT sy-vline 
WA_ANLA_STR-XV5NM sy-vline 
WA_ANLA_STR-XV6DT sy-vline 
WA_ANLA_STR-XV6NM sy-vline 
WA_ANLA_STR-AIMMO sy-vline 
WA_ANLA_STR-OBJNR sy-vline 
WA_ANLA_STR-LEART sy-vline 
WA_ANLA_STR-LVORS sy-vline 
WA_ANLA_STR-GDLGRP sy-vline 
WA_ANLA_STR-POSNR sy-vline 
WA_ANLA_STR-XERWRT sy-vline 
WA_ANLA_STR-XAFABCH sy-vline 
WA_ANLA_STR-XANLGR sy-vline 
WA_ANLA_STR-MCOA1 sy-vline 
WA_ANLA_STR-XINVM sy-vline 
WA_ANLA_STR-SERNR sy-vline 
WA_ANLA_STR-UMWKZ sy-vline 
WA_ANLA_STR-LRVDAT sy-vline 
WA_ANLA_STR-ACT_CHANGE_PM sy-vline 
WA_ANLA_STR-HAS_TDDP sy-vline 
WA_ANLA_STR-LAST_REORG_DATE sy-vline 
WA_ANLA_STR-LDT_DATE sy-vline 
WA_ANLA_STR-LDT_SEQNO sy-vline 
WA_ANLA_STR-SDM_STATUS sy-vline 
WA_ANLA_STR-DUMMY_FAA_ASSET_INCL_EEW_PS sy-vline 
WA_ANLA_STR-INTERNAL_CODE sy-vline 
WA_ANLA_STR-APPROVAL_NUMBER sy-vline 
WA_ANLA_STR-APPROVAL_VERSION sy-vline 
WA_ANLA_STR-BOGUS_ANLN1 sy-vline 
WA_ANLA_STR-ASSET_VERSION sy-vline      INTO ld_text SEPARATED BY SPACE.

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