Have to add a i/p pop-up screen in f-28

Question

Have to add a i/p pop-up screen in f-28
where after i i/p data it have to go back to the same screen
i hav called my screen in BTE 1120 .
please help me out with the code for only screen
or is there any function module which can help me out for calling pop and where i/n i can enter data.

Answer 1

Hi,
You may use:
DATA : BEGIN OF T-fields OCCURS 0.
        INCLUDE STRUCTURE sval.
DATA : END OF T-fields.
Populate t_fields like:
  T-fields-tabname = 'CAUFVD'.
  T-fields-FIELDTEXT = 'Reference Date '.
  T-fields-fieldname = 'IDAT2'.
  T-fields-value = sy-datum.
  APPEND T-fields.
After accepting i/p from the user use:
  LOOP AT T-fields.
    CASE T-fields-fieldname.
      WHEN 'IDAT2'.
        MOVE T-fields-value TO l_date.
    ENDCASE.
  ENDLOOP.
Use l_date for further Processing.
  CALL FUNCTION 'POPUP_GET_VALUES'
       EXPORTING
            no_value_check  = ' '
            popup_title     = 'Complete'
            start_column    = '5'
            start_row       = '5'
       IMPORTING
            returncode      = w_return
       TABLES
            fields          = T-fields
       EXCEPTIONS
            error_in_fields = 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.
Regards
Raju Chitale