CE PLUS - Nota 010243
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: DI
Data/Hora da Publicação: 07/06/2010 00:00:00
Data/Hora Última Alteração: 22/02/2011 14:09:52
Descrição da Nota: TRATAMENTO DO SEQUENCIAL AO CRIAR DUAS ANAS SIMULTANEAMENTE.
Sintoma
Ao criar mais de uma ANA e clicar no botão de salvar ao mesmo tempo o programa grava os registros
apenas para uma delas.
Solução
Ajustada gravação da ANA para alterar o numero sequencial caso o numero já tenha sido utilizado.
Versões Tratadas
8.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 10243 Data: 07/06/2010 Hora: 09:49:12
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 10243
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 8.0
Pacote : 00003
Agrupamento : 00026
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
09072 - 00001 - 8.0 - 00001 - VÁRIOS AJUSTES DE TRATAMENTO E VARIAÇÃO DA ANA - DI ARGENTINA
----------------------------------------------------------------------------------------------------
TRATAMENTO DO SEQUENCIAL AO CRIAR DUAS ANAS SIMULTANEAMENTE.
----------------------------------------------------------------------------------------------------
Palavras Chave:
ANA - GRAVAR - SIMULTANEAMENTE - CRIAR - SEQUENCIAL
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI059F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI059F01
...
/pws/zycie085-dttax
CHANGING /pws/zycie085-ukursseg.
IF /pws/zycie085-ukursfob IS INITIAL.
MESSAGE i015 WITH text-153.
EXIT.
ENDIF.
PERFORM visualiza_rateio.
IF v_resp NE 'S' AND NOT itab_zycit036[] IS INITIAL.
EXIT.
ENDIF.
* >> Início da exclusão: FORM SAVE_DATA
SELECT SINGLE * FROM /pws/zycit085 INTO /pws/zycit085 WHERE
nrseqdi = /pws/zycie085-nrseqdi.
IF sy-subrc NE 0.
PERFORM fill_criar.
ELSE.
* << Fim da exclusão
IF sy-tcode <> '/PWS/ZYCI059_C' AND sy-tcode <> '/PWS/ZYCI059_I'.
/pws/zycie085-dtusera = sy-datum.
/pws/zycie085-usernamea = sy-uname.
ELSEIF v_salvo NE 'X'.
v_salvo = 'X'.
PERFORM fill_nrseq.
* >> Início da inclusão: FORM SAVE_DATA
IF v_nrseq_ant NE /pws/zycie085-nrseqdi.
* << Fim da inclusão
MESSAGE i015 WITH text-013 /pws/zycie085-nrseqdi.
...