Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Nota Fiscal
Data/Hora da Publicação: 31/08/2007 00:00:00
Data/Hora Última Alteração: 09/03/2010 10:27:18
Descrição da Nota: NOTA FISCAL DE REMESSA ICMS DIFERIDO SUSPENSÃO
Sintoma
Quando criamos uma nota fiscal de remessa com o ICMS diferido e logo em seguida criamos uma nota
fiscal de remessa com o ICMS suspenso, o programa esta gravando o ICMS da segunda nota como
diferido.
Solução
Adicionado um clear na variavel.
7.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 04590 Data: 31/08/2007 Hora: 16:24:51
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 04590
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 7.0
Pacote : 00003
Agrupamento : 00013
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
NOTA FISCAL DE REMESSA ICMS DIFERIDO SUSPENSÃO
----------------------------------------------------------------------------------------------------
Palavras Chave:
NOTA FISCAL DE REMESSA ICMS DIFERIDO SUSPENSÃO
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI016F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI016F01
...
v_cont = v_cont + 1.
it_zycee006-indice = v_cont.
WRITE v_icms_nfr_1 CURRENCY itab_zycit100-waersbem
TO v_icms_nfr.
CONCATENATE text-088 v_icms_nfr
INTO it_zycee006-msg SEPARATED BY space.
APPEND it_zycee006.
ENDIF.
IF v_dif = 'X'.
it_zycee006-msg = text-097 .
* >> Início da inclusão: FORM MENSAGENS_NF_R
CLEAR v_dif.
* << Fim da inclusão
v_cont = v_cont + 1.
it_zycee006-indice = v_cont.
APPEND it_zycee006.
ENDIF.
ENDIF.
SELECT SINGLE *
FROM /pws/zyglt369
INTO wa_zyglt369
WHERE bukrs EQ /pws/zycit085-bukrs
AND branch EQ /pws/zycit085-j_1bbranch
...