Using a function module in a search help.

Question

People,
I make a function module for a search help. Into the function module I call a function 'K_GROUP_SELECT' that show me a screen to make another search but I don't know how can I put the value that this function return me in the field that the user click the button of the search help in my program.
This is the code that I put in the function module.
Thanks!
FUNCTION Z_GROUP_SELECT_ZFINCOKOH1_B.
*"*"Local Interface:
*"  TABLES
*"      SHLP_TAB TYPE  SHLP_DESCT
*"      RECORD_TAB STRUCTURE  SEAHLPRES
*"  CHANGING
*"     VALUE(CALLCONTROL) LIKE  DDSHF4CTRL STRUCTURE  DDSHF4CTRL
*"     VALUE(SHLP) TYPE  SHLP_DESCR
tables: setheader.
data: setname type setheader-setname.
  CONSTANTS:
              CLASS         TYPE SETCLASS VALUE '0103',
              FIELD_NAME    TYPE RGSBS-FIELD  VALUE '*',
              KOKRS         TYPE TKA01-KOKRS  VALUE 'BPPR',
              KTOPL         TYPE TKA01-Ktopl VALUE 'CAPI'.
IF callcontrol-step = 'SELECT'.
*PERFORM k_group_select USING: CLASS, FIELD_NAME, KOKRS, KTOPL.
CALL FUNCTION 'K_GROUP_SELECT'
  EXPORTING
   BUTTONS                  = 'X'
   CLASS                    = CLASS
   CRUSER                   = '*'
   field_name               = FIELD_NAME
   SEARCHFLD                = '    '
   SEARCHFLD_INPUT          = 'X'
   SEARCHFLD_REQUIRED       = 'X'
   SET                      = '*'
   START_COLUMN             = 10
   START_ROW                = 5
   TABLE                    = 'CCSS'
   TYPELIST                 = 'BS'
   UPDUSER                  = '*'
   KOKRS                    = KOKRS
   KTOPL                    = KTOPL
IMPORTING
   SET_NAME                 = setname
EXCEPTIONS
   NO_SET_PICKED            = 1
   OTHERS                   = 2
IF sy-subrc <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
*         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
endif.
ENDFUNCTION.

Answer 1

Carlos,  Please see the following program. It is working well in my system.  The only difference is that I've implemented you function module as a subroutine instead of in a FM.   You can see that it will return the selected value back to the screen field.
report zrich_0002 .
data: setname type setheader-setname.
parameters: p_val type setheader-setname.
data: dynfields type table of dynpread with header line.
data: return type table of ddshretval with header line.
at selection-screen on value-request for p_val.
  perform f4_help.
  p_val = setname.
start-of-selection.
*       FORM f4_help                                                  *
form f4_help.
  constants: class  type setclass value '0103',
             field_name    type rgsbs-field  value '*',
             kokrs  type tka01-kokrs  value 'BPPR',
             ktopl  type  tka01-ktopl value 'CAPI'.
  call function 'K_GROUP_SELECT'
       exporting
            buttons            = 'X'
            class              = class
            cruser             = '*'
            field_name         = field_name
            searchfld          = '    '
            searchfld_input    = 'X'
            searchfld_required = 'X'
            set                = '*'
            start_column       = 10
            start_row          = 5
            table              = 'CCSS'
            typelist           = 'BS'
            upduser            = '*'
            kokrs              = kokrs
            ktopl              = ktopl
       importing
            set_name           = setname
       exceptions
            no_set_picked      = 1
            others             = 2.
endform.
REgards,
Rich HEilman