[firebase-br] SP não executa ultimo loop no FOR SELECT

[Michel Mônaco]

Ela não executa nenhum dos dois updates (não tenho como testar no trabalho)
?

2008/10/13 Giovani Rochê <giovaniroche em msn.com>

>
> Bom dia.
>
> Tenho uma SP que percorre todos os registros de um FOR SELECT
> perfeitamente. O único problema é que no último registro ela não grava as
> alterações. Debuguei direto no BD e vi
> que ela percorre o ultimo registro perfeitamente porém não grava. O que
> pode ser isso?
>
> A SP é essa:
>
> SALDO = :VALOR;> FOR
> > SELECT CODIGO,SALDO FROM CONTA_A_RECEBER
> > WHERE STATUS = 0
> > AND VALOR > 0
> > AND COD_CLIENTE = :COD_CLIENTE
> > ORDER BY DATA_LANCAMENTO
> > INTO
> > :COD,:SUB
> > DO
> > BEGIN
> >
> > IF (:SALDO > 0) THEN
> > BEGIN
> >
> > IF (:SALDO < :SUB) THEN
> > BEGIN
> > NOVOVALOR = :SUB - :SALDO;
> > SALDO = 0;
> > END
> > IF (:SALDO > :SUB) THEN
> > BEGIN
> > NOVOVALOR = 0;
> > SALDO = :SALDO - :SUB;
> > END
> > IF (:SALDO = :SUB) THEN
> > BEGIN
> > NOVOVALOR = 0;
> > SALDO = 0;
> > END
> > UPDATE CONTA_A_RECEBER SET
> > SALDO = :NOVOVALOR
> > WHERE CODIGO = :COD;
> >
> > IF (:NOVOVALOR = 0) THEN
> > BEGIN
> > UPDATE CONTA_A_RECEBER SET
> > STATUS = 1,
> > DATA_PAGTO = CURRENT_DATE,
> > HORA_PAGTO = CURRENT_TIME
> > WHERE CODIGO = :COD;
> > END
> > END
> >
> > SUSPEND;
> > END> END;
>
> _________________________________________________________________
> Confira vídeos com notícias do NY Times, gols direto do Lance,
> videocassetadas e muito mais no MSN Video!
> http://video.msn.com/?mkt=pt-br
> ______________________________________________
> FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
> Para saber como gerenciar/excluir seu cadastro na lista, use:
> http://www.firebase.com.br/fb/artigo.php?id=1107
> Para consultar mensagens antigas: http://firebase.com.br/pesquisa
>