Stored Procedure con un If después de un Select

[jhonny]

Supongo que Book:NO es un parametro de salida, entonces la cosa deberia ser, asi:

Código SQL [-]
begin

  Select BOJ.BOOKINGNO
  from BOOKINGS_OBJECTS BOJ
  left join BOOKINGS BO
    on BO.BOOKINGNO = BOJ.BOOKINGNO
  where
    BOJ.BUILDINGNO = :"BUILDING_NO" and
    BOJ.OBJECTNO = :"OBJECT_NO" and 
    BOJ.DATETO <= :"DATE_SP" and
    BO.STATUS = 3
    Into :BOOK_NO; /*Ha Book_NO le faltan esos dos puntos, para indicarle que es un parametro de salida*/

  if (not :BOOK_NO is Null) then /*Quitale esas comillas, me temo que el motor dira que nunca es Null ya que siempre es igual a "BOOK_NO"*/
    SUSPEND;
  else begin

    Select BOJ2.BOOKINGNO 
    from BOOKINGS_OBJECTS BOJ2
    left join BOOKINGS BO2
      on BO2.BOOKINGNO = BOJ2.BOOKINGNO
    where
      BOJ2.BUILDINGNO = :"BUILDING_NO" and
      BOJ2.OBJECTNO = :"OBJECT_NO" and
      BOJ2.DATEFROM <= :"DATE_SP" and
      BOJ2.DATETO >= :"DATE_SP" and
      BO2.STATUS <= 2
      Into :BOOK_NO; /*Lo mismo aca*/
    SUSPEND;

  end

end>

[[gluglu]]

Gracias Jhonny también a tí.

Independientemente de los ':' en el BOOK_NO como parámetro de salida, funciona correctamente al menos en Interbase 7.5

Y las comillas que hay en el

Código SQL [-]
if (not :"BOOK_NO" is Null) then ...

las mete el IBConsole él solito. Si las quito y vuelvo a grabar el SP, me vuelve a poner las comillas.

Independientemente de la sintaxis que funciona de una manera u otra, no resulevo aun la problemática de qué pasa si son dos los registros que me devuelve el 1er Select, tal y como indica ArdiIIa.

Y por el contrario, tal y como indiqué, qué pasa si el primer Select no devuelve ningún registro. Pues que a mi entender no entraba a ejecutar siquiera el segundo Select.

[[ArdiIIa]]

Vaya, creía que te había mandado otro post contestanto y ha sido que no..

Mira gluglu creo que esto que te voy a poner, te debería funcionar independientemente del número de registros que haya en la búsqueda... prueba y me cuentas:

Código SQL [-]

 FOR  Select BOJ.BOOKINGNO
  from BOOKINGS_OBJECTS BOJ
  left join BOOKINGS BO
    on BO.BOOKINGNO = BOJ.BOOKINGNO
  where
    BOJ.BUILDINGNO = :"BUILDING_NO" and
    BOJ.OBJECTNO = :"OBJECT_NO" and 
    BOJ.DATETO <= :"DATE_SP" and
    BO.STATUS = 3
    Into :BOOK_NO
DO
  if (:BOOK_NO is NOT Null) then 
    SUSPEND;
  else begin
FOR Select BOJ2.BOOKINGNO 
    from BOOKINGS_OBJECTS BOJ2
    left join BOOKINGS BO2
      on BO2.BOOKINGNO = BOJ2.BOOKINGNO
    where
      BOJ2.BUILDINGNO = :"BUILDING_NO" and
      BOJ2.OBJECTNO = :"OBJECT_NO" and
      BOJ2.DATEFROM <= :"DATE_SP" and
      BOJ2.DATETO >= :"DATE_SP" and
      BO2.STATUS <= 2
      Into :BOOK_NO
DO
    SUSPEND;

[jhonny]

Ahhh, y ¿Porque no usar un for select?

Nota: ArdiIIa se me a adelantado, y de que manera, mejor no se podia explicar.