ABAP Select data from SAP table RMCLF 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 RMCLF 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 RMCLF. 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 RMCLF 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_RMCLF TYPE STANDARD TABLE OF RMCLF,
      WA_RMCLF TYPE RMCLF,
      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: <RMCLF> TYPE RMCLF.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM RMCLF
*  INTO TABLE @DATA(IT_RMCLF2).
*--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_RMCLF INDEX 1 INTO DATA(WA_RMCLF2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_RMCLF ASSIGNING <RMCLF>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<RMCLF>-KLART = 1.
<RMCLF>-ARTXT = 1.
<RMCLF>-OBJEK = 1.
<RMCLF>-OBTXT = 1.
<RMCLF>-CLASS = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_RMCLF-KLTXT, sy-vline,
WA_RMCLF-ZAEHL, sy-vline,
WA_RMCLF-CLASN, sy-vline,
WA_RMCLF-KTEXT, sy-vline,
WA_RMCLF-CLTXT, sy-vline,
WA_RMCLF-KZKLA, sy-vline.
ENDLOOP. *Add any further fields from structure WA_RMCLF 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_RMCLF 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_RMCLF INTO WA_RMCLF. *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 AENNR1 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_RMCLF-AENNR1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RMCLF-AENNR1.
WRITE:/ 'New Value:', ld_input.

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

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

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

*Conversion exit OBKEY, internal->external for field OBJNR CALL FUNCTION 'CONVERSION_EXIT_OBKEY_OUTPUT' EXPORTING input = WA_RMCLF-OBJNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RMCLF-OBJNR.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

*Conversion exit FMCIS, internal->external for field FIPOS CALL FUNCTION 'CONVERSION_EXIT_FMCIS_OUTPUT' EXPORTING input = WA_RMCLF-FIPOS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RMCLF-FIPOS.
WRITE:/ 'New Value:', ld_input.

*Conversion exit FMCIS, internal->external for field FICPOS CALL FUNCTION 'CONVERSION_EXIT_FMCIS_OUTPUT' EXPORTING input = WA_RMCLF-FICPOS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RMCLF-FICPOS.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

*Conversion exit PNUID, internal->external for field BPL_PNGUID CALL FUNCTION 'CONVERSION_EXIT_PNUID_OUTPUT' EXPORTING input = WA_RMCLF-BPL_PNGUID IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RMCLF-BPL_PNGUID.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit CVLID, internal->external for field LONGTEXT_ID CALL FUNCTION 'CONVERSION_EXIT_CVLID_OUTPUT' EXPORTING input = WA_RMCLF-LONGTEXT_ID IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RMCLF-LONGTEXT_ID.
WRITE:/ 'New Value:', ld_input.

*Conversion exit FMCIL, internal->external for field FIPEX CALL FUNCTION 'CONVERSION_EXIT_FMCIL_OUTPUT' EXPORTING input = WA_RMCLF-FIPEX IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RMCLF-FIPEX.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

*Conversion exit PNUID, internal->external for field PNGUID CALL FUNCTION 'CONVERSION_EXIT_PNUID_OUTPUT' EXPORTING input = WA_RMCLF-PNGUID IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RMCLF-PNGUID.
WRITE:/ 'New Value:', ld_input.

*Conversion exit PVUID, internal->external for field PVGUID CALL FUNCTION 'CONVERSION_EXIT_PVUID_OUTPUT' EXPORTING input = WA_RMCLF-PVGUID IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RMCLF-PVGUID.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit ATINN, internal->external for field J_3GSTLNR CALL FUNCTION 'CONVERSION_EXIT_ATINN_OUTPUT' EXPORTING input = WA_RMCLF-J_3GSTLNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RMCLF-J_3GSTLNR.
WRITE:/ 'New Value:', ld_input.

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

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

*Conversion exit PRDID, internal->external for field MATID CALL FUNCTION 'CONVERSION_EXIT_PRDID_OUTPUT' EXPORTING input = WA_RMCLF-MATID IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RMCLF-MATID.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

*Conversion exit ALPHA, internal->external for field DFSSCENARIOALTVID CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_RMCLF-DFSSCENARIOALTVID IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RMCLF-DFSSCENARIOALTVID.
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_RMCLF_STR,
KLART TYPE STRING,
ARTXT TYPE STRING,
OBJEK TYPE STRING,
OBTXT TYPE STRING,
CLASS TYPE STRING,
KLTXT TYPE STRING,
ZAEHL TYPE STRING,
CLASN TYPE STRING,
KTEXT TYPE STRING,
CLTXT TYPE STRING,
KZKLA TYPE STRING,
TEXTO TYPE STRING,
STDCL TYPE STRING,
PAGANZ TYPE STRING,
PAGPOS TYPE STRING,
STATU TYPE STRING,
STATTXT TYPE STRING,
KREUZ TYPE STRING,
RADIO TYPE STRING,
ZUOKK TYPE STRING,
ZUOOK TYPE STRING,
OBTAB TYPE STRING,
OBTYP TYPE STRING,
AENNR1 TYPE STRING,
DATUV1 TYPE STRING,
ICON TYPE STRING,
ABTEI TYPE STRING,
ATNAM TYPE STRING,
GUID32 TYPE STRING,
MATNR TYPE STRING,
MEINS TYPE STRING,
DOKNR TYPE STRING,
DOKAR TYPE STRING,
DOKTL TYPE STRING,
DOKVR TYPE STRING,
KNNAM TYPE STRING,
WERKS TYPE STRING,
ARBPL TYPE STRING,
OBJNR TYPE STRING,
LIFNR TYPE STRING,
KUNNR TYPE STRING,
NETNR TYPE STRING,
CHARG TYPE STRING,
KSCHL TYPE STRING,
AENNR TYPE STRING,
KLART_CUVT TYPE STRING,
CLASS_CUVT TYPE STRING,
LNPOS TYPE STRING,
BSSTR TYPE STRING,
WGHIE TYPE STRING,
WARGR TYPE STRING,
WGHIE1 TYPE STRING,
SATNR TYPE STRING,
KOKRS TYPE STRING,
PRZNR TYPE STRING,
DATBI TYPE STRING,
FRGGR TYPE STRING,
GJAHR TYPE STRING,
RSNUM TYPE STRING,
RSPOS TYPE STRING,
RSART TYPE STRING,
ASNUM TYPE STRING,
FIKRS TYPE STRING,
FIPOS TYPE STRING,
FINCODE TYPE STRING,
FICPOS TYPE STRING,
VBELN TYPE STRING,
POSNR TYPE STRING,
AUFNR TYPE STRING,
AUFPL TYPE STRING,
ATINN TYPE STRING,
ATWRT TYPE STRING,
LAYVR TYPE STRING,
SORTF TYPE STRING,
EBELN TYPE STRING,
EBELP TYPE STRING,
BANFN TYPE STRING,
BNFPO TYPE STRING,
PARTNER TYPE STRING,
PARTNER_GUID TYPE STRING,
BUDGET_PD TYPE STRING,
XFELD TYPE STRING,
BPL_PNGUID TYPE STRING,
QMNUM TYPE STRING,
FENUM TYPE STRING,
EQUNR TYPE STRING,
TPLNR TYPE STRING,
FICTR TYPE STRING,
KATALOGART TYPE STRING,
AUSWAHLMGE TYPE STRING,
CODEGRUPPE TYPE STRING,
ZAEHLER TYPE STRING,
MKMNR TYPE STRING,
PMTNR TYPE STRING,
QVERSION TYPE STRING,
KANTE TYPE STRING,
TRPNR TYPE STRING,
SFHNR TYPE STRING,
PLNTY TYPE STRING,
PLNNR TYPE STRING,
PLNAL TYPE STRING,
STDTY TYPE STRING,
STDNR TYPE STRING,
STDAL TYPE STRING,
KAPPL TYPE STRING,
FRGSX TYPE STRING,
PRNAM TYPE STRING,
POSID TYPE STRING,
LOCNR TYPE STRING,
ABTNR TYPE STRING,
STLTY TYPE STRING,
STLNR TYPE STRING,
CLSZU TYPE STRING,
KNUMH TYPE STRING,
PLNKN TYPE STRING,
POINT TYPE STRING,
MGANR TYPE STRING,
POSNM TYPE STRING,
POSHIVERS TYPE STRING,
BEDAE TYPE STRING,
VERSB TYPE STRING,
PBDNR TYPE STRING,
PDATU TYPE STRING,
APLZL TYPE STRING,
MBLNR TYPE STRING,
MJAHR TYPE STRING,
ZEILE TYPE STRING,
OBKNR TYPE STRING,
RECN TYPE STRING,
ACTN TYPE STRING,
PBLNR TYPE STRING,
ASORT TYPE STRING,
KZWSM TYPE STRING,
SPEC_NO TYPE STRING,
DDI_ID TYPE STRING,
BZOBJ TYPE STRING,
KALNR TYPE STRING,
KALKA TYPE STRING,
KADKY TYPE STRING,
TVERS TYPE STRING,
BWVAR TYPE STRING,
KKZMA TYPE STRING,
MODEL_VAL TYPE STRING,
DOKOB TYPE STRING,
OBZAE TYPE STRING,
GNTYP TYPE STRING,
PMSOG TYPE STRING,
LONGTEXT_ID TYPE STRING,
FIPEX TYPE STRING,
RANL TYPE STRING,
VGBEL TYPE STRING,
VGPOS TYPE STRING,
VGTYP TYPE STRING,
VGSYS TYPE STRING,
BICSELVARIANT TYPE STRING,
SEALNR TYPE STRING,
DATE_TO TYPE STRING,
SEQNR TYPE STRING,
CU_ID TYPE STRING,
CUGUID TYPE STRING,
PLVAR TYPE STRING,
OTYPE TYPE STRING,
OBJID TYPE STRING,
VKORG TYPE STRING,
VTWEG TYPE STRING,
WARPL TYPE STRING,
CLAIM TYPE STRING,
CCEVENT TYPE STRING,
SERVCATID TYPE STRING,
PNGUID TYPE STRING,
PVGUID TYPE STRING,
AENNR2 TYPE STRING,
OUTID TYPE STRING,
OUTPO TYPE STRING,
JCPOS TYPE STRING,
REFTY TYPE STRING,
J_3GKATAL TYPE STRING,
J_3GAUSGJ TYPE STRING,
J_3GKATNRC TYPE STRING,
J_3GTPLKZ TYPE STRING,
J_3GLFDNR TYPE STRING,
J_3GKATNRS TYPE STRING,
J_3GDATBI TYPE STRING,
J_3GPOSNR TYPE STRING,
J_3GKATNRP TYPE STRING,
J_3GOBTXT TYPE STRING,
J_3GSTLNR TYPE STRING,
J_3GPOSNRI TYPE STRING,
PPV_ID TYPE STRING,
CHSTCNT TYPE STRING,
CLA_OBJNO TYPE STRING,
LINE_SEQNO TYPE STRING,
TRIALID TYPE STRING,
VGUID TYPE STRING,
TKONN TYPE STRING,
TPOSN TYPE STRING,
CR_DB_KEY TYPE STRING,
ECR_GUID TYPE STRING,
RCP_GUID TYPE STRING,
PP_VAL_GUID TYPE STRING,
PE_GUID TYPE STRING,
EQR_GUID TYPE STRING,
MATID TYPE STRING,
VERSION TYPE STRING,
RESUID TYPE STRING,
COMPONENT_ID TYPE STRING,
OBJECT_TYP TYPE STRING,
CONDITION_ID TYPE STRING,
OBJ_USAGE TYPE STRING,
LINE_NO TYPE STRING,
INFNR TYPE STRING,
ITEMID TYPE STRING,
DOCCAT TYPE STRING,
DFSCAPABILITYOBJECTID TYPE STRING,
MISSIONESSENTIALTASKID TYPE STRING,
DFSCAPABILITYSTATEMENTID TYPE STRING,
FLXBLMATLPLNGOBJECTID TYPE STRING,
FLXBLMATLPLNGOBJVARIANTID TYPE STRING,
FLXBLMATLPLNGOBJVARIANTUUID TYPE STRING,
DFSSCENARIOID TYPE STRING,
DFSSCENARIOALTVID TYPE STRING,END OF T_EKKO_STR. DATA: WA_RMCLF_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_RMCLF_STR-KLART sy-vline
WA_RMCLF_STR-ARTXT sy-vline
WA_RMCLF_STR-OBJEK sy-vline
WA_RMCLF_STR-OBTXT sy-vline
WA_RMCLF_STR-CLASS sy-vline
WA_RMCLF_STR-KLTXT sy-vline
WA_RMCLF_STR-ZAEHL sy-vline
WA_RMCLF_STR-CLASN sy-vline
WA_RMCLF_STR-KTEXT sy-vline
WA_RMCLF_STR-CLTXT sy-vline
WA_RMCLF_STR-KZKLA sy-vline
WA_RMCLF_STR-TEXTO sy-vline
WA_RMCLF_STR-STDCL sy-vline
WA_RMCLF_STR-PAGANZ sy-vline
WA_RMCLF_STR-PAGPOS sy-vline
WA_RMCLF_STR-STATU sy-vline
WA_RMCLF_STR-STATTXT sy-vline
WA_RMCLF_STR-KREUZ sy-vline
WA_RMCLF_STR-RADIO sy-vline
WA_RMCLF_STR-ZUOKK sy-vline
WA_RMCLF_STR-ZUOOK sy-vline
WA_RMCLF_STR-OBTAB sy-vline
WA_RMCLF_STR-OBTYP sy-vline
WA_RMCLF_STR-AENNR1 sy-vline
WA_RMCLF_STR-DATUV1 sy-vline
WA_RMCLF_STR-ICON sy-vline
WA_RMCLF_STR-ABTEI sy-vline
WA_RMCLF_STR-ATNAM sy-vline
WA_RMCLF_STR-GUID32 sy-vline
WA_RMCLF_STR-MATNR sy-vline
WA_RMCLF_STR-MEINS sy-vline
WA_RMCLF_STR-DOKNR sy-vline
WA_RMCLF_STR-DOKAR sy-vline
WA_RMCLF_STR-DOKTL sy-vline
WA_RMCLF_STR-DOKVR sy-vline
WA_RMCLF_STR-KNNAM sy-vline
WA_RMCLF_STR-WERKS sy-vline
WA_RMCLF_STR-ARBPL sy-vline
WA_RMCLF_STR-OBJNR sy-vline
WA_RMCLF_STR-LIFNR sy-vline
WA_RMCLF_STR-KUNNR sy-vline
WA_RMCLF_STR-NETNR sy-vline
WA_RMCLF_STR-CHARG sy-vline
WA_RMCLF_STR-KSCHL sy-vline
WA_RMCLF_STR-AENNR sy-vline
WA_RMCLF_STR-KLART_CUVT sy-vline
WA_RMCLF_STR-CLASS_CUVT sy-vline
WA_RMCLF_STR-LNPOS sy-vline
WA_RMCLF_STR-BSSTR sy-vline
WA_RMCLF_STR-WGHIE sy-vline
WA_RMCLF_STR-WARGR sy-vline
WA_RMCLF_STR-WGHIE1 sy-vline
WA_RMCLF_STR-SATNR sy-vline
WA_RMCLF_STR-KOKRS sy-vline
WA_RMCLF_STR-PRZNR sy-vline
WA_RMCLF_STR-DATBI sy-vline
WA_RMCLF_STR-FRGGR sy-vline
WA_RMCLF_STR-GJAHR sy-vline
WA_RMCLF_STR-RSNUM sy-vline
WA_RMCLF_STR-RSPOS sy-vline
WA_RMCLF_STR-RSART sy-vline
WA_RMCLF_STR-ASNUM sy-vline
WA_RMCLF_STR-FIKRS sy-vline
WA_RMCLF_STR-FIPOS sy-vline
WA_RMCLF_STR-FINCODE sy-vline
WA_RMCLF_STR-FICPOS sy-vline
WA_RMCLF_STR-VBELN sy-vline
WA_RMCLF_STR-POSNR sy-vline
WA_RMCLF_STR-AUFNR sy-vline
WA_RMCLF_STR-AUFPL sy-vline
WA_RMCLF_STR-ATINN sy-vline
WA_RMCLF_STR-ATWRT sy-vline
WA_RMCLF_STR-LAYVR sy-vline
WA_RMCLF_STR-SORTF sy-vline
WA_RMCLF_STR-EBELN sy-vline
WA_RMCLF_STR-EBELP sy-vline
WA_RMCLF_STR-BANFN sy-vline
WA_RMCLF_STR-BNFPO sy-vline
WA_RMCLF_STR-PARTNER sy-vline
WA_RMCLF_STR-PARTNER_GUID sy-vline
WA_RMCLF_STR-BUDGET_PD sy-vline
WA_RMCLF_STR-XFELD sy-vline
WA_RMCLF_STR-BPL_PNGUID sy-vline
WA_RMCLF_STR-QMNUM sy-vline
WA_RMCLF_STR-FENUM sy-vline
WA_RMCLF_STR-EQUNR sy-vline
WA_RMCLF_STR-TPLNR sy-vline
WA_RMCLF_STR-FICTR sy-vline
WA_RMCLF_STR-KATALOGART sy-vline
WA_RMCLF_STR-AUSWAHLMGE sy-vline
WA_RMCLF_STR-CODEGRUPPE sy-vline
WA_RMCLF_STR-ZAEHLER sy-vline
WA_RMCLF_STR-MKMNR sy-vline
WA_RMCLF_STR-PMTNR sy-vline
WA_RMCLF_STR-QVERSION sy-vline
WA_RMCLF_STR-KANTE sy-vline
WA_RMCLF_STR-TRPNR sy-vline
WA_RMCLF_STR-SFHNR sy-vline
WA_RMCLF_STR-PLNTY sy-vline
WA_RMCLF_STR-PLNNR sy-vline
WA_RMCLF_STR-PLNAL sy-vline
WA_RMCLF_STR-STDTY sy-vline
WA_RMCLF_STR-STDNR sy-vline
WA_RMCLF_STR-STDAL sy-vline
WA_RMCLF_STR-KAPPL sy-vline
WA_RMCLF_STR-FRGSX sy-vline
WA_RMCLF_STR-PRNAM sy-vline
WA_RMCLF_STR-POSID sy-vline
WA_RMCLF_STR-LOCNR sy-vline
WA_RMCLF_STR-ABTNR sy-vline
WA_RMCLF_STR-STLTY sy-vline
WA_RMCLF_STR-STLNR sy-vline
WA_RMCLF_STR-CLSZU sy-vline
WA_RMCLF_STR-KNUMH sy-vline
WA_RMCLF_STR-PLNKN sy-vline
WA_RMCLF_STR-POINT sy-vline
WA_RMCLF_STR-MGANR sy-vline
WA_RMCLF_STR-POSNM sy-vline
WA_RMCLF_STR-POSHIVERS sy-vline
WA_RMCLF_STR-BEDAE sy-vline
WA_RMCLF_STR-VERSB sy-vline
WA_RMCLF_STR-PBDNR sy-vline
WA_RMCLF_STR-PDATU sy-vline
WA_RMCLF_STR-APLZL sy-vline
WA_RMCLF_STR-MBLNR sy-vline
WA_RMCLF_STR-MJAHR sy-vline
WA_RMCLF_STR-ZEILE sy-vline
WA_RMCLF_STR-OBKNR sy-vline
WA_RMCLF_STR-RECN sy-vline
WA_RMCLF_STR-ACTN sy-vline
WA_RMCLF_STR-PBLNR sy-vline
WA_RMCLF_STR-ASORT sy-vline
WA_RMCLF_STR-KZWSM sy-vline
WA_RMCLF_STR-SPEC_NO sy-vline
WA_RMCLF_STR-DDI_ID sy-vline
WA_RMCLF_STR-BZOBJ sy-vline
WA_RMCLF_STR-KALNR sy-vline
WA_RMCLF_STR-KALKA sy-vline
WA_RMCLF_STR-KADKY sy-vline
WA_RMCLF_STR-TVERS sy-vline
WA_RMCLF_STR-BWVAR sy-vline
WA_RMCLF_STR-KKZMA sy-vline
WA_RMCLF_STR-MODEL_VAL sy-vline
WA_RMCLF_STR-DOKOB sy-vline
WA_RMCLF_STR-OBZAE sy-vline
WA_RMCLF_STR-GNTYP sy-vline
WA_RMCLF_STR-PMSOG sy-vline
WA_RMCLF_STR-LONGTEXT_ID sy-vline
WA_RMCLF_STR-FIPEX sy-vline
WA_RMCLF_STR-RANL sy-vline
WA_RMCLF_STR-VGBEL sy-vline
WA_RMCLF_STR-VGPOS sy-vline
WA_RMCLF_STR-VGTYP sy-vline
WA_RMCLF_STR-VGSYS sy-vline
WA_RMCLF_STR-BICSELVARIANT sy-vline
WA_RMCLF_STR-SEALNR sy-vline
WA_RMCLF_STR-DATE_TO sy-vline
WA_RMCLF_STR-SEQNR sy-vline
WA_RMCLF_STR-CU_ID sy-vline
WA_RMCLF_STR-CUGUID sy-vline
WA_RMCLF_STR-PLVAR sy-vline
WA_RMCLF_STR-OTYPE sy-vline
WA_RMCLF_STR-OBJID sy-vline
WA_RMCLF_STR-VKORG sy-vline
WA_RMCLF_STR-VTWEG sy-vline
WA_RMCLF_STR-WARPL sy-vline
WA_RMCLF_STR-CLAIM sy-vline
WA_RMCLF_STR-CCEVENT sy-vline
WA_RMCLF_STR-SERVCATID sy-vline
WA_RMCLF_STR-PNGUID sy-vline
WA_RMCLF_STR-PVGUID sy-vline
WA_RMCLF_STR-AENNR2 sy-vline
WA_RMCLF_STR-OUTID sy-vline
WA_RMCLF_STR-OUTPO sy-vline
WA_RMCLF_STR-JCPOS sy-vline
WA_RMCLF_STR-REFTY sy-vline
WA_RMCLF_STR-J_3GKATAL sy-vline
WA_RMCLF_STR-J_3GAUSGJ sy-vline
WA_RMCLF_STR-J_3GKATNRC sy-vline
WA_RMCLF_STR-J_3GTPLKZ sy-vline
WA_RMCLF_STR-J_3GLFDNR sy-vline
WA_RMCLF_STR-J_3GKATNRS sy-vline
WA_RMCLF_STR-J_3GDATBI sy-vline
WA_RMCLF_STR-J_3GPOSNR sy-vline
WA_RMCLF_STR-J_3GKATNRP sy-vline
WA_RMCLF_STR-J_3GOBTXT sy-vline
WA_RMCLF_STR-J_3GSTLNR sy-vline
WA_RMCLF_STR-J_3GPOSNRI sy-vline
WA_RMCLF_STR-PPV_ID sy-vline
WA_RMCLF_STR-CHSTCNT sy-vline
WA_RMCLF_STR-CLA_OBJNO sy-vline
WA_RMCLF_STR-LINE_SEQNO sy-vline
WA_RMCLF_STR-TRIALID sy-vline
WA_RMCLF_STR-VGUID sy-vline
WA_RMCLF_STR-TKONN sy-vline
WA_RMCLF_STR-TPOSN sy-vline
WA_RMCLF_STR-CR_DB_KEY sy-vline
WA_RMCLF_STR-ECR_GUID sy-vline
WA_RMCLF_STR-RCP_GUID sy-vline
WA_RMCLF_STR-PP_VAL_GUID sy-vline
WA_RMCLF_STR-PE_GUID sy-vline
WA_RMCLF_STR-EQR_GUID sy-vline
WA_RMCLF_STR-MATID sy-vline
WA_RMCLF_STR-VERSION sy-vline
WA_RMCLF_STR-RESUID sy-vline
WA_RMCLF_STR-COMPONENT_ID sy-vline
WA_RMCLF_STR-OBJECT_TYP sy-vline
WA_RMCLF_STR-CONDITION_ID sy-vline
WA_RMCLF_STR-OBJ_USAGE sy-vline
WA_RMCLF_STR-LINE_NO sy-vline
WA_RMCLF_STR-INFNR sy-vline
WA_RMCLF_STR-ITEMID sy-vline
WA_RMCLF_STR-DOCCAT sy-vline
WA_RMCLF_STR-DFSCAPABILITYOBJECTID sy-vline
WA_RMCLF_STR-MISSIONESSENTIALTASKID sy-vline
WA_RMCLF_STR-DFSCAPABILITYSTATEMENTID sy-vline
WA_RMCLF_STR-FLXBLMATLPLNGOBJECTID sy-vline
WA_RMCLF_STR-FLXBLMATLPLNGOBJVARIANTID sy-vline
WA_RMCLF_STR-FLXBLMATLPLNGOBJVARIANTUUID sy-vline
WA_RMCLF_STR-DFSSCENARIOID sy-vline
WA_RMCLF_STR-DFSSCENARIOALTVID sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.