CE PLUS - Nota 002225

Módulo: DOC. IMPORTAÇÃO

Funcionalidade: Nota Fiscal

Data/Hora da Publicação: 06/10/2006 00:00:00

Data/Hora Última Alteração: 20/06/2011 13:10:24

Descrição da Nota: VALOR TOTAL DA NOTA INCORRETO

Sintoma

Total da Nota Fiscal de processo a granel não bate com a base do ICMS e nem com a soma da linha do

IPI.

 

 

Solução

Incluido o calculo da diferença entre a DI e a fatura. FRETE

 

Versões Tratadas

6.0

Informações Complementares

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

Nota Número 02225 Data: 06/10/2006 Hora: 14:45:08

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

 

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

Nota Número              : 02225

Categoria                : Erro de Programa

Prioridade               : Alta

Versão PW.CE             : 6.0

Pacote                   : 00025

Agrupamento              : 00134

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

Referência às notas relacionadas:

Número - Ordem - Descrição Breve

 

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

VALOR TOTAL DA NOTA INCORRETO

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

Palavras Chave:

NOTA FISCAL - CFR - BASE ICMS - FRETE FATURA - GRANEL

 

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

Objetos da nota:

REPS /PWS/MZYCI016F01

 

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

Modificações efetuadas em REPS /PWS/MZYCI016F01

 

...

          SELECT SINGLE * FROM /pws/zycit093

            WHERE nrseqce = /pws/zycit085-nrbl.

        ENDIF.

        IF /pws/zycit031-inco1_ci = 'C&F' AND

            NOT itab_zycit003-qtd_iten IS INITIAL AND

* >> Início da exclusão: FORM SELECIONA_ITENS_NFG

            NOT itab_zycit003-qtd_itend IS INITIAL AND

            itab_zycit003-vlfre_fat IS INITIAL.

* << Fim da exclusão

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

            NOT itab_zycit003-qtd_itend IS INITIAL .

* << Fim da inclusão

          IF NOT itab_zycit100-vlfre IS INITIAL.

            itab_zycit042-netpr = itab_zycit042-netpr -

* >> Início da exclusão: FORM SELECIONA_ITENS_NFG

             ( itab_zycit100-vlfre

* << Fim da exclusão

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

             ( ( itab_zycit100-vlfre - itab_zycit003-vlfre_fat *

itab_zycit100-dttaxbem )

* << Fim da inclusão

             / itab_zycit003-qtd_iten ) +

* >> Início da exclusão: FORM SELECIONA_ITENS_NFG

             ( itab_zycit100-vlfre

* << Fim da exclusão

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

             ( ( itab_zycit100-vlfre - itab_zycit003-vlfre_fat *

itab_zycit100-dttaxbem )

* << Fim da inclusão

             / itab_zycit003-qtd_itend ) .

          ENDIF.

        ELSEIF /pws/zycit031-inco1_ci = 'CIF' AND

            NOT itab_zycit003-qtd_iten IS INITIAL AND

            NOT itab_zycit003-qtd_itend IS INITIAL.

* >> Início da exclusão: FORM SELECIONA_ITENS_NFG

          IF NOT /pws/zycit085-vlfre IS INITIAL AND

           itab_zycit003-vlfre_fat IS INITIAL.

* << Fim da exclusão

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

          IF NOT /pws/zycit085-vlfre IS INITIAL .

* << Fim da inclusão

            itab_zycit042-netpr = itab_zycit042-netpr -

* >> Início da exclusão: FORM SELECIONA_ITENS_NFG

             ( itab_zycit100-vlfre

* << Fim da exclusão

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

             ( ( itab_zycit100-vlfre - itab_zycit003-vlfre_fat *

itab_zycit100-dttaxbem )

* << Fim da inclusão

             / itab_zycit003-qtd_iten ) +

* >> Início da exclusão: FORM SELECIONA_ITENS_NFG

             ( itab_zycit100-vlfre

* << Fim da exclusão

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

             ( ( itab_zycit100-vlfre - itab_zycit003-vlfre_fat *

itab_zycit100-dttaxbem )

* << Fim da inclusão

             / itab_zycit003-qtd_itend ).

          ENDIF.

* >> Início da exclusão: FORM SELECIONA_ITENS_NFG

          IF NOT itab_zycit100-vlseg IS INITIAL  AND

          itab_zycit003-vlseg_fat IS INITIAL.

* << Fim da exclusão

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

          IF NOT itab_zycit100-vlseg IS INITIAL  .

* << Fim da inclusão

            itab_zycit042-netpr = itab_zycit042-netpr -

* >> Início da exclusão: FORM SELECIONA_ITENS_NFG

             ( itab_zycit100-vlseg

* << Fim da exclusão

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

             ( ( itab_zycit100-vlseg - itab_zycit003-vlseg_fat *

itab_zycit100-dttaxbem )

* << Fim da inclusão

             / itab_zycit003-qtd_iten ) +

* >> Início da exclusão: FORM SELECIONA_ITENS_NFG

             ( itab_zycit100-vlseg

* << Fim da exclusão

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

             ( ( itab_zycit100-vlseg - itab_zycit003-vlseg_fat *

itab_zycit100-dttaxbem )

* << Fim da inclusão

             / itab_zycit003-qtd_itend ).

          ENDIF.

        ENDIF.

      ELSE.

        MOVE wa_zycit042 TO itab_zycit042.

...