×
ABAP
Pop-up rápido y con matchcode
- raulete
- Autor del tema
- Fuera de línea
- Administrador
Menos
Más
- Mensajes: 115
- Gracias recibidas: 0
8 años 1 mes antes - 8 años 1 mes antes #70
por raulete
Pop-up rápido y con matchcode Publicado por raulete
Para montar una ventana emergente con varios campos con sus ayuda de búsqueda, la forma más rápida es utilizar la función POPUP_GET_VALUES, almacenando en la tabla fields valores de campos de tabla como referencia, de este modo el campo añadido tirará de la definición realizada en su momento sobre el campo de la tabla.
Se pueden añadir tantos campos como se desee.
Se pueden añadir tantos campos como se desee.
DATA: vl_fields TYPE sval,
it_fields TYPE TABLE OF sval WITH HEADER LINE.
CLEAR vl_fields. REFRESH it_fields.
* FECHA
CLEAR vl_fields.
vl_fields-tabname = 'ZREFTAB'.
vl_fields-fieldname = 'CAMPO_FECHA'.
vl_fields-field_attr = '01'. " 01 Entrada 02 No Entrada 04 Invisible
vl_fields-field_obl = ' '. " Obligatorio
vl_fields-fieldtext = 'Fecha de inicio'. " Texto descriptivo
APPEND vl_fields TO it_fields.
* FECHA
CLEAR vl_fields.
vl_fields-tabname = 'ZREFTAB'.
vl_fields-fieldname = 'CAMPO_VALOR'.
vl_fields-field_attr = '01'. " 01 Entrada 02 No Entrada 04 Invisible
vl_fields-field_obl = ' '. " Obligatorio
vl_fields-fieldtext = 'Valor N'. " Texto descriptivo
APPEND vl_fields TO it_fields.
CALL FUNCTION 'POPUP_GET_VALUES'
EXPORTING
popup_title = 'Selección'
TABLES
fields = it_fields.
READ TABLE it_fields WITH KEY fieldname = 'CAMPO_FECHA'.
WRITE it_fields-value.
READ TABLE it_fields WITH KEY fieldname = 'CAMPO_VALOR'.
WRITE it_fields-value.
Última Edición: 8 años 1 mes antes por raulete.
Por favor, Iniciar sesión o Crear cuenta para unirse a la conversación.
Tiempo de carga de la página: 0.110 segundos