Sintoma

O programa de embarque incluía indevidamente ordens criadas com referência.

Apenas as ordens criadas com referência a outras ordens de venda devem ser incluídas. Aquelas

criadas com referência a faturamentos devem ser ignoradas.

Solução

Na seleção do fluxo de documentos, o programa exclui as informações das ordens de venda criadas com

referência a faturamentos.

Informações Complementares

----------------------------------------------------------------------------------------------------

Nota Número 03359 Data: 30/03/2007 Hora: 10:14:16

----------------------------------------------------------------------------------------------------

----------------------------------------------------------------------------------------------------

Nota Número              : 03359

Categoria                : Erro de Programa

Prioridade               : Média

Versão PW.CE             : 7.0

Pacote                   : 00001

Agrupamento              : 00161

----------------------------------------------------------------------------------------------------

Referência às notas relacionadas:

Número - Ordem - Descrição Breve

----------------------------------------------------------------------------------------------------

INCLUSÃO INDEVIDA DE ORDENS CRIADAS COM REFERÊNCIA

----------------------------------------------------------------------------------------------------

Palavras Chave:

EMBARQUE ORDEM REFERÊNCIA EATURAMENTO

----------------------------------------------------------------------------------------------------

Objetos da nota:

REPS /PWS/MZYCE003F01

----------------------------------------------------------------------------------------------------

Modificações efetuadas em REPS /PWS/MZYCE003F01

...

    CALL FUNCTION 'RV_ORDER_FLOW_INFORMATION'

         EXPORTING

              comwa         = wa_vbco6

              nachfolger    = 'X'

         TABLES

              vbfa_tab      = itab_vbfa_aux

         EXCEPTIONS

              no_vbfa       = 1

              no_vbuk_found = 2.

    CHECK sy-subrc EQ 0.

* >> Início da inclusão: FORM SELECIONA_DADOS_SAP

    DELETE itab_vbfa_aux[] WHERE vbtyp_n = 'C'

                             AND vbtyp_v = 'M'

                             AND stufe > 0.

* << Fim da inclusão

    APPEND LINES OF itab_vbfa_aux TO itab_vbfa_2.

  ENDLOOP.

  IF sy-subrc EQ 0.

    REFRESH itab_for.

  ENDIF.

  SORT itab_vbfa_2.

  DELETE ADJACENT DUPLICATES FROM itab_vbfa_2 COMPARING vbelv

                                                        posnv

                                                        vbeln

                                                        posnn

...

...

          itab_ovs-posnr TO wa_vbco6-posnr.

    CALL FUNCTION 'RV_ORDER_FLOW_INFORMATION'

         EXPORTING

              comwa         = wa_vbco6

         TABLES

              vbfa_tab      = itab_vbfa_aux

         EXCEPTIONS

              no_vbfa       = 1

              no_vbuk_found = 2.

    CHECK sy-subrc EQ 0.

* >> Início da inclusão: FORM SELECIONA_DADOS_SAP

    DELETE itab_vbfa_aux[] WHERE vbtyp_n = 'C'

                             AND vbtyp_v = 'M'

                             AND stufe > 0.

* << Fim da inclusão

    APPEND LINES OF itab_vbfa_aux TO itab_vbfa_2.

  ENDLOOP.

  SORT itab_vbfa_2.

  DELETE ADJACENT DUPLICATES FROM itab_vbfa_2 COMPARING vbelv

                                                        posnv

                                                        vbeln

                                                        posnn

                                                        vbtyp_n.

  LOOP AT itab_vbfa_2 ASSIGNING <fs_vbfa>.

    MOVE-CORRESPONDING <fs_vbfa> TO itab_vbfa.

...

...

      CALL FUNCTION 'RV_ORDER_FLOW_INFORMATION'

           EXPORTING

                comwa         = wa_vbco6

                vorgaenger    = ' '

           TABLES

                vbfa_tab      = itab_vbfa_aux

           EXCEPTIONS

                no_vbfa       = 1

                no_vbuk_found = 2.

      CHECK sy-subrc EQ 0.

* >> Início da inclusão: FORM SELECIONA_DADOS_SAP

      DELETE itab_vbfa_aux[] WHERE vbtyp_n = 'C'

                               AND vbtyp_v = 'M'

                               AND stufe > 0.

* << Fim da inclusão

      APPEND LINES OF itab_vbfa_aux TO itab_vbfa_2.

    ENDLOOP.

    LOOP AT itab_vbfa_2.

      MOVE-CORRESPONDING itab_vbfa_2 TO itab_vbfa.

      APPEND itab_vbfa.

    ENDLOOP.

    SELECT vbeln

           vkorg

           inco1

           inco2

...

...

      CALL FUNCTION 'RV_ORDER_FLOW_INFORMATION'

           EXPORTING

                comwa         = wa_vbco6

                vorgaenger    = ' '

           TABLES

                vbfa_tab      = itab_vbfa_aux

           EXCEPTIONS

                no_vbfa       = 1

                no_vbuk_found = 2.

      CHECK sy-subrc EQ 0.

* >> Início da inclusão: FORM SELECIONA_DADOS_SAP

      DELETE itab_vbfa_aux[] WHERE vbtyp_n = 'C'

                               AND vbtyp_v = 'M'

                               AND stufe > 0.

* << Fim da inclusão

      APPEND LINES OF itab_vbfa_aux TO itab_vbfa_2.

    ENDLOOP.

    LOOP AT itab_vbfa_2.

      MOVE-CORRESPONDING itab_vbfa_2 TO itab_vbfa.

      APPEND itab_vbfa.

    ENDLOOP.

    SELECT vbeln

           fkart

           waerk

           vkorg

...