Ver Mensaje Individual
  #1  
Antiguo 14-05-2007
Avatar de fedelphi
fedelphi fedelphi is offline
Miembro
 
Registrado: abr 2006
Ubicación: Santa Fe
Posts: 122
Reputación: 21
fedelphi Va por buen camino
verificar con procedimiento almacenado

Hola de nuevo amigos, trabajo con delphi 7 y mi idea es hacer que el servidor (firebird) me devuelva un 'si' o un 'no' si el numero que le paso como parametro esta dentro de uno de los rangos almacenados en la tabla. Esta tabla tiene un campo que identifica tickets, y rangos que determinan que si el ticket esta dentro de alguno de los mismos es robado, invalido, etc.
Puede haber varios rangos para un mismo ticket, por ejemplo
id_ticket minimo maximo
1 10 20
1 50 80
3 15 100
1 150 200
3 5 10
en este caso el ticket 1 nro 15 es invalido, el ticket1 nro 90 seria valido
Realice este procedimiento almacenado, pero al querer ver los parametros en el object inspector de delphi me tira el error: dinamic SQL error. SQL error code=-204 procedure unknown VERIFICA_ROBADO
Código SQL [-]
PROCEDURE VERIFICA_ROBADO (
    PEID_TICKET Integer,
    PENRO_TICKET Varchar(15) )
RETURNS (
    PSES_ROBADO Varchar(2) )
AS
DECLARE VARIABLE DVMInimo VARCHAR(15); 
DECLARE VARIABLE DVMaximo VARCHAR(15);
BEGIN
  PSes_robado='no';
  FOR SELECT minimo,maximo FROM RANGO_ROBADOS WHERE id_ticket=:PEId_ticket
      INTO DVMinimo,DVMaximo
  DO
  BEGIN
    SUSPEND;
    if (PEnro_ticket BETWEEN DVMinimo AND DVMaximo) THEN
    BEGIN
      PSes_robado='si';
      EXIT;
    END
  END
Alguien me puede dar una mano en que estoy metiendo la pata, recien estoy empezando con firebird y se me complico demas este SP
Gracias
Fede
__________________
De lo que hay no falta nada!!!
Responder Con Cita