CE PLUS - Nota 012886

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.

 

Versões Tratadas

9.0


Pré-Requisitos

Produto:

Nota

Descrição

PREENCHER O CAMPO DATA DE REGISTRO NA DI E ANA, CONFORME DATA DA TAXA

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.

...