ejecutar Procedimiento almacenado en SQL Server, Intraweb.

[Roilo]

si me pides que lo pruebe con el Query analizer para chequear si el SP está correcto, pierde cuidado que lo está. Lo probé con los componentes de ADO y me funcionó... aunque tube que sustituir la sentencia ExecProc por close - open.
Por otro lado me dirigí a la ayuda de Delphi y entendí que no todos los componentes para SP te devuelven la lista de procedimientos almacenados en el Server, por eso hay que especificar el nombre manualmente.
Bueno, Sigo con duda.
Gracias.

[ContraVeneno]

vamos a ver, ahora si me tengo que declarar falto de conocimientos porque a mi también me estuvo marcando ese error. En fin, esto es lo que tuve que hacer, cosa que me parece extraña ya que repito varias instrucciones. Pero bueno, así es como me funciona:

Código Delphi [-]
 with datamod1.UnStoredProcedure do begin
  if active then close;
  Prepare;
  ParamByName('@Palabra').AsString:= edtBuscar.Text;
  Prepare;
  ExecProc;
  Open;
  ............
  Close;
  UnPrepare;
 end; //with

Si no pongo el "Prepare" antes de darle valor al parámetro, me marca el error de "out fo bounds". Lo que me parece raro es que tengo que utilizar el prepare antes y después del parámetro, también tengo que utilice ExecProc y Open, ya que si no lo hago así, pues no funciona.

Ojala y alguien que ya alla utilizado este componente TStoredProc pueda ilustrarnos.

[Roilo]

Probaste eso sobre una aplicación IntraWeb ?
Porque esa propiedad Prepare no existe(no está declarada).
Probé con prepared := true y sigue el error del que hablamos, sigue diciendo que "El índice de la lista está fuera de los límites" ... creo que se traduce así.

Código Delphi [-]
with ConsolaDatos.busqueda do
  begin
   if Active then Close ;
   Prepared := true ;
   ParamByName('@palabra').AsString := IWEditbuscar.text ;
   Prepared := true ;
   ExecProc ;
   Open ;
   Prepared := false ;
 end ; //with

Bueno. Yo sigo por acá hasta dar con la solución (Sino ).
Mientras, si alguno de ustedes tiene algo, lo tiran para acá.
Gracias.

[luisch]

solucionaste el problema? bueno a mi me parece q estas haciendo mal el procedimiento almacenado en sql server.

[javim]

Hola Roilo.
No sé como funcionan estas cosas con SQLServer, pero con Oracle tuvimos el mismo problema y era porque no le especificábamos en la propiedad "SchemaName" del SQLStoredProc el usuario propietario del procedimiento en la BD, que no coincidía con el usuario de la conexión delphi.

Seguimos sin entender porqué el mensaje de error era tan poco descriptivo como "index out of bounds"

Espero que te sirva de ayuda. Un saludo.

[luisch]

Hace el procedimiento almacenado en sqlserver

CREATE PROCEDURE [busqueda]
@palabra varchar(20)
AS
select Nombre,CentroTrab
from control where (Nombre like '%'+@palabra+'%')

me imagino q sabes para que sirve el like con los comodines %...

si usas una grilla, un dataset, adoconnection y el adostoreproc haces asi:
AdoConnection conectado con la base de datos tuya;
AdoStoreProc conectado con el AdoConnection y seleccionas el procedimiento almacenado y fijate en la propiedad parametres si esta el @codigo el q aparece primero borralo.
luego el datasource conectado con el AdoStoreProc y por ultimo la grilla conectada con el datasource. una ves hecha la coneccion en el boton de buscar pones esto

procedure busqueda ......
begin
AdoStoreProc.Parameters.ParamByName('@codigo').Value := Edit1.Text;
AdoStoreProc.ExecProc;
AdoStoreProc.Active := False;
AdoStoreProc.Active := True;
end;

asi tiene que funcionar perfectamente la busqueda cualquier cosa pregunta.