Pessoal tenho um problema grave e espero que me ajudem.
Tenho uma aplica��o de vendas, em que um movimento de venda � registado e quatro tabelas diferentes, uma delas � onde fica registado o numerador das vendas (a aplica��o � usado por 4 pessoas em rede ). Normalmente funciona bem mas h� altura em que o select  na tabela de numeradores retorna nulo( mesmo existindo dados), fazendo com que o numerador retorne a 1,  misturando-se com os registos referentes a venda n�1 ja existente na tabela de movimentos, e um facto curioso � que o mesmo registo � repetido duas vezes na base de dados
 
Ex: Call SqlExist( 'Select * from numerador where tipodocumento=:cmbTipoDoc' , bExiste)
       If bExiste
             Call SqlImmediate( 'select num, ROWID from sysadm.NUMER  int  o :nNumero,    :sRowID where cod=:cmbTipoDoc  and FLAG IS NULL ' )
             Set nNumero=nNumero+1
             If SqlImmediate( 'update  sysadm.NUMER set  num=:nNumero where ROWID=:sRowID' )
 Call SqlClearImmediate(  )
        Else
              Set nNumero=nNumero+1 
              If SqlImmediate(  'insert into sysadm.NUMER (num,  cod, loja, posto ) values ( :nNumero, :cmbTipoDoc, :nLoja, :nTeste  )' )
 Call SqlClearImmediate(  )
Valdemiro Coimbra
 
* * * * * * * * * * * * * * * * * * * * * * * * * *
Mailto: vcoimbra@sistec.co.ao or valdemiro@netangola.com
Celular: 091 200607
Servi�o: 325350

Responder a