FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Ver resultado de un Stored Procedure desde Delphi
Hola amigos!!!
Estoy iniciando con el uso de los Procedimientos Almacenados y como todos los inicios son dificiles necesito sus ayudas. Copie dos procedimientos almacenados que encontré en un libro como sigue: set term ^; CREATE PROCEDURE EsPrimo(Numero Integer) Return (Respuesta Integer) as Declare variable I Integer; Begin I = 2; While (I < Numero) do begin if (cast((Numero / I) as Integer) * I = Numero) then Begin Respuesta = 0; Exit; End I = I + 1; end Respuesta = 1; end ^ set term ;^ y el otros asi: set term ^; create preocudure Primos (Total Integer) return (primo Integer) as declare variable I integer; declare variable Respuesta Integer; begin I = 0; primo = 2; while (I < Total) do begin execute procedure Esprimo Primo returning_values Respuesta; if (respuesta = 1) then begin I = I + 1; suspend; /* Nuevo numero*/ end primo = primo + 1; end end ^ set term ;^ bueno esto me devuelve todo los numeros primo encontrados desde 2 hasta la cantidad que digite. Lo ejecuto desde el ISQL de interbase y me funciona perfectamente, lo hago asi: SELECT * FROM PRIMOS(100) Esto según Cantú, y funciona. Bueno el caso es que quiero ejecutar este SP desde delphi y no se como hacerlo. Me gustariá que me dijeran cuales componentes IBXs debo usar para esto, y que lineas de cógido debo incluir en ellos. Cuento con su ayuda, gracias desde ya.. Si lo desean pueden darme sus ayudas poniendo otros ejemplo ... ElCherchu..... |
|
|
|