diff --git a/Source/Modulos/Relaciones/Presupuestos de cliente - Contratos de cliente/uGenerarContratosCliUtils.pas b/Source/Modulos/Relaciones/Presupuestos de cliente - Contratos de cliente/uGenerarContratosCliUtils.pas
index a3eb25eb..1bc6f454 100644
--- a/Source/Modulos/Relaciones/Presupuestos de cliente - Contratos de cliente/uGenerarContratosCliUtils.pas	
+++ b/Source/Modulos/Relaciones/Presupuestos de cliente - Contratos de cliente/uGenerarContratosCliUtils.pas	
@@ -26,7 +26,7 @@ uses
   uDetallesContratoClienteController, uControllerDetallesBase,
   uBizContactos, schPresupuestosClienteClient_Intf,
   schContratosClienteClient_Intf, uDireccionesContactoController,
-  uBizDireccionesContacto;
+  uBizDireccionesContacto, uFactuGES_App, uConfiguracionController;
 
 var
   dmGenerarContratosCli: TdmGenerarContratosCli;
@@ -253,6 +253,19 @@ begin
   try
     AContrato := AContratosClienteController.Nuevo;
     CopiarPresupuestoAContrato(APresupuesto, AContrato);
+    if (APresupuesto.TIPO_PRESUPUESTO = CTE_COCINA) then
+       AContrato.CONDICIONES.Add(AppFactuGES.Configuracion.GetSettingAsString(teBD, CTE_CONDICIONES_COCINA))
+    else if (APresupuesto.TIPO_PRESUPUESTO = CTE_ARMARIO) then
+       AContrato.CONDICIONES.Add(AppFactuGES.Configuracion.GetSettingAsString(teBD, CTE_CONDICIONES_ARMARIO))
+    else if (APresupuesto.TIPO_PRESUPUESTO = CTE_BANO) then
+       AContrato.CONDICIONES.Add(AppFactuGES.Configuracion.GetSettingAsString(teBD, CTE_CONDICIONES_BANO))
+    else if (APresupuesto.TIPO_PRESUPUESTO = CTE_ELECTRODOMESTICO) then
+       AContrato.CONDICIONES.Add(AppFactuGES.Configuracion.GetSettingAsString(teBD, CTE_CONDICIONES_ELECTRODOMESTICO))
+    else if (APresupuesto.TIPO_PRESUPUESTO = CTE_OBRA) then
+       AContrato.CONDICIONES.Add(AppFactuGES.Configuracion.GetSettingAsString(teBD, CTE_CONDICIONES_OBRA))
+    else if (APresupuesto.TIPO_PRESUPUESTO = CTE_VARIOS) then
+       AContrato.CONDICIONES.Add(AppFactuGES.Configuracion.GetSettingAsString(teBD, CTE_CONDICIONES_VARIOS));
+
     CopiarDetallesAContrato(APresupuesto, AContrato, APresupuesto.Detalles);
 
     //Sustituir por if de guardar
diff --git a/Source/Servidor/FactuGES_Server.rc b/Source/Servidor/FactuGES_Server.rc
index 05d27000..319bfd62 100644
--- a/Source/Servidor/FactuGES_Server.rc
+++ b/Source/Servidor/FactuGES_Server.rc
@@ -16,7 +16,7 @@ BEGIN
               VALUE "FileVersion", "2.5.5.0\0"
               VALUE "ProductName", "FactuGES (Servidor)\0"
               VALUE "ProductVersion", "2.5.5.0\0"
-              VALUE "CompileDate", "miércoles, 13 de noviembre de 2013 11:13\0"
+              VALUE "CompileDate", "viernes, 22 de noviembre de 2013 18:06\0"
          END
     END
     BLOCK "VarFileInfo"
diff --git a/Source/Servidor/FactuGES_Server.res b/Source/Servidor/FactuGES_Server.res
index 4353f13f..f517ae35 100644
Binary files a/Source/Servidor/FactuGES_Server.res and b/Source/Servidor/FactuGES_Server.res differ