Sintoma

AO SALVAR DUAS NF REMESSA AO MESMO TEMPO, GRAVA O MESMO NÚMERO.

Solução

Verificar se número já foi utilizado ao salvar.

Informações Complementares

----------------------------------------------------------------------------------------------------

Nota Número 12386 Data: 20/07/2012 Hora: 14:43:05

----------------------------------------------------------------------------------------------------

----------------------------------------------------------------------------------------------------

Nota Número              : 12386

Categoria                : Erro de Programa

Prioridade               : Alta

Versão PW.CE             : 9.0

Pacote                   : 00001

Agrupamento              : 00121

----------------------------------------------------------------------------------------------------

Referência às notas relacionadas:

Número - Ordem - Versão - Pacote - Descrição Breve

----------------------------------------------------------------------------------------------------

AO SALVAR DUAS NF REMESSA AO MESMO TEMPO, GRAVA O MESMO NÚMERO.

----------------------------------------------------------------------------------------------------

Palavras Chave:

NF REMESSA - NÚMERO DUPLICADO

----------------------------------------------------------------------------------------------------

Objetos da nota:

REPS /PWS/MZYCI016F01

----------------------------------------------------------------------------------------------------

Modificações efetuadas em REPS /PWS/MZYCI016F01

...

        CLEAR /pws/zycie043-cancel.

        CLEAR: /pws/zycie043-belnr_mr1m, /pws/zycie043-mblnr_mb01,

                                         /pws/zycie043-belnr_f_51,

             /pws/zycie043-belnr_f_02, /pws/zycie043-statusp_mr1m,

           /pws/zycie043-statusp_mb01, /pws/zycie043-statusp_f_51,

                /pws/zycie043-statusp_f_02, /pws/zycie043-dt_mr1m,

                     /pws/zycie043-dt_mb01, /pws/zycie043-dt_f_51,

                                            /pws/zycie043-dt_f_02,

               /pws/zycie043-belnrf02seg, /pws/zycie043-dt_f02seg,

               /pws/zycie043-belnrf02fre, /pws/zycie043-dt_f02fre.

* >> Início da inclusão: FORM ATUALIZA_DADOS_NOTA_R

        PERFORM find_nrseqc_nfr.

* << Fim da inclusão

        MODIFY /pws/zycit043 FROM /pws/zycie043.

        MOVE-CORRESPONDING /pws/zycie043 TO /pws/zycit043.

        PERFORM carrega_log USING '/PWS/ZYCIT043' 'I'

                ' '  '/PWS/SAPMZYCI016' /pws/zycit043-nrseq.

* >> Início da exclusão: FORM ATUALIZA_DADOS_NOTA_R

        MODIFY itab_zycit044 TRANSPORTING docnum

* << Fim da exclusão

* >> Início da inclusão: FORM ATUALIZA_DADOS_NOTA_R

        itab_zycit044-nfremessa = /pws/zycie043-nfremessa.

        MODIFY itab_zycit044 TRANSPORTING nfremessa docnum

* << Fim da inclusão

                              nfnum series subser

          WHERE nrseqnf = itab_zycit044-nrseqnf

            AND nrseq     = itab_zycit044-nrseq

            AND nfglobal  = itab_zycit044-nfglobal

* >> Início da exclusão: FORM ATUALIZA_DADOS_NOTA_R

            AND nfremessa = itab_zycit044-nfremessa

* << Fim da exclusão

            AND ebeln     = itab_zycit044-ebeln

            AND ebelp     = itab_zycit044-ebelp

            AND tpnf      = itab_zycit044-tpnf.

...