field exit BSEG-REBZG

[CESARCAES01]

hola buenas tardes. estoy nuevo en abap, y necesito hacer un field exit parael campo BSEG-REBZG, ya realice el proceso de crear la función y ya puedo trabajar con el codigo. necesito en la transacción fb65 el campo BKPF-STBLG si esta leno mostrar mun mensaje que diga el el documento esta anulado. help me please.

[Jarpi]

Hola CESARCAES01.

Si entendí bien, deberías hacer esto.

DATA: v_gjahr TYPE bkpf-gjahr,
v_stblg TYPE bkpf-stblg.

CALL FUNCTION 'GET_DYNP_VALUE'
EXPORTING
i_field = 'INVFO-REBZJ'
i_repid = 'SAPLFDCB'
i_dynnr = '0020'
CHANGING
o_value = v_gjahr.

IF v_gjahr IS NOT INITIAL.

SELECT SINGLE stblg FROM bkpf INTO v_stblg
WHERE belnr EQ input
AND gjahr EQ v_gjahr
AND bukrs EQ 'Tu Sociedad'.

ENDIF.

Y ahí, en caso de que el campo stblg contenga valores, mandas el mensaje de error de que no se puede usar ese documento.

Espero te sirva.

Saludos.

[CESARCAES01]

Excelente hermano, pero cmo hago si esta funcion esta relacionada con dos progrtamas y tres transacciones y dos dynpro.

[Jarpi]

La transaccion no interesa en este caso.

Duplica la función GET_DYNP_VALUE con el otro programa y su respectiva dynpro. Así obtenes el ejercicio de cualquiera de los dos programas.

Saludos.

[CESARCAES01]

Excelente Me Funciono.. Muchas Gracias... Excelente Ayuda

[CESARCAES01]

Hola.. Me Sirvio Mucho La Ayuda, Pero No Necesitan Que Sea Por Field Exot Si No Una Validacion Por Gcx2, Estoy Nuevo En Esto Y No Encuentro Q Hacer.. Si Me Puedes Ayuar Te Agradeceria