From f9570d384ea0fdb4067d7a40956a8408ccd5b8cb Mon Sep 17 00:00:00 2001
From: roberto <rblanco@rodax-software.com>
Date: Wed, 25 Jan 2012 12:25:00 +0000
Subject: [PATCH] =?UTF-8?q?Se=20adaptan=20las=20obras=20y=20los=20proyecto?=
 =?UTF-8?q?s=20de=20las=20obras=20para=20que=20tengan=20dos=20destinos=20d?=
 =?UTF-8?q?e=20almamacenaje=20de=20archivos,=20los=20proyectos=20antiguos?=
 =?UTF-8?q?=20seguir=C3=A1n=20con=20los=20documentos=20en=20DANI=20y=20los?=
 =?UTF-8?q?=20nuevos=20ir=C3=A1n=20al=20disco=20duro=20externo=20nuevo=20v?=
 =?UTF-8?q?ersion=202.0.4?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

git-svn-id: https://192.168.0.254/svn/Proyectos.EstudioCarnicero_ProGestion/trunk@15 1b8572a8-2d6b-b84e-8c90-20ed86fa4eca
---
 Base/uDataModuleBase.pas | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/Base/uDataModuleBase.pas b/Base/uDataModuleBase.pas
index 9d688fe..b877654 100644
--- a/Base/uDataModuleBase.pas
+++ b/Base/uDataModuleBase.pas
@@ -238,12 +238,12 @@ end;
 
 function TdmBase.darRutaDocumentosNormativasNueva: String;
 begin
-  Result := 'c:\documentos2\normativas';
+  Result := (RORemoteService as IsrvConfiguracion).darRutaNormativasNueva;
 end;
 
 function TdmBase.darRutaDocumentosProyectosNueva: String;
 begin
-  Result := 'c:\documentos2\proyectos';
+  Result := (RORemoteService as IsrvConfiguracion).darRutaProyectosNueva;
 end;
 
 initialization