CE PLUS - Nota 010041
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Nota Fiscal
Data/Hora da Publicação: 06/04/2010 00:00:00
Data/Hora Última Alteração: 23/02/2011 09:23:28
Descrição da Nota: NÃO PREENCHER II NAS MENSAGENS DA NOTA FISCAL QUANDO NÃO POSSUIR VALOR
Sintoma
O programa de nota fiscal está informando valor de II nas mensagens da nota fiscal mesmo não
existindo II para o processo.
Solução
Ajustado programa para limpar o cabeçalho da tabela interna antes de buscar o valor de II.
Versões Tratadas
8.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 10041 Data: 06/04/2010 Hora: 16:31:31
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 10041
Categoria : Erro de Programa
Prioridade : Baixa
Versão PW.CE : 8.0
Pacote : 00003
Agrupamento : 00016
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
08940 - 00001 - 7.0 - 00010 - DETALHE DAS MENSAGENS DA NF NÃO BATE COM O TOTAL DAS DESPESAS NF
----------------------------------------------------------------------------------------------------
NÃO PREENCHER II NAS MENSAGENS DA NOTA FISCAL QUANDO NÃO POSSUIR VALOR
----------------------------------------------------------------------------------------------------
Palavras Chave:
II - MENSAGENS - NOTA - FISCAL - GLOBAL - VALOR - ZERO - DI
/PWS/SAPMZYCI016
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI016F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI016F01
...
ENDIF.
v_tamanho = '.............................................'.
CLEAR:v_valor_r.
LOOP AT itab_zycit042_mark.
READ TABLE itab_zycit100 WITH KEY
nrseq = itab_zycit042_mark-nrseq
ebeln = itab_zycit042_mark-ebeln
ebelp = itab_zycit042_mark-ebelp .
IF sy-subrc EQ 0 AND itab_zycit100-codregtri NE '3' AND
itab_zycit100-codregtri NE '5'.
* >> Início da inclusão: FORM MENSAGENS_NF
CLEAR: itab_zycit036.
* << Fim da inclusão
READ TABLE itab_zycit036 WITH KEY
nrseq = itab_zycit042_mark-nrseq
ebeln = itab_zycit042_mark-ebeln
ebelp = itab_zycit042_mark-ebelp
codigo = 'II'.
v_valor_r = v_valor_r + itab_zycit036-vlreal.
ENDIF.
READ TABLE itab_zycit003 WITH KEY nrseq = itab_zycit042_mark-nrseq
ebeln = itab_zycit042_mark-ebeln
ebelp = itab_zycit042_mark-ebelp.
...