[firebase-br] RES:  OFF TOPIC - usar STORED PROCEDURE no DELPHI
    Charles Marcelo Bluning (Apoio Logico) 
    charles em apoiologico.com.br
       
    Seg Jul 25 11:22:41 -03 2011
    
    
  
'Select total from SP_SUMCONTAS(:dataini, :datafin)'
Espero ter ajudado.
Charles Marcelo Bluning
Apoio Logico Informática Ltda
Skype: charles.marcelo.bluning
MSN: cbluning em hotmail.com
Celular: 47 8412-0060
www.apoiologico.com.br
-----Mensagem original-----
De: lista-bounces em firebase.com.br [mailto:lista-bounces em firebase.com.br] Em
nome de Luiz Carlos
Enviada em: segunda-feira, 25 de julho de 2011 11:07
Para: FireBase
Assunto: Re: [firebase-br] OFF TOPIC - usar STORED PROCEDURE no DELPHI
Colega, criei a procedure da seguinte forma:
SET TERM ^ ; 
CREATE OR ALTER PROCEDURE SP_SUMCONTAS ( 
    dataini date, 
    datafin date) 
returns ( 
    total numeric(15,2)) 
as 
begin 
 for select sum(VL_RECEBER) - sum(VL_PAGAR) from contas 
   where DT_VCTO between :dataini and :datafin 
   into :total do 
 begin 
  suspend; 
 end 
end^
Depois no delphi coloquei o codigo abaixo em um BUTTON:
Var
dataini: TDATE;
datafin: TDATE;
Begin
dataini := DIA1.Date ; //datetimerpicker
datafin := DIA2.Date ; //datetimepicker
IBSQL1.SQL.Text := 'Select total from SP_SUMCONTAS';
edsaldo.Text:= CurrtoStr(IBSQL1.ParamByName('total').AsCurrency);   
End;
Porem qdo clico no button dá o seguinte erro:
IMPUT PARAMETER MISMATCH FOR PROCEDURE SUMCONTAS
O que estou fazendo de errado?  
Grato
Luiz Carlos
  ----- Original Message ----- 
  From: Tecnobyte Informática 
  To: FireBase 
  Sent: Saturday, July 23, 2011 9:42 PM
  Subject: Re: [firebase-br] OFF TOPIC - usar STORED PROCEDURE no DELPHI
  Boa noite
  Eu uso Delphi 7 + IBX + Firebird 2.1 e uso IBSQL ou IBDataSet, dependendo
da 
  necessidade e do tipo de procedure.
  Exemplos:
  - Para procedure selecionável:
  IBSQL1.SQL.Text := 'SELECT * FROM SP_NomeProcedure(:Parametro1,
:Parametro2, 
  ...)';
  IBSQL1.ParamByName('Parametro1').AsInteger := Valor;
  ...
  - Para procedure executável:
  IBSQL1.SQL.Text := 'EXECUTE PROCEDURE SP_NomeProcedure(:Parametro1, 
  :Parametro2, ...)';
  IBSQL1.ParamByName('Parametro1').AsInteger := Valor;
  ...
  Atenciosamente.
  Daniel P. Guimarães
  Tecnobyte Informática
  www.tecnobyte.com.br
  -----Mensagem Original----- 
  From: Luiz Carlos
  Sent: Saturday, July 23, 2011 6:28 PM
  To: FireBase
  Subject: [firebase-br] OFF TOPIC - usar STORED PROCEDURE no DELPHI
  Olá,
  Gostaria de saber como faço para chamar uma STORED PROCEDURE pelo DELPHI
7?
  Grato
  Luiz Carlos 
  ______________________________________________
  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
______________________________________________
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
    
    
Mais detalhes sobre a lista de discussão lista