Sintoma

Ao criar uma fatura de mercadoria para processo Argentina colocando parte do valor do item no campo

frete o programa exibe mensage informando que o total dos itens é diferente do total dos itens.

Solução

Ajustado programa para conciderar o frete no calculo valor  do total dos itens.

Informações Complementares

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

Nota Número 09539 Data: 09/12/2009 Hora: 13:36:20

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

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

Nota Número              : 09539

Categoria                : Erro de Programa

Prioridade               : Média

Versão PW.CE             : 8.0

Pacote                   : 00001

Agrupamento              : 00125

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

Referência às notas relacionadas:

Número - Ordem - Descrição Breve

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

VERIFICAÇÃO VALOR TOTAL FATURA DE MERCADORIA (ARGENTINA)

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

Palavras Chave:

VERIFICAR - FATURA - MERCADORIA - ITEM - VALOR - TOTAL - ARGENTINA

/PWS/SAPMZYCI003

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

Objetos da nota:

REPS /PWS/MZYCI003F01

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

Modificações efetuadas em REPS /PWS/MZYCI003F01

...

        v_total = itab_zycit003-total - itab_zycit003-vlfre_fat +

        v_total.

      ELSE.

        v_total = itab_zycit003-total + v_total.

      ENDIF.

    ELSEIF /pws/zycie006-ratval EQ '3'.

      v_total = v_total + itab_zycit003-total .

    ELSE.

      v_total = ( itab_zycit003-netpr * itab_zycit003-toinv * v_taxa  )

                                  +  v_total.

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

      IF ( t001-land1 = 'AR' OR t001-land1 = 'CL' )

         AND /pws/zycit031-inco1_ci = 'FOB'.

        v_total = v_total - itab_zycit003-vlfre_fat.

      ENDIF.

* << Fim da inclusão

    ENDIF.

  ENDLOOP.

  IF sy-tcode EQ '/PWS/ZYCI003_A' OR sy-tcode EQ '/PWS/ZYCI003_E'

    OR sy-tcode = '/PWS/ZYCI003_M'.

    CLEAR v_total.

    LOOP AT itab_zycit003.

      IF v_waers_diferente = 'X'.

        IF /pws/zycie006-tpfatura = '02' AND NOT

           /pws/zycit085-ukursfre IS INITIAL.

          v_taxa = /pws/zycit085-ukursfre.

...

...

        IF ( t001-land1 = 'AR' OR t001-land1 = 'CL' )

             AND /pws/zycit031-inco1_ci = 'FOB'.

          v_total = itab_zycit003-total -

                    itab_zycit003-vlfre_fat + v_total.

        ELSE.

          v_total = itab_zycit003-total +  v_total.

        ENDIF.

      ELSE.

        v_total = ( itab_zycit003-netpr * itab_zycit003-toinv

                    * v_taxa ) +  v_total.

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

        IF ( t001-land1 = 'AR' OR t001-land1 = 'CL' )

           AND /pws/zycit031-inco1_ci = 'FOB'.

          v_total = v_total - itab_zycit003-vlfre_fat.

        ENDIF.

* << Fim da inclusão

      ENDIF.

    ENDLOOP.

  ENDIF.

  IF /pws/zycie006-ratval EQ '4'.

    CLEAR v_total.

    LOOP AT itab_zycit003 WHERE livre = 'S'.

      IF ( t001-land1 = 'AR' OR t001-land1 = 'CL' )

      AND /pws/zycit031-inco1_ci = 'FOB'.

...