Ver Mensaje Individual
  #3  
Viejo 03/03/09, 09:01:44
ongo ongo is offline
Member
 
Fecha de Ingreso: ago 2007
Mensajes: 45
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!
Responder Con Cita