Skip to Content
0
Former Member
Sep 17, 2007 at 09:21 AM

POPUP_GET_VALUES_USER_HELP problem !!!! Urgent !!!

2031 Views

i am using the POPUP_GET_VALUES_USER_HELP FM to insert some values to an internal table via a popup.I works ok but i Can't create a search help (f4) for one field that is

RLGRAP-FILENAME type field.

Please look my code ....

      INS-TABNAME = 'YCONTRACTS'.
      INS-FIELDNAME = 'EDATE'.
      APPEND INS.

      INS-TABNAME = 'YCONTRACTS'.
      INS-FIELDNAME = 'FILENAME'.
      INS-NOVALUEHLP = ' '.
      APPEND INS.

      CALL FUNCTION 'POPUP_GET_VALUES_USER_HELP'
        EXPORTING
      F1_FORMNAME                         = 'F4_FORM'
      F1_PROGRAMNAME                      = 'YDP_INSERT_CONTRACT'
          F4_FORMNAME                     = 'F4_FORM'
          F4_PROGRAMNAME                  = 'YDP_INSERT_CONTRACT'
          FORMNAME                        = 'USER_FORM2'
          POPUP_TITLE                     = 'Insert New Contract'
          PROGRAMNAME                     = 'YDP_INSERT_CONTRACT'
         START_COLUMN                    = '5'
         START_ROW                       = '5'
*     NO_CHECK_FOR_FIXED_VALUES       = ' '
*    IMPORTING
*      RETURNCODE                      = w_rc
        TABLES
          FIELDS                          = INS
        EXCEPTIONS
          ERROR_IN_FIELDS                 = 1
          OTHERS                          = 2.

.....
.....
*&---------------------------------------------------------------------*
*&      Form  f4_form
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
FORM F4_FORM.
  CALL FUNCTION 'WS_FILENAME_GET'
    EXPORTING
      DEF_FILENAME     = FILENA
      MASK             = ',*.txt.'
      MODE             = 'O'
      TITLE            = 'Upload File'(078)
    IMPORTING
      FILENAME         = YCONTRACTS-FILENAME
    EXCEPTIONS
      INV_WINSYS       = 1
      NO_BATCH         = 2
      SELECTION_CANCEL = 3
      SELECTION_ERROR  = 4
      OTHERS           = 5.
ENDFORM.                                                    "f4_form


is this code ok?