ABAP Select data from SAP table FC01BASE 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 FC01BASE 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 FC01BASE. 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 FC01BASE 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_FC01BASE TYPE STANDARD TABLE OF FC01BASE,
      WA_FC01BASE TYPE FC01BASE,
      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: <FC01BASE> TYPE FC01BASE.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM FC01BASE
*  INTO TABLE @DATA(IT_FC01BASE2).
*--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_FC01BASE INDEX 1 INTO DATA(WA_FC01BASE2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<FC01BASE>-MANDT = 1.
<FC01BASE>-DIMEN = 1.
<FC01BASE>-BULGH = 1.
<FC01BASE>-CGLGH = 1.
<FC01BASE>-REFHI = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_FC01BASE-HLIND, sy-vline,
  WA_FC01BASE-PCUIND, sy-vline,
  WA_FC01BASE-TXTSH, sy-vline,
  WA_FC01BASE-TXTMI, sy-vline,
  WA_FC01BASE-TXTMI_2, sy-vline,
  WA_FC01BASE-SBNAM, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_FC01BASE 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_FC01BASE 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_FC01BASE INTO WA_FC01BASE.


*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 AFIMC, internal->external for field BUNIT
CALL FUNCTION 'CONVERSION_EXIT_AFIMC_OUTPUT'
  EXPORTING
    input =                      WA_FC01BASE-BUNIT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_FC01BASE-BUNIT.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

*Conversion exit AFIMC, internal->external for field CONGR
CALL FUNCTION 'CONVERSION_EXIT_AFIMC_OUTPUT'
  EXPORTING
    input =                      WA_FC01BASE-CONGR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_FC01BASE-CONGR.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit AFIMC, internal->external for field TOPCG
CALL FUNCTION 'CONVERSION_EXIT_AFIMC_OUTPUT'
  EXPORTING
    input =                      WA_FC01BASE-TOPCG
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_FC01BASE-TOPCG.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

*Conversion exit AFIMC, internal->external for field BEGINCG
CALL FUNCTION 'CONVERSION_EXIT_AFIMC_OUTPUT'
  EXPORTING
    input =                      WA_FC01BASE-BEGINCG
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_FC01BASE-BEGINCG.
WRITE:/ 'New Value:', ld_input.

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

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

*Conversion exit INVGJ, internal->external for field FRYEAR
CALL FUNCTION 'CONVERSION_EXIT_INVGJ_OUTPUT'
  EXPORTING
    input =                      WA_FC01BASE-FRYEAR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_FC01BASE-FRYEAR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit INVPR, internal->external for field FRPERID
CALL FUNCTION 'CONVERSION_EXIT_INVPR_OUTPUT'
  EXPORTING
    input =                      WA_FC01BASE-FRPERID
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_FC01BASE-FRPERID.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AFIMC, internal->external for field BUNIT_FROM
CALL FUNCTION 'CONVERSION_EXIT_AFIMC_OUTPUT'
  EXPORTING
    input =                      WA_FC01BASE-BUNIT_FROM
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_FC01BASE-BUNIT_FROM.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AFIMC, internal->external for field CONGR_FROM
CALL FUNCTION 'CONVERSION_EXIT_AFIMC_OUTPUT'
  EXPORTING
    input =                      WA_FC01BASE-CONGR_FROM
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_FC01BASE-CONGR_FROM.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit GJAHR, internal->external for field NEWLL_YEAR
CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT'
  EXPORTING
    input =                      WA_FC01BASE-NEWLL_YEAR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_FC01BASE-NEWLL_YEAR.
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_FC01BASE_STR, 
MANDT TYPE STRING,
DIMEN TYPE STRING,
BULGH TYPE STRING,
CGLGH TYPE STRING,
REFHI TYPE STRING,
HLIND TYPE STRING,
PCUIND TYPE STRING,
TXTSH TYPE STRING,
TXTMI TYPE STRING,
TXTMI_2 TYPE STRING,
SBNAM TYPE STRING,
SBADR TYPE STRING,
SBVAL TYPE STRING,
SBREX TYPE STRING,
SBCUR TYPE STRING,
SBINV TYPE STRING,
SBINT TYPE STRING,
SBK3F TYPE STRING,
SBINA TYPE STRING,
SBTAX TYPE STRING,
SBLAN TYPE STRING,
SGINV TYPE STRING,
SGCON TYPE STRING,
SGINA TYPE STRING,
SGVAL TYPE STRING,
BUNIT TYPE STRING,
COCAT TYPE STRING,
SETBU TYPE STRING,
RPTGR TYPE STRING,
LANGU TYPE STRING,
VALG1 TYPE STRING,
VALG2 TYPE STRING,
TAXRT TYPE STRING,
REASN TYPE STRING,
EXIND TYPE STRING,
IAIND TYPE STRING,
NAME1 TYPE STRING,
NAME2 TYPE STRING,
STRET TYPE STRING,
ZIPC1 TYPE STRING,
CITY TYPE STRING,
CNTRY TYPE STRING,
ZIPC2 TYPE STRING,
POBOX TYPE STRING,
TELFN TYPE STRING,
TEFAX TYPE STRING,
TELEX TYPE STRING,
PERTP TYPE STRING,
CACGR TYPE STRING,
CURR TYPE STRING,
CTRGR TYPE STRING,
CTRGRTXT TYPE STRING,
PERIV TYPE STRING,
GCIND TYPE STRING,
FYEAR TYPE STRING,
LYEAR TYPE STRING,
FPERI TYPE STRING,
LPERI TYPE STRING,
GPERI TYPE STRING,
VERSN TYPE STRING,
CONTP TYPE STRING,
RCOMP TYPE STRING,
LMANDT TYPE STRING,
LOGSYS TYPE STRING,
GSBER_KONS TYPE STRING,
KOKRS TYPE STRING,
PRCTR TYPE STRING,
PRCTRGRP TYPE STRING,
LFORM TYPE STRING,
BLINE TYPE STRING,
LSIND TYPE STRING,
FPERS TYPE STRING,
NAME TYPE STRING,
CONGR TYPE STRING,
HLEVL TYPE STRING,
FSCAT TYPE STRING,
RLIND TYPE STRING,
PRTGR TYPE STRING,
VALG3 TYPE STRING,
CSTGR TYPE STRING,
CMETH TYPE STRING,
RATIO TYPE STRING,
PCIND TYPE STRING,
FEFLG TYPE STRING,
LBFLG TYPE STRING,
FORGCHFLG TYPE STRING,
FORGCH TYPE STRING,
LORGCHFLG TYPE STRING,
FORGCHTXT TYPE STRING,
LMERGERFLG TYPE STRING,
RLDNR TYPE STRING,
GCURR TYPE STRING,
SCURR TYPE STRING,
HRCHY TYPE STRING,
TOPCG TYPE STRING,
ITCLG TYPE STRING,
MCIND TYPE STRING,
IVFLG TYPE STRING,
TRANS TYPE STRING,
UPMETH TYPE STRING,
LOGFILE TYPE STRING,
PHYSFIL TYPE STRING,
PRES TYPE STRING,
APPL TYPE STRING,
FRYEAR_H TYPE STRING,
CURR_LOCAL_SEND TYPE STRING,
CURR_GROUP_SEND TYPE STRING,
LANGU_BU TYPE STRING,
BUVER TYPE STRING,
UPMTX TYPE STRING,
COCTX TYPE STRING,
FSCTX TYPE STRING,
RPGTX TYPE STRING,
RPGTX_2 TYPE STRING,
CURTX TYPE STRING,
CURTX_2 TYPE STRING,
CURTX_3 TYPE STRING,
HYLTX TYPE STRING,
TCGTX TYPE STRING,
ITCTX TYPE STRING,
TRTXT TYPE STRING,
CTTXT TYPE STRING,
RSNTX TYPE STRING,
DMSTX TYPE STRING,
HYSTX TYPE STRING,
CGSTX TYPE STRING,
HLSTX TYPE STRING,
DYTIT1 TYPE STRING,
DYTIT2 TYPE STRING,
DYTIT3 TYPE STRING,
DYTIT4 TYPE STRING,
DYTIT5 TYPE STRING,
DYTIT6 TYPE STRING,
RVERS TYPE STRING,
RYEAR TYPE STRING,
PERID TYPE STRING,
RYEAR_DISP TYPE STRING,
PERID_DISP TYPE STRING,
BEGINCG TYPE STRING,
TOHLEVL TYPE STRING,
FRHLEVL TYPE STRING,
FRHLVLN TYPE STRING,
KZBU TYPE STRING,
KZCG TYPE STRING,
BUIND TYPE STRING,
HLEVL_CG TYPE STRING,
GCIND_CG TYPE STRING,
RPTGR_CG TYPE STRING,
CURR_CG TYPE STRING,
CTRGR_CG TYPE STRING,
FYEAR_CG TYPE STRING,
FPERI_CG TYPE STRING,
LYEAR_CG TYPE STRING,
LPERI_CG TYPE STRING,
TEXT_1 TYPE STRING,
TEXT_2 TYPE STRING,
CACTI TYPE STRING,
FRYEAR TYPE STRING,
FRPERID TYPE STRING,
DMETH TYPE STRING,
DIMEN_FROM TYPE STRING,
BUNIT_FROM TYPE STRING,
CONGR_FROM TYPE STRING,
HRCHY_FROM TYPE STRING,
RMODE TYPE STRING,
STRVS TYPE STRING,
INPIND TYPE STRING,
PROTP1 TYPE STRING,
PROTP2 TYPE STRING,
REVIN1 TYPE STRING,
REVIN2 TYPE STRING,
DIVTAX TYPE STRING,
CACTT TYPE STRING,
CIINVCHECK TYPE STRING,
HRFSCAT TYPE STRING,
HRFSCAT_TXT TYPE STRING,
USTPFLG TYPE STRING,
NEWLL_YEAR TYPE STRING,
CGSGN1 TYPE STRING,
CGSGN2 TYPE STRING,
CGSGN3 TYPE STRING,
CGSGN0 TYPE STRING,
SETGENMODE TYPE STRING,
SETGENCGY TYPE STRING,
DOCTY_ACS TYPE STRING,
DOCTY_ACS_TXT TYPE STRING,
ASTHFS TYPE STRING,
DIMEN_SOURCE_S4GR TYPE STRING,
DOCTY_ITEM_SUBST TYPE STRING,
DOCTY_ITEM_SUBST_TXT TYPE STRING,END OF T_EKKO_STR.
DATA: WA_FC01BASE_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_FC01BASE_STR-MANDT sy-vline 
WA_FC01BASE_STR-DIMEN sy-vline 
WA_FC01BASE_STR-BULGH sy-vline 
WA_FC01BASE_STR-CGLGH sy-vline 
WA_FC01BASE_STR-REFHI sy-vline 
WA_FC01BASE_STR-HLIND sy-vline 
WA_FC01BASE_STR-PCUIND sy-vline 
WA_FC01BASE_STR-TXTSH sy-vline 
WA_FC01BASE_STR-TXTMI sy-vline 
WA_FC01BASE_STR-TXTMI_2 sy-vline 
WA_FC01BASE_STR-SBNAM sy-vline 
WA_FC01BASE_STR-SBADR sy-vline 
WA_FC01BASE_STR-SBVAL sy-vline 
WA_FC01BASE_STR-SBREX sy-vline 
WA_FC01BASE_STR-SBCUR sy-vline 
WA_FC01BASE_STR-SBINV sy-vline 
WA_FC01BASE_STR-SBINT sy-vline 
WA_FC01BASE_STR-SBK3F sy-vline 
WA_FC01BASE_STR-SBINA sy-vline 
WA_FC01BASE_STR-SBTAX sy-vline 
WA_FC01BASE_STR-SBLAN sy-vline 
WA_FC01BASE_STR-SGINV sy-vline 
WA_FC01BASE_STR-SGCON sy-vline 
WA_FC01BASE_STR-SGINA sy-vline 
WA_FC01BASE_STR-SGVAL sy-vline 
WA_FC01BASE_STR-BUNIT sy-vline 
WA_FC01BASE_STR-COCAT sy-vline 
WA_FC01BASE_STR-SETBU sy-vline 
WA_FC01BASE_STR-RPTGR sy-vline 
WA_FC01BASE_STR-LANGU sy-vline 
WA_FC01BASE_STR-VALG1 sy-vline 
WA_FC01BASE_STR-VALG2 sy-vline 
WA_FC01BASE_STR-TAXRT sy-vline 
WA_FC01BASE_STR-REASN sy-vline 
WA_FC01BASE_STR-EXIND sy-vline 
WA_FC01BASE_STR-IAIND sy-vline 
WA_FC01BASE_STR-NAME1 sy-vline 
WA_FC01BASE_STR-NAME2 sy-vline 
WA_FC01BASE_STR-STRET sy-vline 
WA_FC01BASE_STR-ZIPC1 sy-vline 
WA_FC01BASE_STR-CITY sy-vline 
WA_FC01BASE_STR-CNTRY sy-vline 
WA_FC01BASE_STR-ZIPC2 sy-vline 
WA_FC01BASE_STR-POBOX sy-vline 
WA_FC01BASE_STR-TELFN sy-vline 
WA_FC01BASE_STR-TEFAX sy-vline 
WA_FC01BASE_STR-TELEX sy-vline 
WA_FC01BASE_STR-PERTP sy-vline 
WA_FC01BASE_STR-CACGR sy-vline 
WA_FC01BASE_STR-CURR sy-vline 
WA_FC01BASE_STR-CTRGR sy-vline 
WA_FC01BASE_STR-CTRGRTXT sy-vline 
WA_FC01BASE_STR-PERIV sy-vline 
WA_FC01BASE_STR-GCIND sy-vline 
WA_FC01BASE_STR-FYEAR sy-vline 
WA_FC01BASE_STR-LYEAR sy-vline 
WA_FC01BASE_STR-FPERI sy-vline 
WA_FC01BASE_STR-LPERI sy-vline 
WA_FC01BASE_STR-GPERI sy-vline 
WA_FC01BASE_STR-VERSN sy-vline 
WA_FC01BASE_STR-CONTP sy-vline 
WA_FC01BASE_STR-RCOMP sy-vline 
WA_FC01BASE_STR-LMANDT sy-vline 
WA_FC01BASE_STR-LOGSYS sy-vline 
WA_FC01BASE_STR-GSBER_KONS sy-vline 
WA_FC01BASE_STR-KOKRS sy-vline 
WA_FC01BASE_STR-PRCTR sy-vline 
WA_FC01BASE_STR-PRCTRGRP sy-vline 
WA_FC01BASE_STR-LFORM sy-vline 
WA_FC01BASE_STR-BLINE sy-vline 
WA_FC01BASE_STR-LSIND sy-vline 
WA_FC01BASE_STR-FPERS sy-vline 
WA_FC01BASE_STR-NAME sy-vline 
WA_FC01BASE_STR-CONGR sy-vline 
WA_FC01BASE_STR-HLEVL sy-vline 
WA_FC01BASE_STR-FSCAT sy-vline 
WA_FC01BASE_STR-RLIND sy-vline 
WA_FC01BASE_STR-PRTGR sy-vline 
WA_FC01BASE_STR-VALG3 sy-vline 
WA_FC01BASE_STR-CSTGR sy-vline 
WA_FC01BASE_STR-CMETH sy-vline 
WA_FC01BASE_STR-RATIO sy-vline 
WA_FC01BASE_STR-PCIND sy-vline 
WA_FC01BASE_STR-FEFLG sy-vline 
WA_FC01BASE_STR-LBFLG sy-vline 
WA_FC01BASE_STR-FORGCHFLG sy-vline 
WA_FC01BASE_STR-FORGCH sy-vline 
WA_FC01BASE_STR-LORGCHFLG sy-vline 
WA_FC01BASE_STR-FORGCHTXT sy-vline 
WA_FC01BASE_STR-LMERGERFLG sy-vline 
WA_FC01BASE_STR-RLDNR sy-vline 
WA_FC01BASE_STR-GCURR sy-vline 
WA_FC01BASE_STR-SCURR sy-vline 
WA_FC01BASE_STR-HRCHY sy-vline 
WA_FC01BASE_STR-TOPCG sy-vline 
WA_FC01BASE_STR-ITCLG sy-vline 
WA_FC01BASE_STR-MCIND sy-vline 
WA_FC01BASE_STR-IVFLG sy-vline 
WA_FC01BASE_STR-TRANS sy-vline 
WA_FC01BASE_STR-UPMETH sy-vline 
WA_FC01BASE_STR-LOGFILE sy-vline 
WA_FC01BASE_STR-PHYSFIL sy-vline 
WA_FC01BASE_STR-PRES sy-vline 
WA_FC01BASE_STR-APPL sy-vline 
WA_FC01BASE_STR-FRYEAR_H sy-vline 
WA_FC01BASE_STR-CURR_LOCAL_SEND sy-vline 
WA_FC01BASE_STR-CURR_GROUP_SEND sy-vline 
WA_FC01BASE_STR-LANGU_BU sy-vline 
WA_FC01BASE_STR-BUVER sy-vline 
WA_FC01BASE_STR-UPMTX sy-vline 
WA_FC01BASE_STR-COCTX sy-vline 
WA_FC01BASE_STR-FSCTX sy-vline 
WA_FC01BASE_STR-RPGTX sy-vline 
WA_FC01BASE_STR-RPGTX_2 sy-vline 
WA_FC01BASE_STR-CURTX sy-vline 
WA_FC01BASE_STR-CURTX_2 sy-vline 
WA_FC01BASE_STR-CURTX_3 sy-vline 
WA_FC01BASE_STR-HYLTX sy-vline 
WA_FC01BASE_STR-TCGTX sy-vline 
WA_FC01BASE_STR-ITCTX sy-vline 
WA_FC01BASE_STR-TRTXT sy-vline 
WA_FC01BASE_STR-CTTXT sy-vline 
WA_FC01BASE_STR-RSNTX sy-vline 
WA_FC01BASE_STR-DMSTX sy-vline 
WA_FC01BASE_STR-HYSTX sy-vline 
WA_FC01BASE_STR-CGSTX sy-vline 
WA_FC01BASE_STR-HLSTX sy-vline 
WA_FC01BASE_STR-DYTIT1 sy-vline 
WA_FC01BASE_STR-DYTIT2 sy-vline 
WA_FC01BASE_STR-DYTIT3 sy-vline 
WA_FC01BASE_STR-DYTIT4 sy-vline 
WA_FC01BASE_STR-DYTIT5 sy-vline 
WA_FC01BASE_STR-DYTIT6 sy-vline 
WA_FC01BASE_STR-RVERS sy-vline 
WA_FC01BASE_STR-RYEAR sy-vline 
WA_FC01BASE_STR-PERID sy-vline 
WA_FC01BASE_STR-RYEAR_DISP sy-vline 
WA_FC01BASE_STR-PERID_DISP sy-vline 
WA_FC01BASE_STR-BEGINCG sy-vline 
WA_FC01BASE_STR-TOHLEVL sy-vline 
WA_FC01BASE_STR-FRHLEVL sy-vline 
WA_FC01BASE_STR-FRHLVLN sy-vline 
WA_FC01BASE_STR-KZBU sy-vline 
WA_FC01BASE_STR-KZCG sy-vline 
WA_FC01BASE_STR-BUIND sy-vline 
WA_FC01BASE_STR-HLEVL_CG sy-vline 
WA_FC01BASE_STR-GCIND_CG sy-vline 
WA_FC01BASE_STR-RPTGR_CG sy-vline 
WA_FC01BASE_STR-CURR_CG sy-vline 
WA_FC01BASE_STR-CTRGR_CG sy-vline 
WA_FC01BASE_STR-FYEAR_CG sy-vline 
WA_FC01BASE_STR-FPERI_CG sy-vline 
WA_FC01BASE_STR-LYEAR_CG sy-vline 
WA_FC01BASE_STR-LPERI_CG sy-vline 
WA_FC01BASE_STR-TEXT_1 sy-vline 
WA_FC01BASE_STR-TEXT_2 sy-vline 
WA_FC01BASE_STR-CACTI sy-vline 
WA_FC01BASE_STR-FRYEAR sy-vline 
WA_FC01BASE_STR-FRPERID sy-vline 
WA_FC01BASE_STR-DMETH sy-vline 
WA_FC01BASE_STR-DIMEN_FROM sy-vline 
WA_FC01BASE_STR-BUNIT_FROM sy-vline 
WA_FC01BASE_STR-CONGR_FROM sy-vline 
WA_FC01BASE_STR-HRCHY_FROM sy-vline 
WA_FC01BASE_STR-RMODE sy-vline 
WA_FC01BASE_STR-STRVS sy-vline 
WA_FC01BASE_STR-INPIND sy-vline 
WA_FC01BASE_STR-PROTP1 sy-vline 
WA_FC01BASE_STR-PROTP2 sy-vline 
WA_FC01BASE_STR-REVIN1 sy-vline 
WA_FC01BASE_STR-REVIN2 sy-vline 
WA_FC01BASE_STR-DIVTAX sy-vline 
WA_FC01BASE_STR-CACTT sy-vline 
WA_FC01BASE_STR-CIINVCHECK sy-vline 
WA_FC01BASE_STR-HRFSCAT sy-vline 
WA_FC01BASE_STR-HRFSCAT_TXT sy-vline 
WA_FC01BASE_STR-USTPFLG sy-vline 
WA_FC01BASE_STR-NEWLL_YEAR sy-vline 
WA_FC01BASE_STR-CGSGN1 sy-vline 
WA_FC01BASE_STR-CGSGN2 sy-vline 
WA_FC01BASE_STR-CGSGN3 sy-vline 
WA_FC01BASE_STR-CGSGN0 sy-vline 
WA_FC01BASE_STR-SETGENMODE sy-vline 
WA_FC01BASE_STR-SETGENCGY sy-vline 
WA_FC01BASE_STR-DOCTY_ACS sy-vline 
WA_FC01BASE_STR-DOCTY_ACS_TXT sy-vline 
WA_FC01BASE_STR-ASTHFS sy-vline 
WA_FC01BASE_STR-DIMEN_SOURCE_S4GR sy-vline 
WA_FC01BASE_STR-DOCTY_ITEM_SUBST sy-vline 
WA_FC01BASE_STR-DOCTY_ITEM_SUBST_TXT sy-vline      INTO ld_text SEPARATED BY SPACE.

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