Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Nota Fiscal
Data/Hora da Publicação: 14/11/2007 00:00:00
Data/Hora Última Alteração: 23/02/2011 09:15:45
Descrição da Nota: NOTA FISCAL - MENSAGEM DE IMPOSTO DE IMPORTAÇÂO - II
Sintoma
Não está lançando o imposto de importação no campo observações da Nota
Solução
Foi ajustada a consistência de mensagens na Nota Fiscal
7.0
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 05232 Data: 14/11/2007 Hora: 15:58:28
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 05232
Categoria : Erro de Programa
Prioridade : Baixa
Versão PW.CE : 7.0
Pacote : 00003
Agrupamento : 00021
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
02295 - 00001 - 6.0 - 00025 - AJUSTE PARA LEVAR O VALOR DE II NAS MENSAGENS DA NOTA FISCAL
----------------------------------------------------------------------------------------------------
NOTA FISCAL - MENSAGEM DE IMPOSTO DE IMPORTAÇÂO - II
----------------------------------------------------------------------------------------------------
Palavras Chave:
NOTA FISCAL - MENSAGEM DE IMPOSTO DE IMPORTAÇÂO - II
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI016F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI016F01
...
APPEND it_zycee006.
ELSE.
IF itab_zycit048_m-text2 IS INITIAL.
EXIT.
ENDIF.
ENDIF.
ENDIF.
ENDIF.
ENDIF.
v_tamanho = '.............................................'.
* >> Início da exclusão: FORM MENSAGENS_NF
v_ind = v_cont + 1.
* << Fim da exclusão
CLEAR:v_valor_r.
LOOP AT itab_zycit042_mark.
READ TABLE itab_zycit100 WITH KEY
nrseq = itab_zycit042_mark-nrseq
ebeln = itab_zycit042_mark-ebeln
ebelp = itab_zycit042_mark-ebelp .
IF sy-subrc EQ 0 AND itab_zycit100-codregtri NE '3' AND
itab_zycit100-codregtri NE '5'.
v_valor_r = v_valor_r + itab_zycit100-vlii.
ENDIF.
...
...
ebeln = itab_zycit042_mark-ebeln
ebelp = itab_zycit042_mark-ebelp.
MOVE itab_zycit003 TO itab_zycit003_mark.
APPEND itab_zycit003_mark.
ENDLOOP.
v_tamanho = '................'.
CLEAR v_vldp_x.
IF NOT v_valor_r IS INITIAL.
MOVE : v_valor_r TO itab_zycit049_aux_r-vldp,
itab_zycit049_aux_r-vldp TO v_vldp_x.
* >> Início da inclusão: FORM MENSAGENS_NF
v_cont = v_cont + 1.
it_zycee006-indice = v_cont.
* << Fim da inclusão
CONCATENATE text-057 v_tamanho v_vldp_x
INTO it_zycee006-msg SEPARATED BY space.
APPEND it_zycee006.
ENDIF.
v_tamanho = '.............................................'.
* >> Início da inclusão: FORM MENSAGENS_NF
v_ind = v_cont + 1.
* << Fim da inclusão
CLEAR: itab_zycit019, itab_zycit020, itab_zycit039.
REFRESH: itab_zycit019, itab_zycit020, itab_zycit039.
...