diff --git a/Database/scripts/factuges.sql b/Database/scripts/factuges.sql
index d696226..cda4039 100644
--- a/Database/scripts/factuges.sql
+++ b/Database/scripts/factuges.sql
@@ -3720,6 +3720,7 @@ CREATE VIEW V_PRESUPUESTOS_CLIENTE(
     ID_DIRECCION,
     NIF_CIF,
     NOMBRE,
+    NOMBRE_COMERCIAL_CLIENTE,
     PERSONA_CONTACTO,
     FORMA_PAGO,
     PLAZO_ENTREGA,
@@ -3764,6 +3765,7 @@ SELECT
   PRESUPUESTOS_CLIENTE.ID_DIRECCION,  
   CONTACTOS.NIF_CIF,
   CONTACTOS.NOMBRE,
+  CLIENTES_DATOS.NOMBRE_COMERCIAL,
   PRESUPUESTOS_CLIENTE.PERSONA_CONTACTO,
   PRESUPUESTOS_CLIENTE.FORMA_PAGO,
   PRESUPUESTOS_CLIENTE.PLAZO_ENTREGA,
@@ -3799,10 +3801,12 @@ FROM
   PRESUPUESTOS_CLIENTE
   LEFT OUTER JOIN CONTACTOS ON (PRESUPUESTOS_CLIENTE.ID_CLIENTE = CONTACTOS.ID)
   LEFT OUTER JOIN CONTACTOS CONTACTOS2 ON (PRESUPUESTOS_CLIENTE.ID_VENDEDOR = CONTACTOS2.ID)
+  INNER JOIN CLIENTES_DATOS ON (CLIENTES_DATOS.ID_CLIENTE = PRESUPUESTOS_CLIENTE.ID_CLIENTE)
   LEFT OUTER JOIN EMPRESAS_TIENDAS ON (EMPRESAS_TIENDAS.ID = PRESUPUESTOS_CLIENTE.ID_TIENDA)
   LEFT OUTER JOIN CONTRATOS_CLIENTE ON (CONTRATOS_CLIENTE.ID = PRESUPUESTOS_CLIENTE.ID_CONTRATO)
 ;
 
+
 /* View: V_CONTRATOS_CLIENTE */
 CREATE VIEW V_CONTRATOS_CLIENTE(
     ID,
diff --git a/Source/Base/Base.dproj b/Source/Base/Base.dproj
index 58915be..6f57818 100644
--- a/Source/Base/Base.dproj
+++ b/Source/Base/Base.dproj
@@ -51,13 +51,6 @@
       
       
       
-      
-      
-      
-      
-      
-      
-      
       <Excluded_Packages Name="$(BDS)\Bin\dclintraweb_90_100.bpl">VCL for the Web Design Package for CodeGear RAD Studio</Excluded_Packages>
       <Excluded_Packages Name="$(BDS)\bin\dclwebsnap100.bpl">CodeGear WebSnap Components</Excluded_Packages>
       <Excluded_Packages Name="$(BDS)\bin\dclsoap100.bpl">CodeGear SOAP Components</Excluded_Packages>
@@ -73,6 +66,54 @@
       <MainSource>MainSource</MainSource>
     </DelphiCompile>
     <DCCReference Include="..\Servicios\FactuGES_Intf.pas" />
+    <DCCReference Include="..\Servidor\adortl.dcp" />
+    <DCCReference Include="..\Servidor\cxDataD11.dcp" />
+    <DCCReference Include="..\Servidor\cxEditorsD11.dcp" />
+    <DCCReference Include="..\Servidor\cxExtEditorsD11.dcp" />
+    <DCCReference Include="..\Servidor\cxGridD11.dcp" />
+    <DCCReference Include="..\Servidor\cxLibraryD11.dcp" />
+    <DCCReference Include="..\Servidor\cxPageControlD11.dcp" />
+    <DCCReference Include="..\Servidor\DataAbstract_Core_D11.dcp" />
+    <DCCReference Include="..\Servidor\dbrtl.dcp" />
+    <DCCReference Include="..\Servidor\dclIndyCore.dcp" />
+    <DCCReference Include="..\Servidor\designide.dcp" />
+    <DCCReference Include="..\Servidor\dsnap.dcp" />
+    <DCCReference Include="..\Servidor\dxGDIPlusD11.dcp" />
+    <DCCReference Include="..\Servidor\dxPSCoreD11.dcp" />
+    <DCCReference Include="..\Servidor\dxThemeD11.dcp" />
+    <DCCReference Include="..\Servidor\GUISDK_D11R.dcp" />
+    <DCCReference Include="..\Servidor\IndyCore.dcp" />
+    <DCCReference Include="..\Servidor\IndyProtocols.dcp" />
+    <DCCReference Include="..\Servidor\IndySystem.dcp" />
+    <DCCReference Include="..\Servidor\Jcl.dcp" />
+    <DCCReference Include="..\Servidor\JclVcl.dcp" />
+    <DCCReference Include="..\Servidor\JSDialog100.dcp" />
+    <DCCReference Include="..\Servidor\JvCmpD11R.dcp" />
+    <DCCReference Include="..\Servidor\JvCoreD11R.dcp" />
+    <DCCReference Include="..\Servidor\JvCtrlsD11R.dcp" />
+    <DCCReference Include="..\Servidor\JvDlgsD11R.dcp" />
+    <DCCReference Include="..\Servidor\JvMMD11R.dcp" />
+    <DCCReference Include="..\Servidor\JvNetD11R.dcp" />
+    <DCCReference Include="..\Servidor\JvPageCompsD11R.dcp" />
+    <DCCReference Include="..\Servidor\JvStdCtrlsD11R.dcp" />
+    <DCCReference Include="..\Servidor\JvSystemD11R.dcp" />
+    <DCCReference Include="..\Servidor\pckMD5.dcp" />
+    <DCCReference Include="..\Servidor\pckUCDataConnector.dcp" />
+    <DCCReference Include="..\Servidor\pckUserControl_RT.dcp" />
+    <DCCReference Include="..\Servidor\PluginSDK_D11R.dcp" />
+    <DCCReference Include="..\Servidor\PngComponentsD10.dcp" />
+    <DCCReference Include="..\Servidor\PNG_D10.dcp" />
+    <DCCReference Include="..\Servidor\RemObjects_Core_D11.dcp" />
+    <DCCReference Include="..\Servidor\rtl.dcp" />
+    <DCCReference Include="..\Servidor\TB2k_D10.dcp" />
+    <DCCReference Include="..\Servidor\tbx_d10.dcp" />
+    <DCCReference Include="..\Servidor\vcl.dcp" />
+    <DCCReference Include="..\Servidor\vclactnband.dcp" />
+    <DCCReference Include="..\Servidor\vcldb.dcp" />
+    <DCCReference Include="..\Servidor\vcljpg.dcp" />
+    <DCCReference Include="..\Servidor\VclSmp.dcp" />
+    <DCCReference Include="..\Servidor\vclx.dcp" />
+    <DCCReference Include="..\Servidor\xmlrtl.dcp" />
     <DCCReference Include="Conexion\uConfigurarConexion.pas">
       <Form>fConfigurarConexion</Form>
       <DesignClass>TForm</DesignClass>
@@ -96,52 +137,11 @@
       <Form>dmBase</Form>
       <DesignClass>TDataModule</DesignClass>
     </DCCReference>
-    <DCCReference Include="Utiles\adortl.dcp" />
     <DCCReference Include="Utiles\ClassRegistry\uClassRegistryUtils.pas" />
     <DCCReference Include="Utiles\ClassRegistry\uEditorRegistryUtils.pas" />
     <DCCReference Include="Utiles\ClassRegistry\uInformeRegistryUtils.pas" />
     <DCCReference Include="Utiles\ClassRegistry\uViewConfiguracionRegistryUtils.pas" />
     <DCCReference Include="Utiles\ClassRegistry\uViewRegistryUtils.pas" />
-    <DCCReference Include="Utiles\cxDataD11.dcp" />
-    <DCCReference Include="Utiles\cxEditorsD11.dcp" />
-    <DCCReference Include="Utiles\cxExtEditorsD11.dcp" />
-    <DCCReference Include="Utiles\cxGridD11.dcp" />
-    <DCCReference Include="Utiles\cxLibraryD11.dcp" />
-    <DCCReference Include="Utiles\cxPageControlD11.dcp" />
-    <DCCReference Include="Utiles\DataAbstract_Core_D11.dcp" />
-    <DCCReference Include="Utiles\dbrtl.dcp" />
-    <DCCReference Include="Utiles\dclIndyCore.dcp" />
-    <DCCReference Include="Utiles\designide.dcp" />
-    <DCCReference Include="Utiles\dsnap.dcp" />
-    <DCCReference Include="Utiles\dxGDIPlusD11.dcp" />
-    <DCCReference Include="Utiles\dxPSCoreD11.dcp" />
-    <DCCReference Include="Utiles\dxThemeD11.dcp" />
-    <DCCReference Include="Utiles\GUISDK_D11R.dcp" />
-    <DCCReference Include="Utiles\IndyCore.dcp" />
-    <DCCReference Include="Utiles\IndyProtocols.dcp" />
-    <DCCReference Include="Utiles\IndySystem.dcp" />
-    <DCCReference Include="Utiles\Jcl.dcp" />
-    <DCCReference Include="Utiles\JclVcl.dcp" />
-    <DCCReference Include="Utiles\JSDialog100.dcp" />
-    <DCCReference Include="Utiles\JvCmpD11R.dcp" />
-    <DCCReference Include="Utiles\JvCoreD11R.dcp" />
-    <DCCReference Include="Utiles\JvCtrlsD11R.dcp" />
-    <DCCReference Include="Utiles\JvDlgsD11R.dcp" />
-    <DCCReference Include="Utiles\JvMMD11R.dcp" />
-    <DCCReference Include="Utiles\JvNetD11R.dcp" />
-    <DCCReference Include="Utiles\JvPageCompsD11R.dcp" />
-    <DCCReference Include="Utiles\JvStdCtrlsD11R.dcp" />
-    <DCCReference Include="Utiles\JvSystemD11R.dcp" />
-    <DCCReference Include="Utiles\pckMD5.dcp" />
-    <DCCReference Include="Utiles\pckUCDataConnector.dcp" />
-    <DCCReference Include="Utiles\pckUserControl_RT.dcp" />
-    <DCCReference Include="Utiles\PluginSDK_D11R.dcp" />
-    <DCCReference Include="Utiles\PngComponentsD10.dcp" />
-    <DCCReference Include="Utiles\PNG_D10.dcp" />
-    <DCCReference Include="Utiles\RemObjects_Core_D11.dcp" />
-    <DCCReference Include="Utiles\rtl.dcp" />
-    <DCCReference Include="Utiles\TB2k_D10.dcp" />
-    <DCCReference Include="Utiles\tbx_d10.dcp" />
     <DCCReference Include="Utiles\TIBAN\IBAN.pas" />
     <DCCReference Include="Utiles\TIBAN\IBANMetrics.pas" />
     <DCCReference Include="Utiles\uAppInfoUtils.pas" />
@@ -160,13 +160,6 @@
     <DCCReference Include="Utiles\uPasswordUtils.pas" />
     <DCCReference Include="Utiles\uSistemaFunc.pas" />
     <DCCReference Include="Utiles\uStringsUtils.pas" />
-    <DCCReference Include="Utiles\vcl.dcp" />
-    <DCCReference Include="Utiles\vclactnband.dcp" />
-    <DCCReference Include="Utiles\vcldb.dcp" />
-    <DCCReference Include="Utiles\vcljpg.dcp" />
-    <DCCReference Include="Utiles\VclSmp.dcp" />
-    <DCCReference Include="Utiles\vclx.dcp" />
-    <DCCReference Include="Utiles\xmlrtl.dcp" />
   </ItemGroup>
 </Project>
 <!-- EurekaLog First Line
diff --git a/Source/Base/Base.res b/Source/Base/Base.res
index 8b251f3..1641339 100644
Binary files a/Source/Base/Base.res and b/Source/Base/Base.res differ
diff --git a/Source/Cliente/FactuGES.dproj b/Source/Cliente/FactuGES.dproj
index a5f26b5..42e6ac1 100644
--- a/Source/Cliente/FactuGES.dproj
+++ b/Source/Cliente/FactuGES.dproj
@@ -51,7 +51,7 @@
     <Borland.Personality>Delphi.Personality</Borland.Personality>
     <Borland.ProjectType>VCLApplication</Borland.ProjectType>
     <BorlandProject>
-<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Language><Language Name="RootDir">C:\Archivos de programa\Borland\Delphi7\Bin\</Language></Language><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">2</VersionInfo><VersionInfo Name="MinorVer">6</VersionInfo><VersionInfo Name="Release">7</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">Rodax Software S.L.</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">2.6.7.0</VersionInfoKeys><VersionInfoKeys Name="InternalName">FactuGES</VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">FactuGES</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">2.6.7.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
+<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Language><Language Name="RootDir">C:\Archivos de programa\Borland\Delphi7\Bin\</Language></Language><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">2</VersionInfo><VersionInfo Name="MinorVer">6</VersionInfo><VersionInfo Name="Release">8</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">Rodax Software S.L.</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">2.6.8.0</VersionInfoKeys><VersionInfoKeys Name="InternalName">FactuGES</VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">FactuGES</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">2.6.8.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
       
       <Excluded_Packages Name="C:\Documents and Settings\All Users\Documentos\RAD Studio\5.0\Bpl\dxPScxScheduler2LnkD11.bpl">File C:\Documents and Settings\All Users\Documentos\RAD Studio\5.0\Bpl\dxPScxScheduler2LnkD11.bpl not found</Excluded_Packages>
     </Excluded_Packages><Source><Source Name="MainSource">FactuGES.dpr</Source></Source></Delphi.Personality><ModelSupport>False</ModelSupport></BorlandProject></BorlandProject>
diff --git a/Source/Cliente/FactuGES.res b/Source/Cliente/FactuGES.res
index 9e52624..809f61f 100644
Binary files a/Source/Cliente/FactuGES.res and b/Source/Cliente/FactuGES.res differ
diff --git a/Source/Modulos/Contactos/Views/uViewCliente.dfm b/Source/Modulos/Contactos/Views/uViewCliente.dfm
index 675bf22..807d646 100644
--- a/Source/Modulos/Contactos/Views/uViewCliente.dfm
+++ b/Source/Modulos/Contactos/Views/uViewCliente.dfm
@@ -11,16 +11,16 @@ inherited frViewCliente: TfrViewCliente
     ExplicitWidth = 646
     ExplicitHeight = 563
     inherited PngSpeedButton1: TPngSpeedButton
-      Left = 584
-      ExplicitLeft = 584
+      Left = 582
+      ExplicitLeft = 582
     end
     inherited PngSpeedButton2: TPngSpeedButton
-      Left = 584
-      ExplicitLeft = 584
+      Left = 582
+      ExplicitLeft = 582
     end
     inherited PngSpeedButton3: TPngSpeedButton
-      Left = 584
-      ExplicitLeft = 584
+      Left = 582
+      ExplicitLeft = 582
     end
     inherited eCalle: TcxDBTextEdit
       Left = 132
@@ -62,24 +62,24 @@ inherited frViewCliente: TfrViewCliente
       Width = 213
     end
     inherited eCodigoPostal: TcxDBTextEdit
-      Left = 259
+      Left = 258
       Top = 247
       Style.LookAndFeel.SkinName = ''
       StyleDisabled.LookAndFeel.SkinName = ''
       StyleFocused.LookAndFeel.SkinName = ''
       StyleHot.LookAndFeel.SkinName = ''
       TabOrder = 9
-      ExplicitLeft = 259
+      ExplicitLeft = 258
       ExplicitTop = 247
     end
     inherited eTlfParticular: TcxDBTextEdit
-      Left = 440
+      Left = 439
       Style.LookAndFeel.SkinName = ''
       StyleDisabled.LookAndFeel.SkinName = ''
       StyleFocused.LookAndFeel.SkinName = ''
       StyleHot.LookAndFeel.SkinName = ''
       TabOrder = 15
-      ExplicitLeft = 440
+      ExplicitLeft = 439
       ExplicitWidth = 233
       Width = 233
     end
@@ -88,7 +88,6 @@ inherited frViewCliente: TfrViewCliente
       Top = 82
       DataBinding.DataField = 'NOMBRE_COMERCIAL'
       DataBinding.DataSource = dsContacto
-      Enabled = False
       Style.BorderColor = clWindowFrame
       Style.BorderStyle = ebs3D
       Style.Color = clWindow
@@ -242,35 +241,35 @@ inherited frViewCliente: TfrViewCliente
       Width = 211
     end
     inherited eTlfTrabajo: TcxDBTextEdit
-      Left = 440
+      Left = 439
       Style.LookAndFeel.SkinName = ''
       StyleDisabled.LookAndFeel.SkinName = ''
       StyleFocused.LookAndFeel.SkinName = ''
       StyleHot.LookAndFeel.SkinName = ''
       TabOrder = 14
-      ExplicitLeft = 440
+      ExplicitLeft = 439
       ExplicitWidth = 233
       Width = 233
     end
     inherited eTlfMovil: TcxDBTextEdit
-      Left = 440
+      Left = 439
       Style.LookAndFeel.SkinName = ''
       StyleDisabled.LookAndFeel.SkinName = ''
       StyleFocused.LookAndFeel.SkinName = ''
       StyleHot.LookAndFeel.SkinName = ''
       TabOrder = 16
-      ExplicitLeft = 440
+      ExplicitLeft = 439
       ExplicitWidth = 233
       Width = 233
     end
     inherited eFax: TcxDBTextEdit
-      Left = 440
+      Left = 439
       Style.LookAndFeel.SkinName = ''
       StyleDisabled.LookAndFeel.SkinName = ''
       StyleFocused.LookAndFeel.SkinName = ''
       StyleHot.LookAndFeel.SkinName = ''
       TabOrder = 17
-      ExplicitLeft = 440
+      ExplicitLeft = 439
       ExplicitWidth = 233
       Width = 233
     end
@@ -295,37 +294,37 @@ inherited frViewCliente: TfrViewCliente
       Width = 59
     end
     inherited eMailTrabajo: TcxDBHyperLinkEdit
-      Left = 440
+      Left = 439
       Properties.Prefix = 'mailto:'
       Style.LookAndFeel.SkinName = ''
       StyleDisabled.LookAndFeel.SkinName = ''
       StyleFocused.LookAndFeel.SkinName = ''
       StyleHot.LookAndFeel.SkinName = ''
       TabOrder = 18
-      ExplicitLeft = 440
+      ExplicitLeft = 439
       ExplicitWidth = 204
       Width = 204
     end
     inherited eMailParticular: TcxDBHyperLinkEdit
-      Left = 440
+      Left = 439
       Properties.Prefix = 'mailto:'
       Style.LookAndFeel.SkinName = ''
       StyleDisabled.LookAndFeel.SkinName = ''
       StyleFocused.LookAndFeel.SkinName = ''
       StyleHot.LookAndFeel.SkinName = ''
       TabOrder = 19
-      ExplicitLeft = 440
+      ExplicitLeft = 439
       ExplicitWidth = 204
       Width = 204
     end
     inherited ePaginaWeb: TcxDBHyperLinkEdit
-      Left = 440
+      Left = 439
       Style.LookAndFeel.SkinName = ''
       StyleDisabled.LookAndFeel.SkinName = ''
       StyleFocused.LookAndFeel.SkinName = ''
       StyleHot.LookAndFeel.SkinName = ''
       TabOrder = 20
-      ExplicitLeft = 440
+      ExplicitLeft = 439
       ExplicitWidth = 204
       Width = 204
     end
@@ -353,12 +352,12 @@ inherited frViewCliente: TfrViewCliente
       Width = 256
     end
     inherited frViewTienda1: TfrViewTienda
-      Left = 345
+      Left = 344
       Width = 270
       AutoSize = True
       Enabled = False
       TabOrder = 21
-      ExplicitLeft = 345
+      ExplicitLeft = 344
       ExplicitWidth = 270
       inherited dxLayoutControl1: TdxLayoutControl
         Width = 270
@@ -396,8 +395,6 @@ inherited frViewCliente: TfrViewCliente
           inherited dxLayoutControlContactoGroup1: TdxLayoutGroup
             object dxLayoutControlContactoItem24: TdxLayoutItem
               Caption = 'Nombre comercial:'
-              Enabled = False
-              Visible = False
               Control = eNombreComercial
               ControlOptions.ShowBorder = False
             end
diff --git a/Source/Modulos/Contactos/Views/uViewClientes.dfm b/Source/Modulos/Contactos/Views/uViewClientes.dfm
index c9bf262..1d697ae 100644
--- a/Source/Modulos/Contactos/Views/uViewClientes.dfm
+++ b/Source/Modulos/Contactos/Views/uViewClientes.dfm
@@ -9,7 +9,6 @@ inherited frViewClientes: TfrViewClientes
     ExplicitWidth = 633
     ExplicitHeight = 376
     inherited cxGridView: TcxGridDBTableView
-      DataController.Summary.FooterSummaryItems = <>
       object cxGridViewBLOQUEADO: TcxGridDBColumn [1]
         DataBinding.FieldName = 'BLOQUEADO'
         PropertiesClassName = 'TcxTextEditProperties'
@@ -46,8 +45,6 @@ inherited frViewClientes: TfrViewClientes
       end
       object cxGridViewNOMBRE_COMERCIAL: TcxGridDBColumn [6]
         DataBinding.FieldName = 'NOMBRE_COMERCIAL'
-        Visible = False
-        VisibleForCustomization = False
         Width = 164
       end
       object cxGridViewPERSONA_CONTACTO: TcxGridDBColumn [8]
diff --git a/Source/Modulos/Contactos/Views/uViewProveedor.dfm b/Source/Modulos/Contactos/Views/uViewProveedor.dfm
index d6a0623..755f38b 100644
--- a/Source/Modulos/Contactos/Views/uViewProveedor.dfm
+++ b/Source/Modulos/Contactos/Views/uViewProveedor.dfm
@@ -262,7 +262,6 @@ inherited frViewProveedor: TfrViewProveedor
       Top = 82
       DataBinding.DataField = 'NOMBRE_COMERCIAL'
       DataBinding.DataSource = dsContacto
-      Enabled = False
       Style.BorderColor = clWindowFrame
       Style.BorderStyle = ebs3D
       Style.Color = clWindow
@@ -363,8 +362,6 @@ inherited frViewProveedor: TfrViewProveedor
           inherited dxLayoutControlContactoGroup1: TdxLayoutGroup
             object dxLayoutControlContactoItem27: TdxLayoutItem
               Caption = 'Nombre comercial:'
-              Enabled = False
-              Visible = False
               Control = eNombreComercial
               ControlOptions.ShowBorder = False
             end
diff --git a/Source/Modulos/Contratos de cliente/Views/uViewContratosCliente.dfm b/Source/Modulos/Contratos de cliente/Views/uViewContratosCliente.dfm
index 48d6489..4336463 100644
--- a/Source/Modulos/Contratos de cliente/Views/uViewContratosCliente.dfm	
+++ b/Source/Modulos/Contratos de cliente/Views/uViewContratosCliente.dfm	
@@ -101,6 +101,10 @@ inherited frViewContratosCliente: TfrViewContratosCliente
         DataBinding.FieldName = 'NOMBRE'
         Width = 161
       end
+      object cxGridViewNOMBRE_COMERCIAL_CLIENTE: TcxGridDBColumn
+        Caption = 'Nombre comercial'
+        DataBinding.FieldName = 'NOMBRE_COMERCIAL_CLIENTE'
+      end
       object cxGridViewBASE_IMPONIBLE: TcxGridDBColumn
         Caption = 'Base imponible'
         DataBinding.FieldName = 'BASE_IMPONIBLE'
diff --git a/Source/Modulos/Contratos de cliente/Views/uViewContratosCliente.pas b/Source/Modulos/Contratos de cliente/Views/uViewContratosCliente.pas
index 9636d85..954d4a8 100644
--- a/Source/Modulos/Contratos de cliente/Views/uViewContratosCliente.pas	
+++ b/Source/Modulos/Contratos de cliente/Views/uViewContratosCliente.pas	
@@ -45,6 +45,7 @@ type
     cxGridViewIMPORTE_IVA: TcxGridDBColumn;
     cxGridViewIVA: TcxGridDBColumn;
     cxGridViewBASE_IMPONIBLE: TcxGridDBColumn;
+    cxGridViewNOMBRE_COMERCIAL_CLIENTE: TcxGridDBColumn;
     procedure cxGridActiveTabChanged(Sender: TcxCustomGrid; ALevel:
             TcxGridLevel);
     procedure cxGridViewStylesGetContentStyle(Sender: TcxCustomGridTableView;
diff --git a/Source/Modulos/Facturas de cliente/Views/uViewFacturasCliente.dfm b/Source/Modulos/Facturas de cliente/Views/uViewFacturasCliente.dfm
index e78eddd..865b831 100644
--- a/Source/Modulos/Facturas de cliente/Views/uViewFacturasCliente.dfm	
+++ b/Source/Modulos/Facturas de cliente/Views/uViewFacturasCliente.dfm	
@@ -59,8 +59,6 @@ inherited frViewFacturasCliente: TfrViewFacturasCliente
       object cxGridViewNOMBRE_COMERCIAL: TcxGridDBColumn
         Caption = 'Nombre comercial'
         DataBinding.FieldName = 'NOMBRE_COMERCIAL_CLIENTE'
-        Visible = False
-        VisibleForCustomization = False
       end
       object cxGridViewNOMBRE_CLIENTE: TcxGridDBColumn
         Caption = 'Cliente'
diff --git a/Source/Modulos/Facturas de proveedor/Views/uViewFacturasProveedor.dfm b/Source/Modulos/Facturas de proveedor/Views/uViewFacturasProveedor.dfm
index d6b415c..7eaf825 100644
--- a/Source/Modulos/Facturas de proveedor/Views/uViewFacturasProveedor.dfm	
+++ b/Source/Modulos/Facturas de proveedor/Views/uViewFacturasProveedor.dfm	
@@ -106,11 +106,9 @@ inherited frViewFacturasProveedor: TfrViewFacturasProveedor
         Caption = 'Proveedor'
         DataBinding.FieldName = 'NOMBRE_PROVEEDOR'
       end
-      object cxGridViewNOMBRE_COMERCIAL: TcxGridDBColumn
+      object cxGridViewNOMBRE_COMERCIAL_PROVEEDOR: TcxGridDBColumn
         Caption = 'Nombre comercial'
-        DataBinding.FieldName = 'NOMBRE_COMERCIAL'
-        Visible = False
-        VisibleForCustomization = False
+        DataBinding.FieldName = 'NOMBRE_COMERCIAL_PROVEEDOR'
       end
       object cxGridViewNIF_CIF: TcxGridDBColumn
         DataBinding.FieldName = 'NIF_CIF'
diff --git a/Source/Modulos/Facturas de proveedor/Views/uViewFacturasProveedor.pas b/Source/Modulos/Facturas de proveedor/Views/uViewFacturasProveedor.pas
index 320e69e..92cf936 100644
--- a/Source/Modulos/Facturas de proveedor/Views/uViewFacturasProveedor.pas	
+++ b/Source/Modulos/Facturas de proveedor/Views/uViewFacturasProveedor.pas	
@@ -60,7 +60,7 @@ type
     cxGridViewTIPO: TcxGridDBColumn;
     cxGridViewTIENDA: TcxGridDBColumn;
     cxGridViewNOMBRE_PROVEEDOR: TcxGridDBColumn;
-    cxGridViewNOMBRE_COMERCIAL: TcxGridDBColumn;
+    cxGridViewNOMBRE_COMERCIAL_PROVEEDOR: TcxGridDBColumn;
     cxGridViewFECHA_VENCIMIENTO: TcxGridDBColumn;
     procedure cxGridViewStylesGetContentStyle(Sender: TcxCustomGridTableView;
       ARecord: TcxCustomGridRecord; AItem: TcxCustomGridTableItem;
diff --git a/Source/Modulos/Presupuestos de cliente/Data/PresupuestosCliente_data.RES b/Source/Modulos/Presupuestos de cliente/Data/PresupuestosCliente_data.RES
index 8b251f3..1641339 100644
Binary files a/Source/Modulos/Presupuestos de cliente/Data/PresupuestosCliente_data.RES and b/Source/Modulos/Presupuestos de cliente/Data/PresupuestosCliente_data.RES differ
diff --git a/Source/Modulos/Presupuestos de cliente/Data/PresupuestosCliente_data.dproj b/Source/Modulos/Presupuestos de cliente/Data/PresupuestosCliente_data.dproj
index 3127d45..f6e7824 100644
--- a/Source/Modulos/Presupuestos de cliente/Data/PresupuestosCliente_data.dproj	
+++ b/Source/Modulos/Presupuestos de cliente/Data/PresupuestosCliente_data.dproj	
@@ -49,7 +49,7 @@
     <DelphiCompile Include="PresupuestosCliente_data.dpk">
       <MainSource>MainSource</MainSource>
     </DelphiCompile>
-    <DCCReference Include="..\PresupuestosCliente_model.dcp" />
+    <DCCReference Include="..\..\..\Servidor\PresupuestosCliente_model.dcp" />
     <DCCReference Include="uDataModulePresupuestosCliente.pas">
       <Form>DataModulePresupuestosCliente</Form>
     </DCCReference>
diff --git a/Source/Modulos/Presupuestos de cliente/Data/uDataModulePresupuestosCliente.dfm b/Source/Modulos/Presupuestos de cliente/Data/uDataModulePresupuestosCliente.dfm
index bebd16e..66de96c 100644
--- a/Source/Modulos/Presupuestos de cliente/Data/uDataModulePresupuestosCliente.dfm	
+++ b/Source/Modulos/Presupuestos de cliente/Data/uDataModulePresupuestosCliente.dfm	
@@ -100,6 +100,11 @@ inherited DataModulePresupuestosCliente: TDataModulePresupuestosCliente
         ServerAutoRefresh = True
         DictionaryEntry = 'PresupuestosCliente_NOMBRE'
       end
+      item
+        Name = 'NOMBRE_COMERCIAL_CLIENTE'
+        DataType = datString
+        Size = 255
+      end
       item
         Name = 'PERSONA_CONTACTO'
         DataType = datString
diff --git a/Source/Modulos/Presupuestos de cliente/Model/schPresupuestosClienteClient_Intf.pas b/Source/Modulos/Presupuestos de cliente/Model/schPresupuestosClienteClient_Intf.pas
index 0ab595d..6de691b 100644
--- a/Source/Modulos/Presupuestos de cliente/Model/schPresupuestosClienteClient_Intf.pas	
+++ b/Source/Modulos/Presupuestos de cliente/Model/schPresupuestosClienteClient_Intf.pas	
@@ -3,18 +3,18 @@ unit schPresupuestosClienteClient_Intf;
 interface
 
 uses
-  Classes, DB, schBase_Intf, SysUtils, uROClasses, uDAInterfaces, uDADataTable, FmtBCD, uROXMLIntf;
+  Classes, DB, SysUtils, uROClasses, uDAInterfaces, uDADataTable, FmtBCD, uROXMLIntf;
 
 const
   { Data table rules ids
        Feel free to change them to something more human readable
        but make sure they are unique in the context of your application }
-  RID_Valores = '{C22F2D6D-67BA-4245-80B3-EEFC0B515DCB}';
-  RID_Propiedades = '{025877AE-7F09-4408-8F07-E91C27E0122F}';
-  RID_ListaAnosPresupuestos = '{E9370224-CCED-4127-8E1C-5970DBC7A1CC}';
-  RID_PresupuestosCliente = '{EFA77388-391C-4EC2-BCC3-D7C2DA188448}';
-  RID_CapitulosPresupuesto = '{A3EF8730-6F18-42FA-B29A-7A382E0E8334}';
-  RID_PresupuestosCliente_Detalles = '{F6B388F3-D596-4B8F-BEDA-2006C2C63EA5}';
+  RID_Valores = '{A5458B62-066F-4E1D-BD46-485BD2F56B42}';
+  RID_Propiedades = '{D524BE56-1004-41BB-BD04-5CF981EC5029}';
+  RID_ListaAnosPresupuestos = '{BC6293D8-84F1-413E-9723-49BEF6862023}';
+  RID_PresupuestosCliente = '{6738C9B3-0BA6-4368-AAF4-C7D8969E6641}';
+  RID_CapitulosPresupuesto = '{171AFE2B-90DF-4D2C-876F-7D95CB7837A4}';
+  RID_PresupuestosCliente_Detalles = '{3942E16E-4EDC-4292-94DA-DF8391A78D86}';
 
   { Data table names }
   nme_Valores = 'Valores';
@@ -67,6 +67,7 @@ const
   fld_PresupuestosClienteID_DIRECCION = 'ID_DIRECCION';
   fld_PresupuestosClienteNIF_CIF = 'NIF_CIF';
   fld_PresupuestosClienteNOMBRE = 'NOMBRE';
+  fld_PresupuestosClienteNOMBRE_COMERCIAL_CLIENTE = 'NOMBRE_COMERCIAL_CLIENTE';
   fld_PresupuestosClientePERSONA_CONTACTO = 'PERSONA_CONTACTO';
   fld_PresupuestosClienteFORMA_PAGO = 'FORMA_PAGO';
   fld_PresupuestosClientePLAZO_ENTREGA = 'PLAZO_ENTREGA';
@@ -111,36 +112,37 @@ const
   idx_PresupuestosClienteID_DIRECCION = 9;
   idx_PresupuestosClienteNIF_CIF = 10;
   idx_PresupuestosClienteNOMBRE = 11;
-  idx_PresupuestosClientePERSONA_CONTACTO = 12;
-  idx_PresupuestosClienteFORMA_PAGO = 13;
-  idx_PresupuestosClientePLAZO_ENTREGA = 14;
-  idx_PresupuestosClienteOBSERVACIONES = 15;
-  idx_PresupuestosClienteINCIDENCIAS = 16;
-  idx_PresupuestosClienteINCIDENCIAS_ACTIVAS = 17;
-  idx_PresupuestosClienteFECHA_ALTA = 18;
-  idx_PresupuestosClienteFECHA_MODIFICACION = 19;
-  idx_PresupuestosClienteUSUARIO = 20;
-  idx_PresupuestosClienteIMPORTE_NETO = 21;
-  idx_PresupuestosClienteIMPORTE_PORTE = 22;
-  idx_PresupuestosClienteDESCUENTO = 23;
-  idx_PresupuestosClienteIMPORTE_DESCUENTO = 24;
-  idx_PresupuestosClienteBASE_IMPONIBLE = 25;
-  idx_PresupuestosClienteID_TIPO_IVA = 26;
-  idx_PresupuestosClienteIVA = 27;
-  idx_PresupuestosClienteIMPORTE_IVA = 28;
-  idx_PresupuestosClienteRE = 29;
-  idx_PresupuestosClienteIMPORTE_RE = 30;
-  idx_PresupuestosClienteRECARGO_EQUIVALENCIA = 31;
-  idx_PresupuestosClienteIMPORTE_TOTAL = 32;
-  idx_PresupuestosClienteID_FORMA_PAGO = 33;
-  idx_PresupuestosClienteID_TIENDA = 34;
-  idx_PresupuestosClienteTIENDA = 35;
-  idx_PresupuestosClienteID_VENDEDOR = 36;
-  idx_PresupuestosClienteVENDEDOR = 37;
-  idx_PresupuestosClienteID_CONTRATO = 38;
-  idx_PresupuestosClienteREF_CONTRATO = 39;
-  idx_PresupuestosClienteNO_VALORADO = 40;
-  idx_PresupuestosClienteTIPO_PRESUPUESTO = 41;
+  idx_PresupuestosClienteNOMBRE_COMERCIAL_CLIENTE = 12;
+  idx_PresupuestosClientePERSONA_CONTACTO = 13;
+  idx_PresupuestosClienteFORMA_PAGO = 14;
+  idx_PresupuestosClientePLAZO_ENTREGA = 15;
+  idx_PresupuestosClienteOBSERVACIONES = 16;
+  idx_PresupuestosClienteINCIDENCIAS = 17;
+  idx_PresupuestosClienteINCIDENCIAS_ACTIVAS = 18;
+  idx_PresupuestosClienteFECHA_ALTA = 19;
+  idx_PresupuestosClienteFECHA_MODIFICACION = 20;
+  idx_PresupuestosClienteUSUARIO = 21;
+  idx_PresupuestosClienteIMPORTE_NETO = 22;
+  idx_PresupuestosClienteIMPORTE_PORTE = 23;
+  idx_PresupuestosClienteDESCUENTO = 24;
+  idx_PresupuestosClienteIMPORTE_DESCUENTO = 25;
+  idx_PresupuestosClienteBASE_IMPONIBLE = 26;
+  idx_PresupuestosClienteID_TIPO_IVA = 27;
+  idx_PresupuestosClienteIVA = 28;
+  idx_PresupuestosClienteIMPORTE_IVA = 29;
+  idx_PresupuestosClienteRE = 30;
+  idx_PresupuestosClienteIMPORTE_RE = 31;
+  idx_PresupuestosClienteRECARGO_EQUIVALENCIA = 32;
+  idx_PresupuestosClienteIMPORTE_TOTAL = 33;
+  idx_PresupuestosClienteID_FORMA_PAGO = 34;
+  idx_PresupuestosClienteID_TIENDA = 35;
+  idx_PresupuestosClienteTIENDA = 36;
+  idx_PresupuestosClienteID_VENDEDOR = 37;
+  idx_PresupuestosClienteVENDEDOR = 38;
+  idx_PresupuestosClienteID_CONTRATO = 39;
+  idx_PresupuestosClienteREF_CONTRATO = 40;
+  idx_PresupuestosClienteNO_VALORADO = 41;
+  idx_PresupuestosClienteTIPO_PRESUPUESTO = 42;
 
   { CapitulosPresupuesto fields }
   fld_CapitulosPresupuestoID = 'ID';
@@ -211,7 +213,7 @@ const
 type
   { IValores }
   IValores = interface(IDAStronglyTypedDataTable)
-  ['{C60C05EF-A689-43CF-B163-9ADAE9E8DBF5}']
+  ['{82BB1B56-C980-46F2-83B4-E19163603D0E}']
     { Property getters and setters }
     function GetIDValue: Integer;
     procedure SetIDValue(const aValue: Integer);
@@ -255,7 +257,7 @@ type
   end;
 
   { TValoresDataTableRules }
-  TValoresDataTableRules = class(TIntfObjectDADataTableRules, IValores)
+  TValoresDataTableRules = class(TDADataTableRules, IValores)
   private
   protected
     { Property getters and setters }
@@ -306,7 +308,7 @@ type
 
   { IPropiedades }
   IPropiedades = interface(IDAStronglyTypedDataTable)
-  ['{96845BFC-8076-43FF-A1E7-EA21F67A9373}']
+  ['{A2B5287A-DDBA-4FE4-A590-0EF30C217613}']
     { Property getters and setters }
     function GetIDValue: Integer;
     procedure SetIDValue(const aValue: Integer);
@@ -326,7 +328,7 @@ type
   end;
 
   { TPropiedadesDataTableRules }
-  TPropiedadesDataTableRules = class(TIntfObjectDADataTableRules, IPropiedades)
+  TPropiedadesDataTableRules = class(TDADataTableRules, IPropiedades)
   private
   protected
     { Property getters and setters }
@@ -353,7 +355,7 @@ type
 
   { IListaAnosPresupuestos }
   IListaAnosPresupuestos = interface(IDAStronglyTypedDataTable)
-  ['{1CBD727A-F7D4-47C0-9B97-64B895E88FC4}']
+  ['{0F73757A-1F3C-4249-8624-047E665CC979}']
     { Property getters and setters }
     function GetANOValue: String;
     procedure SetANOValue(const aValue: String);
@@ -367,7 +369,7 @@ type
   end;
 
   { TListaAnosPresupuestosDataTableRules }
-  TListaAnosPresupuestosDataTableRules = class(TIntfObjectDADataTableRules, IListaAnosPresupuestos)
+  TListaAnosPresupuestosDataTableRules = class(TDADataTableRules, IListaAnosPresupuestos)
   private
   protected
     { Property getters and setters }
@@ -388,7 +390,7 @@ type
 
   { IPresupuestosCliente }
   IPresupuestosCliente = interface(IDAStronglyTypedDataTable)
-  ['{363D2686-FD82-4CE7-A8F8-DB83C6E25063}']
+  ['{FB47C1AF-80A4-45E1-B9EF-C1A9C6200DD4}']
     { Property getters and setters }
     function GetIDValue: Integer;
     procedure SetIDValue(const aValue: Integer);
@@ -438,6 +440,10 @@ type
     procedure SetNOMBREValue(const aValue: String);
     function GetNOMBREIsNull: Boolean;
     procedure SetNOMBREIsNull(const aValue: Boolean);
+    function GetNOMBRE_COMERCIAL_CLIENTEValue: String;
+    procedure SetNOMBRE_COMERCIAL_CLIENTEValue(const aValue: String);
+    function GetNOMBRE_COMERCIAL_CLIENTEIsNull: Boolean;
+    procedure SetNOMBRE_COMERCIAL_CLIENTEIsNull(const aValue: Boolean);
     function GetPERSONA_CONTACTOValue: String;
     procedure SetPERSONA_CONTACTOValue(const aValue: String);
     function GetPERSONA_CONTACTOIsNull: Boolean;
@@ -581,6 +587,8 @@ type
     property NIF_CIFIsNull: Boolean read GetNIF_CIFIsNull write SetNIF_CIFIsNull;
     property NOMBRE: String read GetNOMBREValue write SetNOMBREValue;
     property NOMBREIsNull: Boolean read GetNOMBREIsNull write SetNOMBREIsNull;
+    property NOMBRE_COMERCIAL_CLIENTE: String read GetNOMBRE_COMERCIAL_CLIENTEValue write SetNOMBRE_COMERCIAL_CLIENTEValue;
+    property NOMBRE_COMERCIAL_CLIENTEIsNull: Boolean read GetNOMBRE_COMERCIAL_CLIENTEIsNull write SetNOMBRE_COMERCIAL_CLIENTEIsNull;
     property PERSONA_CONTACTO: String read GetPERSONA_CONTACTOValue write SetPERSONA_CONTACTOValue;
     property PERSONA_CONTACTOIsNull: Boolean read GetPERSONA_CONTACTOIsNull write SetPERSONA_CONTACTOIsNull;
     property FORMA_PAGO: IROStrings read GetFORMA_PAGOValue;
@@ -644,7 +652,7 @@ type
   end;
 
   { TPresupuestosClienteDataTableRules }
-  TPresupuestosClienteDataTableRules = class(TIntfObjectDADataTableRules, IPresupuestosCliente)
+  TPresupuestosClienteDataTableRules = class(TDADataTableRules, IPresupuestosCliente)
   private
     f_FORMA_PAGO: IROStrings;
     f_PLAZO_ENTREGA: IROStrings;
@@ -704,6 +712,10 @@ type
     procedure SetNOMBREValue(const aValue: String); virtual;
     function GetNOMBREIsNull: Boolean; virtual;
     procedure SetNOMBREIsNull(const aValue: Boolean); virtual;
+    function GetNOMBRE_COMERCIAL_CLIENTEValue: String; virtual;
+    procedure SetNOMBRE_COMERCIAL_CLIENTEValue(const aValue: String); virtual;
+    function GetNOMBRE_COMERCIAL_CLIENTEIsNull: Boolean; virtual;
+    procedure SetNOMBRE_COMERCIAL_CLIENTEIsNull(const aValue: Boolean); virtual;
     function GetPERSONA_CONTACTOValue: String; virtual;
     procedure SetPERSONA_CONTACTOValue(const aValue: String); virtual;
     function GetPERSONA_CONTACTOIsNull: Boolean; virtual;
@@ -846,6 +858,8 @@ type
     property NIF_CIFIsNull: Boolean read GetNIF_CIFIsNull write SetNIF_CIFIsNull;
     property NOMBRE: String read GetNOMBREValue write SetNOMBREValue;
     property NOMBREIsNull: Boolean read GetNOMBREIsNull write SetNOMBREIsNull;
+    property NOMBRE_COMERCIAL_CLIENTE: String read GetNOMBRE_COMERCIAL_CLIENTEValue write SetNOMBRE_COMERCIAL_CLIENTEValue;
+    property NOMBRE_COMERCIAL_CLIENTEIsNull: Boolean read GetNOMBRE_COMERCIAL_CLIENTEIsNull write SetNOMBRE_COMERCIAL_CLIENTEIsNull;
     property PERSONA_CONTACTO: String read GetPERSONA_CONTACTOValue write SetPERSONA_CONTACTOValue;
     property PERSONA_CONTACTOIsNull: Boolean read GetPERSONA_CONTACTOIsNull write SetPERSONA_CONTACTOIsNull;
     property FORMA_PAGO: IROStrings read GetFORMA_PAGOValue;
@@ -915,7 +929,7 @@ type
 
   { ICapitulosPresupuesto }
   ICapitulosPresupuesto = interface(IDAStronglyTypedDataTable)
-  ['{338F22FC-3A4B-4933-8DC4-1A420BAD9FCB}']
+  ['{D7F2C20E-B842-4066-924B-0A8C8B4E27EF}']
     { Property getters and setters }
     function GetIDValue: Integer;
     procedure SetIDValue(const aValue: Integer);
@@ -995,7 +1009,7 @@ type
   end;
 
   { TCapitulosPresupuestoDataTableRules }
-  TCapitulosPresupuestoDataTableRules = class(TIntfObjectDADataTableRules, ICapitulosPresupuesto)
+  TCapitulosPresupuestoDataTableRules = class(TDADataTableRules, ICapitulosPresupuesto)
   private
   protected
     { Property getters and setters }
@@ -1082,7 +1096,7 @@ type
 
   { IPresupuestosCliente_Detalles }
   IPresupuestosCliente_Detalles = interface(IDAStronglyTypedDataTable)
-  ['{C4E01248-FEE0-4706-ABF3-74ABEF686652}']
+  ['{54C5E7E0-D737-4603-A4E4-B8507C4870EE}']
     { Property getters and setters }
     function GetIDValue: Integer;
     procedure SetIDValue(const aValue: Integer);
@@ -1192,7 +1206,7 @@ type
   end;
 
   { TPresupuestosCliente_DetallesDataTableRules }
-  TPresupuestosCliente_DetallesDataTableRules = class(TIntfObjectDADataTableRules, IPresupuestosCliente_Detalles)
+  TPresupuestosCliente_DetallesDataTableRules = class(TDADataTableRules, IPresupuestosCliente_Detalles)
   private
   protected
     { Property getters and setters }
@@ -1837,6 +1851,27 @@ begin
     DataTable.Fields[idx_PresupuestosClienteNOMBRE].AsVariant := Null;
 end;
 
+function TPresupuestosClienteDataTableRules.GetNOMBRE_COMERCIAL_CLIENTEValue: String;
+begin
+  result := DataTable.Fields[idx_PresupuestosClienteNOMBRE_COMERCIAL_CLIENTE].AsString;
+end;
+
+procedure TPresupuestosClienteDataTableRules.SetNOMBRE_COMERCIAL_CLIENTEValue(const aValue: String);
+begin
+  DataTable.Fields[idx_PresupuestosClienteNOMBRE_COMERCIAL_CLIENTE].AsString := aValue;
+end;
+
+function TPresupuestosClienteDataTableRules.GetNOMBRE_COMERCIAL_CLIENTEIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_PresupuestosClienteNOMBRE_COMERCIAL_CLIENTE].IsNull;
+end;
+
+procedure TPresupuestosClienteDataTableRules.SetNOMBRE_COMERCIAL_CLIENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_PresupuestosClienteNOMBRE_COMERCIAL_CLIENTE].AsVariant := Null;
+end;
+
 function TPresupuestosClienteDataTableRules.GetPERSONA_CONTACTOValue: String;
 begin
   result := DataTable.Fields[idx_PresupuestosClientePERSONA_CONTACTO].AsString;
diff --git a/Source/Modulos/Presupuestos de cliente/Model/schPresupuestosClienteServer_Intf.pas b/Source/Modulos/Presupuestos de cliente/Model/schPresupuestosClienteServer_Intf.pas
index bc0e4c4..28b0ff5 100644
--- a/Source/Modulos/Presupuestos de cliente/Model/schPresupuestosClienteServer_Intf.pas	
+++ b/Source/Modulos/Presupuestos de cliente/Model/schPresupuestosClienteServer_Intf.pas	
@@ -9,17 +9,17 @@ const
   { Delta rules ids 
        Feel free to change them to something more human readable
        but make sure they are unique in the context of your application }
-  RID_ValoresDelta = '{23B065AE-0C56-49AB-AE63-95BE6E6F97B0}';
-  RID_PropiedadesDelta = '{9E323215-A8B5-49BE-9C72-00B586B8BCEE}';
-  RID_ListaAnosPresupuestosDelta = '{E8D41C0D-67FE-4D0A-A225-B8378BE12D2A}';
-  RID_PresupuestosClienteDelta = '{7C87F0CD-0CBC-421B-B576-A4D796983F8B}';
-  RID_CapitulosPresupuestoDelta = '{6EDFBB65-57A2-4980-BEDE-2E73503BE6FC}';
-  RID_PresupuestosCliente_DetallesDelta = '{C9A2968D-C52A-4E32-9751-111EDCB641D2}';
+  RID_ValoresDelta = '{0CBA7710-1287-477B-820B-9EF7C4400800}';
+  RID_PropiedadesDelta = '{1CD26D05-AA8C-485F-A54A-129C397B225D}';
+  RID_ListaAnosPresupuestosDelta = '{B432068B-A238-4DCA-B2BA-8D3C702695B3}';
+  RID_PresupuestosClienteDelta = '{B57C42EA-9FBE-44AF-BAEB-ADA925E76098}';
+  RID_CapitulosPresupuestoDelta = '{D4A184E8-DC2B-470F-86FB-2B056293EE0B}';
+  RID_PresupuestosCliente_DetallesDelta = '{2B8FD7B3-7D95-4CCC-A0ED-AD1418D4E8E1}';
 
 type
   { IValoresDelta }
   IValoresDelta = interface(IValores)
-  ['{23B065AE-0C56-49AB-AE63-95BE6E6F97B0}']
+  ['{0CBA7710-1287-477B-820B-9EF7C4400800}']
     { Property getters and setters }
     function GetOldIDValue : Integer;
     function GetOldID_EMPRESAValue : Integer;
@@ -113,7 +113,7 @@ type
 
   { IPropiedadesDelta }
   IPropiedadesDelta = interface(IPropiedades)
-  ['{9E323215-A8B5-49BE-9C72-00B586B8BCEE}']
+  ['{1CD26D05-AA8C-485F-A54A-129C397B225D}']
     { Property getters and setters }
     function GetOldIDValue : Integer;
     function GetOldDESCRIPCIONValue : String;
@@ -159,7 +159,7 @@ type
 
   { IListaAnosPresupuestosDelta }
   IListaAnosPresupuestosDelta = interface(IListaAnosPresupuestos)
-  ['{E8D41C0D-67FE-4D0A-A225-B8378BE12D2A}']
+  ['{B432068B-A238-4DCA-B2BA-8D3C702695B3}']
     { Property getters and setters }
     function GetOldANOValue : String;
 
@@ -193,7 +193,7 @@ type
 
   { IPresupuestosClienteDelta }
   IPresupuestosClienteDelta = interface(IPresupuestosCliente)
-  ['{7C87F0CD-0CBC-421B-B576-A4D796983F8B}']
+  ['{B57C42EA-9FBE-44AF-BAEB-ADA925E76098}']
     { Property getters and setters }
     function GetOldIDValue : Integer;
     function GetOldID_EMPRESAValue : Integer;
@@ -207,6 +207,7 @@ type
     function GetOldID_DIRECCIONValue : Integer;
     function GetOldNIF_CIFValue : String;
     function GetOldNOMBREValue : String;
+    function GetOldNOMBRE_COMERCIAL_CLIENTEValue : String;
     function GetOldPERSONA_CONTACTOValue : String;
     function GetOldFORMA_PAGOValue : IROStrings;
     function GetOldPLAZO_ENTREGAValue : IROStrings;
@@ -251,6 +252,7 @@ type
     property OldID_DIRECCION : Integer read GetOldID_DIRECCIONValue;
     property OldNIF_CIF : String read GetOldNIF_CIFValue;
     property OldNOMBRE : String read GetOldNOMBREValue;
+    property OldNOMBRE_COMERCIAL_CLIENTE : String read GetOldNOMBRE_COMERCIAL_CLIENTEValue;
     property OldPERSONA_CONTACTO : String read GetOldPERSONA_CONTACTOValue;
     property OldFORMA_PAGO : IROStrings read GetOldFORMA_PAGOValue;
     property OldPLAZO_ENTREGA : IROStrings read GetOldPLAZO_ENTREGAValue;
@@ -368,6 +370,12 @@ type
     function GetOldNOMBREIsNull: Boolean; virtual;
     procedure SetNOMBREValue(const aValue: String); virtual;
     procedure SetNOMBREIsNull(const aValue: Boolean); virtual;
+    function GetNOMBRE_COMERCIAL_CLIENTEValue: String; virtual;
+    function GetNOMBRE_COMERCIAL_CLIENTEIsNull: Boolean; virtual;
+    function GetOldNOMBRE_COMERCIAL_CLIENTEValue: String; virtual;
+    function GetOldNOMBRE_COMERCIAL_CLIENTEIsNull: Boolean; virtual;
+    procedure SetNOMBRE_COMERCIAL_CLIENTEValue(const aValue: String); virtual;
+    procedure SetNOMBRE_COMERCIAL_CLIENTEIsNull(const aValue: Boolean); virtual;
     function GetPERSONA_CONTACTOValue: String; virtual;
     function GetPERSONA_CONTACTOIsNull: Boolean; virtual;
     function GetOldPERSONA_CONTACTOValue: String; virtual;
@@ -594,6 +602,10 @@ type
     property NOMBREIsNull : Boolean read GetNOMBREIsNull write SetNOMBREIsNull;
     property OldNOMBRE : String read GetOldNOMBREValue;
     property OldNOMBREIsNull : Boolean read GetOldNOMBREIsNull;
+    property NOMBRE_COMERCIAL_CLIENTE : String read GetNOMBRE_COMERCIAL_CLIENTEValue write SetNOMBRE_COMERCIAL_CLIENTEValue;
+    property NOMBRE_COMERCIAL_CLIENTEIsNull : Boolean read GetNOMBRE_COMERCIAL_CLIENTEIsNull write SetNOMBRE_COMERCIAL_CLIENTEIsNull;
+    property OldNOMBRE_COMERCIAL_CLIENTE : String read GetOldNOMBRE_COMERCIAL_CLIENTEValue;
+    property OldNOMBRE_COMERCIAL_CLIENTEIsNull : Boolean read GetOldNOMBRE_COMERCIAL_CLIENTEIsNull;
     property PERSONA_CONTACTO : String read GetPERSONA_CONTACTOValue write SetPERSONA_CONTACTOValue;
     property PERSONA_CONTACTOIsNull : Boolean read GetPERSONA_CONTACTOIsNull write SetPERSONA_CONTACTOIsNull;
     property OldPERSONA_CONTACTO : String read GetOldPERSONA_CONTACTOValue;
@@ -723,7 +735,7 @@ type
 
   { ICapitulosPresupuestoDelta }
   ICapitulosPresupuestoDelta = interface(ICapitulosPresupuesto)
-  ['{6EDFBB65-57A2-4980-BEDE-2E73503BE6FC}']
+  ['{D4A184E8-DC2B-470F-86FB-2B056293EE0B}']
     { Property getters and setters }
     function GetOldIDValue : Integer;
     function GetOldPOSICIONValue : Integer;
@@ -889,7 +901,7 @@ type
 
   { IPresupuestosCliente_DetallesDelta }
   IPresupuestosCliente_DetallesDelta = interface(IPresupuestosCliente_Detalles)
-  ['{C9A2968D-C52A-4E32-9751-111EDCB641D2}']
+  ['{2B8FD7B3-7D95-4CCC-A0ED-AD1418D4E8E1}']
     { Property getters and setters }
     function GetOldIDValue : Integer;
     function GetOldID_PRESUPUESTOValue : Integer;
@@ -1854,6 +1866,37 @@ begin
     BusinessProcessor.CurrentChange.NewValueByName[fld_PresupuestosClienteNOMBRE] := Null;
 end;
 
+function TPresupuestosClienteBusinessProcessorRules.GetNOMBRE_COMERCIAL_CLIENTEValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_PresupuestosClienteNOMBRE_COMERCIAL_CLIENTE];
+end;
+
+function TPresupuestosClienteBusinessProcessorRules.GetNOMBRE_COMERCIAL_CLIENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_PresupuestosClienteNOMBRE_COMERCIAL_CLIENTE]);
+end;
+
+function TPresupuestosClienteBusinessProcessorRules.GetOldNOMBRE_COMERCIAL_CLIENTEValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_PresupuestosClienteNOMBRE_COMERCIAL_CLIENTE];
+end;
+
+function TPresupuestosClienteBusinessProcessorRules.GetOldNOMBRE_COMERCIAL_CLIENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_PresupuestosClienteNOMBRE_COMERCIAL_CLIENTE]);
+end;
+
+procedure TPresupuestosClienteBusinessProcessorRules.SetNOMBRE_COMERCIAL_CLIENTEValue(const aValue: String);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_PresupuestosClienteNOMBRE_COMERCIAL_CLIENTE] := aValue;
+end;
+
+procedure TPresupuestosClienteBusinessProcessorRules.SetNOMBRE_COMERCIAL_CLIENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_PresupuestosClienteNOMBRE_COMERCIAL_CLIENTE] := Null;
+end;
+
 function TPresupuestosClienteBusinessProcessorRules.GetPERSONA_CONTACTOValue: String;
 begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_PresupuestosClientePERSONA_CONTACTO];
diff --git a/Source/Modulos/Presupuestos de cliente/Servidor/srvPresupuestosCliente_Impl.dfm b/Source/Modulos/Presupuestos de cliente/Servidor/srvPresupuestosCliente_Impl.dfm
index 635e57c..6976b68 100644
--- a/Source/Modulos/Presupuestos de cliente/Servidor/srvPresupuestosCliente_Impl.dfm	
+++ b/Source/Modulos/Presupuestos de cliente/Servidor/srvPresupuestosCliente_Impl.dfm	
@@ -320,6 +320,10 @@ object srvPresupuestosCliente: TsrvPresupuestosCliente
               item
                 DatasetField = 'REFERENCIA_CLIENTE'
                 TableField = 'REFERENCIA_CLIENTE'
+              end
+              item
+                DatasetField = 'NOMBRE_COMERCIAL_CLIENTE'
+                TableField = 'NOMBRE_COMERCIAL_CLIENTE'
               end>
           end>
         Name = 'PresupuestosCliente'
@@ -391,6 +395,11 @@ object srvPresupuestosCliente: TsrvPresupuestosCliente
             ServerAutoRefresh = True
             DictionaryEntry = 'PresupuestosCliente_NOMBRE'
           end
+          item
+            Name = 'NOMBRE_COMERCIAL_CLIENTE'
+            DataType = datString
+            Size = 255
+          end
           item
             Name = 'PERSONA_CONTACTO'
             DataType = datString
diff --git a/Source/Modulos/Presupuestos de cliente/Views/uViewPresupuestosCliente.dfm b/Source/Modulos/Presupuestos de cliente/Views/uViewPresupuestosCliente.dfm
index 330c32d..cdeb729 100644
--- a/Source/Modulos/Presupuestos de cliente/Views/uViewPresupuestosCliente.dfm	
+++ b/Source/Modulos/Presupuestos de cliente/Views/uViewPresupuestosCliente.dfm	
@@ -138,6 +138,10 @@ inherited frViewPresupuestosCliente: TfrViewPresupuestosCliente
         BestFitMaxWidth = 25
         Width = 63
       end
+      object cxGridViewNOMBRE_COMERCIAL_CLIENTE: TcxGridDBColumn
+        Caption = 'Nombre comercial'
+        DataBinding.FieldName = 'NOMBRE_COMERCIAL_CLIENTE'
+      end
     end
     inherited cxGridLevel: TcxGridLevel
       Caption = 'Todos'
diff --git a/Source/Modulos/Presupuestos de cliente/Views/uViewPresupuestosCliente.pas b/Source/Modulos/Presupuestos de cliente/Views/uViewPresupuestosCliente.pas
index 77a1cc9..55cf55d 100644
--- a/Source/Modulos/Presupuestos de cliente/Views/uViewPresupuestosCliente.pas	
+++ b/Source/Modulos/Presupuestos de cliente/Views/uViewPresupuestosCliente.pas	
@@ -50,6 +50,7 @@ type
     cxGridViewBASE_IMPONIBLE: TcxGridDBColumn;
     cxGridViewIMPORTE_IVA: TcxGridDBColumn;
     cxGridViewIVA: TcxGridDBColumn;
+    cxGridViewNOMBRE_COMERCIAL_CLIENTE: TcxGridDBColumn;
     procedure cxGridActiveTabChanged(Sender: TcxCustomGrid; ALevel:
             TcxGridLevel);
     procedure cxGridViewStylesGetContentStyle(Sender: TcxCustomGridTableView;
diff --git a/Source/Servidor/FactuGES_Server.dpr b/Source/Servidor/FactuGES_Server.dpr
index 52ec305..8b6539b 100644
--- a/Source/Servidor/FactuGES_Server.dpr
+++ b/Source/Servidor/FactuGES_Server.dpr
@@ -134,15 +134,15 @@ uses
   schEmpresasServer_Intf in '..\ApplicationBase\Empresas\Model\schEmpresasServer_Intf.pas',
   schAlbaranesClienteClient_Intf in '..\Modulos\Albaranes de cliente\Model\schAlbaranesClienteClient_Intf.pas',
   schAlbaranesClienteServer_Intf in '..\Modulos\Albaranes de cliente\Model\schAlbaranesClienteServer_Intf.pas',
-  schPresupuestosClienteClient_Intf in '..\Modulos\Presupuestos de cliente\Model\schPresupuestosClienteClient_Intf.pas',
-  schPresupuestosClienteServer_Intf in '..\Modulos\Presupuestos de cliente\Model\schPresupuestosClienteServer_Intf.pas',
   schContratosClienteClient_Intf in '..\Modulos\Contratos de cliente\Model\schContratosClienteClient_Intf.pas',
   schContratosClienteServer_Intf in '..\Modulos\Contratos de cliente\Model\schContratosClienteServer_Intf.pas',
   uNumUtils in '..\Base\Utiles\uNumUtils.pas',
   schFacturasClienteClient_Intf in '..\Modulos\Facturas de cliente\Model\schFacturasClienteClient_Intf.pas',
   schFacturasClienteServer_Intf in '..\Modulos\Facturas de cliente\Model\schFacturasClienteServer_Intf.pas',
   schContactosClient_Intf in '..\Modulos\Contactos\Model\schContactosClient_Intf.pas',
-  schContactosServer_Intf in '..\Modulos\Contactos\Model\schContactosServer_Intf.pas';
+  schContactosServer_Intf in '..\Modulos\Contactos\Model\schContactosServer_Intf.pas',
+  schPresupuestosClienteClient_Intf in '..\Modulos\Presupuestos de cliente\Model\schPresupuestosClienteClient_Intf.pas',
+  schPresupuestosClienteServer_Intf in '..\Modulos\Presupuestos de cliente\Model\schPresupuestosClienteServer_Intf.pas';
 
 {$R *.res}
 {$R ..\Servicios\RODLFile.res}
diff --git a/Source/Servidor/FactuGES_Server.dproj b/Source/Servidor/FactuGES_Server.dproj
index f292073..35e3dcd 100644
--- a/Source/Servidor/FactuGES_Server.dproj
+++ b/Source/Servidor/FactuGES_Server.dproj
@@ -1,309 +1,310 @@
-<?xml version="1.0" encoding="utf-8"?>
+<?xml version="1.0" encoding="utf-8"?>
 <Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
-	<PropertyGroup>
-		<ProjectGuid>{ebdcd25d-40d7-4146-91ec-a0ea4aa1dcd1}</ProjectGuid>
-		<MainSource>FactuGES_Server.dpr</MainSource>
-		<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
-		<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
-		<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
-		<DCC_DependencyCheckOutputName>..\..\Output\Debug\Servidor\FactuGES_Server.exe</DCC_DependencyCheckOutputName>
-	</PropertyGroup>
-	<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
-		<Version>7.0</Version>
-		<DCC_DebugInformation>False</DCC_DebugInformation>
-		<DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
-		<DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
-		<DCC_MapFile>3</DCC_MapFile>
-		<DCC_ExeOutput>..\..\Output\Release\Servidor</DCC_ExeOutput>
-		<DCC_Define>RELEASE</DCC_Define>
-	</PropertyGroup>
-	<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
-		<Version>7.0</Version>
-		<DCC_MapFile>3</DCC_MapFile>
-		<DCC_ExeOutput>..\..\Output\Debug\Servidor</DCC_ExeOutput>
-		<DCC_Define>DEBUG;</DCC_Define>
-		<DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
-	</PropertyGroup>
-	<ProjectExtensions>
-		<Borland.Personality>Delphi.Personality</Borland.Personality>
-		<Borland.ProjectType/>
-		<BorlandProject>
-			<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">2</VersionInfo><VersionInfo Name="MinorVer">6</VersionInfo><VersionInfo Name="Release">7</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">Rodax Software S.L.</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">2.6.7.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">FactuGES (Servidor)</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">2.6.7.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys><VersionInfoKeys Name="CompileDate">lunes, 11 de enero de 2016 18:08</VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
-						<Excluded_Packages Name="C:\Documents and Settings\All Users\Documentos\RAD Studio\5.0\Bpl\dxPScxScheduler2LnkD11.bpl">File C:\Documents and Settings\All Users\Documentos\RAD Studio\5.0\Bpl\dxPScxScheduler2LnkD11.bpl not found</Excluded_Packages>
-					</Excluded_Packages><Source><Source Name="MainSource">FactuGES_Server.dpr</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
-	</ProjectExtensions>
-	<Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets"/>
-	<ItemGroup>
-		<DelphiCompile Include="FactuGES_Server.dpr">
-			<MainSource>MainSource</MainSource>
-		</DelphiCompile>
-		<DCCReference Include="..\ApplicationBase\Ejercicios\Model\schEjerciciosClient_Intf.pas"/>
-		<DCCReference Include="..\ApplicationBase\Ejercicios\Model\schEjerciciosServer_Intf.pas"/>
-		<DCCReference Include="..\ApplicationBase\Ejercicios\Model\uBizEjerciciosServer.pas"/>
-		<DCCReference Include="..\ApplicationBase\Ejercicios\Servidor\srvEjercicios_Impl.pas">
-			<Form>srvEjercicios</Form>
-			<DesignClass>TDataAbstractService</DesignClass>
-		</DCCReference>
-		<DCCReference Include="..\ApplicationBase\Empresas\Model\schEmpresasClient_Intf.pas"/>
-		<DCCReference Include="..\ApplicationBase\Empresas\Model\schEmpresasServer_Intf.pas"/>
-		<DCCReference Include="..\ApplicationBase\Empresas\Servidor\srvEmpresas_Impl.pas">
-			<Form>srvEmpresas</Form>
-			<DesignClass>TDARemoteService</DesignClass>
-		</DCCReference>
-		<DCCReference Include="..\ApplicationBase\ProvinciasPoblaciones\Servidor\srvProvinciasPoblaciones_Impl.pas">
-			<Form>srvProvinciasPoblaciones</Form>
-			<DesignClass>TRORemoteDataModule</DesignClass>
-		</DCCReference>
-		<DCCReference Include="..\ApplicationBase\Usuarios\Model\schUsuariosClient_Intf.pas"/>
-		<DCCReference Include="..\ApplicationBase\Usuarios\Model\schUsuariosServer_Intf.pas"/>
-		<DCCReference Include="..\ApplicationBase\Usuarios\Servidor\srvUsuarios_Impl.pas"/>
-		<DCCReference Include="..\Base\schBase_Intf.pas"/>
-		<DCCReference Include="..\Base\Utiles\uNumUtils.pas"/>
-		<DCCReference Include="..\Base\Utiles\uSistemaFunc.pas"/>
-		<DCCReference Include="..\Base\Utiles\uStringsUtils.pas"/>
-		<DCCReference Include="..\Modulos\Albaranes de cliente\Model\schAlbaranesClienteClient_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Albaranes de cliente\Model\schAlbaranesClienteServer_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Albaranes de cliente\Model\uBizAlbaranClienteServer.pas"/>
-		<DCCReference Include="..\Modulos\Albaranes de cliente\Reports\uRptAlbaranesCliente_Server.pas"/>
-		<DCCReference Include="..\Modulos\Albaranes de cliente\Servidor\srvAlbaranesCliente_Impl.pas">
-			<Form>srvAlbaranesCliente</Form>
-			<DesignClass>TDataAbstractService</DesignClass>
-		</DCCReference>
-		<DCCReference Include="..\Modulos\Albaranes de proveedor\Model\schAlbaranesProveedorClient_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Albaranes de proveedor\Model\schAlbaranesProveedorServer_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Albaranes de proveedor\Model\uBizAlbaranProveedorServer.PAS"/>
-		<DCCReference Include="..\Modulos\Albaranes de proveedor\Servidor\srvAlbaranesProveedor_Impl.pas">
-			<Form>srvAlbaranesProveedor</Form>
-			<DesignClass>TDataAbstractService</DesignClass>
-		</DCCReference>
-		<DCCReference Include="..\Modulos\Almacenes\Model\schAlmacenesClient_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Almacenes\Model\schAlmacenesServer_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Almacenes\Servidor\srvAlmacenes_Impl.pas">
-			<Form>srvAlmacenes</Form>
-			<DesignClass>TDARemoteService</DesignClass>
-		</DCCReference>
-		<DCCReference Include="..\Modulos\Articulos\Model\schArticulosClient_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Articulos\Model\schArticulosServer_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Articulos\Servidor\srvArticulos_Impl.pas"/>
-		<DCCReference Include="..\Modulos\Comisiones\Model\schComisionesClient_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Comisiones\Model\schComisionesServer_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Comisiones\Model\uBizComisionesServer.pas"/>
-		<DCCReference Include="..\Modulos\Comisiones\Reports\uRptComisiones_Server.pas">
-			<Form>RptComisiones</Form>
-			<DesignClass>TDataModule</DesignClass>
-		</DCCReference>
-		<DCCReference Include="..\Modulos\Comisiones\Servidor\srvComisiones_Impl.pas">
-			<Form>srvComisiones</Form>
-			<DesignClass>TDataAbstractService</DesignClass>
-		</DCCReference>
-		<DCCReference Include="..\Modulos\Contabilidad\Model\schContabilidadClient_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Contabilidad\Model\schContabilidadServer_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Contabilidad\Model\uBizAsientosServer.pas"/>
-		<DCCReference Include="..\Modulos\Contabilidad\Servidor\srvContabilidad_Impl.pas">
-			<Form>srvContabilidad</Form>
-			<DesignClass>TDataAbstractService</DesignClass>
-		</DCCReference>
-		<DCCReference Include="..\Modulos\Contactos\Model\schContactosClient_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Contactos\Model\schContactosServer_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Contactos\Model\uBizClientesServer.pas"/>
-		<DCCReference Include="..\Modulos\Contactos\Model\uBizContactosServer.pas"/>
-		<DCCReference Include="..\Modulos\Contactos\Model\uBizProveedoresServer.pas"/>
-		<DCCReference Include="..\Modulos\Contactos\Model\uBizVendedoresServer.pas"/>
-		<DCCReference Include="..\Modulos\Contactos\Reports\uRptEtiquetasContacto_Server.pas">
-			<Form>RptEtiquetasContacto</Form>
-			<DesignClass>TDataModule</DesignClass>
-		</DCCReference>
-		<DCCReference Include="..\Modulos\Contactos\Servidor\srvContactos_Impl.pas">
-			<Form>srvContactos</Form>
-			<DesignClass>TDARemoteService</DesignClass>
-		</DCCReference>
-		<DCCReference Include="..\Modulos\Contratos de cliente\Model\schContratosClienteClient_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Contratos de cliente\Model\schContratosClienteServer_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Contratos de cliente\Model\uBizContratosClienteServer.pas"/>
-		<DCCReference Include="..\Modulos\Contratos de cliente\Reports\uRptContratosCliente_Server.pas">
-			<Form>RptContratosCliente</Form>
-		</DCCReference>
-		<DCCReference Include="..\Modulos\Contratos de cliente\Servidor\srvContratosCliente_Impl.pas">
-			<Form>srvContratosCliente</Form>
-			<DesignClass>TDataAbstractService</DesignClass>
-		</DCCReference>
-		<DCCReference Include="..\Modulos\Facturas de cliente\Model\schFacturasClienteClient_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Facturas de cliente\Model\schFacturasClienteServer_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Facturas de cliente\Model\uBizFacturasClienteServer.pas"/>
-		<DCCReference Include="..\Modulos\Facturas de cliente\Reports\uRptFacturasCliente_Server.pas">
-			<Form>RptFacturasCliente</Form>
-			<DesignClass>TDataModule</DesignClass>
-		</DCCReference>
-		<DCCReference Include="..\Modulos\Facturas de cliente\Servidor\srvFacturasCliente_Impl.pas">
-			<Form>srvFacturasCliente</Form>
-			<DesignClass>TDataAbstractService</DesignClass>
-		</DCCReference>
-		<DCCReference Include="..\Modulos\Facturas de proveedor\Model\schFacturasProveedorClient_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Facturas de proveedor\Model\schFacturasProveedorServer_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Facturas de proveedor\Model\uBizFacturasProveedorServer.pas"/>
-		<DCCReference Include="..\Modulos\Facturas de proveedor\Reports\uRptFacturasProveedor_Server.pas">
-			<Form>RptFacturasProveedor</Form>
-			<DesignClass>TDataModule</DesignClass>
-		</DCCReference>
-		<DCCReference Include="..\Modulos\Facturas de proveedor\Servidor\srvFacturasProveedor_Impl.pas">
-			<Form>srvFacturasProveedor</Form>
-			<DesignClass>TDataAbstractService</DesignClass>
-		</DCCReference>
-		<DCCReference Include="..\Modulos\Familias\Model\schFamiliasClient_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Familias\Model\schFamiliasServer_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Familias\Servidor\srvFamilias_Impl.pas"/>
-		<DCCReference Include="..\Modulos\Formas de pago\Model\schFormasPagoClient_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Formas de pago\Model\schFormasPagoServer_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Formas de pago\Servidor\srvFormasPago_Impl.pas"/>
-		<DCCReference Include="..\Modulos\Gestion de documentos\Servidor\srvGestorDocumentos_Impl.pas">
-			<Form>srvGestorDocumentos</Form>
-			<DesignClass>TDataAbstractService</DesignClass>
-		</DCCReference>
-		<DCCReference Include="..\Modulos\Gestor de informes\Servidor\srvGestorInformes_Impl.pas">
-			<Form>srvGestorInformes</Form>
-			<DesignClass>TDataAbstractService</DesignClass>
-		</DCCReference>
-		<DCCReference Include="..\Modulos\Historico de movimientos\Model\schHistoricoMovimientosClient_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Historico de movimientos\Model\schHistoricoMovimientosServer_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Historico de movimientos\Servidor\srvHistoricoMovimientos_Impl.pas">
-			<Form>srvHistoricoMovimientos</Form>
-			<DesignClass>TDataAbstractService</DesignClass>
-		</DCCReference>
-		<DCCReference Include="..\Modulos\Inventario\Model\schInventarioClient_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Inventario\Model\schInventarioServer_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Inventario\Servidor\srvInventario_Impl.pas">
-			<Form>srvInventario</Form>
-			<DesignClass>TDataAbstractService</DesignClass>
-		</DCCReference>
-		<DCCReference Include="..\Modulos\Pedidos a proveedor\Model\schPedidosProveedorClient_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Pedidos a proveedor\Model\schPedidosProveedorServer_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Pedidos a proveedor\Model\uBizPedidosProveedorServer.pas"/>
-		<DCCReference Include="..\Modulos\Pedidos a proveedor\Servidor\srvPedidosProveedor_Impl.pas">
-			<Form>srvPedidosProveedor</Form>
-			<DesignClass>TDataAbstractService</DesignClass>
-		</DCCReference>
-		<DCCReference Include="..\Modulos\Presupuestos de cliente\Model\schPresupuestosClienteClient_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Presupuestos de cliente\Model\schPresupuestosClienteServer_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Presupuestos de cliente\Model\uBizPresupuestosClienteServer.pas"/>
-		<DCCReference Include="..\Modulos\Presupuestos de cliente\Reports\uRptPresupuestosCliente_Server.pas">
-			<Form>RptPresupuestosCliente</Form>
-		</DCCReference>
-		<DCCReference Include="..\Modulos\Presupuestos de cliente\Servidor\srvPresupuestosCliente_Impl.pas">
-			<Form>srvPresupuestosCliente</Form>
-			<DesignClass>TDataAbstractService</DesignClass>
-		</DCCReference>
-		<DCCReference Include="..\Modulos\Recibos de cliente\Model\schRecibosClienteClient_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Recibos de cliente\Model\schRecibosClienteServer_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Recibos de cliente\Model\uBizPagosClienteServer.pas"/>
-		<DCCReference Include="..\Modulos\Recibos de cliente\Model\uBizRecibosClienteServer.pas"/>
-		<DCCReference Include="..\Modulos\Recibos de cliente\Reports\uRptRecibosCliente_Server.pas">
-			<Form>RptRecibosCliente</Form>
-			<DesignClass>TDataModule</DesignClass>
-		</DCCReference>
-		<DCCReference Include="..\Modulos\Recibos de cliente\Servidor\srvRecibosCliente_Impl.pas">
-			<Form>srvRecibosCliente</Form>
-			<DesignClass>TDataAbstractService</DesignClass>
-		</DCCReference>
-		<DCCReference Include="..\Modulos\Recibos de proveedor\Model\schRecibosProveedorClient_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Recibos de proveedor\Model\schRecibosProveedorServer_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Recibos de proveedor\Model\uBizPagosProveedorServer.pas"/>
-		<DCCReference Include="..\Modulos\Recibos de proveedor\Model\uBizRecibosProveedorServer.pas"/>
-		<DCCReference Include="..\Modulos\Recibos de proveedor\Reports\uRptRecibosProveedor_Server.pas">
-			<Form>RptRecibosProveedor</Form>
-			<DesignClass>TDataModule</DesignClass>
-		</DCCReference>
-		<DCCReference Include="..\Modulos\Recibos de proveedor\Servidor\srvRecibosProveedor_Impl.pas">
-			<Form>srvRecibosProveedor</Form>
-			<DesignClass>TDataAbstractService</DesignClass>
-		</DCCReference>
-		<DCCReference Include="..\Modulos\Referencias\Model\schReferenciasClient_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Referencias\Model\schReferenciasServer_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Referencias\Servidor\srvReferencias_Impl.pas">
-			<Form>srvReferencias</Form>
-			<DesignClass>TDataAbstractService</DesignClass>
-		</DCCReference>
-		<DCCReference Include="..\Modulos\Remesas de cliente\Model\schRemesasClienteClient_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Remesas de cliente\Model\schRemesasClienteServer_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Remesas de cliente\Model\uBizRemesasClienteServer.pas"/>
-		<DCCReference Include="..\Modulos\Remesas de cliente\Reports\uRptRemesasCliente_Server.pas">
-			<Form>RptRemesasCliente</Form>
-			<DesignClass>TDataModule</DesignClass>
-		</DCCReference>
-		<DCCReference Include="..\Modulos\Remesas de cliente\Servidor\srvRemesasCliente_Impl.pas">
-			<Form>srvRemesasCliente</Form>
-			<DesignClass>TDataAbstractService</DesignClass>
-		</DCCReference>
-		<DCCReference Include="..\Modulos\Remesas de proveedor\Model\schRemesasProveedorClient_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Remesas de proveedor\Model\schRemesasProveedorServer_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Remesas de proveedor\Model\uBizRemesasProveedorServer.pas"/>
-		<DCCReference Include="..\Modulos\Remesas de proveedor\Reports\uRptRemesasProveedor_Server.pas">
-			<Form>RptRemesasProveedor</Form>
-			<DesignClass>TDataModule</DesignClass>
-		</DCCReference>
-		<DCCReference Include="..\Modulos\Remesas de proveedor\Servidor\srvRemesasProveedor_Impl.pas">
-			<Form>srvRemesasProveedor</Form>
-			<DesignClass>TDataAbstractService</DesignClass>
-		</DCCReference>
-		<DCCReference Include="..\Modulos\Subfamilias\Model\schSubfamiliasClient_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Subfamilias\Model\schSubfamiliasServer_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Subfamilias\Servidor\srvSubfamilias_Impl.pas">
-			<Form>srvSubfamilias</Form>
-			<DesignClass>TDataAbstractService</DesignClass>
-		</DCCReference>
-		<DCCReference Include="..\Modulos\Tipos de IVA\Model\schTiposIVAClient_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Tipos de IVA\Model\schTiposIVAServer_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Tipos de IVA\Servidor\srvTiposIVA_Impl.pas"/>
-		<DCCReference Include="..\Modulos\Unidades de medida\Model\schUnidadesMedidaClient_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Unidades de medida\Model\schUnidadesMedidaServer_Intf.pas"/>
-		<DCCReference Include="..\Modulos\Unidades de medida\Servidor\srvUnidadesMedida_Impl.pas">
-			<Form>srvUnidadesMedida</Form>
-			<DesignClass>TDataAbstractService</DesignClass>
-		</DCCReference>
-		<DCCReference Include="..\Servicios\FactuGES_Intf.pas"/>
-		<DCCReference Include="..\Servicios\FactuGES_Invk.pas"/>
-		<DCCReference Include="Configuracion\srvConfiguracion_Impl.pas">
-			<Form>srvConfiguracion</Form>
-			<DesignClass>TDataAbstractService</DesignClass>
-		</DCCReference>
-		<DCCReference Include="Configuracion\uConexionBD.pas">
-			<Form>frConexionBD</Form>
-			<DesignClass>TFrame</DesignClass>
-		</DCCReference>
-		<DCCReference Include="Configuracion\uConfGeneral.pas">
-			<Form>frConfGeneral</Form>
-			<DesignClass>TFrame</DesignClass>
-		</DCCReference>
-		<DCCReference Include="Configuracion\uConfiguracion.pas">
-			<Form>fConfiguracion</Form>
-			<DesignClass>TForm</DesignClass>
-		</DCCReference>
-		<DCCReference Include="Configuracion\uFrameConfiguracion.pas">
-			<Form>FrameConfiguracion</Form>
-			<DesignClass>TFrame</DesignClass>
-		</DCCReference>
-		<DCCReference Include="srvLogin_Impl.pas">
-			<Form>srvLogin</Form>
-			<DesignClass>TDARemoteService</DesignClass>
-		</DCCReference>
-		<DCCReference Include="uAcercaDe.pas">
-			<Form>fAcercaDe</Form>
-		</DCCReference>
-		<DCCReference Include="uDataModuleServer.pas">
-			<Form>dmServer</Form>
-			<DesignClass>TDataModule</DesignClass>
-		</DCCReference>
-		<DCCReference Include="uServerMainForm.pas">
-			<Form>fServerForm</Form>
-		</DCCReference>
-		<DCCReference Include="Utiles\RegExpr.pas"/>
-		<DCCReference Include="Utiles\uBusinessUtils.pas"/>
-		<DCCReference Include="Utiles\uDatabaseUtils.pas"/>
-		<DCCReference Include="Utiles\uReferenciasUtils.pas"/>
-		<DCCReference Include="Utiles\uRestriccionesUsuarioUtils.pas"/>
-		<DCCReference Include="Utiles\uSchemaUtilsServer.pas"/>
-		<DCCReference Include="Utiles\uServerAppUtils.pas"/>
-		<DCCReference Include="Utiles\uSesionesUtils.pas"/>
-	</ItemGroup>
+  <PropertyGroup>
+    <ProjectGuid>{ebdcd25d-40d7-4146-91ec-a0ea4aa1dcd1}</ProjectGuid>
+    <MainSource>FactuGES_Server.dpr</MainSource>
+    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+    <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+    <DCC_DependencyCheckOutputName>..\..\Output\Debug\Servidor\FactuGES_Server.exe</DCC_DependencyCheckOutputName>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DebugInformation>False</DCC_DebugInformation>
+    <DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+    <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+    <DCC_MapFile>3</DCC_MapFile>
+    <DCC_ExeOutput>..\..\Output\Release\Servidor</DCC_ExeOutput>
+    <DCC_Define>RELEASE</DCC_Define>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_MapFile>3</DCC_MapFile>
+    <DCC_ExeOutput>..\..\Output\Debug\Servidor</DCC_ExeOutput>
+    <DCC_Define>DEBUG;</DCC_Define>
+    <DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
+  </PropertyGroup>
+  <ProjectExtensions>
+    <Borland.Personality>Delphi.Personality</Borland.Personality>
+    <Borland.ProjectType />
+    <BorlandProject>
+<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">2</VersionInfo><VersionInfo Name="MinorVer">6</VersionInfo><VersionInfo Name="Release">8</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">Rodax Software S.L.</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">2.6.8.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">FactuGES (Servidor)</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">2.6.8.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys><VersionInfoKeys Name="CompileDate">lunes, 11 de abril de 2016 13:37</VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
+      
+      <Excluded_Packages Name="C:\Documents and Settings\All Users\Documentos\RAD Studio\5.0\Bpl\dxPScxScheduler2LnkD11.bpl">File C:\Documents and Settings\All Users\Documentos\RAD Studio\5.0\Bpl\dxPScxScheduler2LnkD11.bpl not found</Excluded_Packages>
+    </Excluded_Packages><Source><Source Name="MainSource">FactuGES_Server.dpr</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
+  </ProjectExtensions>
+  <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
+  <ItemGroup>
+    <DelphiCompile Include="FactuGES_Server.dpr">
+      <MainSource>MainSource</MainSource>
+    </DelphiCompile>
+    <DCCReference Include="..\ApplicationBase\Ejercicios\Model\schEjerciciosClient_Intf.pas" />
+    <DCCReference Include="..\ApplicationBase\Ejercicios\Model\schEjerciciosServer_Intf.pas" />
+    <DCCReference Include="..\ApplicationBase\Ejercicios\Model\uBizEjerciciosServer.pas" />
+    <DCCReference Include="..\ApplicationBase\Ejercicios\Servidor\srvEjercicios_Impl.pas">
+      <Form>srvEjercicios</Form>
+      <DesignClass>TDataAbstractService</DesignClass>
+    </DCCReference>
+    <DCCReference Include="..\ApplicationBase\Empresas\Model\schEmpresasClient_Intf.pas" />
+    <DCCReference Include="..\ApplicationBase\Empresas\Model\schEmpresasServer_Intf.pas" />
+    <DCCReference Include="..\ApplicationBase\Empresas\Servidor\srvEmpresas_Impl.pas">
+      <Form>srvEmpresas</Form>
+      <DesignClass>TDARemoteService</DesignClass>
+    </DCCReference>
+    <DCCReference Include="..\ApplicationBase\ProvinciasPoblaciones\Servidor\srvProvinciasPoblaciones_Impl.pas">
+      <Form>srvProvinciasPoblaciones</Form>
+      <DesignClass>TRORemoteDataModule</DesignClass>
+    </DCCReference>
+    <DCCReference Include="..\ApplicationBase\Usuarios\Model\schUsuariosClient_Intf.pas" />
+    <DCCReference Include="..\ApplicationBase\Usuarios\Model\schUsuariosServer_Intf.pas" />
+    <DCCReference Include="..\ApplicationBase\Usuarios\Servidor\srvUsuarios_Impl.pas" />
+    <DCCReference Include="..\Base\schBase_Intf.pas" />
+    <DCCReference Include="..\Base\Utiles\uNumUtils.pas" />
+    <DCCReference Include="..\Base\Utiles\uSistemaFunc.pas" />
+    <DCCReference Include="..\Base\Utiles\uStringsUtils.pas" />
+    <DCCReference Include="..\Modulos\Albaranes de cliente\Model\schAlbaranesClienteClient_Intf.pas" />
+    <DCCReference Include="..\Modulos\Albaranes de cliente\Model\schAlbaranesClienteServer_Intf.pas" />
+    <DCCReference Include="..\Modulos\Albaranes de cliente\Model\uBizAlbaranClienteServer.pas" />
+    <DCCReference Include="..\Modulos\Albaranes de cliente\Reports\uRptAlbaranesCliente_Server.pas" />
+    <DCCReference Include="..\Modulos\Albaranes de cliente\Servidor\srvAlbaranesCliente_Impl.pas">
+      <Form>srvAlbaranesCliente</Form>
+      <DesignClass>TDataAbstractService</DesignClass>
+    </DCCReference>
+    <DCCReference Include="..\Modulos\Albaranes de proveedor\Model\schAlbaranesProveedorClient_Intf.pas" />
+    <DCCReference Include="..\Modulos\Albaranes de proveedor\Model\schAlbaranesProveedorServer_Intf.pas" />
+    <DCCReference Include="..\Modulos\Albaranes de proveedor\Model\uBizAlbaranProveedorServer.PAS" />
+    <DCCReference Include="..\Modulos\Albaranes de proveedor\Servidor\srvAlbaranesProveedor_Impl.pas">
+      <Form>srvAlbaranesProveedor</Form>
+      <DesignClass>TDataAbstractService</DesignClass>
+    </DCCReference>
+    <DCCReference Include="..\Modulos\Almacenes\Model\schAlmacenesClient_Intf.pas" />
+    <DCCReference Include="..\Modulos\Almacenes\Model\schAlmacenesServer_Intf.pas" />
+    <DCCReference Include="..\Modulos\Almacenes\Servidor\srvAlmacenes_Impl.pas">
+      <Form>srvAlmacenes</Form>
+      <DesignClass>TDARemoteService</DesignClass>
+    </DCCReference>
+    <DCCReference Include="..\Modulos\Articulos\Model\schArticulosClient_Intf.pas" />
+    <DCCReference Include="..\Modulos\Articulos\Model\schArticulosServer_Intf.pas" />
+    <DCCReference Include="..\Modulos\Articulos\Servidor\srvArticulos_Impl.pas" />
+    <DCCReference Include="..\Modulos\Comisiones\Model\schComisionesClient_Intf.pas" />
+    <DCCReference Include="..\Modulos\Comisiones\Model\schComisionesServer_Intf.pas" />
+    <DCCReference Include="..\Modulos\Comisiones\Model\uBizComisionesServer.pas" />
+    <DCCReference Include="..\Modulos\Comisiones\Reports\uRptComisiones_Server.pas">
+      <Form>RptComisiones</Form>
+      <DesignClass>TDataModule</DesignClass>
+    </DCCReference>
+    <DCCReference Include="..\Modulos\Comisiones\Servidor\srvComisiones_Impl.pas">
+      <Form>srvComisiones</Form>
+      <DesignClass>TDataAbstractService</DesignClass>
+    </DCCReference>
+    <DCCReference Include="..\Modulos\Contabilidad\Model\schContabilidadClient_Intf.pas" />
+    <DCCReference Include="..\Modulos\Contabilidad\Model\schContabilidadServer_Intf.pas" />
+    <DCCReference Include="..\Modulos\Contabilidad\Model\uBizAsientosServer.pas" />
+    <DCCReference Include="..\Modulos\Contabilidad\Servidor\srvContabilidad_Impl.pas">
+      <Form>srvContabilidad</Form>
+      <DesignClass>TDataAbstractService</DesignClass>
+    </DCCReference>
+    <DCCReference Include="..\Modulos\Contactos\Model\schContactosClient_Intf.pas" />
+    <DCCReference Include="..\Modulos\Contactos\Model\schContactosServer_Intf.pas" />
+    <DCCReference Include="..\Modulos\Contactos\Model\uBizClientesServer.pas" />
+    <DCCReference Include="..\Modulos\Contactos\Model\uBizContactosServer.pas" />
+    <DCCReference Include="..\Modulos\Contactos\Model\uBizProveedoresServer.pas" />
+    <DCCReference Include="..\Modulos\Contactos\Model\uBizVendedoresServer.pas" />
+    <DCCReference Include="..\Modulos\Contactos\Reports\uRptEtiquetasContacto_Server.pas">
+      <Form>RptEtiquetasContacto</Form>
+      <DesignClass>TDataModule</DesignClass>
+    </DCCReference>
+    <DCCReference Include="..\Modulos\Contactos\Servidor\srvContactos_Impl.pas">
+      <Form>srvContactos</Form>
+      <DesignClass>TDARemoteService</DesignClass>
+    </DCCReference>
+    <DCCReference Include="..\Modulos\Contratos de cliente\Model\schContratosClienteClient_Intf.pas" />
+    <DCCReference Include="..\Modulos\Contratos de cliente\Model\schContratosClienteServer_Intf.pas" />
+    <DCCReference Include="..\Modulos\Contratos de cliente\Model\uBizContratosClienteServer.pas" />
+    <DCCReference Include="..\Modulos\Contratos de cliente\Reports\uRptContratosCliente_Server.pas">
+      <Form>RptContratosCliente</Form>
+    </DCCReference>
+    <DCCReference Include="..\Modulos\Contratos de cliente\Servidor\srvContratosCliente_Impl.pas">
+      <Form>srvContratosCliente</Form>
+      <DesignClass>TDataAbstractService</DesignClass>
+    </DCCReference>
+    <DCCReference Include="..\Modulos\Facturas de cliente\Model\schFacturasClienteClient_Intf.pas" />
+    <DCCReference Include="..\Modulos\Facturas de cliente\Model\schFacturasClienteServer_Intf.pas" />
+    <DCCReference Include="..\Modulos\Facturas de cliente\Model\uBizFacturasClienteServer.pas" />
+    <DCCReference Include="..\Modulos\Facturas de cliente\Reports\uRptFacturasCliente_Server.pas">
+      <Form>RptFacturasCliente</Form>
+      <DesignClass>TDataModule</DesignClass>
+    </DCCReference>
+    <DCCReference Include="..\Modulos\Facturas de cliente\Servidor\srvFacturasCliente_Impl.pas">
+      <Form>srvFacturasCliente</Form>
+      <DesignClass>TDataAbstractService</DesignClass>
+    </DCCReference>
+    <DCCReference Include="..\Modulos\Facturas de proveedor\Model\schFacturasProveedorClient_Intf.pas" />
+    <DCCReference Include="..\Modulos\Facturas de proveedor\Model\schFacturasProveedorServer_Intf.pas" />
+    <DCCReference Include="..\Modulos\Facturas de proveedor\Model\uBizFacturasProveedorServer.pas" />
+    <DCCReference Include="..\Modulos\Facturas de proveedor\Reports\uRptFacturasProveedor_Server.pas">
+      <Form>RptFacturasProveedor</Form>
+      <DesignClass>TDataModule</DesignClass>
+    </DCCReference>
+    <DCCReference Include="..\Modulos\Facturas de proveedor\Servidor\srvFacturasProveedor_Impl.pas">
+      <Form>srvFacturasProveedor</Form>
+      <DesignClass>TDataAbstractService</DesignClass>
+    </DCCReference>
+    <DCCReference Include="..\Modulos\Familias\Model\schFamiliasClient_Intf.pas" />
+    <DCCReference Include="..\Modulos\Familias\Model\schFamiliasServer_Intf.pas" />
+    <DCCReference Include="..\Modulos\Familias\Servidor\srvFamilias_Impl.pas" />
+    <DCCReference Include="..\Modulos\Formas de pago\Model\schFormasPagoClient_Intf.pas" />
+    <DCCReference Include="..\Modulos\Formas de pago\Model\schFormasPagoServer_Intf.pas" />
+    <DCCReference Include="..\Modulos\Formas de pago\Servidor\srvFormasPago_Impl.pas" />
+    <DCCReference Include="..\Modulos\Gestion de documentos\Servidor\srvGestorDocumentos_Impl.pas">
+      <Form>srvGestorDocumentos</Form>
+      <DesignClass>TDataAbstractService</DesignClass>
+    </DCCReference>
+    <DCCReference Include="..\Modulos\Gestor de informes\Servidor\srvGestorInformes_Impl.pas">
+      <Form>srvGestorInformes</Form>
+      <DesignClass>TDataAbstractService</DesignClass>
+    </DCCReference>
+    <DCCReference Include="..\Modulos\Historico de movimientos\Model\schHistoricoMovimientosClient_Intf.pas" />
+    <DCCReference Include="..\Modulos\Historico de movimientos\Model\schHistoricoMovimientosServer_Intf.pas" />
+    <DCCReference Include="..\Modulos\Historico de movimientos\Servidor\srvHistoricoMovimientos_Impl.pas">
+      <Form>srvHistoricoMovimientos</Form>
+      <DesignClass>TDataAbstractService</DesignClass>
+    </DCCReference>
+    <DCCReference Include="..\Modulos\Inventario\Model\schInventarioClient_Intf.pas" />
+    <DCCReference Include="..\Modulos\Inventario\Model\schInventarioServer_Intf.pas" />
+    <DCCReference Include="..\Modulos\Inventario\Servidor\srvInventario_Impl.pas">
+      <Form>srvInventario</Form>
+      <DesignClass>TDataAbstractService</DesignClass>
+    </DCCReference>
+    <DCCReference Include="..\Modulos\Pedidos a proveedor\Model\schPedidosProveedorClient_Intf.pas" />
+    <DCCReference Include="..\Modulos\Pedidos a proveedor\Model\schPedidosProveedorServer_Intf.pas" />
+    <DCCReference Include="..\Modulos\Pedidos a proveedor\Model\uBizPedidosProveedorServer.pas" />
+    <DCCReference Include="..\Modulos\Pedidos a proveedor\Servidor\srvPedidosProveedor_Impl.pas">
+      <Form>srvPedidosProveedor</Form>
+      <DesignClass>TDataAbstractService</DesignClass>
+    </DCCReference>
+    <DCCReference Include="..\Modulos\Presupuestos de cliente\Model\schPresupuestosClienteClient_Intf.pas" />
+    <DCCReference Include="..\Modulos\Presupuestos de cliente\Model\schPresupuestosClienteServer_Intf.pas" />
+    <DCCReference Include="..\Modulos\Presupuestos de cliente\Model\uBizPresupuestosClienteServer.pas" />
+    <DCCReference Include="..\Modulos\Presupuestos de cliente\Reports\uRptPresupuestosCliente_Server.pas">
+      <Form>RptPresupuestosCliente</Form>
+    </DCCReference>
+    <DCCReference Include="..\Modulos\Presupuestos de cliente\Servidor\srvPresupuestosCliente_Impl.pas">
+      <Form>srvPresupuestosCliente</Form>
+      <DesignClass>TDataAbstractService</DesignClass>
+    </DCCReference>
+    <DCCReference Include="..\Modulos\Recibos de cliente\Model\schRecibosClienteClient_Intf.pas" />
+    <DCCReference Include="..\Modulos\Recibos de cliente\Model\schRecibosClienteServer_Intf.pas" />
+    <DCCReference Include="..\Modulos\Recibos de cliente\Model\uBizPagosClienteServer.pas" />
+    <DCCReference Include="..\Modulos\Recibos de cliente\Model\uBizRecibosClienteServer.pas" />
+    <DCCReference Include="..\Modulos\Recibos de cliente\Reports\uRptRecibosCliente_Server.pas">
+      <Form>RptRecibosCliente</Form>
+      <DesignClass>TDataModule</DesignClass>
+    </DCCReference>
+    <DCCReference Include="..\Modulos\Recibos de cliente\Servidor\srvRecibosCliente_Impl.pas">
+      <Form>srvRecibosCliente</Form>
+      <DesignClass>TDataAbstractService</DesignClass>
+    </DCCReference>
+    <DCCReference Include="..\Modulos\Recibos de proveedor\Model\schRecibosProveedorClient_Intf.pas" />
+    <DCCReference Include="..\Modulos\Recibos de proveedor\Model\schRecibosProveedorServer_Intf.pas" />
+    <DCCReference Include="..\Modulos\Recibos de proveedor\Model\uBizPagosProveedorServer.pas" />
+    <DCCReference Include="..\Modulos\Recibos de proveedor\Model\uBizRecibosProveedorServer.pas" />
+    <DCCReference Include="..\Modulos\Recibos de proveedor\Reports\uRptRecibosProveedor_Server.pas">
+      <Form>RptRecibosProveedor</Form>
+      <DesignClass>TDataModule</DesignClass>
+    </DCCReference>
+    <DCCReference Include="..\Modulos\Recibos de proveedor\Servidor\srvRecibosProveedor_Impl.pas">
+      <Form>srvRecibosProveedor</Form>
+      <DesignClass>TDataAbstractService</DesignClass>
+    </DCCReference>
+    <DCCReference Include="..\Modulos\Referencias\Model\schReferenciasClient_Intf.pas" />
+    <DCCReference Include="..\Modulos\Referencias\Model\schReferenciasServer_Intf.pas" />
+    <DCCReference Include="..\Modulos\Referencias\Servidor\srvReferencias_Impl.pas">
+      <Form>srvReferencias</Form>
+      <DesignClass>TDataAbstractService</DesignClass>
+    </DCCReference>
+    <DCCReference Include="..\Modulos\Remesas de cliente\Model\schRemesasClienteClient_Intf.pas" />
+    <DCCReference Include="..\Modulos\Remesas de cliente\Model\schRemesasClienteServer_Intf.pas" />
+    <DCCReference Include="..\Modulos\Remesas de cliente\Model\uBizRemesasClienteServer.pas" />
+    <DCCReference Include="..\Modulos\Remesas de cliente\Reports\uRptRemesasCliente_Server.pas">
+      <Form>RptRemesasCliente</Form>
+      <DesignClass>TDataModule</DesignClass>
+    </DCCReference>
+    <DCCReference Include="..\Modulos\Remesas de cliente\Servidor\srvRemesasCliente_Impl.pas">
+      <Form>srvRemesasCliente</Form>
+      <DesignClass>TDataAbstractService</DesignClass>
+    </DCCReference>
+    <DCCReference Include="..\Modulos\Remesas de proveedor\Model\schRemesasProveedorClient_Intf.pas" />
+    <DCCReference Include="..\Modulos\Remesas de proveedor\Model\schRemesasProveedorServer_Intf.pas" />
+    <DCCReference Include="..\Modulos\Remesas de proveedor\Model\uBizRemesasProveedorServer.pas" />
+    <DCCReference Include="..\Modulos\Remesas de proveedor\Reports\uRptRemesasProveedor_Server.pas">
+      <Form>RptRemesasProveedor</Form>
+      <DesignClass>TDataModule</DesignClass>
+    </DCCReference>
+    <DCCReference Include="..\Modulos\Remesas de proveedor\Servidor\srvRemesasProveedor_Impl.pas">
+      <Form>srvRemesasProveedor</Form>
+      <DesignClass>TDataAbstractService</DesignClass>
+    </DCCReference>
+    <DCCReference Include="..\Modulos\Subfamilias\Model\schSubfamiliasClient_Intf.pas" />
+    <DCCReference Include="..\Modulos\Subfamilias\Model\schSubfamiliasServer_Intf.pas" />
+    <DCCReference Include="..\Modulos\Subfamilias\Servidor\srvSubfamilias_Impl.pas">
+      <Form>srvSubfamilias</Form>
+      <DesignClass>TDataAbstractService</DesignClass>
+    </DCCReference>
+    <DCCReference Include="..\Modulos\Tipos de IVA\Model\schTiposIVAClient_Intf.pas" />
+    <DCCReference Include="..\Modulos\Tipos de IVA\Model\schTiposIVAServer_Intf.pas" />
+    <DCCReference Include="..\Modulos\Tipos de IVA\Servidor\srvTiposIVA_Impl.pas" />
+    <DCCReference Include="..\Modulos\Unidades de medida\Model\schUnidadesMedidaClient_Intf.pas" />
+    <DCCReference Include="..\Modulos\Unidades de medida\Model\schUnidadesMedidaServer_Intf.pas" />
+    <DCCReference Include="..\Modulos\Unidades de medida\Servidor\srvUnidadesMedida_Impl.pas">
+      <Form>srvUnidadesMedida</Form>
+      <DesignClass>TDataAbstractService</DesignClass>
+    </DCCReference>
+    <DCCReference Include="..\Servicios\FactuGES_Intf.pas" />
+    <DCCReference Include="..\Servicios\FactuGES_Invk.pas" />
+    <DCCReference Include="Configuracion\srvConfiguracion_Impl.pas">
+      <Form>srvConfiguracion</Form>
+      <DesignClass>TDataAbstractService</DesignClass>
+    </DCCReference>
+    <DCCReference Include="Configuracion\uConexionBD.pas">
+      <Form>frConexionBD</Form>
+      <DesignClass>TFrame</DesignClass>
+    </DCCReference>
+    <DCCReference Include="Configuracion\uConfGeneral.pas">
+      <Form>frConfGeneral</Form>
+      <DesignClass>TFrame</DesignClass>
+    </DCCReference>
+    <DCCReference Include="Configuracion\uConfiguracion.pas">
+      <Form>fConfiguracion</Form>
+      <DesignClass>TForm</DesignClass>
+    </DCCReference>
+    <DCCReference Include="Configuracion\uFrameConfiguracion.pas">
+      <Form>FrameConfiguracion</Form>
+      <DesignClass>TFrame</DesignClass>
+    </DCCReference>
+    <DCCReference Include="srvLogin_Impl.pas">
+      <Form>srvLogin</Form>
+      <DesignClass>TDARemoteService</DesignClass>
+    </DCCReference>
+    <DCCReference Include="uAcercaDe.pas">
+      <Form>fAcercaDe</Form>
+    </DCCReference>
+    <DCCReference Include="uDataModuleServer.pas">
+      <Form>dmServer</Form>
+      <DesignClass>TDataModule</DesignClass>
+    </DCCReference>
+    <DCCReference Include="uServerMainForm.pas">
+      <Form>fServerForm</Form>
+    </DCCReference>
+    <DCCReference Include="Utiles\RegExpr.pas" />
+    <DCCReference Include="Utiles\uBusinessUtils.pas" />
+    <DCCReference Include="Utiles\uDatabaseUtils.pas" />
+    <DCCReference Include="Utiles\uReferenciasUtils.pas" />
+    <DCCReference Include="Utiles\uRestriccionesUsuarioUtils.pas" />
+    <DCCReference Include="Utiles\uSchemaUtilsServer.pas" />
+    <DCCReference Include="Utiles\uServerAppUtils.pas" />
+    <DCCReference Include="Utiles\uSesionesUtils.pas" />
+  </ItemGroup>
 </Project>
 <!-- EurekaLog First Line
 [Exception Log]
diff --git a/Source/Servidor/FactuGES_Server.res b/Source/Servidor/FactuGES_Server.res
index 97d9cc9..38b8c8b 100644
Binary files a/Source/Servidor/FactuGES_Server.res and b/Source/Servidor/FactuGES_Server.res differ