Search help in dialog modules

Question

Hello gurus
I struck with a problem while designing the search help .  The problem is described as below
Three Screen field in my screen namely
Itab1-vkorg Itab1-kunnr Itab1-vbeln
My Screen flow logic :
PROCESS AFTER INPUT.
  MODULE USER_COMMAND_0100.
PROCESS ON VALUE-REQUEST.
  FIELD ITAB1-VBELN MODULE SALESINVOICE_HELP.
My main Program :SALESINVOICE_HELP
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
    EXPORTING
      INPUT  = ITAB1-KUNNR
    IMPORTING
      OUTPUT = ITAB1-KUNNR.
  SELECT VBRKVBELN VBRKFKDAT
        INTO CORRESPONDING FIELDS OF TABLE INVOICE_SRCHLP
        FROM VBRK INNER JOIN VBRP ON VBRKVBELN EQ VBRPVBELN
        WHERE VBRK~FKART EQ 'ZF2' AND
              VBRK~VKORG EQ ITAB1-VKORG AND
              VBRK~KUNAG EQ ITAB1-KUNNR AND
              VBRK~FKSTO NE 'X'.
  SORT INVOICE_SRCHLP BY FKDAT VBELN.
  DELETE ADJACENT DUPLICATES FROM INVOICE_SRCHLP.
  CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
    EXPORTING
   DDIC_STRUCTURE         = ' '
       RETFIELD             = 'VBELN'
     VALUE_ORG              = 'S'
    MULTIPLE_CHOICE        = ' '
    DISPLAY                = ' '
    CALLBACK_PROGRAM       = ' '
    CALLBACK_FORM          = ' '
    MARK_TAB               =
  IMPORTING
    USER_RESET             =
    TABLES
      VALUE_TAB              = INVOICE_SRCHLP
    FIELD_TAB              =
       RETURN_TAB             = ITAB_RETURN.
    DYNPFLD_MAPPING        =
  EXCEPTIONS
    PARAMETER_ERROR        = 1
    NO_VALUES_FOUND        = 2
    OTHERS                 = 3
  IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
  ENDIF.
  ITAB1-VBELN = ITAB_RETURN-FIELDVAL.
My problem is unable to retieve the screen fields contents. so kindly provide the solution.

Answer 1

Hi U have to append the field names u want to read.
Put this code before calling FM.
REFRESH dynpro_values[]. CLEAR dynpro_values.
dynpro_values-fieldname = Give ur screen field name u want to read.
APPEND dynp_fields.
Like this u have to append all the screen fields for which u want to read the data.
The finally Call FM.
After calling the FM read the table dynpro_values with key as field name. dynpro_values-FIELDVALUE contains the field content.
Check below sample code for your reference.
PARAMETERS: p_file   LIKE rlgrap-filename MEMORY ID upl.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_file.
  DATA: dynp_fields LIKE dynpread OCCURS 0 WITH HEADER LINE.
  REFRESH dynp_fields. CLEAR dynp_fields.
  dynp_fields-fieldname = 'P_FILE'.
  APPEND dynp_fields.
  CALL FUNCTION 'DYNP_VALUES_READ'
       EXPORTING
            dyname               = sy-cprog
            dynumb               = sy-dynnr
       TABLES
            dynpfields           = dynp_fields
       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
            OTHERS               = 9.
Thanks,
Vinod.
Edited by: Vinod Reddy Vemuru on Jul 25, 2008 3:15 PM