Cursor not returned from Query

[Antoniov]

Lo del SET NOCOUNT ON se me coló, eso realmente no va.

He visto en algunos foros que con eso se solucionaba pero cuando lo intento poner en el procedure me da error.

Como ejemplo del procedimiento se puede poner cosa como este ejemplo simple, cualquier cosa da error.

Código SQL [-]
CREATE PROCEDURE NEW_PROCEDURE
RETURNS(
  RDO SMALLINT)
AS
BEGIN
  Rdo = 5;
  
  /* Procedure body */
  SUSPEND;
END;

[Casimiro Noteví]

Aparentemente está bien, salvo lo del smallint, ya que los generadores devuelven ahora un bigint.
De todas formas, ¿lo has probado desde ibexpert o alguna herramienta similar?, para descartar que no es problema desde tu programa.

[Antoniov]

No es un problema del programa porque para probarlo no hay que añadir ni una línea de código, ni siquiera ejecutar el programa.

Crea un procedimiento en la base de datos de lo más simple.

Entra en Delphi, Pones el TSQLConnection
Poner el TSQLStoreProc apuntando al procedure creado

E intentas poner la propiedad Active a TRUE, y sale el error.

Esto no pasaba en Delphi 7.

Alguien tiene el Delphi XE y puede hacer una prueba?

Gracias

[Casimiro Noteví]

Empezado por Antoniov

No es un problema del programa porque para probarlo no hay que añadir ni una línea de código, ni siquiera ejecutar el programa.
Alguien tiene el Delphi XE y puede hacer una prueba?

¿Entonces para qué quieres que lo pruebe otra persona?

[Antoniov]

El problema es que intentaba usar la propiedad Active en lugar de usar ExecProc.

Solucionado.

Gracias a todos.

[Casimiro Noteví]

Empezado por Antoniov

Esto no pasaba en Delphi 7.

¿Entonces pasaba o no pasaba con D7?