EXIT MIRO despues de modificar el pedido

[jmrbdl]

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]

EXIT MIGO despues de modificar el pedido

Perdon ,
Había puesto Miro y era la MIGO

saludos y a ver si alguien puede ayudarme

[makys]

Puedes Buscar las Badi de la MIRO o MIGO

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]

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]

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]

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]

Yo implemente la siguiente.

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'.

[B]    [B]loop at xmseg into wa_mseg.[/B]
      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.[/B]
        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.