CE PLUS - Nota 007211
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Fatura Mercadoria
Data/Hora da Publicação: 28/08/2008 00:00:00
Data/Hora Última Alteração: 03/02/2010 17:06:56
Descrição da Nota: NÃO LEVAR ZEROS NO ELEMENTO PEP DA FATURA DE MERCADORIAS
Sintoma
O Campo PEP no Cambio estava sendo preenchido com 00000000 automáticamente
Solução
Verificar se o campo esta vazio para preenche-lo
Versões Tratadas
7.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 07211 Data: 28/08/2008 Hora: 08:39:34
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 07211
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 7.0
Pacote : 00006
Agrupamento : 00062
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
NÃO LEVAR ZEROS NO ELEMENTO PEP DA FATURA DE MERCADORIAS
----------------------------------------------------------------------------------------------------
Palavras Chave:
ELEMENTO - PEP - FATURA - MERCADORIA
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI003F02
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI003F02
...
MOVE v_awkey TO /pws/zycbt124-nrfat .
MODIFY /pws/zycbt124 FROM /pws/zycbt124.
LOOP AT itab_zycbt035 WHERE bschl EQ '40'.
CLEAR /pws/zycbt141.
MOVE:
/pws/zycie006-nrseqre TO /pws/zycbt141-nrseq ,
itab_zycbt035-d_newko TO /pws/zycbt141-saknr1 ,
itab_zycbt035-d_kostl TO /pws/zycbt141-kostl ,
itab_zycbt035-d_prctr TO /pws/zycbt141-prctr ,
itab_zycbt035-aufnr TO /pws/zycbt141-aufnr ,
* >> Início da exclusão: FORM CRIA_REMESSA
/pws/zycie006-ps_psp_pnr TO /pws/zycbt141-ps_psp_pnr ,
/pws/zycie006-ps_psp_pnr TO /pws/zycbt141-ps_posid ,
* << Fim da exclusão
* >> Início da inclusão: FORM CRIA_REMESSA
/pws/zycie006-ps_psp_pnr TO /pws/zycbt141-ps_psp_pnr .
IF NOT /pws/zycie006-ps_psp_pnr IS INITIAL.
MOVE:
/pws/zycie006-ps_psp_pnr TO /pws/zycbt141-ps_posid .
ENDIF.
MOVE:
* << Fim da inclusão
itab_zycbt035-d_fipos TO /pws/zycbt141-fipos ,
itab_zycbt035-d_fictr TO /pws/zycbt141-fictr ,
itab_zycbt035-d_gsber TO /pws/zycbt141-gsber ,
text-175 TO /pws/zycbt141-tpimp ,
itab_zycbt035-wrbtr TO /pws/zycbt141-vlremessa .
MODIFY /pws/zycbt141 FROM /pws/zycbt141.
ENDLOOP.
ENDIF.
ENDIF.
ELSE.
...
...
MOVE v_awkey TO /pws/zycbt124-nrfat .
MODIFY /pws/zycbt124 FROM /pws/zycbt124.
LOOP AT itab_zycbt035 WHERE bschl EQ '40'.
CLEAR /pws/zycbt141.
MOVE:
itab_zycit132-nrseqre TO /pws/zycbt141-nrseq ,
itab_zycbt035-d_newko TO /pws/zycbt141-saknr1 ,
itab_zycbt035-d_kostl TO /pws/zycbt141-kostl ,
itab_zycbt035-d_prctr TO /pws/zycbt141-prctr ,
itab_zycbt035-aufnr TO /pws/zycbt141-aufnr ,
* >> Início da exclusão: FORM CRIA_REMESSA
/pws/zycie006-ps_psp_pnr TO /pws/zycbt141-ps_psp_pnr ,
/pws/zycie006-ps_psp_pnr TO /pws/zycbt141-ps_posid ,
* << Fim da exclusão
* >> Início da inclusão: FORM CRIA_REMESSA
/pws/zycie006-ps_psp_pnr TO /pws/zycbt141-ps_psp_pnr .
IF NOT /pws/zycie006-ps_psp_pnr IS INITIAL.
MOVE:
/pws/zycie006-ps_psp_pnr to /pws/zycbt141-ps_posid .
ENDIF.
MOVE:
* << Fim da inclusão
itab_zycbt035-d_fipos TO /pws/zycbt141-fipos ,
itab_zycbt035-d_fictr TO /pws/zycbt141-fictr ,
itab_zycbt035-d_gsber TO /pws/zycbt141-gsber ,
text-175 TO /pws/zycbt141-tpimp ,
itab_zycbt035-wrbtr TO /pws/zycbt141-vlremessa .
MODIFY /pws/zycbt141 FROM /pws/zycbt141.
ENDLOOP.
ENDIF.
ENDIF.
ENDIF.
...