CE PLUS - Nota 014238
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Nota Fiscal Remessa
Data/Hora da Publicação: 01/10/2014 13:56:59
Data/Hora Última Alteração: 01/10/2014 13:56:59
Descrição da Nota: ERRO AO GERAR MAIS DE UMA NOTA FISCAL DE REMESSA SIMULTANEAMENTE
Sintoma
Ao criar 2 notas de remessa simultaneamente ocorre de uma delas ser gerada no SAP porém não é
gravada nas tabelas do PWCE.
Solução
Ajustado programa para não gerar novo sequencial no retorno do batch-input.
Versões Tratadas
9.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 14238 Data: 01/10/2014 Hora: 13:35:43
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 14238
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 9.0
Pacote : 00008
Agrupamento : 00175
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote Descrição Breve
12445 - 00001 - 9.0 - 00001 - ERRO NA CRIAÇÃO DA NFR COM DOIS ITENS IGUAIS
----------------------------------------------------------------------------------------------------
Texto Rápido:
ERRO AO GERAR MAIS DE UMA NOTA FISCAL DE REMESSA SIMULTANEAMENTE
----------------------------------------------------------------------------------------------------
Palavras Chave:
ERRO - NOTA - FISCAL - REMESSA - CRIAR - SIMULTANEO - NUMERO
/PWS/SAPMZYCI016
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI016F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI016F01
...
v_modo = v_modo_bi
TABLES
t_dados = it_zycee005
t_itens = it_zycee007
t_campos = it_zycet004
t_zycet005 = it_zycet005
t_message = it_zycee006
EXCEPTIONS
campo_em_branco = 1
OTHERS = 2.
* >> Início da exclusão: FORM FILL_DATA_J1B1_R
PERFORM find_nrseqc_nfr.
* << Fim da exclusão
LOOP AT itab_zycit044.
PERFORM atualiza_dados_nota_r.
ENDLOOP.
LOOP AT it_erro.
MESSAGE i015 WITH it_erro-msg+0(50)
it_erro-msg+50(50).
ENDLOOP.
CLEAR: it_erro[].
REFRESH: it_erro[].
ELSE.
* >> Início da exclusão: FORM FILL_DATA_J1B1_R
PERFORM find_nrseqc_nfr.
* << Fim da exclusão
LOOP AT itab_zycit044.
PERFORM atualiza_dados_nota_r.
ENDLOOP.
LOOP AT it_erro.
MESSAGE i015 WITH it_erro-msg+0(50)
it_erro-msg+50(50).
ENDLOOP.
CLEAR: it_erro[].
REFRESH: it_erro[].
ENDIF.
ELSE.
* >> Início da exclusão: FORM FILL_DATA_J1B1_R
PERFORM find_nrseqc_nfr.
* << Fim da exclusão
LOOP AT itab_zycit044.
PERFORM atualiza_dados_nota_r.
ENDLOOP.
LOOP AT it_erro.
MESSAGE i015 WITH it_erro-msg+0(50)
it_erro-msg+50(50).
ENDLOOP.
CLEAR: it_erro[].
REFRESH: it_erro[].
ENDIF.
...