[sqlwin] controle de =?iso-8859-1?b?Y29uY29ycupuY2lh?= SQL SERVER

Fri, 13 May 2005 14:20:09 -0700 

Amigos,
estou com um problema no sistema, quando dois usu�rios baixam um cheque ao mesmo
tempo. Estou utilizando  o banco SQL SERVER.
Se algu�m tiver um exemplo, eu ficaria grato.
Vou colocar o c�digo q estou utilizando, pois algu�m pode descobrir o q estou
fazendo de errado ou se est� faltando alguma coisa.
O c�digo � o seguinte:
######################################################################
Set sSql = '
                DECLARE C_MAXIMO CURSOR FOR
                SELECT  maximo
                FROM ' || sTabela || '  FOR UPDATE
                OPEN C_MAXIMO
                FETCH NEXT FROM C_MAXIMO '
Call SqlPrepareAndExecute( hSqlGeral, sSql )

Set sSql = 'Select maximo from ' || sTabela || ' into :nMax'
Call SqlPrepareAndExecute( hSqlGeral, sSql )
Call SqlFetchNext( hSqlGeral, nErro )

Set sSql = '
                BEGIN
                        UPDATE ' || sTabela || '
                        SET maximo = maximo + 1
                END

                CLOSE C_MAXIMO
                DEALLOCATE C_MAXIMO '
Call SqlPrepareAndExecute( hSqlGeral, sSql )
################################################################

Grato.
==============================================
Lista de Centura SQLWindows
Administrador : [EMAIL PROTECTED]
[ http://www.centuraexplorer.com ]
Para sair desta lista mande mensagem para:
[EMAIL PROTECTED] sem nada no Subject e
com o comando a seguir no corpo da msg:
"unsubscribe sqlwin" (sem as aspas)
==============================================

Responder a