ABAP Select data from SAP table VSPLAFB 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 VSPLAFB 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 VSPLAFB. 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 VSPLAFB 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_VSPLAFB TYPE STANDARD TABLE OF VSPLAFB,
      WA_VSPLAFB TYPE VSPLAFB,
      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: <VSPLAFB> TYPE VSPLAFB.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM VSPLAFB
*  INTO TABLE @DATA(IT_VSPLAFB2).
*--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_VSPLAFB INDEX 1 INTO DATA(WA_VSPLAFB2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_VSPLAFB ASSIGNING <VSPLAFB>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<VSPLAFB>-MANDT = 1.
<VSPLAFB>-VSNMR = 1.
<VSPLAFB>-PLNUM = 1.
<VSPLAFB>-MATNR = 1.
<VSPLAFB>-PLWRK = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_VSPLAFB-PWWRK, sy-vline,
WA_VSPLAFB-PAART, sy-vline,
WA_VSPLAFB-BESKZ, sy-vline,
WA_VSPLAFB-SOBES, sy-vline,
WA_VSPLAFB-GSMNG, sy-vline,
WA_VSPLAFB-TLMNG, sy-vline.
ENDLOOP. *Add any further fields from structure WA_VSPLAFB 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_VSPLAFB 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_VSPLAFB INTO WA_VSPLAFB. *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 PLNUM CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_VSPLAFB-PLNUM IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_VSPLAFB-PLNUM.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit NUMCV, internal->external for field REVLV CALL FUNCTION 'CONVERSION_EXIT_NUMCV_OUTPUT' EXPORTING input = WA_VSPLAFB-REVLV IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_VSPLAFB-REVLV.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

*Conversion exit ALPHA, internal->external for field SRM_CONTRACT_ID CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_VSPLAFB-SRM_CONTRACT_ID IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_VSPLAFB-SRM_CONTRACT_ID.
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_VSPLAFB_STR,
MANDT TYPE STRING,
VSNMR TYPE STRING,
PLNUM TYPE STRING,
MATNR TYPE STRING,
PLWRK TYPE STRING,
PWWRK TYPE STRING,
PAART TYPE STRING,
BESKZ TYPE STRING,
SOBES TYPE STRING,
GSMNG TYPE STRING,
TLMNG TYPE STRING,
AVMNG TYPE STRING,
BDMNG TYPE STRING,
PSTTR TYPE STRING,
PEDTR TYPE STRING,
PERTR TYPE STRING,
WEBAZ TYPE STRING,
DISPO TYPE STRING,
UMSKZ TYPE STRING,
AUFFX TYPE STRING,
STLFX TYPE STRING,
KNTTP TYPE STRING,
KDAUF TYPE STRING,
KDPOS TYPE STRING,
KDEIN TYPE STRING,
PROJN TYPE STRING,
RSNUM TYPE STRING,
QUNUM TYPE STRING,
QUPOS TYPE STRING,
FLIEF TYPE STRING,
KONNR TYPE STRING,
KTPNR TYPE STRING,
EKORG TYPE STRING,
LGORT TYPE STRING,
NUMVR TYPE STRING,
KZVBR TYPE STRING,
SOBKZ TYPE STRING,
PSPEL TYPE STRING,
SERNR TYPE STRING,
PALTR TYPE STRING,
TECHS TYPE STRING,
STLAN TYPE STRING,
STALT TYPE STRING,
AENNR TYPE STRING,
ARSNR TYPE STRING,
ARSPS TYPE STRING,
VERTO TYPE STRING,
VERID TYPE STRING,
AUFNR TYPE STRING,
TRART TYPE STRING,
PLGRP TYPE STRING,
TERST TYPE STRING,
TERED TYPE STRING,
BEDID TYPE STRING,
AUFPL TYPE STRING,
LINID TYPE STRING,
TRMKZ TYPE STRING,
TRMER TYPE STRING,
REDKZ TYPE STRING,
TRMHK TYPE STRING,
PLNNR TYPE STRING,
PLNAL TYPE STRING,
PLNTY TYPE STRING,
FRTHW TYPE STRING,
RGEKZ TYPE STRING,
MEINS TYPE STRING,
CUOBJ TYPE STRING,
REVLV TYPE STRING,
ABMNG TYPE STRING,
RATID TYPE STRING,
GROID TYPE STRING,
RATER TYPE STRING,
GROER TYPE STRING,
OBART TYPE STRING,
PLSCN TYPE STRING,
SBNUM TYPE STRING,
KBNKZ TYPE STRING,
KAPFX TYPE STRING,
SEQNR TYPE STRING,
PSTTI TYPE STRING,
PEDTI TYPE STRING,
MONKZ TYPE STRING,
STSTA TYPE STRING,
PRNKZ TYPE STRING,
MDPBV TYPE STRING,
VFMNG TYPE STRING,
MDACH TYPE STRING,
MDACC TYPE STRING,
MDACD TYPE STRING,
MDACT TYPE STRING,
GSBTR TYPE STRING,
PLETX TYPE STRING,
PRSCH TYPE STRING,
LVSCH TYPE STRING,
KZAVC TYPE STRING,
VRPLA TYPE STRING,
PBDNR TYPE STRING,
AGREQ TYPE STRING,
UMREZ TYPE STRING,
UMREN TYPE STRING,
ERFMG TYPE STRING,
ERFME TYPE STRING,
RQNUM TYPE STRING,
KZBWS TYPE STRING,
WEMNG TYPE STRING,
WAMNG TYPE STRING,
EDGNO TYPE STRING,
LBLKZ TYPE STRING,
EMLIF TYPE STRING,
BERID TYPE STRING,
UBERI TYPE STRING,
EMATN TYPE STRING,
REMFL TYPE STRING,
PSTMP TYPE STRING,
PUSER TYPE STRING,
BADI TYPE STRING,
STAEX TYPE STRING,
RESLO TYPE STRING,
MEDKZ TYPE STRING,
CNFQTY TYPE STRING,
SGT_SCAT TYPE STRING,
PLIFZ TYPE STRING,
BOM_VERSN TYPE STRING,
ATRKZ TYPE STRING,
DAC_PP_COMPONENT TYPE STRING,
DAC_INDIRECT_ACCESS TYPE STRING,
DAC_CREATION_DATE TYPE STRING,
DUMMY_PLAF_INCL_EEW_PS TYPE STRING,
KUNNR TYPE STRING,
FLG_BUNDLE TYPE STRING,
FSH_MPLND_ORD TYPE STRING,
SRM_CONTRACT_ID TYPE STRING,
SRM_CONTRACT_ITM TYPE STRING,
M_MRP TYPE STRING,
VBUKZ TYPE STRING,END OF T_EKKO_STR. DATA: WA_VSPLAFB_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_VSPLAFB_STR-MANDT sy-vline
WA_VSPLAFB_STR-VSNMR sy-vline
WA_VSPLAFB_STR-PLNUM sy-vline
WA_VSPLAFB_STR-MATNR sy-vline
WA_VSPLAFB_STR-PLWRK sy-vline
WA_VSPLAFB_STR-PWWRK sy-vline
WA_VSPLAFB_STR-PAART sy-vline
WA_VSPLAFB_STR-BESKZ sy-vline
WA_VSPLAFB_STR-SOBES sy-vline
WA_VSPLAFB_STR-GSMNG sy-vline
WA_VSPLAFB_STR-TLMNG sy-vline
WA_VSPLAFB_STR-AVMNG sy-vline
WA_VSPLAFB_STR-BDMNG sy-vline
WA_VSPLAFB_STR-PSTTR sy-vline
WA_VSPLAFB_STR-PEDTR sy-vline
WA_VSPLAFB_STR-PERTR sy-vline
WA_VSPLAFB_STR-WEBAZ sy-vline
WA_VSPLAFB_STR-DISPO sy-vline
WA_VSPLAFB_STR-UMSKZ sy-vline
WA_VSPLAFB_STR-AUFFX sy-vline
WA_VSPLAFB_STR-STLFX sy-vline
WA_VSPLAFB_STR-KNTTP sy-vline
WA_VSPLAFB_STR-KDAUF sy-vline
WA_VSPLAFB_STR-KDPOS sy-vline
WA_VSPLAFB_STR-KDEIN sy-vline
WA_VSPLAFB_STR-PROJN sy-vline
WA_VSPLAFB_STR-RSNUM sy-vline
WA_VSPLAFB_STR-QUNUM sy-vline
WA_VSPLAFB_STR-QUPOS sy-vline
WA_VSPLAFB_STR-FLIEF sy-vline
WA_VSPLAFB_STR-KONNR sy-vline
WA_VSPLAFB_STR-KTPNR sy-vline
WA_VSPLAFB_STR-EKORG sy-vline
WA_VSPLAFB_STR-LGORT sy-vline
WA_VSPLAFB_STR-NUMVR sy-vline
WA_VSPLAFB_STR-KZVBR sy-vline
WA_VSPLAFB_STR-SOBKZ sy-vline
WA_VSPLAFB_STR-PSPEL sy-vline
WA_VSPLAFB_STR-SERNR sy-vline
WA_VSPLAFB_STR-PALTR sy-vline
WA_VSPLAFB_STR-TECHS sy-vline
WA_VSPLAFB_STR-STLAN sy-vline
WA_VSPLAFB_STR-STALT sy-vline
WA_VSPLAFB_STR-AENNR sy-vline
WA_VSPLAFB_STR-ARSNR sy-vline
WA_VSPLAFB_STR-ARSPS sy-vline
WA_VSPLAFB_STR-VERTO sy-vline
WA_VSPLAFB_STR-VERID sy-vline
WA_VSPLAFB_STR-AUFNR sy-vline
WA_VSPLAFB_STR-TRART sy-vline
WA_VSPLAFB_STR-PLGRP sy-vline
WA_VSPLAFB_STR-TERST sy-vline
WA_VSPLAFB_STR-TERED sy-vline
WA_VSPLAFB_STR-BEDID sy-vline
WA_VSPLAFB_STR-AUFPL sy-vline
WA_VSPLAFB_STR-LINID sy-vline
WA_VSPLAFB_STR-TRMKZ sy-vline
WA_VSPLAFB_STR-TRMER sy-vline
WA_VSPLAFB_STR-REDKZ sy-vline
WA_VSPLAFB_STR-TRMHK sy-vline
WA_VSPLAFB_STR-PLNNR sy-vline
WA_VSPLAFB_STR-PLNAL sy-vline
WA_VSPLAFB_STR-PLNTY sy-vline
WA_VSPLAFB_STR-FRTHW sy-vline
WA_VSPLAFB_STR-RGEKZ sy-vline
WA_VSPLAFB_STR-MEINS sy-vline
WA_VSPLAFB_STR-CUOBJ sy-vline
WA_VSPLAFB_STR-REVLV sy-vline
WA_VSPLAFB_STR-ABMNG sy-vline
WA_VSPLAFB_STR-RATID sy-vline
WA_VSPLAFB_STR-GROID sy-vline
WA_VSPLAFB_STR-RATER sy-vline
WA_VSPLAFB_STR-GROER sy-vline
WA_VSPLAFB_STR-OBART sy-vline
WA_VSPLAFB_STR-PLSCN sy-vline
WA_VSPLAFB_STR-SBNUM sy-vline
WA_VSPLAFB_STR-KBNKZ sy-vline
WA_VSPLAFB_STR-KAPFX sy-vline
WA_VSPLAFB_STR-SEQNR sy-vline
WA_VSPLAFB_STR-PSTTI sy-vline
WA_VSPLAFB_STR-PEDTI sy-vline
WA_VSPLAFB_STR-MONKZ sy-vline
WA_VSPLAFB_STR-STSTA sy-vline
WA_VSPLAFB_STR-PRNKZ sy-vline
WA_VSPLAFB_STR-MDPBV sy-vline
WA_VSPLAFB_STR-VFMNG sy-vline
WA_VSPLAFB_STR-MDACH sy-vline
WA_VSPLAFB_STR-MDACC sy-vline
WA_VSPLAFB_STR-MDACD sy-vline
WA_VSPLAFB_STR-MDACT sy-vline
WA_VSPLAFB_STR-GSBTR sy-vline
WA_VSPLAFB_STR-PLETX sy-vline
WA_VSPLAFB_STR-PRSCH sy-vline
WA_VSPLAFB_STR-LVSCH sy-vline
WA_VSPLAFB_STR-KZAVC sy-vline
WA_VSPLAFB_STR-VRPLA sy-vline
WA_VSPLAFB_STR-PBDNR sy-vline
WA_VSPLAFB_STR-AGREQ sy-vline
WA_VSPLAFB_STR-UMREZ sy-vline
WA_VSPLAFB_STR-UMREN sy-vline
WA_VSPLAFB_STR-ERFMG sy-vline
WA_VSPLAFB_STR-ERFME sy-vline
WA_VSPLAFB_STR-RQNUM sy-vline
WA_VSPLAFB_STR-KZBWS sy-vline
WA_VSPLAFB_STR-WEMNG sy-vline
WA_VSPLAFB_STR-WAMNG sy-vline
WA_VSPLAFB_STR-EDGNO sy-vline
WA_VSPLAFB_STR-LBLKZ sy-vline
WA_VSPLAFB_STR-EMLIF sy-vline
WA_VSPLAFB_STR-BERID sy-vline
WA_VSPLAFB_STR-UBERI sy-vline
WA_VSPLAFB_STR-EMATN sy-vline
WA_VSPLAFB_STR-REMFL sy-vline
WA_VSPLAFB_STR-PSTMP sy-vline
WA_VSPLAFB_STR-PUSER sy-vline
WA_VSPLAFB_STR-BADI sy-vline
WA_VSPLAFB_STR-STAEX sy-vline
WA_VSPLAFB_STR-RESLO sy-vline
WA_VSPLAFB_STR-MEDKZ sy-vline
WA_VSPLAFB_STR-CNFQTY sy-vline
WA_VSPLAFB_STR-SGT_SCAT sy-vline
WA_VSPLAFB_STR-PLIFZ sy-vline
WA_VSPLAFB_STR-BOM_VERSN sy-vline
WA_VSPLAFB_STR-ATRKZ sy-vline
WA_VSPLAFB_STR-DAC_PP_COMPONENT sy-vline
WA_VSPLAFB_STR-DAC_INDIRECT_ACCESS sy-vline
WA_VSPLAFB_STR-DAC_CREATION_DATE sy-vline
WA_VSPLAFB_STR-DUMMY_PLAF_INCL_EEW_PS sy-vline
WA_VSPLAFB_STR-KUNNR sy-vline
WA_VSPLAFB_STR-FLG_BUNDLE sy-vline
WA_VSPLAFB_STR-FSH_MPLND_ORD sy-vline
WA_VSPLAFB_STR-SRM_CONTRACT_ID sy-vline
WA_VSPLAFB_STR-SRM_CONTRACT_ITM sy-vline
WA_VSPLAFB_STR-M_MRP sy-vline
WA_VSPLAFB_STR-VBUKZ sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.