[firebase-br] Problemas com SP!!!

[Eliomar]

Essa parte que esta errada.

>        For Select * From Equipamento
>            where Ssi_Codi  = :SSI and
>                     Equ_Iden > :Valor
>            Order by Equ_Iden
>

vc deve selecionar somente os campos que 
vc precisa e não o "*"

        For Select codigo From Equipamento
            where Ssi_Codi  = :SSI and
                     Equ_Iden > :Valor
            Order by Equ_Iden
               into :op_codigo  do

Entendeu?

Agradecido.
Eliomar,
ICQ - 167715482
MSN - eliomar0910 em hotmail.com
Soft-Data Softwares Administrativos
hptt://www.promediconet.com.br



------------- Segue mensagem original! -------------

De: Demitre <demitre em estadao.com.br>
Data: Thu, 05 May 2005 15:12:59 -0300
Para: FireBase <lista em firebase.com.br>
Assunto: Re: [firebase-br] Problemas com SP!!!

A instrução for... do percorre todos os registros retornados no select. 
Acredito que o seu problema seja o order by. Tente eliminá-lo e veja se 
resolve.
Moked do Brasil - Marcel (Brazil) escreveu:

>     Marcel Vieira do Nascimento - Suporte Técnico
>      Moked do Brasil - Consultoria de Segurança Empresarial
>      Divisão MokInf de Informática
>      PABX: (55-11) 5071-2748
>      suporte em moked.com.br
>      www.moked.com.br
>     
>
>      Grau de Sigilo: Confidencial Reservado Interno Amplo 
>      Nível de Prioridade: Alto Médio Baixo
>      Destinatário/s: Lista de divulgação 
>      -------------------------------------------------------------------------
>      E ai pessoal bele!
>      Bom estou com o seguinte problema sou meio novato em FireBird não tenho muita experiência com o mesmo ontem mesmo postei uma dúvida tbm sobre SP mas logo em seguida já havia conseguido resolver e hj fiz essa SP mas ela está dando erro.
>      Alguem poderia me dizer oq está de errado nela, o erro aparece na hora do comando "Do" depois For Select
>      Segue a SP abaixo:
>
>      Create Procedure PROCEDURE_EQUIP_IDEN_DEC (EQUIP integer)
>      As
>      Declare variable Valor  integer;
>      Declare variable CMT   integer;
>      Declare variable SSI    integer;
>      Declare variable Maior integer;
>      Begin
>        Select Equ_Iden, Cmt_Codi, Ssi_Codi From Equipamento
>        where Equ_Codi = :EQUIP
>        Into :Valor, :CMT, :SSI;
>
>        Select Max(Equ_Iden) As Ultimo From Equipamento
>        where Cmt_Codi = :CMT and
>              Ssi_Codi = :SSI
>        Into :Maior;
>
>        For Select * From Equipamento
>            where Ssi_Codi  = :SSI and
>                     Equ_Iden > :Valor
>            Order by Equ_Iden
>
>        do -------> essa comando q está dando erro
>        begin
>           Bloco de instruções
>        end
>      end
>
>      E uma outra pergunta seria como eu faria para percorrer os registro retornados em uma seleção no FireBird????
>      No Delphi eu tenho a função Next do ClientDataSet  existe alguma função semelhante no FireBird que tenha o mesmo efeito ou a instrução                 For Select... Do já se encarrega de percorrer todos os registros retornados da seleção???
>
>      Grato desde já!!!!
>
>      Marcel  
>
>"O emitente da mensagem é o responsável por seu conteúdo e divulgação, proibindo
>sua reprodução sem a prévia autorização do mesmo". 
>Antes de imprimir pense em nosso compromisso com o Meio Ambiente e o
>comprometimento com os Custo envolvidos! 
>______________________________________________
>FireBase-BR (www.firebase.com.br) - Hospedado em www.bavs.com.br
>Para editar sua configuração na lista, use o endereço http://mail.firebase.com.br/mailman/listinfo/lista_firebase.com.br
>Para consultar mensagens antigas: http://search.gmane.org/search.php?group=rebase
>
>
>  
>


______________________________________________
FireBase-BR (www.firebase.com.br) - Hospedado em www.bavs.com.br
Para editar sua configuração na lista, use o endereço http://mail.firebase.com.br/mailman/listinfo/lista_firebase.com.br
Para consultar mensagens antigas: http://search.gmane.org/search.php?group=firebase