From 1d8e13ce8ae8d2e8628922108f89e4176d552723 Mon Sep 17 00:00:00 2001
From: david <darranz@rodax-software.com>
Date: Thu, 27 Dec 2007 20:41:02 +0000
Subject: [PATCH] =?UTF-8?q?Migraci=C3=B3n=20a=20DevExpress=206=20(x.30)?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

git-svn-id: https://192.168.0.254/svn/Proyectos.Acana_FactuGES2/trunk@74 f4e31baf-9722-1c47-927c-6f952f962d4b
---
 Build/Build.fbp5                              |    2 +-
 Source/ApplicationBase/ApplicationBase.dpk    |  Bin 4215 -> 3985 bytes
 Source/ApplicationBase/ApplicationBase.dproj  |  132 +-
 .../Ejercicios/Views/uViewEjercicios.dfm      |    4 +-
 .../Ejercicios/Views/uViewEjercicios.pas      |    4 +-
 Source/Base/Base.dpk                          |   13 +-
 Source/Base/Base.dproj                        |   96 +-
 Source/Base/uDMBase.dfm                       |  761 ++--
 Source/Base/uDMBase.pas                       |    4 +-
 Source/GUIBase/GUIBase.dpk                    |   15 +-
 Source/GUIBase/GUIBase.dproj                  |  119 +-
 Source/GUIBase/GUIBase.res                    |  Bin 384 -> 4748 bytes
 Source/GUIBase/uViewGrid.dfm                  |   20 +-
 Source/GUIBase/uViewGrid.pas                  |    5 +-
 Source/GUIBase/uViewGrid2Niveles.dfm          |    1 +
 Source/GUIBase/uViewGrid2Niveles.pas          |    4 +-
 Source/GUIBase/uViewGridBase.pas              |    5 +-
 .../Data/AlbaranesCliente_data.dpk            |  Bin 723 -> 725 bytes
 .../Views/uViewAlbaranesCliente.pas           |    3 +-
 .../Views/uViewAlbaranesDevCliente.pas        |  Bin 1555 -> 1557 bytes
 .../uViewElegirArticulosAlbaranesCliente.pas  |  Bin 1054 -> 1056 bytes
 .../Views/uViewAlbaranesDevProveedor.pas      |  Bin 1366 -> 1368 bytes
 .../Views/uViewAlbaranesProveedor.pas         |    3 +-
 ...uViewElegirArticulosAlbaranesProveedor.pas |  Bin 3464 -> 3466 bytes
 .../Almacenes/Views/uViewAlmacenes.pas        |  Bin 2865 -> 2867 bytes
 .../Articulos/Views/uViewArticulos.pas        |  Bin 5930 -> 5932 bytes
 .../Data/BancaElectronica_data.dpk            |  Bin 889 -> 891 bytes
 .../Controller/Comisiones_controller.dpk      |  Bin 1570 -> 1572 bytes
 .../Comisiones/Data/Comisiones_data.dpk       |  Bin 703 -> 705 bytes
 .../Comisiones/Model/Comisiones_model.dpk     |  Bin 1034 -> 1036 bytes
 .../Comisiones/Views/Comisiones_view.dpk      |  Bin 1914 -> 1916 bytes
 .../Comisiones/Views/uViewComisiones.pas      |  Bin 2780 -> 2782 bytes
 .../Contabilidad/Contabilidad_Group.groupproj |   42 +-
 .../Controller/Contabilidad_controller.dpk    |  Bin 2296 -> 2298 bytes
 .../Contabilidad/Data/Contabilidad_data.dpk   |  Bin 824 -> 826 bytes
 .../Model/schContabilidadServer_Intf.pas      |   32 +-
 .../Contabilidad/Views/Contabilidad_view.dpk  |   51 +-
 .../Views/Contabilidad_view.dproj             |   57 +-
 .../Contabilidad/Views/Contabilidad_view.res  |  Bin 384 -> 4748 bytes
 .../Contabilidad/Views/uViewApuntes.pas       |  Bin 5925 -> 5927 bytes
 .../Contabilidad/Views/uViewBalances.pas      |  Bin 2806 -> 2808 bytes
 .../Contabilidad/Views/uViewCuentas.pas       |  Bin 2646 -> 2648 bytes
 .../Views/uViewCuentasEspeciales.pas          |  Bin 2854 -> 2856 bytes
 .../Contabilidad/Views/uViewDiario.pas        |  Bin 2859 -> 2861 bytes
 .../Contabilidad/Views/uViewEpigrafes.pas     |  Bin 2588 -> 2590 bytes
 .../Contabilidad/Views/uViewSubCuentas.pas    |  Bin 2797 -> 2799 bytes
 .../schContabilidadServer_Intf.pas            | 3276 -----------------
 .../Contactos/Contactos_Group.groupproj       |   24 +-
 .../Contactos/Views/Contactos_view.dpk        |  Bin 4200 -> 3770 bytes
 .../Contactos/Views/Contactos_view.dproj      |   53 +-
 .../Contactos/Views/Contactos_view.res        |  Bin 4748 -> 384 bytes
 .../Modulos/Contactos/Views/uViewClientes.pas |  Bin 1933 -> 1935 bytes
 .../Contactos/Views/uViewContactos.pas        |  Bin 3094 -> 3096 bytes
 .../Contactos/Views/uViewEmpleados.pas        |  Bin 940 -> 942 bytes
 .../Contactos/Views/uViewProveedores.pas      |  Bin 1012 -> 1014 bytes
 .../uViewElegirArticulosFacturasCliente.pas   |  Bin 1050 -> 1052 bytes
 .../Views/uViewFacturasCliente.pas            |  Bin 7380 -> 7382 bytes
 .../uViewElegirArticulosFacturasProveedor.pas |  Bin 3402 -> 3404 bytes
 .../Views/uViewFacturasProveedor.pas          |  Bin 7507 -> 7509 bytes
 .../Views/uViewHistoricoMovimientos.pas       |  Bin 6031 -> 6033 bytes
 .../Inventario/Views/uViewDetalleReservas.pas |  Bin 6305 -> 6307 bytes
 .../Views/uViewElegirArticulosCatalogo.pas    |  Bin 1022 -> 1024 bytes
 .../Views/uViewEntradaSalidaArticulos.pas     |  Bin 2805 -> 2807 bytes
 .../Inventario/Views/uViewInventario.pas      |  Bin 5602 -> 5604 bytes
 .../uViewElegirArticulosPedidosProveedor.pas  |  Bin 3404 -> 3406 bytes
 .../Views/uViewPedidosProveedor.pas           |    3 +-
 ...ViewElegirArticulosPresupuestosCliente.pas |  Bin 1084 -> 1086 bytes
 .../Views/uViewPresupuestosCliente.pas        |    3 +-
 .../Model/Copia de uBizPagosCliente.pas       |   70 -
 .../Views/uViewRecibosCliente.pas             |    3 +-
 .../Views/uViewRecibosProveedor.pas           |    3 +-
 .../Controller/Referencias_controller.dpk     |  Bin 926 -> 928 bytes
 .../Referencias/Data/Referencias_data.dpk     |  Bin 708 -> 710 bytes
 .../Views/uViewRecibosRemesaCliente_2.pas     |  Bin 4792 -> 4794 bytes
 .../Views/uViewRemesasCliente.pas             |  Bin 3162 -> 3164 bytes
 .../Views/uViewRemesasProveedor.pas           |  Bin 3236 -> 3238 bytes
 Source/Servidor/FactuGES_Server.RES           |  Bin 23216 -> 23208 bytes
 Source/Servidor/FactuGES_Server.dproj         |    2 -
 Source/Servidor/FactuGES_Server.rc            |    2 +-
 79 files changed, 700 insertions(+), 4112 deletions(-)
 delete mode 100644 Source/Modulos/Contabilidad/schContabilidadServer_Intf.pas
 delete mode 100644 Source/Modulos/Recibos de cliente/Model/Copia de uBizPagosCliente.pas

diff --git a/Build/Build.fbp5 b/Build/Build.fbp5
index f9201b2e..6da45ee3 100644
--- a/Build/Build.fbp5
+++ b/Build/Build.fbp5
@@ -16849,7 +16849,7 @@ Comments=
         <Property name="VariableType" type="TFBVariableType">vtProject</Property>
         </Object>
       <Object Class="TFBVariable" XMLID="{E1F16954-518E-44DB-8598-32BD70D0B552}"><Property MultiValue="0" name="Comment" type="string"></Property>
-        <Property MultiValue="0" name="DefaultValue" type="string">%DELPHI2007DIR%\Lib\Indy10;%project_path%\Lib;%project_path%\Lib\RemObjects\RemObjects_SDK;%project_path%\Lib\RemObjects\Data_Abstract;%project_path%\Lib\CCPack;%project_path%\Lib\CFPack;%project_path%\Lib\GUISDK;%project_path%\Lib\PluginSDK;%project_path%\Lib\DevExpressVCL;%project_path%\Lib\FastReport4;%project_path%\Lib\JCL;%project_path%\Lib\JVCL;%project_path%\Lib\PngComponents;%project_path%\Lib\cxIntl5;%project_path%\Lib\cxIntlPrintSys3;%project_path%\Lib\TB2k+TBX;%project_path%\Lib\Mustangpeak\MPCommonLib;%project_path%\Lib\Mustangpeak\EasyListview;%project_path%\Lib\JSDialog;%project_path%\Lib\UserControl;</Property>
+        <Property MultiValue="0" name="DefaultValue" type="string">%DELPHI2007DIR%\Lib\Indy10;%project_path%\Lib;%project_path%\Lib\RemObjects\RemObjects_SDK;%project_path%\Lib\RemObjects\Data_Abstract;%project_path%\Lib\CCPack;%project_path%\Lib\CFPack;%project_path%\Lib\GUISDK;%project_path%\Lib\PluginSDK;%project_path%\Lib\DevExpressVCL;%project_path%\Lib\FastReport4;%project_path%\Lib\JCL;%project_path%\Lib\JVCL;%project_path%\Lib\PngComponents;%project_path%\Lib\cxIntl6;%project_path%\Lib\cxIntlPrintSys3;%project_path%\Lib\TB2k+TBX;%project_path%\Lib\Mustangpeak\MPCommonLib;%project_path%\Lib\Mustangpeak\EasyListview;%project_path%\Lib\JSDialog;%project_path%\Lib\UserControl;</Property>
         <Property name="IsMacro" type="Boolean">True</Property>
         <Property name="IsPersistent" type="Boolean">False</Property>
         <Property name="MakeEnv" type="Boolean">False</Property>
diff --git a/Source/ApplicationBase/ApplicationBase.dpk b/Source/ApplicationBase/ApplicationBase.dpk
index 96171746f3d6264e53300f41cde645b27e66da09..1feab49b040aa6ca9d86cf8b8084570d966b8b2f 100644
GIT binary patch
delta 46
zcmeyaFj0O(J(GZ;4lkF2LP|wQMrv-Vi=pA<bxi*z`><$Ep2y<PXt?<uOD8uI0|NkK
C4-Rku

delta 268
zcmbOz|6O52J(IqH4lkF2LP|wQMrv-Viy?%YT;ZCMS(0B=j1X{1EJ+0NCigS_t52?Q
zFUm|o$OR;(r#k27l@#UYAOu}2N-zv@ttiMZDuJm<sqjgx%r7lL)0$G@oS&PAP!tgC
zoL>ZYT1rKLOmH$tNp3!hBA>i$kaH(@FzcxR6#><N90?SKo0OcBT;Y?MRFqg$2~xO`
NIfT(*GaE}MHvkuxPw)T$

diff --git a/Source/ApplicationBase/ApplicationBase.dproj b/Source/ApplicationBase/ApplicationBase.dproj
index 80a44982..f4e0ff99 100644
--- a/Source/ApplicationBase/ApplicationBase.dproj
+++ b/Source/ApplicationBase/ApplicationBase.dproj
@@ -46,6 +46,34 @@
     <Borland.ProjectType>Package</Borland.ProjectType>
     <BorlandProject>
 <BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="ImplicitBuild">True</Package_Options><Package_Options Name="DesigntimeOnly">False</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</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"></VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName"></VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
       <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>
@@ -60,59 +88,34 @@
     <DelphiCompile Include="ApplicationBase.dpk">
       <MainSource>MainSource</MainSource>
     </DelphiCompile>
-    <DCCReference Include="..\Modulos\Contabilidad\adortl.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\Base.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\ccpackD11.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\cfpack_d11.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\cxDataD10.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\cxEditorsD10.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\cxExportD10.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\cxExtEditorsD10.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\cxGridD10.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\cxIntlPrintSys3D10.dcp" />
     <DCCReference Include="..\Modulos\Contabilidad\cxLibraryD10.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\cxPageControlD10.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\DataAbstract_Core_D11.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\dbrtl.dcp" />
     <DCCReference Include="..\Modulos\Contabilidad\dclcxLibraryD10.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\designide.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\dsnap.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\dxComnD10.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\dxLayoutControlD10.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\dxPSCoreD10.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\dxPScxCommonD10.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\dxPScxGridLnkD10.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\dxPSLnksD10.dcp" />
     <DCCReference Include="..\Modulos\Contabilidad\dxThemeD10.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\GUIBase.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\GUISDK_D11.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\Jcl.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\JclVcl.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\JSDialog100.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\JvAppFrmD11R.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\JvCoreD11R.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\JvCtrlsD11R.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\JvJansD11R.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\JvMMD11R.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\JvPageCompsD11R.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\JvStdCtrlsD11R.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\JvSystemD11R.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\pckUCDataConnector.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\pckUserControl_RT.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\PluginSDK_D10R.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\PngComponentsD10.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\PNG_D10.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\RemObjects_Core_D11.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\rtl.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\tb2k_d10.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\tbx_d10.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\vcl.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\vclactnband.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\vcldb.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\vcljpg.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\vclshlctrls.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\vclx.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\xmlrtl.dcp" />
+    <DCCReference Include="adortl.dcp" />
+    <DCCReference Include="Base.dcp" />
+    <DCCReference Include="ccpackD11.dcp" />
+    <DCCReference Include="cfpack_d11.dcp" />
+    <DCCReference Include="cxDataD10.dcp" />
+    <DCCReference Include="cxEditorsD10.dcp" />
+    <DCCReference Include="cxExportD10.dcp" />
+    <DCCReference Include="cxExtEditorsD10.dcp" />
+    <DCCReference Include="cxGridD10.dcp" />
+    <DCCReference Include="cxIntlPrintSys3D10.dcp" />
+    <DCCReference Include="cxIntlPrintSys3D110.dcp" />
+    <DCCReference Include="cxLibraryD11.dcp" />
+    <DCCReference Include="cxPageControlD10.dcp" />
+    <DCCReference Include="DataAbstract_Core_D11.dcp" />
+    <DCCReference Include="dbrtl.dcp" />
+    <DCCReference Include="dclcxLibraryD11.dcp" />
+    <DCCReference Include="designide.dcp" />
+    <DCCReference Include="dsnap.dcp" />
+    <DCCReference Include="dxComnD10.dcp" />
+    <DCCReference Include="dxLayoutControlD10.dcp" />
+    <DCCReference Include="dxPSCoreD10.dcp" />
+    <DCCReference Include="dxPScxCommonD10.dcp" />
+    <DCCReference Include="dxPScxGridLnkD10.dcp" />
+    <DCCReference Include="dxPSLnksD10.dcp" />
+    <DCCReference Include="dxThemeD11.dcp" />
     <DCCReference Include="Ejercicios\Controller\uEjerciciosController.pas" />
     <DCCReference Include="Ejercicios\Controller\View\uIEditorEjercicio.pas" />
     <DCCReference Include="Ejercicios\Controller\View\uIEditorEjercicios.pas" />
@@ -146,6 +149,28 @@
     <DCCReference Include="Empresas\Views\uEmpresasViewRegister.pas" />
     <DCCReference Include="Empresas\Views\uViewDatosBancarios.pas" />
     <DCCReference Include="Empresas\Views\uViewEmpresa.pas" />
+    <DCCReference Include="GUIBase.dcp" />
+    <DCCReference Include="GUISDK_D11.dcp" />
+    <DCCReference Include="Jcl.dcp" />
+    <DCCReference Include="JclVcl.dcp" />
+    <DCCReference Include="JSDialog100.dcp" />
+    <DCCReference Include="JvAppFrmD11R.dcp" />
+    <DCCReference Include="JvCoreD11R.dcp" />
+    <DCCReference Include="JvCtrlsD11R.dcp" />
+    <DCCReference Include="JvJansD11R.dcp" />
+    <DCCReference Include="JvMMD11R.dcp" />
+    <DCCReference Include="JvPageCompsD11R.dcp" />
+    <DCCReference Include="JvStdCtrlsD11R.dcp" />
+    <DCCReference Include="JvSystemD11R.dcp" />
+    <DCCReference Include="pckUCDataConnector.dcp" />
+    <DCCReference Include="pckUserControl_RT.dcp" />
+    <DCCReference Include="PluginSDK_D10R.dcp" />
+    <DCCReference Include="PngComponentsD10.dcp" />
+    <DCCReference Include="PNG_D10.dcp" />
+    <DCCReference Include="RemObjects_Core_D11.dcp" />
+    <DCCReference Include="rtl.dcp" />
+    <DCCReference Include="tb2k_d10.dcp" />
+    <DCCReference Include="tbx_d10.dcp" />
     <DCCReference Include="uFactuGES_App.pas" />
     <DCCReference Include="Usuarios\Controller\uUsuariosController.pas" />
     <DCCReference Include="Usuarios\Controller\View\uIEditorLogin.pas" />
@@ -159,6 +184,13 @@
     <DCCReference Include="Usuarios\Model\uUsuarios.pas" />
     <DCCReference Include="Usuarios\Views\uEditorLogin.pas" />
     <DCCReference Include="Usuarios\Views\uUsuariosViewRegister.pas" />
+    <DCCReference Include="vcl.dcp" />
+    <DCCReference Include="vclactnband.dcp" />
+    <DCCReference Include="vcldb.dcp" />
+    <DCCReference Include="vcljpg.dcp" />
+    <DCCReference Include="vclshlctrls.dcp" />
+    <DCCReference Include="vclx.dcp" />
+    <DCCReference Include="xmlrtl.dcp" />
   </ItemGroup>
 </Project>
 <!-- EurekaLog First Line
diff --git a/Source/ApplicationBase/Ejercicios/Views/uViewEjercicios.dfm b/Source/ApplicationBase/Ejercicios/Views/uViewEjercicios.dfm
index 7b6e98d7..db9ce4ec 100644
--- a/Source/ApplicationBase/Ejercicios/Views/uViewEjercicios.dfm
+++ b/Source/ApplicationBase/Ejercicios/Views/uViewEjercicios.dfm
@@ -80,8 +80,8 @@ inherited frViewEjercicios: TfrViewEjercicios
           Width = 121
         end
         inherited edtFechaFinFiltro: TcxDateEdit
-          ExplicitWidth = 121
-          Width = 121
+          ExplicitWidth = 200
+          Width = 200
         end
       end
     end
diff --git a/Source/ApplicationBase/Ejercicios/Views/uViewEjercicios.pas b/Source/ApplicationBase/Ejercicios/Views/uViewEjercicios.pas
index 9e8d3e39..26819ea8 100644
--- a/Source/ApplicationBase/Ejercicios/Views/uViewEjercicios.pas
+++ b/Source/ApplicationBase/Ejercicios/Views/uViewEjercicios.pas
@@ -11,10 +11,10 @@ uses
   cxGridBandedTableView, cxGridDBBandedTableView, JvComponent,
   JvFormAutoSize, PngImageList, ImgList, dxPSGlbl, dxPSUtl, dxPSEngn,
   dxPrnPg, dxBkgnd, dxWrap, dxPrnDev, dxPSCompsProvider, dxPSFillPatterns,
-  dxPSEdgePatterns, cxIntlPrintSys3, dxPSCore, dxPScxCommon, dxPScxGridLnk,
+  dxPSEdgePatterns, cxIntlPrintSys3, dxPSCore, dxPScxCommon, 
   cxGridCustomPopupMenu, cxGridPopupMenu, uViewFiltroBase, TB2Item, TBX,
   TB2Toolbar, TBXDkPanels, TB2Dock, dxPgsDlg, uDAInterfaces, cxCalendar,
-  cxImageComboBox;
+  cxImageComboBox, dxPScxGrid6Lnk;
 
 type
   IViewEjercicios = interface(IViewGrid)
diff --git a/Source/Base/Base.dpk b/Source/Base/Base.dpk
index dee53faf..4fe930ad 100644
--- a/Source/Base/Base.dpk
+++ b/Source/Base/Base.dpk
@@ -37,20 +37,11 @@ requires
   IndyCore,
   IndySystem,
   IndyProtocols,
-  cxLibraryD10,
-  dxThemeD10,
-  cxEditorsD10,
-  cxDataD10,
-  cxExtEditorsD10,
-  cxGridD10,
-  cxPageControlD10,
-  cxExportD10,
-  dxPSCoreD10,
   PNG_D10,
   PngComponentsD10,
   tbx_d10,
-  cxIntlPrintSys3D10,
-  cxIntl5D10,
+  cxIntlPrintSys3D11,
+  cxIntl6D11,
   Jcl,
   JvCoreD11R,
   JvSystemD11R,
diff --git a/Source/Base/Base.dproj b/Source/Base/Base.dproj
index 326b0324..93ca12eb 100644
--- a/Source/Base/Base.dproj
+++ b/Source/Base/Base.dproj
@@ -44,13 +44,6 @@
     <Borland.ProjectType>Package</Borland.ProjectType>
     <BorlandProject>
 <BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">Libreria base de FactuGES</Package_Options><Package_Options Name="ImplicitBuild">True</Package_Options><Package_Options Name="DesigntimeOnly">False</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</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"></VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName"></VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
-      
-      
-      
-      
-      
-      
-      
       <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>
@@ -67,55 +60,46 @@
     </DelphiCompile>
     <DCCReference Include="..\Cliente\DataAbstract_Core_D10.dcp" />
     <DCCReference Include="..\Cliente\RemObjects_Core_D10.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\adortl.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\cxDataD10.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\cxEditorsD10.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\cxExportD10.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\cxExtEditorsD10.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\cxGridD10.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\cxIntl5D10.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\cxIntlPrintSys3D10.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\cxLibraryD10.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\cxPageControlD10.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\DataAbstract_Core_D11.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\dbrtl.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\dclIndyCore.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\designide.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\dsnap.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\dxPSCoreD10.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\dxThemeD10.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\GUISDK_D11.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\IndyCore.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\IndyProtocols.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\IndySystem.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\Jcl.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\JclVcl.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\JSDialog100.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\JvCmpD11R.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\JvCoreD11R.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\JvCtrlsD11R.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\JvDlgsD11R.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\JvMMD11R.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\JvNetD11R.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\JvPageCompsD11R.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\JvStdCtrlsD11R.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\JvSystemD11R.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\pckMD5.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\pckUCDataConnector.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\pckUserControl_RT.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\PngComponentsD10.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\PNG_D10.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\RemObjects_Core_D11.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\rtl.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\TB2k_D10.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\tbx_d10.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\vcl.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\vclactnband.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\vcldb.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\vcljpg.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\VclSmp.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\vclx.dcp" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\xmlrtl.dcp" />
+    <DCCReference Include="..\Modulos\Contabilidad\adortl.dcp" />
+    <DCCReference Include="..\Modulos\Contabilidad\cxIntl6D11.dcp" />
+    <DCCReference Include="..\Modulos\Contabilidad\cxIntlPrintSys3D11.dcp" />
+    <DCCReference Include="..\Modulos\Contabilidad\DataAbstract_Core_D11.dcp" />
+    <DCCReference Include="..\Modulos\Contabilidad\dbrtl.dcp" />
+    <DCCReference Include="..\Modulos\Contabilidad\dclIndyCore.dcp" />
+    <DCCReference Include="..\Modulos\Contabilidad\designide.dcp" />
+    <DCCReference Include="..\Modulos\Contabilidad\dsnap.dcp" />
+    <DCCReference Include="..\Modulos\Contabilidad\GUISDK_D11.dcp" />
+    <DCCReference Include="..\Modulos\Contabilidad\IndyCore.dcp" />
+    <DCCReference Include="..\Modulos\Contabilidad\IndyProtocols.dcp" />
+    <DCCReference Include="..\Modulos\Contabilidad\IndySystem.dcp" />
+    <DCCReference Include="..\Modulos\Contabilidad\Jcl.dcp" />
+    <DCCReference Include="..\Modulos\Contabilidad\JclVcl.dcp" />
+    <DCCReference Include="..\Modulos\Contabilidad\JSDialog100.dcp" />
+    <DCCReference Include="..\Modulos\Contabilidad\JvCmpD11R.dcp" />
+    <DCCReference Include="..\Modulos\Contabilidad\JvCoreD11R.dcp" />
+    <DCCReference Include="..\Modulos\Contabilidad\JvCtrlsD11R.dcp" />
+    <DCCReference Include="..\Modulos\Contabilidad\JvDlgsD11R.dcp" />
+    <DCCReference Include="..\Modulos\Contabilidad\JvMMD11R.dcp" />
+    <DCCReference Include="..\Modulos\Contabilidad\JvNetD11R.dcp" />
+    <DCCReference Include="..\Modulos\Contabilidad\JvPageCompsD11R.dcp" />
+    <DCCReference Include="..\Modulos\Contabilidad\JvStdCtrlsD11R.dcp" />
+    <DCCReference Include="..\Modulos\Contabilidad\JvSystemD11R.dcp" />
+    <DCCReference Include="..\Modulos\Contabilidad\pckMD5.dcp" />
+    <DCCReference Include="..\Modulos\Contabilidad\pckUCDataConnector.dcp" />
+    <DCCReference Include="..\Modulos\Contabilidad\pckUserControl_RT.dcp" />
+    <DCCReference Include="..\Modulos\Contabilidad\PngComponentsD10.dcp" />
+    <DCCReference Include="..\Modulos\Contabilidad\PNG_D10.dcp" />
+    <DCCReference Include="..\Modulos\Contabilidad\RemObjects_Core_D11.dcp" />
+    <DCCReference Include="..\Modulos\Contabilidad\rtl.dcp" />
+    <DCCReference Include="..\Modulos\Contabilidad\TB2k_D10.dcp" />
+    <DCCReference Include="..\Modulos\Contabilidad\tbx_d10.dcp" />
+    <DCCReference Include="..\Modulos\Contabilidad\vcl.dcp" />
+    <DCCReference Include="..\Modulos\Contabilidad\vclactnband.dcp" />
+    <DCCReference Include="..\Modulos\Contabilidad\vcldb.dcp" />
+    <DCCReference Include="..\Modulos\Contabilidad\vcljpg.dcp" />
+    <DCCReference Include="..\Modulos\Contabilidad\VclSmp.dcp" />
+    <DCCReference Include="..\Modulos\Contabilidad\vclx.dcp" />
+    <DCCReference Include="..\Modulos\Contabilidad\xmlrtl.dcp" />
     <DCCReference Include="..\Servicios\FactuGES_Intf.pas" />
     <DCCReference Include="Conexion\uConfigurarConexion.pas">
       <Form>fConfigurarConexion</Form>
diff --git a/Source/Base/uDMBase.dfm b/Source/Base/uDMBase.dfm
index 71da85e0..b804d252 100644
--- a/Source/Base/uDMBase.dfm
+++ b/Source/Base/uDMBase.dfm
@@ -190,325 +190,7 @@ object dmBase: TdmBase
     Left = 104
     Top = 80
   end
-  object cxIntl: TcxIntl
-    Connected = True
-    cxLibrary.CantCreateRegistryKey = 'No se puede crear la llave de registro : \%s'
-    PageControl2.ImageListIndexError = 'El '#237'ndice (%d) deber'#225' estar entre 0 y %d'
-    PageControl2.NoBaseImages = 'BaseImages no est'#225' asignado'
-    PageControl2.NoRegisteredStyles = 'No hay estilos registrados'
-    PageControl2.PageIndexError = '%d es un valor inv'#225'lido para PageIndex, debe estar entre 0 y %d'
-    PageControl2.PainterClassError = 'La clase PCPainter es nula'
-    PageControl2.StandardStyleError = '%s es un estilo est'#225'ndar no soportado'
-    PageControl2.StyleNameError = '%s es un nombre de estilo no registrado'
-    PageControl2.TabCountEqualsZero = 'Tabs.Count = 0'
-    PageControl2.TabIndexError = 'El '#237'ndice de la pesta'#241'a (%d) est'#225' fuera de l'#237'mites'
-    PageControl2.TabVisibleIndexOutsOfBounds = 'Propiedad TabVisibleIndex (%d) deber'#225' estar entre 0 y %d'
-    PageControl2.VisibleTabListEmpty = 'No hay pesta'#241'as visibles'
-    QuantumGrid5.GridRecursiveLevels = 'No se pueden crear niveles recursivos'
-    QuantumGrid5.GridDeletingConfirmationCaption = 'Confirmar'
-    QuantumGrid5.GridDeletingFocusedConfirmationText = #191'Borrar registro?'
-    QuantumGrid5.GridDeletingSelectedConfirmationText = #191'Borrar todos los registros seleccionados?'
-    QuantumGrid5.GridNoDataInfoText = '<No hay datos a mostrar>'
-    QuantumGrid5.GridNewItemRowInfoText = 'Haga click aqu'#237' para agregar una nueva l'#237'nea'
-    QuantumGrid5.GridFilterIsEmpty = '<Filtro Vac'#237'o>'
-    QuantumGrid5.GridCustomizationFormCaption = 'Personalizaci'#243'n'
-    QuantumGrid5.GridCustomizationFormColumnsPageCaption = 'Columnas'
-    QuantumGrid5.GridGroupByBoxCaption = 'Arrastre una columna aqu'#237' para agrupar por dicha columna'
-    QuantumGrid5.GridFilterCustomizeButtonCaption = 'Personalizar...'
-    QuantumGrid5.GridColumnsQuickCustomizationHint = 'Haga click aqu'#237' para seleccionar las columas visibles'
-    QuantumGrid5.GridCustomizationFormBandsPageCaption = 'Bandas'
-    QuantumGrid5.GridBandsQuickCustomizationHint = 'Haga click aqu'#237' para seleccionar las bandas visibles'
-    QuantumGrid5.GridCustomizationFormRowsPageCaption = 'Rows'
-    QuantumGrid5.GridConverterIntermediaryMissing = 'Omiti'#243' un componente intermediario!'
-    QuantumGrid5.GridConverterNotExistGrid = 'cxGrid no existe'
-    QuantumGrid5.GridConverterNotExistComponent = 'El componente no existe'
-    QuantumGrid5.ImportErrorCaption = 'Error al importar'
-    QuantumGrid5.NotExistGridView = 'No existe la vista del grid'
-    QuantumGrid5.NotExistGridLevel = 'No existe un nivel de grid activo'
-    QuantumGrid5.CantCreateExportOutputFile = 'No se puede crear el archivo de exportaci'#243'n'
-    QuantumGrid5.EditRepositoryExtLookupComboBoxItem = 
-      'ExtLookupComboBox|Representa un ultra avanzado control de busque' +
-      'da (lookup) usando el QuantumGrid como su control de despliegue'
-    Navigator.NavigatorHint_First = 'Primer registro'
-    Navigator.NavigatorHint_Prior = 'Registro anterior'
-    Navigator.NavigatorHint_PriorPage = 'P'#225'gina anterior'
-    Navigator.NavigatorHint_Next = 'Siguiente registro'
-    Navigator.NavigatorHint_NextPage = 'Siguiente p'#225'gina'
-    Navigator.NavigatorHint_Last = #218'ltimo registro'
-    Navigator.NavigatorHint_Insert = 'Insertar registro'
-    Navigator.NavigatorHint_Delete = 'Borrar registro'
-    Navigator.NavigatorHint_Edit = 'Editar registro'
-    Navigator.NavigatorHint_Post = 'Grabar edici'#243'n'
-    Navigator.NavigatorHint_Cancel = 'Cancelar edici'#243'n'
-    Navigator.NavigatorHint_Refresh = 'Actualizar datos'
-    Navigator.NavigatorHint_SaveBookmark = 'Guardar Marca'
-    Navigator.NavigatorHint_GotoBookmark = 'Volver a Marca'
-    Navigator.NavigatorHint_Filter = 'Filtrar datos'
-    Navigator.Navigator_DeleteRecordQuestion = #191'Desea borrar este el registro?'
-    Editors5.EditDateConvertError = 'El valor no se puede convertir a fecha'
-    Editors5.EditInvalidRepositoryItem = 'Elemento de repositorio no v'#225'lido'
-    Editors5.EditNumericValueConvertError = 'No se puede convertir a valor num'#233'rico'
-    Editors5.EditPopupCircularReferencingError = 'Referencia circular no permitida'
-    Editors5.EditPostError = 'Ocurri'#243' un error durante el grabado del valor de edici'#243'n'
-    Editors5.EditTimeConvertError = 'No se puede convertir a valor de tiempo'
-    Editors5.EditValidateErrorText = 'Valor inv'#225'lido. Use la tecla de escape para cancelar cambios'
-    Editors5.EditValueOutOfBounds = 'Valor fuera de l'#237'mites'
-    Editors5.EditCheckBoxChecked = 'True'
-    Editors5.EditCheckBoxUnchecked = 'False'
-    Editors5.TextTrue = 'True'
-    Editors5.TextFalse = 'False'
-    Editors5.BlobButtonOK = '&Aceptar'
-    Editors5.BlobButtonCancel = '&Cancelar'
-    Editors5.BlobButtonClose = '&Cerrar'
-    Editors5.BlobMemo = '(MEMO)'
-    Editors5.BlobMemoEmpty = '(memo)'
-    Editors5.BlobPicture = '(IM'#193'GEN)'
-    Editors5.BlobPictureEmpty = '(im'#225'gen)'
-    Editors5.MenuItemCaptionCut = 'Cor&tar'
-    Editors5.MenuItemCaptionCopy = '&Copiar'
-    Editors5.MenuItemCaptionPaste = '&Pegar'
-    Editors5.MenuItemCaptionDelete = '&Borrar'
-    Editors5.MenuItemCaptionLoad = '&Leer...'
-    Editors5.MenuItemCaptionSave = 'Guardar &Como...'
-    Editors5.DatePopupClear = 'Limpiar'
-    Editors5.DatePopupNow = 'Ahora'
-    Editors5.DatePopupOK = 'Aceptar'
-    Editors5.DatePopupToday = 'Hoy'
-    Editors5.DateError = 'Fecha inv'#225'lida'
-    Editors5.DateToday = 'hoy'
-    Editors5.DateYesterday = 'ayer'
-    Editors5.DateTomorrow = 'ma'#241'ana'
-    Editors5.DateSunday = 'Domingo'
-    Editors5.DateMonday = 'Lunes'
-    Editors5.DateTuesday = 'Martes'
-    Editors5.DateWednesday = 'Mi'#233'rcoles'
-    Editors5.DateThursday = 'Jueves'
-    Editors5.DateFriday = 'Viernes'
-    Editors5.DateSaturday = 'S'#225'bado'
-    Editors5.DateFirst = 'Primero'
-    Editors5.DateSecond = 'segundo'
-    Editors5.DateThird = 'tercero'
-    Editors5.DateFourth = 'Cuarto'
-    Editors5.DateFifth = 'Quinto'
-    Editors5.DateSixth = 'sexto'
-    Editors5.DateSeventh = 's'#233'ptimo'
-    Editors5.DateBOM = 'bom'
-    Editors5.DateEOM = 'eom'
-    Editors5.DateNow = 'ahora'
-    Editors5.CalcError = 'Error'
-    Editors5.HyperLinkPrefix = 'http://'
-    Editors5.HyperLinkDoubleSlash = '//'
-    Editors5.EditRepositoryBlobItem = 'BlobEdit|Representa el editor de BLOB'
-    Editors5.EditRepositoryButtonItem = 
-      'ButtonEdit|Representa un control de edici'#243'n con controles incrus' +
-      'tados'
-    Editors5.EditRepositoryCalcItem = 
-      'CalcEdit|Representa un control de edici'#243'n con una ventana de cal' +
-      'culadora desplegable'
-    Editors5.EditRepositoryCheckBoxItem = 
-      'CheckBox|Representa un control de caja de marca que permite sele' +
-      'ccionar una opci'#243'n'
-    Editors5.EditRepositoryComboBoxItem = 'ComboBox|Representa el editor de la caja combo'
-    Editors5.EditRepositoryCurrencyItem = 
-      'CurrencyEdit|Representa un editor que habilita la edici'#243'n de val' +
-      'ores monetarios'
-    Editors5.EditRepositoryDateItem = 
-      'DateEdit|Representa un control de edici'#243'n con un calendario desp' +
-      'legable'
-    Editors5.EditRepositoryHyperLinkItem = 'HyperLink|Representa un editor de texto de hiperv'#237'nculos'
-    Editors5.EditRepositoryImageComboBoxItem = 
-      'ImageComboBox|Representa un editor que muestra una lista de im'#225'g' +
-      'enes y texto en la ventana desplegable'
-    Editors5.EditRepositoryImageItem = 'Image|Representa un editor de im'#225'genes'
-    Editors5.EditRepositoryLookupComboBoxItem = 'LookupComboBox|Representa una caja de b'#250'squeda'
-    Editors5.EditRepositoryMaskItem = 'MaskEdit|Representa un control de edici'#243'n gen'#233'rico con m'#225'scara'
-    Editors5.EditRepositoryMemoItem = 
-      'Memo|Representa un control de edici'#243'n que permite editar datos m' +
-      'emo'
-    Editors5.EditRepositoryMRUItem = 
-      'MRUEdit|Representa un editor de texto mostrando la lista de los ' +
-      'elementos m'#225's recientemente usados (MRU) en una ventana desplega' +
-      'ble'
-    Editors5.EditRepositoryPopupItem = 
-      'PopupEdit|Representa un control de edici'#243'n con una lista despleg' +
-      'able'
-    Editors5.EditRepositorySpinItem = 'SpinEdit|Representa un editor de incrementos/decrementos (spin)'
-    Editors5.EditRepositoryRadioGroupItem = 'RadioGroup|Represents a group of radio buttons'
-    Editors5.EditRepositoryTextItem = 'TextEdit|Representa un editor de texto de l'#237'nea sencilla'
-    Editors5.EditRepositoryTimeItem = 'TimeEdit|Representa un editor mostrando valores de tiempo'
-    Editors5.RegExprLine = 'L'#237'nea'
-    Editors5.RegExprChar = 'Char'
-    Editors5.RegExprNotAssignedSourceStream = 'No se ha asignado el stream fuente'
-    Editors5.RegExprEmptySourceStream = 'El stream or'#237'gen est'#225' vac'#237'o'
-    Editors5.RegExprCantUsePlusQuantifier = 'El cuantificador '#39'+'#39' no puede aplicarse aqu'#237
-    Editors5.RegExprCantUseStarQuantifier = 'El cuantificador '#39'*'#39' no puede aplicarse aqu'#237
-    Editors5.RegExprCantCreateEmptyAlt = 'La alternativa no debe estar vac'#237'a'
-    Editors5.RegExprCantCreateEmptyBlock = 'El bloque no debe estar vac'#237'o'
-    Editors5.RegExprIllegalSymbol = 'S'#237'mbolo no permitido '#39'%s'#39
-    Editors5.RegExprIllegalQuantifier = 'Cuantificador no permitido '#39'%s'#39
-    Editors5.RegExprNotSupportQuantifier = 'El par'#225'metro cuantificador no es soportado'
-    Editors5.RegExprIllegalIntegerValue = 'Valor entero no permitido'
-    Editors5.RegExprTooBigReferenceNumber = 'N'#250'mero de referencia demasiado grande'
-    Editors5.RegExprCantCreateEmptyEnum = 'No puedo crear enumeraci'#243'n vac'#237'a'
-    Editors5.RegExprSubrangeOrder = 'El caracter de inicio del subrango debe ser menor al de fin'
-    Editors5.RegExprHexNumberExpected0 = 'Se esperaba n'#250'mero Hexadecimal'
-    Editors5.RegExprHexNumberExpected = 'N'#250'mero Hexadecimal esperado pero encontr'#243' '#39'%s'#39
-    Editors5.RegExprMissing = 'Falta '#39'%s'#39
-    Editors5.RegExprUnnecessary = 'Innecesario '#39'%s'#39
-    Editors5.RegExprIncorrectSpace = 'Espacio incorrecto despu'#233's de '#39'\'#39
-    Editors5.RegExprNotCompiled = 'Expresi'#243'n regular no compila'
-    Editors5.RegExprIncorrectParameterQuantifier = 'Cuantificador de par'#225'metros incorrecto'
-    Editors5.RegExprCantUseParameterQuantifier = 'The parameter quantifier cannot be applied here'
-    Editors5.MaskEditRegExprError = 'Errores en expresiones regulares:'
-    Editors5.MaskEditInvalidEditValue = 'El valor de edici'#243'n es inv'#225'lido'
-    Editors5.MaskEditNoMask = 'Ninguno'
-    Editors5.MaskEditIllegalFileFormat = 'Formato de archivo ilegal'
-    Editors5.MaskEditEmptyMaskCollectionFile = 'El archivo de colecci'#243'n de m'#225'scaras est'#225' vac'#237'o'
-    Editors5.MaskEditMaskCollectionFiles = 'Archivos de colecci'#243'n de m'#225'scaras'
-    Editors5.SpinEditInvalidNumericValue = 'Valor num'#233'rico no v'#225'lido'
-    Datacontroller.DataReadError = 'Error de lectura en or'#237'gen de datos'
-    Datacontroller.DataWriteError = 'Error de escritura en or'#237'gen de datos (stream)'
-    Datacontroller.DataItemExistError = 'El elemento ya existe'
-    Datacontroller.DataRecordIndexError = #205'ndice de registro fuera de rango'
-    Datacontroller.DataItemIndexError = #205'ndice de elemento fuera de rango'
-    Datacontroller.DataProviderModeError = 'La operaci'#243'n no es soportada en modo de proveedor (provider)'
-    Datacontroller.DataInvalidStreamFormat = 'Origen de datos (Stream) inv'#225'lido'
-    Datacontroller.DataRowIndexError = #205'ndice del elemento de fila fuera de rango'
-    Datacontroller.DataCustomDataSourceInvalidCompare = 'Instrucci'#243'n GetInfoForCompare no implementada'
-    Datacontroller.DBDetailFilterControllerNotFound = 'DetailFilterController no encontrado'
-    Datacontroller.DBNotInGridMode = 'La controladora de datos no est'#225' en modo de Grid'
-    Datacontroller.DBKeyFieldNotFound = 'Campo llave no encontrado'
-    Filter.FilterOperatorEqual = 'igual'
-    Filter.FilterOperatorNotEqual = 'no es igual'
-    Filter.FilterOperatorLess = 'es menor que'
-    Filter.FilterOperatorLessEqual = 'es menor o igual que'
-    Filter.FilterOperatorGreater = 'es mayor que'
-    Filter.FilterOperatorGreaterEqual = 'es mayor o igual que'
-    Filter.FilterOperatorLike = 'como'
-    Filter.FilterOperatorNotLike = 'no es como'
-    Filter.FilterOperatorBetween = 'entre'
-    Filter.FilterOperatorNotBetween = 'no entre'
-    Filter.FilterOperatorInList = 'en'
-    Filter.FilterOperatorNotInList = 'no en'
-    Filter.FilterOperatorYesterday = 'es ayer'
-    Filter.FilterOperatorToday = 'es hoy'
-    Filter.FilterOperatorTomorrow = 'es ma'#241'ana'
-    Filter.FilterOperatorLastWeek = 'es '#250'ltima semana'
-    Filter.FilterOperatorLastMonth = 'es '#250'ltimo mes'
-    Filter.FilterOperatorLastYear = 'es a'#241'o pasado'
-    Filter.FilterOperatorThisWeek = 'es esta semana'
-    Filter.FilterOperatorThisMonth = 'es este mes'
-    Filter.FilterOperatorThisYear = 'es este a'#241'o'
-    Filter.FilterOperatorNextWeek = 'es semana siguiente'
-    Filter.FilterOperatorNextMonth = 'es mes siguiente'
-    Filter.FilterOperatorNextYear = 'es a'#241'o pr'#243'ximo'
-    Filter.FilterAndCaption = 'y'
-    Filter.FilterOrCaption = 'o'
-    Filter.FilterNotCaption = 'no'
-    Filter.FilterBlankCaption = 'vac'#237'o'
-    Filter.FilterOperatorIsNull = 'es vac'#237'o'
-    Filter.FilterOperatorIsNotNull = 'no es vac'#237'o'
-    Filter.FilterOperatorBeginsWith = 'comienza con'
-    Filter.FilterOperatorDoesNotBeginWith = 'no comienza con'
-    Filter.FilterOperatorEndsWith = 'termina con'
-    Filter.FilterOperatorDoesNotEndWith = 'no termina con'
-    Filter.FilterOperatorContains = 'contiene'
-    Filter.FilterOperatorDoesNotContain = 'no contiene'
-    Filter.FilterBoxAllCaption = '(Todos)'
-    Filter.FilterBoxCustomCaption = '(Personalizado...)'
-    Filter.FilterBoxBlanksCaption = '(Vac'#237'os)'
-    Filter.FilterBoxNonBlanksCaption = '(No vac'#237'os)'
-    Filter.FilterBoolOperatorAnd = 'AND'
-    Filter.FilterBoolOperatorOr = 'OR'
-    Filter.FilterBoolOperatorNotAnd = 'NOT AND'
-    Filter.FilterBoolOperatorNotOr = 'NOT OR'
-    Filter.FilterRootButtonCaption = 'Filtro'
-    Filter.FilterAddCondition = 'Agregar &Condici'#243'n'
-    Filter.FilterAddGroup = 'Agregar &Grupo'
-    Filter.FilterRemoveRow = '&Remover Fila'
-    Filter.FilterClearAll = 'Limpiar &Todo'
-    Filter.FilterFooterAddCondition = 'Agregar una nueva condici'#243'n'
-    Filter.FilterGroupCaption = 'aplica a las siguientes condiciones'
-    Filter.FilterRootGroupCaption = '<ra'#237'z>'
-    Filter.FilterControlNullString = '<vac'#237'o>'
-    Filter.FilterErrorBuilding = 'No se puede construir filtro desde el or'#237'gen'
-    Filter.FilterDialogCaption = 'Filtro Personalizado'
-    Filter.FilterDialogInvalidValue = 'Valor inv'#225'lido'
-    Filter.FilterDialogUse = 'Usar'
-    Filter.FilterDialogSingleCharacter = 'para representar un caracter sencillo'
-    Filter.FilterDialogCharactersSeries = 'para representar cualquier serie de caracteres'
-    Filter.FilterDialogOperationAnd = 'Y'
-    Filter.FilterDialogOperationOr = 'O'
-    Filter.FilterDialogRows = 'Mostrar filas donde:'
-    Filter.FilterControlDialogCaption = 'Constructor de Filtro'
-    Filter.FilterControlDialogNewFile = 'sinnombre.flt'
-    Filter.FilterControlDialogOpenDialogCaption = 'Abrir un filtro existente'
-    Filter.FilterControlDialogSaveDialogCaption = 'Grabar el filtro activo a archivo'
-    Filter.FilterControlDialogActionSaveCaption = '&Guardar...'
-    Filter.FilterControlDialogActionOpenCaption = '&Abrir...'
-    Filter.FilterControlDialogActionApplyCaption = '&Aplicar'
-    Filter.FilterControlDialogActionOkCaption = 'Aceptar'
-    Filter.FilterControlDialogActionCancelCaption = 'Cancelar'
-    Filter.FilterControlDialogFileExt = 'flt'
-    Filter.FilterControlDialogFileFilter = 'Filtros (*.flt)|*.flt'
-    GridPopupMenu.GridNone = 'Ninguno'
-    GridPopupMenu.GridSortColumnAsc = 'Ordenar Ascendente'
-    GridPopupMenu.GridSortColumnDesc = 'Ordenar Descendente'
-    GridPopupMenu.GridClearSorting = 'Clear Sorting'
-    GridPopupMenu.GridGroupByThisField = 'Agrupar por este campo'
-    GridPopupMenu.GridRemoveThisGroupItem = 'Remover del grupo'
-    GridPopupMenu.GridGroupByBox = 'Panel "Agrupar por"'
-    GridPopupMenu.GridAlignmentSubMenu = 'Alineaci'#243'n'
-    GridPopupMenu.GridAlignLeft = 'Alineaci'#243'n Izquierda'
-    GridPopupMenu.GridAlignRight = 'Alineaci'#243'n Derecha'
-    GridPopupMenu.GridAlignCenter = 'Alineaci'#243'n Centrada'
-    GridPopupMenu.GridRemoveColumn = 'Remover esta columna'
-    GridPopupMenu.GridFieldChooser = 'Selector de campos'
-    GridPopupMenu.GridBestFit = 'Mejor distribuci'#243'n'
-    GridPopupMenu.GridBestFitAllColumns = 'Mejor distribuci'#243'n (Todas las columnas)'
-    GridPopupMenu.GridShowFooter = 'Pie'
-    GridPopupMenu.GridShowGroupFooter = 'Pies de grupo'
-    GridPopupMenu.GridSumMenuItem = 'Sumar'
-    GridPopupMenu.GridMinMenuItem = 'M'#237'nimo'
-    GridPopupMenu.GridMaxMenuItem = 'M'#225'ximo'
-    GridPopupMenu.GridCountMenuItem = 'Contar'
-    GridPopupMenu.GridAvgMenuItem = 'Promedio'
-    GridPopupMenu.GridNoneMenuItem = 'Ninguno'
-    GridExport.UnsupportedExport = 'Tipo de exportaci'#243'n no soportado: %1'
-    GridExport.StyleManagerKill = 
-      'El administrador de estilo esta siendo utilizado y no puede ser ' +
-      'liberado en este momento'
-    GridExport.StyleManagerCreate = 'No se puede crear administrador de estilo'
-    GridExport.ExportToHtml = 'Exportar a p'#225'gina Web (*.html)'
-    GridExport.ExportToXml = 'Exportar a documento XML (*.xml)'
-    GridExport.ExportToText = 'Exportar a formato de texto (*.txt)'
-    GridExport.EmptyExportCache = 'Cache de exportaci'#243'n vac'#237'o'
-    GridExport.IncorrectUnion = 'Uni'#243'n de celdas incorrecta'
-    GridExport.IllegalWidth = 'Ancho de columna ilegal'
-    GridExport.InvalidColumnRowCount = 'Conteo de columna o fila inv'#225'lido'
-    GridExport.IllegalHeight = 'Alto de fila ilegal'
-    GridExport.InvalidColumnIndex = 'El '#237'ndice de columna %d fuera de l'#237'mites'
-    GridExport.InvalidRowIndex = 'El '#237'ndice de fila %d est'#225' fuera de l'#237'mites'
-    GridExport.InvalidStyleIndex = #205'ndice de estilo %d inv'#225'lido'
-    GridExport.ExportToExcel = 'Exportar a MS Excel (*.xls)'
-    GridExport.WorkbookWrite = 'Error al escribir el archivo XLS'
-    GridExport.InvalidCellDimension = 'Dimensi'#243'n de celda inv'#225'lida'
-    GridExport.BoolTrue = 'True'
-    GridExport.BoolFalse = 'False'
-    Translate.cxLibrary = True
-    Translate.PageControl2 = False
-    Translate.QuantumGrid5 = True
-    Translate.Editors5 = True
-    Translate.Datacontroller = True
-    Translate.Filter = True
-    Translate.GridPopupMenu = True
-    Translate.GridExport = True
-    Translate.Navigator = True
-    Version = '5.0'
-    Left = 104
-    Top = 16
-  end
-  object cxIntlPrintSys31: TcxIntlPrintSys3
+  object cxIntlPrintSys3: TcxIntlPrintSys3
     Connected = True
     Version = '3.0'
     BtnOK = 'Aceptar'
@@ -1624,4 +1306,445 @@ object dmBase: TdmBase
     Left = 184
     Top = 80
   end
+  object cxIntl: TcxIntl
+    Connected = True
+    cxLibrary.CantCreateRegistryKey = 'No se puede crear la llave de registro : \%s'
+    cxLibrary.ConverterCantCreateStyleRepository = 'No se puede crear un almac'#233'n de estilos'
+    PageControl.ImageListIndexError = 'El '#237'ndice (%d) deber'#225' estar entre 0 y %d'
+    PageControl.NoBaseImages = 'BaseImages no est'#225' asignado'
+    PageControl.NoRegisteredStyles = 'No hay estilos registrados'
+    PageControl.PageIndexError = '%d es un valor inv'#225'lido para PageIndex, debe estar entre 0 y %d'
+    PageControl.PainterClassError = 'La clase PCPainter es nula'
+    PageControl.StandardStyleError = '%s es un estilo est'#225'ndar no soportado'
+    PageControl.StyleNameError = '%s es un nombre de estilo no registrado'
+    PageControl.TabCountEqualsZero = 'Tabs.Count = 0'
+    PageControl.TabIndexError = 'El '#237'ndice de la pesta'#241'a (%d) est'#225' fuera de l'#237'mites'
+    PageControl.TabVisibleIndexOutsOfBounds = 'Propiedad TabVisibleIndex (%d) deber'#225' estar entre 0 y %d'
+    PageControl.VisibleTabListEmpty = 'No hay pesta'#241'as visibles'
+    PageControl.PCAllowRotateError = '%s es un estilo que no soporta pesta'#241'as rotatorias'
+    QuantumGrid.GridRecursiveLevels = 'No se pueden crear niveles recursivos'
+    QuantumGrid.GridDeletingConfirmationCaption = 'Confirmar'
+    QuantumGrid.GridDeletingFocusedConfirmationText = #191'Borrar registro?'
+    QuantumGrid.GridDeletingSelectedConfirmationText = #191'Borrar todos los registros seleccionados?'
+    QuantumGrid.GridNoDataInfoText = '<No hay datos a mostrar>'
+    QuantumGrid.GridNewItemRowInfoText = 'Haga click aqu'#237' para agregar una nueva l'#237'nea'
+    QuantumGrid.GridFilterIsEmpty = '<Filtro Vac'#237'o>'
+    QuantumGrid.GridCustomizationFormCaption = 'Personalizaci'#243'n'
+    QuantumGrid.GridCustomizationFormColumnsPageCaption = 'Columnas'
+    QuantumGrid.GridGroupByBoxCaption = 'Arrastre una columna aqu'#237' para agrupar por dicha columna'
+    QuantumGrid.GridFilterCustomizeButtonCaption = 'Personalizar...'
+    QuantumGrid.GridColumnsQuickCustomizationHint = 'Haga click aqu'#237' para seleccionar las columas visibles'
+    QuantumGrid.GridCustomizationFormBandsPageCaption = 'Bandas'
+    QuantumGrid.GridBandsQuickCustomizationHint = 'Haga click aqu'#237' para seleccionar las bandas visibles'
+    QuantumGrid.GridCustomizationFormRowsPageCaption = 'Rows'
+    QuantumGrid.GridConverterIntermediaryMissing = 'Omiti'#243' un componente intermediario!'
+    QuantumGrid.GridConverterNotExistGrid = 'cxGrid no existe'
+    QuantumGrid.GridConverterNotExistComponent = 'El componente no existe'
+    QuantumGrid.ImportErrorCaption = 'Error al importar'
+    QuantumGrid.NotExistGridView = 'No existe la vista del grid'
+    QuantumGrid.NotExistGridLevel = 'No existe un nivel de grid activo'
+    QuantumGrid.CantCreateExportOutputFile = 'No se puede crear el archivo de exportaci'#243'n'
+    QuantumGrid.EditRepositoryExtLookupComboBoxItem = 
+      'ExtLookupComboBox|Representa un ultra avanzado control de busque' +
+      'da (lookup) usando el QuantumGrid como su control de despliegue'
+    QuantumGrid.GridFilterRowInfoText = 'Haga clic aqu'#237' para definir un filtro'
+    QuantumGrid.GridFilterApplyButtonCaption = 'Aplicar Filtro'
+    QuantumGrid.GridYesterday = 'Ayer'
+    QuantumGrid.GridToday = 'Hoy'
+    QuantumGrid.GridTomorrow = 'Ma'#241'ana'
+    QuantumGrid.GridLast30Days = #218'ltimos 30 d'#237'as'
+    QuantumGrid.GridLast14Days = #218'ltimos 14 d'#237'as'
+    QuantumGrid.GridLast7Days = #218'ltimos 7 d'#237'as'
+    QuantumGrid.GridNext7Days = 'Pr'#243'ximos 7 d'#237'as'
+    QuantumGrid.GridNext14Days = 'Pr'#243'ximos 14 d'#237'as'
+    QuantumGrid.GridNext30Days = 'Pr'#243'ximos 30 d'#237'as'
+    QuantumGrid.GridLastTwoWeeks = #218'lt. dos semanas'
+    QuantumGrid.GridLastWeek = 'Semana pasada'
+    QuantumGrid.GridThisWeek = #201'sta semana'
+    QuantumGrid.GridNextWeek = 'Pr'#243'xima semana'
+    QuantumGrid.GridNextTwoWeeks = 'Pr'#243'x. dos semanas'
+    QuantumGrid.GridLastMonth = #218'ltimo mes'
+    QuantumGrid.GridThisMonth = #201'ste mes'
+    QuantumGrid.GridNextMonth = 'Pr'#243'ximo mes'
+    QuantumGrid.GridLastYear = 'A'#241'o pasado'
+    QuantumGrid.GridThisYear = #201'ste a'#241'o'
+    QuantumGrid.GridNextYear = 'Pr'#243'ximo a'#241'o'
+    QuantumGrid.GridPast = 'Pasado'
+    QuantumGrid.GridFuture = 'Futuro'
+    QuantumGrid.GridMonthFormat = 'mmmm yyyy'
+    QuantumGrid.GridYearFormat = 'yyyy'
+    QuantumGrid.GridChartCategoriesDisplayText = 'Datos'
+    QuantumGrid.GridChartValueHintFormat = '%s para %s es %s'
+    QuantumGrid.GridChartPercentValueTickMarkLabelFormat = '0%'
+    QuantumGrid.GridChartToolBoxDataLevels = 'Niveles de Datos:'
+    QuantumGrid.GridChartToolBoxDataLevelSelectValue = 'seleccione valor'
+    QuantumGrid.GridChartToolBoxCustomizeButtonCaption = 'Personalizar Gr'#225'fico'
+    QuantumGrid.GridChartNoneDiagramDisplayText = 'Sin Diagrama'
+    QuantumGrid.GridChartColumnDiagramDisplayText = 'Diagrama de Columnas'
+    QuantumGrid.GridChartBarDiagramDisplayText = 'Diagrama de Barras'
+    QuantumGrid.GridChartLineDiagramDisplayText = 'Diagrama de L'#237'neas'
+    QuantumGrid.GridChartAreaDiagramDisplayText = 'Diagrama de '#193'rea'
+    QuantumGrid.GridChartPieDiagramDisplayText = 'Diagrama de Tarta'
+    QuantumGrid.GridChartCustomizationFormSeriesPageCaption = 'Series'
+    QuantumGrid.GridChartCustomizationFormSortBySeries = 'Ordenar Por:'
+    QuantumGrid.GridChartCustomizationFormNoSortedSeries = '<serie nula>'
+    QuantumGrid.GridChartCustomizationFormDataGroupsPageCaption = 'Grupos de Datos'
+    QuantumGrid.GridChartCustomizationFormOptionsPageCaption = 'Opciones'
+    QuantumGrid.GridChartLegend = 'Leyenda'
+    QuantumGrid.GridChartLegendKeyBorder = 'Marco de Clave'
+    QuantumGrid.GridChartPosition = 'Posici'#243'n'
+    QuantumGrid.GridChartPositionDefault = 'Defecto'
+    QuantumGrid.GridChartPositionNone = 'Ninguno'
+    QuantumGrid.GridChartPositionLeft = 'Izquierda'
+    QuantumGrid.GridChartPositionTop = 'Superior'
+    QuantumGrid.GridChartPositionRight = 'Derecha'
+    QuantumGrid.GridChartPositionBottom = 'Inferior'
+    QuantumGrid.GridChartAlignment = 'Alineaci'#243'n'
+    QuantumGrid.GridChartAlignmentDefault = 'Defecto'
+    QuantumGrid.GridChartAlignmentStart = 'Inicio'
+    QuantumGrid.GridChartAlignmentCenter = 'Centro'
+    QuantumGrid.GridChartAlignmentEnd = 'Final'
+    QuantumGrid.GridChartOrientation = 'Orientaci'#243'n'
+    QuantumGrid.GridChartOrientationDefault = 'Defecto'
+    QuantumGrid.GridChartOrientationHorizontal = 'Horizontal'
+    QuantumGrid.GridChartOrientationVertical = 'Vertical'
+    QuantumGrid.GridChartBorder = 'Marco'
+    QuantumGrid.GridChartTitle = 'T'#237'tulo'
+    QuantumGrid.GridChartToolBox = 'Caja de Herramientas'
+    QuantumGrid.GridChartDiagramSelector = 'Selector de Diagramas'
+    QuantumGrid.GridChartOther = 'Otro'
+    QuantumGrid.GridChartValueHints = 'Valores de Ayuda'
+    Navigator.NavigatorHint_First = 'Primer registro'
+    Navigator.NavigatorHint_Prior = 'Registro anterior'
+    Navigator.NavigatorHint_PriorPage = 'P'#225'gina anterior'
+    Navigator.NavigatorHint_Next = 'Siguiente registro'
+    Navigator.NavigatorHint_NextPage = 'Siguiente p'#225'gina'
+    Navigator.NavigatorHint_Last = #218'ltimo registro'
+    Navigator.NavigatorHint_Insert = 'Insertar registro'
+    Navigator.NavigatorHint_Delete = 'Borrar registro'
+    Navigator.NavigatorHint_Append = 'Append record'
+    Navigator.NavigatorHint_Edit = 'Editar registro'
+    Navigator.NavigatorHint_Post = 'Grabar edici'#243'n'
+    Navigator.NavigatorHint_Cancel = 'Cancelar edici'#243'n'
+    Navigator.NavigatorHint_Refresh = 'Actualizar datos'
+    Navigator.NavigatorHint_SaveBookmark = 'Guardar Marca'
+    Navigator.NavigatorHint_GotoBookmark = 'Volver a Marca'
+    Navigator.NavigatorHint_Filter = 'Filtrar datos'
+    Navigator.Navigator_DeleteRecordQuestion = #191'Desea borrar este el registro?'
+    Editors.EditButtonCancel = 'Cancelar'
+    Editors.EditButtonOK = 'Aceptar'
+    Editors.EditDateConvertError = 'El valor no se puede convertir a fecha'
+    Editors.EditInvalidRepositoryItem = 'Elemento de repositorio no v'#225'lido'
+    Editors.EditNumericValueConvertError = 'No se puede convertir a valor num'#233'rico'
+    Editors.EditPopupCircularReferencingError = 'Referencia circular no permitida'
+    Editors.EditPostError = 'Ocurri'#243' un error durante el grabado del valor de edici'#243'n'
+    Editors.EditTimeConvertError = 'No se puede convertir a valor de tiempo'
+    Editors.EditValidateErrorText = 'Valor inv'#225'lido. Use la tecla de escape para cancelar cambios'
+    Editors.EditValueOutOfBounds = 'Valor fuera de l'#237'mites'
+    Editors.EditCheckBoxChecked = 'True'
+    Editors.EditCheckBoxUnchecked = 'False'
+    Editors.TextTrue = 'True'
+    Editors.TextFalse = 'False'
+    Editors.BlobButtonOK = '&Aceptar'
+    Editors.BlobButtonCancel = '&Cancelar'
+    Editors.BlobButtonClose = '&Cerrar'
+    Editors.BlobMemo = '(MEMO)'
+    Editors.BlobMemoEmpty = '(memo)'
+    Editors.BlobPicture = '(IM'#193'GEN)'
+    Editors.BlobPictureEmpty = '(im'#225'gen)'
+    Editors.MenuItemCaptionCut = 'Cor&tar'
+    Editors.MenuItemCaptionCopy = '&Copiar'
+    Editors.MenuItemCaptionPaste = '&Pegar'
+    Editors.MenuItemCaptionDelete = '&Borrar'
+    Editors.MenuItemCaptionLoad = '&Leer...'
+    Editors.MenuItemCaptionSave = 'Guardar &Como...'
+    Editors.DatePopupClear = 'Limpiar'
+    Editors.DatePopupNow = 'Ahora'
+    Editors.DatePopupOK = 'Aceptar'
+    Editors.DatePopupToday = 'Hoy'
+    Editors.DateError = 'Fecha inv'#225'lida'
+    Editors.DateToday = 'hoy'
+    Editors.DateYesterday = 'ayer'
+    Editors.DateTomorrow = 'ma'#241'ana'
+    Editors.DateSunday = 'Domingo'
+    Editors.DateMonday = 'Lunes'
+    Editors.DateTuesday = 'Martes'
+    Editors.DateWednesday = 'Mi'#233'rcoles'
+    Editors.DateThursday = 'Jueves'
+    Editors.DateFriday = 'Viernes'
+    Editors.DateSaturday = 'S'#225'bado'
+    Editors.DateFirst = 'Primero'
+    Editors.DateSecond = 'segundo'
+    Editors.DateThird = 'tercero'
+    Editors.DateFourth = 'Cuarto'
+    Editors.DateFifth = 'Quinto'
+    Editors.DateSixth = 'sexto'
+    Editors.DateSeventh = 's'#233'ptimo'
+    Editors.DateBOM = 'bom'
+    Editors.DateEOM = 'eom'
+    Editors.DateNow = 'ahora'
+    Editors.CalcError = 'Error'
+    Editors.HyperLinkPrefix = 'http://'
+    Editors.HyperLinkDoubleSlash = '//'
+    Editors.EditRepositoryBlobItem = 'BlobEdit|Representa el editor de BLOB'
+    Editors.EditRepositoryButtonItem = 
+      'ButtonEdit|Representa un control de edici'#243'n con controles incrus' +
+      'tados'
+    Editors.EditRepositoryCalcItem = 
+      'CalcEdit|Representa un control de edici'#243'n con una ventana de cal' +
+      'culadora desplegable'
+    Editors.EditRepositoryCheckBoxItem = 
+      'CheckBox|Representa un control de caja de marca que permite sele' +
+      'ccionar una opci'#243'n'
+    Editors.EditRepositoryComboBoxItem = 'ComboBox|Representa el editor de la caja combo'
+    Editors.EditRepositoryCurrencyItem = 
+      'CurrencyEdit|Representa un editor que habilita la edici'#243'n de val' +
+      'ores monetarios'
+    Editors.EditRepositoryDateItem = 
+      'DateEdit|Representa un control de edici'#243'n con un calendario desp' +
+      'legable'
+    Editors.EditRepositoryHyperLinkItem = 'HyperLink|Representa un editor de texto de hiperv'#237'nculos'
+    Editors.EditRepositoryImageComboBoxItem = 
+      'ImageComboBox|Representa un editor que muestra una lista de im'#225'g' +
+      'enes y texto en la ventana desplegable'
+    Editors.EditRepositoryImageItem = 'Image|Representa un editor de im'#225'genes'
+    Editors.EditRepositoryLookupComboBoxItem = 'LookupComboBox|Representa una caja de b'#250'squeda'
+    Editors.EditRepositoryMaskItem = 'MaskEdit|Representa un control de edici'#243'n gen'#233'rico con m'#225'scara'
+    Editors.EditRepositoryMemoItem = 
+      'Memo|Representa un control de edici'#243'n que permite editar datos m' +
+      'emo'
+    Editors.EditRepositoryMRUItem = 
+      'MRUEdit|Representa un editor de texto mostrando la lista de los ' +
+      'elementos m'#225's recientemente usados (MRU) en una ventana desplega' +
+      'ble'
+    Editors.EditRepositoryPopupItem = 
+      'PopupEdit|Representa un control de edici'#243'n con una lista despleg' +
+      'able'
+    Editors.EditRepositorySpinItem = 'SpinEdit|Representa un editor de incrementos/decrementos (spin)'
+    Editors.EditRepositoryRadioGroupItem = 'RadioGroup|Represents a group of radio buttons'
+    Editors.EditRepositoryTextItem = 'TextEdit|Representa un editor de texto de l'#237'nea sencilla'
+    Editors.EditRepositoryTimeItem = 'TimeEdit|Representa un editor mostrando valores de tiempo'
+    Editors.EditRepositoryColorComboBoxItem = 'ColorComboBox |Represents a editor with color functionality'
+    Editors.EditRepositoryFontNameComboBoxItem = 'FontNameComboBox |Represents a editor with font functionality'
+    Editors.EditRepositoryLabelItem = 'Label|Represents a Label'
+    Editors.EditRepositoryProgressBarItem = 'ProgressBar|Represents a ProgressBar'
+    Editors.EditRepositoryTrackBarItem = 'TrackBar|Represents a TrackBar'
+    Editors.EditRepositorySpinButtonItem = 'SpinButton|Represents a SpinButton'
+    Editors.EditRepositoryCheckComboBox = 'CheckComboBox|Represents a CheckComboBox'
+    Editors.EditRepositoryShellComboBoxItem = 
+      'ShellComboBox|Represents a combo box with a dropdown shell tree ' +
+      'view'
+    Editors.EditRepositoryCheckGroupItem = 'CheckGroup|Represents a group of check boxes'
+    Editors.EditRepositoryRichEditItem = 'RichEdit|RichEdit control'
+    Editors.EditCheckGroupCaptionStateDelimiter = ': '
+    Editors.EditCheckGroupFilterColumnSeparator = '; '
+    Editors.EditCheckGroupChecked = 'Checked'
+    Editors.EditCheckGroupGrayed = 'Grayed'
+    Editors.EditCheckGroupUnchecked = 'Unchecked'
+    Editors.CheckComboBoxStatesItemsPropertyDlgCaption = 'cxCheckComboBox - CheckStates editor'
+    Editors.CheckGroupStatesItemsPropertyDlgCaption = 'cxCheckGroup - CheckStates editor'
+    Editors.CheckComboBoxEmptySelectionText = 'None selected'
+    Editors.ColorComboBoxDefaultDescription = 'Color not selected'
+    Editors.EditRichEditLibraryError = 'Cannot load a RichEdit library'
+    Editors.EditRichEditLineInsertionError = 'RichEdit line insertion error'
+    Editors.EditRichEditLoadFail = 'Failed to Load Stream'
+    Editors.EditRichEditSaveFail = 'Failed to Save Stream'
+    Editors.EditRichEditUndoCaption = '&Undo'
+    Editors.EditRichEditRedoCaption = '&Redo'
+    Editors.EditRichEditCutCaption = 'Cu&t'
+    Editors.EditRichEditCopyCaption = '&Copy'
+    Editors.EditRichEditPasteCaption = '&Paste'
+    Editors.EditRichEditDeleteCaption = '&Delete'
+    Editors.EditRichEditSelectAllCaption = 'Select &All'
+    Editors.RegExprLine = 'L'#237'nea'
+    Editors.RegExprChar = 'Char'
+    Editors.RegExprNotAssignedSourceStream = 'No se ha asignado el stream fuente'
+    Editors.RegExprEmptySourceStream = 'El stream or'#237'gen est'#225' vac'#237'o'
+    Editors.RegExprCantUsePlusQuantifier = 'El cuantificador '#39'+'#39' no puede aplicarse aqu'#237
+    Editors.RegExprCantUseStarQuantifier = 'El cuantificador '#39'*'#39' no puede aplicarse aqu'#237
+    Editors.RegExprCantCreateEmptyAlt = 'La alternativa no debe estar vac'#237'a'
+    Editors.RegExprCantCreateEmptyBlock = 'El bloque no debe estar vac'#237'o'
+    Editors.RegExprIllegalSymbol = 'S'#237'mbolo no permitido '#39'%s'#39
+    Editors.RegExprIllegalQuantifier = 'Cuantificador no permitido '#39'%s'#39
+    Editors.RegExprNotSupportQuantifier = 'El par'#225'metro cuantificador no es soportado'
+    Editors.RegExprIllegalIntegerValue = 'Valor entero no permitido'
+    Editors.RegExprTooBigReferenceNumber = 'N'#250'mero de referencia demasiado grande'
+    Editors.RegExprCantCreateEmptyEnum = 'No puedo crear enumeraci'#243'n vac'#237'a'
+    Editors.RegExprSubrangeOrder = 'El caracter de inicio del subrango debe ser menor al de fin'
+    Editors.RegExprHexNumberExpected0 = 'Se esperaba n'#250'mero Hexadecimal'
+    Editors.RegExprHexNumberExpected = 'N'#250'mero Hexadecimal esperado pero encontr'#243' '#39'%s'#39
+    Editors.RegExprMissing = 'Falta '#39'%s'#39
+    Editors.RegExprUnnecessary = 'Innecesario '#39'%s'#39
+    Editors.RegExprIncorrectSpace = 'Espacio incorrecto despu'#233's de '#39'\'#39
+    Editors.RegExprNotCompiled = 'Expresi'#243'n regular no compila'
+    Editors.RegExprIncorrectParameterQuantifier = 'Cuantificador de par'#225'metros incorrecto'
+    Editors.RegExprCantUseParameterQuantifier = 'The parameter quantifier cannot be applied here'
+    Editors.UDAssociated = ' is already associated with '
+    Editors.HotZoneStyleMediaPlayer9 = 'MediaPlayer9'
+    Editors.HotZoneStyleMediaPlayer8 = 'MediaPlayer8'
+    Editors.HotZoneStyleXPTaskBar = 'XPTaskBar'
+    Editors.HotZoneStyleSimple = 'Simple'
+    Editors.LoadingFonts = 'Loading ...'
+    Editors.MaskEditRegExprError = 'Errores en expresiones regulares:'
+    Editors.MaskEditInvalidEditValue = 'El valor de edici'#243'n es inv'#225'lido'
+    Editors.MaskEditNoMask = 'Ninguno'
+    Editors.MaskEditIllegalFileFormat = 'Formato de archivo ilegal'
+    Editors.MaskEditEmptyMaskCollectionFile = 'El archivo de colecci'#243'n de m'#225'scaras est'#225' vac'#237'o'
+    Editors.MaskEditMaskCollectionFiles = 'Archivos de colecci'#243'n de m'#225'scaras'
+    Editors.SpinEditInvalidNumericValue = 'Valor num'#233'rico no v'#225'lido'
+    Datacontroller.DataReadError = 'Error de lectura en or'#237'gen de datos'
+    Datacontroller.DataWriteError = 'Error de escritura en or'#237'gen de datos (stream)'
+    Datacontroller.DataItemExistError = 'El elemento ya existe'
+    Datacontroller.DataRecordIndexError = #205'ndice de registro fuera de rango'
+    Datacontroller.DataItemIndexError = #205'ndice de elemento fuera de rango'
+    Datacontroller.DataProviderModeError = 'La operaci'#243'n no es soportada en modo de proveedor (provider)'
+    Datacontroller.DataInvalidStreamFormat = 'Origen de datos (Stream) inv'#225'lido'
+    Datacontroller.DataRowIndexError = #205'ndice del elemento de fila fuera de rango'
+    Datacontroller.DataCustomDataSourceInvalidCompare = 'Instrucci'#243'n GetInfoForCompare no implementada'
+    Datacontroller.DBDetailFilterControllerNotFound = 'DetailFilterController no encontrado'
+    Datacontroller.DBNotInGridMode = 'La controladora de datos no est'#225' en modo de Grid'
+    Datacontroller.DBKeyFieldNotFound = 'Campo llave no encontrado'
+    Filter.FilterOperatorEqual = 'igual'
+    Filter.FilterOperatorNotEqual = 'no es igual'
+    Filter.FilterOperatorLess = 'es menor que'
+    Filter.FilterOperatorLessEqual = 'es menor o igual que'
+    Filter.FilterOperatorGreater = 'es mayor que'
+    Filter.FilterOperatorGreaterEqual = 'es mayor o igual que'
+    Filter.FilterOperatorLike = 'como'
+    Filter.FilterOperatorNotLike = 'no es como'
+    Filter.FilterOperatorBetween = 'entre'
+    Filter.FilterOperatorNotBetween = 'no entre'
+    Filter.FilterOperatorInList = 'en'
+    Filter.FilterOperatorNotInList = 'no en'
+    Filter.FilterOperatorYesterday = 'es ayer'
+    Filter.FilterOperatorToday = 'es hoy'
+    Filter.FilterOperatorTomorrow = 'es ma'#241'ana'
+    Filter.FilterOperatorLastWeek = 'es '#250'ltima semana'
+    Filter.FilterOperatorLastMonth = 'es '#250'ltimo mes'
+    Filter.FilterOperatorLastYear = 'es a'#241'o pasado'
+    Filter.FilterOperatorThisWeek = 'es esta semana'
+    Filter.FilterOperatorThisMonth = 'es este mes'
+    Filter.FilterOperatorThisYear = 'es este a'#241'o'
+    Filter.FilterOperatorNextWeek = 'es semana siguiente'
+    Filter.FilterOperatorNextMonth = 'es mes siguiente'
+    Filter.FilterOperatorNextYear = 'es a'#241'o pr'#243'ximo'
+    Filter.FilterOperatorLast7Days = #218'ltimos 7 d'#237'as'
+    Filter.FilterOperatorLast14Days = #218'ltimos 14 d'#237'as'
+    Filter.FilterOperatorLastTwoWeeks = #218'ltimas 2 semanas'
+    Filter.FilterOperatorLast30Days = #218'ltimos 30 d'#237'as'
+    Filter.FilterOperatorPast = 'Pasado'
+    Filter.FilterOperatorNext7Days = 'Pr'#243'ximos 7 d'#237'as'
+    Filter.FilterOperatorNext14Days = 'Pr'#243'ximos 14 d'#237'as'
+    Filter.FilterOperatorNextTwoWeeks = 'Pr'#243'ximas 2 semanas'
+    Filter.FilterOperatorNext30Days = 'Pr'#243'ximos 30 d'#237'as'
+    Filter.FilterOperatorFuture = 'Futuro'
+    Filter.FilterAndCaption = 'y'
+    Filter.FilterOrCaption = 'o'
+    Filter.FilterNotCaption = 'no'
+    Filter.FilterBlankCaption = 'vac'#237'o'
+    Filter.FilterOperatorIsNull = 'es vac'#237'o'
+    Filter.FilterOperatorIsNotNull = 'no es vac'#237'o'
+    Filter.FilterOperatorBeginsWith = 'comienza con'
+    Filter.FilterOperatorDoesNotBeginWith = 'no comienza con'
+    Filter.FilterOperatorEndsWith = 'termina con'
+    Filter.FilterOperatorDoesNotEndWith = 'no termina con'
+    Filter.FilterOperatorContains = 'contiene'
+    Filter.FilterOperatorDoesNotContain = 'no contiene'
+    Filter.FilterBoxAllCaption = '(Todos)'
+    Filter.FilterBoxCustomCaption = '(Personalizado...)'
+    Filter.FilterBoxBlanksCaption = '(Vac'#237'os)'
+    Filter.FilterBoxNonBlanksCaption = '(NoVac'#237'os)'
+    Filter.FilterBoolOperatorAnd = 'Y'
+    Filter.FilterBoolOperatorOr = 'O'
+    Filter.FilterBoolOperatorNotAnd = 'NO Y'
+    Filter.FilterBoolOperatorNotOr = 'NO O'
+    Filter.FilterRootButtonCaption = 'Filtro'
+    Filter.FilterAddCondition = 'Agregar &Condici'#243'n'
+    Filter.FilterAddGroup = 'Agregar &Grupo'
+    Filter.FilterRemoveRow = '&Remover Fila'
+    Filter.FilterClearAll = 'Limpiar &Todo'
+    Filter.FilterFooterAddCondition = 'presione el bot'#243'n para agregar una nueva condici'#243'n'
+    Filter.FilterGroupCaption = 'aplica a las siguientes condiciones'
+    Filter.FilterRootGroupCaption = '<ra'#237'z>'
+    Filter.FilterControlNullString = '<vac'#237'o>'
+    Filter.FilterErrorBuilding = 'No se puede construir filtro desde el or'#237'gen'
+    Filter.FilterDialogCaption = 'Filtro Personalizado'
+    Filter.FilterDialogInvalidValue = 'Valor inv'#225'lido'
+    Filter.FilterDialogUse = 'Usar'
+    Filter.FilterDialogSingleCharacter = 'para representar un caracter sencillo'
+    Filter.FilterDialogCharactersSeries = 'para representar cualquier serie de caracteres'
+    Filter.FilterDialogOperationAnd = 'Y'
+    Filter.FilterDialogOperationOr = 'O'
+    Filter.FilterDialogRows = 'Mostrar filas donde:'
+    Filter.FilterControlDialogCaption = 'Constructor de Filtro'
+    Filter.FilterControlDialogNewFile = 'sinnombre.flt'
+    Filter.FilterControlDialogOpenDialogCaption = 'Abrir un filtro existente'
+    Filter.FilterControlDialogSaveDialogCaption = 'Grabar el filtro activo a archivo'
+    Filter.FilterControlDialogActionSaveCaption = '&Guardar...'
+    Filter.FilterControlDialogActionOpenCaption = '&Abrir...'
+    Filter.FilterControlDialogActionApplyCaption = '&Aplicar'
+    Filter.FilterControlDialogActionOkCaption = 'Aceptar'
+    Filter.FilterControlDialogActionCancelCaption = 'Cancelar'
+    Filter.FilterControlDialogFileExt = 'flt'
+    Filter.FilterControlDialogFileFilter = 'Filtros (*.flt)|*.flt'
+    GridPopupMenu.GridNone = 'Ninguno'
+    GridPopupMenu.GridSortColumnAsc = 'Ordenar Ascendente'
+    GridPopupMenu.GridSortColumnDesc = 'Ordenar Descendente'
+    GridPopupMenu.GridClearSorting = 'Eliminar Ordenaci'#243'n'
+    GridPopupMenu.GridGroupByThisField = 'Agrupar por este campo'
+    GridPopupMenu.GridRemoveThisGroupItem = 'Remover del grupo'
+    GridPopupMenu.GridGroupByBox = 'Panel "Agrupar por"'
+    GridPopupMenu.GridAlignmentSubMenu = 'Alineaci'#243'n'
+    GridPopupMenu.GridAlignLeft = 'Alineaci'#243'n Izquierda'
+    GridPopupMenu.GridAlignRight = 'Alineaci'#243'n Derecha'
+    GridPopupMenu.GridAlignCenter = 'Alineaci'#243'n Centrada'
+    GridPopupMenu.GridRemoveColumn = 'Remover esta columna'
+    GridPopupMenu.GridFieldChooser = 'Selector de campos'
+    GridPopupMenu.GridBestFit = 'Mejor distribuci'#243'n'
+    GridPopupMenu.GridBestFitAllColumns = 'Mejor distribuci'#243'n (Todas las columnas)'
+    GridPopupMenu.GridShowFooter = 'Pie'
+    GridPopupMenu.GridShowGroupFooter = 'Pies de grupo'
+    GridPopupMenu.GridSumMenuItem = 'Sumar'
+    GridPopupMenu.GridMinMenuItem = 'M'#237'nimo'
+    GridPopupMenu.GridMaxMenuItem = 'M'#225'ximo'
+    GridPopupMenu.GridCountMenuItem = 'Contar'
+    GridPopupMenu.GridAvgMenuItem = 'Promedio'
+    GridPopupMenu.GridNoneMenuItem = 'Ninguno'
+    GridPopupMenu.GridSortByGroupValues = 'Sort by Group Value'
+    GridPopupMenu.GridSortBySummaryCaption = 'Sort by Group Summary:'
+    GridPopupMenu.GridSortBySummary = '%s for %s'
+    GridExport.UnsupportedExport = 'Tipo de exportaci'#243'n no soportado: %1'
+    GridExport.StyleManagerKill = 
+      'El administrador de estilo esta siendo utilizado y no puede ser ' +
+      'liberado en este momento'
+    GridExport.StyleManagerCreate = 'No se puede crear administrador de estilo'
+    GridExport.ExportToHtml = 'Exportar a p'#225'gina Web (*.html)'
+    GridExport.ExportToXml = 'Exportar a documento XML (*.xml)'
+    GridExport.ExportToText = 'Exportar a formato de texto (*.txt)'
+    GridExport.EmptyExportCache = 'Cache de exportaci'#243'n vac'#237'o'
+    GridExport.IncorrectUnion = 'Uni'#243'n de celdas incorrecta'
+    GridExport.IllegalWidth = 'Ancho de columna ilegal'
+    GridExport.InvalidColumnRowCount = 'Conteo de columna o fila inv'#225'lido'
+    GridExport.IllegalHeight = 'Alto de fila ilegal'
+    GridExport.InvalidColumnIndex = 'El '#237'ndice de columna %d fuera de l'#237'mites'
+    GridExport.InvalidRowIndex = 'El '#237'ndice de fila %d est'#225' fuera de l'#237'mites'
+    GridExport.InvalidStyleIndex = #205'ndice de estilo %d inv'#225'lido'
+    GridExport.ExportToExcel = 'Exportar a MS Excel (*.xls)'
+    GridExport.WorkbookWrite = 'Error al escribir el archivo XLS'
+    GridExport.InvalidCellDimension = 'Dimensi'#243'n de celda inv'#225'lida'
+    GridExport.BoolTrue = 'True'
+    GridExport.BoolFalse = 'False'
+    Translate.cxLibrary = False
+    Translate.PageControl = False
+    Translate.QuantumGrid = False
+    Translate.Editors = False
+    Translate.Datacontroller = False
+    Translate.Filter = False
+    Translate.GridPopupMenu = False
+    Translate.GridExport = False
+    Translate.Navigator = False
+    Version = '6.29'
+    Left = 104
+    Top = 16
+  end
 end
diff --git a/Source/Base/uDMBase.pas b/Source/Base/uDMBase.pas
index b8120f14..af977081 100644
--- a/Source/Base/uDMBase.pas
+++ b/Source/Base/uDMBase.pas
@@ -13,9 +13,9 @@ type
     SmallImages: TPngImageList;
     StyleManager: TJvNavPaneStyleManager;
     TBXSwitcher: TTBXSwitcher;
-    cxIntl: TcxIntl;
-    cxIntlPrintSys31: TcxIntlPrintSys3;
+    cxIntlPrintSys3: TcxIntlPrintSys3;
     JvLogFile: TJvLogFile;
+    cxIntl: TcxIntl;
     procedure DAClientDataModuleCreate(Sender: TObject);
     procedure DataModuleDestroy(Sender: TObject);
   private
diff --git a/Source/GUIBase/GUIBase.dpk b/Source/GUIBase/GUIBase.dpk
index 82c968ff..8e02bef9 100644
--- a/Source/GUIBase/GUIBase.dpk
+++ b/Source/GUIBase/GUIBase.dpk
@@ -30,18 +30,19 @@ requires
   vcl,
   dbrtl,
   vcldb,
-  dxBarD10,
-  dxBarExtItemsD10,
-  dxPScxCommonD10,
-  dxPScxGridLnkD10,
-  dxPsPrVwAdvD10,
-  dxLayoutControlD10,
   frx11,
   frxe11,
   fs11,
   JvAppFrmD11R,
   JvCtrlsD11R,
-  Base;
+  Base,
+  dxBarD11,
+  dxBarExtItemsD11,
+  dxLayoutControlD11,
+  dxPScxCommonD11,
+  dxPScxGrid6LnkD11,
+  dxPsPrVwAdvD11,
+  JvGlobusD11R;
 
 contains
   uEditorBase in 'uEditorBase.pas' {fEditorBase: TCustomEditor},
diff --git a/Source/GUIBase/GUIBase.dproj b/Source/GUIBase/GUIBase.dproj
index 5afc8fd2..fdc744e7 100644
--- a/Source/GUIBase/GUIBase.dproj
+++ b/Source/GUIBase/GUIBase.dproj
@@ -57,108 +57,23 @@
     <DelphiCompile Include="GUIBase.dpk">
       <MainSource>MainSource</MainSource>
     </DelphiCompile>
-    <DCCReference Include="..\Modulos\Contabilidad\Base.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\dbrtl.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\dxBarD10.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\dxBarExtItemsD10.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\dxLayoutControlD10.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\dxPScxCommonD10.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\dxPScxGridLnkD10.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\dxPsPrVwAdvD10.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\frx11.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\frxe11.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\fs11.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\JvAppFrmD11R.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\JvCtrlsD11R.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\rtl.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\vcl.dcp" />
-    <DCCReference Include="..\Modulos\Contabilidad\vcldb.dcp" />
-    <DCCReference Include="uDialogBase.pas">
-      <Form>fDialogBase</Form>
-    </DCCReference>
-    <DCCReference Include="uEditorBase.pas">
-      <Form>fEditorBase</Form>
-      <DesignClass>TCustomEditor</DesignClass>
-    </DCCReference>
-    <DCCReference Include="uEditorBasico.pas">
-      <Form>fEditorBasico</Form>
-    </DCCReference>
-    <DCCReference Include="uEditorDBBase.pas">
-      <Form>fEditorDBBase</Form>
-      <DesignClass>TCustomEditor</DesignClass>
-    </DCCReference>
-    <DCCReference Include="uEditorDBItem.pas">
-      <Form>fEditorDBItem</Form>
-      <DesignClass>TCustomEditor</DesignClass>
-    </DCCReference>
-    <DCCReference Include="uEditorGridBase.pas">
-      <Form>fEditorGridBase</Form>
-      <DesignClass>TCustomEditor</DesignClass>
-    </DCCReference>
-    <DCCReference Include="uEditorItem.pas">
-      <Form>fEditorItem</Form>
-      <DesignClass>TCustomEditor</DesignClass>
-    </DCCReference>
-    <DCCReference Include="uEditorPreview.pas">
-      <Form>fEditorPreview</Form>
-      <DesignClass>TCustomEditor</DesignClass>
-    </DCCReference>
-    <DCCReference Include="uViewBarraSeleccion.pas">
-      <Form>frViewBarraSeleccion</Form>
-      <DesignClass>TFrame</DesignClass>
-    </DCCReference>
-    <DCCReference Include="uViewBase.pas">
-      <Form>frViewBase</Form>
-      <DesignClass>TFrame</DesignClass>
-    </DCCReference>
-    <DCCReference Include="uViewDetallesBase.pas">
-      <Form>frViewDetallesBase</Form>
-      <DesignClass>TFrame</DesignClass>
-    </DCCReference>
-    <DCCReference Include="uViewDetallesDTO.pas">
-      <Form>frViewDetallesDTO</Form>
-      <DesignClass>TCustomView</DesignClass>
-    </DCCReference>
-    <DCCReference Include="uViewDetallesGenerico.pas">
-      <Form>frViewDetallesGenerico</Form>
-      <DesignClass>TFrame</DesignClass>
-    </DCCReference>
-    <DCCReference Include="uViewFiltroBase.pas">
-      <Form>frViewFiltroBase</Form>
-      <DesignClass>TFrame</DesignClass>
-    </DCCReference>
-    <DCCReference Include="uViewFormaPago.pas">
-      <Form>frViewFormaPago</Form>
-      <DesignClass>TFrame</DesignClass>
-    </DCCReference>
-    <DCCReference Include="uViewGrid.pas">
-      <Form>frViewGrid</Form>
-      <DesignClass>TFrame</DesignClass>
-    </DCCReference>
-    <DCCReference Include="uViewGrid2Niveles.pas">
-      <Form>frViewGrid2Niveles</Form>
-      <DesignClass>TFrame</DesignClass>
-    </DCCReference>
-    <DCCReference Include="uViewGridBase.pas">
-      <Form>frViewGridBase</Form>
-      <DesignClass>TFrame</DesignClass>
-    </DCCReference>
-    <DCCReference Include="uViewIncidencias.pas">
-      <Form>frViewIncidencias</Form>
-      <DesignClass>TFrame</DesignClass>
-    </DCCReference>
-    <DCCReference Include="uViewObservaciones.pas">
-      <Form>frViewObservaciones</Form>
-      <DesignClass>TFrame</DesignClass>
-    </DCCReference>
-    <DCCReference Include="uViewPreview.pas">
-      <Form>frViewPreview</Form>
-      <DesignClass>TFrame</DesignClass>
-    </DCCReference>
-    <DCCReference Include="uViewTotales.pas">
-      <Form>frViewTotales</Form>
-      <DesignClass>TFrame</DesignClass>
-    </DCCReference>
+    <DCCReference Include="..\Servidor\Base.dcp" />
+    <DCCReference Include="..\Servidor\dbrtl.dcp" />
+    <DCCReference Include="..\Servidor\dxBarD11.dcp" />
+    <DCCReference Include="..\Servidor\dxBarExtItemsD11.dcp" />
+    <DCCReference Include="..\Servidor\dxLayoutControlD11.dcp" />
+    <DCCReference Include="..\Servidor\dxPScxCommonD11.dcp" />
+    <DCCReference Include="..\Servidor\dxPScxGrid6LnkD11.dcp" />
+    <DCCReference Include="..\Servidor\dxPsPrVwAdvD11.dcp" />
+    <DCCReference Include="..\Servidor\frx11.dcp" />
+    <DCCReference Include="..\Servidor\frxe11.dcp" />
+    <DCCReference Include="..\Servidor\fs11.dcp" />
+    <DCCReference Include="..\Servidor\JvAppFrmD11R.dcp" />
+    <DCCReference Include="..\Servidor\JvCtrlsD11R.dcp" />
+    <DCCReference Include="..\Servidor\JvGlobusD11RcontainsuEditorBasein.dcp" />
+    <DCCReference Include="..\Servidor\rtl.dcp" />
+    <DCCReference Include="..\Servidor\vcl.dcp" />
+    <DCCReference Include="..\Servidor\vcldb.dcp" />
   </ItemGroup>
 </Project>
 <!-- EurekaLog First Line
diff --git a/Source/GUIBase/GUIBase.res b/Source/GUIBase/GUIBase.res
index 8b251f312bcccec5485024f6fe8d80e1cdf25746..1641339fcc482e7e3492d1b45813a86619622c33 100644
GIT binary patch
literal 4748
zcmbW5&ub)A5XUPdpe&2#;C*uNAUVhgd+&(4um@dnom`vXF9g}ZuHJ;se=<3UNdFJg
zbCw+UD9j$byGIXV`~6hC>h4S?F|k9X-j90q{Z_qtZ<;nUJCO8!h?<w4U-ol;S2jC7
zx4(byej2@_#)0HWvg0i^wC4Xli+W*aXJ^(njceK|Kb@c3qFNX>p${kR>3GhM`oH*q
zk=UsjOCIgA_4!`B+Gb&`I84R)bT4dy-BQV<-SyFz?R8ILEQ(+JB$u{sEXE@j@B*7W
zT;iZH#|OJ<&DO$RCkM6VbK3(B(k{nbdv1lpc;E$xz9as|v3uE1V{hw2w~g3eD0an7
z{BT%G%irdMe*|oDJmgvJ<ltI;x5J<Oc>aA2`9B<Z5Toyra?r{a4$fnJHGXo6Pmcq8
z{JGCD500t1h4|yI?-f&xoj9;YT&Ch&JLO*X#NC3sCI0Xmc<f_vh`jn-1E!?th$%QM
znzGM|)$vl3f7;nE+9qR}|A?C$H3K&BFdq9?uxrIqHIne#5?8G@da2ybWLGKA686M2
z*LJMMMk4<U`dzFC9}HrSxLfOGll{P#??xir)$c2}C;ql+y-&Wa(LP{PgPk1E1@{uR
zIMCNz;u9;r(axhQvEx%?i#p<Vn=Z!SK%f10?4_`0@RY8lXRM3(t(nFSzJ$4kJr6&x
ze)~B%biu*TY$HDstHD=|UGxJceYiUQQa0Gu(p3og@%ZJ><6Xi*?M~Q;)@Sbfwf3uf
zVaWkbU<NjR3%=~AdoZbkXp`f@b0%GBT^$^V5e(n|#O(?P)hBbF)4n%2cw6U#adPM!
zz(!`V|Bfl{aH0)Y&w;SK7R4<z{p;Gwz1D%l86L3ZFZQ&=pB$<&esXT|OZ?=AGaWoe
z{>jU=;sL{BlYemIZXv%qZ{SZw{-TCU+;!nH6KDDIJumU+9{E0zXW4>7T)y|>$DQlv
zRJe?TjSp{c!DqeayAnSMTtZZT;>LN7J0Rls+5m@q)MbyB*eL%Eu@(+$Cw}Pd@q7N|
z%Q0*AHpCP^b9v`@jx-l_FD>khpW2W8(OU2&V5TrnoAY-m_hlcV?zq3;7{2gF{J#Hc
z6R+o~mVenX?>@W0@_DVzyOFs(5464CY{!q9ChoF#_*eXi@4gFuV8?vhl=_w5$iKL0
zEV0nMBcN08xtRmsgJrqjh@s#|{?*ssnsG)mH*wa6{efF0JFWHok@kA5%b661{B38=
zCcgJ|*ZFTpV$8<-&+AWpa)Q8*`wL&hMeNQ^v6I7$HSdLZhZ^&+6<@Uw_Zsml9^v3W
zVvPDBKHh;i=RU4J_ta3E;)M<P+=2X7;VbzliQZ=IHV#+fr#{!(ukt%UJMS8=332qg
z7jD)rSbpCW+^j*cd6LUEe8#9n&v!NEJM(@?SHvB$=h@|)fjw|&qD?NQ5A&R>n>Y+L
zKLZ0UQ+*km9FO-b?U4gmn-62iwzH6&*duKGo~aUV)bYDla8wWZ9+^7p-F<8lP@i!m
z@vhbD_${F}h>^T;C(?(b*OJDk?{dEXB?nuehoON3HAb!7Mr7-ls!84-5V-jJu<OVP
zzHjp+hnwo*3NQE$JTA(agu~silV5T`du+GJgWGi_7mAy`Nk8fLt~%GF$;XXcE-ri?
zyIglyyzA`K-);4Eem2MZm07RBza@W3UP)d`Rz=RFk-I);`s{$L%yyBNX0OTjo5Gk0
zs}g44uXg*l%xo^{`#0=kd*2?}Cz22Bv2;Gu?;3o~(D#gk1OKYQSCAb$(&vu@_pvWO
z>gbu<_$}mU=Yd9!?TOX;|B-#B)+0x#9q*yqJiqS!`49d=7ztk$O+9=1i;?K_|J<8T
z?0b7=-`Z3A#vV$4XJ5(lQ~TOZHUFdA%oWvK5zg&_IKXIbughQBA8XAsd#=@|TFLXC
zy(^m((;DnQmDQ<zX+PK(Lfu@ox#mOnbZjSDl}IBqv$qwK+2@))5$ba>Katmw!@c`|
G?EMQ&4NnpP

delta 11
ScmeBCZD5|Duvteife`=|>;pCc

diff --git a/Source/GUIBase/uViewGrid.dfm b/Source/GUIBase/uViewGrid.dfm
index 77f34363..be5d0ea7 100644
--- a/Source/GUIBase/uViewGrid.dfm
+++ b/Source/GUIBase/uViewGrid.dfm
@@ -47,7 +47,6 @@ inherited frViewGrid: TfrViewGrid
       OptionsView.GridLines = glHorizontal
       OptionsView.GroupByBox = False
       OptionsView.HeaderEndEllipsis = True
-      OptionsView.NewItemRowInfoText = 'Click here to add a new row'
       Styles.Inactive = cxStyleSelection
       Styles.Selection = cxStyleSelection
       Styles.OnGetContentStyle = cxGridViewStylesGetContentStyle
@@ -71,9 +70,19 @@ inherited frViewGrid: TfrViewGrid
       inherited dxLayoutControl1: TdxLayoutControl
         Width = 554
         ExplicitWidth = 554
+        inherited txtFiltroTodo: TcxTextEdit
+          ExplicitWidth = 273
+          Width = 273
+        end
+        inherited edtFechaIniFiltro: TcxDateEdit
+          ExplicitWidth = 121
+          Width = 121
+        end
         inherited edtFechaFinFiltro: TcxDateEdit
-          Left = 343
-          ExplicitLeft = 343
+          Left = 344
+          ExplicitLeft = 344
+          ExplicitWidth = 121
+          Width = 121
         end
       end
       inherited TBXAlignmentPanel1: TTBXAlignmentPanel
@@ -98,6 +107,7 @@ inherited frViewGrid: TfrViewGrid
     SupportedDocks = [dkStandardDock, dkMultiDock]
     TabOrder = 2
     Visible = False
+    ExplicitWidth = 128
     object TBXAlignmentPanel1: TTBXAlignmentPanel
       Left = 0
       Top = 0
@@ -145,7 +155,7 @@ inherited frViewGrid: TfrViewGrid
       PrinterPage.ScaleMode = smFit
       PrinterPage._dxMeasurementUnits_ = 0
       PrinterPage._dxLastMU_ = 2
-      ReportDocument.CreationDate = 39384.477436516200000000
+      ReportDocument.CreationDate = 39443.853303854160000000
       StyleManager = dxPrintStyleManager1
       OptionsCards.Shadow.Depth = 0
       OptionsExpanding.ExpandGroupRows = True
@@ -177,6 +187,7 @@ inherited frViewGrid: TfrViewGrid
   object cxStyleRepository1: TcxStyleRepository
     Left = 296
     Top = 128
+    PixelsPerInch = 96
     object cxStyleEven: TcxStyle
     end
     object cxStyleOdd: TcxStyle
@@ -231,6 +242,7 @@ inherited frViewGrid: TfrViewGrid
   object cxStyleRepositoryInforme: TcxStyleRepository
     Left = 368
     Top = 160
+    PixelsPerInch = 96
     object cxStyleContentInforme: TcxStyle
       AssignedValues = [svColor, svFont, svTextColor]
       Color = clWhite
diff --git a/Source/GUIBase/uViewGrid.pas b/Source/GUIBase/uViewGrid.pas
index 34abaae1..18cc7131 100644
--- a/Source/GUIBase/uViewGrid.pas
+++ b/Source/GUIBase/uViewGrid.pas
@@ -18,10 +18,11 @@ uses
   cxGridTableView, cxGridDBTableView, cxGrid, Menus, ActnList, Grids,
   DBGrids, JvComponent, JvFormAutoSize, dxPSGlbl, dxPSUtl, dxPSEngn,
   dxPrnPg, dxBkgnd, dxWrap, dxPrnDev, dxPSCompsProvider, dxPSFillPatterns,
-  dxPSEdgePatterns, dxPSCore, dxPScxCommon, dxPScxGridLnk, dxPrnDlg,
+  dxPSEdgePatterns, dxPSCore, dxPScxCommon, dxPrnDlg,
   cxIntlPrintSys3, dxPSPrvwAdv, uViewGridBase, cxGridCustomPopupMenu,
   cxGridPopupMenu, uViewFiltroBase, ComCtrls, cxPC, ImgList, PngImageList,
-  TB2Item, TBX, TB2Dock, TB2Toolbar, TBXDkPanels, dxPgsDlg, uDAInterfaces;
+  TB2Item, TBX, TB2Dock, TB2Toolbar, TBXDkPanels, dxPgsDlg, uDAInterfaces,
+  dxPScxGrid6Lnk;
 
 type
   IViewGrid = interface(IViewGridBase)
diff --git a/Source/GUIBase/uViewGrid2Niveles.dfm b/Source/GUIBase/uViewGrid2Niveles.dfm
index abc45386..be16c2f6 100644
--- a/Source/GUIBase/uViewGrid2Niveles.dfm
+++ b/Source/GUIBase/uViewGrid2Niveles.dfm
@@ -96,6 +96,7 @@ inherited frViewGrid2Niveles: TfrViewGrid2Niveles
   object cxStyleRepository1: TcxStyleRepository
     Left = 296
     Top = 128
+    PixelsPerInch = 96
     object cxStyleEven: TcxStyle
     end
     object cxStyleOdd: TcxStyle
diff --git a/Source/GUIBase/uViewGrid2Niveles.pas b/Source/GUIBase/uViewGrid2Niveles.pas
index 4d1796f8..9ad5ecc4 100644
--- a/Source/GUIBase/uViewGrid2Niveles.pas
+++ b/Source/GUIBase/uViewGrid2Niveles.pas
@@ -18,9 +18,9 @@ uses
   cxGridTableView, cxGridDBTableView, cxGrid, Menus, ActnList, Grids,
   DBGrids, JvComponent, JvFormAutoSize, dxPSGlbl, dxPSUtl, dxPSEngn,
   dxPrnPg, dxBkgnd, dxWrap, dxPrnDev, dxPSCompsProvider, dxPSFillPatterns,
-  dxPSEdgePatterns, dxPSCore, dxPScxCommon, dxPScxGridLnk, dxPrnDlg,
+  dxPSEdgePatterns, dxPSCore, dxPScxCommon, dxPrnDlg,
   cxIntlPrintSys3, dxPSPrvwAdv, uViewGridBase, cxGridCustomPopupMenu,
-  cxGridPopupMenu, uDAInterfaces;
+  cxGridPopupMenu, uDAInterfaces, dxPScxGrid6Lnk;
 
 type
   IViewGrid2Niveles = interface(IViewGridBase)
diff --git a/Source/GUIBase/uViewGridBase.pas b/Source/GUIBase/uViewGridBase.pas
index 5bfbdbf0..ffd81902 100644
--- a/Source/GUIBase/uViewGridBase.pas
+++ b/Source/GUIBase/uViewGridBase.pas
@@ -16,10 +16,7 @@ uses
   cxDataStorage, cxEdit, DB, cxDBData, uDADataTable, cxGridLevel,
   cxClasses, cxControls, cxGridCustomView, cxGridCustomTableView,
   cxGridTableView, cxGridDBTableView, cxGrid, Menus, ActnList, Grids,
-  DBGrids, JvComponent, JvFormAutoSize, dxPSGlbl, dxPSUtl, dxPSEngn,
-  dxPrnPg, dxBkgnd, dxWrap, dxPrnDev, dxPSCompsProvider, dxPSFillPatterns,
-  dxPSEdgePatterns, dxPSCore, dxPScxCommon, dxPScxGridLnk, dxPrnDlg,
-  cxIntlPrintSys3, dxPSPrvwAdv, uGridUtils, uViewFiltroBase, uDAInterfaces;
+  DBGrids, JvComponent, JvFormAutoSize, uGridUtils, uViewFiltroBase, uDAInterfaces;
 
 type
   IViewGridBase = interface(IViewBase)
diff --git a/Source/Modulos/Albaranes de cliente/Data/AlbaranesCliente_data.dpk b/Source/Modulos/Albaranes de cliente/Data/AlbaranesCliente_data.dpk
index 0b510c03859466b22535918c403f38bf4283062c..c3d703893f23df280bdb202940936afb94c07a3d 100644
GIT binary patch
delta 31
mcmcc2dX;qp2a|xI4lkF2LP|wQMrv-Vi=p9U38vjl3=9B^cL)#w

delta 28
jcmcc0dYN?t2a|w-4lkF2LP|wQMrv-Vi=n|}38viub211F

diff --git a/Source/Modulos/Albaranes de cliente/Views/uViewAlbaranesCliente.pas b/Source/Modulos/Albaranes de cliente/Views/uViewAlbaranesCliente.pas
index da3149b9..075265f2 100644
--- a/Source/Modulos/Albaranes de cliente/Views/uViewAlbaranesCliente.pas	
+++ b/Source/Modulos/Albaranes de cliente/Views/uViewAlbaranesCliente.pas	
@@ -8,7 +8,7 @@ uses
   dxPrnPg, dxBkgnd, dxWrap, dxPrnDev, dxPSCompsProvider, dxPSFillPatterns,
   dxPSEdgePatterns, cxImageComboBox, ImgList, Controls, PngImageList,
   cxGridCustomTableView, cxGridTableView, cxGridDBTableView,
-  cxGridCustomPopupMenu, cxGridPopupMenu, dxPSCore, dxPScxCommon, dxPScxGridLnk,
+  cxGridCustomPopupMenu, cxGridPopupMenu, dxPSCore, dxPScxCommon, dxPScxGrid6Lnk,
   uDADataTable, cxGridLevel, cxClasses, cxControls, cxGridCustomView, Classes,
   cxGrid,
   uBizAlbaranesCliente, cxCurrencyEdit, Forms, uViewFiltroBase, ComCtrls, Tabs,
@@ -289,3 +289,4 @@ begin
 end;
 
 end.
+
\ No newline at end of file
diff --git a/Source/Modulos/Albaranes de cliente/Views/uViewAlbaranesDevCliente.pas b/Source/Modulos/Albaranes de cliente/Views/uViewAlbaranesDevCliente.pas
index cc52d503bcd277b815efb81f5fb31d290e5a31bf..af69998f54774962de94dfdcc518d20219f902ee 100644
GIT binary patch
delta 16
XcmbQtGnHq9EEA*IW?80h%!~{GCxQeM

delta 12
TcmbQrGnr?DEYoH=rf<vu8TkX;

diff --git a/Source/Modulos/Albaranes de cliente/Views/uViewElegirArticulosAlbaranesCliente.pas b/Source/Modulos/Albaranes de cliente/Views/uViewElegirArticulosAlbaranesCliente.pas
index f84af6e846960d42fa2f0fdd7f519d0a88cd505f..8bbb1964b9a152854f168095063d469285f9a615 100644
GIT binary patch
delta 16
XcmbQov4CTPI1{7UW^pEVCPoGTBsT*k

delta 12
TcmZ3$F^^+|IMZecCUzzO7<vNk

diff --git a/Source/Modulos/Albaranes de proveedor/Views/uViewAlbaranesDevProveedor.pas b/Source/Modulos/Albaranes de proveedor/Views/uViewAlbaranesDevProveedor.pas
index 2ead872b57c33af25f2885526133d6c1d65e3a86..94d0122a162d503adcd4f1c262eac1fb23a09874 100644
GIT binary patch
delta 16
Xcmcb{b%SezA`_$8W<@4bW<~}8EMx=R

delta 12
Tcmcb?b&YF-BGYCiCR1hr9z6r4

diff --git a/Source/Modulos/Albaranes de proveedor/Views/uViewAlbaranesProveedor.pas b/Source/Modulos/Albaranes de proveedor/Views/uViewAlbaranesProveedor.pas
index 4fe86c32..a28ddc69 100644
--- a/Source/Modulos/Albaranes de proveedor/Views/uViewAlbaranesProveedor.pas	
+++ b/Source/Modulos/Albaranes de proveedor/Views/uViewAlbaranesProveedor.pas	
@@ -8,7 +8,7 @@ uses
   dxPrnPg, dxBkgnd, dxWrap, dxPrnDev, dxPSCompsProvider, dxPSFillPatterns,
   dxPSEdgePatterns, cxImageComboBox, ImgList, Controls, PngImageList,
   cxGridCustomTableView, cxGridTableView, cxGridDBTableView,
-  cxGridCustomPopupMenu, cxGridPopupMenu, dxPSCore, dxPScxCommon, dxPScxGridLnk,
+  cxGridCustomPopupMenu, cxGridPopupMenu, dxPSCore, dxPScxCommon, dxPScxGrid6Lnk,
   uDADataTable, cxGridLevel, cxClasses, cxControls, cxGridCustomView, Classes,
   cxGrid, uBizAlbaranesProveedor, cxCurrencyEdit, Forms, uViewFiltroBase,
   ActnList, TB2Item, TBX, TB2Toolbar, TBXDkPanels, TB2Dock, dxPgsDlg, cxTextEdit;
@@ -236,3 +236,4 @@ begin
 end;
 
 end.
+
\ No newline at end of file
diff --git a/Source/Modulos/Albaranes de proveedor/Views/uViewElegirArticulosAlbaranesProveedor.pas b/Source/Modulos/Albaranes de proveedor/Views/uViewElegirArticulosAlbaranesProveedor.pas
index 27cbc1744056f317ea4592ed527c4616506e02c7..0bd848fefec5d4503c69d319ceb355200c856b0a 100644
GIT binary patch
delta 16
XcmeB>?vmah$;4>3S&}KAn~?zkC6oh{

delta 12
TcmeB@?vUOf$+TIDDW4kv836-b

diff --git a/Source/Modulos/Almacenes/Views/uViewAlmacenes.pas b/Source/Modulos/Almacenes/Views/uViewAlmacenes.pas
index 02f5ec3196310672a63b632e3b91ee8f71d8c512..05614757adb16646af4fba132f6f541b343fc6bb 100644
GIT binary patch
delta 16
Xcmdlewpnb$RwhQX&0CpjI2aiKG+hNA

delta 12
Tcmdliwoz=uR;JC{m})oxBJKp|

diff --git a/Source/Modulos/Articulos/Views/uViewArticulos.pas b/Source/Modulos/Articulos/Views/uViewArticulos.pas
index 3f4b77b0af2dbc8d53a1e78fd10875614b2601b3..f013dcdf41ed5024e54f9d24765825c2f2ef1637 100644
GIT binary patch
delta 16
XcmZ3bw?=QnRwhQX&0CpDMHm?XHZui9

delta 12
TcmZ3Zw@PorR;JC{m`X(eBr*jK

diff --git a/Source/Modulos/Banca electronica/Data/BancaElectronica_data.dpk b/Source/Modulos/Banca electronica/Data/BancaElectronica_data.dpk
index 5afe6e1227d1eb0e8b57ceb35ad98960b9044f16..23ece21de90023471dba31906006bcd780d2cc2d 100644
GIT binary patch
delta 32
ncmey#_M2^kJ(GZ;4lkF2LP|wQMrv-Vi=p9We<m$PCI$uoqH+ja

delta 29
kcmey(_LFUcJ(GZe4lkF2LP|wQMrv-Vi=n}0e<m$P0EtHkSO5S3

diff --git a/Source/Modulos/Comisiones/Controller/Comisiones_controller.dpk b/Source/Modulos/Comisiones/Controller/Comisiones_controller.dpk
index f70241fb5ca4b5d50b1627300c62f0fccf42adbb..d9e6f613f83ef5a734caf13df60e1ccdae248f58 100644
GIT binary patch
delta 39
vcmZ3)vxH}ZAd`Th4lkF2LP|wQMrv-Vi=p9WMW!Q+jE0+^G21XPF)#oC(o+fq

delta 36
scmZ3&vxsMdAd`TB4lkF2LP|wQMrv-Vi=n}0MW!Q+j0T&ZG21W!0JIzl{{R30

diff --git a/Source/Modulos/Comisiones/Data/Comisiones_data.dpk b/Source/Modulos/Comisiones/Data/Comisiones_data.dpk
index cb09488821dcec594ed96f8d8c39cf0f7c7a1f25..0b569747f0ada9d5a889407d675b86cb383fd972 100644
GIT binary patch
delta 31
mcmdnbdXRMkGn0U!4lkF2LP|wQMrv-Vi=p9UVWu@q3=9B;>j%#O

delta 28
jcmX@ex}S9eGn0UU4lkF2LP|wQMrv-Vi=n|}VWu?zZfOV0

diff --git a/Source/Modulos/Comisiones/Model/Comisiones_model.dpk b/Source/Modulos/Comisiones/Model/Comisiones_model.dpk
index 9cd8f9869bd9902a8df2b12520f2064ab167a659..5df17a24b8abcb54b5b5bbd6ec1b19837cac28c5 100644
GIT binary patch
delta 32
ncmeC;=;7Gl%_Lx`!^@?hkWvwnk(!(8VraNInrS^F69WSPj5!D&

delta 29
kcmeC-=;GMm%_Lx;!^@?hkWvwnk(!(8VrZ~AnrS^F0CU9%8vp<R

diff --git a/Source/Modulos/Comisiones/Views/Comisiones_view.dpk b/Source/Modulos/Comisiones/Views/Comisiones_view.dpk
index 9119edfd6aac86cb875c25dd8851c4f5d6f1b520..245a2e6fcda86de3f6d93fc10ae37c60ce19d792 100644
GIT binary patch
delta 39
vcmeyx_lIvoDwBYr4lkF2LP|wQMrv-Vi=pA>QYKkOM#IgMnV&N=F)#oC_6Z9T

delta 36
scmeyv_ls{sDwBYL4lkF2LP|wQMrv-Vi=n~hQYKkOMuW|hnV&NQ0Mw`p4FCWD

diff --git a/Source/Modulos/Comisiones/Views/uViewComisiones.pas b/Source/Modulos/Comisiones/Views/uViewComisiones.pas
index e1f59c9e1163008ce1bda827e8d13af6c9b3475f..f3b32d6c1b3332052f6374410597b6aef992e82c 100644
GIT binary patch
delta 16
Xcmca3dQWu2b|yx%&D)t&IT#rLI1vRO

delta 12
Tcmca7dPj7_cBaicm{d6cCG-U7

diff --git a/Source/Modulos/Contabilidad/Contabilidad_Group.groupproj b/Source/Modulos/Contabilidad/Contabilidad_Group.groupproj
index e8afe987..e856af51 100644
--- a/Source/Modulos/Contabilidad/Contabilidad_Group.groupproj
+++ b/Source/Modulos/Contabilidad/Contabilidad_Group.groupproj
@@ -105,24 +105,6 @@
   <Target Name="Contabilidad_plugin:Make">
     <MSBuild Projects="Plugin\Contabilidad_plugin.dproj" Targets="Make" />
   </Target>
-  <Target Name="FactuGES_Server">
-    <MSBuild Projects="..\..\Servidor\FactuGES_Server.dproj" Targets="" />
-  </Target>
-  <Target Name="FactuGES_Server:Clean">
-    <MSBuild Projects="..\..\Servidor\FactuGES_Server.dproj" Targets="Clean" />
-  </Target>
-  <Target Name="FactuGES_Server:Make">
-    <MSBuild Projects="..\..\Servidor\FactuGES_Server.dproj" Targets="Make" />
-  </Target>
-  <Target Name="FactuGES">
-    <MSBuild Projects="..\..\Cliente\FactuGES.dproj" Targets="" />
-  </Target>
-  <Target Name="FactuGES:Clean">
-    <MSBuild Projects="..\..\Cliente\FactuGES.dproj" Targets="Clean" />
-  </Target>
-  <Target Name="FactuGES:Make">
-    <MSBuild Projects="..\..\Cliente\FactuGES.dproj" Targets="Make" />
-  </Target>
   <Target Name="PedidosProveedor_view">
     <MSBuild Projects="..\Pedidos a proveedor\Views\PedidosProveedor_view.dproj" Targets="" />
   </Target>
@@ -141,14 +123,32 @@
   <Target Name="Contactos_controller:Make">
     <MSBuild Projects="..\Contactos\Controller\Contactos_controller.dproj" Targets="Make" />
   </Target>
+  <Target Name="FactuGES">
+    <MSBuild Projects="..\..\Cliente\FactuGES.dproj" Targets="" />
+  </Target>
+  <Target Name="FactuGES:Clean">
+    <MSBuild Projects="..\..\Cliente\FactuGES.dproj" Targets="Clean" />
+  </Target>
+  <Target Name="FactuGES:Make">
+    <MSBuild Projects="..\..\Cliente\FactuGES.dproj" Targets="Make" />
+  </Target>
+  <Target Name="FactuGES_Server">
+    <MSBuild Projects="..\..\Servidor\FactuGES_Server.dproj" Targets="" />
+  </Target>
+  <Target Name="FactuGES_Server:Clean">
+    <MSBuild Projects="..\..\Servidor\FactuGES_Server.dproj" Targets="Clean" />
+  </Target>
+  <Target Name="FactuGES_Server:Make">
+    <MSBuild Projects="..\..\Servidor\FactuGES_Server.dproj" Targets="Make" />
+  </Target>
   <Target Name="Build">
-    <CallTarget Targets="Base;GUIBase;ApplicationBase;Contactos_view;Contabilidad_model;Contabilidad_data;Contabilidad_controller;Contabilidad_view;Contabilidad_plugin;FactuGES_Server;FactuGES;PedidosProveedor_view;Contactos_controller" />
+    <CallTarget Targets="Base;GUIBase;ApplicationBase;Contactos_view;Contabilidad_model;Contabilidad_data;Contabilidad_controller;Contabilidad_view;Contabilidad_plugin;PedidosProveedor_view;Contactos_controller;FactuGES;FactuGES_Server" />
   </Target>
   <Target Name="Clean">
-    <CallTarget Targets="Base:Clean;GUIBase:Clean;ApplicationBase:Clean;Contactos_view:Clean;Contabilidad_model:Clean;Contabilidad_data:Clean;Contabilidad_controller:Clean;Contabilidad_view:Clean;Contabilidad_plugin:Clean;FactuGES_Server:Clean;FactuGES:Clean;PedidosProveedor_view:Clean;Contactos_controller:Clean" />
+    <CallTarget Targets="Base:Clean;GUIBase:Clean;ApplicationBase:Clean;Contactos_view:Clean;Contabilidad_model:Clean;Contabilidad_data:Clean;Contabilidad_controller:Clean;Contabilidad_view:Clean;Contabilidad_plugin:Clean;PedidosProveedor_view:Clean;Contactos_controller:Clean;FactuGES:Clean;FactuGES_Server:Clean" />
   </Target>
   <Target Name="Make">
-    <CallTarget Targets="Base:Make;GUIBase:Make;ApplicationBase:Make;Contactos_view:Make;Contabilidad_model:Make;Contabilidad_data:Make;Contabilidad_controller:Make;Contabilidad_view:Make;Contabilidad_plugin:Make;FactuGES_Server:Make;FactuGES:Make;PedidosProveedor_view:Make;Contactos_controller:Make" />
+    <CallTarget Targets="Base:Make;GUIBase:Make;ApplicationBase:Make;Contactos_view:Make;Contabilidad_model:Make;Contabilidad_data:Make;Contabilidad_controller:Make;Contabilidad_view:Make;Contabilidad_plugin:Make;PedidosProveedor_view:Make;Contactos_controller:Make;FactuGES:Make;FactuGES_Server:Make" />
   </Target>
   <Import Condition="Exists('$(MSBuildBinPath)\Borland.Group.Targets')" Project="$(MSBuildBinPath)\Borland.Group.Targets" />
 </Project>
\ No newline at end of file
diff --git a/Source/Modulos/Contabilidad/Controller/Contabilidad_controller.dpk b/Source/Modulos/Contabilidad/Controller/Contabilidad_controller.dpk
index 3dafa7cbe33bcd3aaee9dbf468f4afde904b3674..505960cbe90656fca8b6a9a49cd2e8508551b90d 100644
GIT binary patch
delta 32
ncmew%_)BoZDJB6!9bPU4g_MerjMUsz7em9%x0vMEm>3uUw-yP1

delta 29
kcmew*_(O2RDJB5}9bPU4g_MerjMUsz7ej;1x0vME0GfgcdjJ3c

diff --git a/Source/Modulos/Contabilidad/Data/Contabilidad_data.dpk b/Source/Modulos/Contabilidad/Data/Contabilidad_data.dpk
index 692a3dc3fa81635d71f693a500b8c15e62bd54bc..0d6be30d1741337c25e6942781d382c3b2bed5ec 100644
GIT binary patch
delta 31
mcmdnNwu^1UIwk=_9bPU4g_MerjMUsz7em9z`<SYj7#IMV83^Y9

delta 28
jcmdnRwu5cMIwk=F9bPU4g_MerjMUsz7ej-|`<SW#eoqMF

diff --git a/Source/Modulos/Contabilidad/Model/schContabilidadServer_Intf.pas b/Source/Modulos/Contabilidad/Model/schContabilidadServer_Intf.pas
index 3f7fea88..dcf78399 100644
--- a/Source/Modulos/Contabilidad/Model/schContabilidadServer_Intf.pas
+++ b/Source/Modulos/Contabilidad/Model/schContabilidadServer_Intf.pas
@@ -9,19 +9,19 @@ 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_DiarioDelta = '{489AF8EC-B8CA-4327-8D7D-1E69C3F5D2CF}';
-  RID_ApuntesDelta = '{63516B07-1307-4ED4-A78D-6A706E53F262}';
-  RID_AsientosDelta = '{4091C97B-82C3-4C9E-AFF7-1A647A9A8F9F}';
-  RID_SubCuentasDelta = '{627EB32A-BD56-4A63-B354-D1E03FAFB7A9}';
-  RID_CuentasDelta = '{7C6308C3-D09C-49BB-8FCD-D557B421747D}';
-  RID_CuentasEspecialesDelta = '{18300F58-6909-4C4A-9755-52B39262CC58}';
-  RID_EpigrafesDelta = '{61340163-241D-4DF6-9CE2-807E5CD1A2E7}';
-  RID_BalancesDelta = '{BB5830B6-4776-4278-B840-4D6453A709CA}';
+  RID_DiarioDelta = '{5AB4FC97-693C-460A-925E-56936CC6F220}';
+  RID_ApuntesDelta = '{96F99DFB-E137-4E31-A0D8-39F7C43C8814}';
+  RID_AsientosDelta = '{97378BCF-3017-4244-B469-E13A964B3AF0}';
+  RID_SubCuentasDelta = '{7CC1A031-D5FA-41BC-9832-F3FA3541DD6E}';
+  RID_CuentasDelta = '{2DA78E46-D506-4FD4-9CE3-DF3C9B0D2117}';
+  RID_CuentasEspecialesDelta = '{9C5919F3-A43F-4AC6-8110-E867F70C0CDE}';
+  RID_EpigrafesDelta = '{67FB0522-F1EC-47E8-B459-172539CFF79B}';
+  RID_BalancesDelta = '{E9EE47C8-0762-4259-BDC9-7CF3EEF83D9E}';
 
 type
   { IDiarioDelta }
   IDiarioDelta = interface(IDiario)
-  ['{489AF8EC-B8CA-4327-8D7D-1E69C3F5D2CF}']
+  ['{5AB4FC97-693C-460A-925E-56936CC6F220}']
     { Property getters and setters }
     function GetOldID_APUNTEValue : Integer;
     function GetOldID_ASIENTOValue : Integer;
@@ -211,7 +211,7 @@ type
 
   { IApuntesDelta }
   IApuntesDelta = interface(IApuntes)
-  ['{63516B07-1307-4ED4-A78D-6A706E53F262}']
+  ['{96F99DFB-E137-4E31-A0D8-39F7C43C8814}']
     { Property getters and setters }
     function GetOldIDValue : Integer;
     function GetOldID_ASIENTOValue : Integer;
@@ -365,7 +365,7 @@ type
 
   { IAsientosDelta }
   IAsientosDelta = interface(IAsientos)
-  ['{4091C97B-82C3-4C9E-AFF7-1A647A9A8F9F}']
+  ['{97378BCF-3017-4244-B469-E13A964B3AF0}']
     { Property getters and setters }
     function GetOldIDValue : Integer;
     function GetOldFECHA_ASIENTOValue : DateTime;
@@ -447,7 +447,7 @@ type
 
   { ISubCuentasDelta }
   ISubCuentasDelta = interface(ISubCuentas)
-  ['{627EB32A-BD56-4A63-B354-D1E03FAFB7A9}']
+  ['{7CC1A031-D5FA-41BC-9832-F3FA3541DD6E}']
     { Property getters and setters }
     function GetOldIDValue : Integer;
     function GetOldREF_SUBCUENTAValue : String;
@@ -601,7 +601,7 @@ type
 
   { ICuentasDelta }
   ICuentasDelta = interface(ICuentas)
-  ['{7C6308C3-D09C-49BB-8FCD-D557B421747D}']
+  ['{2DA78E46-D506-4FD4-9CE3-DF3C9B0D2117}']
     { Property getters and setters }
     function GetOldIDValue : Integer;
     function GetOldREF_CUENTAValue : String;
@@ -743,7 +743,7 @@ type
 
   { ICuentasEspecialesDelta }
   ICuentasEspecialesDelta = interface(ICuentasEspeciales)
-  ['{18300F58-6909-4C4A-9755-52B39262CC58}']
+  ['{9C5919F3-A43F-4AC6-8110-E867F70C0CDE}']
     { Property getters and setters }
     function GetOldIDValue : Integer;
     function GetOldREFERENCIAValue : String;
@@ -801,7 +801,7 @@ type
 
   { IEpigrafesDelta }
   IEpigrafesDelta = interface(IEpigrafes)
-  ['{61340163-241D-4DF6-9CE2-807E5CD1A2E7}']
+  ['{67FB0522-F1EC-47E8-B459-172539CFF79B}']
     { Property getters and setters }
     function GetOldIDValue : Integer;
     function GetOldREF_EPIGRAFEValue : String;
@@ -895,7 +895,7 @@ type
 
   { IBalancesDelta }
   IBalancesDelta = interface(IBalances)
-  ['{BB5830B6-4776-4278-B840-4D6453A709CA}']
+  ['{E9EE47C8-0762-4259-BDC9-7CF3EEF83D9E}']
     { Property getters and setters }
     function GetOldIDValue : Integer;
     function GetOldREF_BALANCEValue : String;
diff --git a/Source/Modulos/Contabilidad/Views/Contabilidad_view.dpk b/Source/Modulos/Contabilidad/Views/Contabilidad_view.dpk
index f19c2621..f1409a04 100644
--- a/Source/Modulos/Contabilidad/Views/Contabilidad_view.dpk
+++ b/Source/Modulos/Contabilidad/Views/Contabilidad_view.dpk
@@ -29,56 +29,7 @@ requires
   GUIBase,
   ApplicationBase,
   Contabilidad_model,
-  Contabilidad_controller,
-  vcl,
-  rtl,
-  dbrtl,
-  vcldb,
-  DataAbstract_Core_D11,
-  dsnap,
-  adortl,
-  RemObjects_Core_D11,
-  cxLibraryD10,
-  dxThemeD10,
-  cxEditorsD10,
-  cxDataD10,
-  vcljpg,
-  cxGridD10,
-  cxPageControlD10,
-  cxExtEditorsD10,
-  vclx,
-  cxExportD10,
-  dxLayoutControlD10,
-  dxComnD10,
-  dxPSCoreD10,
-  dxPScxCommonD10,
-  dxPSLnksD10,
-  designide,
-  xmlrtl,
-  vclactnband,
-  vclshlctrls,
-  dxPScxGridLnkD10,
-  dclcxLibraryD10,
-  PNG_D10,
-  PngComponentsD10,
-  tb2k_d10,
-  tbx_d10,
-  JvCoreD11R,
-  Jcl,
-  JclVcl,
-  JvSystemD11R,
-  JvStdCtrlsD11R,
-  JvAppFrmD11R,
-  JvCtrlsD11R,
-  JvCmpD11R,
-  JvPageCompsD11R,
-  cxIntlPrintSys3D10,
-  GUISDK_D11,
-  cfpack_d11,
-  ccpackD11,
-  JvGlobusD11R,
-  bdertl,
-  JSDialog100;
+  Contabilidad_controller;
 
 contains
   uEditorBalance in 'uEditorBalance.pas' {fEditorBalance: TfEditorBalances},
diff --git a/Source/Modulos/Contabilidad/Views/Contabilidad_view.dproj b/Source/Modulos/Contabilidad/Views/Contabilidad_view.dproj
index 24e5f211..dc4f8620 100644
--- a/Source/Modulos/Contabilidad/Views/Contabilidad_view.dproj
+++ b/Source/Modulos/Contabilidad/Views/Contabilidad_view.dproj
@@ -48,52 +48,10 @@
     <DelphiCompile Include="Contabilidad_view.dpk">
       <MainSource>MainSource</MainSource>
     </DelphiCompile>
-    <DCCReference Include="adortl.dcp" />
-    <DCCReference Include="ApplicationBase.dcp" />
-    <DCCReference Include="bdertl.dcp" />
-    <DCCReference Include="ccpackD11.dcp" />
-    <DCCReference Include="cfpack_d11.dcp" />
-    <DCCReference Include="Contabilidad_controller.dcp" />
-    <DCCReference Include="Contabilidad_model.dcp" />
-    <DCCReference Include="cxDataD10.dcp" />
-    <DCCReference Include="cxEditorsD10.dcp" />
-    <DCCReference Include="cxExportD10.dcp" />
-    <DCCReference Include="cxExtEditorsD10.dcp" />
-    <DCCReference Include="cxGridD10.dcp" />
-    <DCCReference Include="cxIntlPrintSys3D10.dcp" />
-    <DCCReference Include="cxLibraryD10.dcp" />
-    <DCCReference Include="cxPageControlD10.dcp" />
-    <DCCReference Include="DataAbstract_Core_D11.dcp" />
-    <DCCReference Include="dbrtl.dcp" />
-    <DCCReference Include="dclcxLibraryD10.dcp" />
-    <DCCReference Include="designide.dcp" />
-    <DCCReference Include="dsnap.dcp" />
-    <DCCReference Include="dxComnD10.dcp" />
-    <DCCReference Include="dxLayoutControlD10.dcp" />
-    <DCCReference Include="dxPSCoreD10.dcp" />
-    <DCCReference Include="dxPScxCommonD10.dcp" />
-    <DCCReference Include="dxPScxGridLnkD10.dcp" />
-    <DCCReference Include="dxPSLnksD10.dcp" />
-    <DCCReference Include="dxThemeD10.dcp" />
-    <DCCReference Include="GUIBase.dcp" />
-    <DCCReference Include="GUISDK_D11.dcp" />
-    <DCCReference Include="Jcl.dcp" />
-    <DCCReference Include="JclVcl.dcp" />
-    <DCCReference Include="JSDialog100.dcp" />
-    <DCCReference Include="JvAppFrmD11R.dcp" />
-    <DCCReference Include="JvCmpD11R.dcp" />
-    <DCCReference Include="JvCoreD11R.dcp" />
-    <DCCReference Include="JvCtrlsD11R.dcp" />
-    <DCCReference Include="JvGlobusD11R.dcp" />
-    <DCCReference Include="JvPageCompsD11R.dcp" />
-    <DCCReference Include="JvStdCtrlsD11R.dcp" />
-    <DCCReference Include="JvSystemD11R.dcp" />
-    <DCCReference Include="PngComponentsD10.dcp" />
-    <DCCReference Include="PNG_D10.dcp" />
-    <DCCReference Include="RemObjects_Core_D11.dcp" />
-    <DCCReference Include="rtl.dcp" />
-    <DCCReference Include="tb2k_d10.dcp" />
-    <DCCReference Include="tbx_d10.dcp" />
+    <DCCReference Include="..\..\..\Servidor\ApplicationBase.dcp" />
+    <DCCReference Include="..\..\..\Servidor\Contabilidad_controller.dcp" />
+    <DCCReference Include="..\..\..\Servidor\Contabilidad_model.dcp" />
+    <DCCReference Include="..\..\..\Servidor\GUIBase.dcp" />
     <DCCReference Include="uContabilidadViewRegister.pas">
       <Form>frViewEpigrafes</Form>
       <DesignClass>TFrame</DesignClass>
@@ -214,13 +172,6 @@
       <Form>frViewSubCuentas</Form>
       <DesignClass>TFrame</DesignClass>
     </DCCReference>
-    <DCCReference Include="vcl.dcp" />
-    <DCCReference Include="vclactnband.dcp" />
-    <DCCReference Include="vcldb.dcp" />
-    <DCCReference Include="vcljpg.dcp" />
-    <DCCReference Include="vclshlctrls.dcp" />
-    <DCCReference Include="vclx.dcp" />
-    <DCCReference Include="xmlrtl.dcp" />
   </ItemGroup>
 </Project>
 <!-- EurekaLog First Line
diff --git a/Source/Modulos/Contabilidad/Views/Contabilidad_view.res b/Source/Modulos/Contabilidad/Views/Contabilidad_view.res
index 8b251f312bcccec5485024f6fe8d80e1cdf25746..1641339fcc482e7e3492d1b45813a86619622c33 100644
GIT binary patch
literal 4748
zcmbW5&ub)A5XUPdpe&2#;C*uNAUVhgd+&(4um@dnom`vXF9g}ZuHJ;se=<3UNdFJg
zbCw+UD9j$byGIXV`~6hC>h4S?F|k9X-j90q{Z_qtZ<;nUJCO8!h?<w4U-ol;S2jC7
zx4(byej2@_#)0HWvg0i^wC4Xli+W*aXJ^(njceK|Kb@c3qFNX>p${kR>3GhM`oH*q
zk=UsjOCIgA_4!`B+Gb&`I84R)bT4dy-BQV<-SyFz?R8ILEQ(+JB$u{sEXE@j@B*7W
zT;iZH#|OJ<&DO$RCkM6VbK3(B(k{nbdv1lpc;E$xz9as|v3uE1V{hw2w~g3eD0an7
z{BT%G%irdMe*|oDJmgvJ<ltI;x5J<Oc>aA2`9B<Z5Toyra?r{a4$fnJHGXo6Pmcq8
z{JGCD500t1h4|yI?-f&xoj9;YT&Ch&JLO*X#NC3sCI0Xmc<f_vh`jn-1E!?th$%QM
znzGM|)$vl3f7;nE+9qR}|A?C$H3K&BFdq9?uxrIqHIne#5?8G@da2ybWLGKA686M2
z*LJMMMk4<U`dzFC9}HrSxLfOGll{P#??xir)$c2}C;ql+y-&Wa(LP{PgPk1E1@{uR
zIMCNz;u9;r(axhQvEx%?i#p<Vn=Z!SK%f10?4_`0@RY8lXRM3(t(nFSzJ$4kJr6&x
ze)~B%biu*TY$HDstHD=|UGxJceYiUQQa0Gu(p3og@%ZJ><6Xi*?M~Q;)@Sbfwf3uf
zVaWkbU<NjR3%=~AdoZbkXp`f@b0%GBT^$^V5e(n|#O(?P)hBbF)4n%2cw6U#adPM!
zz(!`V|Bfl{aH0)Y&w;SK7R4<z{p;Gwz1D%l86L3ZFZQ&=pB$<&esXT|OZ?=AGaWoe
z{>jU=;sL{BlYemIZXv%qZ{SZw{-TCU+;!nH6KDDIJumU+9{E0zXW4>7T)y|>$DQlv
zRJe?TjSp{c!DqeayAnSMTtZZT;>LN7J0Rls+5m@q)MbyB*eL%Eu@(+$Cw}Pd@q7N|
z%Q0*AHpCP^b9v`@jx-l_FD>khpW2W8(OU2&V5TrnoAY-m_hlcV?zq3;7{2gF{J#Hc
z6R+o~mVenX?>@W0@_DVzyOFs(5464CY{!q9ChoF#_*eXi@4gFuV8?vhl=_w5$iKL0
zEV0nMBcN08xtRmsgJrqjh@s#|{?*ssnsG)mH*wa6{efF0JFWHok@kA5%b661{B38=
zCcgJ|*ZFTpV$8<-&+AWpa)Q8*`wL&hMeNQ^v6I7$HSdLZhZ^&+6<@Uw_Zsml9^v3W
zVvPDBKHh;i=RU4J_ta3E;)M<P+=2X7;VbzliQZ=IHV#+fr#{!(ukt%UJMS8=332qg
z7jD)rSbpCW+^j*cd6LUEe8#9n&v!NEJM(@?SHvB$=h@|)fjw|&qD?NQ5A&R>n>Y+L
zKLZ0UQ+*km9FO-b?U4gmn-62iwzH6&*duKGo~aUV)bYDla8wWZ9+^7p-F<8lP@i!m
z@vhbD_${F}h>^T;C(?(b*OJDk?{dEXB?nuehoON3HAb!7Mr7-ls!84-5V-jJu<OVP
zzHjp+hnwo*3NQE$JTA(agu~silV5T`du+GJgWGi_7mAy`Nk8fLt~%GF$;XXcE-ri?
zyIglyyzA`K-);4Eem2MZm07RBza@W3UP)d`Rz=RFk-I);`s{$L%yyBNX0OTjo5Gk0
zs}g44uXg*l%xo^{`#0=kd*2?}Cz22Bv2;Gu?;3o~(D#gk1OKYQSCAb$(&vu@_pvWO
z>gbu<_$}mU=Yd9!?TOX;|B-#B)+0x#9q*yqJiqS!`49d=7ztk$O+9=1i;?K_|J<8T
z?0b7=-`Z3A#vV$4XJ5(lQ~TOZHUFdA%oWvK5zg&_IKXIbughQBA8XAsd#=@|TFLXC
zy(^m((;DnQmDQ<zX+PK(Lfu@ox#mOnbZjSDl}IBqv$qwK+2@))5$ba>Katmw!@c`|
G?EMQ&4NnpP

delta 11
ScmeBCZD5|Duvteife`=|>;pCc

diff --git a/Source/Modulos/Contabilidad/Views/uViewApuntes.pas b/Source/Modulos/Contabilidad/Views/uViewApuntes.pas
index 9f8444fc37048733a939f56c2743088896dd6f31..e314872ee44a3d0e5de8b3ffba6d56ddaf656db3 100644
GIT binary patch
delta 16
XcmZ3gw_I<-UM5Df&3l<LL>L(WHSq;L

delta 12
TcmZ3kw^VP#UZ&0am@-5FBmxBo

diff --git a/Source/Modulos/Contabilidad/Views/uViewBalances.pas b/Source/Modulos/Contabilidad/Views/uViewBalances.pas
index 527dff8dab659691450887cc3d9fbd06c3371d93..e2bc9a4212a8b7da4f721db328b1348616fe9e18 100644
GIT binary patch
delta 16
Xcmew+`a^WXW+q0n&6}B=IT#rLJ5dE`

delta 12
Tcmew%`b~7hW~R+sn4CEPC_n`=

diff --git a/Source/Modulos/Contabilidad/Views/uViewCuentas.pas b/Source/Modulos/Contabilidad/Views/uViewCuentas.pas
index 3d4072089e5302c09572ab3f25a8ad819a42819d..b0820d2009f6bc575f0c99555b311082b9dee9bc 100644
GIT binary patch
delta 16
Ycmca6azkXpMkYqH%^R7PvNJLO065qMga7~l

delta 12
Ucmca1a!q8zMyAc1n3l2w045m)O#lD@

diff --git a/Source/Modulos/Contabilidad/Views/uViewCuentasEspeciales.pas b/Source/Modulos/Contabilidad/Views/uViewCuentasEspeciales.pas
index cd6cc515a19618cc02f4677027b9e179a5af36a8..b299123e0947b2b7b6ad544bb6f96827266979af 100644
GIT binary patch
delta 16
XcmZ1`wnA*fQ6@&S%}1FMIT#rLGq(i|

delta 12
TcmZ1>woGipQKrqum=ZYvB6bAU

diff --git a/Source/Modulos/Contabilidad/Views/uViewDiario.pas b/Source/Modulos/Contabilidad/Views/uViewDiario.pas
index 8052aa1755ad5c04ecdd312b6acd76ea53629784..b988cf2b5c9e98818a66a392300733f101fef1ec 100644
GIT binary patch
delta 16
XcmZ22wpMJzdL~A*&Fh(JI2aiKGeZRi

delta 12
TcmZ20wpwh%dZx`Am})oxA}9pU

diff --git a/Source/Modulos/Contabilidad/Views/uViewEpigrafes.pas b/Source/Modulos/Contabilidad/Views/uViewEpigrafes.pas
index 7d4bb83a3e40bfa3f9e5a40a2e18d97d71fccc5a..1fdcc838a282fc4804a5971c38488e9dd21756fb 100644
GIT binary patch
delta 16
XcmbOuGEZc~RwhQX&0Cq$*%=uCF<1oJ

delta 12
TcmbOyGDl>?R;JC{n9|t+Ak74$

diff --git a/Source/Modulos/Contabilidad/Views/uViewSubCuentas.pas b/Source/Modulos/Contabilidad/Views/uViewSubCuentas.pas
index 40a768ffdf3d27caafff219518d1dbc049ae2c1d..ee3f7b68208e2c67abdf714f8177c71429093b2b 100644
GIT binary patch
delta 16
XcmaDW`d)Oyb|yx%&D)vGI2aiKI#UHw

delta 12
TcmaDa`c`zqcBaicn9Mi;CyWIf

diff --git a/Source/Modulos/Contabilidad/schContabilidadServer_Intf.pas b/Source/Modulos/Contabilidad/schContabilidadServer_Intf.pas
deleted file mode 100644
index dcf78399..00000000
--- a/Source/Modulos/Contabilidad/schContabilidadServer_Intf.pas
+++ /dev/null
@@ -1,3276 +0,0 @@
-unit schContabilidadServer_Intf;
-
-interface
-
-uses
-  Classes, DB, SysUtils, uROClasses, uDADataTable, uDABusinessProcessor, FmtBCD, uROXMLIntf, schContabilidadClient_Intf;
-
-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_DiarioDelta = '{5AB4FC97-693C-460A-925E-56936CC6F220}';
-  RID_ApuntesDelta = '{96F99DFB-E137-4E31-A0D8-39F7C43C8814}';
-  RID_AsientosDelta = '{97378BCF-3017-4244-B469-E13A964B3AF0}';
-  RID_SubCuentasDelta = '{7CC1A031-D5FA-41BC-9832-F3FA3541DD6E}';
-  RID_CuentasDelta = '{2DA78E46-D506-4FD4-9CE3-DF3C9B0D2117}';
-  RID_CuentasEspecialesDelta = '{9C5919F3-A43F-4AC6-8110-E867F70C0CDE}';
-  RID_EpigrafesDelta = '{67FB0522-F1EC-47E8-B459-172539CFF79B}';
-  RID_BalancesDelta = '{E9EE47C8-0762-4259-BDC9-7CF3EEF83D9E}';
-
-type
-  { IDiarioDelta }
-  IDiarioDelta = interface(IDiario)
-  ['{5AB4FC97-693C-460A-925E-56936CC6F220}']
-    { Property getters and setters }
-    function GetOldID_APUNTEValue : Integer;
-    function GetOldID_ASIENTOValue : Integer;
-    function GetOldID_FACTURAValue : Integer;
-    function GetOldID_PAGOValue : Integer;
-    function GetOldORDEN_ASIENTOValue : Integer;
-    function GetOldFECHA_ASIENTOValue : DateTime;
-    function GetOldID_SUBCUENTAValue : Integer;
-    function GetOldREF_SUBCUENTAValue : String;
-    function GetOldID_EJERCICIOValue : Integer;
-    function GetOldCONCEPTOValue : String;
-    function GetOldDOCUMENTOValue : String;
-    function GetOldDEBEValue : Currency;
-    function GetOldHABERValue : Currency;
-    function GetOldPUNTEADOValue : SmallInt;
-
-    { Properties }
-    property OldID_APUNTE : Integer read GetOldID_APUNTEValue;
-    property OldID_ASIENTO : Integer read GetOldID_ASIENTOValue;
-    property OldID_FACTURA : Integer read GetOldID_FACTURAValue;
-    property OldID_PAGO : Integer read GetOldID_PAGOValue;
-    property OldORDEN_ASIENTO : Integer read GetOldORDEN_ASIENTOValue;
-    property OldFECHA_ASIENTO : DateTime read GetOldFECHA_ASIENTOValue;
-    property OldID_SUBCUENTA : Integer read GetOldID_SUBCUENTAValue;
-    property OldREF_SUBCUENTA : String read GetOldREF_SUBCUENTAValue;
-    property OldID_EJERCICIO : Integer read GetOldID_EJERCICIOValue;
-    property OldCONCEPTO : String read GetOldCONCEPTOValue;
-    property OldDOCUMENTO : String read GetOldDOCUMENTOValue;
-    property OldDEBE : Currency read GetOldDEBEValue;
-    property OldHABER : Currency read GetOldHABERValue;
-    property OldPUNTEADO : SmallInt read GetOldPUNTEADOValue;
-  end;
-
-  { TDiarioBusinessProcessorRules }
-  TDiarioBusinessProcessorRules = class(TDABusinessProcessorRules, IDiario, IDiarioDelta)
-  private
-  protected
-    { Property getters and setters }
-    function GetID_APUNTEValue: Integer; virtual;
-    function GetID_APUNTEIsNull: Boolean; virtual;
-    function GetOldID_APUNTEValue: Integer; virtual;
-    function GetOldID_APUNTEIsNull: Boolean; virtual;
-    procedure SetID_APUNTEValue(const aValue: Integer); virtual;
-    procedure SetID_APUNTEIsNull(const aValue: Boolean); virtual;
-    function GetID_ASIENTOValue: Integer; virtual;
-    function GetID_ASIENTOIsNull: Boolean; virtual;
-    function GetOldID_ASIENTOValue: Integer; virtual;
-    function GetOldID_ASIENTOIsNull: Boolean; virtual;
-    procedure SetID_ASIENTOValue(const aValue: Integer); virtual;
-    procedure SetID_ASIENTOIsNull(const aValue: Boolean); virtual;
-    function GetID_FACTURAValue: Integer; virtual;
-    function GetID_FACTURAIsNull: Boolean; virtual;
-    function GetOldID_FACTURAValue: Integer; virtual;
-    function GetOldID_FACTURAIsNull: Boolean; virtual;
-    procedure SetID_FACTURAValue(const aValue: Integer); virtual;
-    procedure SetID_FACTURAIsNull(const aValue: Boolean); virtual;
-    function GetID_PAGOValue: Integer; virtual;
-    function GetID_PAGOIsNull: Boolean; virtual;
-    function GetOldID_PAGOValue: Integer; virtual;
-    function GetOldID_PAGOIsNull: Boolean; virtual;
-    procedure SetID_PAGOValue(const aValue: Integer); virtual;
-    procedure SetID_PAGOIsNull(const aValue: Boolean); virtual;
-    function GetORDEN_ASIENTOValue: Integer; virtual;
-    function GetORDEN_ASIENTOIsNull: Boolean; virtual;
-    function GetOldORDEN_ASIENTOValue: Integer; virtual;
-    function GetOldORDEN_ASIENTOIsNull: Boolean; virtual;
-    procedure SetORDEN_ASIENTOValue(const aValue: Integer); virtual;
-    procedure SetORDEN_ASIENTOIsNull(const aValue: Boolean); virtual;
-    function GetFECHA_ASIENTOValue: DateTime; virtual;
-    function GetFECHA_ASIENTOIsNull: Boolean; virtual;
-    function GetOldFECHA_ASIENTOValue: DateTime; virtual;
-    function GetOldFECHA_ASIENTOIsNull: Boolean; virtual;
-    procedure SetFECHA_ASIENTOValue(const aValue: DateTime); virtual;
-    procedure SetFECHA_ASIENTOIsNull(const aValue: Boolean); virtual;
-    function GetID_SUBCUENTAValue: Integer; virtual;
-    function GetID_SUBCUENTAIsNull: Boolean; virtual;
-    function GetOldID_SUBCUENTAValue: Integer; virtual;
-    function GetOldID_SUBCUENTAIsNull: Boolean; virtual;
-    procedure SetID_SUBCUENTAValue(const aValue: Integer); virtual;
-    procedure SetID_SUBCUENTAIsNull(const aValue: Boolean); virtual;
-    function GetREF_SUBCUENTAValue: String; virtual;
-    function GetREF_SUBCUENTAIsNull: Boolean; virtual;
-    function GetOldREF_SUBCUENTAValue: String; virtual;
-    function GetOldREF_SUBCUENTAIsNull: Boolean; virtual;
-    procedure SetREF_SUBCUENTAValue(const aValue: String); virtual;
-    procedure SetREF_SUBCUENTAIsNull(const aValue: Boolean); virtual;
-    function GetID_EJERCICIOValue: Integer; virtual;
-    function GetID_EJERCICIOIsNull: Boolean; virtual;
-    function GetOldID_EJERCICIOValue: Integer; virtual;
-    function GetOldID_EJERCICIOIsNull: Boolean; virtual;
-    procedure SetID_EJERCICIOValue(const aValue: Integer); virtual;
-    procedure SetID_EJERCICIOIsNull(const aValue: Boolean); virtual;
-    function GetCONCEPTOValue: String; virtual;
-    function GetCONCEPTOIsNull: Boolean; virtual;
-    function GetOldCONCEPTOValue: String; virtual;
-    function GetOldCONCEPTOIsNull: Boolean; virtual;
-    procedure SetCONCEPTOValue(const aValue: String); virtual;
-    procedure SetCONCEPTOIsNull(const aValue: Boolean); virtual;
-    function GetDOCUMENTOValue: String; virtual;
-    function GetDOCUMENTOIsNull: Boolean; virtual;
-    function GetOldDOCUMENTOValue: String; virtual;
-    function GetOldDOCUMENTOIsNull: Boolean; virtual;
-    procedure SetDOCUMENTOValue(const aValue: String); virtual;
-    procedure SetDOCUMENTOIsNull(const aValue: Boolean); virtual;
-    function GetDEBEValue: Currency; virtual;
-    function GetDEBEIsNull: Boolean; virtual;
-    function GetOldDEBEValue: Currency; virtual;
-    function GetOldDEBEIsNull: Boolean; virtual;
-    procedure SetDEBEValue(const aValue: Currency); virtual;
-    procedure SetDEBEIsNull(const aValue: Boolean); virtual;
-    function GetHABERValue: Currency; virtual;
-    function GetHABERIsNull: Boolean; virtual;
-    function GetOldHABERValue: Currency; virtual;
-    function GetOldHABERIsNull: Boolean; virtual;
-    procedure SetHABERValue(const aValue: Currency); virtual;
-    procedure SetHABERIsNull(const aValue: Boolean); virtual;
-    function GetPUNTEADOValue: SmallInt; virtual;
-    function GetPUNTEADOIsNull: Boolean; virtual;
-    function GetOldPUNTEADOValue: SmallInt; virtual;
-    function GetOldPUNTEADOIsNull: Boolean; virtual;
-    procedure SetPUNTEADOValue(const aValue: SmallInt); virtual;
-    procedure SetPUNTEADOIsNull(const aValue: Boolean); virtual;
-
-    { Properties }
-    property ID_APUNTE : Integer read GetID_APUNTEValue write SetID_APUNTEValue;
-    property ID_APUNTEIsNull : Boolean read GetID_APUNTEIsNull write SetID_APUNTEIsNull;
-    property OldID_APUNTE : Integer read GetOldID_APUNTEValue;
-    property OldID_APUNTEIsNull : Boolean read GetOldID_APUNTEIsNull;
-    property ID_ASIENTO : Integer read GetID_ASIENTOValue write SetID_ASIENTOValue;
-    property ID_ASIENTOIsNull : Boolean read GetID_ASIENTOIsNull write SetID_ASIENTOIsNull;
-    property OldID_ASIENTO : Integer read GetOldID_ASIENTOValue;
-    property OldID_ASIENTOIsNull : Boolean read GetOldID_ASIENTOIsNull;
-    property ID_FACTURA : Integer read GetID_FACTURAValue write SetID_FACTURAValue;
-    property ID_FACTURAIsNull : Boolean read GetID_FACTURAIsNull write SetID_FACTURAIsNull;
-    property OldID_FACTURA : Integer read GetOldID_FACTURAValue;
-    property OldID_FACTURAIsNull : Boolean read GetOldID_FACTURAIsNull;
-    property ID_PAGO : Integer read GetID_PAGOValue write SetID_PAGOValue;
-    property ID_PAGOIsNull : Boolean read GetID_PAGOIsNull write SetID_PAGOIsNull;
-    property OldID_PAGO : Integer read GetOldID_PAGOValue;
-    property OldID_PAGOIsNull : Boolean read GetOldID_PAGOIsNull;
-    property ORDEN_ASIENTO : Integer read GetORDEN_ASIENTOValue write SetORDEN_ASIENTOValue;
-    property ORDEN_ASIENTOIsNull : Boolean read GetORDEN_ASIENTOIsNull write SetORDEN_ASIENTOIsNull;
-    property OldORDEN_ASIENTO : Integer read GetOldORDEN_ASIENTOValue;
-    property OldORDEN_ASIENTOIsNull : Boolean read GetOldORDEN_ASIENTOIsNull;
-    property FECHA_ASIENTO : DateTime read GetFECHA_ASIENTOValue write SetFECHA_ASIENTOValue;
-    property FECHA_ASIENTOIsNull : Boolean read GetFECHA_ASIENTOIsNull write SetFECHA_ASIENTOIsNull;
-    property OldFECHA_ASIENTO : DateTime read GetOldFECHA_ASIENTOValue;
-    property OldFECHA_ASIENTOIsNull : Boolean read GetOldFECHA_ASIENTOIsNull;
-    property ID_SUBCUENTA : Integer read GetID_SUBCUENTAValue write SetID_SUBCUENTAValue;
-    property ID_SUBCUENTAIsNull : Boolean read GetID_SUBCUENTAIsNull write SetID_SUBCUENTAIsNull;
-    property OldID_SUBCUENTA : Integer read GetOldID_SUBCUENTAValue;
-    property OldID_SUBCUENTAIsNull : Boolean read GetOldID_SUBCUENTAIsNull;
-    property REF_SUBCUENTA : String read GetREF_SUBCUENTAValue write SetREF_SUBCUENTAValue;
-    property REF_SUBCUENTAIsNull : Boolean read GetREF_SUBCUENTAIsNull write SetREF_SUBCUENTAIsNull;
-    property OldREF_SUBCUENTA : String read GetOldREF_SUBCUENTAValue;
-    property OldREF_SUBCUENTAIsNull : Boolean read GetOldREF_SUBCUENTAIsNull;
-    property ID_EJERCICIO : Integer read GetID_EJERCICIOValue write SetID_EJERCICIOValue;
-    property ID_EJERCICIOIsNull : Boolean read GetID_EJERCICIOIsNull write SetID_EJERCICIOIsNull;
-    property OldID_EJERCICIO : Integer read GetOldID_EJERCICIOValue;
-    property OldID_EJERCICIOIsNull : Boolean read GetOldID_EJERCICIOIsNull;
-    property CONCEPTO : String read GetCONCEPTOValue write SetCONCEPTOValue;
-    property CONCEPTOIsNull : Boolean read GetCONCEPTOIsNull write SetCONCEPTOIsNull;
-    property OldCONCEPTO : String read GetOldCONCEPTOValue;
-    property OldCONCEPTOIsNull : Boolean read GetOldCONCEPTOIsNull;
-    property DOCUMENTO : String read GetDOCUMENTOValue write SetDOCUMENTOValue;
-    property DOCUMENTOIsNull : Boolean read GetDOCUMENTOIsNull write SetDOCUMENTOIsNull;
-    property OldDOCUMENTO : String read GetOldDOCUMENTOValue;
-    property OldDOCUMENTOIsNull : Boolean read GetOldDOCUMENTOIsNull;
-    property DEBE : Currency read GetDEBEValue write SetDEBEValue;
-    property DEBEIsNull : Boolean read GetDEBEIsNull write SetDEBEIsNull;
-    property OldDEBE : Currency read GetOldDEBEValue;
-    property OldDEBEIsNull : Boolean read GetOldDEBEIsNull;
-    property HABER : Currency read GetHABERValue write SetHABERValue;
-    property HABERIsNull : Boolean read GetHABERIsNull write SetHABERIsNull;
-    property OldHABER : Currency read GetOldHABERValue;
-    property OldHABERIsNull : Boolean read GetOldHABERIsNull;
-    property PUNTEADO : SmallInt read GetPUNTEADOValue write SetPUNTEADOValue;
-    property PUNTEADOIsNull : Boolean read GetPUNTEADOIsNull write SetPUNTEADOIsNull;
-    property OldPUNTEADO : SmallInt read GetOldPUNTEADOValue;
-    property OldPUNTEADOIsNull : Boolean read GetOldPUNTEADOIsNull;
-
-  public
-    constructor Create(aBusinessProcessor: TDABusinessProcessor); override;
-    destructor Destroy; override;
-
-  end;
-
-  { IApuntesDelta }
-  IApuntesDelta = interface(IApuntes)
-  ['{96F99DFB-E137-4E31-A0D8-39F7C43C8814}']
-    { Property getters and setters }
-    function GetOldIDValue : Integer;
-    function GetOldID_ASIENTOValue : Integer;
-    function GetOldID_SUBCUENTAValue : Integer;
-    function GetOldNUM_ORDENValue : Integer;
-    function GetOldREF_SUBCUENTAValue : String;
-    function GetOldSUBCUENTAValue : String;
-    function GetOldCONCEPTOValue : String;
-    function GetOldDOCUMENTOValue : String;
-    function GetOldDEBEValue : Currency;
-    function GetOldHABERValue : Currency;
-    function GetOldPUNTEADOValue : SmallInt;
-
-    { Properties }
-    property OldID : Integer read GetOldIDValue;
-    property OldID_ASIENTO : Integer read GetOldID_ASIENTOValue;
-    property OldID_SUBCUENTA : Integer read GetOldID_SUBCUENTAValue;
-    property OldNUM_ORDEN : Integer read GetOldNUM_ORDENValue;
-    property OldREF_SUBCUENTA : String read GetOldREF_SUBCUENTAValue;
-    property OldSUBCUENTA : String read GetOldSUBCUENTAValue;
-    property OldCONCEPTO : String read GetOldCONCEPTOValue;
-    property OldDOCUMENTO : String read GetOldDOCUMENTOValue;
-    property OldDEBE : Currency read GetOldDEBEValue;
-    property OldHABER : Currency read GetOldHABERValue;
-    property OldPUNTEADO : SmallInt read GetOldPUNTEADOValue;
-  end;
-
-  { TApuntesBusinessProcessorRules }
-  TApuntesBusinessProcessorRules = class(TDABusinessProcessorRules, IApuntes, IApuntesDelta)
-  private
-  protected
-    { Property getters and setters }
-    function GetIDValue: Integer; virtual;
-    function GetIDIsNull: Boolean; virtual;
-    function GetOldIDValue: Integer; virtual;
-    function GetOldIDIsNull: Boolean; virtual;
-    procedure SetIDValue(const aValue: Integer); virtual;
-    procedure SetIDIsNull(const aValue: Boolean); virtual;
-    function GetID_ASIENTOValue: Integer; virtual;
-    function GetID_ASIENTOIsNull: Boolean; virtual;
-    function GetOldID_ASIENTOValue: Integer; virtual;
-    function GetOldID_ASIENTOIsNull: Boolean; virtual;
-    procedure SetID_ASIENTOValue(const aValue: Integer); virtual;
-    procedure SetID_ASIENTOIsNull(const aValue: Boolean); virtual;
-    function GetID_SUBCUENTAValue: Integer; virtual;
-    function GetID_SUBCUENTAIsNull: Boolean; virtual;
-    function GetOldID_SUBCUENTAValue: Integer; virtual;
-    function GetOldID_SUBCUENTAIsNull: Boolean; virtual;
-    procedure SetID_SUBCUENTAValue(const aValue: Integer); virtual;
-    procedure SetID_SUBCUENTAIsNull(const aValue: Boolean); virtual;
-    function GetNUM_ORDENValue: Integer; virtual;
-    function GetNUM_ORDENIsNull: Boolean; virtual;
-    function GetOldNUM_ORDENValue: Integer; virtual;
-    function GetOldNUM_ORDENIsNull: Boolean; virtual;
-    procedure SetNUM_ORDENValue(const aValue: Integer); virtual;
-    procedure SetNUM_ORDENIsNull(const aValue: Boolean); virtual;
-    function GetREF_SUBCUENTAValue: String; virtual;
-    function GetREF_SUBCUENTAIsNull: Boolean; virtual;
-    function GetOldREF_SUBCUENTAValue: String; virtual;
-    function GetOldREF_SUBCUENTAIsNull: Boolean; virtual;
-    procedure SetREF_SUBCUENTAValue(const aValue: String); virtual;
-    procedure SetREF_SUBCUENTAIsNull(const aValue: Boolean); virtual;
-    function GetSUBCUENTAValue: String; virtual;
-    function GetSUBCUENTAIsNull: Boolean; virtual;
-    function GetOldSUBCUENTAValue: String; virtual;
-    function GetOldSUBCUENTAIsNull: Boolean; virtual;
-    procedure SetSUBCUENTAValue(const aValue: String); virtual;
-    procedure SetSUBCUENTAIsNull(const aValue: Boolean); virtual;
-    function GetCONCEPTOValue: String; virtual;
-    function GetCONCEPTOIsNull: Boolean; virtual;
-    function GetOldCONCEPTOValue: String; virtual;
-    function GetOldCONCEPTOIsNull: Boolean; virtual;
-    procedure SetCONCEPTOValue(const aValue: String); virtual;
-    procedure SetCONCEPTOIsNull(const aValue: Boolean); virtual;
-    function GetDOCUMENTOValue: String; virtual;
-    function GetDOCUMENTOIsNull: Boolean; virtual;
-    function GetOldDOCUMENTOValue: String; virtual;
-    function GetOldDOCUMENTOIsNull: Boolean; virtual;
-    procedure SetDOCUMENTOValue(const aValue: String); virtual;
-    procedure SetDOCUMENTOIsNull(const aValue: Boolean); virtual;
-    function GetDEBEValue: Currency; virtual;
-    function GetDEBEIsNull: Boolean; virtual;
-    function GetOldDEBEValue: Currency; virtual;
-    function GetOldDEBEIsNull: Boolean; virtual;
-    procedure SetDEBEValue(const aValue: Currency); virtual;
-    procedure SetDEBEIsNull(const aValue: Boolean); virtual;
-    function GetHABERValue: Currency; virtual;
-    function GetHABERIsNull: Boolean; virtual;
-    function GetOldHABERValue: Currency; virtual;
-    function GetOldHABERIsNull: Boolean; virtual;
-    procedure SetHABERValue(const aValue: Currency); virtual;
-    procedure SetHABERIsNull(const aValue: Boolean); virtual;
-    function GetPUNTEADOValue: SmallInt; virtual;
-    function GetPUNTEADOIsNull: Boolean; virtual;
-    function GetOldPUNTEADOValue: SmallInt; virtual;
-    function GetOldPUNTEADOIsNull: Boolean; virtual;
-    procedure SetPUNTEADOValue(const aValue: SmallInt); virtual;
-    procedure SetPUNTEADOIsNull(const aValue: Boolean); virtual;
-
-    { Properties }
-    property ID : Integer read GetIDValue write SetIDValue;
-    property IDIsNull : Boolean read GetIDIsNull write SetIDIsNull;
-    property OldID : Integer read GetOldIDValue;
-    property OldIDIsNull : Boolean read GetOldIDIsNull;
-    property ID_ASIENTO : Integer read GetID_ASIENTOValue write SetID_ASIENTOValue;
-    property ID_ASIENTOIsNull : Boolean read GetID_ASIENTOIsNull write SetID_ASIENTOIsNull;
-    property OldID_ASIENTO : Integer read GetOldID_ASIENTOValue;
-    property OldID_ASIENTOIsNull : Boolean read GetOldID_ASIENTOIsNull;
-    property ID_SUBCUENTA : Integer read GetID_SUBCUENTAValue write SetID_SUBCUENTAValue;
-    property ID_SUBCUENTAIsNull : Boolean read GetID_SUBCUENTAIsNull write SetID_SUBCUENTAIsNull;
-    property OldID_SUBCUENTA : Integer read GetOldID_SUBCUENTAValue;
-    property OldID_SUBCUENTAIsNull : Boolean read GetOldID_SUBCUENTAIsNull;
-    property NUM_ORDEN : Integer read GetNUM_ORDENValue write SetNUM_ORDENValue;
-    property NUM_ORDENIsNull : Boolean read GetNUM_ORDENIsNull write SetNUM_ORDENIsNull;
-    property OldNUM_ORDEN : Integer read GetOldNUM_ORDENValue;
-    property OldNUM_ORDENIsNull : Boolean read GetOldNUM_ORDENIsNull;
-    property REF_SUBCUENTA : String read GetREF_SUBCUENTAValue write SetREF_SUBCUENTAValue;
-    property REF_SUBCUENTAIsNull : Boolean read GetREF_SUBCUENTAIsNull write SetREF_SUBCUENTAIsNull;
-    property OldREF_SUBCUENTA : String read GetOldREF_SUBCUENTAValue;
-    property OldREF_SUBCUENTAIsNull : Boolean read GetOldREF_SUBCUENTAIsNull;
-    property SUBCUENTA : String read GetSUBCUENTAValue write SetSUBCUENTAValue;
-    property SUBCUENTAIsNull : Boolean read GetSUBCUENTAIsNull write SetSUBCUENTAIsNull;
-    property OldSUBCUENTA : String read GetOldSUBCUENTAValue;
-    property OldSUBCUENTAIsNull : Boolean read GetOldSUBCUENTAIsNull;
-    property CONCEPTO : String read GetCONCEPTOValue write SetCONCEPTOValue;
-    property CONCEPTOIsNull : Boolean read GetCONCEPTOIsNull write SetCONCEPTOIsNull;
-    property OldCONCEPTO : String read GetOldCONCEPTOValue;
-    property OldCONCEPTOIsNull : Boolean read GetOldCONCEPTOIsNull;
-    property DOCUMENTO : String read GetDOCUMENTOValue write SetDOCUMENTOValue;
-    property DOCUMENTOIsNull : Boolean read GetDOCUMENTOIsNull write SetDOCUMENTOIsNull;
-    property OldDOCUMENTO : String read GetOldDOCUMENTOValue;
-    property OldDOCUMENTOIsNull : Boolean read GetOldDOCUMENTOIsNull;
-    property DEBE : Currency read GetDEBEValue write SetDEBEValue;
-    property DEBEIsNull : Boolean read GetDEBEIsNull write SetDEBEIsNull;
-    property OldDEBE : Currency read GetOldDEBEValue;
-    property OldDEBEIsNull : Boolean read GetOldDEBEIsNull;
-    property HABER : Currency read GetHABERValue write SetHABERValue;
-    property HABERIsNull : Boolean read GetHABERIsNull write SetHABERIsNull;
-    property OldHABER : Currency read GetOldHABERValue;
-    property OldHABERIsNull : Boolean read GetOldHABERIsNull;
-    property PUNTEADO : SmallInt read GetPUNTEADOValue write SetPUNTEADOValue;
-    property PUNTEADOIsNull : Boolean read GetPUNTEADOIsNull write SetPUNTEADOIsNull;
-    property OldPUNTEADO : SmallInt read GetOldPUNTEADOValue;
-    property OldPUNTEADOIsNull : Boolean read GetOldPUNTEADOIsNull;
-
-  public
-    constructor Create(aBusinessProcessor: TDABusinessProcessor); override;
-    destructor Destroy; override;
-
-  end;
-
-  { IAsientosDelta }
-  IAsientosDelta = interface(IAsientos)
-  ['{97378BCF-3017-4244-B469-E13A964B3AF0}']
-    { Property getters and setters }
-    function GetOldIDValue : Integer;
-    function GetOldFECHA_ASIENTOValue : DateTime;
-    function GetOldORDENValue : Integer;
-    function GetOldID_FACTURAValue : Integer;
-    function GetOldID_RECIBOValue : Integer;
-
-    { Properties }
-    property OldID : Integer read GetOldIDValue;
-    property OldFECHA_ASIENTO : DateTime read GetOldFECHA_ASIENTOValue;
-    property OldORDEN : Integer read GetOldORDENValue;
-    property OldID_FACTURA : Integer read GetOldID_FACTURAValue;
-    property OldID_RECIBO : Integer read GetOldID_RECIBOValue;
-  end;
-
-  { TAsientosBusinessProcessorRules }
-  TAsientosBusinessProcessorRules = class(TDABusinessProcessorRules, IAsientos, IAsientosDelta)
-  private
-  protected
-    { Property getters and setters }
-    function GetIDValue: Integer; virtual;
-    function GetIDIsNull: Boolean; virtual;
-    function GetOldIDValue: Integer; virtual;
-    function GetOldIDIsNull: Boolean; virtual;
-    procedure SetIDValue(const aValue: Integer); virtual;
-    procedure SetIDIsNull(const aValue: Boolean); virtual;
-    function GetFECHA_ASIENTOValue: DateTime; virtual;
-    function GetFECHA_ASIENTOIsNull: Boolean; virtual;
-    function GetOldFECHA_ASIENTOValue: DateTime; virtual;
-    function GetOldFECHA_ASIENTOIsNull: Boolean; virtual;
-    procedure SetFECHA_ASIENTOValue(const aValue: DateTime); virtual;
-    procedure SetFECHA_ASIENTOIsNull(const aValue: Boolean); virtual;
-    function GetORDENValue: Integer; virtual;
-    function GetORDENIsNull: Boolean; virtual;
-    function GetOldORDENValue: Integer; virtual;
-    function GetOldORDENIsNull: Boolean; virtual;
-    procedure SetORDENValue(const aValue: Integer); virtual;
-    procedure SetORDENIsNull(const aValue: Boolean); virtual;
-    function GetID_FACTURAValue: Integer; virtual;
-    function GetID_FACTURAIsNull: Boolean; virtual;
-    function GetOldID_FACTURAValue: Integer; virtual;
-    function GetOldID_FACTURAIsNull: Boolean; virtual;
-    procedure SetID_FACTURAValue(const aValue: Integer); virtual;
-    procedure SetID_FACTURAIsNull(const aValue: Boolean); virtual;
-    function GetID_RECIBOValue: Integer; virtual;
-    function GetID_RECIBOIsNull: Boolean; virtual;
-    function GetOldID_RECIBOValue: Integer; virtual;
-    function GetOldID_RECIBOIsNull: Boolean; virtual;
-    procedure SetID_RECIBOValue(const aValue: Integer); virtual;
-    procedure SetID_RECIBOIsNull(const aValue: Boolean); virtual;
-
-    { Properties }
-    property ID : Integer read GetIDValue write SetIDValue;
-    property IDIsNull : Boolean read GetIDIsNull write SetIDIsNull;
-    property OldID : Integer read GetOldIDValue;
-    property OldIDIsNull : Boolean read GetOldIDIsNull;
-    property FECHA_ASIENTO : DateTime read GetFECHA_ASIENTOValue write SetFECHA_ASIENTOValue;
-    property FECHA_ASIENTOIsNull : Boolean read GetFECHA_ASIENTOIsNull write SetFECHA_ASIENTOIsNull;
-    property OldFECHA_ASIENTO : DateTime read GetOldFECHA_ASIENTOValue;
-    property OldFECHA_ASIENTOIsNull : Boolean read GetOldFECHA_ASIENTOIsNull;
-    property ORDEN : Integer read GetORDENValue write SetORDENValue;
-    property ORDENIsNull : Boolean read GetORDENIsNull write SetORDENIsNull;
-    property OldORDEN : Integer read GetOldORDENValue;
-    property OldORDENIsNull : Boolean read GetOldORDENIsNull;
-    property ID_FACTURA : Integer read GetID_FACTURAValue write SetID_FACTURAValue;
-    property ID_FACTURAIsNull : Boolean read GetID_FACTURAIsNull write SetID_FACTURAIsNull;
-    property OldID_FACTURA : Integer read GetOldID_FACTURAValue;
-    property OldID_FACTURAIsNull : Boolean read GetOldID_FACTURAIsNull;
-    property ID_RECIBO : Integer read GetID_RECIBOValue write SetID_RECIBOValue;
-    property ID_RECIBOIsNull : Boolean read GetID_RECIBOIsNull write SetID_RECIBOIsNull;
-    property OldID_RECIBO : Integer read GetOldID_RECIBOValue;
-    property OldID_RECIBOIsNull : Boolean read GetOldID_RECIBOIsNull;
-
-  public
-    constructor Create(aBusinessProcessor: TDABusinessProcessor); override;
-    destructor Destroy; override;
-
-  end;
-
-  { ISubCuentasDelta }
-  ISubCuentasDelta = interface(ISubCuentas)
-  ['{7CC1A031-D5FA-41BC-9832-F3FA3541DD6E}']
-    { Property getters and setters }
-    function GetOldIDValue : Integer;
-    function GetOldREF_SUBCUENTAValue : String;
-    function GetOldDESCRIPCIONValue : String;
-    function GetOldID_EJERCICIOValue : Integer;
-    function GetOldID_CONTACTOValue : Integer;
-    function GetOldID_CUENTAValue : Integer;
-    function GetOldREF_CUENTAValue : String;
-    function GetOldCUENTAValue : String;
-    function GetOldDEBEValue : Currency;
-    function GetOldHABERValue : Currency;
-    function GetOldSALDOValue : Currency;
-
-    { Properties }
-    property OldID : Integer read GetOldIDValue;
-    property OldREF_SUBCUENTA : String read GetOldREF_SUBCUENTAValue;
-    property OldDESCRIPCION : String read GetOldDESCRIPCIONValue;
-    property OldID_EJERCICIO : Integer read GetOldID_EJERCICIOValue;
-    property OldID_CONTACTO : Integer read GetOldID_CONTACTOValue;
-    property OldID_CUENTA : Integer read GetOldID_CUENTAValue;
-    property OldREF_CUENTA : String read GetOldREF_CUENTAValue;
-    property OldCUENTA : String read GetOldCUENTAValue;
-    property OldDEBE : Currency read GetOldDEBEValue;
-    property OldHABER : Currency read GetOldHABERValue;
-    property OldSALDO : Currency read GetOldSALDOValue;
-  end;
-
-  { TSubCuentasBusinessProcessorRules }
-  TSubCuentasBusinessProcessorRules = class(TDABusinessProcessorRules, ISubCuentas, ISubCuentasDelta)
-  private
-  protected
-    { Property getters and setters }
-    function GetIDValue: Integer; virtual;
-    function GetIDIsNull: Boolean; virtual;
-    function GetOldIDValue: Integer; virtual;
-    function GetOldIDIsNull: Boolean; virtual;
-    procedure SetIDValue(const aValue: Integer); virtual;
-    procedure SetIDIsNull(const aValue: Boolean); virtual;
-    function GetREF_SUBCUENTAValue: String; virtual;
-    function GetREF_SUBCUENTAIsNull: Boolean; virtual;
-    function GetOldREF_SUBCUENTAValue: String; virtual;
-    function GetOldREF_SUBCUENTAIsNull: Boolean; virtual;
-    procedure SetREF_SUBCUENTAValue(const aValue: String); virtual;
-    procedure SetREF_SUBCUENTAIsNull(const aValue: Boolean); virtual;
-    function GetDESCRIPCIONValue: String; virtual;
-    function GetDESCRIPCIONIsNull: Boolean; virtual;
-    function GetOldDESCRIPCIONValue: String; virtual;
-    function GetOldDESCRIPCIONIsNull: Boolean; virtual;
-    procedure SetDESCRIPCIONValue(const aValue: String); virtual;
-    procedure SetDESCRIPCIONIsNull(const aValue: Boolean); virtual;
-    function GetID_EJERCICIOValue: Integer; virtual;
-    function GetID_EJERCICIOIsNull: Boolean; virtual;
-    function GetOldID_EJERCICIOValue: Integer; virtual;
-    function GetOldID_EJERCICIOIsNull: Boolean; virtual;
-    procedure SetID_EJERCICIOValue(const aValue: Integer); virtual;
-    procedure SetID_EJERCICIOIsNull(const aValue: Boolean); virtual;
-    function GetID_CONTACTOValue: Integer; virtual;
-    function GetID_CONTACTOIsNull: Boolean; virtual;
-    function GetOldID_CONTACTOValue: Integer; virtual;
-    function GetOldID_CONTACTOIsNull: Boolean; virtual;
-    procedure SetID_CONTACTOValue(const aValue: Integer); virtual;
-    procedure SetID_CONTACTOIsNull(const aValue: Boolean); virtual;
-    function GetID_CUENTAValue: Integer; virtual;
-    function GetID_CUENTAIsNull: Boolean; virtual;
-    function GetOldID_CUENTAValue: Integer; virtual;
-    function GetOldID_CUENTAIsNull: Boolean; virtual;
-    procedure SetID_CUENTAValue(const aValue: Integer); virtual;
-    procedure SetID_CUENTAIsNull(const aValue: Boolean); virtual;
-    function GetREF_CUENTAValue: String; virtual;
-    function GetREF_CUENTAIsNull: Boolean; virtual;
-    function GetOldREF_CUENTAValue: String; virtual;
-    function GetOldREF_CUENTAIsNull: Boolean; virtual;
-    procedure SetREF_CUENTAValue(const aValue: String); virtual;
-    procedure SetREF_CUENTAIsNull(const aValue: Boolean); virtual;
-    function GetCUENTAValue: String; virtual;
-    function GetCUENTAIsNull: Boolean; virtual;
-    function GetOldCUENTAValue: String; virtual;
-    function GetOldCUENTAIsNull: Boolean; virtual;
-    procedure SetCUENTAValue(const aValue: String); virtual;
-    procedure SetCUENTAIsNull(const aValue: Boolean); virtual;
-    function GetDEBEValue: Currency; virtual;
-    function GetDEBEIsNull: Boolean; virtual;
-    function GetOldDEBEValue: Currency; virtual;
-    function GetOldDEBEIsNull: Boolean; virtual;
-    procedure SetDEBEValue(const aValue: Currency); virtual;
-    procedure SetDEBEIsNull(const aValue: Boolean); virtual;
-    function GetHABERValue: Currency; virtual;
-    function GetHABERIsNull: Boolean; virtual;
-    function GetOldHABERValue: Currency; virtual;
-    function GetOldHABERIsNull: Boolean; virtual;
-    procedure SetHABERValue(const aValue: Currency); virtual;
-    procedure SetHABERIsNull(const aValue: Boolean); virtual;
-    function GetSALDOValue: Currency; virtual;
-    function GetSALDOIsNull: Boolean; virtual;
-    function GetOldSALDOValue: Currency; virtual;
-    function GetOldSALDOIsNull: Boolean; virtual;
-    procedure SetSALDOValue(const aValue: Currency); virtual;
-    procedure SetSALDOIsNull(const aValue: Boolean); virtual;
-
-    { Properties }
-    property ID : Integer read GetIDValue write SetIDValue;
-    property IDIsNull : Boolean read GetIDIsNull write SetIDIsNull;
-    property OldID : Integer read GetOldIDValue;
-    property OldIDIsNull : Boolean read GetOldIDIsNull;
-    property REF_SUBCUENTA : String read GetREF_SUBCUENTAValue write SetREF_SUBCUENTAValue;
-    property REF_SUBCUENTAIsNull : Boolean read GetREF_SUBCUENTAIsNull write SetREF_SUBCUENTAIsNull;
-    property OldREF_SUBCUENTA : String read GetOldREF_SUBCUENTAValue;
-    property OldREF_SUBCUENTAIsNull : Boolean read GetOldREF_SUBCUENTAIsNull;
-    property DESCRIPCION : String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
-    property DESCRIPCIONIsNull : Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull;
-    property OldDESCRIPCION : String read GetOldDESCRIPCIONValue;
-    property OldDESCRIPCIONIsNull : Boolean read GetOldDESCRIPCIONIsNull;
-    property ID_EJERCICIO : Integer read GetID_EJERCICIOValue write SetID_EJERCICIOValue;
-    property ID_EJERCICIOIsNull : Boolean read GetID_EJERCICIOIsNull write SetID_EJERCICIOIsNull;
-    property OldID_EJERCICIO : Integer read GetOldID_EJERCICIOValue;
-    property OldID_EJERCICIOIsNull : Boolean read GetOldID_EJERCICIOIsNull;
-    property ID_CONTACTO : Integer read GetID_CONTACTOValue write SetID_CONTACTOValue;
-    property ID_CONTACTOIsNull : Boolean read GetID_CONTACTOIsNull write SetID_CONTACTOIsNull;
-    property OldID_CONTACTO : Integer read GetOldID_CONTACTOValue;
-    property OldID_CONTACTOIsNull : Boolean read GetOldID_CONTACTOIsNull;
-    property ID_CUENTA : Integer read GetID_CUENTAValue write SetID_CUENTAValue;
-    property ID_CUENTAIsNull : Boolean read GetID_CUENTAIsNull write SetID_CUENTAIsNull;
-    property OldID_CUENTA : Integer read GetOldID_CUENTAValue;
-    property OldID_CUENTAIsNull : Boolean read GetOldID_CUENTAIsNull;
-    property REF_CUENTA : String read GetREF_CUENTAValue write SetREF_CUENTAValue;
-    property REF_CUENTAIsNull : Boolean read GetREF_CUENTAIsNull write SetREF_CUENTAIsNull;
-    property OldREF_CUENTA : String read GetOldREF_CUENTAValue;
-    property OldREF_CUENTAIsNull : Boolean read GetOldREF_CUENTAIsNull;
-    property CUENTA : String read GetCUENTAValue write SetCUENTAValue;
-    property CUENTAIsNull : Boolean read GetCUENTAIsNull write SetCUENTAIsNull;
-    property OldCUENTA : String read GetOldCUENTAValue;
-    property OldCUENTAIsNull : Boolean read GetOldCUENTAIsNull;
-    property DEBE : Currency read GetDEBEValue write SetDEBEValue;
-    property DEBEIsNull : Boolean read GetDEBEIsNull write SetDEBEIsNull;
-    property OldDEBE : Currency read GetOldDEBEValue;
-    property OldDEBEIsNull : Boolean read GetOldDEBEIsNull;
-    property HABER : Currency read GetHABERValue write SetHABERValue;
-    property HABERIsNull : Boolean read GetHABERIsNull write SetHABERIsNull;
-    property OldHABER : Currency read GetOldHABERValue;
-    property OldHABERIsNull : Boolean read GetOldHABERIsNull;
-    property SALDO : Currency read GetSALDOValue write SetSALDOValue;
-    property SALDOIsNull : Boolean read GetSALDOIsNull write SetSALDOIsNull;
-    property OldSALDO : Currency read GetOldSALDOValue;
-    property OldSALDOIsNull : Boolean read GetOldSALDOIsNull;
-
-  public
-    constructor Create(aBusinessProcessor: TDABusinessProcessor); override;
-    destructor Destroy; override;
-
-  end;
-
-  { ICuentasDelta }
-  ICuentasDelta = interface(ICuentas)
-  ['{2DA78E46-D506-4FD4-9CE3-DF3C9B0D2117}']
-    { Property getters and setters }
-    function GetOldIDValue : Integer;
-    function GetOldREF_CUENTAValue : String;
-    function GetOldID_EJERCICIOValue : Integer;
-    function GetOldDESCRIPCIONValue : String;
-    function GetOldID_EPIGRAFEValue : Integer;
-    function GetOldEPIGRAFEValue : String;
-    function GetOldID_BALANCEValue : Integer;
-    function GetOldBALANCEValue : String;
-    function GetOldID_CUENTA_ESPECIALValue : Integer;
-    function GetOldCUENTA_ESPECIALValue : String;
-
-    { Properties }
-    property OldID : Integer read GetOldIDValue;
-    property OldREF_CUENTA : String read GetOldREF_CUENTAValue;
-    property OldID_EJERCICIO : Integer read GetOldID_EJERCICIOValue;
-    property OldDESCRIPCION : String read GetOldDESCRIPCIONValue;
-    property OldID_EPIGRAFE : Integer read GetOldID_EPIGRAFEValue;
-    property OldEPIGRAFE : String read GetOldEPIGRAFEValue;
-    property OldID_BALANCE : Integer read GetOldID_BALANCEValue;
-    property OldBALANCE : String read GetOldBALANCEValue;
-    property OldID_CUENTA_ESPECIAL : Integer read GetOldID_CUENTA_ESPECIALValue;
-    property OldCUENTA_ESPECIAL : String read GetOldCUENTA_ESPECIALValue;
-  end;
-
-  { TCuentasBusinessProcessorRules }
-  TCuentasBusinessProcessorRules = class(TDABusinessProcessorRules, ICuentas, ICuentasDelta)
-  private
-  protected
-    { Property getters and setters }
-    function GetIDValue: Integer; virtual;
-    function GetIDIsNull: Boolean; virtual;
-    function GetOldIDValue: Integer; virtual;
-    function GetOldIDIsNull: Boolean; virtual;
-    procedure SetIDValue(const aValue: Integer); virtual;
-    procedure SetIDIsNull(const aValue: Boolean); virtual;
-    function GetREF_CUENTAValue: String; virtual;
-    function GetREF_CUENTAIsNull: Boolean; virtual;
-    function GetOldREF_CUENTAValue: String; virtual;
-    function GetOldREF_CUENTAIsNull: Boolean; virtual;
-    procedure SetREF_CUENTAValue(const aValue: String); virtual;
-    procedure SetREF_CUENTAIsNull(const aValue: Boolean); virtual;
-    function GetID_EJERCICIOValue: Integer; virtual;
-    function GetID_EJERCICIOIsNull: Boolean; virtual;
-    function GetOldID_EJERCICIOValue: Integer; virtual;
-    function GetOldID_EJERCICIOIsNull: Boolean; virtual;
-    procedure SetID_EJERCICIOValue(const aValue: Integer); virtual;
-    procedure SetID_EJERCICIOIsNull(const aValue: Boolean); virtual;
-    function GetDESCRIPCIONValue: String; virtual;
-    function GetDESCRIPCIONIsNull: Boolean; virtual;
-    function GetOldDESCRIPCIONValue: String; virtual;
-    function GetOldDESCRIPCIONIsNull: Boolean; virtual;
-    procedure SetDESCRIPCIONValue(const aValue: String); virtual;
-    procedure SetDESCRIPCIONIsNull(const aValue: Boolean); virtual;
-    function GetID_EPIGRAFEValue: Integer; virtual;
-    function GetID_EPIGRAFEIsNull: Boolean; virtual;
-    function GetOldID_EPIGRAFEValue: Integer; virtual;
-    function GetOldID_EPIGRAFEIsNull: Boolean; virtual;
-    procedure SetID_EPIGRAFEValue(const aValue: Integer); virtual;
-    procedure SetID_EPIGRAFEIsNull(const aValue: Boolean); virtual;
-    function GetEPIGRAFEValue: String; virtual;
-    function GetEPIGRAFEIsNull: Boolean; virtual;
-    function GetOldEPIGRAFEValue: String; virtual;
-    function GetOldEPIGRAFEIsNull: Boolean; virtual;
-    procedure SetEPIGRAFEValue(const aValue: String); virtual;
-    procedure SetEPIGRAFEIsNull(const aValue: Boolean); virtual;
-    function GetID_BALANCEValue: Integer; virtual;
-    function GetID_BALANCEIsNull: Boolean; virtual;
-    function GetOldID_BALANCEValue: Integer; virtual;
-    function GetOldID_BALANCEIsNull: Boolean; virtual;
-    procedure SetID_BALANCEValue(const aValue: Integer); virtual;
-    procedure SetID_BALANCEIsNull(const aValue: Boolean); virtual;
-    function GetBALANCEValue: String; virtual;
-    function GetBALANCEIsNull: Boolean; virtual;
-    function GetOldBALANCEValue: String; virtual;
-    function GetOldBALANCEIsNull: Boolean; virtual;
-    procedure SetBALANCEValue(const aValue: String); virtual;
-    procedure SetBALANCEIsNull(const aValue: Boolean); virtual;
-    function GetID_CUENTA_ESPECIALValue: Integer; virtual;
-    function GetID_CUENTA_ESPECIALIsNull: Boolean; virtual;
-    function GetOldID_CUENTA_ESPECIALValue: Integer; virtual;
-    function GetOldID_CUENTA_ESPECIALIsNull: Boolean; virtual;
-    procedure SetID_CUENTA_ESPECIALValue(const aValue: Integer); virtual;
-    procedure SetID_CUENTA_ESPECIALIsNull(const aValue: Boolean); virtual;
-    function GetCUENTA_ESPECIALValue: String; virtual;
-    function GetCUENTA_ESPECIALIsNull: Boolean; virtual;
-    function GetOldCUENTA_ESPECIALValue: String; virtual;
-    function GetOldCUENTA_ESPECIALIsNull: Boolean; virtual;
-    procedure SetCUENTA_ESPECIALValue(const aValue: String); virtual;
-    procedure SetCUENTA_ESPECIALIsNull(const aValue: Boolean); virtual;
-
-    { Properties }
-    property ID : Integer read GetIDValue write SetIDValue;
-    property IDIsNull : Boolean read GetIDIsNull write SetIDIsNull;
-    property OldID : Integer read GetOldIDValue;
-    property OldIDIsNull : Boolean read GetOldIDIsNull;
-    property REF_CUENTA : String read GetREF_CUENTAValue write SetREF_CUENTAValue;
-    property REF_CUENTAIsNull : Boolean read GetREF_CUENTAIsNull write SetREF_CUENTAIsNull;
-    property OldREF_CUENTA : String read GetOldREF_CUENTAValue;
-    property OldREF_CUENTAIsNull : Boolean read GetOldREF_CUENTAIsNull;
-    property ID_EJERCICIO : Integer read GetID_EJERCICIOValue write SetID_EJERCICIOValue;
-    property ID_EJERCICIOIsNull : Boolean read GetID_EJERCICIOIsNull write SetID_EJERCICIOIsNull;
-    property OldID_EJERCICIO : Integer read GetOldID_EJERCICIOValue;
-    property OldID_EJERCICIOIsNull : Boolean read GetOldID_EJERCICIOIsNull;
-    property DESCRIPCION : String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
-    property DESCRIPCIONIsNull : Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull;
-    property OldDESCRIPCION : String read GetOldDESCRIPCIONValue;
-    property OldDESCRIPCIONIsNull : Boolean read GetOldDESCRIPCIONIsNull;
-    property ID_EPIGRAFE : Integer read GetID_EPIGRAFEValue write SetID_EPIGRAFEValue;
-    property ID_EPIGRAFEIsNull : Boolean read GetID_EPIGRAFEIsNull write SetID_EPIGRAFEIsNull;
-    property OldID_EPIGRAFE : Integer read GetOldID_EPIGRAFEValue;
-    property OldID_EPIGRAFEIsNull : Boolean read GetOldID_EPIGRAFEIsNull;
-    property EPIGRAFE : String read GetEPIGRAFEValue write SetEPIGRAFEValue;
-    property EPIGRAFEIsNull : Boolean read GetEPIGRAFEIsNull write SetEPIGRAFEIsNull;
-    property OldEPIGRAFE : String read GetOldEPIGRAFEValue;
-    property OldEPIGRAFEIsNull : Boolean read GetOldEPIGRAFEIsNull;
-    property ID_BALANCE : Integer read GetID_BALANCEValue write SetID_BALANCEValue;
-    property ID_BALANCEIsNull : Boolean read GetID_BALANCEIsNull write SetID_BALANCEIsNull;
-    property OldID_BALANCE : Integer read GetOldID_BALANCEValue;
-    property OldID_BALANCEIsNull : Boolean read GetOldID_BALANCEIsNull;
-    property BALANCE : String read GetBALANCEValue write SetBALANCEValue;
-    property BALANCEIsNull : Boolean read GetBALANCEIsNull write SetBALANCEIsNull;
-    property OldBALANCE : String read GetOldBALANCEValue;
-    property OldBALANCEIsNull : Boolean read GetOldBALANCEIsNull;
-    property ID_CUENTA_ESPECIAL : Integer read GetID_CUENTA_ESPECIALValue write SetID_CUENTA_ESPECIALValue;
-    property ID_CUENTA_ESPECIALIsNull : Boolean read GetID_CUENTA_ESPECIALIsNull write SetID_CUENTA_ESPECIALIsNull;
-    property OldID_CUENTA_ESPECIAL : Integer read GetOldID_CUENTA_ESPECIALValue;
-    property OldID_CUENTA_ESPECIALIsNull : Boolean read GetOldID_CUENTA_ESPECIALIsNull;
-    property CUENTA_ESPECIAL : String read GetCUENTA_ESPECIALValue write SetCUENTA_ESPECIALValue;
-    property CUENTA_ESPECIALIsNull : Boolean read GetCUENTA_ESPECIALIsNull write SetCUENTA_ESPECIALIsNull;
-    property OldCUENTA_ESPECIAL : String read GetOldCUENTA_ESPECIALValue;
-    property OldCUENTA_ESPECIALIsNull : Boolean read GetOldCUENTA_ESPECIALIsNull;
-
-  public
-    constructor Create(aBusinessProcessor: TDABusinessProcessor); override;
-    destructor Destroy; override;
-
-  end;
-
-  { ICuentasEspecialesDelta }
-  ICuentasEspecialesDelta = interface(ICuentasEspeciales)
-  ['{9C5919F3-A43F-4AC6-8110-E867F70C0CDE}']
-    { Property getters and setters }
-    function GetOldIDValue : Integer;
-    function GetOldREFERENCIAValue : String;
-    function GetOldDESCRIPCIONValue : String;
-
-    { Properties }
-    property OldID : Integer read GetOldIDValue;
-    property OldREFERENCIA : String read GetOldREFERENCIAValue;
-    property OldDESCRIPCION : String read GetOldDESCRIPCIONValue;
-  end;
-
-  { TCuentasEspecialesBusinessProcessorRules }
-  TCuentasEspecialesBusinessProcessorRules = class(TDABusinessProcessorRules, ICuentasEspeciales, ICuentasEspecialesDelta)
-  private
-  protected
-    { Property getters and setters }
-    function GetIDValue: Integer; virtual;
-    function GetIDIsNull: Boolean; virtual;
-    function GetOldIDValue: Integer; virtual;
-    function GetOldIDIsNull: Boolean; virtual;
-    procedure SetIDValue(const aValue: Integer); virtual;
-    procedure SetIDIsNull(const aValue: Boolean); virtual;
-    function GetREFERENCIAValue: String; virtual;
-    function GetREFERENCIAIsNull: Boolean; virtual;
-    function GetOldREFERENCIAValue: String; virtual;
-    function GetOldREFERENCIAIsNull: Boolean; virtual;
-    procedure SetREFERENCIAValue(const aValue: String); virtual;
-    procedure SetREFERENCIAIsNull(const aValue: Boolean); virtual;
-    function GetDESCRIPCIONValue: String; virtual;
-    function GetDESCRIPCIONIsNull: Boolean; virtual;
-    function GetOldDESCRIPCIONValue: String; virtual;
-    function GetOldDESCRIPCIONIsNull: Boolean; virtual;
-    procedure SetDESCRIPCIONValue(const aValue: String); virtual;
-    procedure SetDESCRIPCIONIsNull(const aValue: Boolean); virtual;
-
-    { Properties }
-    property ID : Integer read GetIDValue write SetIDValue;
-    property IDIsNull : Boolean read GetIDIsNull write SetIDIsNull;
-    property OldID : Integer read GetOldIDValue;
-    property OldIDIsNull : Boolean read GetOldIDIsNull;
-    property REFERENCIA : String read GetREFERENCIAValue write SetREFERENCIAValue;
-    property REFERENCIAIsNull : Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull;
-    property OldREFERENCIA : String read GetOldREFERENCIAValue;
-    property OldREFERENCIAIsNull : Boolean read GetOldREFERENCIAIsNull;
-    property DESCRIPCION : String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
-    property DESCRIPCIONIsNull : Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull;
-    property OldDESCRIPCION : String read GetOldDESCRIPCIONValue;
-    property OldDESCRIPCIONIsNull : Boolean read GetOldDESCRIPCIONIsNull;
-
-  public
-    constructor Create(aBusinessProcessor: TDABusinessProcessor); override;
-    destructor Destroy; override;
-
-  end;
-
-  { IEpigrafesDelta }
-  IEpigrafesDelta = interface(IEpigrafes)
-  ['{67FB0522-F1EC-47E8-B459-172539CFF79B}']
-    { Property getters and setters }
-    function GetOldIDValue : Integer;
-    function GetOldREF_EPIGRAFEValue : String;
-    function GetOldDESCRIPCIONValue : String;
-    function GetOldID_EJERCICIOValue : Integer;
-    function GetOldID_PADREValue : Integer;
-    function GetOldEPIGRAFE_PADREValue : String;
-
-    { Properties }
-    property OldID : Integer read GetOldIDValue;
-    property OldREF_EPIGRAFE : String read GetOldREF_EPIGRAFEValue;
-    property OldDESCRIPCION : String read GetOldDESCRIPCIONValue;
-    property OldID_EJERCICIO : Integer read GetOldID_EJERCICIOValue;
-    property OldID_PADRE : Integer read GetOldID_PADREValue;
-    property OldEPIGRAFE_PADRE : String read GetOldEPIGRAFE_PADREValue;
-  end;
-
-  { TEpigrafesBusinessProcessorRules }
-  TEpigrafesBusinessProcessorRules = class(TDABusinessProcessorRules, IEpigrafes, IEpigrafesDelta)
-  private
-  protected
-    { Property getters and setters }
-    function GetIDValue: Integer; virtual;
-    function GetIDIsNull: Boolean; virtual;
-    function GetOldIDValue: Integer; virtual;
-    function GetOldIDIsNull: Boolean; virtual;
-    procedure SetIDValue(const aValue: Integer); virtual;
-    procedure SetIDIsNull(const aValue: Boolean); virtual;
-    function GetREF_EPIGRAFEValue: String; virtual;
-    function GetREF_EPIGRAFEIsNull: Boolean; virtual;
-    function GetOldREF_EPIGRAFEValue: String; virtual;
-    function GetOldREF_EPIGRAFEIsNull: Boolean; virtual;
-    procedure SetREF_EPIGRAFEValue(const aValue: String); virtual;
-    procedure SetREF_EPIGRAFEIsNull(const aValue: Boolean); virtual;
-    function GetDESCRIPCIONValue: String; virtual;
-    function GetDESCRIPCIONIsNull: Boolean; virtual;
-    function GetOldDESCRIPCIONValue: String; virtual;
-    function GetOldDESCRIPCIONIsNull: Boolean; virtual;
-    procedure SetDESCRIPCIONValue(const aValue: String); virtual;
-    procedure SetDESCRIPCIONIsNull(const aValue: Boolean); virtual;
-    function GetID_EJERCICIOValue: Integer; virtual;
-    function GetID_EJERCICIOIsNull: Boolean; virtual;
-    function GetOldID_EJERCICIOValue: Integer; virtual;
-    function GetOldID_EJERCICIOIsNull: Boolean; virtual;
-    procedure SetID_EJERCICIOValue(const aValue: Integer); virtual;
-    procedure SetID_EJERCICIOIsNull(const aValue: Boolean); virtual;
-    function GetID_PADREValue: Integer; virtual;
-    function GetID_PADREIsNull: Boolean; virtual;
-    function GetOldID_PADREValue: Integer; virtual;
-    function GetOldID_PADREIsNull: Boolean; virtual;
-    procedure SetID_PADREValue(const aValue: Integer); virtual;
-    procedure SetID_PADREIsNull(const aValue: Boolean); virtual;
-    function GetEPIGRAFE_PADREValue: String; virtual;
-    function GetEPIGRAFE_PADREIsNull: Boolean; virtual;
-    function GetOldEPIGRAFE_PADREValue: String; virtual;
-    function GetOldEPIGRAFE_PADREIsNull: Boolean; virtual;
-    procedure SetEPIGRAFE_PADREValue(const aValue: String); virtual;
-    procedure SetEPIGRAFE_PADREIsNull(const aValue: Boolean); virtual;
-
-    { Properties }
-    property ID : Integer read GetIDValue write SetIDValue;
-    property IDIsNull : Boolean read GetIDIsNull write SetIDIsNull;
-    property OldID : Integer read GetOldIDValue;
-    property OldIDIsNull : Boolean read GetOldIDIsNull;
-    property REF_EPIGRAFE : String read GetREF_EPIGRAFEValue write SetREF_EPIGRAFEValue;
-    property REF_EPIGRAFEIsNull : Boolean read GetREF_EPIGRAFEIsNull write SetREF_EPIGRAFEIsNull;
-    property OldREF_EPIGRAFE : String read GetOldREF_EPIGRAFEValue;
-    property OldREF_EPIGRAFEIsNull : Boolean read GetOldREF_EPIGRAFEIsNull;
-    property DESCRIPCION : String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
-    property DESCRIPCIONIsNull : Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull;
-    property OldDESCRIPCION : String read GetOldDESCRIPCIONValue;
-    property OldDESCRIPCIONIsNull : Boolean read GetOldDESCRIPCIONIsNull;
-    property ID_EJERCICIO : Integer read GetID_EJERCICIOValue write SetID_EJERCICIOValue;
-    property ID_EJERCICIOIsNull : Boolean read GetID_EJERCICIOIsNull write SetID_EJERCICIOIsNull;
-    property OldID_EJERCICIO : Integer read GetOldID_EJERCICIOValue;
-    property OldID_EJERCICIOIsNull : Boolean read GetOldID_EJERCICIOIsNull;
-    property ID_PADRE : Integer read GetID_PADREValue write SetID_PADREValue;
-    property ID_PADREIsNull : Boolean read GetID_PADREIsNull write SetID_PADREIsNull;
-    property OldID_PADRE : Integer read GetOldID_PADREValue;
-    property OldID_PADREIsNull : Boolean read GetOldID_PADREIsNull;
-    property EPIGRAFE_PADRE : String read GetEPIGRAFE_PADREValue write SetEPIGRAFE_PADREValue;
-    property EPIGRAFE_PADREIsNull : Boolean read GetEPIGRAFE_PADREIsNull write SetEPIGRAFE_PADREIsNull;
-    property OldEPIGRAFE_PADRE : String read GetOldEPIGRAFE_PADREValue;
-    property OldEPIGRAFE_PADREIsNull : Boolean read GetOldEPIGRAFE_PADREIsNull;
-
-  public
-    constructor Create(aBusinessProcessor: TDABusinessProcessor); override;
-    destructor Destroy; override;
-
-  end;
-
-  { IBalancesDelta }
-  IBalancesDelta = interface(IBalances)
-  ['{E9EE47C8-0762-4259-BDC9-7CF3EEF83D9E}']
-    { Property getters and setters }
-    function GetOldIDValue : Integer;
-    function GetOldREF_BALANCEValue : String;
-    function GetOldNATURALEZAValue : String;
-    function GetOldNIVEL1Value : String;
-    function GetOldDESCRIPCION1Value : String;
-    function GetOldNIVEL2Value : String;
-    function GetOldDESCRIPCION2Value : String;
-    function GetOldNIVEL3Value : String;
-    function GetOldDESCRIPCION3Value : String;
-
-    { Properties }
-    property OldID : Integer read GetOldIDValue;
-    property OldREF_BALANCE : String read GetOldREF_BALANCEValue;
-    property OldNATURALEZA : String read GetOldNATURALEZAValue;
-    property OldNIVEL1 : String read GetOldNIVEL1Value;
-    property OldDESCRIPCION1 : String read GetOldDESCRIPCION1Value;
-    property OldNIVEL2 : String read GetOldNIVEL2Value;
-    property OldDESCRIPCION2 : String read GetOldDESCRIPCION2Value;
-    property OldNIVEL3 : String read GetOldNIVEL3Value;
-    property OldDESCRIPCION3 : String read GetOldDESCRIPCION3Value;
-  end;
-
-  { TBalancesBusinessProcessorRules }
-  TBalancesBusinessProcessorRules = class(TDABusinessProcessorRules, IBalances, IBalancesDelta)
-  private
-  protected
-    { Property getters and setters }
-    function GetIDValue: Integer; virtual;
-    function GetIDIsNull: Boolean; virtual;
-    function GetOldIDValue: Integer; virtual;
-    function GetOldIDIsNull: Boolean; virtual;
-    procedure SetIDValue(const aValue: Integer); virtual;
-    procedure SetIDIsNull(const aValue: Boolean); virtual;
-    function GetREF_BALANCEValue: String; virtual;
-    function GetREF_BALANCEIsNull: Boolean; virtual;
-    function GetOldREF_BALANCEValue: String; virtual;
-    function GetOldREF_BALANCEIsNull: Boolean; virtual;
-    procedure SetREF_BALANCEValue(const aValue: String); virtual;
-    procedure SetREF_BALANCEIsNull(const aValue: Boolean); virtual;
-    function GetNATURALEZAValue: String; virtual;
-    function GetNATURALEZAIsNull: Boolean; virtual;
-    function GetOldNATURALEZAValue: String; virtual;
-    function GetOldNATURALEZAIsNull: Boolean; virtual;
-    procedure SetNATURALEZAValue(const aValue: String); virtual;
-    procedure SetNATURALEZAIsNull(const aValue: Boolean); virtual;
-    function GetNIVEL1Value: String; virtual;
-    function GetNIVEL1IsNull: Boolean; virtual;
-    function GetOldNIVEL1Value: String; virtual;
-    function GetOldNIVEL1IsNull: Boolean; virtual;
-    procedure SetNIVEL1Value(const aValue: String); virtual;
-    procedure SetNIVEL1IsNull(const aValue: Boolean); virtual;
-    function GetDESCRIPCION1Value: String; virtual;
-    function GetDESCRIPCION1IsNull: Boolean; virtual;
-    function GetOldDESCRIPCION1Value: String; virtual;
-    function GetOldDESCRIPCION1IsNull: Boolean; virtual;
-    procedure SetDESCRIPCION1Value(const aValue: String); virtual;
-    procedure SetDESCRIPCION1IsNull(const aValue: Boolean); virtual;
-    function GetNIVEL2Value: String; virtual;
-    function GetNIVEL2IsNull: Boolean; virtual;
-    function GetOldNIVEL2Value: String; virtual;
-    function GetOldNIVEL2IsNull: Boolean; virtual;
-    procedure SetNIVEL2Value(const aValue: String); virtual;
-    procedure SetNIVEL2IsNull(const aValue: Boolean); virtual;
-    function GetDESCRIPCION2Value: String; virtual;
-    function GetDESCRIPCION2IsNull: Boolean; virtual;
-    function GetOldDESCRIPCION2Value: String; virtual;
-    function GetOldDESCRIPCION2IsNull: Boolean; virtual;
-    procedure SetDESCRIPCION2Value(const aValue: String); virtual;
-    procedure SetDESCRIPCION2IsNull(const aValue: Boolean); virtual;
-    function GetNIVEL3Value: String; virtual;
-    function GetNIVEL3IsNull: Boolean; virtual;
-    function GetOldNIVEL3Value: String; virtual;
-    function GetOldNIVEL3IsNull: Boolean; virtual;
-    procedure SetNIVEL3Value(const aValue: String); virtual;
-    procedure SetNIVEL3IsNull(const aValue: Boolean); virtual;
-    function GetDESCRIPCION3Value: String; virtual;
-    function GetDESCRIPCION3IsNull: Boolean; virtual;
-    function GetOldDESCRIPCION3Value: String; virtual;
-    function GetOldDESCRIPCION3IsNull: Boolean; virtual;
-    procedure SetDESCRIPCION3Value(const aValue: String); virtual;
-    procedure SetDESCRIPCION3IsNull(const aValue: Boolean); virtual;
-
-    { Properties }
-    property ID : Integer read GetIDValue write SetIDValue;
-    property IDIsNull : Boolean read GetIDIsNull write SetIDIsNull;
-    property OldID : Integer read GetOldIDValue;
-    property OldIDIsNull : Boolean read GetOldIDIsNull;
-    property REF_BALANCE : String read GetREF_BALANCEValue write SetREF_BALANCEValue;
-    property REF_BALANCEIsNull : Boolean read GetREF_BALANCEIsNull write SetREF_BALANCEIsNull;
-    property OldREF_BALANCE : String read GetOldREF_BALANCEValue;
-    property OldREF_BALANCEIsNull : Boolean read GetOldREF_BALANCEIsNull;
-    property NATURALEZA : String read GetNATURALEZAValue write SetNATURALEZAValue;
-    property NATURALEZAIsNull : Boolean read GetNATURALEZAIsNull write SetNATURALEZAIsNull;
-    property OldNATURALEZA : String read GetOldNATURALEZAValue;
-    property OldNATURALEZAIsNull : Boolean read GetOldNATURALEZAIsNull;
-    property NIVEL1 : String read GetNIVEL1Value write SetNIVEL1Value;
-    property NIVEL1IsNull : Boolean read GetNIVEL1IsNull write SetNIVEL1IsNull;
-    property OldNIVEL1 : String read GetOldNIVEL1Value;
-    property OldNIVEL1IsNull : Boolean read GetOldNIVEL1IsNull;
-    property DESCRIPCION1 : String read GetDESCRIPCION1Value write SetDESCRIPCION1Value;
-    property DESCRIPCION1IsNull : Boolean read GetDESCRIPCION1IsNull write SetDESCRIPCION1IsNull;
-    property OldDESCRIPCION1 : String read GetOldDESCRIPCION1Value;
-    property OldDESCRIPCION1IsNull : Boolean read GetOldDESCRIPCION1IsNull;
-    property NIVEL2 : String read GetNIVEL2Value write SetNIVEL2Value;
-    property NIVEL2IsNull : Boolean read GetNIVEL2IsNull write SetNIVEL2IsNull;
-    property OldNIVEL2 : String read GetOldNIVEL2Value;
-    property OldNIVEL2IsNull : Boolean read GetOldNIVEL2IsNull;
-    property DESCRIPCION2 : String read GetDESCRIPCION2Value write SetDESCRIPCION2Value;
-    property DESCRIPCION2IsNull : Boolean read GetDESCRIPCION2IsNull write SetDESCRIPCION2IsNull;
-    property OldDESCRIPCION2 : String read GetOldDESCRIPCION2Value;
-    property OldDESCRIPCION2IsNull : Boolean read GetOldDESCRIPCION2IsNull;
-    property NIVEL3 : String read GetNIVEL3Value write SetNIVEL3Value;
-    property NIVEL3IsNull : Boolean read GetNIVEL3IsNull write SetNIVEL3IsNull;
-    property OldNIVEL3 : String read GetOldNIVEL3Value;
-    property OldNIVEL3IsNull : Boolean read GetOldNIVEL3IsNull;
-    property DESCRIPCION3 : String read GetDESCRIPCION3Value write SetDESCRIPCION3Value;
-    property DESCRIPCION3IsNull : Boolean read GetDESCRIPCION3IsNull write SetDESCRIPCION3IsNull;
-    property OldDESCRIPCION3 : String read GetOldDESCRIPCION3Value;
-    property OldDESCRIPCION3IsNull : Boolean read GetOldDESCRIPCION3IsNull;
-
-  public
-    constructor Create(aBusinessProcessor: TDABusinessProcessor); override;
-    destructor Destroy; override;
-
-  end;
-
-implementation
-
-uses
-  Variants, uROBinaryHelpers, uDAInterfaces;
-
-{ TDiarioBusinessProcessorRules }
-constructor TDiarioBusinessProcessorRules.Create(aBusinessProcessor: TDABusinessProcessor);
-begin
-  inherited;
-end;
-
-destructor TDiarioBusinessProcessorRules.Destroy;
-begin
-  inherited;
-end;
-
-function TDiarioBusinessProcessorRules.GetID_APUNTEValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioID_APUNTE];
-end;
-
-function TDiarioBusinessProcessorRules.GetID_APUNTEIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioID_APUNTE]);
-end;
-
-function TDiarioBusinessProcessorRules.GetOldID_APUNTEValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_DiarioID_APUNTE];
-end;
-
-function TDiarioBusinessProcessorRules.GetOldID_APUNTEIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DiarioID_APUNTE]);
-end;
-
-procedure TDiarioBusinessProcessorRules.SetID_APUNTEValue(const aValue: Integer);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioID_APUNTE] := aValue;
-end;
-
-procedure TDiarioBusinessProcessorRules.SetID_APUNTEIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioID_APUNTE] := Null;
-end;
-
-function TDiarioBusinessProcessorRules.GetID_ASIENTOValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioID_ASIENTO];
-end;
-
-function TDiarioBusinessProcessorRules.GetID_ASIENTOIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioID_ASIENTO]);
-end;
-
-function TDiarioBusinessProcessorRules.GetOldID_ASIENTOValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_DiarioID_ASIENTO];
-end;
-
-function TDiarioBusinessProcessorRules.GetOldID_ASIENTOIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DiarioID_ASIENTO]);
-end;
-
-procedure TDiarioBusinessProcessorRules.SetID_ASIENTOValue(const aValue: Integer);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioID_ASIENTO] := aValue;
-end;
-
-procedure TDiarioBusinessProcessorRules.SetID_ASIENTOIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioID_ASIENTO] := Null;
-end;
-
-function TDiarioBusinessProcessorRules.GetID_FACTURAValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioID_FACTURA];
-end;
-
-function TDiarioBusinessProcessorRules.GetID_FACTURAIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioID_FACTURA]);
-end;
-
-function TDiarioBusinessProcessorRules.GetOldID_FACTURAValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_DiarioID_FACTURA];
-end;
-
-function TDiarioBusinessProcessorRules.GetOldID_FACTURAIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DiarioID_FACTURA]);
-end;
-
-procedure TDiarioBusinessProcessorRules.SetID_FACTURAValue(const aValue: Integer);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioID_FACTURA] := aValue;
-end;
-
-procedure TDiarioBusinessProcessorRules.SetID_FACTURAIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioID_FACTURA] := Null;
-end;
-
-function TDiarioBusinessProcessorRules.GetID_PAGOValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioID_PAGO];
-end;
-
-function TDiarioBusinessProcessorRules.GetID_PAGOIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioID_PAGO]);
-end;
-
-function TDiarioBusinessProcessorRules.GetOldID_PAGOValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_DiarioID_PAGO];
-end;
-
-function TDiarioBusinessProcessorRules.GetOldID_PAGOIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DiarioID_PAGO]);
-end;
-
-procedure TDiarioBusinessProcessorRules.SetID_PAGOValue(const aValue: Integer);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioID_PAGO] := aValue;
-end;
-
-procedure TDiarioBusinessProcessorRules.SetID_PAGOIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioID_PAGO] := Null;
-end;
-
-function TDiarioBusinessProcessorRules.GetORDEN_ASIENTOValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioORDEN_ASIENTO];
-end;
-
-function TDiarioBusinessProcessorRules.GetORDEN_ASIENTOIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioORDEN_ASIENTO]);
-end;
-
-function TDiarioBusinessProcessorRules.GetOldORDEN_ASIENTOValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_DiarioORDEN_ASIENTO];
-end;
-
-function TDiarioBusinessProcessorRules.GetOldORDEN_ASIENTOIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DiarioORDEN_ASIENTO]);
-end;
-
-procedure TDiarioBusinessProcessorRules.SetORDEN_ASIENTOValue(const aValue: Integer);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioORDEN_ASIENTO] := aValue;
-end;
-
-procedure TDiarioBusinessProcessorRules.SetORDEN_ASIENTOIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioORDEN_ASIENTO] := Null;
-end;
-
-function TDiarioBusinessProcessorRules.GetFECHA_ASIENTOValue: DateTime;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioFECHA_ASIENTO];
-end;
-
-function TDiarioBusinessProcessorRules.GetFECHA_ASIENTOIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioFECHA_ASIENTO]);
-end;
-
-function TDiarioBusinessProcessorRules.GetOldFECHA_ASIENTOValue: DateTime;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_DiarioFECHA_ASIENTO];
-end;
-
-function TDiarioBusinessProcessorRules.GetOldFECHA_ASIENTOIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DiarioFECHA_ASIENTO]);
-end;
-
-procedure TDiarioBusinessProcessorRules.SetFECHA_ASIENTOValue(const aValue: DateTime);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioFECHA_ASIENTO] := aValue;
-end;
-
-procedure TDiarioBusinessProcessorRules.SetFECHA_ASIENTOIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioFECHA_ASIENTO] := Null;
-end;
-
-function TDiarioBusinessProcessorRules.GetID_SUBCUENTAValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioID_SUBCUENTA];
-end;
-
-function TDiarioBusinessProcessorRules.GetID_SUBCUENTAIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioID_SUBCUENTA]);
-end;
-
-function TDiarioBusinessProcessorRules.GetOldID_SUBCUENTAValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_DiarioID_SUBCUENTA];
-end;
-
-function TDiarioBusinessProcessorRules.GetOldID_SUBCUENTAIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DiarioID_SUBCUENTA]);
-end;
-
-procedure TDiarioBusinessProcessorRules.SetID_SUBCUENTAValue(const aValue: Integer);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioID_SUBCUENTA] := aValue;
-end;
-
-procedure TDiarioBusinessProcessorRules.SetID_SUBCUENTAIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioID_SUBCUENTA] := Null;
-end;
-
-function TDiarioBusinessProcessorRules.GetREF_SUBCUENTAValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioREF_SUBCUENTA];
-end;
-
-function TDiarioBusinessProcessorRules.GetREF_SUBCUENTAIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioREF_SUBCUENTA]);
-end;
-
-function TDiarioBusinessProcessorRules.GetOldREF_SUBCUENTAValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_DiarioREF_SUBCUENTA];
-end;
-
-function TDiarioBusinessProcessorRules.GetOldREF_SUBCUENTAIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DiarioREF_SUBCUENTA]);
-end;
-
-procedure TDiarioBusinessProcessorRules.SetREF_SUBCUENTAValue(const aValue: String);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioREF_SUBCUENTA] := aValue;
-end;
-
-procedure TDiarioBusinessProcessorRules.SetREF_SUBCUENTAIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioREF_SUBCUENTA] := Null;
-end;
-
-function TDiarioBusinessProcessorRules.GetID_EJERCICIOValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioID_EJERCICIO];
-end;
-
-function TDiarioBusinessProcessorRules.GetID_EJERCICIOIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioID_EJERCICIO]);
-end;
-
-function TDiarioBusinessProcessorRules.GetOldID_EJERCICIOValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_DiarioID_EJERCICIO];
-end;
-
-function TDiarioBusinessProcessorRules.GetOldID_EJERCICIOIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DiarioID_EJERCICIO]);
-end;
-
-procedure TDiarioBusinessProcessorRules.SetID_EJERCICIOValue(const aValue: Integer);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioID_EJERCICIO] := aValue;
-end;
-
-procedure TDiarioBusinessProcessorRules.SetID_EJERCICIOIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioID_EJERCICIO] := Null;
-end;
-
-function TDiarioBusinessProcessorRules.GetCONCEPTOValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioCONCEPTO];
-end;
-
-function TDiarioBusinessProcessorRules.GetCONCEPTOIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioCONCEPTO]);
-end;
-
-function TDiarioBusinessProcessorRules.GetOldCONCEPTOValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_DiarioCONCEPTO];
-end;
-
-function TDiarioBusinessProcessorRules.GetOldCONCEPTOIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DiarioCONCEPTO]);
-end;
-
-procedure TDiarioBusinessProcessorRules.SetCONCEPTOValue(const aValue: String);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioCONCEPTO] := aValue;
-end;
-
-procedure TDiarioBusinessProcessorRules.SetCONCEPTOIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioCONCEPTO] := Null;
-end;
-
-function TDiarioBusinessProcessorRules.GetDOCUMENTOValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioDOCUMENTO];
-end;
-
-function TDiarioBusinessProcessorRules.GetDOCUMENTOIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioDOCUMENTO]);
-end;
-
-function TDiarioBusinessProcessorRules.GetOldDOCUMENTOValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_DiarioDOCUMENTO];
-end;
-
-function TDiarioBusinessProcessorRules.GetOldDOCUMENTOIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DiarioDOCUMENTO]);
-end;
-
-procedure TDiarioBusinessProcessorRules.SetDOCUMENTOValue(const aValue: String);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioDOCUMENTO] := aValue;
-end;
-
-procedure TDiarioBusinessProcessorRules.SetDOCUMENTOIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioDOCUMENTO] := Null;
-end;
-
-function TDiarioBusinessProcessorRules.GetDEBEValue: Currency;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioDEBE];
-end;
-
-function TDiarioBusinessProcessorRules.GetDEBEIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioDEBE]);
-end;
-
-function TDiarioBusinessProcessorRules.GetOldDEBEValue: Currency;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_DiarioDEBE];
-end;
-
-function TDiarioBusinessProcessorRules.GetOldDEBEIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DiarioDEBE]);
-end;
-
-procedure TDiarioBusinessProcessorRules.SetDEBEValue(const aValue: Currency);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioDEBE] := aValue;
-end;
-
-procedure TDiarioBusinessProcessorRules.SetDEBEIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioDEBE] := Null;
-end;
-
-function TDiarioBusinessProcessorRules.GetHABERValue: Currency;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioHABER];
-end;
-
-function TDiarioBusinessProcessorRules.GetHABERIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioHABER]);
-end;
-
-function TDiarioBusinessProcessorRules.GetOldHABERValue: Currency;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_DiarioHABER];
-end;
-
-function TDiarioBusinessProcessorRules.GetOldHABERIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DiarioHABER]);
-end;
-
-procedure TDiarioBusinessProcessorRules.SetHABERValue(const aValue: Currency);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioHABER] := aValue;
-end;
-
-procedure TDiarioBusinessProcessorRules.SetHABERIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioHABER] := Null;
-end;
-
-function TDiarioBusinessProcessorRules.GetPUNTEADOValue: SmallInt;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioPUNTEADO];
-end;
-
-function TDiarioBusinessProcessorRules.GetPUNTEADOIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioPUNTEADO]);
-end;
-
-function TDiarioBusinessProcessorRules.GetOldPUNTEADOValue: SmallInt;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_DiarioPUNTEADO];
-end;
-
-function TDiarioBusinessProcessorRules.GetOldPUNTEADOIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DiarioPUNTEADO]);
-end;
-
-procedure TDiarioBusinessProcessorRules.SetPUNTEADOValue(const aValue: SmallInt);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioPUNTEADO] := aValue;
-end;
-
-procedure TDiarioBusinessProcessorRules.SetPUNTEADOIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_DiarioPUNTEADO] := Null;
-end;
-
-
-{ TApuntesBusinessProcessorRules }
-constructor TApuntesBusinessProcessorRules.Create(aBusinessProcessor: TDABusinessProcessor);
-begin
-  inherited;
-end;
-
-destructor TApuntesBusinessProcessorRules.Destroy;
-begin
-  inherited;
-end;
-
-function TApuntesBusinessProcessorRules.GetIDValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesID];
-end;
-
-function TApuntesBusinessProcessorRules.GetIDIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesID]);
-end;
-
-function TApuntesBusinessProcessorRules.GetOldIDValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_ApuntesID];
-end;
-
-function TApuntesBusinessProcessorRules.GetOldIDIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_ApuntesID]);
-end;
-
-procedure TApuntesBusinessProcessorRules.SetIDValue(const aValue: Integer);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesID] := aValue;
-end;
-
-procedure TApuntesBusinessProcessorRules.SetIDIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesID] := Null;
-end;
-
-function TApuntesBusinessProcessorRules.GetID_ASIENTOValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesID_ASIENTO];
-end;
-
-function TApuntesBusinessProcessorRules.GetID_ASIENTOIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesID_ASIENTO]);
-end;
-
-function TApuntesBusinessProcessorRules.GetOldID_ASIENTOValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_ApuntesID_ASIENTO];
-end;
-
-function TApuntesBusinessProcessorRules.GetOldID_ASIENTOIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_ApuntesID_ASIENTO]);
-end;
-
-procedure TApuntesBusinessProcessorRules.SetID_ASIENTOValue(const aValue: Integer);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesID_ASIENTO] := aValue;
-end;
-
-procedure TApuntesBusinessProcessorRules.SetID_ASIENTOIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesID_ASIENTO] := Null;
-end;
-
-function TApuntesBusinessProcessorRules.GetID_SUBCUENTAValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesID_SUBCUENTA];
-end;
-
-function TApuntesBusinessProcessorRules.GetID_SUBCUENTAIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesID_SUBCUENTA]);
-end;
-
-function TApuntesBusinessProcessorRules.GetOldID_SUBCUENTAValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_ApuntesID_SUBCUENTA];
-end;
-
-function TApuntesBusinessProcessorRules.GetOldID_SUBCUENTAIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_ApuntesID_SUBCUENTA]);
-end;
-
-procedure TApuntesBusinessProcessorRules.SetID_SUBCUENTAValue(const aValue: Integer);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesID_SUBCUENTA] := aValue;
-end;
-
-procedure TApuntesBusinessProcessorRules.SetID_SUBCUENTAIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesID_SUBCUENTA] := Null;
-end;
-
-function TApuntesBusinessProcessorRules.GetNUM_ORDENValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesNUM_ORDEN];
-end;
-
-function TApuntesBusinessProcessorRules.GetNUM_ORDENIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesNUM_ORDEN]);
-end;
-
-function TApuntesBusinessProcessorRules.GetOldNUM_ORDENValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_ApuntesNUM_ORDEN];
-end;
-
-function TApuntesBusinessProcessorRules.GetOldNUM_ORDENIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_ApuntesNUM_ORDEN]);
-end;
-
-procedure TApuntesBusinessProcessorRules.SetNUM_ORDENValue(const aValue: Integer);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesNUM_ORDEN] := aValue;
-end;
-
-procedure TApuntesBusinessProcessorRules.SetNUM_ORDENIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesNUM_ORDEN] := Null;
-end;
-
-function TApuntesBusinessProcessorRules.GetREF_SUBCUENTAValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesREF_SUBCUENTA];
-end;
-
-function TApuntesBusinessProcessorRules.GetREF_SUBCUENTAIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesREF_SUBCUENTA]);
-end;
-
-function TApuntesBusinessProcessorRules.GetOldREF_SUBCUENTAValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_ApuntesREF_SUBCUENTA];
-end;
-
-function TApuntesBusinessProcessorRules.GetOldREF_SUBCUENTAIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_ApuntesREF_SUBCUENTA]);
-end;
-
-procedure TApuntesBusinessProcessorRules.SetREF_SUBCUENTAValue(const aValue: String);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesREF_SUBCUENTA] := aValue;
-end;
-
-procedure TApuntesBusinessProcessorRules.SetREF_SUBCUENTAIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesREF_SUBCUENTA] := Null;
-end;
-
-function TApuntesBusinessProcessorRules.GetSUBCUENTAValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesSUBCUENTA];
-end;
-
-function TApuntesBusinessProcessorRules.GetSUBCUENTAIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesSUBCUENTA]);
-end;
-
-function TApuntesBusinessProcessorRules.GetOldSUBCUENTAValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_ApuntesSUBCUENTA];
-end;
-
-function TApuntesBusinessProcessorRules.GetOldSUBCUENTAIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_ApuntesSUBCUENTA]);
-end;
-
-procedure TApuntesBusinessProcessorRules.SetSUBCUENTAValue(const aValue: String);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesSUBCUENTA] := aValue;
-end;
-
-procedure TApuntesBusinessProcessorRules.SetSUBCUENTAIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesSUBCUENTA] := Null;
-end;
-
-function TApuntesBusinessProcessorRules.GetCONCEPTOValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesCONCEPTO];
-end;
-
-function TApuntesBusinessProcessorRules.GetCONCEPTOIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesCONCEPTO]);
-end;
-
-function TApuntesBusinessProcessorRules.GetOldCONCEPTOValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_ApuntesCONCEPTO];
-end;
-
-function TApuntesBusinessProcessorRules.GetOldCONCEPTOIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_ApuntesCONCEPTO]);
-end;
-
-procedure TApuntesBusinessProcessorRules.SetCONCEPTOValue(const aValue: String);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesCONCEPTO] := aValue;
-end;
-
-procedure TApuntesBusinessProcessorRules.SetCONCEPTOIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesCONCEPTO] := Null;
-end;
-
-function TApuntesBusinessProcessorRules.GetDOCUMENTOValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesDOCUMENTO];
-end;
-
-function TApuntesBusinessProcessorRules.GetDOCUMENTOIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesDOCUMENTO]);
-end;
-
-function TApuntesBusinessProcessorRules.GetOldDOCUMENTOValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_ApuntesDOCUMENTO];
-end;
-
-function TApuntesBusinessProcessorRules.GetOldDOCUMENTOIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_ApuntesDOCUMENTO]);
-end;
-
-procedure TApuntesBusinessProcessorRules.SetDOCUMENTOValue(const aValue: String);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesDOCUMENTO] := aValue;
-end;
-
-procedure TApuntesBusinessProcessorRules.SetDOCUMENTOIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesDOCUMENTO] := Null;
-end;
-
-function TApuntesBusinessProcessorRules.GetDEBEValue: Currency;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesDEBE];
-end;
-
-function TApuntesBusinessProcessorRules.GetDEBEIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesDEBE]);
-end;
-
-function TApuntesBusinessProcessorRules.GetOldDEBEValue: Currency;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_ApuntesDEBE];
-end;
-
-function TApuntesBusinessProcessorRules.GetOldDEBEIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_ApuntesDEBE]);
-end;
-
-procedure TApuntesBusinessProcessorRules.SetDEBEValue(const aValue: Currency);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesDEBE] := aValue;
-end;
-
-procedure TApuntesBusinessProcessorRules.SetDEBEIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesDEBE] := Null;
-end;
-
-function TApuntesBusinessProcessorRules.GetHABERValue: Currency;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesHABER];
-end;
-
-function TApuntesBusinessProcessorRules.GetHABERIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesHABER]);
-end;
-
-function TApuntesBusinessProcessorRules.GetOldHABERValue: Currency;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_ApuntesHABER];
-end;
-
-function TApuntesBusinessProcessorRules.GetOldHABERIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_ApuntesHABER]);
-end;
-
-procedure TApuntesBusinessProcessorRules.SetHABERValue(const aValue: Currency);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesHABER] := aValue;
-end;
-
-procedure TApuntesBusinessProcessorRules.SetHABERIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesHABER] := Null;
-end;
-
-function TApuntesBusinessProcessorRules.GetPUNTEADOValue: SmallInt;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesPUNTEADO];
-end;
-
-function TApuntesBusinessProcessorRules.GetPUNTEADOIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesPUNTEADO]);
-end;
-
-function TApuntesBusinessProcessorRules.GetOldPUNTEADOValue: SmallInt;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_ApuntesPUNTEADO];
-end;
-
-function TApuntesBusinessProcessorRules.GetOldPUNTEADOIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_ApuntesPUNTEADO]);
-end;
-
-procedure TApuntesBusinessProcessorRules.SetPUNTEADOValue(const aValue: SmallInt);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesPUNTEADO] := aValue;
-end;
-
-procedure TApuntesBusinessProcessorRules.SetPUNTEADOIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_ApuntesPUNTEADO] := Null;
-end;
-
-
-{ TAsientosBusinessProcessorRules }
-constructor TAsientosBusinessProcessorRules.Create(aBusinessProcessor: TDABusinessProcessor);
-begin
-  inherited;
-end;
-
-destructor TAsientosBusinessProcessorRules.Destroy;
-begin
-  inherited;
-end;
-
-function TAsientosBusinessProcessorRules.GetIDValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosID];
-end;
-
-function TAsientosBusinessProcessorRules.GetIDIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosID]);
-end;
-
-function TAsientosBusinessProcessorRules.GetOldIDValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_AsientosID];
-end;
-
-function TAsientosBusinessProcessorRules.GetOldIDIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_AsientosID]);
-end;
-
-procedure TAsientosBusinessProcessorRules.SetIDValue(const aValue: Integer);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosID] := aValue;
-end;
-
-procedure TAsientosBusinessProcessorRules.SetIDIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosID] := Null;
-end;
-
-function TAsientosBusinessProcessorRules.GetFECHA_ASIENTOValue: DateTime;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosFECHA_ASIENTO];
-end;
-
-function TAsientosBusinessProcessorRules.GetFECHA_ASIENTOIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosFECHA_ASIENTO]);
-end;
-
-function TAsientosBusinessProcessorRules.GetOldFECHA_ASIENTOValue: DateTime;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_AsientosFECHA_ASIENTO];
-end;
-
-function TAsientosBusinessProcessorRules.GetOldFECHA_ASIENTOIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_AsientosFECHA_ASIENTO]);
-end;
-
-procedure TAsientosBusinessProcessorRules.SetFECHA_ASIENTOValue(const aValue: DateTime);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosFECHA_ASIENTO] := aValue;
-end;
-
-procedure TAsientosBusinessProcessorRules.SetFECHA_ASIENTOIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosFECHA_ASIENTO] := Null;
-end;
-
-function TAsientosBusinessProcessorRules.GetORDENValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosORDEN];
-end;
-
-function TAsientosBusinessProcessorRules.GetORDENIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosORDEN]);
-end;
-
-function TAsientosBusinessProcessorRules.GetOldORDENValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_AsientosORDEN];
-end;
-
-function TAsientosBusinessProcessorRules.GetOldORDENIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_AsientosORDEN]);
-end;
-
-procedure TAsientosBusinessProcessorRules.SetORDENValue(const aValue: Integer);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosORDEN] := aValue;
-end;
-
-procedure TAsientosBusinessProcessorRules.SetORDENIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosORDEN] := Null;
-end;
-
-function TAsientosBusinessProcessorRules.GetID_FACTURAValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosID_FACTURA];
-end;
-
-function TAsientosBusinessProcessorRules.GetID_FACTURAIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosID_FACTURA]);
-end;
-
-function TAsientosBusinessProcessorRules.GetOldID_FACTURAValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_AsientosID_FACTURA];
-end;
-
-function TAsientosBusinessProcessorRules.GetOldID_FACTURAIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_AsientosID_FACTURA]);
-end;
-
-procedure TAsientosBusinessProcessorRules.SetID_FACTURAValue(const aValue: Integer);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosID_FACTURA] := aValue;
-end;
-
-procedure TAsientosBusinessProcessorRules.SetID_FACTURAIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosID_FACTURA] := Null;
-end;
-
-function TAsientosBusinessProcessorRules.GetID_RECIBOValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosID_RECIBO];
-end;
-
-function TAsientosBusinessProcessorRules.GetID_RECIBOIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosID_RECIBO]);
-end;
-
-function TAsientosBusinessProcessorRules.GetOldID_RECIBOValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_AsientosID_RECIBO];
-end;
-
-function TAsientosBusinessProcessorRules.GetOldID_RECIBOIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_AsientosID_RECIBO]);
-end;
-
-procedure TAsientosBusinessProcessorRules.SetID_RECIBOValue(const aValue: Integer);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosID_RECIBO] := aValue;
-end;
-
-procedure TAsientosBusinessProcessorRules.SetID_RECIBOIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosID_RECIBO] := Null;
-end;
-
-
-{ TSubCuentasBusinessProcessorRules }
-constructor TSubCuentasBusinessProcessorRules.Create(aBusinessProcessor: TDABusinessProcessor);
-begin
-  inherited;
-end;
-
-destructor TSubCuentasBusinessProcessorRules.Destroy;
-begin
-  inherited;
-end;
-
-function TSubCuentasBusinessProcessorRules.GetIDValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasID];
-end;
-
-function TSubCuentasBusinessProcessorRules.GetIDIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasID]);
-end;
-
-function TSubCuentasBusinessProcessorRules.GetOldIDValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_SubCuentasID];
-end;
-
-function TSubCuentasBusinessProcessorRules.GetOldIDIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_SubCuentasID]);
-end;
-
-procedure TSubCuentasBusinessProcessorRules.SetIDValue(const aValue: Integer);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasID] := aValue;
-end;
-
-procedure TSubCuentasBusinessProcessorRules.SetIDIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasID] := Null;
-end;
-
-function TSubCuentasBusinessProcessorRules.GetREF_SUBCUENTAValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasREF_SUBCUENTA];
-end;
-
-function TSubCuentasBusinessProcessorRules.GetREF_SUBCUENTAIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasREF_SUBCUENTA]);
-end;
-
-function TSubCuentasBusinessProcessorRules.GetOldREF_SUBCUENTAValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_SubCuentasREF_SUBCUENTA];
-end;
-
-function TSubCuentasBusinessProcessorRules.GetOldREF_SUBCUENTAIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_SubCuentasREF_SUBCUENTA]);
-end;
-
-procedure TSubCuentasBusinessProcessorRules.SetREF_SUBCUENTAValue(const aValue: String);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasREF_SUBCUENTA] := aValue;
-end;
-
-procedure TSubCuentasBusinessProcessorRules.SetREF_SUBCUENTAIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasREF_SUBCUENTA] := Null;
-end;
-
-function TSubCuentasBusinessProcessorRules.GetDESCRIPCIONValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasDESCRIPCION];
-end;
-
-function TSubCuentasBusinessProcessorRules.GetDESCRIPCIONIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasDESCRIPCION]);
-end;
-
-function TSubCuentasBusinessProcessorRules.GetOldDESCRIPCIONValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_SubCuentasDESCRIPCION];
-end;
-
-function TSubCuentasBusinessProcessorRules.GetOldDESCRIPCIONIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_SubCuentasDESCRIPCION]);
-end;
-
-procedure TSubCuentasBusinessProcessorRules.SetDESCRIPCIONValue(const aValue: String);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasDESCRIPCION] := aValue;
-end;
-
-procedure TSubCuentasBusinessProcessorRules.SetDESCRIPCIONIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasDESCRIPCION] := Null;
-end;
-
-function TSubCuentasBusinessProcessorRules.GetID_EJERCICIOValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasID_EJERCICIO];
-end;
-
-function TSubCuentasBusinessProcessorRules.GetID_EJERCICIOIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasID_EJERCICIO]);
-end;
-
-function TSubCuentasBusinessProcessorRules.GetOldID_EJERCICIOValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_SubCuentasID_EJERCICIO];
-end;
-
-function TSubCuentasBusinessProcessorRules.GetOldID_EJERCICIOIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_SubCuentasID_EJERCICIO]);
-end;
-
-procedure TSubCuentasBusinessProcessorRules.SetID_EJERCICIOValue(const aValue: Integer);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasID_EJERCICIO] := aValue;
-end;
-
-procedure TSubCuentasBusinessProcessorRules.SetID_EJERCICIOIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasID_EJERCICIO] := Null;
-end;
-
-function TSubCuentasBusinessProcessorRules.GetID_CONTACTOValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasID_CONTACTO];
-end;
-
-function TSubCuentasBusinessProcessorRules.GetID_CONTACTOIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasID_CONTACTO]);
-end;
-
-function TSubCuentasBusinessProcessorRules.GetOldID_CONTACTOValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_SubCuentasID_CONTACTO];
-end;
-
-function TSubCuentasBusinessProcessorRules.GetOldID_CONTACTOIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_SubCuentasID_CONTACTO]);
-end;
-
-procedure TSubCuentasBusinessProcessorRules.SetID_CONTACTOValue(const aValue: Integer);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasID_CONTACTO] := aValue;
-end;
-
-procedure TSubCuentasBusinessProcessorRules.SetID_CONTACTOIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasID_CONTACTO] := Null;
-end;
-
-function TSubCuentasBusinessProcessorRules.GetID_CUENTAValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasID_CUENTA];
-end;
-
-function TSubCuentasBusinessProcessorRules.GetID_CUENTAIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasID_CUENTA]);
-end;
-
-function TSubCuentasBusinessProcessorRules.GetOldID_CUENTAValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_SubCuentasID_CUENTA];
-end;
-
-function TSubCuentasBusinessProcessorRules.GetOldID_CUENTAIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_SubCuentasID_CUENTA]);
-end;
-
-procedure TSubCuentasBusinessProcessorRules.SetID_CUENTAValue(const aValue: Integer);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasID_CUENTA] := aValue;
-end;
-
-procedure TSubCuentasBusinessProcessorRules.SetID_CUENTAIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasID_CUENTA] := Null;
-end;
-
-function TSubCuentasBusinessProcessorRules.GetREF_CUENTAValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasREF_CUENTA];
-end;
-
-function TSubCuentasBusinessProcessorRules.GetREF_CUENTAIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasREF_CUENTA]);
-end;
-
-function TSubCuentasBusinessProcessorRules.GetOldREF_CUENTAValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_SubCuentasREF_CUENTA];
-end;
-
-function TSubCuentasBusinessProcessorRules.GetOldREF_CUENTAIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_SubCuentasREF_CUENTA]);
-end;
-
-procedure TSubCuentasBusinessProcessorRules.SetREF_CUENTAValue(const aValue: String);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasREF_CUENTA] := aValue;
-end;
-
-procedure TSubCuentasBusinessProcessorRules.SetREF_CUENTAIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasREF_CUENTA] := Null;
-end;
-
-function TSubCuentasBusinessProcessorRules.GetCUENTAValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasCUENTA];
-end;
-
-function TSubCuentasBusinessProcessorRules.GetCUENTAIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasCUENTA]);
-end;
-
-function TSubCuentasBusinessProcessorRules.GetOldCUENTAValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_SubCuentasCUENTA];
-end;
-
-function TSubCuentasBusinessProcessorRules.GetOldCUENTAIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_SubCuentasCUENTA]);
-end;
-
-procedure TSubCuentasBusinessProcessorRules.SetCUENTAValue(const aValue: String);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasCUENTA] := aValue;
-end;
-
-procedure TSubCuentasBusinessProcessorRules.SetCUENTAIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasCUENTA] := Null;
-end;
-
-function TSubCuentasBusinessProcessorRules.GetDEBEValue: Currency;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasDEBE];
-end;
-
-function TSubCuentasBusinessProcessorRules.GetDEBEIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasDEBE]);
-end;
-
-function TSubCuentasBusinessProcessorRules.GetOldDEBEValue: Currency;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_SubCuentasDEBE];
-end;
-
-function TSubCuentasBusinessProcessorRules.GetOldDEBEIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_SubCuentasDEBE]);
-end;
-
-procedure TSubCuentasBusinessProcessorRules.SetDEBEValue(const aValue: Currency);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasDEBE] := aValue;
-end;
-
-procedure TSubCuentasBusinessProcessorRules.SetDEBEIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasDEBE] := Null;
-end;
-
-function TSubCuentasBusinessProcessorRules.GetHABERValue: Currency;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasHABER];
-end;
-
-function TSubCuentasBusinessProcessorRules.GetHABERIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasHABER]);
-end;
-
-function TSubCuentasBusinessProcessorRules.GetOldHABERValue: Currency;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_SubCuentasHABER];
-end;
-
-function TSubCuentasBusinessProcessorRules.GetOldHABERIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_SubCuentasHABER]);
-end;
-
-procedure TSubCuentasBusinessProcessorRules.SetHABERValue(const aValue: Currency);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasHABER] := aValue;
-end;
-
-procedure TSubCuentasBusinessProcessorRules.SetHABERIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasHABER] := Null;
-end;
-
-function TSubCuentasBusinessProcessorRules.GetSALDOValue: Currency;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasSALDO];
-end;
-
-function TSubCuentasBusinessProcessorRules.GetSALDOIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasSALDO]);
-end;
-
-function TSubCuentasBusinessProcessorRules.GetOldSALDOValue: Currency;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_SubCuentasSALDO];
-end;
-
-function TSubCuentasBusinessProcessorRules.GetOldSALDOIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_SubCuentasSALDO]);
-end;
-
-procedure TSubCuentasBusinessProcessorRules.SetSALDOValue(const aValue: Currency);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasSALDO] := aValue;
-end;
-
-procedure TSubCuentasBusinessProcessorRules.SetSALDOIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_SubCuentasSALDO] := Null;
-end;
-
-
-{ TCuentasBusinessProcessorRules }
-constructor TCuentasBusinessProcessorRules.Create(aBusinessProcessor: TDABusinessProcessor);
-begin
-  inherited;
-end;
-
-destructor TCuentasBusinessProcessorRules.Destroy;
-begin
-  inherited;
-end;
-
-function TCuentasBusinessProcessorRules.GetIDValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasID];
-end;
-
-function TCuentasBusinessProcessorRules.GetIDIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasID]);
-end;
-
-function TCuentasBusinessProcessorRules.GetOldIDValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_CuentasID];
-end;
-
-function TCuentasBusinessProcessorRules.GetOldIDIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_CuentasID]);
-end;
-
-procedure TCuentasBusinessProcessorRules.SetIDValue(const aValue: Integer);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasID] := aValue;
-end;
-
-procedure TCuentasBusinessProcessorRules.SetIDIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasID] := Null;
-end;
-
-function TCuentasBusinessProcessorRules.GetREF_CUENTAValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasREF_CUENTA];
-end;
-
-function TCuentasBusinessProcessorRules.GetREF_CUENTAIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasREF_CUENTA]);
-end;
-
-function TCuentasBusinessProcessorRules.GetOldREF_CUENTAValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_CuentasREF_CUENTA];
-end;
-
-function TCuentasBusinessProcessorRules.GetOldREF_CUENTAIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_CuentasREF_CUENTA]);
-end;
-
-procedure TCuentasBusinessProcessorRules.SetREF_CUENTAValue(const aValue: String);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasREF_CUENTA] := aValue;
-end;
-
-procedure TCuentasBusinessProcessorRules.SetREF_CUENTAIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasREF_CUENTA] := Null;
-end;
-
-function TCuentasBusinessProcessorRules.GetID_EJERCICIOValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasID_EJERCICIO];
-end;
-
-function TCuentasBusinessProcessorRules.GetID_EJERCICIOIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasID_EJERCICIO]);
-end;
-
-function TCuentasBusinessProcessorRules.GetOldID_EJERCICIOValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_CuentasID_EJERCICIO];
-end;
-
-function TCuentasBusinessProcessorRules.GetOldID_EJERCICIOIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_CuentasID_EJERCICIO]);
-end;
-
-procedure TCuentasBusinessProcessorRules.SetID_EJERCICIOValue(const aValue: Integer);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasID_EJERCICIO] := aValue;
-end;
-
-procedure TCuentasBusinessProcessorRules.SetID_EJERCICIOIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasID_EJERCICIO] := Null;
-end;
-
-function TCuentasBusinessProcessorRules.GetDESCRIPCIONValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasDESCRIPCION];
-end;
-
-function TCuentasBusinessProcessorRules.GetDESCRIPCIONIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasDESCRIPCION]);
-end;
-
-function TCuentasBusinessProcessorRules.GetOldDESCRIPCIONValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_CuentasDESCRIPCION];
-end;
-
-function TCuentasBusinessProcessorRules.GetOldDESCRIPCIONIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_CuentasDESCRIPCION]);
-end;
-
-procedure TCuentasBusinessProcessorRules.SetDESCRIPCIONValue(const aValue: String);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasDESCRIPCION] := aValue;
-end;
-
-procedure TCuentasBusinessProcessorRules.SetDESCRIPCIONIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasDESCRIPCION] := Null;
-end;
-
-function TCuentasBusinessProcessorRules.GetID_EPIGRAFEValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasID_EPIGRAFE];
-end;
-
-function TCuentasBusinessProcessorRules.GetID_EPIGRAFEIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasID_EPIGRAFE]);
-end;
-
-function TCuentasBusinessProcessorRules.GetOldID_EPIGRAFEValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_CuentasID_EPIGRAFE];
-end;
-
-function TCuentasBusinessProcessorRules.GetOldID_EPIGRAFEIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_CuentasID_EPIGRAFE]);
-end;
-
-procedure TCuentasBusinessProcessorRules.SetID_EPIGRAFEValue(const aValue: Integer);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasID_EPIGRAFE] := aValue;
-end;
-
-procedure TCuentasBusinessProcessorRules.SetID_EPIGRAFEIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasID_EPIGRAFE] := Null;
-end;
-
-function TCuentasBusinessProcessorRules.GetEPIGRAFEValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasEPIGRAFE];
-end;
-
-function TCuentasBusinessProcessorRules.GetEPIGRAFEIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasEPIGRAFE]);
-end;
-
-function TCuentasBusinessProcessorRules.GetOldEPIGRAFEValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_CuentasEPIGRAFE];
-end;
-
-function TCuentasBusinessProcessorRules.GetOldEPIGRAFEIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_CuentasEPIGRAFE]);
-end;
-
-procedure TCuentasBusinessProcessorRules.SetEPIGRAFEValue(const aValue: String);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasEPIGRAFE] := aValue;
-end;
-
-procedure TCuentasBusinessProcessorRules.SetEPIGRAFEIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasEPIGRAFE] := Null;
-end;
-
-function TCuentasBusinessProcessorRules.GetID_BALANCEValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasID_BALANCE];
-end;
-
-function TCuentasBusinessProcessorRules.GetID_BALANCEIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasID_BALANCE]);
-end;
-
-function TCuentasBusinessProcessorRules.GetOldID_BALANCEValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_CuentasID_BALANCE];
-end;
-
-function TCuentasBusinessProcessorRules.GetOldID_BALANCEIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_CuentasID_BALANCE]);
-end;
-
-procedure TCuentasBusinessProcessorRules.SetID_BALANCEValue(const aValue: Integer);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasID_BALANCE] := aValue;
-end;
-
-procedure TCuentasBusinessProcessorRules.SetID_BALANCEIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasID_BALANCE] := Null;
-end;
-
-function TCuentasBusinessProcessorRules.GetBALANCEValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasBALANCE];
-end;
-
-function TCuentasBusinessProcessorRules.GetBALANCEIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasBALANCE]);
-end;
-
-function TCuentasBusinessProcessorRules.GetOldBALANCEValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_CuentasBALANCE];
-end;
-
-function TCuentasBusinessProcessorRules.GetOldBALANCEIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_CuentasBALANCE]);
-end;
-
-procedure TCuentasBusinessProcessorRules.SetBALANCEValue(const aValue: String);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasBALANCE] := aValue;
-end;
-
-procedure TCuentasBusinessProcessorRules.SetBALANCEIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasBALANCE] := Null;
-end;
-
-function TCuentasBusinessProcessorRules.GetID_CUENTA_ESPECIALValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasID_CUENTA_ESPECIAL];
-end;
-
-function TCuentasBusinessProcessorRules.GetID_CUENTA_ESPECIALIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasID_CUENTA_ESPECIAL]);
-end;
-
-function TCuentasBusinessProcessorRules.GetOldID_CUENTA_ESPECIALValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_CuentasID_CUENTA_ESPECIAL];
-end;
-
-function TCuentasBusinessProcessorRules.GetOldID_CUENTA_ESPECIALIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_CuentasID_CUENTA_ESPECIAL]);
-end;
-
-procedure TCuentasBusinessProcessorRules.SetID_CUENTA_ESPECIALValue(const aValue: Integer);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasID_CUENTA_ESPECIAL] := aValue;
-end;
-
-procedure TCuentasBusinessProcessorRules.SetID_CUENTA_ESPECIALIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasID_CUENTA_ESPECIAL] := Null;
-end;
-
-function TCuentasBusinessProcessorRules.GetCUENTA_ESPECIALValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasCUENTA_ESPECIAL];
-end;
-
-function TCuentasBusinessProcessorRules.GetCUENTA_ESPECIALIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasCUENTA_ESPECIAL]);
-end;
-
-function TCuentasBusinessProcessorRules.GetOldCUENTA_ESPECIALValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_CuentasCUENTA_ESPECIAL];
-end;
-
-function TCuentasBusinessProcessorRules.GetOldCUENTA_ESPECIALIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_CuentasCUENTA_ESPECIAL]);
-end;
-
-procedure TCuentasBusinessProcessorRules.SetCUENTA_ESPECIALValue(const aValue: String);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasCUENTA_ESPECIAL] := aValue;
-end;
-
-procedure TCuentasBusinessProcessorRules.SetCUENTA_ESPECIALIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasCUENTA_ESPECIAL] := Null;
-end;
-
-
-{ TCuentasEspecialesBusinessProcessorRules }
-constructor TCuentasEspecialesBusinessProcessorRules.Create(aBusinessProcessor: TDABusinessProcessor);
-begin
-  inherited;
-end;
-
-destructor TCuentasEspecialesBusinessProcessorRules.Destroy;
-begin
-  inherited;
-end;
-
-function TCuentasEspecialesBusinessProcessorRules.GetIDValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasEspecialesID];
-end;
-
-function TCuentasEspecialesBusinessProcessorRules.GetIDIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasEspecialesID]);
-end;
-
-function TCuentasEspecialesBusinessProcessorRules.GetOldIDValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_CuentasEspecialesID];
-end;
-
-function TCuentasEspecialesBusinessProcessorRules.GetOldIDIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_CuentasEspecialesID]);
-end;
-
-procedure TCuentasEspecialesBusinessProcessorRules.SetIDValue(const aValue: Integer);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasEspecialesID] := aValue;
-end;
-
-procedure TCuentasEspecialesBusinessProcessorRules.SetIDIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasEspecialesID] := Null;
-end;
-
-function TCuentasEspecialesBusinessProcessorRules.GetREFERENCIAValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasEspecialesREFERENCIA];
-end;
-
-function TCuentasEspecialesBusinessProcessorRules.GetREFERENCIAIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasEspecialesREFERENCIA]);
-end;
-
-function TCuentasEspecialesBusinessProcessorRules.GetOldREFERENCIAValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_CuentasEspecialesREFERENCIA];
-end;
-
-function TCuentasEspecialesBusinessProcessorRules.GetOldREFERENCIAIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_CuentasEspecialesREFERENCIA]);
-end;
-
-procedure TCuentasEspecialesBusinessProcessorRules.SetREFERENCIAValue(const aValue: String);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasEspecialesREFERENCIA] := aValue;
-end;
-
-procedure TCuentasEspecialesBusinessProcessorRules.SetREFERENCIAIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasEspecialesREFERENCIA] := Null;
-end;
-
-function TCuentasEspecialesBusinessProcessorRules.GetDESCRIPCIONValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasEspecialesDESCRIPCION];
-end;
-
-function TCuentasEspecialesBusinessProcessorRules.GetDESCRIPCIONIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasEspecialesDESCRIPCION]);
-end;
-
-function TCuentasEspecialesBusinessProcessorRules.GetOldDESCRIPCIONValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_CuentasEspecialesDESCRIPCION];
-end;
-
-function TCuentasEspecialesBusinessProcessorRules.GetOldDESCRIPCIONIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_CuentasEspecialesDESCRIPCION]);
-end;
-
-procedure TCuentasEspecialesBusinessProcessorRules.SetDESCRIPCIONValue(const aValue: String);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasEspecialesDESCRIPCION] := aValue;
-end;
-
-procedure TCuentasEspecialesBusinessProcessorRules.SetDESCRIPCIONIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasEspecialesDESCRIPCION] := Null;
-end;
-
-
-{ TEpigrafesBusinessProcessorRules }
-constructor TEpigrafesBusinessProcessorRules.Create(aBusinessProcessor: TDABusinessProcessor);
-begin
-  inherited;
-end;
-
-destructor TEpigrafesBusinessProcessorRules.Destroy;
-begin
-  inherited;
-end;
-
-function TEpigrafesBusinessProcessorRules.GetIDValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_EpigrafesID];
-end;
-
-function TEpigrafesBusinessProcessorRules.GetIDIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_EpigrafesID]);
-end;
-
-function TEpigrafesBusinessProcessorRules.GetOldIDValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_EpigrafesID];
-end;
-
-function TEpigrafesBusinessProcessorRules.GetOldIDIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_EpigrafesID]);
-end;
-
-procedure TEpigrafesBusinessProcessorRules.SetIDValue(const aValue: Integer);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_EpigrafesID] := aValue;
-end;
-
-procedure TEpigrafesBusinessProcessorRules.SetIDIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_EpigrafesID] := Null;
-end;
-
-function TEpigrafesBusinessProcessorRules.GetREF_EPIGRAFEValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_EpigrafesREF_EPIGRAFE];
-end;
-
-function TEpigrafesBusinessProcessorRules.GetREF_EPIGRAFEIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_EpigrafesREF_EPIGRAFE]);
-end;
-
-function TEpigrafesBusinessProcessorRules.GetOldREF_EPIGRAFEValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_EpigrafesREF_EPIGRAFE];
-end;
-
-function TEpigrafesBusinessProcessorRules.GetOldREF_EPIGRAFEIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_EpigrafesREF_EPIGRAFE]);
-end;
-
-procedure TEpigrafesBusinessProcessorRules.SetREF_EPIGRAFEValue(const aValue: String);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_EpigrafesREF_EPIGRAFE] := aValue;
-end;
-
-procedure TEpigrafesBusinessProcessorRules.SetREF_EPIGRAFEIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_EpigrafesREF_EPIGRAFE] := Null;
-end;
-
-function TEpigrafesBusinessProcessorRules.GetDESCRIPCIONValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_EpigrafesDESCRIPCION];
-end;
-
-function TEpigrafesBusinessProcessorRules.GetDESCRIPCIONIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_EpigrafesDESCRIPCION]);
-end;
-
-function TEpigrafesBusinessProcessorRules.GetOldDESCRIPCIONValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_EpigrafesDESCRIPCION];
-end;
-
-function TEpigrafesBusinessProcessorRules.GetOldDESCRIPCIONIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_EpigrafesDESCRIPCION]);
-end;
-
-procedure TEpigrafesBusinessProcessorRules.SetDESCRIPCIONValue(const aValue: String);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_EpigrafesDESCRIPCION] := aValue;
-end;
-
-procedure TEpigrafesBusinessProcessorRules.SetDESCRIPCIONIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_EpigrafesDESCRIPCION] := Null;
-end;
-
-function TEpigrafesBusinessProcessorRules.GetID_EJERCICIOValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_EpigrafesID_EJERCICIO];
-end;
-
-function TEpigrafesBusinessProcessorRules.GetID_EJERCICIOIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_EpigrafesID_EJERCICIO]);
-end;
-
-function TEpigrafesBusinessProcessorRules.GetOldID_EJERCICIOValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_EpigrafesID_EJERCICIO];
-end;
-
-function TEpigrafesBusinessProcessorRules.GetOldID_EJERCICIOIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_EpigrafesID_EJERCICIO]);
-end;
-
-procedure TEpigrafesBusinessProcessorRules.SetID_EJERCICIOValue(const aValue: Integer);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_EpigrafesID_EJERCICIO] := aValue;
-end;
-
-procedure TEpigrafesBusinessProcessorRules.SetID_EJERCICIOIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_EpigrafesID_EJERCICIO] := Null;
-end;
-
-function TEpigrafesBusinessProcessorRules.GetID_PADREValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_EpigrafesID_PADRE];
-end;
-
-function TEpigrafesBusinessProcessorRules.GetID_PADREIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_EpigrafesID_PADRE]);
-end;
-
-function TEpigrafesBusinessProcessorRules.GetOldID_PADREValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_EpigrafesID_PADRE];
-end;
-
-function TEpigrafesBusinessProcessorRules.GetOldID_PADREIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_EpigrafesID_PADRE]);
-end;
-
-procedure TEpigrafesBusinessProcessorRules.SetID_PADREValue(const aValue: Integer);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_EpigrafesID_PADRE] := aValue;
-end;
-
-procedure TEpigrafesBusinessProcessorRules.SetID_PADREIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_EpigrafesID_PADRE] := Null;
-end;
-
-function TEpigrafesBusinessProcessorRules.GetEPIGRAFE_PADREValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_EpigrafesEPIGRAFE_PADRE];
-end;
-
-function TEpigrafesBusinessProcessorRules.GetEPIGRAFE_PADREIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_EpigrafesEPIGRAFE_PADRE]);
-end;
-
-function TEpigrafesBusinessProcessorRules.GetOldEPIGRAFE_PADREValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_EpigrafesEPIGRAFE_PADRE];
-end;
-
-function TEpigrafesBusinessProcessorRules.GetOldEPIGRAFE_PADREIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_EpigrafesEPIGRAFE_PADRE]);
-end;
-
-procedure TEpigrafesBusinessProcessorRules.SetEPIGRAFE_PADREValue(const aValue: String);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_EpigrafesEPIGRAFE_PADRE] := aValue;
-end;
-
-procedure TEpigrafesBusinessProcessorRules.SetEPIGRAFE_PADREIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_EpigrafesEPIGRAFE_PADRE] := Null;
-end;
-
-
-{ TBalancesBusinessProcessorRules }
-constructor TBalancesBusinessProcessorRules.Create(aBusinessProcessor: TDABusinessProcessor);
-begin
-  inherited;
-end;
-
-destructor TBalancesBusinessProcessorRules.Destroy;
-begin
-  inherited;
-end;
-
-function TBalancesBusinessProcessorRules.GetIDValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_BalancesID];
-end;
-
-function TBalancesBusinessProcessorRules.GetIDIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_BalancesID]);
-end;
-
-function TBalancesBusinessProcessorRules.GetOldIDValue: Integer;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_BalancesID];
-end;
-
-function TBalancesBusinessProcessorRules.GetOldIDIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_BalancesID]);
-end;
-
-procedure TBalancesBusinessProcessorRules.SetIDValue(const aValue: Integer);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_BalancesID] := aValue;
-end;
-
-procedure TBalancesBusinessProcessorRules.SetIDIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_BalancesID] := Null;
-end;
-
-function TBalancesBusinessProcessorRules.GetREF_BALANCEValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_BalancesREF_BALANCE];
-end;
-
-function TBalancesBusinessProcessorRules.GetREF_BALANCEIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_BalancesREF_BALANCE]);
-end;
-
-function TBalancesBusinessProcessorRules.GetOldREF_BALANCEValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_BalancesREF_BALANCE];
-end;
-
-function TBalancesBusinessProcessorRules.GetOldREF_BALANCEIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_BalancesREF_BALANCE]);
-end;
-
-procedure TBalancesBusinessProcessorRules.SetREF_BALANCEValue(const aValue: String);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_BalancesREF_BALANCE] := aValue;
-end;
-
-procedure TBalancesBusinessProcessorRules.SetREF_BALANCEIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_BalancesREF_BALANCE] := Null;
-end;
-
-function TBalancesBusinessProcessorRules.GetNATURALEZAValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_BalancesNATURALEZA];
-end;
-
-function TBalancesBusinessProcessorRules.GetNATURALEZAIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_BalancesNATURALEZA]);
-end;
-
-function TBalancesBusinessProcessorRules.GetOldNATURALEZAValue: String;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_BalancesNATURALEZA];
-end;
-
-function TBalancesBusinessProcessorRules.GetOldNATURALEZAIsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_BalancesNATURALEZA]);
-end;
-
-procedure TBalancesBusinessProcessorRules.SetNATURALEZAValue(const aValue: String);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_BalancesNATURALEZA] := aValue;
-end;
-
-procedure TBalancesBusinessProcessorRules.SetNATURALEZAIsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_BalancesNATURALEZA] := Null;
-end;
-
-function TBalancesBusinessProcessorRules.GetNIVEL1Value: String;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_BalancesNIVEL1];
-end;
-
-function TBalancesBusinessProcessorRules.GetNIVEL1IsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_BalancesNIVEL1]);
-end;
-
-function TBalancesBusinessProcessorRules.GetOldNIVEL1Value: String;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_BalancesNIVEL1];
-end;
-
-function TBalancesBusinessProcessorRules.GetOldNIVEL1IsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_BalancesNIVEL1]);
-end;
-
-procedure TBalancesBusinessProcessorRules.SetNIVEL1Value(const aValue: String);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_BalancesNIVEL1] := aValue;
-end;
-
-procedure TBalancesBusinessProcessorRules.SetNIVEL1IsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_BalancesNIVEL1] := Null;
-end;
-
-function TBalancesBusinessProcessorRules.GetDESCRIPCION1Value: String;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_BalancesDESCRIPCION1];
-end;
-
-function TBalancesBusinessProcessorRules.GetDESCRIPCION1IsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_BalancesDESCRIPCION1]);
-end;
-
-function TBalancesBusinessProcessorRules.GetOldDESCRIPCION1Value: String;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_BalancesDESCRIPCION1];
-end;
-
-function TBalancesBusinessProcessorRules.GetOldDESCRIPCION1IsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_BalancesDESCRIPCION1]);
-end;
-
-procedure TBalancesBusinessProcessorRules.SetDESCRIPCION1Value(const aValue: String);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_BalancesDESCRIPCION1] := aValue;
-end;
-
-procedure TBalancesBusinessProcessorRules.SetDESCRIPCION1IsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_BalancesDESCRIPCION1] := Null;
-end;
-
-function TBalancesBusinessProcessorRules.GetNIVEL2Value: String;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_BalancesNIVEL2];
-end;
-
-function TBalancesBusinessProcessorRules.GetNIVEL2IsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_BalancesNIVEL2]);
-end;
-
-function TBalancesBusinessProcessorRules.GetOldNIVEL2Value: String;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_BalancesNIVEL2];
-end;
-
-function TBalancesBusinessProcessorRules.GetOldNIVEL2IsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_BalancesNIVEL2]);
-end;
-
-procedure TBalancesBusinessProcessorRules.SetNIVEL2Value(const aValue: String);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_BalancesNIVEL2] := aValue;
-end;
-
-procedure TBalancesBusinessProcessorRules.SetNIVEL2IsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_BalancesNIVEL2] := Null;
-end;
-
-function TBalancesBusinessProcessorRules.GetDESCRIPCION2Value: String;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_BalancesDESCRIPCION2];
-end;
-
-function TBalancesBusinessProcessorRules.GetDESCRIPCION2IsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_BalancesDESCRIPCION2]);
-end;
-
-function TBalancesBusinessProcessorRules.GetOldDESCRIPCION2Value: String;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_BalancesDESCRIPCION2];
-end;
-
-function TBalancesBusinessProcessorRules.GetOldDESCRIPCION2IsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_BalancesDESCRIPCION2]);
-end;
-
-procedure TBalancesBusinessProcessorRules.SetDESCRIPCION2Value(const aValue: String);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_BalancesDESCRIPCION2] := aValue;
-end;
-
-procedure TBalancesBusinessProcessorRules.SetDESCRIPCION2IsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_BalancesDESCRIPCION2] := Null;
-end;
-
-function TBalancesBusinessProcessorRules.GetNIVEL3Value: String;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_BalancesNIVEL3];
-end;
-
-function TBalancesBusinessProcessorRules.GetNIVEL3IsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_BalancesNIVEL3]);
-end;
-
-function TBalancesBusinessProcessorRules.GetOldNIVEL3Value: String;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_BalancesNIVEL3];
-end;
-
-function TBalancesBusinessProcessorRules.GetOldNIVEL3IsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_BalancesNIVEL3]);
-end;
-
-procedure TBalancesBusinessProcessorRules.SetNIVEL3Value(const aValue: String);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_BalancesNIVEL3] := aValue;
-end;
-
-procedure TBalancesBusinessProcessorRules.SetNIVEL3IsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_BalancesNIVEL3] := Null;
-end;
-
-function TBalancesBusinessProcessorRules.GetDESCRIPCION3Value: String;
-begin
-  result := BusinessProcessor.CurrentChange.NewValueByName[fld_BalancesDESCRIPCION3];
-end;
-
-function TBalancesBusinessProcessorRules.GetDESCRIPCION3IsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_BalancesDESCRIPCION3]);
-end;
-
-function TBalancesBusinessProcessorRules.GetOldDESCRIPCION3Value: String;
-begin
-  result := BusinessProcessor.CurrentChange.OldValueByName[fld_BalancesDESCRIPCION3];
-end;
-
-function TBalancesBusinessProcessorRules.GetOldDESCRIPCION3IsNull: Boolean;
-begin
-  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_BalancesDESCRIPCION3]);
-end;
-
-procedure TBalancesBusinessProcessorRules.SetDESCRIPCION3Value(const aValue: String);
-begin
-  BusinessProcessor.CurrentChange.NewValueByName[fld_BalancesDESCRIPCION3] := aValue;
-end;
-
-procedure TBalancesBusinessProcessorRules.SetDESCRIPCION3IsNull(const aValue: Boolean);
-begin
-  if aValue then
-    BusinessProcessor.CurrentChange.NewValueByName[fld_BalancesDESCRIPCION3] := Null;
-end;
-
-
-initialization
-  RegisterBusinessProcessorRules(RID_DiarioDelta, TDiarioBusinessProcessorRules);
-  RegisterBusinessProcessorRules(RID_ApuntesDelta, TApuntesBusinessProcessorRules);
-  RegisterBusinessProcessorRules(RID_AsientosDelta, TAsientosBusinessProcessorRules);
-  RegisterBusinessProcessorRules(RID_SubCuentasDelta, TSubCuentasBusinessProcessorRules);
-  RegisterBusinessProcessorRules(RID_CuentasDelta, TCuentasBusinessProcessorRules);
-  RegisterBusinessProcessorRules(RID_CuentasEspecialesDelta, TCuentasEspecialesBusinessProcessorRules);
-  RegisterBusinessProcessorRules(RID_EpigrafesDelta, TEpigrafesBusinessProcessorRules);
-  RegisterBusinessProcessorRules(RID_BalancesDelta, TBalancesBusinessProcessorRules);
-
-end.
diff --git a/Source/Modulos/Contactos/Contactos_Group.groupproj b/Source/Modulos/Contactos/Contactos_Group.groupproj
index 83500c78..e28b46b9 100644
--- a/Source/Modulos/Contactos/Contactos_Group.groupproj
+++ b/Source/Modulos/Contactos/Contactos_Group.groupproj
@@ -124,6 +124,15 @@
   <Target Name="Contabilidad_controller:Make">
     <MSBuild Projects="..\Contabilidad\Controller\Contabilidad_controller.dproj" Targets="Make" />
   </Target>
+  <Target Name="Contabilidad_view">
+    <MSBuild Projects="..\Contabilidad\Views\Contabilidad_view.dproj" Targets="" />
+  </Target>
+  <Target Name="Contabilidad_view:Clean">
+    <MSBuild Projects="..\Contabilidad\Views\Contabilidad_view.dproj" Targets="Clean" />
+  </Target>
+  <Target Name="Contabilidad_view:Make">
+    <MSBuild Projects="..\Contabilidad\Views\Contabilidad_view.dproj" Targets="Make" />
+  </Target>
   <Target Name="FactuGES">
     <MSBuild Projects="..\..\Cliente\FactuGES.dproj" Targets="" />
   </Target>
@@ -142,23 +151,14 @@
   <Target Name="FactuGES_Server:Make">
     <MSBuild Projects="..\..\Servidor\FactuGES_Server.dproj" Targets="Make" />
   </Target>
-  <Target Name="Contabilidad_view">
-    <MSBuild Projects="..\Contabilidad\Views\Contabilidad_view.dproj" Targets="" />
-  </Target>
-  <Target Name="Contabilidad_view:Clean">
-    <MSBuild Projects="..\Contabilidad\Views\Contabilidad_view.dproj" Targets="Clean" />
-  </Target>
-  <Target Name="Contabilidad_view:Make">
-    <MSBuild Projects="..\Contabilidad\Views\Contabilidad_view.dproj" Targets="Make" />
-  </Target>
   <Target Name="Build">
-    <CallTarget Targets="Base;GUIBase;ApplicationBase;Contactos_model;Contactos_data;Contactos_controller;Contactos_view;Contactos_plugin;Contabilidad_model;Contabilidad_data;Contabilidad_controller;FactuGES;FactuGES_Server;Contabilidad_view" />
+    <CallTarget Targets="Base;GUIBase;ApplicationBase;Contactos_model;Contactos_data;Contactos_controller;Contactos_view;Contactos_plugin;Contabilidad_model;Contabilidad_data;Contabilidad_controller;Contabilidad_view;FactuGES;FactuGES_Server" />
   </Target>
   <Target Name="Clean">
-    <CallTarget Targets="Base:Clean;GUIBase:Clean;ApplicationBase:Clean;Contactos_model:Clean;Contactos_data:Clean;Contactos_controller:Clean;Contactos_view:Clean;Contactos_plugin:Clean;Contabilidad_model:Clean;Contabilidad_data:Clean;Contabilidad_controller:Clean;FactuGES:Clean;FactuGES_Server:Clean;Contabilidad_view:Clean" />
+    <CallTarget Targets="Base:Clean;GUIBase:Clean;ApplicationBase:Clean;Contactos_model:Clean;Contactos_data:Clean;Contactos_controller:Clean;Contactos_view:Clean;Contactos_plugin:Clean;Contabilidad_model:Clean;Contabilidad_data:Clean;Contabilidad_controller:Clean;Contabilidad_view:Clean;FactuGES:Clean;FactuGES_Server:Clean" />
   </Target>
   <Target Name="Make">
-    <CallTarget Targets="Base:Make;GUIBase:Make;ApplicationBase:Make;Contactos_model:Make;Contactos_data:Make;Contactos_controller:Make;Contactos_view:Make;Contactos_plugin:Make;Contabilidad_model:Make;Contabilidad_data:Make;Contabilidad_controller:Make;FactuGES:Make;FactuGES_Server:Make;Contabilidad_view:Make" />
+    <CallTarget Targets="Base:Make;GUIBase:Make;ApplicationBase:Make;Contactos_model:Make;Contactos_data:Make;Contactos_controller:Make;Contactos_view:Make;Contactos_plugin:Make;Contabilidad_model:Make;Contabilidad_data:Make;Contabilidad_controller:Make;Contabilidad_view:Make;FactuGES:Make;FactuGES_Server:Make" />
   </Target>
   <Import Condition="Exists('$(MSBuildBinPath)\Borland.Group.Targets')" Project="$(MSBuildBinPath)\Borland.Group.Targets" />
 </Project>
\ No newline at end of file
diff --git a/Source/Modulos/Contactos/Views/Contactos_view.dpk b/Source/Modulos/Contactos/Views/Contactos_view.dpk
index daf7eabd8e615244e8ccb0802933752cd1ecf1ff..0437c6a0b13d93698050abb6f96dd8dd12f605d6 100644
GIT binary patch
delta 15
WcmaE%uuFEs2ByskEF3&c3=9A<Wdv^k

delta 448
zcmY*VOHRWu5S6+@2#$c{1F#_C1XTi6O9fQ}Y$JQ@h7`xP>>+Yixl$x{oQPxKd<=9q
z&wiho_jUD6`hL+}U!D`fnMFBH4M@($DWgc2%%P=#MXIeRvLu<<PEj*Xl<O$mi~5Nj
z1)w`6gWp!nQrl+9&7}6vZ=x16><IWfUZJ)w62K495ru`0rks^q+UgHXwL+_9WN@GA
zT1B)|Wq?L2q43vo_qYn%Px-+xT%;IPJh*m*ga<$RZ<^uEaOHl2FjcYv`5MP&Y0SN?
z|2R#GR)(CYY4X;g_)o}@pK?|&>pXjy+q@;j*D{s}2See#;IU}os!~;4jQao#pCRhA
IUz}b107r#=PXGV_

diff --git a/Source/Modulos/Contactos/Views/Contactos_view.dproj b/Source/Modulos/Contactos/Views/Contactos_view.dproj
index 4c3159fd..ed0e1b4b 100644
--- a/Source/Modulos/Contactos/Views/Contactos_view.dproj
+++ b/Source/Modulos/Contactos/Views/Contactos_view.dproj
@@ -49,47 +49,18 @@
     <DelphiCompile Include="Contactos_view.dpk">
       <MainSource>MainSource</MainSource>
     </DelphiCompile>
-    <DCCReference Include="C:\Documents and Settings\Usuario\adortl.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\ApplicationBase.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\Base.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\ccpackD11.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\cfpack_d11.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\Contactos_controller.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\Contactos_model.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\cxDataD10.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\cxEditorsD10.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\cxLibraryD10.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\DataAbstract_Core_D11.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\dbrtl.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\designide.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\dsnap.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\dxComnD10.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\dxLayoutControlD10.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\dxThemeD10.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\FormasPago_controller.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\FormasPago_model.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\GUIBase.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\GUISDK_D11.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\Jcl.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\JclVcl.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\JvAppFrmD11R.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\JvCoreD11R.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\JvCtrlsD11R.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\JvGlobusD11R.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\JvStdCtrlsD11R.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\JvSystemD11R.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\PngComponentsD10.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\PNG_D10.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\RemObjects_Core_D11.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\rtl.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\TiposIVA_controller.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\TiposIVA_model.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\vcl.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\vclactnband.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\vcldb.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\vcljpg.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\vclx.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\xmlrtl.dcp" />
+    <DCCReference Include="..\Controller\ApplicationBase.dcp" />
+    <DCCReference Include="..\Controller\Base.dcp" />
+    <DCCReference Include="..\Controller\Contactos_controller.dcp" />
+    <DCCReference Include="..\Controller\Contactos_model.dcp" />
+    <DCCReference Include="..\Controller\FormasPago_controller.dcp" />
+    <DCCReference Include="..\Controller\FormasPago_model.dcp" />
+    <DCCReference Include="..\Controller\GUIBase.dcp" />
+    <DCCReference Include="..\Controller\JvGlobusD11R.dcp" />
+    <DCCReference Include="..\Controller\rtl.dcp" />
+    <DCCReference Include="..\Controller\TiposIVA_controller.dcp" />
+    <DCCReference Include="..\Controller\TiposIVA_model.dcp" />
+    <DCCReference Include="..\Controller\vcl.dcp" />
     <DCCReference Include="uContactosViewRegister.pas" />
     <DCCReference Include="uEditorCliente.pas">
       <Form>fEditorCliente</Form>
diff --git a/Source/Modulos/Contactos/Views/Contactos_view.res b/Source/Modulos/Contactos/Views/Contactos_view.res
index 1641339fcc482e7e3492d1b45813a86619622c33..8b251f312bcccec5485024f6fe8d80e1cdf25746 100644
GIT binary patch
delta 11
ScmeBCZD5|Duvteife`=|>;pCc

literal 4748
zcmbW5&ub)A5XUPdpe&2#;C*uNAUVhgd+&(4um@dnom`vXF9g}ZuHJ;se=<3UNdFJg
zbCw+UD9j$byGIXV`~6hC>h4S?F|k9X-j90q{Z_qtZ<;nUJCO8!h?<w4U-ol;S2jC7
zx4(byej2@_#)0HWvg0i^wC4Xli+W*aXJ^(njceK|Kb@c3qFNX>p${kR>3GhM`oH*q
zk=UsjOCIgA_4!`B+Gb&`I84R)bT4dy-BQV<-SyFz?R8ILEQ(+JB$u{sEXE@j@B*7W
zT;iZH#|OJ<&DO$RCkM6VbK3(B(k{nbdv1lpc;E$xz9as|v3uE1V{hw2w~g3eD0an7
z{BT%G%irdMe*|oDJmgvJ<ltI;x5J<Oc>aA2`9B<Z5Toyra?r{a4$fnJHGXo6Pmcq8
z{JGCD500t1h4|yI?-f&xoj9;YT&Ch&JLO*X#NC3sCI0Xmc<f_vh`jn-1E!?th$%QM
znzGM|)$vl3f7;nE+9qR}|A?C$H3K&BFdq9?uxrIqHIne#5?8G@da2ybWLGKA686M2
z*LJMMMk4<U`dzFC9}HrSxLfOGll{P#??xir)$c2}C;ql+y-&Wa(LP{PgPk1E1@{uR
zIMCNz;u9;r(axhQvEx%?i#p<Vn=Z!SK%f10?4_`0@RY8lXRM3(t(nFSzJ$4kJr6&x
ze)~B%biu*TY$HDstHD=|UGxJceYiUQQa0Gu(p3og@%ZJ><6Xi*?M~Q;)@Sbfwf3uf
zVaWkbU<NjR3%=~AdoZbkXp`f@b0%GBT^$^V5e(n|#O(?P)hBbF)4n%2cw6U#adPM!
zz(!`V|Bfl{aH0)Y&w;SK7R4<z{p;Gwz1D%l86L3ZFZQ&=pB$<&esXT|OZ?=AGaWoe
z{>jU=;sL{BlYemIZXv%qZ{SZw{-TCU+;!nH6KDDIJumU+9{E0zXW4>7T)y|>$DQlv
zRJe?TjSp{c!DqeayAnSMTtZZT;>LN7J0Rls+5m@q)MbyB*eL%Eu@(+$Cw}Pd@q7N|
z%Q0*AHpCP^b9v`@jx-l_FD>khpW2W8(OU2&V5TrnoAY-m_hlcV?zq3;7{2gF{J#Hc
z6R+o~mVenX?>@W0@_DVzyOFs(5464CY{!q9ChoF#_*eXi@4gFuV8?vhl=_w5$iKL0
zEV0nMBcN08xtRmsgJrqjh@s#|{?*ssnsG)mH*wa6{efF0JFWHok@kA5%b661{B38=
zCcgJ|*ZFTpV$8<-&+AWpa)Q8*`wL&hMeNQ^v6I7$HSdLZhZ^&+6<@Uw_Zsml9^v3W
zVvPDBKHh;i=RU4J_ta3E;)M<P+=2X7;VbzliQZ=IHV#+fr#{!(ukt%UJMS8=332qg
z7jD)rSbpCW+^j*cd6LUEe8#9n&v!NEJM(@?SHvB$=h@|)fjw|&qD?NQ5A&R>n>Y+L
zKLZ0UQ+*km9FO-b?U4gmn-62iwzH6&*duKGo~aUV)bYDla8wWZ9+^7p-F<8lP@i!m
z@vhbD_${F}h>^T;C(?(b*OJDk?{dEXB?nuehoON3HAb!7Mr7-ls!84-5V-jJu<OVP
zzHjp+hnwo*3NQE$JTA(agu~silV5T`du+GJgWGi_7mAy`Nk8fLt~%GF$;XXcE-ri?
zyIglyyzA`K-);4Eem2MZm07RBza@W3UP)d`Rz=RFk-I);`s{$L%yyBNX0OTjo5Gk0
zs}g44uXg*l%xo^{`#0=kd*2?}Cz22Bv2;Gu?;3o~(D#gk1OKYQSCAb$(&vu@_pvWO
z>gbu<_$}mU=Yd9!?TOX;|B-#B)+0x#9q*yqJiqS!`49d=7ztk$O+9=1i;?K_|J<8T
z?0b7=-`Z3A#vV$4XJ5(lQ~TOZHUFdA%oWvK5zg&_IKXIbughQBA8XAsd#=@|TFLXC
zy(^m((;DnQmDQ<zX+PK(Lfu@ox#mOnbZjSDl}IBqv$qwK+2@))5$ba>Katmw!@c`|
G?EMQ&4NnpP

diff --git a/Source/Modulos/Contactos/Views/uViewClientes.pas b/Source/Modulos/Contactos/Views/uViewClientes.pas
index 5fd03fc6ba441e7701fbca5b6ea034958599363c..4ac416b0c4ef97ec9f5b5cebaea1e4ec58395262 100644
GIT binary patch
delta 16
XcmeC>@8{pJgNe~>^A4t~EQ|~QFzf{*

delta 12
TcmeC@@8#dHgK6_lrmHLfAQ=Sg

diff --git a/Source/Modulos/Contactos/Views/uViewContactos.pas b/Source/Modulos/Contactos/Views/uViewContactos.pas
index 14eb0a64d18d176fa338f6d64f953821919ed8d4..c2c77c4fca5f16db15c83d7b97bcf489ff8e15d0 100644
GIT binary patch
delta 16
XcmbOxF+*a*RwhQX&0CogIT;xMF#-hA

delta 12
TcmbOsF->B_R;JC{m=ZYwAddu_

diff --git a/Source/Modulos/Contactos/Views/uViewEmpleados.pas b/Source/Modulos/Contactos/Views/uViewEmpleados.pas
index b244977bba0d37ba32877120681bd63548f51da0..817a9c87d9422f62489862fcd8cd0b4f0532fd63 100644
GIT binary patch
delta 16
YcmZ3(zK(sv6-Gw0%~u$2FfuX#05yIEhX4Qo

delta 12
UcmZ3-zJ`6n6~@h18E-HG03%TaPyhe`

diff --git a/Source/Modulos/Contactos/Views/uViewProveedores.pas b/Source/Modulos/Contactos/Views/uViewProveedores.pas
index a4adcdb494abd71ec8776f1d4810e2847592c67c..0c6235836581b6db3da6894e4aa5db766fe954e1 100644
GIT binary patch
delta 16
Xcmeyu{*8UZHAY6W&DR*^m>3xVJ1YfZ

delta 12
Tcmeyy{)K(RHO9@?8ReJ&C?o|d

diff --git a/Source/Modulos/Facturas de cliente/Views/uViewElegirArticulosFacturasCliente.pas b/Source/Modulos/Facturas de cliente/Views/uViewElegirArticulosFacturasCliente.pas
index da69478e3baf6bc2a9c3658655e48eda37b2f2da..edcb15cf7035bbfeba5d17afe98691802aac3d6d 100644
GIT binary patch
delta 16
XcmbQmF^6M=7!#w}W-%rfCPoGTBccNs

delta 12
TcmbQkF^gk^7}I8PCKe_D7!d;D

diff --git a/Source/Modulos/Facturas de cliente/Views/uViewFacturasCliente.pas b/Source/Modulos/Facturas de cliente/Views/uViewFacturasCliente.pas
index e82183ba213b15dfaecf59e3b1946450981e53a6..a5b526c488af2258b71b77f8888ee5b9a1304109 100644
GIT binary patch
delta 16
Xcmca&dChWz7!#w}W-+FHQj81$GWrC-

delta 12
Tcmca+dBt*r7}I8PrhQTXB5eeT

diff --git a/Source/Modulos/Facturas de proveedor/Views/uViewElegirArticulosFacturasProveedor.pas b/Source/Modulos/Facturas de proveedor/Views/uViewElegirArticulosFacturasProveedor.pas
index cb081c7244426e8e6db0fe86f6b28be1675edb8c..235b297365b99b4093a7f3225bf93f40d4236564 100644
GIT binary patch
delta 16
XcmX>lbw+A~1QVm#W(g)EZbk+GEH4As

delta 12
TcmX>jbxLZ31k+|oCL?YD9uxzh

diff --git a/Source/Modulos/Facturas de proveedor/Views/uViewFacturasProveedor.pas b/Source/Modulos/Facturas de proveedor/Views/uViewFacturasProveedor.pas
index b2a3b6c4bb76ba66cc70c847c0e6a043f44cf664..737d635a3b7735cff4ce50b72d5edb9120ef0778 100644
GIT binary patch
delta 16
Xcmca?b=7Kv1QVm#W(g*1X+{PBF%bkp

delta 12
Tcmca=b=hiz1k+|oCTnQ`A$$Z2

diff --git a/Source/Modulos/Historico de movimientos/Views/uViewHistoricoMovimientos.pas b/Source/Modulos/Historico de movimientos/Views/uViewHistoricoMovimientos.pas
index 32b021465b26f6ce8746b341a0a78b300a7e9882..350b846c1b82aac889ccf2262714d5512e5eed98 100644
GIT binary patch
delta 16
XcmeCzpQyhfn~BkEb2gKTC?f*^Ecyg3

delta 12
TcmbQJ-><(Rn`v_nlZq$+9wh_z

diff --git a/Source/Modulos/Inventario/Views/uViewDetalleReservas.pas b/Source/Modulos/Inventario/Views/uViewDetalleReservas.pas
index abde9497b6f4ed7b4afd09f66523317a63de2319..c1b81e8d2c12f82b8c82a69ee343350d2a571a6e 100644
GIT binary patch
delta 16
XcmZ2zxY%$*8WW@0<}@a2F-8UeFIWU)

delta 12
TcmZ2%xX^Gz8q?-<CTlSOAJGIX

diff --git a/Source/Modulos/Inventario/Views/uViewElegirArticulosCatalogo.pas b/Source/Modulos/Inventario/Views/uViewElegirArticulosCatalogo.pas
index 6ec1d7648c1c4f42a5728b0cea108ae4fc89a6eb..a0eb410a73f7ced68e93d7dc1d92d9ab83e95097 100644
GIT binary patch
delta 16
Xcmeyz-oUYepNY|IGe6UNMn(nzD}4kz

delta 12
TcmZqR_{YA1pJ}rI(|bk$94G_?

diff --git a/Source/Modulos/Inventario/Views/uViewEntradaSalidaArticulos.pas b/Source/Modulos/Inventario/Views/uViewEntradaSalidaArticulos.pas
index 77bb5ccadeb6a47f0401ef4ccc314e565adca291..0df053a37b6022e39a1f6e4053bb85021d3ca33d 100644
GIT binary patch
delta 16
Xcmew=`dxIxDkes=&8wKaIT#rLI=Tg2

delta 12
Tcmew^`c-tpDyGe=nY=jwC)Wig

diff --git a/Source/Modulos/Inventario/Views/uViewInventario.pas b/Source/Modulos/Inventario/Views/uViewInventario.pas
index 4f25be650fe4f0556f5f16812873ca5311054de3..da018d11a54047ff93d7ac19751bb32cf7beb202 100644
GIT binary patch
delta 16
XcmaE){X~01A`_$8=0v7OVMYc3HwXn1

delta 12
TcmaE&{YZO5BGcw1rbb}^B|!w+

diff --git a/Source/Modulos/Pedidos a proveedor/Views/uViewElegirArticulosPedidosProveedor.pas b/Source/Modulos/Pedidos a proveedor/Views/uViewElegirArticulosPedidosProveedor.pas
index 5b1316a3c0c65ec385f804d7ac711d1b061c8159..17fd9fdcc562bd348b66a19ac2eb6b268d69e5f7 100644
GIT binary patch
delta 16
XcmX>jbxvx7I1{7UW^pD{Zbk+GEM^1T

delta 12
TcmX>nbw+A~IMZecCR1(z9y<f2

diff --git a/Source/Modulos/Pedidos a proveedor/Views/uViewPedidosProveedor.pas b/Source/Modulos/Pedidos a proveedor/Views/uViewPedidosProveedor.pas
index dbdd7443..5d1581a4 100644
--- a/Source/Modulos/Pedidos a proveedor/Views/uViewPedidosProveedor.pas	
+++ b/Source/Modulos/Pedidos a proveedor/Views/uViewPedidosProveedor.pas	
@@ -8,7 +8,7 @@ uses
   dxPrnPg, dxBkgnd, dxWrap, dxPrnDev, dxPSCompsProvider, dxPSFillPatterns,
   dxPSEdgePatterns, cxImageComboBox, ImgList, Controls, PngImageList,
   cxGridCustomTableView, cxGridTableView, cxGridDBTableView,
-  cxGridCustomPopupMenu, cxGridPopupMenu, dxPSCore, dxPScxCommon, dxPScxGridLnk,
+  cxGridCustomPopupMenu, cxGridPopupMenu, dxPSCore, dxPScxCommon, dxPScxGrid6Lnk,
   uDADataTable, cxGridLevel, cxClasses, cxControls, cxGridCustomView, Classes,
   cxGrid,
   uBizPedidosProveedor, cxCurrencyEdit, Forms, uViewFiltroBase, ActnList,
@@ -261,3 +261,4 @@ begin
 end;
 
 end.
+
\ No newline at end of file
diff --git a/Source/Modulos/Presupuestos de cliente/Views/uViewElegirArticulosPresupuestosCliente.pas b/Source/Modulos/Presupuestos de cliente/Views/uViewElegirArticulosPresupuestosCliente.pas
index 41b5c72469051a0326b81c59deab8b76c3293f6d..403ad65baede9b776d50eea9552a08fcb882e7cf 100644
GIT binary patch
delta 16
XcmdnPv5#Ye6ceM_W+^5mCPoGTC|U!8

delta 12
TcmdnTv4>-W6w_vDCM6~S8)XAa

diff --git a/Source/Modulos/Presupuestos de cliente/Views/uViewPresupuestosCliente.pas b/Source/Modulos/Presupuestos de cliente/Views/uViewPresupuestosCliente.pas
index aa1e1ace..b1055235 100644
--- a/Source/Modulos/Presupuestos de cliente/Views/uViewPresupuestosCliente.pas	
+++ b/Source/Modulos/Presupuestos de cliente/Views/uViewPresupuestosCliente.pas	
@@ -8,7 +8,7 @@ uses
   dxPrnPg, dxBkgnd, dxWrap, dxPrnDev, dxPSCompsProvider, dxPSFillPatterns,
   dxPSEdgePatterns, cxImageComboBox, ImgList, Controls, PngImageList,
   cxGridCustomTableView, cxGridTableView, cxGridDBTableView,
-  cxGridCustomPopupMenu, cxGridPopupMenu, dxPSCore, dxPScxCommon, dxPScxGridLnk,
+  cxGridCustomPopupMenu, cxGridPopupMenu, dxPSCore, dxPScxCommon, dxPScxGrid6Lnk,
   uDADataTable, cxGridLevel, cxClasses, cxControls, cxGridCustomView, Classes,
   cxGrid,
   uBizPresupuestosCliente, cxCurrencyEdit, Forms, uViewFiltroBase, ActnList, TB2Item,
@@ -275,3 +275,4 @@ begin
 end;
 
 end.
+
\ No newline at end of file
diff --git a/Source/Modulos/Recibos de cliente/Model/Copia de uBizPagosCliente.pas b/Source/Modulos/Recibos de cliente/Model/Copia de uBizPagosCliente.pas
deleted file mode 100644
index 4768809c..00000000
--- a/Source/Modulos/Recibos de cliente/Model/Copia de uBizPagosCliente.pas	
+++ /dev/null
@@ -1,70 +0,0 @@
-{
-===============================================================================
-  Copyright (©) 2007. Rodax Software.
-===============================================================================
-  Los contenidos de este fichero son propiedad de Rodax Software titular del
-  copyright. Este fichero sólo podrá ser copiado, distribuido y utilizado,
-  en su totalidad o en parte, con el permiso escrito de Rodax Software, o de
-  acuerdo con los términos y condiciones establecidas en el acuerdo/contrato
-  bajo el que se suministra.
-  -----------------------------------------------------------------------------
-  Web:  www.rodax-software.com
-===============================================================================
-  Fecha primera versión: 
-  Versión actual: 1.0.0
-  Fecha versión actual: 
-===============================================================================
-  Modificaciones:
-
-    Fecha         Comentarios
-    ---------------------------------------------------------------------------
-===============================================================================
-}
-
-unit uBizPagosCliente;
-
-interface
-
-uses
-  uDAInterfaces, uDADataTable, uDBSelectionListUtils, schRecibosClienteClient_Intf;
-
-const
-  BIZ_CLIENT_IBIZPAGOSCLIENTE = 'Client.IBizPagosCliente';
-
-  CTE_PAGO = 'Pago';
-  CTE_DEVOLUCION = 'Devolución';
-
-type
-  IBizPagosCliente = interface(IPagosCliente)
-  ['{F53F105E-83B5-4EB8-94CA-EA7E470D26F7}']
-  end;
-
-  TBizPagosCliente = class(TPagosClienteDataTableRules, IBizPagosCliente)
-  protected
-     procedure BeforeInsert(Sender: TDADataTable); override;
-  end;
-
-implementation
-
-uses
-  DB;
-
-{ TBizPagosCliente }
-
-procedure TBizPagosCliente.BeforeInsert(Sender: TDADataTable);
-var
-  AMasterTable : TDADataTable;
-begin
-  inherited;
-  AMasterTable := DataTable.GetMasterDataTable;
-  if Assigned(AMasterTable) and (AMasterTable.State = dsInsert) then
-    AMasterTable.Post;
-end;
-
-initialization
-  RegisterDataTableRules(BIZ_CLIENT_IBIZPAGOSCLIENTE, TBizPagosCliente);
-
-finalization
-
-end.
-
diff --git a/Source/Modulos/Recibos de cliente/Views/uViewRecibosCliente.pas b/Source/Modulos/Recibos de cliente/Views/uViewRecibosCliente.pas
index 2a72aef5..56363885 100644
--- a/Source/Modulos/Recibos de cliente/Views/uViewRecibosCliente.pas	
+++ b/Source/Modulos/Recibos de cliente/Views/uViewRecibosCliente.pas	
@@ -9,7 +9,7 @@ uses
   dxPSEngn, dxPrnPg, dxBkgnd, dxWrap, dxPrnDev, dxPSCompsProvider,
   dxPSFillPatterns, dxPSEdgePatterns, cxImageComboBox, cxTextEdit, ImgList,
   PngImageList, cxGridCustomTableView, cxGridTableView, cxGridDBTableView,
-  dxPSCore, dxPScxCommon, dxPScxGridLnk, ActnList, uDADataTable,
+  dxPSCore, dxPScxCommon, dxPScxGrid6Lnk, ActnList, uDADataTable,
   cxGridLevel, cxClasses, cxControls, cxGridCustomView, cxGrid,
   cxImage, Grids, DBGrids, uBizRecibosCliente, cxGridCustomPopupMenu,
   cxGridPopupMenu, cxCalendar, cxCurrencyEdit, uViewFiltroBase, TB2Item, TBX,
@@ -283,3 +283,4 @@ begin
 end;
 
 end.
+
\ No newline at end of file
diff --git a/Source/Modulos/Recibos de proveedor/Views/uViewRecibosProveedor.pas b/Source/Modulos/Recibos de proveedor/Views/uViewRecibosProveedor.pas
index f525ff0b..5e11519d 100644
--- a/Source/Modulos/Recibos de proveedor/Views/uViewRecibosProveedor.pas	
+++ b/Source/Modulos/Recibos de proveedor/Views/uViewRecibosProveedor.pas	
@@ -9,7 +9,7 @@ uses
   dxPSEngn, dxPrnPg, dxBkgnd, dxWrap, dxPrnDev, dxPSCompsProvider,
   dxPSFillPatterns, dxPSEdgePatterns, cxImageComboBox, cxTextEdit, ImgList,
   PngImageList, cxGridCustomTableView, cxGridTableView, cxGridDBTableView,
-  dxPSCore, dxPScxCommon, dxPScxGridLnk, ActnList, uDADataTable,
+  dxPSCore, dxPScxCommon, dxPScxGrid6Lnk, ActnList, uDADataTable,
   cxGridLevel, cxClasses, cxControls, cxGridCustomView, cxGrid,
   cxImage, Grids, DBGrids, uBizRecibosProveedor, cxGridCustomPopupMenu,
   cxGridPopupMenu, cxCalendar, cxCurrencyEdit, uViewFiltroBase, TB2Item, TBX,
@@ -285,3 +285,4 @@ begin
 end;
 
 end.
+
\ No newline at end of file
diff --git a/Source/Modulos/Referencias/Controller/Referencias_controller.dpk b/Source/Modulos/Referencias/Controller/Referencias_controller.dpk
index 993db8152c0c6f9748a846635f286d6af15b24ce..ea41575a3849937b8b55f80952a2fed2db6b6fdd 100644
GIT binary patch
delta 32
ncmbQozJPs$5R-tR4lkF2LP|wQMrv-Vi=p9WC8ioiCI$uoh(rgV

delta 29
kcmZ3$K97Ba5R-s`4lkF2LP|wQMrv-Vi=n}0C8ioi0C7zRoB#j-

diff --git a/Source/Modulos/Referencias/Data/Referencias_data.dpk b/Source/Modulos/Referencias/Data/Referencias_data.dpk
index 6754bd7c055fc9f362ae657ee51336da123dc1d5..bc17bcdeac17eb7cfe0d7211512669c925f0b389 100644
GIT binary patch
delta 31
mcmX@YdW>}g3zLAM4lkF2LP|wQMrv-Vi=p9U5vC1H3=9B=M+e^k

delta 28
jcmX@cdW3ZY3zL9>4lkF2LP|wQMrv-Vi=n|}5vC0QZ<Pnz

diff --git a/Source/Modulos/Remesas de cliente/Views/uViewRecibosRemesaCliente_2.pas b/Source/Modulos/Remesas de cliente/Views/uViewRecibosRemesaCliente_2.pas
index 35859f1826eb44eb24ac45b6bb9264df57e0fc47..97f1bd9c9fcd54a6915ba25643270fd97b4dd27f 100644
GIT binary patch
delta 16
Xcmdm?x=VF~EEA*IW?81$0*nj*El&hN

delta 12
Tcmdm`x<hq?EYoH=rr81j9&!W<

diff --git a/Source/Modulos/Remesas de cliente/Views/uViewRemesasCliente.pas b/Source/Modulos/Remesas de cliente/Views/uViewRemesasCliente.pas
index fb84b032cae69859053a8e1d2c4ec29d202966dc..057ff542559ec8446a2bb02cc535dd2cbdb59f66 100644
GIT binary patch
delta 16
Ycmca5aYtgqekMk<&HI^Vb22gj06L5Xr~m)}

delta 12
Ucmca3aZ6&uex}U_m}YYV04GTWaR2}S

diff --git a/Source/Modulos/Remesas de proveedor/Views/uViewRemesasProveedor.pas b/Source/Modulos/Remesas de proveedor/Views/uViewRemesasProveedor.pas
index cca4593fcdab39c9feceb4d5baeabbeee7a8a9fd..29275d34879528c978ad2c383c6c58a12c52e79c 100644
GIT binary patch
delta 16
YcmZ1?xlD4yVJ1ei&4-yDaxyXi05z}$i~s-t

delta 12
UcmZ1`xkPfqVW!PTm>zNh03&e)RR910

diff --git a/Source/Servidor/FactuGES_Server.RES b/Source/Servidor/FactuGES_Server.RES
index 865ea3de8b6cdbb7e70c6a8f3773acf9db8dbd56..3b96a7fbfa8dc0569518b360f68f0465d84a3455 100644
GIT binary patch
delta 77
zcmdn6m2t&Z#tnBO7}rd`8zB!Q|3*YJ@=T75RAziJxi+$zIfp@Q^6yAl;VgzyhE#?!
fATDOmVNhT&Vlba<7^Tl{$Y8}_$Y3-%Gs+zRVR9HD

delta 85
zcmZ3nm2m?Q-HBk_GWl+VJdpew5zQzxIWkh2@!jOw$ZF;y2F=O8BV{FX88R7OG88c+
nGvqVmFr+dRGw3iVFc>kIP1cUm=QLojVlZGZVPKe?808KCL>L+L

diff --git a/Source/Servidor/FactuGES_Server.dproj b/Source/Servidor/FactuGES_Server.dproj
index 79cadca3..2fa16b16 100644
--- a/Source/Servidor/FactuGES_Server.dproj
+++ b/Source/Servidor/FactuGES_Server.dproj
@@ -32,8 +32,6 @@
       
       
       
-      
-      
       <Excluded_Packages Name="C:\Archivos de programa\RemObjects Software\Pascal Script\Dcu\D10\PascalScript_RO_D10.bpl">RemObjects Pascal Script - RemObjects SDK 3.0 Integration</Excluded_Packages>
     </Excluded_Packages><Source><Source Name="MainSource">FactuGES_Server.dpr</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
   </ProjectExtensions>
diff --git a/Source/Servidor/FactuGES_Server.rc b/Source/Servidor/FactuGES_Server.rc
index faf54391..aac73fe6 100644
--- a/Source/Servidor/FactuGES_Server.rc
+++ b/Source/Servidor/FactuGES_Server.rc
@@ -14,7 +14,7 @@ BEGIN
          BEGIN
               VALUE "FileVersion", "1.0.0.0\0"
               VALUE "ProductVersion", "1.0.0.0\0"
-              VALUE "CompileDate", "miércoles, 26 de diciembre de 2007 20:04\0"
+              VALUE "CompileDate", "jueves, 27 de diciembre de 2007 21:12\0"
          END
     END
     BLOCK "VarFileInfo"