• Jueves 13 de Mayo de 2021, 08:24

Autor Tema:  Re: Guardar resultados de un procedimiento almacenado  (Leído 2089 veces)

java

  • Nuevo Miembro
  • *
  • Mensajes: 1
    • Ver Perfil
Re: Guardar resultados de un procedimiento almacenado
« en: Martes 5 de Noviembre de 2002, 21:35 »
0
Que onda:
mi problema es que estoy realizando un sistema en el cual se debe hacer una busqueda en la cual si se encuentran 3 datos identicos ya no se puede insertar otro igual. por ejemplo:

OJRH    25/11/2002   26/11/2002
OJRH    26/11/2002   27/11/2002
OJRH    27/11/2002   28/11/2002


entonces si se encuentra esto en una tabla de SQL, cabe mencionar que el sistema esta realizado en delphi, si se quiere insertar otro datos con OJRH no se pueda. me han dicho que se puede hacer esto:
select count (*)
from salida_libros
where iniciales='ojrh'

pero el resultado de esta consulta lo debo guardar en alguna parte para porder tomarlo en delphi. mi pregunta es como para guardarlo en delphi y asi preguntar si en la tabla esta 3 datos iguales y negar insertar otro dato igual

espero que me puedan ayudar

gracias:)

LordRayman

  • Nuevo Miembro
  • *
  • Mensajes: 15
    • Ver Perfil
    • http://127.0.0.1
Re: Guardar resultados de un procedimiento almacenado
« Respuesta #1 en: Martes 10 de Diciembre de 2002, 23:46 »
0
Una sugerencia que no se si te va a servir,
probastes con un trigger en el BeforeInsert ?. Podes hacer ahi la cuenta
y si te da 3 cancelas el insert.

LordRayman

  • Nuevo Miembro
  • *
  • Mensajes: 15
    • Ver Perfil
    • http://127.0.0.1
Guardar resultados de un procedimiento almacenado
« Respuesta #2 en: Martes 10 de Diciembre de 2002, 23:50 »
0
De todas formas la manera de obtener un valor de un sp es con un TQuery

Ej:

  el sp se llama myproc y devuelve
  A un integer

  en el texto SQL del query haces
  un

      select * from myproc

  y listo en los fields del query vas a ver
  el parametro de salida del sp...
 
  si el sp tiene entrada

  select * from myproc (:unparametro)

  antes de ejecutar el query tenes que
  setear el paramero del query con param [n].ASxxx := ? o con paramByname ...