CE PLUS - Nota 002360
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Nota Fiscal
Data/Hora da Publicação: 31/10/2006 00:00:00
Data/Hora Última Alteração: 20/06/2011 13:34:47
Descrição da Nota: AO CRIAR NF GLOBAL E IMPRIMIR, NÃO GERA NFNUM PARA VISUALIZAÇÃO
Sintoma
quando crio uma nota fiscal global e a imprimo, o sistema não está gerando o número de seqüência -
campo NFNUM para visualização. Todavia, esse número de seqüência pode ser visualizado na J1B2.
Solução
Alterado o programa para atualizar numero de nf criada.
Versões Tratadas
6.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 02360 Data: 31/10/2006 Hora: 14:55:59
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 02360
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 6.0
Pacote : 00025
Agrupamento : 00138
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
01927 - 00001 - 6.0 - 00024 - PROGRAMA DE NF ESTÁ CONSUMINDO MUITA MEMÓRIA. PROBLEMAS DE PERFOR
----------------------------------------------------------------------------------------------------
AO CRIAR NF GLOBAL E IMPRIMIR, NÃO GERA NFNUM PARA VISUALIZAÇÃO
----------------------------------------------------------------------------------------------------
Palavras Chave:
NF GLOBAL - IMPRESSÃO DE NF - NFNUM - J1B2 - DOCUMENTO DE NF
----------------------------------------------------------------------------------------------------
Objetos da nota:
DYNP /PWS/SAPMZYCI016 0100
REPS /PWS/MZYCI016I01
REPS /PWS/MZYCI016O01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em DYNP /PWS/SAPMZYCI016 0100
process before output.
module:
"status_0100,
load_data_0100,
set_screen,
s0100_lines,
exit_tela.
loop at itab_zycit042 with control tc_itens_nfg
cursor tc_itens_nfg-current_line.
module carrega_zycie042.
module set_screen_tc_nfg.
endloop.
process after input.
loop at itab_zycit042.
module altera_itab_zycit042.
endloop.
module:
*<<inicio ajuste
user_command_0100,
atualiza_itab_zycit042,
**<<Fim ajuste
user_command_exit at exit-command.
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI016I01
...
itab_zycit042-nfnum = j_1bnfdoc-nfnum.
itab_zycit042-series = j_1bnfdoc-series.
itab_zycit042-subser = j_1bnfdoc-subser.
ENDIF.
MODIFY itab_zycit042 INDEX sy-tabix.
* >> Início da inclusão: MODULE ATUALIZA_ITAB_ZYCIT042
UPDATE /pws/zycit042 SET nfnum = itab_zycit042-nfnum
series = itab_zycit042-series
subser = itab_zycit042-subser.
where docnum = itab_zycit042-docnum.
* << Fim da inclusão
ENDLOOP.
ENDMODULE.
MODULE atualiza_itab_zycit044 INPUT.
LOOP AT itab_zycit044.
itab_zycit044-nrseqnf = /pws/zycie043-nrseq.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI016O01
...
sy-datum TO /pws/zycie041-dtincl.
IF NOT /pws/zycit085 IS INITIAL.
SELECT * FROM /pws/zycit100 INTO TABLE itab_zycit100
WHERE nrseqdi = /pws/zycit085-nrseqdi.
ENDIF.
* >> Início da exclusão: MODULE LOAD_DATA_0100
IF /pws/zycie041-nfexterna IS INITIAL AND v_ok = space.
* << Fim da exclusão
* >> Início da inclusão: MODULE LOAD_DATA_0100
IF /pws/zycie041-nfexterna IS INITIAL AND v_ok = space
and /pws/zycie041-docnum is initial.
* << Fim da inclusão
MOVE:
wa_zycit048-nfext TO /pws/zycie041-nfexterna.
ENDIF.
IF /pws/zycie041-nfglobal IS INITIAL.
PERFORM find_nrseqc.
...