ABAP Select data from SAP table /SCWM/S_ASPN_QRS_RULE into internal table

Get Example source ABAP code based on a different SAP table
  Get ABAP code

Below is a number of ABAP code snippets to demonstrate how to select data from SAP /SCWM/S_ASPN_QRS_RULE 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 /SCWM/S_ASPN_QRS_RULE. 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 /SCWM/S_ASPN_QRS_RULE 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_/SCWM/S_ASPN_QRS_RULE TYPE STANDARD TABLE OF /SCWM/S_ASPN_QRS_RULE,
      WA_/SCWM/S_ASPN_QRS_RULE TYPE /SCWM/S_ASPN_QRS_RULE,
      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: </SCWM/S_ASPN_QRS_RULE> TYPE /SCWM/S_ASPN_QRS_RULE.

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

SELECT *
*restrict ABAP select to first 10 rows
 UP TO 10 ROWS      
  FROM /SCWM/S_ASPN_QRS_RULE
  INTO TABLE IT_/SCWM/S_ASPN_QRS_RULE.

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM /SCWM/S_ASPN_QRS_RULE
*  INTO TABLE @DATA(IT_/SCWM/S_ASPN_QRS_RULE2).
*--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_/SCWM/S_ASPN_QRS_RULE INDEX 1 INTO DATA(WA_/SCWM/S_ASPN_QRS_RULE2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_/SCWM/S_ASPN_QRS_RULE ASSIGNING </SCWM/S_ASPN_QRS_RULE>.

*To update a field value using a field symbol simply change the value via the field symbol pointer
</SCWM/S_ASPN_QRS_RULE>-IOT = 1.
</SCWM/S_ASPN_QRS_RULE>-GRPAR = 1.
</SCWM/S_ASPN_QRS_RULE>-RMODE = 1.
</SCWM/S_ASPN_QRS_RULE>-HAS_CHILD = 1.
</SCWM/S_ASPN_QRS_RULE>-XDOC_ASSIGNED = 1.

ENDLOOP.

LOOP AT IT_/SCWM/S_ASPN_QRS_RULE INTO WA_/SCWM/S_ASPN_QRS_RULE.
*Write horizonal line to screen report.
  WRITE:/ sy-uline.

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_/SCWM/S_ASPN_QRS_RULE-SPECIFICITY, sy-vline,
  WA_/SCWM/S_ASPN_QRS_RULE-XSTRUCTURAL, sy-vline,
  WA_/SCWM/S_ASPN_QRS_RULE-VERSION, sy-vline,
  WA_/SCWM/S_ASPN_QRS_RULE-LGNUM, sy-vline,
  WA_/SCWM/S_ASPN_QRS_RULE-XVERSION_ACT, sy-vline,
  WA_/SCWM/S_ASPN_QRS_RULE-XVERSION_INACT, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_/SCWM/S_ASPN_QRS_RULE 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_/SCWM/S_ASPN_QRS_RULE 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_/SCWM/S_ASPN_QRS_RULE INTO WA_/SCWM/S_ASPN_QRS_RULE.


*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 VERSION
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_/SCWM/S_ASPN_QRS_RULE-VERSION
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_/SCWM/S_ASPN_QRS_RULE-VERSION.
WRITE:/ 'New Value:', ld_input.

*Conversion exit BPMAP, internal->external for field PARTYNO
CALL FUNCTION 'CONVERSION_EXIT_BPMAP_OUTPUT'
  EXPORTING
    input =                      WA_/SCWM/S_ASPN_QRS_RULE-PARTYNO
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_/SCWM/S_ASPN_QRS_RULE-PARTYNO.
WRITE:/ 'New Value:', ld_input.

*Conversion exit MDLPD, internal->external for field PRODUCTID
CALL FUNCTION 'CONVERSION_EXIT_MDLPD_OUTPUT'
  EXPORTING
    input =                      WA_/SCWM/S_ASPN_QRS_RULE-PRODUCTID
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_/SCWM/S_ASPN_QRS_RULE-PRODUCTID.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit TSTPS, internal->external for field CREATED_ON
CALL FUNCTION 'CONVERSION_EXIT_TSTPS_OUTPUT'
  EXPORTING
    input =                      WA_/SCWM/S_ASPN_QRS_RULE-CREATED_ON
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_/SCWM/S_ASPN_QRS_RULE-CREATED_ON.
WRITE:/ 'New Value:', ld_input.

*Conversion exit TSTPS, internal->external for field CHANGED_ON
CALL FUNCTION 'CONVERSION_EXIT_TSTPS_OUTPUT'
  EXPORTING
    input =                      WA_/SCWM/S_ASPN_QRS_RULE-CHANGED_ON
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_/SCWM/S_ASPN_QRS_RULE-CHANGED_ON.
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_/SCWM/S_ASPN_QRS_RULE_STR, 
IOT TYPE STRING,
GRPAR TYPE STRING,
RMODE TYPE STRING,
HAS_CHILD TYPE STRING,
XDOC_ASSIGNED TYPE STRING,
SPECIFICITY TYPE STRING,
XSTRUCTURAL TYPE STRING,
VERSION TYPE STRING,
LGNUM TYPE STRING,
XVERSION_ACT TYPE STRING,
XVERSION_INACT TYPE STRING,
XLGNUM_INIT TYPE STRING,
XLGNUM_QINIT TYPE STRING,
DOCTYPE TYPE STRING,
ITEMTYPE TYPE STRING,
PARTYNO TYPE STRING,
DOCTYPE_TXT TYPE STRING,
ITEMTYPE_TXT TYPE STRING,
PARTYNO_TXT TYPE STRING,
INB_PROC_TXT TYPE STRING,
PRODUCTID TYPE STRING,
ENTITLED TYPE STRING,
QGRP TYPE STRING,
COO TYPE STRING,
ICATLOCN TYPE STRING,
PRODUCTNO TYPE STRING,
PRODUCTNO_TXT TYPE STRING,
ENTITLED_TXT TYPE STRING,
QGRP_TXT TYPE STRING,
COO_TXT TYPE STRING,
ICATLOCN_TXT TYPE STRING,
INSP_PROC_WHS_TXT TYPE STRING,
UPPERVAL TYPE STRING,
UPPERQTY TYPE STRING,
INB_PROC TYPE STRING,
INSP_PROC_WHS TYPE STRING,
UPPERVAL_UI TYPE STRING,
UPPERQTY_UI TYPE STRING,
UPPERVAL_UOM TYPE STRING,
UPPERQTY_UOM TYPE STRING,
IOT_ENH_DUMMY TYPE STRING,
INSP_PROC TYPE STRING,
DMOD_RULE_ID TYPE STRING,
DCOD_BUND_ID TYPE STRING,
DMOD_CRIT_ID TYPE STRING,
ITEM_DCBD_ID TYPE STRING,
AUTH_GROUP TYPE STRING,
SAMPLE_TYPE TYPE STRING,
SAMPLE_SIZE_FIX TYPE STRING,
SAMPLE_UNIT TYPE STRING,
NUMB_ACCEPT TYPE STRING,
SAMPLE_SIZE_PRC TYPE STRING,
NUMB_ACCEPT_PRC TYPE STRING,
SAMP_SCHM_ID TYPE STRING,
INSP_LEVEL TYPE STRING,
INSP_SEVERITY TYPE STRING,
AQL_VALUE TYPE STRING,
CRULE_SAMPSIZE TYPE STRING,
VALUATION_MODE TYPE STRING,
ELEMENT_TYPE TYPE STRING,
SAMP_DRWP_ID TYPE STRING,
SAMP_DRW_INT TYPE STRING,
SAMP_DRW_UNIT TYPE STRING,
SAMP_DCBD_ID TYPE STRING,
TOREL TYPE STRING,
FUREL TYPE STRING,
PROCTY TYPE STRING,
NR_RANGE_ID TYPE STRING,
SYST_ID TYPE STRING,
INST_ID TYPE STRING,
S_ART TYPE STRING,
S_PLNTY TYPE STRING,
S_PLNNR TYPE STRING,
S_PLNAL TYPE STRING,
SYST_ATT_ENH_DUMMY TYPE STRING,
FIND_TYPE_ID TYPE STRING,
CAT_FILTER_ID TYPE STRING,
RLGRP TYPE STRING,
DURATION TYPE STRING,
DURAUNIT TYPE STRING,
CATLOCN TYPE STRING,
PROCS TYPE STRING,
ACTVT_PROF TYPE STRING,
QDOC_CNTRL TYPE STRING,
GR_BLOCK_BY_QINF TYPE STRING,
INSP_CONTROL TYPE STRING,
QCONTROL_EXTERN TYPE STRING,
ART TYPE STRING,
PPL TYPE STRING,
PLNTY TYPE STRING,
PLNNR TYPE STRING,
PLNAL TYPE STRING,
APP TYPE STRING,
MER TYPE STRING,
AVE TYPE STRING,
STICHPRVER TYPE STRING,
DYNREGEL TYPE STRING,
SPROZ TYPE STRING,
HPZ TYPE STRING,
DYN TYPE STRING,
MST TYPE STRING,
MPDAU TYPE STRING,
QKZVERF TYPE STRING,
QPMAT TYPE STRING,
KZPRFKOST TYPE STRING,
AUFNR_CO TYPE STRING,
AKTIV TYPE STRING,
MS_FLAG TYPE STRING,
ART_TXT TYPE STRING,
PLNTY_TXT TYPE STRING,
STICHPRVER_TXT TYPE STRING,
DYNREGEL_TXT TYPE STRING,
PLNNR_TXT TYPE STRING,
SAMPLE_SIZE_FIX_UI TYPE STRING,
SAMPLE_UNIT_UI TYPE STRING,
SAMP_DRW_INT_UI TYPE STRING,
SAMP_DRW_UNIT_UI TYPE STRING,
DATA_ORIGIN_EWM_ATTR TYPE STRING,
DATA_ORIGIN_QMAT_ATTR TYPE STRING,
DATA_ORIGIN_GRC_ATTR TYPE STRING,
FIX_EWM_ATTR TYPE STRING,
FIX_QMAT_ATTR TYPE STRING,
FIX_GRC_ATTR TYPE STRING,
INSP_PROC_ORGRL TYPE STRING,
SAMP_TYPE_ORGRL TYPE STRING,
DMOD_RULE_ORGRL TYPE STRING,
DCOD_BUND_ORGRL TYPE STRING,
DMOD_CRIT_ORGRL TYPE STRING,
AUTH_GROUP_ORGRL TYPE STRING,
NR_RANGE_ORGRL TYPE STRING,
ITEM_DCBD_ID_ORGRL TYPE STRING,
SAMPLE_ORGRL TYPE STRING,
EXT_SYST_ORGRL TYPE STRING,
FIND_ORGRL TYPE STRING,
CONS_ORGRL TYPE STRING,
ACTVT_PROF_ORGRL TYPE STRING,
QCONTROL_ORGRL TYPE STRING,
INSP_LOT_ORGRL TYPE STRING,
INSP_PROC_TXT TYPE STRING,
DMOD_CRIT_ID_TXT TYPE STRING,
DMOD_RULE_ID_TXT TYPE STRING,
DCOD_BUND_ID_TXT TYPE STRING,
ITEM_DCBD_ID_TXT TYPE STRING,
RLGRP_TXT TYPE STRING,
CATLOCN_TXT TYPE STRING,
PROCS_TXT TYPE STRING,
SAMPLE_TYPE_TXT TYPE STRING,
SAMP_SCHM_ID_TXT TYPE STRING,
INSP_LEVEL_TXT TYPE STRING,
INSP_SEVERITY_TXT TYPE STRING,
VALUATION_MODE_TXT TYPE STRING,
ELEMENT_TYPE_TXT TYPE STRING,
SAMP_DRWP_ID_TXT TYPE STRING,
SAMP_DCBD_ID_TXT TYPE STRING,
TOREL_TXT TYPE STRING,
FUREL_TXT TYPE STRING,
PROCTY_TXT TYPE STRING,
SYST_ID_TXT TYPE STRING,
INST_ID_TXT TYPE STRING,
FIND_TYPE_ID_TXT TYPE STRING,
CAT_FILTER_ID_TXT TYPE STRING,
QDOC_CNTRL_TXT TYPE STRING,
GR_BLOCK_QINF_TXT TYPE STRING,
INSP_CNTRL_QINF_TXT TYPE STRING,
CREATED_BY TYPE STRING,
CREATED_ON TYPE STRING,
CHANGED_BY TYPE STRING,
CHANGED_ON TYPE STRING,
CREATED_BY_UI TYPE STRING,
CREATED_DATE TYPE STRING,
CREATED_TIME TYPE STRING,
CHANGED_BY_UI TYPE STRING,
CHANGED_DATE TYPE STRING,
CHANGED_TIME TYPE STRING,END OF T_EKKO_STR.
DATA: WA_/SCWM/S_ASPN_QRS_RULE_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_/SCWM/S_ASPN_QRS_RULE_STR-IOT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-GRPAR sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-RMODE sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-HAS_CHILD sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-XDOC_ASSIGNED sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-SPECIFICITY sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-XSTRUCTURAL sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-VERSION sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-LGNUM sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-XVERSION_ACT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-XVERSION_INACT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-XLGNUM_INIT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-XLGNUM_QINIT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-DOCTYPE sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-ITEMTYPE sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-PARTYNO sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-DOCTYPE_TXT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-ITEMTYPE_TXT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-PARTYNO_TXT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-INB_PROC_TXT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-PRODUCTID sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-ENTITLED sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-QGRP sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-COO sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-ICATLOCN sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-PRODUCTNO sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-PRODUCTNO_TXT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-ENTITLED_TXT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-QGRP_TXT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-COO_TXT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-ICATLOCN_TXT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-INSP_PROC_WHS_TXT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-UPPERVAL sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-UPPERQTY sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-INB_PROC sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-INSP_PROC_WHS sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-UPPERVAL_UI sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-UPPERQTY_UI sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-UPPERVAL_UOM sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-UPPERQTY_UOM sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-IOT_ENH_DUMMY sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-INSP_PROC sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-DMOD_RULE_ID sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-DCOD_BUND_ID sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-DMOD_CRIT_ID sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-ITEM_DCBD_ID sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-AUTH_GROUP sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-SAMPLE_TYPE sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-SAMPLE_SIZE_FIX sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-SAMPLE_UNIT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-NUMB_ACCEPT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-SAMPLE_SIZE_PRC sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-NUMB_ACCEPT_PRC sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-SAMP_SCHM_ID sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-INSP_LEVEL sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-INSP_SEVERITY sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-AQL_VALUE sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-CRULE_SAMPSIZE sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-VALUATION_MODE sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-ELEMENT_TYPE sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-SAMP_DRWP_ID sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-SAMP_DRW_INT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-SAMP_DRW_UNIT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-SAMP_DCBD_ID sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-TOREL sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-FUREL sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-PROCTY sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-NR_RANGE_ID sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-SYST_ID sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-INST_ID sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-S_ART sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-S_PLNTY sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-S_PLNNR sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-S_PLNAL sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-SYST_ATT_ENH_DUMMY sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-FIND_TYPE_ID sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-CAT_FILTER_ID sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-RLGRP sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-DURATION sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-DURAUNIT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-CATLOCN sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-PROCS sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-ACTVT_PROF sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-QDOC_CNTRL sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-GR_BLOCK_BY_QINF sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-INSP_CONTROL sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-QCONTROL_EXTERN sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-ART sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-PPL sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-PLNTY sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-PLNNR sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-PLNAL sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-APP sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-MER sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-AVE sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-STICHPRVER sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-DYNREGEL sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-SPROZ sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-HPZ sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-DYN sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-MST sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-MPDAU sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-QKZVERF sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-QPMAT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-KZPRFKOST sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-AUFNR_CO sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-AKTIV sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-MS_FLAG sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-ART_TXT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-PLNTY_TXT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-STICHPRVER_TXT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-DYNREGEL_TXT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-PLNNR_TXT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-SAMPLE_SIZE_FIX_UI sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-SAMPLE_UNIT_UI sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-SAMP_DRW_INT_UI sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-SAMP_DRW_UNIT_UI sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-DATA_ORIGIN_EWM_ATTR sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-DATA_ORIGIN_QMAT_ATTR sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-DATA_ORIGIN_GRC_ATTR sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-FIX_EWM_ATTR sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-FIX_QMAT_ATTR sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-FIX_GRC_ATTR sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-INSP_PROC_ORGRL sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-SAMP_TYPE_ORGRL sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-DMOD_RULE_ORGRL sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-DCOD_BUND_ORGRL sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-DMOD_CRIT_ORGRL sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-AUTH_GROUP_ORGRL sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-NR_RANGE_ORGRL sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-ITEM_DCBD_ID_ORGRL sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-SAMPLE_ORGRL sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-EXT_SYST_ORGRL sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-FIND_ORGRL sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-CONS_ORGRL sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-ACTVT_PROF_ORGRL sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-QCONTROL_ORGRL sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-INSP_LOT_ORGRL sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-INSP_PROC_TXT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-DMOD_CRIT_ID_TXT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-DMOD_RULE_ID_TXT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-DCOD_BUND_ID_TXT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-ITEM_DCBD_ID_TXT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-RLGRP_TXT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-CATLOCN_TXT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-PROCS_TXT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-SAMPLE_TYPE_TXT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-SAMP_SCHM_ID_TXT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-INSP_LEVEL_TXT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-INSP_SEVERITY_TXT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-VALUATION_MODE_TXT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-ELEMENT_TYPE_TXT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-SAMP_DRWP_ID_TXT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-SAMP_DCBD_ID_TXT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-TOREL_TXT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-FUREL_TXT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-PROCTY_TXT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-SYST_ID_TXT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-INST_ID_TXT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-FIND_TYPE_ID_TXT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-CAT_FILTER_ID_TXT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-QDOC_CNTRL_TXT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-GR_BLOCK_QINF_TXT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-INSP_CNTRL_QINF_TXT sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-CREATED_BY sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-CREATED_ON sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-CHANGED_BY sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-CHANGED_ON sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-CREATED_BY_UI sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-CREATED_DATE sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-CREATED_TIME sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-CHANGED_BY_UI sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-CHANGED_DATE sy-vline 
WA_/SCWM/S_ASPN_QRS_RULE_STR-CHANGED_TIME sy-vline      INTO ld_text SEPARATED BY SPACE.

*Add any further fields from structure WA_EKKO_STR you want to CONCATENATE...
ENDLOOP.
ENDFORM.