ABAP Select data from SAP table FICA_INV_S_ITEM 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 FICA_INV_S_ITEM 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 FICA_INV_S_ITEM. 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 FICA_INV_S_ITEM 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_FICA_INV_S_ITEM TYPE STANDARD TABLE OF FICA_INV_S_ITEM,
      WA_FICA_INV_S_ITEM TYPE FICA_INV_S_ITEM,
      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: <FICA_INV_S_ITEM> TYPE FICA_INV_S_ITEM.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM FICA_INV_S_ITEM
*  INTO TABLE @DATA(IT_FICA_INV_S_ITEM2).
*--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_FICA_INV_S_ITEM INDEX 1 INTO DATA(WA_FICA_INV_S_ITEM2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<FICA_INV_S_ITEM>-WA_ITEM = 1.
<FICA_INV_S_ITEM>-MANDT = 1.
<FICA_INV_S_ITEM>-INVDOCNO = 1.
<FICA_INV_S_ITEM>-INVDOCITEM = 1.
<FICA_INV_S_ITEM>-ITEMTYPE = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_FICA_INV_S_ITEM-BUKRS, sy-vline,
  WA_FICA_INV_S_ITEM-SPART, sy-vline,
  WA_FICA_INV_S_ITEM-VTREF, sy-vline,
  WA_FICA_INV_S_ITEM-VTPOS, sy-vline,
  WA_FICA_INV_S_ITEM-SUBAP, sy-vline,
  WA_FICA_INV_S_ITEM-GPART_A, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_FICA_INV_S_ITEM 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_FICA_INV_S_ITEM 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_FICA_INV_S_ITEM INTO WA_FICA_INV_S_ITEM.


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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit ISOLA, internal->external for field LANGU
CALL FUNCTION 'CONVERSION_EXIT_ISOLA_OUTPUT'
  EXPORTING
    input =                      WA_FICA_INV_S_ITEM-LANGU
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_FICA_INV_S_ITEM-LANGU.
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_FICA_INV_S_ITEM_STR, 
WA_ITEM TYPE STRING,
MANDT TYPE STRING,
INVDOCNO TYPE STRING,
INVDOCITEM TYPE STRING,
ITEMTYPE TYPE STRING,
BUKRS TYPE STRING,
SPART TYPE STRING,
VTREF TYPE STRING,
VTPOS TYPE STRING,
SUBAP TYPE STRING,
GPART_A TYPE STRING,
VKONT_A TYPE STRING,
GPVKT_A_CAT TYPE STRING,
HVORG TYPE STRING,
TVORG TYPE STRING,
ITEM_SIMULATED TYPE STRING,
REVERSALITEM TYPE STRING,
CORRCAT TYPE STRING,
TOTALREL TYPE STRING,
POSTREL TYPE STRING,
NOT_BPREL TYPE STRING,
PRINTREL TYPE STRING,
PRINT_SUBSTITUTE TYPE STRING,
WAERS TYPE STRING,
BETRW TYPE STRING,
SRCDOC_CURR TYPE STRING,
SRCDOC_AMT TYPE STRING,
CURRC_GROUP TYPE STRING,
KOFIZ TYPE STRING,
BUPLA TYPE STRING,
GSBER TYPE STRING,
TAX_INCLUDED TYPE STRING,
TAX_DET_TYPE TYPE STRING,
TAXGR TYPE STRING,
STRKZ TYPE STRING,
MWSKZ TYPE STRING,
ERMWSKZ TYPE STRING,
TXJCD TYPE STRING,
KTOSL TYPE STRING,
KSCHL TYPE STRING,
TAX_PERC TYPE STRING,
TAX_COUNTRY TYPE STRING,
TXDAT TYPE STRING,
SBASW TYPE STRING,
SBETW TYPE STRING,
STTAX TYPE STRING,
QSSKZ TYPE STRING,
XANZA TYPE STRING,
STAKZ TYPE STRING,
OFFSET_CAT TYPE STRING,
OFFSET_PROC TYPE STRING,
OFFSET_ACTION TYPE STRING,
OFFSET_INVGR TYPE STRING,
DEFREV_STAT TYPE STRING,
RAREL TYPE STRING,
RA_INVGR TYPE STRING,
SERVICE_TYPE TYPE STRING,
BILLAC_TYPE TYPE STRING,
PREPAID TYPE STRING,
MEINS TYPE STRING,
MENGE TYPE STRING,
FAEDN TYPE STRING,
FAEDS TYPE STRING,
SKTPZ TYPE STRING,
XSTUND TYPE STRING,
DATE_FROM TYPE STRING,
DATE_TO TYPE STRING,
CADOCTYPE TYPE STRING,
OPBEL TYPE STRING,
PSGRP TYPE STRING,
INVGR TYPE STRING,
AUGBL TYPE STRING,
AUGBW TYPE STRING,
ITEM_CRMET TYPE STRING,
INV_FUNCTION TYPE STRING,
SRCDOCCAT TYPE STRING,
SRCDOCNO TYPE STRING,
SRCITEMCAT TYPE STRING,
SRCDOCITEM TYPE STRING,
DISCKEY TYPE STRING,
DISCKEY_VERSNO TYPE STRING,
DUMMY_INVDOC_I_INCL_EEW_PS TYPE STRING,
WA_INVBI_HEAD TYPE STRING,
MANDT TYPE STRING,
BILLDOCNO TYPE STRING,
REFDOCNO TYPE STRING,
LOG_SYSTEM TYPE STRING,
APPLK TYPE STRING,
SRCPROCESS TYPE STRING,
SRCDOCTYPE TYPE STRING,
TECHDOCTYPE TYPE STRING,
DOCTYPE TYPE STRING,
TARGPROCESS TYPE STRING,
GPART TYPE STRING,
VKONT TYPE STRING,
MDCAT TYPE STRING,
GPART_INV TYPE STRING,
VKONT_INV TYPE STRING,
DATE_FROM TYPE STRING,
DATE_TO TYPE STRING,
BILL_BASEDATE TYPE STRING,
SIMULATED TYPE STRING,
BILL_CURR TYPE STRING,
INV_CURR TYPE STRING,
TAX_DET_TYPE TYPE STRING,
TAX_DATE_TYPE TYPE STRING,
INV_CATEGORY TYPE STRING,
SEPARATE_INV TYPE STRING,
INVOICE_FIRST TYPE STRING,
REVREASON TYPE STRING,
REVERSALDOC TYPE STRING,
REVERSEDDOC TYPE STRING,
ADJUSTMENTDOC TYPE STRING,
ADJUSTEDDOC TYPE STRING,
CORRCAT TYPE STRING,
TRIGDELETED TYPE STRING,
XINFBILL TYPE STRING,
XBILLAC TYPE STRING,
INVLOCK TYPE STRING,
INVSTATUS TYPE STRING,
INVDOCNO TYPE STRING,
INVCRDATE TYPE STRING,
ADD_GROUP TYPE STRING,
XINVBILL_X TYPE STRING,
RECNUM TYPE STRING,
KEYPP TYPE STRING,
CRNAME TYPE STRING,
CRDATE TYPE STRING,
CRTIME TYPE STRING,
BILLRUNNO TYPE STRING,
BILL_PROCESS TYPE STRING,
BILL_TYPE TYPE STRING,
PREPAID_INCL TYPE STRING,
PPREFILL_INCL TYPE STRING,
REVREC_INCL TYPE STRING,
ALTMD_ORIG_INCL TYPE STRING,
PTSRL TYPE STRING,
DUMMY_INVBILL_H_INCL_EEW_PS TYPE STRING,
ARCHIVED TYPE STRING,
NOT_SAVED TYPE STRING,
WA_INVBI_ITEM TYPE STRING,
MANDT TYPE STRING,
BILLDOCNO TYPE STRING,
BILLDOCITEM TYPE STRING,
REFITEM TYPE STRING,
ITEMTYPE TYPE STRING,
BILL_AMOUNT TYPE STRING,
BILL_CURR TYPE STRING,
ITEM_SIMULATED TYPE STRING,
REVERSALITEM TYPE STRING,
CORRCAT TYPE STRING,
POSTREL TYPE STRING,
NOT_BPREL TYPE STRING,
PRINTREL TYPE STRING,
PRINT_SUBSTITUTE TYPE STRING,
DATE_FROM TYPE STRING,
DATE_TO TYPE STRING,
FAEDN TYPE STRING,
SPART TYPE STRING,
BUKRS TYPE STRING,
GSBER TYPE STRING,
BUPLA TYPE STRING,
SEGMT TYPE STRING,
PRCTR TYPE STRING,
HVORG TYPE STRING,
TVORG TYPE STRING,
KOFIZ TYPE STRING,
TAX_DET_TYPE TYPE STRING,
TAX_COUNTRY TYPE STRING,
TAX_DATE_TYPE TYPE STRING,
TAX_INCLUDED TYPE STRING,
TAX_GROUP TYPE STRING,
EXT_TAX_DATE TYPE STRING,
ERMWSKZ TYPE STRING,
MWSKZ TYPE STRING,
ERMWSKZ_B2B TYPE STRING,
MWSKZ_B2B TYPE STRING,
STRKZ TYPE STRING,
TXJCD TYPE STRING,
QSSKZ TYPE STRING,
XANZA TYPE STRING,
STAKZ TYPE STRING,
DEFREV_CAT TYPE STRING,
DEFREV_PDATE TYPE STRING,
DEFREV_STAT TYPE STRING,
RAREL TYPE STRING,
BILLAC_TYPE TYPE STRING,
SERVICE_TYPE TYPE STRING,
QTY_UNIT TYPE STRING,
QTY_BW_REL TYPE STRING,
QTY_FI_CO_REL TYPE STRING,
ALTMD_ORIG TYPE STRING,
VTREF TYPE STRING,
VTPOS TYPE STRING,
SUBAP TYPE STRING,
PREPAID TYPE STRING,
PPREFILL TYPE STRING,
PSCAT TYPE STRING,
DITTYPE TYPE STRING,
ITEM_CRMET TYPE STRING,
BILL_FUNCTION TYPE STRING,
ADD_GROUP TYPE STRING,
PY_GROUP TYPE STRING,
SRC_GROUP TYPE STRING,
DISC_GROUP TYPE STRING,
SEC_REASON TYPE STRING,
BILLREQRSN TYPE STRING,
DISCKEY TYPE STRING,
DISCKEY_VERSNO TYPE STRING,
CONDITION_TYPE TYPE STRING,
QUANTITY TYPE STRING,
DUMMY_INVBILL_I_INCL_EEW_PS TYPE STRING,
WA_SUBIN_HEAD TYPE STRING,
MANDT TYPE STRING,
INVDOCNO TYPE STRING,
APPLK TYPE STRING,
INV_PROCESS TYPE STRING,
INV_TYPE TYPE STRING,
INV_CATEGORY TYPE STRING,
TECHDOCTYPE TYPE STRING,
TARGPROCESS TYPE STRING,
GPART TYPE STRING,
VKONT TYPE STRING,
MDCAT TYPE STRING,
ABWVK TYPE STRING,
ABWBL TYPE STRING,
CRNAME TYPE STRING,
CRDATE TYPE STRING,
CRTIME TYPE STRING,
CRMODE TYPE STRING,
RECNUM TYPE STRING,
INVRUNNO TYPE STRING,
FIKEY TYPE STRING,
BUDAT TYPE STRING,
BLDAT TYPE STRING,
FAEDN TYPE STRING,
FAEDS TYPE STRING,
SKTPZ TYPE STRING,
TOTAL_CURR TYPE STRING,
TOTAL_AMT TYPE STRING,
INVOICED TYPE STRING,
SIMULATED TYPE STRING,
PRELIMINARY TYPE STRING,
PRLINV_CAT TYPE STRING,
PRLINV_CNT TYPE STRING,
PRLINV_STATUS TYPE STRING,
REVREASON TYPE STRING,
REVERSALDOC TYPE STRING,
REVERSEDDOC TYPE STRING,
CORRCAT TYPE STRING,
PRINTDATE TYPE STRING,
PRINTLOCK TYPE STRING,
PYMET TYPE STRING,
NRZAS TYPE STRING,
FORM_ID TYPE STRING,
FORMKEY TYPE STRING,
ZLSCH TYPE STRING,
DOCTYPE TYPE STRING,
EXKID TYPE STRING,
EXBEL TYPE STRING,
PTSRL TYPE STRING,
BUKRS TYPE STRING,
BUPLA TYPE STRING,
VTREF TYPE STRING,
SUBAP TYPE STRING,
INVOICE_BASEDATE TYPE STRING,
INVPERCAT TYPE STRING,
INVPERIOD TYPE STRING,
INVPERIOD_FROM TYPE STRING,
MAZAE TYPE STRING,
CHGDOC_EX TYPE STRING,
CFCSIMULATED TYPE STRING,
BOLLOTAX TYPE STRING,
XSUBINV TYPE STRING,
XINVDOC_X TYPE STRING,
SEPA_PRENOT TYPE STRING,
EXT_INVDOCNO TYPE STRING,
DUMMY_INVDOC_H_INCL_EEW_PS TYPE STRING,
ARCHIVED TYPE STRING,
REVARCH TYPE STRING,
NOT_SAVED TYPE STRING,
WA_CADOCTYPE TYPE STRING,
LANGU TYPE STRING,
CADOCTYPE TYPE STRING,
TEXT TYPE STRING,
WA_ITEMTYPE TYPE STRING,
MANDT TYPE STRING,
LANGU TYPE STRING,
ITEMTYPE TYPE STRING,
TEXT TYPE STRING,
WA_BPCA_A_CAT TYPE STRING,
DOMNAME TYPE STRING,
VALPOS TYPE STRING,
DDLANGUAGE TYPE STRING,
DOMVALUE_L TYPE STRING,
DOMVALUE_H TYPE STRING,
DDTEXT TYPE STRING,
DOMVAL_LD TYPE STRING,
DOMVAL_HD TYPE STRING,
APPVAL TYPE STRING,
WA_COCODE TYPE STRING,
MANDT TYPE STRING,
BUKRS TYPE STRING,
BUTXT TYPE STRING,
ORT01 TYPE STRING,
LAND1 TYPE STRING,
WAERS TYPE STRING,
SPRAS TYPE STRING,
KTOPL TYPE STRING,
WAABW TYPE STRING,
PERIV TYPE STRING,
KOKFI TYPE STRING,
RCOMP TYPE STRING,
ADRNR TYPE STRING,
STCEG TYPE STRING,
FIKRS TYPE STRING,
XFMCO TYPE STRING,
XFMCB TYPE STRING,
XFMCA TYPE STRING,
TXJCD TYPE STRING,
FMHRDATE TYPE STRING,
XTEMPLT TYPE STRING,
TRANSIT_PLANT TYPE STRING,
BUVAR TYPE STRING,
FDBUK TYPE STRING,
XFDIS TYPE STRING,
XVALV TYPE STRING,
XSKFN TYPE STRING,
KKBER TYPE STRING,
XMWSN TYPE STRING,
MREGL TYPE STRING,
XGSBE TYPE STRING,
XGJRV TYPE STRING,
XKDFT TYPE STRING,
XPROD TYPE STRING,
XEINK TYPE STRING,
XJVAA TYPE STRING,
XVVWA TYPE STRING,
XSLTA TYPE STRING,
XFDMM TYPE STRING,
XFDSD TYPE STRING,
XEXTB TYPE STRING,
EBUKR TYPE STRING,
KTOP2 TYPE STRING,
UMKRS TYPE STRING,
BUKRS_GLOB TYPE STRING,
FSTVA TYPE STRING,
OPVAR TYPE STRING,
XCOVR TYPE STRING,
TXKRS TYPE STRING,
WFVAR TYPE STRING,
XBBBF TYPE STRING,
XBBBE TYPE STRING,
XBBBA TYPE STRING,
XBBKO TYPE STRING,
XSTDT TYPE STRING,
MWSKV TYPE STRING,
MWSKA TYPE STRING,
IMPDA TYPE STRING,
XNEGP TYPE STRING,
XKKBI TYPE STRING,
WT_NEWWT TYPE STRING,
PP_PDATE TYPE STRING,
INFMT TYPE STRING,
FSTVARE TYPE STRING,
KOPIM TYPE STRING,
DKWEG TYPE STRING,
OFFSACCT TYPE STRING,
BAPOVAR TYPE STRING,
XCOS TYPE STRING,
XCESSION TYPE STRING,
XSPLT TYPE STRING,
SURCCM TYPE STRING,
DTPROV TYPE STRING,
DTAMTC TYPE STRING,
DTTAXC TYPE STRING,
DTTDSP TYPE STRING,
DTAXR TYPE STRING,
XVATDATE TYPE STRING,
PST_PER_VAR TYPE STRING,
XBBSC TYPE STRING,
F_OBSOLETE TYPE STRING,
FM_DERIVE_ACC TYPE STRING,
WA_DEVISION TYPE STRING,
MANDT TYPE STRING,
SPRAS TYPE STRING,
SPART TYPE STRING,
VTEXT TYPE STRING,
WA_MAINTRANST TYPE STRING,
MANDT TYPE STRING,
SPRAS TYPE STRING,
APPLK TYPE STRING,
HVORG TYPE STRING,
TXT30 TYPE STRING,
WA_SUBTRANST TYPE STRING,
MANDT TYPE STRING,
SPRAS TYPE STRING,
APPLK TYPE STRING,
HVORG TYPE STRING,
TVORG TYPE STRING,
TXT30 TYPE STRING,
WA_PRVCTR_INV TYPE STRING,
VTITT TYPE STRING,
PRDNR TYPE STRING,
VTBEZ TYPE STRING,
SHTXT TYPE STRING,
WA_SRC_CURC_I TYPE STRING,
MANDT TYPE STRING,
WAERS TYPE STRING,
ISOCD TYPE STRING,
ALTWR TYPE STRING,
GDATU TYPE STRING,
XPRIMARY TYPE STRING,
WA_DISCKEY TYPE STRING,
MANDT TYPE STRING,
LANGU TYPE STRING,
DISCKEY TYPE STRING,
TEXT TYPE STRING,
WA_DISC_UTIL TYPE STRING,
DOMNAME TYPE STRING,
VALPOS TYPE STRING,
DDLANGUAGE TYPE STRING,
DOMVALUE_L TYPE STRING,
DOMVALUE_H TYPE STRING,
DDTEXT TYPE STRING,
DOMVAL_LD TYPE STRING,
DOMVAL_HD TYPE STRING,
APPVAL TYPE STRING,
WA_MA_AGD TYPE STRING,
AGRMT TYPE STRING,
AGRTY TYPE STRING,
WA_MA_AGD_T TYPE STRING,
AGRMT_DESCR TYPE STRING,
LANGU TYPE STRING,
T_INVBI_ADD TYPE STRING,
T_BIREQH_INV TYPE STRING,
T_PRD_CNFG_I TYPE STRING,END OF T_EKKO_STR.
DATA: WA_FICA_INV_S_ITEM_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_FICA_INV_S_ITEM_STR-WA_ITEM sy-vline 
WA_FICA_INV_S_ITEM_STR-MANDT sy-vline 
WA_FICA_INV_S_ITEM_STR-INVDOCNO sy-vline 
WA_FICA_INV_S_ITEM_STR-INVDOCITEM sy-vline 
WA_FICA_INV_S_ITEM_STR-ITEMTYPE sy-vline 
WA_FICA_INV_S_ITEM_STR-BUKRS sy-vline 
WA_FICA_INV_S_ITEM_STR-SPART sy-vline 
WA_FICA_INV_S_ITEM_STR-VTREF sy-vline 
WA_FICA_INV_S_ITEM_STR-VTPOS sy-vline 
WA_FICA_INV_S_ITEM_STR-SUBAP sy-vline 
WA_FICA_INV_S_ITEM_STR-GPART_A sy-vline 
WA_FICA_INV_S_ITEM_STR-VKONT_A sy-vline 
WA_FICA_INV_S_ITEM_STR-GPVKT_A_CAT sy-vline 
WA_FICA_INV_S_ITEM_STR-HVORG sy-vline 
WA_FICA_INV_S_ITEM_STR-TVORG sy-vline 
WA_FICA_INV_S_ITEM_STR-ITEM_SIMULATED sy-vline 
WA_FICA_INV_S_ITEM_STR-REVERSALITEM sy-vline 
WA_FICA_INV_S_ITEM_STR-CORRCAT sy-vline 
WA_FICA_INV_S_ITEM_STR-TOTALREL sy-vline 
WA_FICA_INV_S_ITEM_STR-POSTREL sy-vline 
WA_FICA_INV_S_ITEM_STR-NOT_BPREL sy-vline 
WA_FICA_INV_S_ITEM_STR-PRINTREL sy-vline 
WA_FICA_INV_S_ITEM_STR-PRINT_SUBSTITUTE sy-vline 
WA_FICA_INV_S_ITEM_STR-WAERS sy-vline 
WA_FICA_INV_S_ITEM_STR-BETRW sy-vline 
WA_FICA_INV_S_ITEM_STR-SRCDOC_CURR sy-vline 
WA_FICA_INV_S_ITEM_STR-SRCDOC_AMT sy-vline 
WA_FICA_INV_S_ITEM_STR-CURRC_GROUP sy-vline 
WA_FICA_INV_S_ITEM_STR-KOFIZ sy-vline 
WA_FICA_INV_S_ITEM_STR-BUPLA sy-vline 
WA_FICA_INV_S_ITEM_STR-GSBER sy-vline 
WA_FICA_INV_S_ITEM_STR-TAX_INCLUDED sy-vline 
WA_FICA_INV_S_ITEM_STR-TAX_DET_TYPE sy-vline 
WA_FICA_INV_S_ITEM_STR-TAXGR sy-vline 
WA_FICA_INV_S_ITEM_STR-STRKZ sy-vline 
WA_FICA_INV_S_ITEM_STR-MWSKZ sy-vline 
WA_FICA_INV_S_ITEM_STR-ERMWSKZ sy-vline 
WA_FICA_INV_S_ITEM_STR-TXJCD sy-vline 
WA_FICA_INV_S_ITEM_STR-KTOSL sy-vline 
WA_FICA_INV_S_ITEM_STR-KSCHL sy-vline 
WA_FICA_INV_S_ITEM_STR-TAX_PERC sy-vline 
WA_FICA_INV_S_ITEM_STR-TAX_COUNTRY sy-vline 
WA_FICA_INV_S_ITEM_STR-TXDAT sy-vline 
WA_FICA_INV_S_ITEM_STR-SBASW sy-vline 
WA_FICA_INV_S_ITEM_STR-SBETW sy-vline 
WA_FICA_INV_S_ITEM_STR-STTAX sy-vline 
WA_FICA_INV_S_ITEM_STR-QSSKZ sy-vline 
WA_FICA_INV_S_ITEM_STR-XANZA sy-vline 
WA_FICA_INV_S_ITEM_STR-STAKZ sy-vline 
WA_FICA_INV_S_ITEM_STR-OFFSET_CAT sy-vline 
WA_FICA_INV_S_ITEM_STR-OFFSET_PROC sy-vline 
WA_FICA_INV_S_ITEM_STR-OFFSET_ACTION sy-vline 
WA_FICA_INV_S_ITEM_STR-OFFSET_INVGR sy-vline 
WA_FICA_INV_S_ITEM_STR-DEFREV_STAT sy-vline 
WA_FICA_INV_S_ITEM_STR-RAREL sy-vline 
WA_FICA_INV_S_ITEM_STR-RA_INVGR sy-vline 
WA_FICA_INV_S_ITEM_STR-SERVICE_TYPE sy-vline 
WA_FICA_INV_S_ITEM_STR-BILLAC_TYPE sy-vline 
WA_FICA_INV_S_ITEM_STR-PREPAID sy-vline 
WA_FICA_INV_S_ITEM_STR-MEINS sy-vline 
WA_FICA_INV_S_ITEM_STR-MENGE sy-vline 
WA_FICA_INV_S_ITEM_STR-FAEDN sy-vline 
WA_FICA_INV_S_ITEM_STR-FAEDS sy-vline 
WA_FICA_INV_S_ITEM_STR-SKTPZ sy-vline 
WA_FICA_INV_S_ITEM_STR-XSTUND sy-vline 
WA_FICA_INV_S_ITEM_STR-DATE_FROM sy-vline 
WA_FICA_INV_S_ITEM_STR-DATE_TO sy-vline 
WA_FICA_INV_S_ITEM_STR-CADOCTYPE sy-vline 
WA_FICA_INV_S_ITEM_STR-OPBEL sy-vline 
WA_FICA_INV_S_ITEM_STR-PSGRP sy-vline 
WA_FICA_INV_S_ITEM_STR-INVGR sy-vline 
WA_FICA_INV_S_ITEM_STR-AUGBL sy-vline 
WA_FICA_INV_S_ITEM_STR-AUGBW sy-vline 
WA_FICA_INV_S_ITEM_STR-ITEM_CRMET sy-vline 
WA_FICA_INV_S_ITEM_STR-INV_FUNCTION sy-vline 
WA_FICA_INV_S_ITEM_STR-SRCDOCCAT sy-vline 
WA_FICA_INV_S_ITEM_STR-SRCDOCNO sy-vline 
WA_FICA_INV_S_ITEM_STR-SRCITEMCAT sy-vline 
WA_FICA_INV_S_ITEM_STR-SRCDOCITEM sy-vline 
WA_FICA_INV_S_ITEM_STR-DISCKEY sy-vline 
WA_FICA_INV_S_ITEM_STR-DISCKEY_VERSNO sy-vline 
WA_FICA_INV_S_ITEM_STR-DUMMY_INVDOC_I_INCL_EEW_PS sy-vline 
WA_FICA_INV_S_ITEM_STR-WA_INVBI_HEAD sy-vline 
WA_FICA_INV_S_ITEM_STR-MANDT sy-vline 
WA_FICA_INV_S_ITEM_STR-BILLDOCNO sy-vline 
WA_FICA_INV_S_ITEM_STR-REFDOCNO sy-vline 
WA_FICA_INV_S_ITEM_STR-LOG_SYSTEM sy-vline 
WA_FICA_INV_S_ITEM_STR-APPLK sy-vline 
WA_FICA_INV_S_ITEM_STR-SRCPROCESS sy-vline 
WA_FICA_INV_S_ITEM_STR-SRCDOCTYPE sy-vline 
WA_FICA_INV_S_ITEM_STR-TECHDOCTYPE sy-vline 
WA_FICA_INV_S_ITEM_STR-DOCTYPE sy-vline 
WA_FICA_INV_S_ITEM_STR-TARGPROCESS sy-vline 
WA_FICA_INV_S_ITEM_STR-GPART sy-vline 
WA_FICA_INV_S_ITEM_STR-VKONT sy-vline 
WA_FICA_INV_S_ITEM_STR-MDCAT sy-vline 
WA_FICA_INV_S_ITEM_STR-GPART_INV sy-vline 
WA_FICA_INV_S_ITEM_STR-VKONT_INV sy-vline 
WA_FICA_INV_S_ITEM_STR-DATE_FROM sy-vline 
WA_FICA_INV_S_ITEM_STR-DATE_TO sy-vline 
WA_FICA_INV_S_ITEM_STR-BILL_BASEDATE sy-vline 
WA_FICA_INV_S_ITEM_STR-SIMULATED sy-vline 
WA_FICA_INV_S_ITEM_STR-BILL_CURR sy-vline 
WA_FICA_INV_S_ITEM_STR-INV_CURR sy-vline 
WA_FICA_INV_S_ITEM_STR-TAX_DET_TYPE sy-vline 
WA_FICA_INV_S_ITEM_STR-TAX_DATE_TYPE sy-vline 
WA_FICA_INV_S_ITEM_STR-INV_CATEGORY sy-vline 
WA_FICA_INV_S_ITEM_STR-SEPARATE_INV sy-vline 
WA_FICA_INV_S_ITEM_STR-INVOICE_FIRST sy-vline 
WA_FICA_INV_S_ITEM_STR-REVREASON sy-vline 
WA_FICA_INV_S_ITEM_STR-REVERSALDOC sy-vline 
WA_FICA_INV_S_ITEM_STR-REVERSEDDOC sy-vline 
WA_FICA_INV_S_ITEM_STR-ADJUSTMENTDOC sy-vline 
WA_FICA_INV_S_ITEM_STR-ADJUSTEDDOC sy-vline 
WA_FICA_INV_S_ITEM_STR-CORRCAT sy-vline 
WA_FICA_INV_S_ITEM_STR-TRIGDELETED sy-vline 
WA_FICA_INV_S_ITEM_STR-XINFBILL sy-vline 
WA_FICA_INV_S_ITEM_STR-XBILLAC sy-vline 
WA_FICA_INV_S_ITEM_STR-INVLOCK sy-vline 
WA_FICA_INV_S_ITEM_STR-INVSTATUS sy-vline 
WA_FICA_INV_S_ITEM_STR-INVDOCNO sy-vline 
WA_FICA_INV_S_ITEM_STR-INVCRDATE sy-vline 
WA_FICA_INV_S_ITEM_STR-ADD_GROUP sy-vline 
WA_FICA_INV_S_ITEM_STR-XINVBILL_X sy-vline 
WA_FICA_INV_S_ITEM_STR-RECNUM sy-vline 
WA_FICA_INV_S_ITEM_STR-KEYPP sy-vline 
WA_FICA_INV_S_ITEM_STR-CRNAME sy-vline 
WA_FICA_INV_S_ITEM_STR-CRDATE sy-vline 
WA_FICA_INV_S_ITEM_STR-CRTIME sy-vline 
WA_FICA_INV_S_ITEM_STR-BILLRUNNO sy-vline 
WA_FICA_INV_S_ITEM_STR-BILL_PROCESS sy-vline 
WA_FICA_INV_S_ITEM_STR-BILL_TYPE sy-vline 
WA_FICA_INV_S_ITEM_STR-PREPAID_INCL sy-vline 
WA_FICA_INV_S_ITEM_STR-PPREFILL_INCL sy-vline 
WA_FICA_INV_S_ITEM_STR-REVREC_INCL sy-vline 
WA_FICA_INV_S_ITEM_STR-ALTMD_ORIG_INCL sy-vline 
WA_FICA_INV_S_ITEM_STR-PTSRL sy-vline 
WA_FICA_INV_S_ITEM_STR-DUMMY_INVBILL_H_INCL_EEW_PS sy-vline 
WA_FICA_INV_S_ITEM_STR-ARCHIVED sy-vline 
WA_FICA_INV_S_ITEM_STR-NOT_SAVED sy-vline 
WA_FICA_INV_S_ITEM_STR-WA_INVBI_ITEM sy-vline 
WA_FICA_INV_S_ITEM_STR-MANDT sy-vline 
WA_FICA_INV_S_ITEM_STR-BILLDOCNO sy-vline 
WA_FICA_INV_S_ITEM_STR-BILLDOCITEM sy-vline 
WA_FICA_INV_S_ITEM_STR-REFITEM sy-vline 
WA_FICA_INV_S_ITEM_STR-ITEMTYPE sy-vline 
WA_FICA_INV_S_ITEM_STR-BILL_AMOUNT sy-vline 
WA_FICA_INV_S_ITEM_STR-BILL_CURR sy-vline 
WA_FICA_INV_S_ITEM_STR-ITEM_SIMULATED sy-vline 
WA_FICA_INV_S_ITEM_STR-REVERSALITEM sy-vline 
WA_FICA_INV_S_ITEM_STR-CORRCAT sy-vline 
WA_FICA_INV_S_ITEM_STR-POSTREL sy-vline 
WA_FICA_INV_S_ITEM_STR-NOT_BPREL sy-vline 
WA_FICA_INV_S_ITEM_STR-PRINTREL sy-vline 
WA_FICA_INV_S_ITEM_STR-PRINT_SUBSTITUTE sy-vline 
WA_FICA_INV_S_ITEM_STR-DATE_FROM sy-vline 
WA_FICA_INV_S_ITEM_STR-DATE_TO sy-vline 
WA_FICA_INV_S_ITEM_STR-FAEDN sy-vline 
WA_FICA_INV_S_ITEM_STR-SPART sy-vline 
WA_FICA_INV_S_ITEM_STR-BUKRS sy-vline 
WA_FICA_INV_S_ITEM_STR-GSBER sy-vline 
WA_FICA_INV_S_ITEM_STR-BUPLA sy-vline 
WA_FICA_INV_S_ITEM_STR-SEGMT sy-vline 
WA_FICA_INV_S_ITEM_STR-PRCTR sy-vline 
WA_FICA_INV_S_ITEM_STR-HVORG sy-vline 
WA_FICA_INV_S_ITEM_STR-TVORG sy-vline 
WA_FICA_INV_S_ITEM_STR-KOFIZ sy-vline 
WA_FICA_INV_S_ITEM_STR-TAX_DET_TYPE sy-vline 
WA_FICA_INV_S_ITEM_STR-TAX_COUNTRY sy-vline 
WA_FICA_INV_S_ITEM_STR-TAX_DATE_TYPE sy-vline 
WA_FICA_INV_S_ITEM_STR-TAX_INCLUDED sy-vline 
WA_FICA_INV_S_ITEM_STR-TAX_GROUP sy-vline 
WA_FICA_INV_S_ITEM_STR-EXT_TAX_DATE sy-vline 
WA_FICA_INV_S_ITEM_STR-ERMWSKZ sy-vline 
WA_FICA_INV_S_ITEM_STR-MWSKZ sy-vline 
WA_FICA_INV_S_ITEM_STR-ERMWSKZ_B2B sy-vline 
WA_FICA_INV_S_ITEM_STR-MWSKZ_B2B sy-vline 
WA_FICA_INV_S_ITEM_STR-STRKZ sy-vline 
WA_FICA_INV_S_ITEM_STR-TXJCD sy-vline 
WA_FICA_INV_S_ITEM_STR-QSSKZ sy-vline 
WA_FICA_INV_S_ITEM_STR-XANZA sy-vline 
WA_FICA_INV_S_ITEM_STR-STAKZ sy-vline 
WA_FICA_INV_S_ITEM_STR-DEFREV_CAT sy-vline 
WA_FICA_INV_S_ITEM_STR-DEFREV_PDATE sy-vline 
WA_FICA_INV_S_ITEM_STR-DEFREV_STAT sy-vline 
WA_FICA_INV_S_ITEM_STR-RAREL sy-vline 
WA_FICA_INV_S_ITEM_STR-BILLAC_TYPE sy-vline 
WA_FICA_INV_S_ITEM_STR-SERVICE_TYPE sy-vline 
WA_FICA_INV_S_ITEM_STR-QTY_UNIT sy-vline 
WA_FICA_INV_S_ITEM_STR-QTY_BW_REL sy-vline 
WA_FICA_INV_S_ITEM_STR-QTY_FI_CO_REL sy-vline 
WA_FICA_INV_S_ITEM_STR-ALTMD_ORIG sy-vline 
WA_FICA_INV_S_ITEM_STR-VTREF sy-vline 
WA_FICA_INV_S_ITEM_STR-VTPOS sy-vline 
WA_FICA_INV_S_ITEM_STR-SUBAP sy-vline 
WA_FICA_INV_S_ITEM_STR-PREPAID sy-vline 
WA_FICA_INV_S_ITEM_STR-PPREFILL sy-vline 
WA_FICA_INV_S_ITEM_STR-PSCAT sy-vline 
WA_FICA_INV_S_ITEM_STR-DITTYPE sy-vline 
WA_FICA_INV_S_ITEM_STR-ITEM_CRMET sy-vline 
WA_FICA_INV_S_ITEM_STR-BILL_FUNCTION sy-vline 
WA_FICA_INV_S_ITEM_STR-ADD_GROUP sy-vline 
WA_FICA_INV_S_ITEM_STR-PY_GROUP sy-vline 
WA_FICA_INV_S_ITEM_STR-SRC_GROUP sy-vline 
WA_FICA_INV_S_ITEM_STR-DISC_GROUP sy-vline 
WA_FICA_INV_S_ITEM_STR-SEC_REASON sy-vline 
WA_FICA_INV_S_ITEM_STR-BILLREQRSN sy-vline 
WA_FICA_INV_S_ITEM_STR-DISCKEY sy-vline 
WA_FICA_INV_S_ITEM_STR-DISCKEY_VERSNO sy-vline 
WA_FICA_INV_S_ITEM_STR-CONDITION_TYPE sy-vline 
WA_FICA_INV_S_ITEM_STR-QUANTITY sy-vline 
WA_FICA_INV_S_ITEM_STR-DUMMY_INVBILL_I_INCL_EEW_PS sy-vline 
WA_FICA_INV_S_ITEM_STR-WA_SUBIN_HEAD sy-vline 
WA_FICA_INV_S_ITEM_STR-MANDT sy-vline 
WA_FICA_INV_S_ITEM_STR-INVDOCNO sy-vline 
WA_FICA_INV_S_ITEM_STR-APPLK sy-vline 
WA_FICA_INV_S_ITEM_STR-INV_PROCESS sy-vline 
WA_FICA_INV_S_ITEM_STR-INV_TYPE sy-vline 
WA_FICA_INV_S_ITEM_STR-INV_CATEGORY sy-vline 
WA_FICA_INV_S_ITEM_STR-TECHDOCTYPE sy-vline 
WA_FICA_INV_S_ITEM_STR-TARGPROCESS sy-vline 
WA_FICA_INV_S_ITEM_STR-GPART sy-vline 
WA_FICA_INV_S_ITEM_STR-VKONT sy-vline 
WA_FICA_INV_S_ITEM_STR-MDCAT sy-vline 
WA_FICA_INV_S_ITEM_STR-ABWVK sy-vline 
WA_FICA_INV_S_ITEM_STR-ABWBL sy-vline 
WA_FICA_INV_S_ITEM_STR-CRNAME sy-vline 
WA_FICA_INV_S_ITEM_STR-CRDATE sy-vline 
WA_FICA_INV_S_ITEM_STR-CRTIME sy-vline 
WA_FICA_INV_S_ITEM_STR-CRMODE sy-vline 
WA_FICA_INV_S_ITEM_STR-RECNUM sy-vline 
WA_FICA_INV_S_ITEM_STR-INVRUNNO sy-vline 
WA_FICA_INV_S_ITEM_STR-FIKEY sy-vline 
WA_FICA_INV_S_ITEM_STR-BUDAT sy-vline 
WA_FICA_INV_S_ITEM_STR-BLDAT sy-vline 
WA_FICA_INV_S_ITEM_STR-FAEDN sy-vline 
WA_FICA_INV_S_ITEM_STR-FAEDS sy-vline 
WA_FICA_INV_S_ITEM_STR-SKTPZ sy-vline 
WA_FICA_INV_S_ITEM_STR-TOTAL_CURR sy-vline 
WA_FICA_INV_S_ITEM_STR-TOTAL_AMT sy-vline 
WA_FICA_INV_S_ITEM_STR-INVOICED sy-vline 
WA_FICA_INV_S_ITEM_STR-SIMULATED sy-vline 
WA_FICA_INV_S_ITEM_STR-PRELIMINARY sy-vline 
WA_FICA_INV_S_ITEM_STR-PRLINV_CAT sy-vline 
WA_FICA_INV_S_ITEM_STR-PRLINV_CNT sy-vline 
WA_FICA_INV_S_ITEM_STR-PRLINV_STATUS sy-vline 
WA_FICA_INV_S_ITEM_STR-REVREASON sy-vline 
WA_FICA_INV_S_ITEM_STR-REVERSALDOC sy-vline 
WA_FICA_INV_S_ITEM_STR-REVERSEDDOC sy-vline 
WA_FICA_INV_S_ITEM_STR-CORRCAT sy-vline 
WA_FICA_INV_S_ITEM_STR-PRINTDATE sy-vline 
WA_FICA_INV_S_ITEM_STR-PRINTLOCK sy-vline 
WA_FICA_INV_S_ITEM_STR-PYMET sy-vline 
WA_FICA_INV_S_ITEM_STR-NRZAS sy-vline 
WA_FICA_INV_S_ITEM_STR-FORM_ID sy-vline 
WA_FICA_INV_S_ITEM_STR-FORMKEY sy-vline 
WA_FICA_INV_S_ITEM_STR-ZLSCH sy-vline 
WA_FICA_INV_S_ITEM_STR-DOCTYPE sy-vline 
WA_FICA_INV_S_ITEM_STR-EXKID sy-vline 
WA_FICA_INV_S_ITEM_STR-EXBEL sy-vline 
WA_FICA_INV_S_ITEM_STR-PTSRL sy-vline 
WA_FICA_INV_S_ITEM_STR-BUKRS sy-vline 
WA_FICA_INV_S_ITEM_STR-BUPLA sy-vline 
WA_FICA_INV_S_ITEM_STR-VTREF sy-vline 
WA_FICA_INV_S_ITEM_STR-SUBAP sy-vline 
WA_FICA_INV_S_ITEM_STR-INVOICE_BASEDATE sy-vline 
WA_FICA_INV_S_ITEM_STR-INVPERCAT sy-vline 
WA_FICA_INV_S_ITEM_STR-INVPERIOD sy-vline 
WA_FICA_INV_S_ITEM_STR-INVPERIOD_FROM sy-vline 
WA_FICA_INV_S_ITEM_STR-MAZAE sy-vline 
WA_FICA_INV_S_ITEM_STR-CHGDOC_EX sy-vline 
WA_FICA_INV_S_ITEM_STR-CFCSIMULATED sy-vline 
WA_FICA_INV_S_ITEM_STR-BOLLOTAX sy-vline 
WA_FICA_INV_S_ITEM_STR-XSUBINV sy-vline 
WA_FICA_INV_S_ITEM_STR-XINVDOC_X sy-vline 
WA_FICA_INV_S_ITEM_STR-SEPA_PRENOT sy-vline 
WA_FICA_INV_S_ITEM_STR-EXT_INVDOCNO sy-vline 
WA_FICA_INV_S_ITEM_STR-DUMMY_INVDOC_H_INCL_EEW_PS sy-vline 
WA_FICA_INV_S_ITEM_STR-ARCHIVED sy-vline 
WA_FICA_INV_S_ITEM_STR-REVARCH sy-vline 
WA_FICA_INV_S_ITEM_STR-NOT_SAVED sy-vline 
WA_FICA_INV_S_ITEM_STR-WA_CADOCTYPE sy-vline 
WA_FICA_INV_S_ITEM_STR-LANGU sy-vline 
WA_FICA_INV_S_ITEM_STR-CADOCTYPE sy-vline 
WA_FICA_INV_S_ITEM_STR-TEXT sy-vline 
WA_FICA_INV_S_ITEM_STR-WA_ITEMTYPE sy-vline 
WA_FICA_INV_S_ITEM_STR-MANDT sy-vline 
WA_FICA_INV_S_ITEM_STR-LANGU sy-vline 
WA_FICA_INV_S_ITEM_STR-ITEMTYPE sy-vline 
WA_FICA_INV_S_ITEM_STR-TEXT sy-vline 
WA_FICA_INV_S_ITEM_STR-WA_BPCA_A_CAT sy-vline 
WA_FICA_INV_S_ITEM_STR-DOMNAME sy-vline 
WA_FICA_INV_S_ITEM_STR-VALPOS sy-vline 
WA_FICA_INV_S_ITEM_STR-DDLANGUAGE sy-vline 
WA_FICA_INV_S_ITEM_STR-DOMVALUE_L sy-vline 
WA_FICA_INV_S_ITEM_STR-DOMVALUE_H sy-vline 
WA_FICA_INV_S_ITEM_STR-DDTEXT sy-vline 
WA_FICA_INV_S_ITEM_STR-DOMVAL_LD sy-vline 
WA_FICA_INV_S_ITEM_STR-DOMVAL_HD sy-vline 
WA_FICA_INV_S_ITEM_STR-APPVAL sy-vline 
WA_FICA_INV_S_ITEM_STR-WA_COCODE sy-vline 
WA_FICA_INV_S_ITEM_STR-MANDT sy-vline 
WA_FICA_INV_S_ITEM_STR-BUKRS sy-vline 
WA_FICA_INV_S_ITEM_STR-BUTXT sy-vline 
WA_FICA_INV_S_ITEM_STR-ORT01 sy-vline 
WA_FICA_INV_S_ITEM_STR-LAND1 sy-vline 
WA_FICA_INV_S_ITEM_STR-WAERS sy-vline 
WA_FICA_INV_S_ITEM_STR-SPRAS sy-vline 
WA_FICA_INV_S_ITEM_STR-KTOPL sy-vline 
WA_FICA_INV_S_ITEM_STR-WAABW sy-vline 
WA_FICA_INV_S_ITEM_STR-PERIV sy-vline 
WA_FICA_INV_S_ITEM_STR-KOKFI sy-vline 
WA_FICA_INV_S_ITEM_STR-RCOMP sy-vline 
WA_FICA_INV_S_ITEM_STR-ADRNR sy-vline 
WA_FICA_INV_S_ITEM_STR-STCEG sy-vline 
WA_FICA_INV_S_ITEM_STR-FIKRS sy-vline 
WA_FICA_INV_S_ITEM_STR-XFMCO sy-vline 
WA_FICA_INV_S_ITEM_STR-XFMCB sy-vline 
WA_FICA_INV_S_ITEM_STR-XFMCA sy-vline 
WA_FICA_INV_S_ITEM_STR-TXJCD sy-vline 
WA_FICA_INV_S_ITEM_STR-FMHRDATE sy-vline 
WA_FICA_INV_S_ITEM_STR-XTEMPLT sy-vline 
WA_FICA_INV_S_ITEM_STR-TRANSIT_PLANT sy-vline 
WA_FICA_INV_S_ITEM_STR-BUVAR sy-vline 
WA_FICA_INV_S_ITEM_STR-FDBUK sy-vline 
WA_FICA_INV_S_ITEM_STR-XFDIS sy-vline 
WA_FICA_INV_S_ITEM_STR-XVALV sy-vline 
WA_FICA_INV_S_ITEM_STR-XSKFN sy-vline 
WA_FICA_INV_S_ITEM_STR-KKBER sy-vline 
WA_FICA_INV_S_ITEM_STR-XMWSN sy-vline 
WA_FICA_INV_S_ITEM_STR-MREGL sy-vline 
WA_FICA_INV_S_ITEM_STR-XGSBE sy-vline 
WA_FICA_INV_S_ITEM_STR-XGJRV sy-vline 
WA_FICA_INV_S_ITEM_STR-XKDFT sy-vline 
WA_FICA_INV_S_ITEM_STR-XPROD sy-vline 
WA_FICA_INV_S_ITEM_STR-XEINK sy-vline 
WA_FICA_INV_S_ITEM_STR-XJVAA sy-vline 
WA_FICA_INV_S_ITEM_STR-XVVWA sy-vline 
WA_FICA_INV_S_ITEM_STR-XSLTA sy-vline 
WA_FICA_INV_S_ITEM_STR-XFDMM sy-vline 
WA_FICA_INV_S_ITEM_STR-XFDSD sy-vline 
WA_FICA_INV_S_ITEM_STR-XEXTB sy-vline 
WA_FICA_INV_S_ITEM_STR-EBUKR sy-vline 
WA_FICA_INV_S_ITEM_STR-KTOP2 sy-vline 
WA_FICA_INV_S_ITEM_STR-UMKRS sy-vline 
WA_FICA_INV_S_ITEM_STR-BUKRS_GLOB sy-vline 
WA_FICA_INV_S_ITEM_STR-FSTVA sy-vline 
WA_FICA_INV_S_ITEM_STR-OPVAR sy-vline 
WA_FICA_INV_S_ITEM_STR-XCOVR sy-vline 
WA_FICA_INV_S_ITEM_STR-TXKRS sy-vline 
WA_FICA_INV_S_ITEM_STR-WFVAR sy-vline 
WA_FICA_INV_S_ITEM_STR-XBBBF sy-vline 
WA_FICA_INV_S_ITEM_STR-XBBBE sy-vline 
WA_FICA_INV_S_ITEM_STR-XBBBA sy-vline 
WA_FICA_INV_S_ITEM_STR-XBBKO sy-vline 
WA_FICA_INV_S_ITEM_STR-XSTDT sy-vline 
WA_FICA_INV_S_ITEM_STR-MWSKV sy-vline 
WA_FICA_INV_S_ITEM_STR-MWSKA sy-vline 
WA_FICA_INV_S_ITEM_STR-IMPDA sy-vline 
WA_FICA_INV_S_ITEM_STR-XNEGP sy-vline 
WA_FICA_INV_S_ITEM_STR-XKKBI sy-vline 
WA_FICA_INV_S_ITEM_STR-WT_NEWWT sy-vline 
WA_FICA_INV_S_ITEM_STR-PP_PDATE sy-vline 
WA_FICA_INV_S_ITEM_STR-INFMT sy-vline 
WA_FICA_INV_S_ITEM_STR-FSTVARE sy-vline 
WA_FICA_INV_S_ITEM_STR-KOPIM sy-vline 
WA_FICA_INV_S_ITEM_STR-DKWEG sy-vline 
WA_FICA_INV_S_ITEM_STR-OFFSACCT sy-vline 
WA_FICA_INV_S_ITEM_STR-BAPOVAR sy-vline 
WA_FICA_INV_S_ITEM_STR-XCOS sy-vline 
WA_FICA_INV_S_ITEM_STR-XCESSION sy-vline 
WA_FICA_INV_S_ITEM_STR-XSPLT sy-vline 
WA_FICA_INV_S_ITEM_STR-SURCCM sy-vline 
WA_FICA_INV_S_ITEM_STR-DTPROV sy-vline 
WA_FICA_INV_S_ITEM_STR-DTAMTC sy-vline 
WA_FICA_INV_S_ITEM_STR-DTTAXC sy-vline 
WA_FICA_INV_S_ITEM_STR-DTTDSP sy-vline 
WA_FICA_INV_S_ITEM_STR-DTAXR sy-vline 
WA_FICA_INV_S_ITEM_STR-XVATDATE sy-vline 
WA_FICA_INV_S_ITEM_STR-PST_PER_VAR sy-vline 
WA_FICA_INV_S_ITEM_STR-XBBSC sy-vline 
WA_FICA_INV_S_ITEM_STR-F_OBSOLETE sy-vline 
WA_FICA_INV_S_ITEM_STR-FM_DERIVE_ACC sy-vline 
WA_FICA_INV_S_ITEM_STR-WA_DEVISION sy-vline 
WA_FICA_INV_S_ITEM_STR-MANDT sy-vline 
WA_FICA_INV_S_ITEM_STR-SPRAS sy-vline 
WA_FICA_INV_S_ITEM_STR-SPART sy-vline 
WA_FICA_INV_S_ITEM_STR-VTEXT sy-vline 
WA_FICA_INV_S_ITEM_STR-WA_MAINTRANST sy-vline 
WA_FICA_INV_S_ITEM_STR-MANDT sy-vline 
WA_FICA_INV_S_ITEM_STR-SPRAS sy-vline 
WA_FICA_INV_S_ITEM_STR-APPLK sy-vline 
WA_FICA_INV_S_ITEM_STR-HVORG sy-vline 
WA_FICA_INV_S_ITEM_STR-TXT30 sy-vline 
WA_FICA_INV_S_ITEM_STR-WA_SUBTRANST sy-vline 
WA_FICA_INV_S_ITEM_STR-MANDT sy-vline 
WA_FICA_INV_S_ITEM_STR-SPRAS sy-vline 
WA_FICA_INV_S_ITEM_STR-APPLK sy-vline 
WA_FICA_INV_S_ITEM_STR-HVORG sy-vline 
WA_FICA_INV_S_ITEM_STR-TVORG sy-vline 
WA_FICA_INV_S_ITEM_STR-TXT30 sy-vline 
WA_FICA_INV_S_ITEM_STR-WA_PRVCTR_INV sy-vline 
WA_FICA_INV_S_ITEM_STR-VTITT sy-vline 
WA_FICA_INV_S_ITEM_STR-PRDNR sy-vline 
WA_FICA_INV_S_ITEM_STR-VTBEZ sy-vline 
WA_FICA_INV_S_ITEM_STR-SHTXT sy-vline 
WA_FICA_INV_S_ITEM_STR-WA_SRC_CURC_I sy-vline 
WA_FICA_INV_S_ITEM_STR-MANDT sy-vline 
WA_FICA_INV_S_ITEM_STR-WAERS sy-vline 
WA_FICA_INV_S_ITEM_STR-ISOCD sy-vline 
WA_FICA_INV_S_ITEM_STR-ALTWR sy-vline 
WA_FICA_INV_S_ITEM_STR-GDATU sy-vline 
WA_FICA_INV_S_ITEM_STR-XPRIMARY sy-vline 
WA_FICA_INV_S_ITEM_STR-WA_DISCKEY sy-vline 
WA_FICA_INV_S_ITEM_STR-MANDT sy-vline 
WA_FICA_INV_S_ITEM_STR-LANGU sy-vline 
WA_FICA_INV_S_ITEM_STR-DISCKEY sy-vline 
WA_FICA_INV_S_ITEM_STR-TEXT sy-vline 
WA_FICA_INV_S_ITEM_STR-WA_DISC_UTIL sy-vline 
WA_FICA_INV_S_ITEM_STR-DOMNAME sy-vline 
WA_FICA_INV_S_ITEM_STR-VALPOS sy-vline 
WA_FICA_INV_S_ITEM_STR-DDLANGUAGE sy-vline 
WA_FICA_INV_S_ITEM_STR-DOMVALUE_L sy-vline 
WA_FICA_INV_S_ITEM_STR-DOMVALUE_H sy-vline 
WA_FICA_INV_S_ITEM_STR-DDTEXT sy-vline 
WA_FICA_INV_S_ITEM_STR-DOMVAL_LD sy-vline 
WA_FICA_INV_S_ITEM_STR-DOMVAL_HD sy-vline 
WA_FICA_INV_S_ITEM_STR-APPVAL sy-vline 
WA_FICA_INV_S_ITEM_STR-WA_MA_AGD sy-vline 
WA_FICA_INV_S_ITEM_STR-AGRMT sy-vline 
WA_FICA_INV_S_ITEM_STR-AGRTY sy-vline 
WA_FICA_INV_S_ITEM_STR-WA_MA_AGD_T sy-vline 
WA_FICA_INV_S_ITEM_STR-AGRMT_DESCR sy-vline 
WA_FICA_INV_S_ITEM_STR-LANGU sy-vline 
WA_FICA_INV_S_ITEM_STR-T_INVBI_ADD sy-vline 
WA_FICA_INV_S_ITEM_STR-T_BIREQH_INV sy-vline 
WA_FICA_INV_S_ITEM_STR-T_PRD_CNFG_I sy-vline      INTO ld_text SEPARATED BY SPACE.

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