[firebase-br] Ajuda com sp (iniciante)

[Wayder Loyola]

2008/8/10 Danilo Miranda <danilomibr em gmail.com>

> Olá,  parece que está faltando um SUSPEND na sua proc.
>
> BEGIN
>   vvlr_total = 0;
>   FOR SELECT CXA_CODIGO,CTA_CODIGO,CRDB,VALOR_CR,VALOR_DB
>       FROM   MOVCXA
>       INTO   :vcxa_codigo,:vcta_codigo,:vcrdb,:vvalor_cr,:vvalor_db
>   DO BEGIN
>       SELECT cta_codigo
>       FROM   Tmp_RecDesp
>       WHERE  Cxa_Codigo = :vcxa_codigo  and
>              Cta_Codigo = :vcta_codigo
>       ORDER BY Cxa_Codigo,Cta_Codigo
>       INTO   :vctacxa;
>       if (:vcrdb = 'C') then begin
>           vvlr_total  = :vvalor_cr;
>       end
>       if(:vcrdb = 'D') then begin
>           vvlr_total  = :vvalor_db;
>       end
>       if (:vctacxa is null) then begin
>           INSERT INTO TMP_RECDESP
> VALUES(:vcxa_codigo,:vcta_codigo,'',:vcrdb,:vvlr_total);
>       end
>       UPDATE tmp_recdesp SET
>             VLR_TOTAL  = VLR_TOTAL + :vvlr_total
>       WHERE CXA_CODIGO = :vcxa_codigo
>       AND   CTA_CODIGO = :vCta_codigo;
>
> suspend; --AQUI O SUSPEND.
>
>   END
> END
>
> Abraços
>
> --
> Atenciosamente
>
> Danilo Miranda
> http://www.danilomiranda.com.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
>


Danilo,

Esta procedure naum estah funcionando corretamente, pode me ajudar a
resolver ? segue as tabelas...


MOVCXA

CXA_CODIGO CTA_CODIGO CRDB VALOR_CR VALOR_DB
01                  03                  C         10,00
01                  03                  C          15,00
01                  36                  D                            50,00
01                  38                  C          10,00
01                  38                  C          50,00
01                  36                  D                         100,00

FLUCXA
CXA_CODIGO CTA_CODIGO CRDB VALOR
01                 03                  C         25,00
01                 36                  D        150,00
01                  38                 C         60,00


obs: Esta gravando sempre apenas os registros da primeira conta
(CTA_CODIGO=03), já incluir o SUSPEND.


Um abraço,


Wayder Loyola