Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Embarque
Data/Hora da Publicação: 24/11/2006 00:00:00
Data/Hora Última Alteração: 20/06/2011 13:32:53
Descrição da Nota: TRATAMENTO NO EMBARQUE DE MATERIAL + SERVIÇO E BL VINCULADO
Sintoma
Quando o embarque for material + serviço, modalidade 03, o peso bruto do b/l não pode considerar o
peso do item de serviço. E quando existir apenas fatura de serviço (11), deixar estornar o b/l.
Solução
Não considerar itens de serviço antes de estornar o BL e calcular o peso bruto .
6.0
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 02511 Data: 24/11/2006 Hora: 14:10:49
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 02511
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 6.0
Pacote : 00025
Agrupamento : 00141
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
01940 - 00001 - 6.0 - 00024 - PERFORMANCE DA TRANSAÇÃO /PWS/ZYCI001_A ESTÁ CONSUMINDO MUITA MEM
----------------------------------------------------------------------------------------------------
TRATAMENTO NO EMBARQUE DE MATERIAL + SERVIÇO E BL VINCULADO
----------------------------------------------------------------------------------------------------
Palavras Chave:
EMBARQUE DE MATERIAL + SERVIÇO - BL - PESO BRUTO - FATURA DE SERVIÇO
ESTORNAR BL
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI001F01
REPS /PWS/MZYCI002F02
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI001F01
...
SELECT SINGLE * FROM /pws/zycit093
WHERE nrseqce = /pws/zycit094-nrseqce.
ENDIF.
IF NOT /pws/zycit093 IS INITIAL.
CLEAR v_tot_ntgew.
* >> Início da exclusão: FORM VERIFICA_ITENS
LOOP AT itab_zycit003.
* << Fim da exclusão
* >> Início da inclusão: FORM VERIFICA_ITENS
LOOP AT itab_zycit003 where servico is initial.
* << Fim da inclusão
v_tot_ntgew = v_tot_ntgew + itab_zycit003-ntgew.
ENDLOOP.
IF v_tot_ntgew > /pws/zycit093-brgew.
MESSAGE w015 WITH text-045.
ENDIF.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI002F02
...
MESSAGE s061 WITH text-025 text-026 wa_zycie085_del-nrseqdi.
EXIT.
ELSE.
SELECT SINGLE * FROM /pws/zycit006
WHERE nrseqce = /pws/zycie093-nrseqce AND
* >> Início da exclusão: FORM TRATA_BOTAO_DELE
eliminado = space.
* << Fim da exclusão
* >> Início da inclusão: FORM TRATA_BOTAO_DELE
eliminado = space
and tpfatura ne '11'.
* << Fim da inclusão
IF sy-subrc = 0.
MESSAGE s061 WITH text-025 text-102.
EXIT.
ELSE.
CALL FUNCTION 'POPUP_TO_CONFIRM'
...