CE PLUS - Nota 006126
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Fatura Mercadoria
Data/Hora da Publicação: 07/03/2008 00:00:00
Data/Hora Última Alteração: 22/02/2011 16:11:37
Descrição da Nota: A FATURA ESTÁ APAGANDO O PESO DOS ITENS DO EMBARQUE
Sintoma
Ao tentar criar uma fatura de mercadoria com tipo de fabricante 1 ou 3 o programa esta limpando o
peso liquido dos itens do embarque.
Solução
Atualização do programa de fatura para que no momento de gerar as faturas com tipo de fabricante 1
ou 3 o sistema não apague o peso líquido do embarque e gere a fatura corretamente.
Versões Tratadas
7.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 06126 Data: 07/03/2008 Hora: 08:35:30
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 06126
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 7.0
Pacote : 00004
Agrupamento : 00037
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
03551 - 00001 - 7.0 - 00001 - ERROS NA FATURA AO UTILIZAR TIPOS DE FABRICANTE 0,2 E 3.
----------------------------------------------------------------------------------------------------
A FATURA ESTÁ APAGANDO O PESO DOS ITENS DO EMBARQUE
----------------------------------------------------------------------------------------------------
Palavras Chave:
FATURA - ITENS - PESO - EMBARQUE - APAGA
/PWS/SAPMZYCI003
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI003F02
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI003F02
...
/pws/zycie006-paisfab = lfa1-land1.
LOOP AT itab_zycit003.
itab_zycit003-fabric = '1'.
MODIFY itab_zycit003.
ENDLOOP.
LOOP AT itab_zycit003.
MOVE: /pws/zycie006-descfab TO itab_zycit003-descfab,
/pws/zycie006-lifnrfabr TO itab_zycit003-lifnrfabr,
/pws/zycie006-flagfabr TO itab_zycit003-flagfabr.
MOVE /pws/zycie006-paisfab TO itab_zycit003-paisfab.
* >> Início da exclusão: FORM TRATA_FABRICANTE
MODIFY: itab_zycit003, /pws/zycit003.
* << Fim da exclusão
* >> Início da inclusão: FORM TRATA_FABRICANTE
MODIFY: itab_zycit003.
UPDATE /pws/zycit003
SET descfab = itab_zycit003-descfab
lifnrfabr = itab_zycit003-lifnrfabr
flagfabr = itab_zycit003-flagfabr
paisfab = itab_zycit003-paisfab
WHERE nrseq EQ itab_zycit003-nrseq
AND ebeln EQ itab_zycit003-ebeln
AND ebelp EQ itab_zycit003-ebelp.
* << Fim da inclusão
ENDLOOP.
v_flag = 'X'.
ELSEIF /pws/zycie006-fabricante = '2'.
ELSEIF /pws/zycie006-fabricante = '3'.
v_flag = 'X'.
CLEAR: /pws/zycie006-descfab,
/pws/zycie006-paisfab ,
/pws/zycie006-lifnrfabr,
/pws/zycie006-flagfabr.
LOOP AT itab_zycit003.
itab_zycit003-fabric = '3'.
MODIFY itab_zycit003.
ENDLOOP.
LOOP AT itab_zycit003.
CLEAR: itab_zycit003-descfab,
itab_zycit003-lifnrfabr, itab_zycit003-flagfabr.
MOVE: '3' TO itab_zycit003-fabric.
* >> Início da exclusão: FORM TRATA_FABRICANTE
MODIFY: itab_zycit003,/pws/zycit003.
* << Fim da exclusão
* >> Início da inclusão: FORM TRATA_FABRICANTE
MODIFY: itab_zycit003.
UPDATE /pws/zycit003
SET descfab = itab_zycit003-descfab
lifnrfabr = itab_zycit003-lifnrfabr
flagfabr = itab_zycit003-flagfabr
paisfab = itab_zycit003-paisfab
WHERE nrseq EQ itab_zycit003-nrseq
AND ebeln EQ itab_zycit003-ebeln
AND ebelp EQ itab_zycit003-ebelp.
* << Fim da inclusão
ENDLOOP.
ENDIF.
SELECT SINGLE * FROM lfa1
WHERE lifnr EQ /pws/zycie006-lifnr.
LOOP AT itab_zycit003.
itab_zycit003-paquis = lfa1-land1.
IF NOT itab_zycit003-lifnrfabr IS INITIAL.
SELECT SINGLE land1 FROM lfa1
INTO itab_zycit003-porigem
WHERE lifnr EQ itab_zycit003-lifnrfabr.
...