CE PLUS - Nota 005438
Módulo: DRAWBACK
Funcionalidade: Ato Concessório
Data/Hora da Publicação: 12/12/2007 00:00:00
Data/Hora Última Alteração: 17/02/2011 15:18:16
Descrição da Nota: DATA DO ATO CONCESSÓRIO ISENÇÃO
Sintoma
O programa esta apagando a data informada.
Solução
Atualização do programa para aceitar a data informada manualmente.
Versões Tratadas
7.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 05438 Data: 12/12/2007 Hora: 13:02:05
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 05438
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 7.0
Pacote : 00003
Agrupamento : 00026
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
05139 - 00001 - 7.0 - 00003 - ATUALIZAÇÃO DO PREENCHIMENTO DO CAMPO 'DATA AC'
----------------------------------------------------------------------------------------------------
DATA DO ATO CONCESSÓRIO ISENÇÃO
----------------------------------------------------------------------------------------------------
Palavras Chave:
DATA DO ATO CONCESSÓRIO ISENÇÃO DRAWBACK
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI040F02
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI040F02
...
SORT itab_data_di BY data.
READ TABLE itab_data_di INDEX 1.
/pws/zycie244-dtdi = itab_data_di-data.
IF /pws/zycie244-vcto_fn IS INITIAL.
/pws/zycie244-vcto_fn = /pws/zycie244-dtdi + 731.
UPDATE /pws/zycit244 SET dtdi = /pws/zycie244-dtdi
vcto_fn = /pws/zycie244-vcto_fn
WHERE nrseqd EQ /pws/zycie244-nrseqd.
ENDIF.
ENDIF.
* >> Início da exclusão: FORM CARREGA_TABELA279
ELSE.
IF itab_data_di[] IS INITIAL.
CLEAR: /pws/zycie244-dtdi, /pws/zycie244-vcto_fn.
ENDIF.
* << Fim da exclusão
ENDIF.
ENDFORM.
FORM monta_transf.
REFRESH itab_zycit279_ap_aux.
CLEAR itab_zycit279_ap.
MODIFY itab_zycit279_ap TRANSPORTING mark
WHERE mark EQ 'X'.
IF /pws/zycie244-tipo NE 'G'.
READ TABLE itab_zycit246_final WITH KEY
matnr = itab_resumo_ap-matnr.
...