PDA

Ver la Versión Completa : EXIT MIRO despues de modificar el pedido


jmrbdl
25/01/13, 10:45:27
SIento si he repetido el mensaje, pero como no lo veo publicado lo he repetido
Buenas a todos,

me gustaria saber si exite una exit , donde pueda recuperar los datos del pedido despues de realizar la MIGO.

Cuando hago la MIGO y recepciono, tengo que incluir un proceso que automaticamente me genere un .xml y un pdf . del pedido. Pero necesito los datos actualizados despues de la recepción.

He encntrado varias exit de la Migo , pero todas antes de actualizar el pedido.

Alguna idea.
Tengo SAP 4.6 c y creo que en superiores existe alguna Badi que realiza esto.

MUchas gracias

jmrbdl
28/01/13, 15:45:27
Perdon ,
Había puesto Miro y era la MIGO

saludos y a ver si alguien puede ayudarme

makys
28/01/13, 18:37:43
SIento si he repetido el mensaje, pero como no lo veo publicado lo he repetido
Buenas a todos,

me gustaria saber si exite una exit , donde pueda recuperar los datos del pedido despues de realizar la MIGO.

Cuando hago la MIGO y recepciono, tengo que incluir un proceso que automaticamente me genere un .xml y un pdf . del pedido. Pero necesito los datos actualizados despues de la recepción.

He encntrado varias exit de la Migo , pero todas antes de actualizar el pedido.

Alguna idea.
Tengo SAP 4.6 c y creo que en superiores existe alguna Badi que realiza esto.

MUchas gracias

Hola jmrbdl

pues yo creo que una Badi te puede servir para lo que necesitas, con este proceso puedes encontrar las badis para la MIGO

http://www.sapconexion.com/index.php/documentacion/67-como-buscar-badis-manualmente

Mucha Suerte...

Saludos,

Melandry
29/01/13, 11:48:35
Efectivamente como dice makys tienes BADIS que podrías usar.
Busca en el foro por MB_MIGO_BADI que hay varios post al respecto y alguno de sus métodos te puede servir.
Saludos.

jmrbdl
31/01/13, 06:50:46
Gracias por la respuesta , pero no me vale,

Ya había comentado en mi post. Tengo la versión 4.6 C y no tengo las badis

Buscaré otra solución.
Gracias de nuevo

Melandry
31/01/13, 07:56:28
Cierto, pequeño detalle que hemos pasado por alto, jeje.
Mira a ver el siguiente enlace a ver si te sirve.
https://scn.sap.com/thread/196959

Salu2.

Rodolfo SAP
31/01/13, 15:37:58
Hola.

Te comento que tuve un requerimiento donde tenia que lanzar un proceso para guardar ciertos datos de la entrada al guardar la transacción MIGO.

BADI : MB_DOCUMENT_BADI

Esta BADI cuenta con dos salida la :

MB_DOCUMENT_BEFORE_UPDATE
MB_DOCUMENT_UPDATE

Yo implemente mi requerimiento en la MB_DOCUMENTO_UPDATE pues se lanza despues de guardar, e internamente despues de procesar todo y ya de haber creado el documento de la entrada.

Ya con eso podia tener el numero de pedido(EBELP) y el numero de entrada (MBLNR) que genero.

Este lo hice por la estructura de la badi la XMSEG me trae toda esa informacion.

Aqui el codigo.


method if_ex_mb_document_badi~mb_document_update.

*XMKPF
*XMSEG
*XVM07M

**** BLOQUEO PARA MI USER
if sy-uname eq 'RMONTIEL'.

data: x type c.

break-point.

x = 1.

do.
if x = 0.
exit.
endif.
enddo.

endif.

**** BLOQUEO

if sy-tcode eq 'MIGO' or sy-tcode eq 'ML81N'.

data: ti_libemiro type standard table of zmm_libemiro,
wa_libemiro type zmm_libemiro.

data: wa_mseg type mseg,
wa_ekko type ekko,
wa_ekpo type ekpo.

data: vl_konnr type ekko-konnr,
vl_result type c,
vl_flag type c.

data: cevel type zglele_cevel.

constants: co_x type c value 'X',
co_1 type c value '1'.

loop at xmseg into wa_mseg.
if wa_mseg-bwart eq '101'.

select single * into wa_ekpo
from ekpo
where ebeln eq wa_mseg-ebeln
and ebelp eq wa_mseg-ebelp.
if wa_ekpo-pstyp eq '0' and wa_ekpo-knttp eq ' '.

else.

select single * into wa_ekko
from ekko
where ebeln eq wa_mseg-ebeln
and frgke eq 'L'.

if wa_ekko-frgsx is initial.

move wa_ekko-konnr to vl_konnr.
clear wa_ekko.

select single * into wa_ekko
from ekko
where ebeln eq vl_konnr
and frgke eq 'L'.

endif.

* INICIO INSERT | UPGRADE | DEVK914457 | RMONTIEL ................. 20.12.2012
* Conversión Estrategias Obsoletas
data: new_value(30) type c.
select single value into new_value
from zgl_parametrizar
where cprog eq 'BADI_ENTRYSLIP'
and cield eq 'FRGSX'
and ctype eq 'CV'
and value_eq eq wa_ekko-frgsx.
if sy-subrc eq 0.
move: new_value to wa_ekko-frgsx.
endif.
* INICIO INSERT | UPGRADE | DEVK914457 | RMONTIEL ................. 20.12.2012

* INICIO INSERT | UPGRADE | DEVK914156 | RMONTIEL ................. 27.11.2012
* Recoge el nivel de aprobación para el documento
select single cevel into cevel from zmm_libeapproval where frgsx EQ wa_ekko-frgsx.

move: wa_mseg-ebeln to wa_libemiro-ebeln,
wa_mseg-ebelp to wa_libemiro-ebelp,
wa_mseg-mblnr to wa_libemiro-mblnr,
wa_mseg-zeile to wa_libemiro-zeile,
wa_mseg-lfbnr to wa_libemiro-lfbnr,
wa_mseg-lfpos to wa_libemiro-lfpos,
wa_mseg-werks to wa_libemiro-werks,
wa_mseg-mjahr to wa_libemiro-mjahr,
wa_ekko-frgsx to wa_libemiro-frgsx,
cevel to wa_libemiro-cevel, "#EC CHANGED
co_1 to wa_libemiro-xevel, "#EC CHANGED
co_x to wa_libemiro-frgke,
sy-uname to wa_libemiro-ernam,
sy-datum to wa_libemiro-erdat,
sy-tcode to wa_libemiro-tcode.

append wa_libemiro to ti_libemiro.

endif.

endif.

endloop.

if not ti_libemiro[] is initial.

call function 'ZMM_APPEND_LIBEMIRO'
importing
result = vl_result
tables
libemiro = ti_libemiro
exceptions
append_error = 1
others = 2.

endif.

endif.

**** BLOQUEO

* ...
endmethod.

Por cierto esto lo implemente en SAP 4.6c y si se puedo, si existe la BADI y despues la migre a versión 6.0 y todo Correcto sin broncas...

Espero te sriva de ayuda.

Saludos.