PDA

Ver la Versión Completa : Problema con un TSQLStoredProc y cursores


Lucciano
18-01-2008, 20:09:58
Hola amigos, como andan? Le comento que estoy puliendo una aplicacion realizada en delphi y me encontre con lo siguiente. Hay un procedimiento que crea un TSQLStoredProc, le asigna el nombre, los parametros, y luego lo ejecuta sin ningun problema, la cuestion es que miro mediante una consulta la bd de oracle, donde esta alojado el storeprocedure y me encunetro conque me deja cursores abiertos, lo cuales no se cierran hasta que se cierre la aplicacion principal.

Lo extraño, es que corro ese storedprocedure desde el SQL y cuando miro los cursores abiertos, no me aparece ninguno.

Mi duda es si al procedimiento de delphi, le falta agregar alguna instruccion mas, para que una vez terminado de ejecutar el stored, haga la limpieza de cursores. Les comento que cuando uso los TSQLQuery, si funcionan, es decir se cierran con el close, pero con los Stored, me estoy volviendo loco.
Les adjunto el pedazo de codigo y espero alguna ayuda.
Gracias!! :(

Código Delphi [-] (http://www.clubdelphi.com/foros/#)
with TSQLStoredProc.Create(Application) do try SQLConnection := MiConexion; StoredProcName := 'PQ_DIARIO.CALCULART';
Prepared := true;
ParamByName('FECHAINICIAL').Value := FIN;
ParamByName('FECHAFINAL').Value := FFAL;
ExecProc;
Close;
Finally free; end;
.
.
.