Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Nota Fiscal Remessa
Data/Hora da Publicação: 16/02/2009 00:00:00
Data/Hora Última Alteração: 23/02/2011 09:18:56
Descrição da Nota: PREENCHER NUMERO NO CABEÇALHO DA NOTA FISCAL REMESSA
Sintoma
Quando é dada saida na nota fiscal de remessa o numero da NF não esta sendo preenchido e ao acessar
a nota pelo pwce estas informações são preenchidas na tabela de itens da nota fiscal remessa
(/pws/zycit044) porém não atualiza o cabeçalho(/pws/zycit043).
Solução
Ajustado programa para atualizar o cabeçalho da nota fiscal de remessa (/pws/zycit043) no pwce assim
como é feito para os itens.
7.0
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 08063 Data: 16/02/2009 Hora: 16:48:01
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 08063
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 7.0
Pacote : 00008
Agrupamento : 00086
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
08004 - 00001 - 7.0 - 00008 - PREENCHER NUMERO, SÉRIE E SUBSÉRIE NO CABEÇALHO DA NOTA
----------------------------------------------------------------------------------------------------
PREENCHER NUMERO NO CABEÇALHO DA NOTA FISCAL REMESSA
----------------------------------------------------------------------------------------------------
Palavras Chave:
ATUALIZAR - ITENS - TABELA - NUMERO - NOTA - FISCAL - REMESSA
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI016F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI016F01
...
.
IF NOT /pws/zycie044-nfnum IS INITIAL.
UPDATE /pws/zycit044 SET nfnum = /pws/zycie044-nfnum
series = /pws/zycie044-series
WHERE nrseq = /pws/zycie044-nrseq AND
nrseqnf = /pws/zycie044-nrseqnf AND
ebeln = /pws/zycie044-ebeln AND
ebelp = /pws/zycie044-ebelp AND
nfglobal = /pws/zycie044-nfglobal AND
nfremessa = /pws/zycie044-nfremessa.
* >> Início da inclusão: FORM CARREGA_ZYCIE044
UPDATE /pws/zycit043 SET nfnum = /pws/zycie044-nfnum
series = /pws/zycie044-series
WHERE nrseq = /pws/zycie044-nrseqnf AND
nfglobal = /pws/zycie044-nfglobal AND
nfremessa = /pws/zycie044-nfremessa AND
docnum = itab_zycit044-docnum.
* << Fim da inclusão
ENDIF.
ENDFORM.
...