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