Skip to Content
author's profile photo Former Member
Former Member

How to handle the on value-request

WHEN I AM USING THIS FUNCTION MODULE'POPUP_WITH_TABLE_DISPLAY'.UNDER THE EVENT ON VALUE REQUEST WHEN I AM CLICKING TO ANY VALUE IT IS WORKING BUT WHEN CANCLING IT IS GOING TO DUMP.

PLEASE GIVE US THE SOLUTION WITH CODING.

POINTS WILL BE REWARDED.

REGARDS

SUBASH MAHANTA

Add a comment
10|10000 characters needed characters exceeded

Assigned Tags

Related questions

3 Answers

  • Best Answer
    author's profile photo Former Member
    Former Member
    Posted on Nov 23, 2007 at 12:56 PM

    Heay just handle the exception for that function module !!!!!..

    Just check this.. i too got the same problem earlier..

    CALL FUNCTION 'K_KKB_POPUP_RADIO2'

    EXPORTING

    i_title = 'Select'

    i_text1 = 'Qualifying Data'

    i_text2 = 'Disbursal Data'

    i_default = 1

    IMPORTING

    i_result = w_type

    EXCEPTIONS

    cancel = 1

    OTHERS = 2.

    <b> IF sy-subrc <> 0.

    MESSAGE 'User cancelled the action' TYPE 'S'.

    ENDIF.</b>

    write some thing when sy-subrc ne 0.... this will solve ur problem !!

    <i><b>If not just paste ur code here !!</b></i>

    Regards,

    Sai Ramesh

    Add a comment
    10|10000 characters needed characters exceeded

  • author's profile photo Former Member
    Former Member
    Posted on Nov 30, 2007 at 08:41 AM

    &----


    *& Module VENDORVALUE INPUT

    &----


    • text

    ----


    • POV for vendor field

    module vendorvalue input.

    call function 'F4IF_FIELD_VALUE_REQUEST'

    exporting

    tabname = 'LFA1'

    fieldname = 'LIFNR'

    • SEARCHHELP = ' '

    • SHLPPARAM = ' '

    dynpprog = progname

    dynpnr = dynnum

    dynprofield = 'ZG8_EKKO-LLIEF'

    • STEPL = 0

    • VALUE = ' '

    • MULTIPLE_CHOICE = ' '

    • DISPLAY = ' '

    • SUPPRESS_RECORDLIST = ' '

    • CALLBACK_PROGRAM = ' '

    • CALLBACK_FORM = ' '

    • SELECTION_SCREEN = ' '

    • TABLES

    • RETURN_TAB =

    • EXCEPTIONS

    • FIELD_NOT_FOUND = 1

    • NO_HELP_FOR_FIELD = 2

    • INCONSISTENT_HELP = 3

    • NO_VALUES_FOUND = 4

    • OTHERS = 5

    .

    if sy-subrc <> 0.

    • MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO

    • WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

    endif.

    endmodule. " VENDORVALUE INPUT

    &----


    *& Module CURRENCYVALUE INPUT

    &----


    • text

    ----


    • POV for currency field

    module currencyvalue input.

    call function 'F4IF_FIELD_VALUE_REQUEST'

    exporting

    tabname = 'EKKO'

    fieldname = 'WAERS'

    • SEARCHHELP = ' '

    • SHLPPARAM = ' '

    dynpprog = progname

    dynpnr = dynnum

    dynprofield = 'ZG8_EKKO-WAERS'

    • STEPL = 0

    • VALUE = ' '

    • MULTIPLE_CHOICE = ' '

    • DISPLAY = ' '

    • SUPPRESS_RECORDLIST = ' '

    • CALLBACK_PROGRAM = ' '

    • CALLBACK_FORM = ' '

    • SELECTION_SCREEN = ' '

    • TABLES

    • RETURN_TAB =

    • EXCEPTIONS

    • FIELD_NOT_FOUND = 1

    • NO_HELP_FOR_FIELD = 2

    • INCONSISTENT_HELP = 3

    • NO_VALUES_FOUND = 4

    • OTHERS = 5

    .

    if sy-subrc <> 0.

    • MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO

    • WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

    endif.

    endmodule. " CURRENCYVALUE INPUT

    Add a comment
    10|10000 characters needed characters exceeded

  • author's profile photo Former Member
    Former Member
    Posted on Nov 30, 2007 at 12:35 PM

    Hi like this

    TYPES : BEGIN OF ST_OBJID_SH,
             OTYPE TYPE HRP1000-OTYPE,
             OBJID TYPE HRP1000-OBJID,
            END OF ST_OBJID_SH.
    
    DATA : IT_OBJID_SH TYPE STANDARD TABLE OF ST_OBJID_SH.
    DATA : WA_OBJID_SH TYPE ST_OBJID_SH.
    
    ************SELECTION SCREEN DESIGN************************
    
    SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.
    
    *SELECT-OPTIONS : S_OTYPE FOR HRP1001-OTYPE NO INTERVALS .
    SELECT-OPTIONS : S_OBJID FOR HRP1001-OBJID NO INTERVALS .
    SELECT-OPTIONS : DATE FOR SY-DATUM NO-EXTENSION OBLIGATORY.
    
    SELECTION-SCREEN END OF BLOCK B1.
    
    ***********END OF SELECTION SCREEN DESIGN******************
    
    AT SELECTION-SCREEN ON VALUE-REQUEST FOR S_OBJID-LOW.
    
    *  IF S_OBJID IS NOT INITIAL.
    
        SELECT OTYPE OBJID FROM HRP1000
                     INTO TABLE IT_OBJID_SH
                     WHERE OTYPE = 'D'.
    
     IF SY-SUBRC EQ 0.
    
    * SEARCH HELP FOR QUALIFICATION.
    
        CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
          EXPORTING
    *              DDIC_STRUCTURE         = ' '
            RETFIELD               =  'OBJID'
    *              PVALKEY                = ' '
           DYNPPROG               = SY-REPID
           DYNPNR                 = SY-DYNNR
           DYNPROFIELD            = 'S_OBJID'
    *              STEPL                  = 0
    *              WINDOW_TITLE           =
    *              VALUE                  = ' '
           VALUE_ORG              = 'S'
    *              MULTIPLE_CHOICE        = ' '
    *              DISPLAY                = ' '
    *              CALLBACK_PROGRAM       = ' '
    *              CALLBACK_FORM          = ' '
    *              MARK_TAB               =
    *            IMPORTING
    *              USER_RESET             =
          TABLES
            VALUE_TAB              =  IT_OBJID_SH
    *              FIELD_TAB              =
    *              RETURN_TAB             = RETURN_TAB
    *              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.
      ENDIF.
    
                  .

    Add a comment
    10|10000 characters needed characters exceeded

Before answering

You should only submit an answer when you are proposing a solution to the poster's problem. If you want the poster to clarify the question or provide more information, please leave a comment instead, requesting additional details. When answering, please include specifics, such as step-by-step instructions, context for the solution, and links to useful resources. Also, please make sure that you answer complies with our Rules of Engagement.
You must be Logged in to submit an answer.

Up to 10 attachments (including images) can be used with a maximum of 1.0 MB each and 10.5 MB total.