Módulo: DOC. EXPORTAÇÃO
Funcionalidade: Declaração de Origem
Data/Hora da Publicação: 31/01/2006 00:00:00
Data/Hora Última Alteração: 21/02/2011 14:40:16
Descrição da Nota: AJUSTES NO DESENVOLVIMENTO DE CONSISTÊNCIAS PARA ACORDO ACE59
Sintoma
O desenvolvimento para o acordo ACE59 gerou erros de consistência nos demais acordos.
Solução
Os pontos ajustados foram:
- O programa checa se há matéria prima importada, porém agora checa das duas abas do programa
referentes às matérias-primas importadas (Estados Partes e Terceiros Países);
- O programa limpa o campo de Regra da Origem na terceira consistência, caso nenhum dos NCMs dos
produtos finais sejam iguais aos NCM de qualquer matéria-prima referente aos Terceiros Países.
6.0
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 00753 Data: 31/01/2006 Hora: 09:05:03
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 00753
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 6.0
Pacote : 00022
Agrupamento : 00098
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
00566 - 00001 - 6.0 - 00022 - DESENVOLVIMENTO DE CONSISTÊNCIAS PARA ACORDO ACE59
----------------------------------------------------------------------------------------------------
AJUSTES NO DESENVOLVIMENTO DE CONSISTÊNCIAS PARA ACORDO ACE59
----------------------------------------------------------------------------------------------------
Palavras Chave:
ACE59; ACORDO; CONSISTÊNCIAS; DESENVOLVIMENTO; AJUSTES
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCE042F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCE042F01
...
ENDIF.
ENDFORM.
FORM composicao_regra_origem USING p_flag.
DATA v_ok TYPE c.
READ TABLE itab_zycet279 INDEX 1.
* >> Início da exclusão: FORM COMPOSICAO_REGRA_ORIGEM
IF itab_zycet276[] IS INITIAL.
* << Fim da exclusão
* >> Início da inclusão: FORM COMPOSICAO_REGRA_ORIGEM
IF itab_zycet276[] IS INITIAL AND
itab_zycet277[] IS INITIAL .
* << Fim da inclusão
itab_zycet279-descricao = 'Anexo IV, artigo 3, letra "i"'(039).
IF NOT itab_zycet279[] IS INITIAL.
MODIFY itab_zycet279 INDEX 1.
ELSE.
APPEND itab_zycet279.
...
...
ENDIF.
ELSE.
CLEAR v_ok.
LOOP AT itab_zycet277.
READ TABLE itab_zycet274 INDEX sy-tabix.
* >> Início da exclusão: FORM COMPOSICAO_REGRA_ORIGEM
CHECK itab_zycet277-steuc(4) EQ itab_zycet274-steuc(4) AND
itab_zycet277-perfinal <= 40.
* << Fim da exclusão
* >> Início da inclusão: FORM COMPOSICAO_REGRA_ORIGEM
CHECK itab_zycet277-steuc(4) EQ itab_zycet274-steuc(4).
v_ok = 'Y'.
CHECK itab_zycet277-perfinal <= 40.
* << Fim da inclusão
v_ok = 'X'.
ENDLOOP.
* >> Início da exclusão: FORM COMPOSICAO_REGRA_ORIGEM
IF v_ok IS INITIAL.
* << Fim da exclusão
* >> Início da inclusão: FORM COMPOSICAO_REGRA_ORIGEM
IF v_ok IS INITIAL OR
v_ok EQ 'Y'.
* << Fim da inclusão
* >> Início da exclusão: FORM COMPOSICAO_REGRA_ORIGEM
IF p_flag IS INITIAL.
* << Fim da exclusão
* >> Início da inclusão: FORM COMPOSICAO_REGRA_ORIGEM
IF p_flag IS INITIAL AND
v_ok EQ 'Y'.
* << Fim da inclusão
MESSAGE w016 WITH text-044 text-046.
ENDIF.
CLEAR itab_zycet279-descricao.
CHECK NOT itab_zycet279[] IS INITIAL.
MODIFY itab_zycet279 INDEX 1.
...