+ uma vez preciso de sua ajuda ap�s brigar em cima dessa procedure [code:1:e92a543744]CREATE PROCEDURE NOVA (DATA_INI DATE,DATA_FINAL DATE,CODIGO VARCHAR(3))RETURNS(COD_INFRACAO VARCHAR(3),DATA DATE,D...

F�rum procedure #223363

30/03/2004

+ uma vez preciso de sua ajuda ap�s brigar em cima dessa procedure

CREATE PROCEDURE NOVA 
(
DATA_INI DATE,
DATA_FINAL DATE,
CODIGO VARCHAR(3)
)
RETURNS
(
COD_INFRACAO VARCHAR(3),
DATA DATE,
DP VARCHAR(10)
)
AS
BEGIN
FOR Select Ocorrencia.Cod_Infracao,Ocorrencia.data,Cad_Log.DP
From Ocorrencia Ocorrencia, Cad_Log Cad_Log
Where  Ocorrencia.Codigo_Rua=Cad_Log.Codigo_Rua AND
     CAD_LOG.DP=�10�DP�and
     Ocorrencia.Data>= :DATA_INI and
     Ocorrencia.Data<= :DATA_FINAL AND
     Ocorrencia.Cod_Infracao= :CODIGO
    INTO :COD_INFRACAO,:DATA,:DP
  DO
  SUSPEND;
END

que est� rodando perfeitamente , agora tenho mais um problema :

Como colocaria isso no delphi7 ou seja quero algo assim :

edit1 edit2 edit3 bot�o pesquisar
--------- --------- --------

ou seja no edit1 eu entro com a data inicial
no edit2 a data final
no edit3 o dp

click no bot�o e ele carregar� em um dbgrid , certo?

porem como insiro essa procedure no delphi seria atraves da palheta IBprocedure ou seja quero no Interbase , tem condi��es de me ajudar ?

Obrigado

Bolomaster

Curtir t�pico

+ 0

Responder

Posts

30/03/2004

Gandalf.nho

Como � uma procedure SELECT, use o IBQuery e fa�a SELECT * FROM PROCEDURE (lista_par�metros)

Responder

Gostei + 0