CE PLUS - Nota 004442
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Fatura Mercadoria
Data/Hora da Publicação: 17/08/2007 00:00:00
Data/Hora Última Alteração: 22/02/2011 16:08:15
Descrição da Nota: PESO DO ITEM DE SERVIÇO ERRADO
Sintoma
Ao contabilizar a fatura de serviço o Pw.CE está se perdendo ao salvar o peso do item no embarque
Solução
Foi ajustada a gravação da tabelas ZYCIT006 ( Fatura )
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 04442 Data: 17/08/2007 Hora: 10:19:54
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 04442
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 7.0
Pacote : 00002
Agrupamento : 00008
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
04206 - 00001 - 7.0 - 00002 - CRIAÇÃO DA FATURA DE SERVIÇO
----------------------------------------------------------------------------------------------------
PESO DO ITEM DE SERVIÇO ERRADO
----------------------------------------------------------------------------------------------------
Palavras Chave:
PESO ITEM SERVIÇO ZYCIT263 ELIMINADA
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI003F02
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI003F02
...
IF NOT /pws/zycie006-vlmerc IS INITIAL.
IF /pws/zycie006-nrseqre IS INITIAL.
PERFORM busca_sequencialre.
INSERT /pws/zycbt124 .
WHILE sy-subrc NE 0.
PERFORM busca_sequencialre.
ENDWHILE.
/pws/zycie006-nrseqre = /pws/zycbt124-nrseq.
v_count = /pws/zycbt124-nrseq+1(9).
CONCATENATE v_count 'I' INTO /pws/zycie006-nrseq_pgfat.
* >> Início da inclusão: FORM CRIA_REMESSA
modify /pws/zycit006 from /pws/zycie006.
* << Fim da inclusão
ELSE.
SELECT SINGLE * FROM /pws/zycbt124
WHERE nrseq = /pws/zycie006-nrseqre.
ENDIF.
READ TABLE itab_zycit003 INDEX 1.
IF NOT /pws/zycie006-belnr_p IS INITIAL.
READ TABLE itab_zycbe033 INDEX 1.
MOVE:
/pws/zycie006-nrfat TO /pws/zycbt124-nrfech ,
/pws/zycie006-bukrs TO /pws/zycbt124-bukrs ,
...
...
IF itab_zycit132-nrseqre IS INITIAL.
PERFORM busca_sequencialre.
INSERT /pws/zycbt124 .
WHILE sy-subrc NE 0.
PERFORM busca_sequencialre.
ENDWHILE.
itab_zycit132-nrseqre = /pws/zycbt124-nrseq.
v_count = /pws/zycbt124-nrseq+1(9).
CONCATENATE v_count 'I' INTO /pws/zycie006-nrseq_pgfat.
CONCATENATE v_count 'I' INTO itab_zycit132-nrseq_pgfat.
* >> Início da inclusão: FORM CRIA_REMESSA
modify /pws/zycit006 from /pws/zycie006.
* << Fim da inclusão
ELSE.
SELECT SINGLE * FROM /pws/zycbt124
WHERE nrseq = itab_zycit132-nrseqre.
ENDIF.
READ TABLE itab_zycit003 INDEX 1.
IF NOT itab_zycit132-belnr_p IS INITIAL.
READ TABLE itab_zycbe033 INDEX 1.
MOVE:
/pws/zycie006-nrfat TO /pws/zycbt124-nrfech ,
/pws/zycie006-bukrs TO /pws/zycbt124-bukrs ,
...