Valeu de certo!!!
----- Original Message -----
Sent: Wednesday, October 10, 2001 12:19 PM
Subject: Re: [sqlwin] conversor

Desculpe, desconsidere o anterior

este � o correto
Call SqlPrepareAndExecute(hSql,' Select cod , qtd from estoque into :scod, :nqtd ')
While SqlFetchNext(hSql,nRetorno)
    If scod != '1001CO050'
          Call SqlImmediate('Update PRODUTO set SALDO = :nqtd where COD = :scod')

Ricardo Oliveira wrote:

Que pena que o SQLBASE N�O FAZ ESTE TIPO DE TRANSA��O !!!! Pelo pre�o que paguei achei que fizesse isto como tamb�m n�o tive sucesso em TRIGGER e PROCEDURES pois � pura Ilus�o... Estou tentando fazer um conversor com o WHILE: Call SqlImmediate('Select cod from estoque
  into :scod1')
While scod1 != '1001CO050'
 Call SqlImmediate('Select qtd, cod from estoque
   into :nqtd, :scod')
 Call SqlImmediate('Update PRODUTO set SALDO
   = :nqtd where COD = :scod')Mas tem um problema a vari�vel sempre tem o mesmo valor como devo proceder???

Responder a