Issue when reading values of Select-options for Dynamic F4

Question

Hi All,
I have provided dynamic F4 help on class name (ESTCAT) and characteristic name (ATNAM). Both are select options with no intervals. The class name should be entered to get the F4 help for characteristic name, else an message would appear to select a class name first. My message is coming when i press F4 on characteristic name without giving any class name. This is correct but if i enter the class name after this message and do an F4 for characteristic name, it still shows the same message which is not correct. The reason is the class name entered is not captured in the FM RS_REFRESH_FROM_SELECTOPTIONS output table and it is captured only if i hit enter after entering the class name.
Is it possible to get the class name in the FM output without hitting enter or any other way to resolve this issue?
Thanks in advance,
Srilakshmi.

Answer 1

In Flow Logic
PROCESS ON VALUE-REQUEST.
  FIELD itab-connid MODULE f4_get.
In Program
MODULE f4_get INPUT.
  DATA : fnam TYPE string,
         fval TYPE string.
*         lin TYPE i.
  DATA : BEGIN OF f4_tab OCCURS 0,
         carrid TYPE sflight-carrid,
         connid TYPE sflight-connid,
    END OF f4_tab.
   CLEAR lin.
  GET CURSOR FIELD fnam VALUE fval LINE lin. " This gives the Current Line in Table Control
  DATA : dynpread TYPE TABLE OF dynpread WITH HEADER LINE.
  REFRESH dynpread.
  CLEAR dynpread.
  dynpread-fieldname = 'ITAB-CARRID'.
  dynpread-stepl = lin.  " You need to pass this line Value here
  APPEND dynpread.
  CLEAR dynpread.
  CALL FUNCTION 'DYNP_VALUES_READ'
    EXPORTING
      dyname                               = sy-repid
      dynumb                               = sy-dynnr
    TABLES
      dynpfields                           = dynpread
   EXCEPTIONS
     invalid_abapworkarea                 = 1
     invalid_dynprofield                  = 2
     invalid_dynproname                   = 3
     invalid_dynpronummer                 = 4
     invalid_request                      = 5
     no_fielddescription                  = 6
     invalid_parameter                    = 7
     undefind_error                       = 8
     double_conversion                    = 9
     stepl_not_found                      = 10
     OTHERS                               = 11
  IF sy-subrc IS INITIAL.
    READ TABLE dynpread WITH KEY fieldname = 'ITAB-CARRID'.
    IF sy-subrc IS INITIAL.
      SELECT carrid connid FROM sflight
            INTO TABLE f4_tab
             WHERE carrid = dynpread-fieldvalue.
      CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
        EXPORTING
          retfield               = 'CONNID'
         dynpprog               = sy-repid
         dynpnr                 = sy-dynnr
         dynprofield            = 'ITAB-CONNID'
         value_org              = 'S'
        TABLES
          value_tab              = f4_tab
    ENDIF.
  ENDIF.
ENDMODULE.                 " f4_get  INPUT
Regards
Surendra P