CE PLUS - Nota 003254
Módulo: DOC. EXPORTAÇÃO
Funcionalidade: Embarque
Data/Hora da Publicação: 15/03/2007 00:00:00
Data/Hora Última Alteração: 03/03/2010 13:06:27
Descrição da Nota: PESO LIQUIDO DO ITEM VAZIO PARA EMBARQUE COM PARTIÇÃO DE LOTE
Sintoma
Peso liquido (/pws/zycet002-ntgew) do item pai da partição de lote vazio para situações em que na
tabela vbrp não há valor para o peso liquido do item pai da partição. Ao gerar RE, ocorre DUMP no
programa /PWS/ZYCER052, ao utilizar o valor do campo vazio para processar divisão por zero.
Solução
Inclusão de tratamento para atualizar os campos /pws/zycet002-ntgew e /pws/zycet002-brgew quando há
partição de lote e quando o campo /pws/zycet002-fkimg (quantidade faturada) é diferente de zero.
Versões Tratadas
6.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 03254 Data: 15/03/2007 Hora: 09:51:20
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 03254
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 6.0
Pacote : 00026
Agrupamento : 00156
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
PESO LIQUIDO DO ITEM VAZIO PARA EMBARQUE COM PARTIÇÃO DE LOTE
----------------------------------------------------------------------------------------------------
Palavras Chave:
EMBARQUE, PARTIÇÃO, LOTE, PESO LIQUIDO, NTGEW, DUMP,
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCE003F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCE003F01
...
itab_vbrk-kurrf TO itab_zycet002-kurrf,
itab_vbrk-zterm TO itab_zycet002-zterm,
itab_vbrk-ktgrd TO itab_zycet002-ktgrd,
itab_vbrk-land1 TO itab_zycet002-land1,
itab_vbrk-bukrs TO itab_zycet002-bukrs,
itab_vbrk-kunag TO itab_zycet002-kunag,
itab_vbrk-kunrg TO itab_zycet002-kunrg,
itab_vbrk-vkorg TO itab_zycet002-vkorg,
itab_vbrk-fksto TO itab_zycet002-fksto,
itab_vbrk-xblnr TO itab_zycet002-xblnr.
* >> Início da inclusão: FORM MOVE_DADOS_SAP_PARA_ITENS
IF itab_vbrp-fkimg <> '0' AND
itab_vbrp-ntgew IS INITIAL AND
itab_zycet002-posnl LT 900000.
READ TABLE itab_lips WITH KEY vbeln = itab_zycet002-vbeln_vl
posnr = itab_zycet002-posnl
xchpf = 'X'
BINARY SEARCH.
IF sy-subrc IS INITIAL.
MOVE: itab_lips-kcntgew TO itab_zycet002-ntgew,
itab_lips-kcbrgew TO itab_zycet002-brgew.
ENDIF.
ELSE.
MOVE: itab_vbrp-brgew TO itab_zycet002-brgew,
itab_vbrp-ntgew TO itab_zycet002-ntgew.
ENDIF.
* << Fim da inclusão
MOVE: itab_vbrp-ktgrm TO itab_zycet002-ktgrm,
itab_vbrp-shkzg TO itab_zycet002-shkzg,
itab_vbrp-fkimg TO itab_zycet002-fkimg,
* >> Início da exclusão: FORM MOVE_DADOS_SAP_PARA_ITENS
itab_vbrp-vrkme TO itab_zycet002-vrkme,
itab_vbrp-brgew TO itab_zycet002-brgew,
itab_vbrp-ntgew TO itab_zycet002-ntgew.
* << Fim da exclusão
* >> Início da inclusão: FORM MOVE_DADOS_SAP_PARA_ITENS
itab_vbrp-vrkme TO itab_zycet002-vrkme.
* << Fim da inclusão
MOVE: itab_vbrp-vtweg_auft TO itab_zycet002-vtweg_auft,
itab_vbrp-vkorg_auft TO itab_zycet002-vkorg_auft.
READ TABLE itab_j_1bnflin
WITH KEY refkey = itab_zycet002-vbeln_vf
reftyp = 'BI'.
IF sy-subrc EQ 0.
READ TABLE itab_j_1bnfdoc
WITH KEY docnum = itab_j_1bnflin-docnum.
IF sy-subrc EQ 0.
itab_zycet002-docnum = itab_j_1bnfdoc-docnum.
...