CE PLUS - Nota 001738
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Nota Fiscal
Data/Hora da Publicação: 14/07/2006 00:00:00
Data/Hora Última Alteração: 20/06/2011 12:44:11
Descrição da Nota: CRIAÇÃO A NOTA FISCAL GLOBAL POR FORA DO EMBARQUE
Sintoma
Ao tentar criar a nota fiscal Global por fora do embarque, preenchendo o campo Desembaraço com o
número da DI o sistema esta informando que a DI não existe mesmo que ela exista. O sistema preenche
o campo do seqüencial da DI automaticamente e quando retiramos a informação do número da DI o
sistema cria a nota normalmente.
Solução
Check das tabelas.
Versões Tratadas
6.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 01738 Data: 14/07/2006 Hora: 09:13:42
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 01738
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 6.0
Pacote : 00024
Agrupamento : 00122
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
CRIAÇÃO A NOTA FISCAL GLOBAL POR FORA DO EMBARQUE
----------------------------------------------------------------------------------------------------
Palavras Chave:
/PWS/ZYCIE085-NRSEQDI
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI016I01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI016I01
...
EXIT.
ENDIF.
IF itab_nrseqdi[] IS INITIAL.
SELECT SINGLE * FROM /pws/zycit085 INTO /pws/zycie085
WHERE nrdi IN itab_nrdi.
* >> Início da exclusão: MODULE USER_COMMAND_0001
IF sy-subrc = 0 AND /pws/zycie085-nrseqdi IS INITIAL.
* << Fim da exclusão
* >> Início da inclusão: MODULE USER_COMMAND_0001
IF sy-subrc = 0 AND NOT /pws/zycie085-nrseqdi IS INITIAL.
* << Fim da inclusão
itab_nrseqdi-sign = 'I'.
itab_nrseqdi-option = 'EQ'.
itab_nrseqdi-low = /pws/zycie085-nrseqdi.
APPEND itab_nrseqdi.
ELSE.
...
...
MESSAGE s015 WITH text-063.
EXIT.
ENDIF.
ELSEIF sy-tcode = '/PWS/ZYCI016_C'.
v_status_s = '1'.
* >> Início da exclusão: MODULE USER_COMMAND_0001
IF /pws/zycie085-nrdi IS INITIAL.
* << Fim da exclusão
SELECT SINGLE * FROM /pws/zycit041
WHERE nrseq IN itab_nrseqdi
AND cancel NE 'X'.
* >> Início da exclusão: MODULE USER_COMMAND_0001
ENDIF.
* << Fim da exclusão
IF sy-subrc EQ 0.
MESSAGE s015 WITH text-064.
EXIT.
ENDIF.
ELSEIF sy-tcode = '/PWS/ZYCI016_A'.
...