Dynamically stating the field name in the WHERE clause

Question

Hello All,
Consider the following select statement.
SELECT kunnr INTO TABLE gt_kunnr
      FROM kna1
      FOR ALL ENTRIES IN gt_table
      WHERE kunnr = gt_table-<b>cust_id</b>.
Suppose there is a case where I do not know the name of the internal table field
(say, "cust_id" in the above case) with which comparison is to be done in the WHERE clause. Only at runtime that fieldname is available. So in the WHERE clause can I mention it dynamically?
I tried using the following.
lv_fieldname =  'cust_id'.
SELECT kunnr INTO TABLE gt_kunnr
      FROM kna1
      FOR ALL ENTRIES IN gt_table
      WHERE kunnr = gt_table-<b>(lv_fieldname).</b>
But this is  giving a syntax error.
Could anyone suggest an alternate approach?
Regards
Indrajit.

Answer 1

Hi,
It is fine with Enterprise version but when I am trying to run the following code in Rel 4.6C, I am getting a syntax error.
TYPES: BEGIN OF ty_wherecond,
         data(72) TYPE c,
       END OF ty_wherecond.
DATA: gt_itab1 TYPE STANDARD TABLE OF kna1,
      gt_itab2 TYPE STANDARD TABLE OF kna1.
DATA:  BEGIN OF gt_kunnr OCCURS 0,
            kunnr TYPE kunnr,
       END OF gt_kunnr.
PERFORM fill_itabs TABLES gt_itab1
                          gt_itab2.
*&      Form  fill_itabs
      text
     -->P_T_TABLE  text
FORM fill_itabs  TABLES   p_t_table
                          pt_table_dummy.
  DATA: lv_fieldname(30)   TYPE c VALUE 'pt_table_dummy-kunnr'.
  DATA: lt_wherecond   TYPE STANDARD TABLE OF ty_wherecond,
        lt_condtab     TYPE STANDARD TABLE OF hrcond,
        ls_condtab     TYPE hrcond.
  FIELD-SYMBOLS <fs_wherecond> TYPE ty_wherecond.
  pt_table_dummy[] = p_t_table[].
  CLEAR ls_condtab.
  REFRESH: lt_wherecond[],
           lt_condtab[].
  ls_condtab-field = 'KUNNR'.
  ls_condtab-opera = 'EQ'.
  ls_condtab-low   = lv_fieldname.
  APPEND ls_condtab TO lt_condtab.
  CALL FUNCTION 'RH_DYNAMIC_WHERE_BUILD'
    EXPORTING
      dbtable         = space " can be empty
    TABLES
      condtab         = lt_condtab
      where_clause    = lt_wherecond
    EXCEPTIONS
      empty_condtab   = 01
      no_db_field     = 02
      unknown_db      = 03
      wrong_condition = 04.
  LOOP AT lt_wherecond ASSIGNING <fs_wherecond>.
    REPLACE '''' WITH '' INTO <fs_wherecond>-data.
    REPLACE '''' WITH '' INTO <fs_wherecond>-data.
  ENDLOOP.
  SELECT kunnr INTO TABLE gt_kunnr
      FROM kna1
      FOR ALL ENTRIES IN pt_table_dummy
      WHERE (lt_wherecond).
  IF sy-subrc EQ 0.
  ENDIF.
ENDFORM.                    "fill_itabs
The syntax error says "The WHERE condition does not refer to the FOR ALL ENTRIES table".
Even after using the FM 'RH_DYNAMIC_WHERE_BUILD' as suggested by you, the syntax error is coming.
Could you please suggest how to ignore this?
Regards
Indrajit.