Módulo: DOC. IMPORTAÇÃO
Funcionalidade: DI
Data/Hora da Publicação: 03/04/2013 14:17:48
Data/Hora Última Alteração: 03/04/2013 14:17:48
Descrição da Nota: DESEMBARAÇO - DATA DA TAXA - DATA DE REGISTRO
Sintoma
tratamento que foi feito na DI para levar a Data da Taxa para a Data de Registro
não estava verificando o Flag da /PWS/ZYCIT000 Transmissão Siscomex.
Solução
Ajustado Programa para preencher a Data de Registro com a Data da Taxa somente se o Parâmetro
/PWS/ZYCIT000-SISCOMEX estiver em Branco.
9.0
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 12886 Data: 02/04/2013 Hora: 11:49:05
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 12886
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 9.0
Pacote : 00004
Agrupamento : 00151
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
12754 - 00001 - 9.0 - 00003 - PREENCHER O CAMPO DATA DE REGISTRO NA DI E ANA, CONFORME DATA DA
----------------------------------------------------------------------------------------------------
DESEMBARAÇO - DATA DA TAXA - DATA DE REGISTRO
----------------------------------------------------------------------------------------------------
Palavras Chave:
DI, DATA DE REGISTRO, DATA DA TAXA
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI059I01
REPS /PWS/MZYCI023I01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI059I01
...
MODIFY itab_zycit403_i INDEX tc_trib-current_line.
ENDMODULE.
MODULE clear_variavel INPUT.
CLEAR: /pws/zycie403-valorusdp, /pws/zycie403-valorusda,
/pws/zycie403-valorusdg,
v_totalusdp, v_totalusdg, v_totalusda,
v_totalusdtp, v_totalusdta, v_totalusdtg.
ENDMODULE.
MODULE busca_taxa INPUT.
MOVE 'X' TO v_mudou.
* >> Início da inclusão: MODULE BUSCA_TAXA
if /pws/zycit000-siscomex is initial.
* << Fim da inclusão
/pws/zycie085-dtreg = /pws/zycie085-dttax.
* >> Início da inclusão: MODULE BUSCA_TAXA
endif.
* << Fim da inclusão
ENDMODULE.
MODULE ajuste INPUT.
ENDMODULE.
MODULE verifica_nrdi INPUT.
PERFORM verifica_nrdi.
ENDMODULE.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI023I01
...
ENDMODULE.
MODULE load_pais INPUT.
PERFORM load_pais USING /pws/zycie085-land
CHANGING s_ppais s_pdesc.
ENDMODULE.
MODULE verifica_fatura INPUT.
IF itab_zycit006-frpagto EQ 'P' AND
NOT itab_zycit006-belnr_p IS INITIAL.
MESSAGE i015 WITH text-291 text-292.
ENDIF.
* >> Início da inclusão: MODULE VERIFICA_FATURA
if /pws/zycit000-siscomex is initial.
* << Fim da inclusão
/pws/zycie085-dtreg = /pws/zycie085-dttax.
* >> Início da inclusão: MODULE VERIFICA_FATURA
endif.
* << Fim da inclusão
ENDMODULE.
MODULE modi_data525 INPUT.
itab_zycit525-nrseqdi = /pws/zycie085-nrseqdi.
itab_zycit525-lacre = /pws/zycie525-lacre.
itab_zycit525-tpveiculo = /pws/zycie525-tpveiculo.
itab_zycit525-identif = /pws/zycie525-identif.
...