pass parameter to search help

[Former Member]

Hi,

I have a screen including a LGORT field with search help H_T001L.

I want to pass werks value to this SH.

I tried that "set parameter ID 'WRK' value gs_profile-werks.

I tried that adding a werks field (set parameters value WRK) on that screen.

But my SH always show all values.

What is my wrong?

WERKS: gs_profile-werks like a table field that has a foreign key of T001W.

LGORT: gs_klm-lgort like a table field that has a foreign key of T001L.

parameters value of gs_klm-lgort that on the screen is "LAG".

PS: I dont want to use "POPUP_WITH_TABLE_DISPLAY" or "F4_FIELD_ON_VALUE_REQUEST". I want to learn how to pass a value to SH from a dialog program.

[Former Member]

Hi,

I have a screen including a LGORT field with search help H_T001L.

I want to pass werks value to this SH.

I tried that "set parameter ID 'WRK' value gs_profile-werks.

I tried that adding a werks field (set parameters value WRK) on that screen.

But my SH always show all values.

What is my wrong?

WERKS: gs_profile-werks like a table field that has a foreign key of T001W.

LGORT: gs_klm-lgort like a table field that has a foreign key of T001L.

parameters value of gs_klm-lgort that on the screen is "LAG".

PS: I dont want to use "POPUP_WITH_TABLE_DISPLAY" or "F4_FIELD_ON_VALUE_REQUEST". I want to learn how to pass a value to SH from a dialog program.

[former_member209703]

Hi

It can be something like this

PARAMETERS: p_werks TYPE zstruc-werks,
            p_lgort  TYPE zstruc-lgort,
            p_lgobe TYPE zstruc-lgobe.


DATA: shlp TYPE shlp_descr.
DATA: l_wa      TYPE ddshiface,
      l_return_values LIKE ddshretval OCCURS 0 WITH HEADER LINE.

AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_lgort.

  CALL FUNCTION 'F4IF_GET_SHLP_DESCR'
    EXPORTING
      shlpname       = 'H_T001L'
*     SHLPTYPE       = 'SH'
   IMPORTING
     shlp           = shlp
            .

  LOOP AT shlp-interface INTO l_wa WHERE shlpfield  EQ 'WERKS'.
    l_wa-value = p_werks.
    MODIFY shlp-interface FROM l_wa.
  ENDLOOP.


  CALL FUNCTION 'F4IF_START_VALUE_REQUEST'
    EXPORTING
      shlp          = shlp
    TABLES
      return_values = l_return_values.

[Former Member]

that's worked. Many thanks.