ABAP Select data from SAP table KOMLFPE 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 KOMLFPE 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 KOMLFPE. 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 KOMLFPE 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_KOMLFPE TYPE STANDARD TABLE OF KOMLFPE,
      WA_KOMLFPE TYPE KOMLFPE,
      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: <KOMLFPE> TYPE KOMLFPE.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM KOMLFPE
*  INTO TABLE @DATA(IT_KOMLFPE2).
*--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_KOMLFPE INDEX 1 INTO DATA(WA_KOMLFPE2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_KOMLFPE ASSIGNING <KOMLFPE>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<KOMLFPE>-OLDNR = 1.
<KOMLFPE>-OLDPO = 1.
<KOMLFPE>-WBELN = 1.
<KOMLFPE>-POSNR = 1.
<KOMLFPE>-MATNR = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_KOMLFPE-MATKL, sy-vline,
WA_KOMLFPE-WERKS, sy-vline,
WA_KOMLFPE-KOLIF, sy-vline,
WA_KOMLFPE-LTSNR, sy-vline,
WA_KOMLFPE-MWSKZ, sy-vline,
WA_KOMLFPE-PRSDT, sy-vline.
ENDLOOP. *Add any further fields from structure WA_KOMLFPE 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_KOMLFPE 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_KOMLFPE INTO WA_KOMLFPE. *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 WBELN CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_KOMLFPE-WBELN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KOMLFPE-WBELN.
WRITE:/ 'New Value:', ld_input.

*Conversion exit MATN1, internal->external for field MATNR CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT' EXPORTING input = WA_KOMLFPE-MATNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KOMLFPE-MATNR.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

*Conversion exit MATN1, internal->external for field MATBF CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT' EXPORTING input = WA_KOMLFPE-MATBF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KOMLFPE-MATBF.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

*Conversion exit ALPHA, internal->external for field REF_SAKTO CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_KOMLFPE-REF_SAKTO IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_KOMLFPE-REF_SAKTO.
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_KOMLFPE_STR,
OLDNR TYPE STRING,
OLDPO TYPE STRING,
WBELN TYPE STRING,
POSNR TYPE STRING,
MATNR TYPE STRING,
MATKL TYPE STRING,
WERKS TYPE STRING,
KOLIF TYPE STRING,
LTSNR TYPE STRING,
MWSKZ TYPE STRING,
PRSDT TYPE STRING,
MENGE TYPE STRING,
NETPR TYPE STRING,
PEINH TYPE STRING,
WFKME TYPE STRING,
UMREZ TYPE STRING,
UMREN TYPE STRING,
SKTOF TYPE STRING,
WBELNV TYPE STRING,
POSNRV TYPE STRING,
LFTYPV TYPE STRING,
AKTNR TYPE STRING,
LFGRU TYPE STRING,
ARKTX TYPE STRING,
TXJCD TYPE STRING,
EBONF TYPE STRING,
BWTAR TYPE STRING,
BWTTY TYPE STRING,
EKKOL TYPE STRING,
NTGEW TYPE STRING,
BRGEW TYPE STRING,
GEWEI TYPE STRING,
VOLUM TYPE STRING,
VOLEH TYPE STRING,
KOSTL TYPE STRING,
PRCTR TYPE STRING,
GSBER TYPE STRING,
ANZPU TYPE STRING,
PUNEI TYPE STRING,
BONUS TYPE STRING,
EBON2 TYPE STRING,
EBON3 TYPE STRING,
FPRME TYPE STRING,
FPUMZ TYPE STRING,
FPUMN TYPE STRING,
WBELN_V TYPE STRING,
POSNR_V TYPE STRING,
FTYPV_V TYPE STRING,
CHARG TYPE STRING,
ITEMCAT TYPE STRING,
MATBF TYPE STRING,
WAART TYPE STRING,
GJAHRV TYPE STRING,
CONTRACT TYPE STRING,
CONTRACT_ITEM TYPE STRING,
CONTRACT_TYPE TYPE STRING,
IDNLF TYPE STRING,
GUID_REF TYPE STRING,
IDNLF_TYPE TYPE STRING,
BEMOT TYPE STRING,
AUFNR TYPE STRING,
NETPR_EXP TYPE STRING,
FBUDA TYPE STRING,
MODEL_ADJUSTED TYPE STRING,
PRCD_ELEMENTS_MODEL_ADJUSTED TYPE STRING,
PARTNER_MODEL_ADJUSTED TYPE STRING,
TEXT_MODEL_ADJUSTED TYPE STRING,
DUMMY_WBRP_INCL_EEW_PS TYPE STRING,
CID TYPE STRING,
PID TYPE STRING,
KNUMH TYPE STRING,
KOPOS TYPE STRING,
COCO_NUM TYPE STRING,
POSNR_MAIN TYPE STRING,
CWM_MENGE TYPE STRING,
CWM_MEINS TYPE STRING,
REF_NUMBER TYPE STRING,
REF_ITEM_NUMBER TYPE STRING,
REF_TYPE TYPE STRING,
WEIGHT_VOLUME TYPE STRING,
PS_PSP_PNR TYPE STRING,
T2CCODE_CRCY_CONV_FACTOR_K TYPE STRING,
T2CNTRY_CRCY_CONV_FACTOR_K TYPE STRING,
INCO1_P TYPE STRING,
INCO2_P TYPE STRING,
NO_INCOTERM_DETERMINATION TYPE STRING,
INCOV_P TYPE STRING,
INCO2_L_P TYPE STRING,
INCO3_L_P TYPE STRING,
IV_CHECK_TYPE_I TYPE STRING,
MVGR1 TYPE STRING,
MVGR2 TYPE STRING,
MVGR3 TYPE STRING,
MVGR4 TYPE STRING,
MVGR5 TYPE STRING,
PROVG TYPE STRING,
KONDM TYPE STRING,
REBATE_GRP TYPE STRING,
BUPLA TYPE STRING,
REF_DOC_NR_1 TYPE STRING,
REF_DOC_YEAR_1 TYPE STRING,
REF_LOG_SYS_1 TYPE STRING,
REF_COMPANY_CODE_1 TYPE STRING,
REF_DOC_NR_2 TYPE STRING,
REF_DOC_YEAR_2 TYPE STRING,
REF_LOG_SYS_2 TYPE STRING,
TAX_COUNTRY TYPE STRING,
REF_DOC_TYPE_1 TYPE STRING,
REF_DOC_TYPE_2 TYPE STRING,
SCHEME_ID TYPE STRING,
SCHEME_A_ID TYPE STRING,
AGENCY_ID_CODE TYPE STRING,
REF_NUMBER_2 TYPE STRING,
REF_ITEM_NUM_2 TYPE STRING,
REF_TYPE_2 TYPE STRING,
REF_PAOBJNR TYPE STRING,
REF_SAKTO TYPE STRING,
KOWRR TYPE STRING,END OF T_EKKO_STR. DATA: WA_KOMLFPE_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_KOMLFPE_STR-OLDNR sy-vline
WA_KOMLFPE_STR-OLDPO sy-vline
WA_KOMLFPE_STR-WBELN sy-vline
WA_KOMLFPE_STR-POSNR sy-vline
WA_KOMLFPE_STR-MATNR sy-vline
WA_KOMLFPE_STR-MATKL sy-vline
WA_KOMLFPE_STR-WERKS sy-vline
WA_KOMLFPE_STR-KOLIF sy-vline
WA_KOMLFPE_STR-LTSNR sy-vline
WA_KOMLFPE_STR-MWSKZ sy-vline
WA_KOMLFPE_STR-PRSDT sy-vline
WA_KOMLFPE_STR-MENGE sy-vline
WA_KOMLFPE_STR-NETPR sy-vline
WA_KOMLFPE_STR-PEINH sy-vline
WA_KOMLFPE_STR-WFKME sy-vline
WA_KOMLFPE_STR-UMREZ sy-vline
WA_KOMLFPE_STR-UMREN sy-vline
WA_KOMLFPE_STR-SKTOF sy-vline
WA_KOMLFPE_STR-WBELNV sy-vline
WA_KOMLFPE_STR-POSNRV sy-vline
WA_KOMLFPE_STR-LFTYPV sy-vline
WA_KOMLFPE_STR-AKTNR sy-vline
WA_KOMLFPE_STR-LFGRU sy-vline
WA_KOMLFPE_STR-ARKTX sy-vline
WA_KOMLFPE_STR-TXJCD sy-vline
WA_KOMLFPE_STR-EBONF sy-vline
WA_KOMLFPE_STR-BWTAR sy-vline
WA_KOMLFPE_STR-BWTTY sy-vline
WA_KOMLFPE_STR-EKKOL sy-vline
WA_KOMLFPE_STR-NTGEW sy-vline
WA_KOMLFPE_STR-BRGEW sy-vline
WA_KOMLFPE_STR-GEWEI sy-vline
WA_KOMLFPE_STR-VOLUM sy-vline
WA_KOMLFPE_STR-VOLEH sy-vline
WA_KOMLFPE_STR-KOSTL sy-vline
WA_KOMLFPE_STR-PRCTR sy-vline
WA_KOMLFPE_STR-GSBER sy-vline
WA_KOMLFPE_STR-ANZPU sy-vline
WA_KOMLFPE_STR-PUNEI sy-vline
WA_KOMLFPE_STR-BONUS sy-vline
WA_KOMLFPE_STR-EBON2 sy-vline
WA_KOMLFPE_STR-EBON3 sy-vline
WA_KOMLFPE_STR-FPRME sy-vline
WA_KOMLFPE_STR-FPUMZ sy-vline
WA_KOMLFPE_STR-FPUMN sy-vline
WA_KOMLFPE_STR-WBELN_V sy-vline
WA_KOMLFPE_STR-POSNR_V sy-vline
WA_KOMLFPE_STR-FTYPV_V sy-vline
WA_KOMLFPE_STR-CHARG sy-vline
WA_KOMLFPE_STR-ITEMCAT sy-vline
WA_KOMLFPE_STR-MATBF sy-vline
WA_KOMLFPE_STR-WAART sy-vline
WA_KOMLFPE_STR-GJAHRV sy-vline
WA_KOMLFPE_STR-CONTRACT sy-vline
WA_KOMLFPE_STR-CONTRACT_ITEM sy-vline
WA_KOMLFPE_STR-CONTRACT_TYPE sy-vline
WA_KOMLFPE_STR-IDNLF sy-vline
WA_KOMLFPE_STR-GUID_REF sy-vline
WA_KOMLFPE_STR-IDNLF_TYPE sy-vline
WA_KOMLFPE_STR-BEMOT sy-vline
WA_KOMLFPE_STR-AUFNR sy-vline
WA_KOMLFPE_STR-NETPR_EXP sy-vline
WA_KOMLFPE_STR-FBUDA sy-vline
WA_KOMLFPE_STR-MODEL_ADJUSTED sy-vline
WA_KOMLFPE_STR-PRCD_ELEMENTS_MODEL_ADJUSTED sy-vline
WA_KOMLFPE_STR-PARTNER_MODEL_ADJUSTED sy-vline
WA_KOMLFPE_STR-TEXT_MODEL_ADJUSTED sy-vline
WA_KOMLFPE_STR-DUMMY_WBRP_INCL_EEW_PS sy-vline
WA_KOMLFPE_STR-CID sy-vline
WA_KOMLFPE_STR-PID sy-vline
WA_KOMLFPE_STR-KNUMH sy-vline
WA_KOMLFPE_STR-KOPOS sy-vline
WA_KOMLFPE_STR-COCO_NUM sy-vline
WA_KOMLFPE_STR-POSNR_MAIN sy-vline
WA_KOMLFPE_STR-CWM_MENGE sy-vline
WA_KOMLFPE_STR-CWM_MEINS sy-vline
WA_KOMLFPE_STR-REF_NUMBER sy-vline
WA_KOMLFPE_STR-REF_ITEM_NUMBER sy-vline
WA_KOMLFPE_STR-REF_TYPE sy-vline
WA_KOMLFPE_STR-WEIGHT_VOLUME sy-vline
WA_KOMLFPE_STR-PS_PSP_PNR sy-vline
WA_KOMLFPE_STR-T2CCODE_CRCY_CONV_FACTOR_K sy-vline
WA_KOMLFPE_STR-T2CNTRY_CRCY_CONV_FACTOR_K sy-vline
WA_KOMLFPE_STR-INCO1_P sy-vline
WA_KOMLFPE_STR-INCO2_P sy-vline
WA_KOMLFPE_STR-NO_INCOTERM_DETERMINATION sy-vline
WA_KOMLFPE_STR-INCOV_P sy-vline
WA_KOMLFPE_STR-INCO2_L_P sy-vline
WA_KOMLFPE_STR-INCO3_L_P sy-vline
WA_KOMLFPE_STR-IV_CHECK_TYPE_I sy-vline
WA_KOMLFPE_STR-MVGR1 sy-vline
WA_KOMLFPE_STR-MVGR2 sy-vline
WA_KOMLFPE_STR-MVGR3 sy-vline
WA_KOMLFPE_STR-MVGR4 sy-vline
WA_KOMLFPE_STR-MVGR5 sy-vline
WA_KOMLFPE_STR-PROVG sy-vline
WA_KOMLFPE_STR-KONDM sy-vline
WA_KOMLFPE_STR-REBATE_GRP sy-vline
WA_KOMLFPE_STR-BUPLA sy-vline
WA_KOMLFPE_STR-REF_DOC_NR_1 sy-vline
WA_KOMLFPE_STR-REF_DOC_YEAR_1 sy-vline
WA_KOMLFPE_STR-REF_LOG_SYS_1 sy-vline
WA_KOMLFPE_STR-REF_COMPANY_CODE_1 sy-vline
WA_KOMLFPE_STR-REF_DOC_NR_2 sy-vline
WA_KOMLFPE_STR-REF_DOC_YEAR_2 sy-vline
WA_KOMLFPE_STR-REF_LOG_SYS_2 sy-vline
WA_KOMLFPE_STR-TAX_COUNTRY sy-vline
WA_KOMLFPE_STR-REF_DOC_TYPE_1 sy-vline
WA_KOMLFPE_STR-REF_DOC_TYPE_2 sy-vline
WA_KOMLFPE_STR-SCHEME_ID sy-vline
WA_KOMLFPE_STR-SCHEME_A_ID sy-vline
WA_KOMLFPE_STR-AGENCY_ID_CODE sy-vline
WA_KOMLFPE_STR-REF_NUMBER_2 sy-vline
WA_KOMLFPE_STR-REF_ITEM_NUM_2 sy-vline
WA_KOMLFPE_STR-REF_TYPE_2 sy-vline
WA_KOMLFPE_STR-REF_PAOBJNR sy-vline
WA_KOMLFPE_STR-REF_SAKTO sy-vline
WA_KOMLFPE_STR-KOWRR sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.