From 5675dfe140ead5991c5bdd74c6b3bddcd79eabfa Mon Sep 17 00:00:00 2001
From: david <darranz@rodax-software.com>
Date: Wed, 3 Dec 2008 18:54:57 +0000
Subject: [PATCH] Para que no se cierre la conexion si tanrdan en volver a
 previsulaizar un informe

git-svn-id: https://192.168.0.254/svn/Proyectos.Acana_FactuGES2/trunk@354 f4e31baf-9722-1c47-927c-6f952f962d4b
---
 Source/Servidor/uDataModuleServer.pas | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/Source/Servidor/uDataModuleServer.pas b/Source/Servidor/uDataModuleServer.pas
index 0ab8494f..282e5396 100644
--- a/Source/Servidor/uDataModuleServer.pas
+++ b/Source/Servidor/uDataModuleServer.pas
@@ -166,6 +166,8 @@ function TdmServer.DarNuevaConexion: IDAConnection;
 begin
   with ConnectionManager do
     Result := NewConnection(GetDefaultConnectionName, False);
+  if not Result.isAlive then
+     Result.Open;
 end;
 
 procedure TdmServer.IniciarLog;