Hola,
Yo tuve que hacer algo parecido y lo hice poniendo el código en at selection-screen on value-request for 'en tu caso será el campo equipo'.
En mi caso cada vez que se cambia la clase de documento cambia su descriptivo.
clasedoc = ayuda.
* Cogemos el descriptivo de la Clase de Documento
select single ltext into texto from t003t where blart =
clasedoc and spras = 'S'.
* Necesitamos que actualice el campo Texto cada vez que se cambie la
* Clase de Documento en la pantalla
* Declaramos las siguientes variables para poder utilizar la función
data: t_dynpfields type dynpread occurs 0 with header line.
data: d_prog like d020s-prog,
d_numb like d020s-dnum.
d_prog = sy-repid.
d_numb = sy-dynnr.
t_dynpfields-fieldname = 'TEXTO'.
t_dynpfields-fieldvalue = texto.
append t_dynpfields.
call function 'DYNP_VALUES_UPDATE'
exporting
dyname = d_prog
dynumb = d_numb
tables
dynpfields = t_dynpfields
exceptions
invalid_abapworkarea = 1
invalid_dynprofield = 2
invalid_dynproname = 3
invalid_dynpronummer = 4
invalid_request = 5
no_fielddescription = 6
undefind_error = 7
others = 8.
.
Espero que esto te ayude.
Un saludo!
|