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

plz help me!!

Hi Experts,

I am doing Function module name: 'DYNP_VALUES_READ'

& Function Module name: F4IF_INT_TABLE_VALUE_REQUEST

i donot know about that function module with table control pgm. click as list box only.

plz send me that pgm!!

if solved then i will provide ur reward point!!!

Regards,

S.Suresh.

Add a comment
10|10000 characters needed characters exceeded

Assigned Tags

Related questions

5 Answers

  • author's profile photo Former Member
    Former Member
    Posted on Jun 17, 2008 at 11:22 AM

    Hi,

    F4IF_INT_TABLE_VALUE_REQUEST

    DATA : v_return LIKE ddshretval OCCURS 0 WITH HEADER LINE.
    
    SELECT-OPTIONS : s_plant1 FOR
    zaw_pol_plan-plant MODIF ID chg NO-EXTENSION NO INTERVALS.
    
    AT SELECTION-SCREEN ON VALUE-REQUEST FOR s_plant1-low .
    
    SELECT werks INTO TABLE i_t001w
    FROM t001w.
    
    IF sy-subrc EQ 0.
    
    CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
    EXPORTING
    retfield = 'WERKS'
    dynpprog = ws_repid
    dynpnr = sy-dynnr
    value_org = 'S'
    TABLES
    value_tab = i_t001w
    return_tab = v_return
    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.
    
    s_plant1-low = v_return-fieldval.

    Thanks

    Vikranth

    Add a comment
    10|10000 characters needed characters exceeded

  • author's profile photo Former Member
    Former Member
    Posted on Jun 17, 2008 at 11:23 AM

    Hi,

    Dynamic value read

    REPORT zsel_f4help .
    
    *---Report with selection screen and to display the list of
    
        * possible entries for field 'B' as per the value in field 'A'.
    
    PARAMETERS: p_vbeln TYPE vbak-vbeln,
    p_posnr TYPE vbap-posnr.
    
    AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_posnr.
    
    DATA: BEGIN OF help_item OCCURS 0,
    posnr TYPE vbap-posnr,
    matnr TYPE vbap-matnr,
    arktx TYPE vbap-arktx,
    END OF help_item.
    
    DATA: dynfields TYPE TABLE OF dynpread WITH HEADER LINE.
    
    dynfields-fieldname = 'P_VBELN'.
    APPEND dynfields.
    
    **Read the Values of the SCREEN FIELDs
    CALL FUNCTION 'DYNP_VALUES_READ'
    EXPORTING
    dyname = sy-cprog
    dynumb = sy-dynnr
    translate_to_upper = 'X'
    TABLES
    dynpfields = dynfields
    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.
    
    **Find out the Value of P_VBELN
    READ TABLE dynfields WITH KEY fieldname = 'P_VBELN'.
    
    p_vbeln = dynfields-fieldvalue.
    
    **Convert the Value into internal format
    CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
    EXPORTING
    input = p_vbeln
    IMPORTING
    output = p_vbeln.
    
    **Fetch the correponding itemnos from VBAP
    SELECT posnr matnr arktx INTO TABLE help_item
    FROM vbap
    WHERE vbeln = p_vbeln.
    
    **Generate the F4 help with internal table values
    CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
    EXPORTING
    retfield = 'POSNR'
    dynprofield = 'P_POSNR'
    dynpprog = sy-cprog
    dynpnr = sy-dynnr
    value_org = 'S'
    TABLES
    value_tab = help_item.

    Thanks

    Vikranth

    Add a comment
    10|10000 characters needed characters exceeded

  • author's profile photo Former Member
    Former Member
    Posted on Jun 17, 2008 at 11:27 AM

    Hi Suresh,

    once try with this code.

    TABLES kna1.

    DATA : BEGIN OF it_kna1 OCCURS 0,

    kunnr LIKE kna1-kunnr,

    END OF it_kna1.

    PARAMETERS : p_kunnr TYPE kna1-kunnr.

    DATA : it_return TYPE STANDARD TABLE OF ddshretval WITH HEADER LINE.

    AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_kunnr.

    SELECT kunnr FROM

    kna1 INTO TABLE it_kna1

    UP TO 20 ROWS.

    SORT it_kna1 BY kunnr.

    DELETE ADJACENT DUPLICATES FROM it_kna1 COMPARING kunnr.

    CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'

    EXPORTING

    retfield = 'kunnr'

    dynpprog = 'SY-REPID'

    dynpnr = '1000'

    dynprofield = 'P_KUNNR'

    value_org = 'S'

    TABLES

    value_tab = it_kna1.

    return_tab = it_return

    Regards,

    S.Gangi reddy.

    Add a comment
    10|10000 characters needed characters exceeded

  • author's profile photo Former Member
    Former Member
    Posted on Jun 17, 2008 at 11:34 AM

    hi

    go to this link

    prob in 'DYNP_VALUES_READ'

    hope ur problem get solved

    Cheers

    Snehi Chouhan

    Add a comment
    10|10000 characters needed characters exceeded

  • author's profile photo Former Member
    Former Member
    Posted on Jun 17, 2008 at 11:47 AM

    Hi,

    Plz check if this works for you.

    Select-options: s_bukrs for t001-bukrs, 
    s_pfolio for ztab-pfolio. 
    
    AT SELECTION-SCREEN ON VALUE-REQUEST FOR s_pfolio-low.
    PERFORM f4_for_portfolios.
    
    AT SELECTION-SCREEN ON VALUE-REQUEST FOR s_pfolio-high.
    PERFORM f4_for_portfolios.
    
    FORM f4_for_portfolios.
    l_dynpro = sy-repid.
    l_dynnar = sy-dynnr.
    
    for parameters/one single value(low/high) of select-option this is OK,
    
    
    If i give 'S_BUKRS' it is giving dump. 
    it_dynpfields-fieldname = 'S_BUKRS-LOW'.
    APPEND it_dynpfields.
    
    CALL FUNCTION 'DYNP_VALUES_READ'
    EXPORTING
    dyname = l_dynpro
    dynumb = l_dynnar " '1000' 
    translate_to_upper = 'X'
    TABLES
    dynpfields = it_dynpfields.
    READ TABLE it_dynpfields INDEX 1. 
    
    REFRESH r_bukrs.
    IF NOT it_dynpfields-fieldvalue IS INITIAL.
    r_bukrs-low = it_dynpfields-fieldvalue.
    r_bukrs-sign = 'I'.
    r_bukrs-option = 'EQ'.
    APPEND r_bukrs.
    ENDIF.
    
    SELECT a~bukrs a~portfolio b~xportb
    INTO TABLE it_plo
    FROM ( zlt_mandate AS a
    INNER JOIN twpob AS b
    ON a~bukrs = b~bukrs
    AND a~portfolio = b~rportb )
    WHERE a~bukrs IN r_bukrs . "= it_dynpfields-fieldvalue.
    
    CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
    EXPORTING
    retfield = 'PORTFOLIO'
    dynpprog = l_dynpro
    dynpnr = l_dynnar
    dynprofield = 'S_PFOLIO-LOW'
    value_org = 'S'"C
    display = 'F'
    TABLES
    value_tab = it_plo.
    
    ENDFORM. "get_portfolios

    Plz reward if found useful.

    Thanks,

    Dhanashri.

    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.