ABAP Select data from SAP table IEBORDHIRTPRCST 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 IEBORDHIRTPRCST 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 IEBORDHIRTPRCST. 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 IEBORDHIRTPRCST 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_IEBORDHIRTPRCST TYPE STANDARD TABLE OF IEBORDHIRTPRCST,
      WA_IEBORDHIRTPRCST TYPE IEBORDHIRTPRCST,
      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: <IEBORDHIRTPRCST> TYPE IEBORDHIRTPRCST.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM IEBORDHIRTPRCST
*  INTO TABLE @DATA(IT_IEBORDHIRTPRCST2).
*--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_IEBORDHIRTPRCST INDEX 1 INTO DATA(WA_IEBORDHIRTPRCST2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_IEBORDHIRTPRCST ASSIGNING <IEBORDHIRTPRCST>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<IEBORDHIRTPRCST>-MANDT = 1.
<IEBORDHIRTPRCST>-ORDERID = 1.
<IEBORDHIRTPRCST>-ORDERITEM = 1.
<IEBORDHIRTPRCST>-ORDERINTERNALID = 1.
<IEBORDHIRTPRCST>-OBJECTINTERNALID = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_IEBORDHIRTPRCST-INTERNALORDERTEXT, sy-vline,
WA_IEBORDHIRTPRCST-ORDERTYPE, sy-vline,
WA_IEBORDHIRTPRCST-ORDERCATEGORY, sy-vline,
WA_IEBORDHIRTPRCST-EXTERNALORDER, sy-vline,
WA_IEBORDHIRTPRCST-ORDERDESCRIPTION, sy-vline,
WA_IEBORDHIRTPRCST-PLANT, sy-vline.
ENDLOOP. *Add any further fields from structure WA_IEBORDHIRTPRCST 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_IEBORDHIRTPRCST 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_IEBORDHIRTPRCST INTO WA_IEBORDHIRTPRCST. *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 ORDERID CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_IEBORDHIRTPRCST-ORDERID IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IEBORDHIRTPRCST-ORDERID.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

*Conversion exit CUNIT, internal->external for field PRODUCTIONUNIT CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_IEBORDHIRTPRCST-PRODUCTIONUNIT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IEBORDHIRTPRCST-PRODUCTIONUNIT.
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_IEBORDHIRTPRCST_STR,
MANDT TYPE STRING,
ORDERID TYPE STRING,
ORDERITEM TYPE STRING,
ORDERINTERNALID TYPE STRING,
OBJECTINTERNALID TYPE STRING,
INTERNALORDERTEXT TYPE STRING,
ORDERTYPE TYPE STRING,
ORDERCATEGORY TYPE STRING,
EXTERNALORDER TYPE STRING,
ORDERDESCRIPTION TYPE STRING,
PLANT TYPE STRING,
COMPANYCODE TYPE STRING,
BASEUNIT TYPE STRING,
RATIOUNIT TYPE STRING,
LEDGER TYPE STRING,
CONTROLLINGAREA TYPE STRING,
BUSINESSAREA TYPE STRING,
PROFITCENTER TYPE STRING,
RESPONSIBLECOSTCENTER TYPE STRING,
WBSELEMENTINTERNALID TYPE STRING,
PRODUCTIONVERSION TYPE STRING,
SALESORDER TYPE STRING,
SALESORDERITEM TYPE STRING,
MATERIAL TYPE STRING,
MATERIALGROUP TYPE STRING,
MRPPLANT TYPE STRING,
STORAGELOCATION TYPE STRING,
PRODUCTIONUNIT TYPE STRING,
ISMARKEDFORDELETION TYPE STRING,
MFGORDERHASMULTIPLEITEMS TYPE STRING,
ACTUALCOSTSCOSTINGVARIANT TYPE STRING,
PLANNEDCOSTSCOSTINGVARIANT TYPE STRING,
PLANNEDRELEASEDATE TYPE STRING,
PLANNEDCOMPLETIONDATE TYPE STRING,
CREATEDBYUSER TYPE STRING,
CREATIONDATE TYPE STRING,
LASTCHANGEDBYUSER TYPE STRING,
LASTCHANGEDATE TYPE STRING,
TECHNICALCOMPLETIONDATE TYPE STRING,
SCHEDULEDBASICENDDATE TYPE STRING,
SCHEDULEDRELEASEDATE TYPE STRING,
ACTUALSTARTDATE TYPE STRING,
CONFIRMEDENDDATE TYPE STRING,
ACTUALRELEASEDDATE TYPE STRING,
CONTROLLINGOBJECTSTATUS TYPE STRING,
ORDERKEYSTATUS TYPE STRING,
DISPLAYCURRENCY TYPE STRING,
VALIDITYDATE TYPE STRING,
CREDITACTLCOSTINDSPCRCY TYPE STRING,
DEBITACTLCOSTINDSPCRCY TYPE STRING,
ACTLCOSTINDSPCRCY TYPE STRING,
CRDTACTLFXDCOSTINDSPCRCY TYPE STRING,
DEBITACTLFXDCOSTINDSPCRCY TYPE STRING,
ACTLFIXEDCOSTINDSPCRCY TYPE STRING,
DEBITACTLVARBLCOSTINDSPCRCY TYPE STRING,
CRDTACTLVARBLCOSTINDDSPCRCY TYPE STRING,
ACTLVARBLCOSTINDSPCRCY TYPE STRING,
CREDITPLANCOSTINDSPCRCY TYPE STRING,
DEBITPLANCOSTINDSPCRCY TYPE STRING,
CRDTPLNFXDCOSTINDSPCRCY TYPE STRING,
DEBITPLNFXDCOSTINDSPCRCY TYPE STRING,
DEBITPLNVARBLCOSTINDSPCRCY TYPE STRING,
CRDTPLNVARBLCOSTINDSPCRCY TYPE STRING,
PLANVARBLCOSTINDSPCRCY TYPE STRING,
PLANCOSTINDSPCRCY TYPE STRING,
PLANFIXEDCOSTINDSPCRCY TYPE STRING,
CRDTTARGETCOSTINDSPCRCY TYPE STRING,
DEBITTARGETCOSTINDSPCRCY TYPE STRING,
TARGETCOSTINDSPCRCY TYPE STRING,
CRDTPLANCTRLCOSTINDSPCRCY TYPE STRING,
DEBITPLANCTRLCOSTINDSPCRCY TYPE STRING,
PLANCTRLCOSTINDSPCRCY TYPE STRING,
CRDTACTLCTRLCOSTINDSPCRCY TYPE STRING,
DEBITACTLCTRLCOSTINDSPCRCY TYPE STRING,
ACTLCTRLCOSTINDSPCRCY TYPE STRING,
WIPCOSTINDSPCRCY TYPE STRING,
UNRLZDCOSTRSRVAMTINDSPCRCY TYPE STRING,
TOTALWIPAMOUNTINDSPCRCY TYPE STRING,
COSTVARIANCEINDSPCRCY TYPE STRING,
INPTPRVARCAMTINDSPCRCY TYPE STRING,
INPTQTYVARCAMTINDSPCRCY TYPE STRING,
RSCEUSGEVARCAMTINDSPCRCY TYPE STRING,
LOTSIZEVARCAMTINDSPCRCY TYPE STRING,
RMNGVARCAMTINDSPCRCY TYPE STRING,
DEBITACTLPLNDIFFCOSTINDSPCRCY TYPE STRING,
DEBITACTLPLANDIFFPERCENT TYPE STRING,
DEBITACTLTGTDIFFCOSTINDSPCRCY TYPE STRING,
DEBITACTLTGTDIFFPERCENT TYPE STRING,
DSPCRCYACTLTGTDIFFPCT TYPE STRING,
PLNCTRLTGTDIFFCOSTINDSPCRCY TYPE STRING,
DSPCRCYPLNCTRLTGTDIFFPCT TYPE STRING,
ACTLCTRLTGTDIFFCOSTINDSPCRCY TYPE STRING,
DSPCRCYACTLCTRLTGTDIFFPCT TYPE STRING,
PLANOUTPUTQUANTITY TYPE STRING,
ACTUALOUTPUTQUANTITY TYPE STRING,
ACTLPLANDIFFOUTPUTQUANTITY TYPE STRING,
ACTLPLANDIFFOUTPQTYPERCENT TYPE STRING,END OF T_EKKO_STR. DATA: WA_IEBORDHIRTPRCST_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_IEBORDHIRTPRCST_STR-MANDT sy-vline
WA_IEBORDHIRTPRCST_STR-ORDERID sy-vline
WA_IEBORDHIRTPRCST_STR-ORDERITEM sy-vline
WA_IEBORDHIRTPRCST_STR-ORDERINTERNALID sy-vline
WA_IEBORDHIRTPRCST_STR-OBJECTINTERNALID sy-vline
WA_IEBORDHIRTPRCST_STR-INTERNALORDERTEXT sy-vline
WA_IEBORDHIRTPRCST_STR-ORDERTYPE sy-vline
WA_IEBORDHIRTPRCST_STR-ORDERCATEGORY sy-vline
WA_IEBORDHIRTPRCST_STR-EXTERNALORDER sy-vline
WA_IEBORDHIRTPRCST_STR-ORDERDESCRIPTION sy-vline
WA_IEBORDHIRTPRCST_STR-PLANT sy-vline
WA_IEBORDHIRTPRCST_STR-COMPANYCODE sy-vline
WA_IEBORDHIRTPRCST_STR-BASEUNIT sy-vline
WA_IEBORDHIRTPRCST_STR-RATIOUNIT sy-vline
WA_IEBORDHIRTPRCST_STR-LEDGER sy-vline
WA_IEBORDHIRTPRCST_STR-CONTROLLINGAREA sy-vline
WA_IEBORDHIRTPRCST_STR-BUSINESSAREA sy-vline
WA_IEBORDHIRTPRCST_STR-PROFITCENTER sy-vline
WA_IEBORDHIRTPRCST_STR-RESPONSIBLECOSTCENTER sy-vline
WA_IEBORDHIRTPRCST_STR-WBSELEMENTINTERNALID sy-vline
WA_IEBORDHIRTPRCST_STR-PRODUCTIONVERSION sy-vline
WA_IEBORDHIRTPRCST_STR-SALESORDER sy-vline
WA_IEBORDHIRTPRCST_STR-SALESORDERITEM sy-vline
WA_IEBORDHIRTPRCST_STR-MATERIAL sy-vline
WA_IEBORDHIRTPRCST_STR-MATERIALGROUP sy-vline
WA_IEBORDHIRTPRCST_STR-MRPPLANT sy-vline
WA_IEBORDHIRTPRCST_STR-STORAGELOCATION sy-vline
WA_IEBORDHIRTPRCST_STR-PRODUCTIONUNIT sy-vline
WA_IEBORDHIRTPRCST_STR-ISMARKEDFORDELETION sy-vline
WA_IEBORDHIRTPRCST_STR-MFGORDERHASMULTIPLEITEMS sy-vline
WA_IEBORDHIRTPRCST_STR-ACTUALCOSTSCOSTINGVARIANT sy-vline
WA_IEBORDHIRTPRCST_STR-PLANNEDCOSTSCOSTINGVARIANT sy-vline
WA_IEBORDHIRTPRCST_STR-PLANNEDRELEASEDATE sy-vline
WA_IEBORDHIRTPRCST_STR-PLANNEDCOMPLETIONDATE sy-vline
WA_IEBORDHIRTPRCST_STR-CREATEDBYUSER sy-vline
WA_IEBORDHIRTPRCST_STR-CREATIONDATE sy-vline
WA_IEBORDHIRTPRCST_STR-LASTCHANGEDBYUSER sy-vline
WA_IEBORDHIRTPRCST_STR-LASTCHANGEDATE sy-vline
WA_IEBORDHIRTPRCST_STR-TECHNICALCOMPLETIONDATE sy-vline
WA_IEBORDHIRTPRCST_STR-SCHEDULEDBASICENDDATE sy-vline
WA_IEBORDHIRTPRCST_STR-SCHEDULEDRELEASEDATE sy-vline
WA_IEBORDHIRTPRCST_STR-ACTUALSTARTDATE sy-vline
WA_IEBORDHIRTPRCST_STR-CONFIRMEDENDDATE sy-vline
WA_IEBORDHIRTPRCST_STR-ACTUALRELEASEDDATE sy-vline
WA_IEBORDHIRTPRCST_STR-CONTROLLINGOBJECTSTATUS sy-vline
WA_IEBORDHIRTPRCST_STR-ORDERKEYSTATUS sy-vline
WA_IEBORDHIRTPRCST_STR-DISPLAYCURRENCY sy-vline
WA_IEBORDHIRTPRCST_STR-VALIDITYDATE sy-vline
WA_IEBORDHIRTPRCST_STR-CREDITACTLCOSTINDSPCRCY sy-vline
WA_IEBORDHIRTPRCST_STR-DEBITACTLCOSTINDSPCRCY sy-vline
WA_IEBORDHIRTPRCST_STR-ACTLCOSTINDSPCRCY sy-vline
WA_IEBORDHIRTPRCST_STR-CRDTACTLFXDCOSTINDSPCRCY sy-vline
WA_IEBORDHIRTPRCST_STR-DEBITACTLFXDCOSTINDSPCRCY sy-vline
WA_IEBORDHIRTPRCST_STR-ACTLFIXEDCOSTINDSPCRCY sy-vline
WA_IEBORDHIRTPRCST_STR-DEBITACTLVARBLCOSTINDSPCRCY sy-vline
WA_IEBORDHIRTPRCST_STR-CRDTACTLVARBLCOSTINDDSPCRCY sy-vline
WA_IEBORDHIRTPRCST_STR-ACTLVARBLCOSTINDSPCRCY sy-vline
WA_IEBORDHIRTPRCST_STR-CREDITPLANCOSTINDSPCRCY sy-vline
WA_IEBORDHIRTPRCST_STR-DEBITPLANCOSTINDSPCRCY sy-vline
WA_IEBORDHIRTPRCST_STR-CRDTPLNFXDCOSTINDSPCRCY sy-vline
WA_IEBORDHIRTPRCST_STR-DEBITPLNFXDCOSTINDSPCRCY sy-vline
WA_IEBORDHIRTPRCST_STR-DEBITPLNVARBLCOSTINDSPCRCY sy-vline
WA_IEBORDHIRTPRCST_STR-CRDTPLNVARBLCOSTINDSPCRCY sy-vline
WA_IEBORDHIRTPRCST_STR-PLANVARBLCOSTINDSPCRCY sy-vline
WA_IEBORDHIRTPRCST_STR-PLANCOSTINDSPCRCY sy-vline
WA_IEBORDHIRTPRCST_STR-PLANFIXEDCOSTINDSPCRCY sy-vline
WA_IEBORDHIRTPRCST_STR-CRDTTARGETCOSTINDSPCRCY sy-vline
WA_IEBORDHIRTPRCST_STR-DEBITTARGETCOSTINDSPCRCY sy-vline
WA_IEBORDHIRTPRCST_STR-TARGETCOSTINDSPCRCY sy-vline
WA_IEBORDHIRTPRCST_STR-CRDTPLANCTRLCOSTINDSPCRCY sy-vline
WA_IEBORDHIRTPRCST_STR-DEBITPLANCTRLCOSTINDSPCRCY sy-vline
WA_IEBORDHIRTPRCST_STR-PLANCTRLCOSTINDSPCRCY sy-vline
WA_IEBORDHIRTPRCST_STR-CRDTACTLCTRLCOSTINDSPCRCY sy-vline
WA_IEBORDHIRTPRCST_STR-DEBITACTLCTRLCOSTINDSPCRCY sy-vline
WA_IEBORDHIRTPRCST_STR-ACTLCTRLCOSTINDSPCRCY sy-vline
WA_IEBORDHIRTPRCST_STR-WIPCOSTINDSPCRCY sy-vline
WA_IEBORDHIRTPRCST_STR-UNRLZDCOSTRSRVAMTINDSPCRCY sy-vline
WA_IEBORDHIRTPRCST_STR-TOTALWIPAMOUNTINDSPCRCY sy-vline
WA_IEBORDHIRTPRCST_STR-COSTVARIANCEINDSPCRCY sy-vline
WA_IEBORDHIRTPRCST_STR-INPTPRVARCAMTINDSPCRCY sy-vline
WA_IEBORDHIRTPRCST_STR-INPTQTYVARCAMTINDSPCRCY sy-vline
WA_IEBORDHIRTPRCST_STR-RSCEUSGEVARCAMTINDSPCRCY sy-vline
WA_IEBORDHIRTPRCST_STR-LOTSIZEVARCAMTINDSPCRCY sy-vline
WA_IEBORDHIRTPRCST_STR-RMNGVARCAMTINDSPCRCY sy-vline
WA_IEBORDHIRTPRCST_STR-DEBITACTLPLNDIFFCOSTINDSPCRCY sy-vline
WA_IEBORDHIRTPRCST_STR-DEBITACTLPLANDIFFPERCENT sy-vline
WA_IEBORDHIRTPRCST_STR-DEBITACTLTGTDIFFCOSTINDSPCRCY sy-vline
WA_IEBORDHIRTPRCST_STR-DEBITACTLTGTDIFFPERCENT sy-vline
WA_IEBORDHIRTPRCST_STR-DSPCRCYACTLTGTDIFFPCT sy-vline
WA_IEBORDHIRTPRCST_STR-PLNCTRLTGTDIFFCOSTINDSPCRCY sy-vline
WA_IEBORDHIRTPRCST_STR-DSPCRCYPLNCTRLTGTDIFFPCT sy-vline
WA_IEBORDHIRTPRCST_STR-ACTLCTRLTGTDIFFCOSTINDSPCRCY sy-vline
WA_IEBORDHIRTPRCST_STR-DSPCRCYACTLCTRLTGTDIFFPCT sy-vline
WA_IEBORDHIRTPRCST_STR-PLANOUTPUTQUANTITY sy-vline
WA_IEBORDHIRTPRCST_STR-ACTUALOUTPUTQUANTITY sy-vline
WA_IEBORDHIRTPRCST_STR-ACTLPLANDIFFOUTPUTQUANTITY sy-vline
WA_IEBORDHIRTPRCST_STR-ACTLPLANDIFFOUTPQTYPERCENT sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.