PDA

Ver la Versión Completa : Ayuda Field exit


poketina
11/06/07, 09:07:12
Hola !! quiero hacer una cosa en la FB60: que cuando modifique el valor de un campo, se rellene automaticamente otro campo con el valor correspondiente de la tabla KONA. :( He estado mirando y y veo q quizas pueda hacerlo con un field exit, lo que no tengo muy claro es si el field exit debe ser para el campo en el q yo meto el valor o para el que quiero q se rellene automaticamente.. :confused:
alguien tiene un manual de field exits ???
gracias !!!!

poketina
11/06/07, 11:59:40
Bueno, he estado mirando y por ahora consigo validar que el valor introducido en el primero de los campos exista en la tabla KONA, esto lo he hecho asi:

DATA:l_knuma LIKE kona-knuma,
l_valor LIKE dynpread-fieldvalue.

IF input IS NOT INITIAL.
CLEAR: l_knuma, l_texto.
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
EXPORTING
input = input
IMPORTING
output = l_knuma.

SELECT SINGLE knuma botext
FROM kona
INTO (l_knuma, l_texto)
WHERE knuma = l_knuma.

IF sy-subrc <> 0.
CLEAR output.
MESSAGE e023(zgr0) WITH 'El acuerdo introducido no existe'.
ELSE.
output = l_knuma.
ENDIF.
ENDIF.

Ahora lo que no consigo es que el otro campo se me cargue con un valor que obtengo tambien de la tabla KONA...
alguna idea ???
gracias..

prendtorff
04/01/08, 10:05:07
Hola, te paso una funcion, qeu a mi me dio resultado varias veces:
'DYNP_UPDATE_FIELDS'

aca va un ejemplo de codigo fuente:

DATA: t_dynpfields TYPE TABLE OF dynpread,
r_dynpfields TYPE dynpread.
DATA: l_qmcod TYPE char4.


REFRESH t_dynpfields.

r_dynpfields-fieldname = 'VIQMEL-QMCOD'. " Nombre del campo
r_dynpfields-fieldvalue = l_qmcod. "Valor con el que se va a llenar el campo


APPEND r_dynpfields TO t_dynpfields .

CALL FUNCTION 'DYNP_UPDATE_FIELDS'
EXPORTING
dyname = 'SAPLIQS0' "Program name
dynumb = '7710' "Screen number
TABLES
dynpfields = t_dynpfields.

Ojala te sirva...

saludos a todos!