ABAP Select data from SAP table V_ANLAK 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 V_ANLAK 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 V_ANLAK. 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 V_ANLAK 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_V_ANLAK TYPE STANDARD TABLE OF V_ANLAK,
      WA_V_ANLAK TYPE V_ANLAK,
      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: <V_ANLAK> TYPE V_ANLAK.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM V_ANLAK
*  INTO TABLE @DATA(IT_V_ANLAK2).
*--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_V_ANLAK INDEX 1 INTO DATA(WA_V_ANLAK2).


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

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

ENDLOOP.

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

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


*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_V_ANLAK-ANLN1
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_V_ANLAK-ANLN1.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit GERNR, internal->external for field SERNR
CALL FUNCTION 'CONVERSION_EXIT_GERNR_OUTPUT'
  EXPORTING
    input =                      WA_V_ANLAK-SERNR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_V_ANLAK-SERNR.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit ALPHA, internal->external for field PRCTR
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_V_ANLAK-PRCTR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_V_ANLAK-PRCTR.
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_V_ANLAK_STR, 
MANDT TYPE STRING,
XANLGR TYPE STRING,
BUKRS TYPE STRING,
ANLN1 TYPE STRING,
ANLN2 TYPE STRING,
BDATU 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,
XINVM TYPE STRING,
SERNR TYPE STRING,
UMWKZ TYPE STRING,
LRVDAT TYPE STRING,
HAS_TDDP TYPE STRING,
LAST_REORG_DATE TYPE STRING,
LDT_DATE TYPE STRING,
ADATU TYPE STRING,
KOSTL TYPE STRING,
WERKS TYPE STRING,
GSBER TYPE STRING,
LSTAR TYPE STRING,
MSFAK TYPE STRING,
XSTIL TYPE STRING,
STORT TYPE STRING,
CAUFN TYPE STRING,
PLAN1 TYPE STRING,
PLAN2 TYPE STRING,
RAUMN TYPE STRING,
IAUFN TYPE STRING,
IPROJ TYPE STRING,
TPLKZ TYPE STRING,
TPLNR TYPE STRING,
TXJCD TYPE STRING,
IPSNR TYPE STRING,
KFZKZ TYPE STRING,
PERNR TYPE STRING,
KOSTLV TYPE STRING,
GEBER TYPE STRING,
FKBER TYPE STRING,
GRANT_NBR TYPE STRING,
FISTL TYPE STRING,
GEBER2 TYPE STRING,
FKBER2 TYPE STRING,
GRANT_NBR2 TYPE STRING,
FISTL2 TYPE STRING,
IMKEY TYPE STRING,
PS_PSP_PNR2 TYPE STRING,
BUDGET_PD TYPE STRING,
BUDGET_PD2 TYPE STRING,
SEGMENT TYPE STRING,
PRCTR TYPE STRING,END OF T_EKKO_STR.
DATA: WA_V_ANLAK_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_V_ANLAK_STR-MANDT sy-vline 
WA_V_ANLAK_STR-XANLGR sy-vline 
WA_V_ANLAK_STR-BUKRS sy-vline 
WA_V_ANLAK_STR-ANLN1 sy-vline 
WA_V_ANLAK_STR-ANLN2 sy-vline 
WA_V_ANLAK_STR-BDATU sy-vline 
WA_V_ANLAK_STR-ANLKL sy-vline 
WA_V_ANLAK_STR-GEGST sy-vline 
WA_V_ANLAK_STR-ANLAR sy-vline 
WA_V_ANLAK_STR-ERNAM sy-vline 
WA_V_ANLAK_STR-ERDAT sy-vline 
WA_V_ANLAK_STR-AENAM sy-vline 
WA_V_ANLAK_STR-AEDAT sy-vline 
WA_V_ANLAK_STR-XLOEV sy-vline 
WA_V_ANLAK_STR-XSPEB sy-vline 
WA_V_ANLAK_STR-FELEI sy-vline 
WA_V_ANLAK_STR-KTOGR sy-vline 
WA_V_ANLAK_STR-XOPVW sy-vline 
WA_V_ANLAK_STR-ANLTP sy-vline 
WA_V_ANLAK_STR-ZUJHR sy-vline 
WA_V_ANLAK_STR-ZUPER sy-vline 
WA_V_ANLAK_STR-ZUGDT sy-vline 
WA_V_ANLAK_STR-AKTIV sy-vline 
WA_V_ANLAK_STR-ABGDT sy-vline 
WA_V_ANLAK_STR-DEAKT sy-vline 
WA_V_ANLAK_STR-GPLAB sy-vline 
WA_V_ANLAK_STR-BSTDT sy-vline 
WA_V_ANLAK_STR-ORD41 sy-vline 
WA_V_ANLAK_STR-ORD42 sy-vline 
WA_V_ANLAK_STR-ORD43 sy-vline 
WA_V_ANLAK_STR-ORD44 sy-vline 
WA_V_ANLAK_STR-ANLUE sy-vline 
WA_V_ANLAK_STR-ZUAWA sy-vline 
WA_V_ANLAK_STR-ANEQK sy-vline 
WA_V_ANLAK_STR-ANEQS sy-vline 
WA_V_ANLAK_STR-LIFNR sy-vline 
WA_V_ANLAK_STR-LAND1 sy-vline 
WA_V_ANLAK_STR-LIEFE sy-vline 
WA_V_ANLAK_STR-HERST sy-vline 
WA_V_ANLAK_STR-EIGKZ sy-vline 
WA_V_ANLAK_STR-AIBN1 sy-vline 
WA_V_ANLAK_STR-AIBN2 sy-vline 
WA_V_ANLAK_STR-AIBDT sy-vline 
WA_V_ANLAK_STR-URJHR sy-vline 
WA_V_ANLAK_STR-URWRT sy-vline 
WA_V_ANLAK_STR-ANTEI sy-vline 
WA_V_ANLAK_STR-PROJN sy-vline 
WA_V_ANLAK_STR-EAUFN sy-vline 
WA_V_ANLAK_STR-MEINS sy-vline 
WA_V_ANLAK_STR-MENGE sy-vline 
WA_V_ANLAK_STR-TYPBZ sy-vline 
WA_V_ANLAK_STR-IZWEK sy-vline 
WA_V_ANLAK_STR-INKEN sy-vline 
WA_V_ANLAK_STR-IVDAT sy-vline 
WA_V_ANLAK_STR-INVZU sy-vline 
WA_V_ANLAK_STR-VMGLI sy-vline 
WA_V_ANLAK_STR-XVRMW sy-vline 
WA_V_ANLAK_STR-WRTMA sy-vline 
WA_V_ANLAK_STR-EHWRT sy-vline 
WA_V_ANLAK_STR-AUFLA sy-vline 
WA_V_ANLAK_STR-EHWZU sy-vline 
WA_V_ANLAK_STR-EHWNR sy-vline 
WA_V_ANLAK_STR-GRUVO sy-vline 
WA_V_ANLAK_STR-GREIN sy-vline 
WA_V_ANLAK_STR-GRBND sy-vline 
WA_V_ANLAK_STR-GRBLT sy-vline 
WA_V_ANLAK_STR-GRLFD sy-vline 
WA_V_ANLAK_STR-FLURK sy-vline 
WA_V_ANLAK_STR-FLURN sy-vline 
WA_V_ANLAK_STR-FIAMT sy-vline 
WA_V_ANLAK_STR-STADT sy-vline 
WA_V_ANLAK_STR-GRUND sy-vline 
WA_V_ANLAK_STR-FEINS sy-vline 
WA_V_ANLAK_STR-GRUFL sy-vline 
WA_V_ANLAK_STR-INVNR sy-vline 
WA_V_ANLAK_STR-VBUND sy-vline 
WA_V_ANLAK_STR-SPRAS sy-vline 
WA_V_ANLAK_STR-TXT50 sy-vline 
WA_V_ANLAK_STR-TXA50 sy-vline 
WA_V_ANLAK_STR-XLTXID sy-vline 
WA_V_ANLAK_STR-XVERID sy-vline 
WA_V_ANLAK_STR-XTCHID sy-vline 
WA_V_ANLAK_STR-XKALID sy-vline 
WA_V_ANLAK_STR-XHERID sy-vline 
WA_V_ANLAK_STR-XLEAID sy-vline 
WA_V_ANLAK_STR-LEAFI sy-vline 
WA_V_ANLAK_STR-LVDAT sy-vline 
WA_V_ANLAK_STR-LKDAT sy-vline 
WA_V_ANLAK_STR-LEABG sy-vline 
WA_V_ANLAK_STR-LEJAR sy-vline 
WA_V_ANLAK_STR-LEPER sy-vline 
WA_V_ANLAK_STR-LRYTH sy-vline 
WA_V_ANLAK_STR-LEGEB sy-vline 
WA_V_ANLAK_STR-LBASW sy-vline 
WA_V_ANLAK_STR-LKAUF sy-vline 
WA_V_ANLAK_STR-LMZIN sy-vline 
WA_V_ANLAK_STR-LZINS sy-vline 
WA_V_ANLAK_STR-LTZBW sy-vline 
WA_V_ANLAK_STR-LKUZA sy-vline 
WA_V_ANLAK_STR-LKUZI sy-vline 
WA_V_ANLAK_STR-LLAVB sy-vline 
WA_V_ANLAK_STR-LEANZ sy-vline 
WA_V_ANLAK_STR-LVTNR sy-vline 
WA_V_ANLAK_STR-LETXT sy-vline 
WA_V_ANLAK_STR-XAKTIV sy-vline 
WA_V_ANLAK_STR-ANUPD sy-vline 
WA_V_ANLAK_STR-LBLNR sy-vline 
WA_V_ANLAK_STR-XV0DT sy-vline 
WA_V_ANLAK_STR-XV0NM sy-vline 
WA_V_ANLAK_STR-XV1DT sy-vline 
WA_V_ANLAK_STR-XV1NM sy-vline 
WA_V_ANLAK_STR-XV2DT sy-vline 
WA_V_ANLAK_STR-XV2NM sy-vline 
WA_V_ANLAK_STR-XV3DT sy-vline 
WA_V_ANLAK_STR-XV3NM sy-vline 
WA_V_ANLAK_STR-XV4DT sy-vline 
WA_V_ANLAK_STR-XV4NM sy-vline 
WA_V_ANLAK_STR-XV5DT sy-vline 
WA_V_ANLAK_STR-XV5NM sy-vline 
WA_V_ANLAK_STR-XV6DT sy-vline 
WA_V_ANLAK_STR-XV6NM sy-vline 
WA_V_ANLAK_STR-AIMMO sy-vline 
WA_V_ANLAK_STR-OBJNR sy-vline 
WA_V_ANLAK_STR-LEART sy-vline 
WA_V_ANLAK_STR-LVORS sy-vline 
WA_V_ANLAK_STR-GDLGRP sy-vline 
WA_V_ANLAK_STR-POSNR sy-vline 
WA_V_ANLAK_STR-XERWRT sy-vline 
WA_V_ANLAK_STR-XAFABCH sy-vline 
WA_V_ANLAK_STR-XINVM sy-vline 
WA_V_ANLAK_STR-SERNR sy-vline 
WA_V_ANLAK_STR-UMWKZ sy-vline 
WA_V_ANLAK_STR-LRVDAT sy-vline 
WA_V_ANLAK_STR-HAS_TDDP sy-vline 
WA_V_ANLAK_STR-LAST_REORG_DATE sy-vline 
WA_V_ANLAK_STR-LDT_DATE sy-vline 
WA_V_ANLAK_STR-ADATU sy-vline 
WA_V_ANLAK_STR-KOSTL sy-vline 
WA_V_ANLAK_STR-WERKS sy-vline 
WA_V_ANLAK_STR-GSBER sy-vline 
WA_V_ANLAK_STR-LSTAR sy-vline 
WA_V_ANLAK_STR-MSFAK sy-vline 
WA_V_ANLAK_STR-XSTIL sy-vline 
WA_V_ANLAK_STR-STORT sy-vline 
WA_V_ANLAK_STR-CAUFN sy-vline 
WA_V_ANLAK_STR-PLAN1 sy-vline 
WA_V_ANLAK_STR-PLAN2 sy-vline 
WA_V_ANLAK_STR-RAUMN sy-vline 
WA_V_ANLAK_STR-IAUFN sy-vline 
WA_V_ANLAK_STR-IPROJ sy-vline 
WA_V_ANLAK_STR-TPLKZ sy-vline 
WA_V_ANLAK_STR-TPLNR sy-vline 
WA_V_ANLAK_STR-TXJCD sy-vline 
WA_V_ANLAK_STR-IPSNR sy-vline 
WA_V_ANLAK_STR-KFZKZ sy-vline 
WA_V_ANLAK_STR-PERNR sy-vline 
WA_V_ANLAK_STR-KOSTLV sy-vline 
WA_V_ANLAK_STR-GEBER sy-vline 
WA_V_ANLAK_STR-FKBER sy-vline 
WA_V_ANLAK_STR-GRANT_NBR sy-vline 
WA_V_ANLAK_STR-FISTL sy-vline 
WA_V_ANLAK_STR-GEBER2 sy-vline 
WA_V_ANLAK_STR-FKBER2 sy-vline 
WA_V_ANLAK_STR-GRANT_NBR2 sy-vline 
WA_V_ANLAK_STR-FISTL2 sy-vline 
WA_V_ANLAK_STR-IMKEY sy-vline 
WA_V_ANLAK_STR-PS_PSP_PNR2 sy-vline 
WA_V_ANLAK_STR-BUDGET_PD sy-vline 
WA_V_ANLAK_STR-BUDGET_PD2 sy-vline 
WA_V_ANLAK_STR-SEGMENT sy-vline 
WA_V_ANLAK_STR-PRCTR sy-vline      INTO ld_text SEPARATED BY SPACE.

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