Problema con Cursor en SQL Server 2008

[[Al González]]

Es mejor usar TSQLQuery que TSQLStoredProc cuando vas a obtener un cursor (TSQLStoredProc es para ejecutar un SP que no devuelve resultados o que los devuelve como simples parámetros de salida, no como filas).

Por otra parte, recuerda que los conjuntos de datos DBX (TSQLXXX) son unidireccionales y mientras no hagas "Next", no traerá la siguiente fila (lo normal es acompañarlos con TClientDataSet).

[Jere_84]

Empezado por Al González

Es mejor usar TSQLQuery que TSQLStoredProc cuando vas a obtener un cursor (TSQLStoredProc es para ejecutar un SP que no devuelve resultados o que los devuelve como simples parámetros de salida, no como filas).

Por otra parte, recuerda que los conjuntos de datos DBX (TSQLXXX) son unidireccionales y mientras no hagas "Next", no traerá la siguiente fila (lo normal es acompañarlos con TClientDataSet).

Intente usar el TSQLQuery, tenes algún ejemplo de como usarlo?
Si pero no hay Campos persistentes para hacer NEXT y sale error.

[[Al González]]

Empezado por Jere_84

Intente usar el TSQLQuery, tenes algún ejemplo de como usarlo?

Como cualquier tipo de query, haces una simple consulta sobre el SP:

Código SQL [-]
Select * From MiSP (:Parametro1, :Par2, :Par3, ...)

Empezado por Jere_84

Si pero no hay Campos persistentes para hacer NEXT y sale error.

¿Qué error aparece en tu pantalla? Me tendrás que perdonar, pues mi vista es mala y desde aquí no logro ver más allá del canal de Panamá.

Por otro lado, no entiendo la relación que haces entre campos persistentes y llamar al método Next de un conjunto de datos, ¿podrías explicarlo?

Saludos.

[Jere_84]

Empezado por Al González

Como cualquier tipo de query, haces una simple consulta sobre el SP:

Código SQL [-]
Select * From MiSP (:Parametro1, :Par2, :Par3, ...)

¿Qué error aparece en tu pantalla? Me tendrás que perdonar, pues mi vista es mala y desde aquí no logro ver más allá del canal de Panamá.

Por otro lado, no entiendo la relación que haces entre campos persistentes y llamar al método Next de un conjunto de datos, ¿podrías explicarlo?

Saludos.

Cuando hago en un TSQLQuery: Select * From pSJFondoDesem( :Param, :Param1 ....

Al hacer active = true me muestra

El nombre de objeto 'pSJFondoDesemCursor' no es válido.

Como que no es valido llamar un SP de esta manera, porque lo que busca la consulta es una Tabla, capaz que en otras BD funcione pero en SQL Server creo que no por lo visto.

Probe con el ClientDataSet si intento hacer un OPEN me aparece:

TDBXError with message 'Remote error: SQLStoredProc: Cursor not returned from Query'.

Al usar ClientDataSet.Execute, no da error pero solo devuelve dos parámetros con valores de los 11 y tambien los deveulve para el ultimo registro, si intento hacer algo como esto:

Código Delphi [-]
    vdSJInforFondoDesem.ClientDataSetInforNoved.Execute;

    with vdSJInforFondoDesem do
    begin
      ClientDataSetInforNoved.Open;
      ClientDataSetInforNoved.First;
      while not ClientDataSetInforNoved.Eof do
      begin
        ShowMessage(ClientDataSetInforNoved.Params.ParamByName('@CodigEmple').AsString);
        ShowMessage(ClientDataSetInforNoved.Params.ParamByName('@DescrEmple').AsString);
        ShowMessage(ClientDataSetInforNoved.Params.ParamByName('@CuilEmple').AsString);
        ShowMessage(ClientDataSetInforNoved.Params.ParamByName('@CuentFondoDesem').AsString);
        ShowMessage(ClientDataSetInforNoved.Params.ParamByName('@LibreFondoDesem').AsString);
        ShowMessage(ClientDataSetInforNoved.Params.ParamByName('@Calle').AsString);
        ShowMessage(ClientDataSetInforNoved.Params.ParamByName('@Numer').AsString);
        ShowMessage(ClientDataSetInforNoved.Params.ParamByName('@CodigCiuda').AsString);
        ShowMessage(ClientDataSetInforNoved.Params.ParamByName('@DescrCiuda').AsString);
        ShowMessage(ClientDataSetInforNoved.Params.ParamByName('@Porce').AsString);
        ShowMessage(ClientDataSetInforNoved.Params.ParamByName('@ImporFinal').AsString);
        ClientDataSetInforNoved.Next;
      end;
    end;

Me da el sig error en el OPEN:

TDBXError with message 'Remote error: Could not convert variant of type (OleStr) into type (Date)'.

Voy a buscar mas acerca de esto error quizás sea solucionable y pueda funcionar.