×
ABAP
Tabla con disposiciones de visualización de ALVs
- raulete
- Autor del tema
- Fuera de línea
- Administrador
Menos
Más
- Mensajes: 115
- Gracias recibidas: 0
10 años 1 mes antes #28
por raulete
Tabla con disposiciones de visualización de ALVs Publicado por raulete
LTDX
Ejemplo de matchcode:
Ejemplo de matchcode:
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_disvar.
CLEAR it_matchcode.
REFRESH it_matchcode.
vg_repid = sy-repid.
vg_uname = sy-uname.
SELECT variant text
INTO TABLE it_matchcode
FROM ltdxt
WHERE report = vg_repid AND
( username = vg_uname OR username = space ).
PERFORM mostrar_matchcode TABLES it_matchcode
USING 'VARIANT'
'P_DISVAR'
'Disposición'.
FORM mostrar_matchcode TABLES i_tabla
USING dl_retfield TYPE dfies-fieldname
dl_nom_campo TYPE help_info-dynprofld
dl_title TYPE c.
DATA: BEGIN OF i_return_tab OCCURS 0.
INCLUDE STRUCTURE ddshretval.
DATA: END OF i_return_tab.
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
EXPORTING
retfield = dl_retfield
dynprofield = dl_nom_campo
window_title = dl_title
value_org = 'S'
multiple_choice = ' '
TABLES
value_tab = i_tabla
return_tab = i_return_tab
EXCEPTIONS
parameter_error = 1
no_values_found = 2
OTHERS = 3.
* Se carga el valor selecionado en el campo de pantalla
IF sy-subrc EQ 0.
READ TABLE i_return_tab INDEX 1.
MOVE i_return_tab-fieldval TO p_disvar.
ENDIF.
ENDFORM. " mostrar_matchcode
Por favor, Iniciar sesión o Crear cuenta para unirse a la conversación.
Tiempo de carga de la página: 0.123 segundos