Saltar al contenido

Cómo usar – F4IF_INT_TABLE_VALUE_REQUEST

Un Usuario hizo la siguiente pregunta

Hola,

¿Cómo utilizo el módulo de función “F4IF_INT_TABLE_VALUE_REQUEST”? No estoy recuperando ningún valor.

gracias,

bsv.

6 respuestas

  • Ex miembro

    Hola, revisa este código si es posible, te ayuda.

    parámetro: p_finyr similar al obligatorio t7pm9-finyr.

    en la pantalla de valor seleccionado en p_finyr.

    FUNCIÓN DE APLICACIÓN ‘F4IF_INT_TABLE_VALUE_REQUEST’

    EXPORTACIONES

    RETFIELD = ‘FINYR’

    DYNPPROG = SY-REPID

    DYNPNR = ‘1000’

    DYNPROFIELD = ‘P_FINYR’

    VALUE_ORG = ‘S’

    MESAS

    VALUE_TAB = IT_YEAR

    RETURN_TAB = IT_RETURN

    DYNPFLD_MAPPING = IT_DYN

    Excepciones

    PARAMETER_ERROR = 1

    NO_VALUES_FOUND = 2

    OTRO = 3.

    Sobre,

    venkat.

  • elige el nombre kunnr1

    ó kna1

    en la tabla it_valid.

    llamar a la función ‘F4IF_INT_TABLE_VALUE_REQUEST’

    exportar

    ddic_structure = “Z20S_KNA1”

    retfield = ‘CUSTNUM’

    • PVALKEY = ”

    dynpprog = ‘SAPMZ20_CUSTDAY2’

    dynpnr = “706”

    dynprofield = ‘Z20T_KNA1-CUSTNUM’

    • STEPL = 0

    • WINDOW_TITLE =

    • VALOR = ”

    value_org = ‘S’

    • MULTIPLE_CHOICE = ”

    • PANTALLA = ”

    • CALLBACK_PROGRAM = ”

    • CALLBACK_FORM = ”

    • MARK_TAB =

    • IMPORTANTE

    • USER_RESET =

    mesas

    value_tab = it_valid

    • FIELD_TAB =

    • RETURN_TAB =

    • DYNPFLD_MAPPING =

    • Excepciones

    • PARAMETER_ERROR = 1

    • NO_VALUES_FOUND = 2

    • OTRO = 3

    .

    más sy-subrc <> 0.

    ID de mensaje sy-msgid tipo sy-msgty sy-msgno número

    por sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.

    terminara si.

  • Ex miembro

    Hola,

    Consulte el código a continuación:

    DATA: return TYPE TABLE OF ddshretval WITH HEADER LINE.
    
    AT SELECTION-SCREEN ON VALUE-REQUEST FOR S_WERKS-LOW.
    SELECT WERKS NAME1 INTO CORRESPONDING FIELDS OF TABLE KUNNSO_ITAB FROM T001W.
    DELETE ADJACENT DUPLICATES FROM KUNNSO_ITAB.
    
    CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
    EXPORTING
    RETFIELD = 'WERKS'
    DYNPPROG = SY-REPID
    DYNPNR = SY-DYNNR
    DYNPROFIELD = 'S_WERKS'
    VALUE_ORG = 'S'
    multiple_choice="X"
    TABLES
    VALUE_TAB = KUNNSO_ITAB
    return_tab = return.
    
    IF SY-SUBRC 0.
    SORT return BY fieldval DESCENDING.
    LOOP AT return.
     S_WERKS-low = return-fieldval.
     S_WERKS-option = 'EQ'.
     S_WERKS-sign = 'I'.
     S_WERKS-high = space.
     APPEND S_WERKS.
    ENDLOOP.
    
    SORT S_WERKS BY low.
    ENDIF.
    

    Gracias,

    Sriram Ponna.

  • Ex miembro

    Hola

    vea este código de muestra que puede entender fácilmente

    tables : HRp1001.
    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******************
    
    **********VALIDATION FOR SCREEN FIELDS*********************
    
    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.
    
    

    Si encuentra ayuda, dé una recompensa.

    Sobre.

    Eshwar.

  • Dios los bendiga,

    ¿Cómo sé cuándo el usuario cancelará la operación? Quiero decir, cuando se muestra la ayuda de búsqueda y el usuario no selecciona ningún registro. En cambio, cancela la acción.

  • Hola,

    ¿Podrías probar este programa? ¿Te ayudaría?

    INFORME z_ibo_f4_3.
    PARAMETROS:
    p_carrid TYPE spfli-carrid,
    p_cname TYPE scarr-carrname,
    p_url TYPE scarr-url.

    SELECCIÓN DE PANTALLA A SOLICITUD DE VALOR PARA p_carrid.

    TIPOS: t_return_tab ddshretval TYPE.

    TIPOS: COMIENZO DE ty_line,
    carrid TIPO spfli-carrid,
    carrainm TYPE scarr-carrname,

    END ty_line.

    DETALLES: it_list TABLA ESTÁNDAR TIPO ty_line,
    w_return_tab TYPE t_return_tab,
    i_return_tab TIPO TABLA DE ddshretval,
    v_repid TYPE sy-repid,
    v_dynnr TYPE sy-dynnr.

    DETALLES:
    it_map TIPO DE TABLA DE CALIDAD Dselc,
    wa_map TIPO dselc.

    v_repid = sy-repid.
    v_dynnr = sy-dynnr.

    SELECCIONE carrrain carrid
    Oh cicatriz
    EN LAS AREAS CORRESPONDIENTES DE LA TABLA it_list.

    SI sy-subrc = 0.

    wa_map-fldname = “F0001”. “Campo para la publicación 1
    wa_map-dyfldname = “P_CARRID”.
    APÉNDICE wa_map TO it_map.

    wa_map-fldname = “F0002”. “Campo para la publicación 2
    wa_map-dyfldname = “P_CNAME”.
    APÉNDICE wa_map TO it_map.

    wa_map-fldname = “F0003”. “Campo para la publicación 2
    wa_map-dyfldname = “URL”.
    APÉNDICE wa_map TO it_map.

    FUNCIÓN DE APLICACIÓN ‘F4IF_INT_TABLE_VALUE_REQUEST’
    EXPORTACIONES
    retfield = ‘CARRIDA’
    dynpprog = v_repid
    dynpnr = v_dynnr
    dynprofield = ‘P_CARRID’
    value_org = ‘S’
    MESAS
    value_tab = it_list
    RETURN_TAB = i_return_tab

    dynpfld_mapping = it_map
    Excepciones
    parámetro_error = 1
    no_values_found = 2
    OTRO = 3.
    SI sy-subrc = 0.
    * LEER LA TABLA it_map
    TERMINARA SI.

    TERMINARA SI.

    Sobre

    Ebrahim