Flatron
12/07/11, 17:05:35
Pues eso estoy intentando que en la factura de venta me aparezca el número de entrega.
La verdad que no lo consigo.
En la se71, por ejemplo
PERFORM entrega IN PROGRAM YINVOICE
using &VBDKR-VBELN(K)&
changing &ENTREGA&
ENDPERFORM
** Hasta ahí lo tengo claro, llamo a un programa, pasando el campo de la factura en VBDKR-VBELN y lo devolverá en un campo llamado ENTREGA.
Ahora bien en el programa,
FORM entrega TABLES input STRUCTURE itcsy
output STRUCUTRE itcsy.
data: factura like VBRK-VBELN,
entrega kike VBRP-VGBEL.
READ TABLE input WITH KEY name = 'VBDKR-VBELN'.
MOVE input-value TO factura.
SELECT SINGLE vgbel INTO entrega FROM vbrp WHERE vbeln = factura.
MOVE entrega TO output-value.
MODIFY output TRANSPORTING value WHERE name = 'ENTREGA'
ENDFORM.
La cosa es que nunca me devuelve nada.
Alguien sabe que puedo estar haciendo mal? Gracias de antemano.
La verdad que no lo consigo.
En la se71, por ejemplo
PERFORM entrega IN PROGRAM YINVOICE
using &VBDKR-VBELN(K)&
changing &ENTREGA&
ENDPERFORM
** Hasta ahí lo tengo claro, llamo a un programa, pasando el campo de la factura en VBDKR-VBELN y lo devolverá en un campo llamado ENTREGA.
Ahora bien en el programa,
FORM entrega TABLES input STRUCTURE itcsy
output STRUCUTRE itcsy.
data: factura like VBRK-VBELN,
entrega kike VBRP-VGBEL.
READ TABLE input WITH KEY name = 'VBDKR-VBELN'.
MOVE input-value TO factura.
SELECT SINGLE vgbel INTO entrega FROM vbrp WHERE vbeln = factura.
MOVE entrega TO output-value.
MODIFY output TRANSPORTING value WHERE name = 'ENTREGA'
ENDFORM.
La cosa es que nunca me devuelve nada.
Alguien sabe que puedo estar haciendo mal? Gracias de antemano.