ABAP Select data from SAP table CF005 into internal table

Get Example source ABAP code based on a different SAP table
  

Below is a number of ABAP code snippets to demonstrate how to select data from SAP CF005 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 CF005. 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 CF005 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_CF005 TYPE STANDARD TABLE OF CF005,
      WA_CF005 TYPE CF005,
      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: <CF005> TYPE CF005.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM CF005
*  INTO TABLE @DATA(IT_CF0052).
*--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_CF005 INDEX 1 INTO DATA(WA_CF0052).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_CF005 ASSIGNING <CF005>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<CF005>-MANDT = 1.
<CF005>-RECTY = 1.
<CF005>-VERSO = 1.
<CF005>-YEARB = 1.
<CF005>-PERDE = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_CF005-COMPN, sy-vline,
WA_CF005-EORGE, sy-vline,
WA_CF005-IORGE, sy-vline,
WA_CF005-KOSTE, sy-vline,
WA_CF005-RFORM, sy-vline,
WA_CF005-BRNCH, sy-vline.
ENDLOOP. *Add any further fields from structure WA_CF005 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_CF005 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_CF005 INTO WA_CF005. *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 GJAHR, internal->external for field YEARB CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT' EXPORTING input = WA_CF005-YEARB IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CF005-YEARB.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit CUNIT, internal->external for field QFRPOS CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_CF005-QFRPOS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CF005-QFRPOS.
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_CF005_STR,
MANDT TYPE STRING,
RECTY TYPE STRING,
VERSO TYPE STRING,
YEARB TYPE STRING,
PERDE TYPE STRING,
COMPN TYPE STRING,
EORGE TYPE STRING,
IORGE TYPE STRING,
KOSTE TYPE STRING,
RFORM TYPE STRING,
BRNCH TYPE STRING,
LAND1 TYPE STRING,
VALTY TYPE STRING,
RECNR TYPE STRING,
AEDTM TYPE STRING,
UNAME TYPE STRING,
PINTR TYPE STRING,
MITAB TYPE STRING,
QMITAB TYPE STRING,
ARBTR TYPE STRING,
QARBTR TYPE STRING,
ANGES TYPE STRING,
QANGES TYPE STRING,
AZUBI TYPE STRING,
QAZUBI TYPE STRING,
TZBES TYPE STRING,
QTZBES TYPE STRING,
FRAUN TYPE STRING,
QFRAUN TYPE STRING,
EXTAB TYPE STRING,
QEXTAB TYPE STRING,
UNTAB TYPE STRING,
QUNTAB TYPE STRING,
FRWAB TYPE STRING,
QFRWAB TYPE STRING,
EX1AB TYPE STRING,
QEX1AB TYPE STRING,
INTAB TYPE STRING,
QINTAB TYPE STRING,
EXTZU TYPE STRING,
QEXTZU TYPE STRING,
INTZU TYPE STRING,
QINTZU TYPE STRING,
DAUER TYPE STRING,
QDAUER TYPE STRING,
ALTRS TYPE STRING,
QALTRS TYPE STRING,
SALTR TYPE STRING,
QSALTR TYPE STRING,
ALTAR TYPE STRING,
QALTAR TYPE STRING,
SALTA TYPE STRING,
QSALTA TYPE STRING,
ALTAN TYPE STRING,
QALTAN TYPE STRING,
SALTN TYPE STRING,
QSALTN TYPE STRING,
ALTAZ TYPE STRING,
QALTAZ TYPE STRING,
SALTZ TYPE STRING,
QSALTZ TYPE STRING,
SOLAZ TYPE STRING,
QSOLAZ TYPE STRING,
ISTAZ TYPE STRING,
QISTAZ TYPE STRING,
OVRAZ TYPE STRING,
QOVRAZ TYPE STRING,
FZKRK TYPE STRING,
QFZKRK TYPE STRING,
FZURL TYPE STRING,
QFZURL TYPE STRING,
FZKAZ TYPE STRING,
QFZKAZ TYPE STRING,
SZBFR TYPE STRING,
QSZBFR TYPE STRING,
ISTFR TYPE STRING,
QISTFR TYPE STRING,
SOSBH TYPE STRING,
QSOSBH TYPE STRING,
UMSAZ TYPE STRING,
CUMSAZ TYPE STRING,
DBTRG TYPE STRING,
CDBTRG TYPE STRING,
BASBZ TYPE STRING,
CBASBZ TYPE STRING,
SOBEZ TYPE STRING,
CSOBEZ TYPE STRING,
ISTBZ TYPE STRING,
CISTBZ TYPE STRING,
EINKO TYPE STRING,
CEINKO TYPE STRING,
FRWKO TYPE STRING,
CFRWKO TYPE STRING,
GEMKO TYPE STRING,
CGEMKO TYPE STRING,
AUSKO TYPE STRING,
CAUSKO TYPE STRING,
WBLBD TYPE STRING,
QWBLBD TYPE STRING,
SWBLB TYPE STRING,
QSWBLB TYPE STRING,
EIGRD TYPE STRING,
QEIGRD TYPE STRING,
SEIGR TYPE STRING,
QSEIGR TYPE STRING,
IWGMA TYPE STRING,
QIWGMA TYPE STRING,
EWGMA TYPE STRING,
QEWGMA TYPE STRING,
IWBVA TYPE STRING,
QIWBVA TYPE STRING,
EWBVA TYPE STRING,
QEWBVA TYPE STRING,
IWBTG TYPE STRING,
QIWBTG TYPE STRING,
EWBTG TYPE STRING,
QEWBTG TYPE STRING,
IWBKO TYPE STRING,
CIWBKO TYPE STRING,
EWBKO TYPE STRING,
CEWBKO TYPE STRING,
OFPLS TYPE STRING,
QOFPLS TYPE STRING,
PERBD TYPE STRING,
QPERBD TYPE STRING,
BEWRB TYPE STRING,
QBEWRB TYPE STRING,
SBWRB TYPE STRING,
QSBWRB TYPE STRING,
BESKO TYPE STRING,
CBESKO TYPE STRING,
ANWKO TYPE STRING,
CANWKO TYPE STRING,
ALTRF TYPE STRING,
QALTRF TYPE STRING,
FSTLV TYPE STRING,
QFSTLV TYPE STRING,
OFNFP TYPE STRING,
QOFNFP TYPE STRING,
FRPOS TYPE STRING,
QFRPOS TYPE STRING,END OF T_EKKO_STR. DATA: WA_CF005_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_CF005_STR-MANDT sy-vline
WA_CF005_STR-RECTY sy-vline
WA_CF005_STR-VERSO sy-vline
WA_CF005_STR-YEARB sy-vline
WA_CF005_STR-PERDE sy-vline
WA_CF005_STR-COMPN sy-vline
WA_CF005_STR-EORGE sy-vline
WA_CF005_STR-IORGE sy-vline
WA_CF005_STR-KOSTE sy-vline
WA_CF005_STR-RFORM sy-vline
WA_CF005_STR-BRNCH sy-vline
WA_CF005_STR-LAND1 sy-vline
WA_CF005_STR-VALTY sy-vline
WA_CF005_STR-RECNR sy-vline
WA_CF005_STR-AEDTM sy-vline
WA_CF005_STR-UNAME sy-vline
WA_CF005_STR-PINTR sy-vline
WA_CF005_STR-MITAB sy-vline
WA_CF005_STR-QMITAB sy-vline
WA_CF005_STR-ARBTR sy-vline
WA_CF005_STR-QARBTR sy-vline
WA_CF005_STR-ANGES sy-vline
WA_CF005_STR-QANGES sy-vline
WA_CF005_STR-AZUBI sy-vline
WA_CF005_STR-QAZUBI sy-vline
WA_CF005_STR-TZBES sy-vline
WA_CF005_STR-QTZBES sy-vline
WA_CF005_STR-FRAUN sy-vline
WA_CF005_STR-QFRAUN sy-vline
WA_CF005_STR-EXTAB sy-vline
WA_CF005_STR-QEXTAB sy-vline
WA_CF005_STR-UNTAB sy-vline
WA_CF005_STR-QUNTAB sy-vline
WA_CF005_STR-FRWAB sy-vline
WA_CF005_STR-QFRWAB sy-vline
WA_CF005_STR-EX1AB sy-vline
WA_CF005_STR-QEX1AB sy-vline
WA_CF005_STR-INTAB sy-vline
WA_CF005_STR-QINTAB sy-vline
WA_CF005_STR-EXTZU sy-vline
WA_CF005_STR-QEXTZU sy-vline
WA_CF005_STR-INTZU sy-vline
WA_CF005_STR-QINTZU sy-vline
WA_CF005_STR-DAUER sy-vline
WA_CF005_STR-QDAUER sy-vline
WA_CF005_STR-ALTRS sy-vline
WA_CF005_STR-QALTRS sy-vline
WA_CF005_STR-SALTR sy-vline
WA_CF005_STR-QSALTR sy-vline
WA_CF005_STR-ALTAR sy-vline
WA_CF005_STR-QALTAR sy-vline
WA_CF005_STR-SALTA sy-vline
WA_CF005_STR-QSALTA sy-vline
WA_CF005_STR-ALTAN sy-vline
WA_CF005_STR-QALTAN sy-vline
WA_CF005_STR-SALTN sy-vline
WA_CF005_STR-QSALTN sy-vline
WA_CF005_STR-ALTAZ sy-vline
WA_CF005_STR-QALTAZ sy-vline
WA_CF005_STR-SALTZ sy-vline
WA_CF005_STR-QSALTZ sy-vline
WA_CF005_STR-SOLAZ sy-vline
WA_CF005_STR-QSOLAZ sy-vline
WA_CF005_STR-ISTAZ sy-vline
WA_CF005_STR-QISTAZ sy-vline
WA_CF005_STR-OVRAZ sy-vline
WA_CF005_STR-QOVRAZ sy-vline
WA_CF005_STR-FZKRK sy-vline
WA_CF005_STR-QFZKRK sy-vline
WA_CF005_STR-FZURL sy-vline
WA_CF005_STR-QFZURL sy-vline
WA_CF005_STR-FZKAZ sy-vline
WA_CF005_STR-QFZKAZ sy-vline
WA_CF005_STR-SZBFR sy-vline
WA_CF005_STR-QSZBFR sy-vline
WA_CF005_STR-ISTFR sy-vline
WA_CF005_STR-QISTFR sy-vline
WA_CF005_STR-SOSBH sy-vline
WA_CF005_STR-QSOSBH sy-vline
WA_CF005_STR-UMSAZ sy-vline
WA_CF005_STR-CUMSAZ sy-vline
WA_CF005_STR-DBTRG sy-vline
WA_CF005_STR-CDBTRG sy-vline
WA_CF005_STR-BASBZ sy-vline
WA_CF005_STR-CBASBZ sy-vline
WA_CF005_STR-SOBEZ sy-vline
WA_CF005_STR-CSOBEZ sy-vline
WA_CF005_STR-ISTBZ sy-vline
WA_CF005_STR-CISTBZ sy-vline
WA_CF005_STR-EINKO sy-vline
WA_CF005_STR-CEINKO sy-vline
WA_CF005_STR-FRWKO sy-vline
WA_CF005_STR-CFRWKO sy-vline
WA_CF005_STR-GEMKO sy-vline
WA_CF005_STR-CGEMKO sy-vline
WA_CF005_STR-AUSKO sy-vline
WA_CF005_STR-CAUSKO sy-vline
WA_CF005_STR-WBLBD sy-vline
WA_CF005_STR-QWBLBD sy-vline
WA_CF005_STR-SWBLB sy-vline
WA_CF005_STR-QSWBLB sy-vline
WA_CF005_STR-EIGRD sy-vline
WA_CF005_STR-QEIGRD sy-vline
WA_CF005_STR-SEIGR sy-vline
WA_CF005_STR-QSEIGR sy-vline
WA_CF005_STR-IWGMA sy-vline
WA_CF005_STR-QIWGMA sy-vline
WA_CF005_STR-EWGMA sy-vline
WA_CF005_STR-QEWGMA sy-vline
WA_CF005_STR-IWBVA sy-vline
WA_CF005_STR-QIWBVA sy-vline
WA_CF005_STR-EWBVA sy-vline
WA_CF005_STR-QEWBVA sy-vline
WA_CF005_STR-IWBTG sy-vline
WA_CF005_STR-QIWBTG sy-vline
WA_CF005_STR-EWBTG sy-vline
WA_CF005_STR-QEWBTG sy-vline
WA_CF005_STR-IWBKO sy-vline
WA_CF005_STR-CIWBKO sy-vline
WA_CF005_STR-EWBKO sy-vline
WA_CF005_STR-CEWBKO sy-vline
WA_CF005_STR-OFPLS sy-vline
WA_CF005_STR-QOFPLS sy-vline
WA_CF005_STR-PERBD sy-vline
WA_CF005_STR-QPERBD sy-vline
WA_CF005_STR-BEWRB sy-vline
WA_CF005_STR-QBEWRB sy-vline
WA_CF005_STR-SBWRB sy-vline
WA_CF005_STR-QSBWRB sy-vline
WA_CF005_STR-BESKO sy-vline
WA_CF005_STR-CBESKO sy-vline
WA_CF005_STR-ANWKO sy-vline
WA_CF005_STR-CANWKO sy-vline
WA_CF005_STR-ALTRF sy-vline
WA_CF005_STR-QALTRF sy-vline
WA_CF005_STR-FSTLV sy-vline
WA_CF005_STR-QFSTLV sy-vline
WA_CF005_STR-OFNFP sy-vline
WA_CF005_STR-QOFNFP sy-vline
WA_CF005_STR-FRPOS sy-vline
WA_CF005_STR-QFRPOS sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.