From e29706073616a0fc3435574e57c2aa12b85eed39 Mon Sep 17 00:00:00 2001
From: roberto <rblanco@rodax-software.com>
Date: Mon, 3 Dec 2007 11:13:08 +0000
Subject: [PATCH] git-svn-id:
 https://192.168.0.254/svn/Proyectos.Acana_FactuGES2/trunk@31
 f4e31baf-9722-1c47-927c-6f952f962d4b

---
 .../Controller/Contabilidad_controller.dpk    |  11 +-
 .../Controller/Contabilidad_controller.dproj  |  39 +-
 .../Controller/Contabilidad_controller.res    | Bin 384 -> 4748 bytes
 .../Controller/View/uIEditorAsiento.pas       |  26 +
 .../Controller/View/uIEditorAsientos.pas      |  23 +
 .../Controller/View/uIEditorCuenta.pas        |  26 +
 .../Controller/View/uIEditorCuentas.pas       |  23 +
 .../Controller/View/uIEditorSubCuenta.pas     |  26 +
 .../Controller/View/uIEditorSubCuentas.pas    |  23 +
 .../Controller/uEpigrafesController.pas       |  24 +-
 .../Controller/uSubCuentasController.pas      | 296 ++++++
 .../Data/uDataModuleContabilidad.dfm          | 204 +++-
 .../Data/uDataModuleContabilidad.pas          |  57 +-
 .../Contabilidad/Model/Contabilidad_model.dpk |   5 +-
 .../Model/Contabilidad_model.dproj            |  25 +-
 .../Contabilidad/Model/Contabilidad_model.res | Bin 384 -> 4748 bytes
 .../Model/Data/uIDataModuleContabilidad.pas   |   6 +-
 .../Model/schContabilidadClient_Intf.dcu      | Bin 41984 -> 85823 bytes
 .../Model/schContabilidadClient_Intf.pas      | 846 ++++++++++++++-
 .../Model/schContabilidadServer_Intf.pas      | 980 +++++++++++++++++-
 .../Contabilidad/Model/uBizEpigrafes.pas      |   2 +-
 .../Servidor/srvContabilidad_Impl.dfm         | 337 ++++++
 22 files changed, 2923 insertions(+), 56 deletions(-)
 create mode 100644 Source/Modulos/Contabilidad/Controller/View/uIEditorAsiento.pas
 create mode 100644 Source/Modulos/Contabilidad/Controller/View/uIEditorAsientos.pas
 create mode 100644 Source/Modulos/Contabilidad/Controller/View/uIEditorCuenta.pas
 create mode 100644 Source/Modulos/Contabilidad/Controller/View/uIEditorCuentas.pas
 create mode 100644 Source/Modulos/Contabilidad/Controller/View/uIEditorSubCuenta.pas
 create mode 100644 Source/Modulos/Contabilidad/Controller/View/uIEditorSubCuentas.pas
 create mode 100644 Source/Modulos/Contabilidad/Controller/uSubCuentasController.pas

diff --git a/Source/Modulos/Contabilidad/Controller/Contabilidad_controller.dpk b/Source/Modulos/Contabilidad/Controller/Contabilidad_controller.dpk
index b1e527ca..a1369698 100644
--- a/Source/Modulos/Contabilidad/Controller/Contabilidad_controller.dpk
+++ b/Source/Modulos/Contabilidad/Controller/Contabilidad_controller.dpk
@@ -51,6 +51,15 @@ contains
   uIEditorEpigrafe in 'View\uIEditorEpigrafe.pas',
   uEpigrafesController in 'uEpigrafesController.pas',
   uBalancesController in 'uBalancesController.pas',
-  uCuentasEspecialesController in 'uCuentasEspecialesController.pas';
+  uCuentasEspecialesController in 'uCuentasEspecialesController.pas',
+  uAsientosController in 'uAsientosController.pas',
+  uCuentasController in 'uCuentasController.pas',
+  uSubCuentasController in 'uSubCuentasController.pas',
+  uIEditorAsiento in 'View\uIEditorAsiento.pas',
+  uIEditorAsientos in 'View\uIEditorAsientos.pas',
+  uIEditorCuenta in 'View\uIEditorCuenta.pas',
+  uIEditorCuentas in 'View\uIEditorCuentas.pas',
+  uIEditorSubCuenta in 'View\uIEditorSubCuenta.pas',
+  uIEditorSubCuentas in 'View\uIEditorSubCuentas.pas';
 
 end.
diff --git a/Source/Modulos/Contabilidad/Controller/Contabilidad_controller.dproj b/Source/Modulos/Contabilidad/Controller/Contabilidad_controller.dproj
index d576d17a..638d329b 100644
--- a/Source/Modulos/Contabilidad/Controller/Contabilidad_controller.dproj
+++ b/Source/Modulos/Contabilidad/Controller/Contabilidad_controller.dproj
@@ -48,30 +48,39 @@
     <DelphiCompile Include="Contabilidad_controller.dpk">
       <MainSource>MainSource</MainSource>
     </DelphiCompile>
-    <DCCReference Include="adortl.dcp" />
-    <DCCReference Include="ApplicationBase.dcp" />
-    <DCCReference Include="Base.dcp" />
-    <DCCReference Include="Contabilidad_data.dcp" />
-    <DCCReference Include="Contabilidad_model.dcp" />
-    <DCCReference Include="cxLibraryD10.dcp" />
-    <DCCReference Include="DataAbstract_Core_D11.dcp" />
-    <DCCReference Include="dbrtl.dcp" />
-    <DCCReference Include="dsnap.dcp" />
-    <DCCReference Include="dxThemeD10.dcp" />
-    <DCCReference Include="GUIBase.dcp" />
-    <DCCReference Include="RemObjects_Core_D11.dcp" />
-    <DCCReference Include="rtl.dcp" />
+    <DCCReference Include="uAsientosController.pas" />
     <DCCReference Include="uBalancesController.pas" />
+    <DCCReference Include="uCuentasController.pas" />
     <DCCReference Include="uCuentasEspecialesController.pas" />
     <DCCReference Include="uEpigrafesController.pas" />
-    <DCCReference Include="vcl.dcp" />
-    <DCCReference Include="vcldb.dcp" />
+    <DCCReference Include="uSubCuentasController.pas" />
+    <DCCReference Include="View\adortl.dcp" />
+    <DCCReference Include="View\ApplicationBase.dcp" />
+    <DCCReference Include="View\Base.dcp" />
+    <DCCReference Include="View\Contabilidad_data.dcp" />
+    <DCCReference Include="View\Contabilidad_model.dcp" />
+    <DCCReference Include="View\cxLibraryD10.dcp" />
+    <DCCReference Include="View\DataAbstract_Core_D11.dcp" />
+    <DCCReference Include="View\dbrtl.dcp" />
+    <DCCReference Include="View\dsnap.dcp" />
+    <DCCReference Include="View\dxThemeD10.dcp" />
+    <DCCReference Include="View\GUIBase.dcp" />
+    <DCCReference Include="View\RemObjects_Core_D11.dcp" />
+    <DCCReference Include="View\rtl.dcp" />
+    <DCCReference Include="View\uIEditorAsiento.pas" />
+    <DCCReference Include="View\uIEditorAsientos.pas" />
     <DCCReference Include="View\uIEditorBalance.pas" />
     <DCCReference Include="View\uIEditorBalances.pas" />
+    <DCCReference Include="View\uIEditorCuenta.pas" />
     <DCCReference Include="View\uIEditorCuentaEspecial.pas" />
+    <DCCReference Include="View\uIEditorCuentas.pas" />
     <DCCReference Include="View\uIEditorCuentasEspeciales.pas" />
     <DCCReference Include="View\uIEditorEpigrafe.pas" />
     <DCCReference Include="View\uIEditorEpigrafes.pas" />
+    <DCCReference Include="View\uIEditorSubCuenta.pas" />
+    <DCCReference Include="View\uIEditorSubCuentas.pas" />
+    <DCCReference Include="View\vcl.dcp" />
+    <DCCReference Include="View\vcldb.dcp" />
   </ItemGroup>
 </Project>
 <!-- EurekaLog First Line
diff --git a/Source/Modulos/Contabilidad/Controller/Contabilidad_controller.res b/Source/Modulos/Contabilidad/Controller/Contabilidad_controller.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/Controller/View/uIEditorAsiento.pas b/Source/Modulos/Contabilidad/Controller/View/uIEditorAsiento.pas
new file mode 100644
index 00000000..739fa495
--- /dev/null
+++ b/Source/Modulos/Contabilidad/Controller/View/uIEditorAsiento.pas
@@ -0,0 +1,26 @@
+unit uIEditorAsiento;
+
+interface
+
+uses
+  uBizAsientos, uAsientosController;
+
+type
+  IEditorAsiento = interface
+  ['{3CDABEA1-F952-4F35-8A31-279FFB7C31E4}']
+    function GetController : IAsientosController;
+    procedure SetController (const Value : IAsientosController);
+    property Controller : IAsientosController read GetController write SetController;
+
+    function GetAsiento: IBizAsiento;
+    procedure SetAsiento(const Value: IBizAsiento);
+    property Asiento: IBizAsiento read GetAsiento write SetAsiento;
+
+    function ShowModal : Integer;
+    procedure Release;
+  end;
+
+
+implementation
+
+end.
diff --git a/Source/Modulos/Contabilidad/Controller/View/uIEditorAsientos.pas b/Source/Modulos/Contabilidad/Controller/View/uIEditorAsientos.pas
new file mode 100644
index 00000000..fafb8d29
--- /dev/null
+++ b/Source/Modulos/Contabilidad/Controller/View/uIEditorAsientos.pas
@@ -0,0 +1,23 @@
+unit uIEditorAsientos;
+
+interface
+
+uses
+  uEditorGridBase, uBizAsientos, uAsientosController;
+
+type
+  IEditorAsientos = interface (IEditorGridBase)
+  ['{47A77BA9-3845-469B-A790-81F3C6E0F134}']
+    function GetController : IAsientosController;
+    procedure SetController (const Value : IAsientosController);
+    property Controller : IAsientosController read GetController write SetController;
+
+    function GetAsientos: IBizAsiento;
+    procedure SetAsientos(const Value: IBizAsiento);
+    property Asientos: IBizAsiento read GetAsientos write SetAsientos;
+  end;
+
+
+implementation
+
+end.
diff --git a/Source/Modulos/Contabilidad/Controller/View/uIEditorCuenta.pas b/Source/Modulos/Contabilidad/Controller/View/uIEditorCuenta.pas
new file mode 100644
index 00000000..c9ed5dba
--- /dev/null
+++ b/Source/Modulos/Contabilidad/Controller/View/uIEditorCuenta.pas
@@ -0,0 +1,26 @@
+unit uIEditorCuenta;
+
+interface
+
+uses
+  uBizCuentas, uCuentasController;
+
+type
+  IEditorCuenta = interface
+  ['{3CDABEA1-F952-4F35-8A31-279FFB7C31E4}']
+    function GetController : ICuentasController;
+    procedure SetController (const Value : ICuentasController);
+    property Controller : ICuentasController read GetController write SetController;
+
+    function GetCuenta: IBizCuenta;
+    procedure SetCuenta(const Value: IBizCuenta);
+    property Cuenta: IBizCuenta read GetCuenta write SetCuenta;
+
+    function ShowModal : Integer;
+    procedure Release;
+  end;
+
+
+implementation
+
+end.
diff --git a/Source/Modulos/Contabilidad/Controller/View/uIEditorCuentas.pas b/Source/Modulos/Contabilidad/Controller/View/uIEditorCuentas.pas
new file mode 100644
index 00000000..f8928ff5
--- /dev/null
+++ b/Source/Modulos/Contabilidad/Controller/View/uIEditorCuentas.pas
@@ -0,0 +1,23 @@
+unit uIEditorCuentas;
+
+interface
+
+uses
+  uEditorGridBase, uBizCuentas, uCuentasController;
+
+type
+  IEditorCuentas = interface (IEditorGridBase)
+  ['{47A77BA9-3845-469B-A790-81F3C6E0F134}']
+    function GetController : ICuentasController;
+    procedure SetController (const Value : ICuentasController);
+    property Controller : ICuentasController read GetController write SetController;
+
+    function GetCuentas: IBizCuenta;
+    procedure SetCuentas(const Value: IBizCuenta);
+    property Cuentas: IBizCuenta read GetCuentas write SetCuentas;
+  end;
+
+
+implementation
+
+end.
diff --git a/Source/Modulos/Contabilidad/Controller/View/uIEditorSubCuenta.pas b/Source/Modulos/Contabilidad/Controller/View/uIEditorSubCuenta.pas
new file mode 100644
index 00000000..4a6efca8
--- /dev/null
+++ b/Source/Modulos/Contabilidad/Controller/View/uIEditorSubCuenta.pas
@@ -0,0 +1,26 @@
+unit uIEditorSubCuenta;
+
+interface
+
+uses
+  uBizSubCuentas, uSubCuentasController;
+
+type
+  IEditorSubCuenta = interface
+  ['{3CDABEA1-F952-4F35-8A31-279FFB7C31E4}']
+    function GetController : ISubCuentasController;
+    procedure SetController (const Value : ISubCuentasController);
+    property Controller : ISubCuentasController read GetController write SetController;
+
+    function GetSubCuenta: IBizSubCuenta;
+    procedure SetSubCuenta(const Value: IBizSubCuenta);
+    property SubCuenta: IBizSubCuenta read GetSubCuenta write SetSubCuenta;
+
+    function ShowModal : Integer;
+    procedure Release;
+  end;
+
+
+implementation
+
+end.
diff --git a/Source/Modulos/Contabilidad/Controller/View/uIEditorSubCuentas.pas b/Source/Modulos/Contabilidad/Controller/View/uIEditorSubCuentas.pas
new file mode 100644
index 00000000..0cad4be2
--- /dev/null
+++ b/Source/Modulos/Contabilidad/Controller/View/uIEditorSubCuentas.pas
@@ -0,0 +1,23 @@
+unit uIEditorSubCuentas;
+
+interface
+
+uses
+  uEditorGridBase, uBizSubCuentas, uSubCuentasController;
+
+type
+  IEditorSubCuentas = interface (IEditorGridBase)
+  ['{47A77BA9-3845-469B-A790-81F3C6E0F134}']
+    function GetController : ISubCuentasController;
+    procedure SetController (const Value : ISubCuentasController);
+    property Controller : ISubCuentasController read GetController write SetController;
+
+    function GetSubCuentas: IBizSubCuenta;
+    procedure SetSubCuentas(const Value: IBizSubCuenta);
+    property SubCuentas: IBizSubCuenta read GetSubCuentas write SetSubCuentas;
+  end;
+
+
+implementation
+
+end.
diff --git a/Source/Modulos/Contabilidad/Controller/uEpigrafesController.pas b/Source/Modulos/Contabilidad/Controller/uEpigrafesController.pas
index 4e060f39..7b4e5e6e 100644
--- a/Source/Modulos/Contabilidad/Controller/uEpigrafesController.pas
+++ b/Source/Modulos/Contabilidad/Controller/uEpigrafesController.pas
@@ -30,6 +30,7 @@ type
 
     function ValidarEpigrafe(AEpigrafe: IBizEpigrafe): Boolean;
     procedure AsignarDataModule;
+    procedure FiltrarEjercicio(AEpigrafe: IBizEpigrafe);
 
   public
     constructor Create; override;
@@ -52,7 +53,7 @@ implementation
 uses
   cxControls, DB, uEditorRegistryUtils, schContabilidadClient_Intf,
   uIEditorEpigrafes, uIEditorEpigrafe, uDataModuleContabilidad,
-  uDAInterfaces, uDataTableUtils, uDialogUtils,
+  uDAInterfaces, uDataTableUtils, uDialogUtils, uFactuGES_App,
   uDateUtils, uROTypes, DateUtils, Controls, Windows;
 
 { TEpigrafesController }
@@ -94,6 +95,7 @@ end;
 function TEpigrafesController.BuscarTodos: IBizEpigrafe;
 begin
   Result := FDataModule.GetEpigrafeItems;
+  FiltrarEjercicio(Result);
 end;
 
 constructor TEpigrafesController.Create;
@@ -231,6 +233,26 @@ begin
   end;
 end;
 
+procedure TEpigrafesController.FiltrarEjercicio(AEpigrafe: IBizEpigrafe);
+var
+  Condicion: TDAWhereExpression;
+begin
+  if AEpigrafe.DataTable.Active then
+    AEpigrafe.DataTable.Active := False;
+
+  // Filtrar los epigrafes actuales por ejercicio activo
+  with AEpigrafe.DataTable.DynamicWhere do
+  begin
+    // (ID_EJERCICIO = ID)
+    Condicion := NewBinaryExpression(NewField('', fld_EpigrafesID_EJERCICIO), NewConstant(AppFactuGES.EjercicioActivo.ID, datInteger), dboEqual);
+
+    if IsEmpty then
+       Expression := Condicion
+    else
+       Expression := NewBinaryExpression(Expression, Condicion, dboAnd);
+  end;
+end;
+
 procedure TEpigrafesController.RecibirAviso(ASujeto: ISujeto; ADataTable: IDAStronglyTypedDataTable);
 begin
   inherited;
diff --git a/Source/Modulos/Contabilidad/Controller/uSubCuentasController.pas b/Source/Modulos/Contabilidad/Controller/uSubCuentasController.pas
new file mode 100644
index 00000000..04cc7bc0
--- /dev/null
+++ b/Source/Modulos/Contabilidad/Controller/uSubCuentasController.pas
@@ -0,0 +1,296 @@
+unit uSubCuentasController;
+
+interface
+
+
+uses
+  Classes, SysUtils, uDADataTable, uControllerBase,
+   uBizSubCuentas, uIDataModuleContabilidad;
+type
+  ISubCuentasController = interface(IObservador)
+  ['{94E5F2B6-64C8-4331-B9CB-3ED730478529}']
+    function BuscarTodos: IBizSubCuenta;
+    function Buscar(ID: Integer): IBizSubCuenta;
+    procedure VerTodos(ASubCuentas: IBizSubCuenta);
+    procedure Ver(ASubCuenta: IBizSubCuenta);
+    procedure Anadir(ASubCuenta : IBizSubCuenta);
+    function Eliminar(ASubCuenta : IBizSubCuenta): Boolean; 
+    function Guardar(ASubCuenta : IBizSubCuenta): Boolean;
+    procedure DescartarCambios(ASubCuenta : IBizSubCuenta);
+    function Localizar(ASubCuentas: IBizSubCuenta; ADescripcion:String): Boolean;
+    function DarListaSubCuentas: TStringList;
+  end;
+
+  TSubCuentasController = class(TObservador, ISubCuentasController)
+  protected
+    FDataModule : IDataModuleContabilidad;
+
+    procedure RecibirAviso(ASujeto: ISujeto; ADataTable: IDAStronglyTypedDataTable); override;
+    function CreateEditor(const AName : String; const IID: TGUID; out Intf): Boolean;
+
+    function ValidarSubCuenta(ASubCuenta: IBizSubCuenta): Boolean;
+    procedure AsignarDataModule;
+    procedure FiltrarSubCuenta(ASubCuenta: IBizSubCuenta);
+
+  public
+    constructor Create; override;
+    destructor Destroy; override;
+
+    function Eliminar(ASubCuenta : IBizSubCuenta): Boolean;
+    function Guardar(ASubCuenta : IBizSubCuenta): Boolean; virtual;
+    procedure DescartarCambios(ASubCuenta : IBizSubCuenta); virtual;
+    procedure Anadir(ASubCuenta : IBizSubCuenta);
+    function BuscarTodos: IBizSubCuenta;
+    function Buscar(ID: Integer): IBizSubCuenta;
+    procedure VerTodos(ASubCuentas: IBizSubCuenta);
+    procedure Ver(ASubCuenta: IBizSubCuenta);
+    function Localizar(ASubCuentas: IBizSubCuenta; ADescripcion:String): Boolean;
+    function DarListaSubCuentas: TStringList;
+  end;
+
+implementation
+
+uses
+  cxControls, DB, uEditorRegistryUtils, schContabilidadClient_Intf,
+  uIEditorSubCuentas, uIEditorSubCuenta, uDataModuleContabilidad,
+  uDAInterfaces, uDataTableUtils, uDialogUtils, uFactuGES_App,
+  uDateUtils, uROTypes, DateUtils, Controls, Windows;
+
+{ TSubCuentasController }
+
+procedure TSubCuentasController.Anadir(ASubCuenta: IBizSubCuenta);
+begin
+  ASubCuenta.Insert;
+end;
+
+procedure TSubCuentasController.AsignarDataModule;
+begin
+  FDataModule := TDataModuleContabilidad.Create(Nil);
+end;
+
+function TSubCuentasController.Buscar(ID: Integer): IBizSubCuenta;
+var
+  Condicion: TDAWhereExpression;
+begin
+  ShowHourglassCursor;
+  try
+    Result := BuscarTodos;
+
+    with Result.DataTable.DynamicWhere do
+    begin
+      // (ID = :ID)
+      Condicion := NewBinaryExpression(NewField('', fld_SubCuentasID), NewConstant(ID, datInteger), dboEqual);
+
+      if IsEmpty then
+         Expression := Condicion
+      else
+         Expression := NewBinaryExpression(Expression, Condicion, dboAnd);
+    end;
+
+  finally
+    HideHourglassCursor;
+  end;
+end;
+
+function TSubCuentasController.BuscarTodos: IBizSubCuenta;
+begin
+  Result := FDataModule.GetSubCuentaItems;
+  FiltrarSubCuenta(Result);
+end;
+
+constructor TSubCuentasController.Create;
+begin
+  inherited;
+  AsignarDataModule;
+end;
+
+function TSubCuentasController.CreateEditor(const AName: String; const IID: TGUID; out Intf): Boolean;
+begin
+  Result := Supports(EditorRegistry.CreateEditor(AName), IID, Intf);
+end;
+
+function TSubCuentasController.DarListaSubCuentas: TStringList;
+var
+  ASubCuentas: IBizSubCuenta;
+begin
+  ASubCuentas := BuscarTodos;
+  ASubCuentas.DataTable.Active := True;
+  Result := TStringList.Create;
+  try
+    with Result do
+    begin
+      ASubCuentas.DataTable.First;
+      while not ASubCuentas.DataTable.EOF do
+      begin
+        Add(ASubCuentas.DESCRIPCION);
+        ASubCuentas.DataTable.Next;
+      end;
+    end;
+  finally
+    ASubCuentas := NIL;
+  end;
+end;
+
+procedure TSubCuentasController.DescartarCambios(ASubCuenta: IBizSubCuenta);
+begin
+  if not Assigned(ASubCuenta) then
+    raise Exception.Create ('SubCuenta no asignado');
+
+  ShowHourglassCursor;
+  try
+    if (ASubCuenta.State in dsEditModes) then
+      ASubCuenta.Cancel;
+
+    ASubCuenta.DataTable.CancelUpdates;
+  finally
+    HideHourglassCursor;
+  end;
+end;
+
+destructor TSubCuentasController.Destroy;
+begin
+  FDataModule:= NIL;
+  inherited;
+end;
+
+function TSubCuentasController.ValidarSubCuenta(ASubCuenta: IBizSubCuenta): Boolean;
+begin
+  Result := False;
+
+  if not Assigned(ASubCuenta) then
+    raise Exception.Create ('SubCuenta no asignado');
+
+  if (ASubCuenta.DataTable.State in dsEditModes) then
+    ASubCuenta.DataTable.Post;
+
+  if Length(ASubCuenta.DESCRIPCION) = 0 then
+    raise Exception.Create('Debe indicar un nombre para este SubCuenta.');
+
+  Result := True;
+end;
+
+procedure TSubCuentasController.Ver(ASubCuenta: IBizSubCuenta);
+var
+  AEditor : IEditorSubCuenta;
+begin
+  AEditor := NIL;
+  ShowHourglassCursor;
+  try
+    CreateEditor('EditorSubCuenta', IEditorSubCuenta, AEditor);
+    if Assigned(AEditor) then
+       with AEditor do
+       begin
+         Controller := Self; //OJO ORDEN MUY IMPORTANTE
+         SubCuenta := ASubCuenta;
+         ShowModal;
+         Release;
+       end;
+  finally
+    AEditor := NIL;
+    HideHourglassCursor;
+  end;
+end;
+
+procedure TSubCuentasController.VerTodos(ASubCuentas: IBizSubCuenta);
+var
+  AEditor : IEditorSubCuentas;
+begin
+  AEditor := NIL;
+  ShowHourglassCursor;
+  try
+    CreateEditor('EditorSubCuentas', IEditorSubCuentas, AEditor);
+    if Assigned(AEditor) then
+       with AEditor do
+       begin
+         Controller := Self; //OJO ORDEN MUY IMPORTANTE
+         SubCuentas := ASubCuentas;
+         ShowEmbedded;
+       end;
+  finally
+    AEditor := NIL;
+    HideHourglassCursor;
+  end;
+end;
+
+function TSubCuentasController.Eliminar(ASubCuenta: IBizSubCuenta): Boolean;
+begin
+  Result := False;
+
+  if not Assigned(ASubCuenta) then
+    raise Exception.Create ('SubCuenta no asignado');
+
+  ShowHourglassCursor;
+  try
+    if (ASubCuenta.State in dsEditModes) then
+      ASubCuenta.Cancel;
+
+    ASubCuenta.Delete;
+    ASubCuenta.DataTable.ApplyUpdates;
+    HideHourglassCursor;
+    Result := True;
+  finally
+    HideHourglassCursor;
+  end;
+end;
+
+procedure TSubCuentasController.FiltrarSubCuenta(ASubCuenta: IBizSubCuenta);
+var
+  Condicion: TDAWhereExpression;
+begin
+  if ASubCuenta.DataTable.Active then
+    ASubCuenta.DataTable.Active := False;
+
+  // Filtrar los SubCuentas actuales por SubCuenta activo
+  with ASubCuenta.DataTable.DynamicWhere do
+  begin
+    // (ID_SubCuenta = ID)
+    Condicion := NewBinaryExpression(NewField('', fld_SubCuentasID_Ejercicio), NewConstant(AppFactuGES.EjercicioActivo.ID, datInteger), dboEqual);
+
+    if IsEmpty then
+       Expression := Condicion
+    else
+       Expression := NewBinaryExpression(Expression, Condicion, dboAnd);
+  end;
+end;
+
+procedure TSubCuentasController.RecibirAviso(ASujeto: ISujeto; ADataTable: IDAStronglyTypedDataTable);
+begin
+  inherited;
+//
+end;
+
+function TSubCuentasController.Guardar(ASubCuenta: IBizSubCuenta): Boolean;
+begin
+  Result := False;
+
+  if ValidarSubCuenta(ASubCuenta) then
+  begin
+    ShowHourglassCursor;
+    try
+      ASubCuenta.DataTable.ApplyUpdates;
+      Result := True;
+    finally
+      HideHourglassCursor;
+    end;
+  end;
+end;
+
+function TSubCuentasController.Localizar(ASubCuentas: IBizSubCuenta; ADescripcion: String): Boolean;
+begin
+  Result := True;
+  ShowHourglassCursor;
+  try
+    with ASubCuentas.DataTable do
+    begin
+      DisableControls;
+      First;
+      if not Locate(fld_SubCuentasDESCRIPCION, ADescripcion, []) then
+         Result := False;
+      EnableControls;   
+    end;
+  finally
+    HideHourglassCursor;
+  end;
+end;
+
+end.
diff --git a/Source/Modulos/Contabilidad/Data/uDataModuleContabilidad.dfm b/Source/Modulos/Contabilidad/Data/uDataModuleContabilidad.dfm
index f8a159c3..be4b1565 100644
--- a/Source/Modulos/Contabilidad/Data/uDataModuleContabilidad.dfm
+++ b/Source/Modulos/Contabilidad/Data/uDataModuleContabilidad.dfm
@@ -98,14 +98,14 @@ inherited DataModuleContabilidad: TDataModuleContabilidad
     MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
     LogicalName = 'Balances'
     IndexDefs = <>
-    Left = 352
+    Left = 408
     Top = 216
   end
   object ds_Balances: TDADataSource
     DataSet = tbl_Balances.Dataset
     DataTable = tbl_Balances
-    Left = 352
-    Top = 160
+    Left = 408
+    Top = 152
   end
   object tbl_CuentasEspeciales: TDAMemDataTable
     RemoteUpdatesOptions = []
@@ -139,14 +139,14 @@ inherited DataModuleContabilidad: TDataModuleContabilidad
     MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
     LogicalName = 'CuentasEspeciales'
     IndexDefs = <>
-    Left = 168
-    Top = 216
+    Left = 408
+    Top = 80
   end
   object ds_CuentasEspeciales: TDADataSource
     DataSet = tbl_CuentasEspeciales.Dataset
     DataTable = tbl_CuentasEspeciales
-    Left = 168
-    Top = 160
+    Left = 408
+    Top = 16
   end
   object tbl_Epigrafes: TDAMemDataTable
     RemoteUpdatesOptions = []
@@ -200,4 +200,194 @@ inherited DataModuleContabilidad: TDataModuleContabilidad
     Left = 296
     Top = 16
   end
+  object tbl_Asientos: TDAMemDataTable
+    RemoteUpdatesOptions = []
+    Fields = <
+      item
+        Name = 'ID'
+        DataType = datAutoInc
+        GeneratorName = 'GEN_CONT_ASIENTOS_ID'
+        Required = True
+        ServerAutoRefresh = True
+        DictionaryEntry = 'Asientos_ID'
+        InPrimaryKey = True
+      end
+      item
+        Name = 'ID_ASIENTO_COMPENSADO'
+        DataType = datInteger
+        DisplayLabel = 'Asientos_ID_ASIENTO_COMPENSADO'
+        DictionaryEntry = 'Asientos_ID_ASIENTO_COMPENSADO'
+      end
+      item
+        Name = 'ID_SUBCUENTA'
+        DataType = datInteger
+        DisplayLabel = 'Asientos_ID_SUBCUENTA'
+        DictionaryEntry = 'Asientos_ID_SUBCUENTA'
+      end
+      item
+        Name = 'FECHA_ASIENTO'
+        DataType = datDateTime
+        DisplayLabel = 'Asientos_FECHA_ASIENTO'
+        DictionaryEntry = 'Asientos_FECHA_ASIENTO'
+      end
+      item
+        Name = 'CONCEPTO'
+        DataType = datString
+        Size = 255
+        DisplayLabel = 'Asientos_CONCEPTO'
+        DictionaryEntry = 'Asientos_CONCEPTO'
+      end
+      item
+        Name = 'PUNTEADO'
+        DataType = datSmallInt
+        DisplayLabel = 'Asientos_PUNTEADO'
+        DictionaryEntry = 'Asientos_PUNTEADO'
+      end
+      item
+        Name = 'DEBE'
+        DataType = datCurrency
+        DisplayLabel = 'Asientos_DEBE'
+        DictionaryEntry = 'Asientos_DEBE'
+      end
+      item
+        Name = 'HABER'
+        DataType = datCurrency
+        DisplayLabel = 'Asientos_HABER'
+        DictionaryEntry = 'Asientos_HABER'
+      end>
+    Params = <>
+    StreamingOptions = [soDisableEventsWhileStreaming]
+    RemoteDataAdapter = rda_Contabilidad
+    DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
+    MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
+    LogicalName = 'Asientos'
+    IndexDefs = <>
+    Left = 224
+    Top = 216
+  end
+  object ds_Asientos: TDADataSource
+    DataSet = tbl_Asientos.Dataset
+    DataTable = tbl_Asientos
+    Left = 224
+    Top = 152
+  end
+  object tbl_Cuentas: TDAMemDataTable
+    RemoteUpdatesOptions = []
+    Fields = <
+      item
+        Name = 'ID'
+        DataType = datAutoInc
+        GeneratorName = 'GEN_CONT_CUENTAS_ID'
+        Required = True
+        ServerAutoRefresh = True
+        DictionaryEntry = 'Cuentas_ID'
+        InPrimaryKey = True
+      end
+      item
+        Name = 'REF_CUENTA'
+        DataType = datString
+        Size = 10
+        DisplayLabel = 'Cuentas_REF_CUENTA'
+        DictionaryEntry = 'Cuentas_REF_CUENTA'
+      end
+      item
+        Name = 'ID_EJERCICIO'
+        DataType = datInteger
+        DisplayLabel = 'Cuentas_ID_EJERCICIO'
+        DictionaryEntry = 'Cuentas_ID_EJERCICIO'
+      end
+      item
+        Name = 'ID_EPIGRAFE'
+        DataType = datInteger
+        DisplayLabel = 'Cuentas_ID_EPIGRAFE'
+        DictionaryEntry = 'Cuentas_ID_EPIGRAFE'
+      end
+      item
+        Name = 'DESCRIPCION'
+        DataType = datString
+        Size = 255
+        DisplayLabel = 'Cuentas_DESCRIPCION'
+        DictionaryEntry = 'Cuentas_DESCRIPCION'
+      end
+      item
+        Name = 'ID_BALANCE'
+        DataType = datInteger
+        DisplayLabel = 'Cuentas_ID_BALANCE'
+        DictionaryEntry = 'Cuentas_ID_BALANCE'
+      end
+      item
+        Name = 'ID_CUENTA_ESPECIAL'
+        DataType = datInteger
+        DisplayLabel = 'Cuentas_ID_CUENTA_ESPECIAL'
+        DictionaryEntry = 'Cuentas_ID_CUENTA_ESPECIAL'
+      end>
+    Params = <>
+    StreamingOptions = [soDisableEventsWhileStreaming]
+    RemoteDataAdapter = rda_Contabilidad
+    DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
+    MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
+    LogicalName = 'Cuentas'
+    IndexDefs = <>
+    Left = 144
+    Top = 216
+  end
+  object ds_Cuentas: TDADataSource
+    DataSet = tbl_Cuentas.Dataset
+    DataTable = tbl_Cuentas
+    Left = 152
+    Top = 152
+  end
+  object tbl_SubCuentas: TDAMemDataTable
+    RemoteUpdatesOptions = []
+    Fields = <
+      item
+        Name = 'ID'
+        DataType = datAutoInc
+        GeneratorName = 'GEN_CONT_SUBCUENTAS_ID'
+        Required = True
+        DictionaryEntry = 'SubCuentas_ID'
+        InPrimaryKey = True
+      end
+      item
+        Name = 'REF_SUBCUENTA'
+        DataType = datString
+        Size = 15
+        DisplayLabel = 'SubCuentas_REF_SUBCUENTA'
+        DictionaryEntry = 'SubCuentas_REF_SUBCUENTA'
+      end
+      item
+        Name = 'DESCRIPCION'
+        DataType = datString
+        Size = 255
+        DisplayLabel = 'SubCuentas_DESCRIPCION'
+        DictionaryEntry = 'SubCuentas_DESCRIPCION'
+      end
+      item
+        Name = 'ID_CUENTA'
+        DataType = datInteger
+        DisplayLabel = 'SubCuentas_ID_CUENTA'
+        DictionaryEntry = 'SubCuentas_ID_CUENTA'
+      end
+      item
+        Name = 'ID_EJERCICIO'
+        DataType = datInteger
+        DisplayLabel = 'SubCuentas_ID_EJERCICIO'
+        DictionaryEntry = 'SubCuentas_ID_EJERCICIO'
+      end>
+    Params = <>
+    StreamingOptions = [soDisableEventsWhileStreaming]
+    RemoteDataAdapter = rda_Contabilidad
+    DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
+    MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
+    LogicalName = 'SubCuentas'
+    IndexDefs = <>
+    Left = 312
+    Top = 216
+  end
+  object ds_SubCuentas: TDADataSource
+    DataSet = tbl_SubCuentas.Dataset
+    DataTable = tbl_SubCuentas
+    Left = 312
+    Top = 152
+  end
 end
diff --git a/Source/Modulos/Contabilidad/Data/uDataModuleContabilidad.pas b/Source/Modulos/Contabilidad/Data/uDataModuleContabilidad.pas
index 2eded94e..6c3ff041 100644
--- a/Source/Modulos/Contabilidad/Data/uDataModuleContabilidad.pas
+++ b/Source/Modulos/Contabilidad/Data/uDataModuleContabilidad.pas
@@ -7,8 +7,10 @@ uses
   uDAScriptingProvider, uDACDSDataTable, uROWinInetHttpChannel, uROTypes,
   uRORemoteService, uROClient, uROBinMessage, uDADesigntimeCall, uControllerBase,
   uBizBalances, uBizCuentasEspeciales, uBizEpigrafes,  uDARemoteDataAdapter,
-  uDADataStreamer, uDAInterfaces, uRODynamicRequest,
-  uDABin2DataStreamer, uDAMemDataTable, uIDataModuleContabilidad, uDataModuleBase;
+  uDADataStreamer, uDAInterfaces, uRODynamicRequest, uBizCuentas, uBizSubCuentas,
+  uBizAsientos, uDABin2DataStreamer, uDAMemDataTable, uIDataModuleContabilidad,
+  uDataModuleBase;
+  
 type
   TDataModuleContabilidad = class(TDataModuleBase, IDataModuleContabilidad)
     RORemoteService: TRORemoteService;
@@ -20,9 +22,18 @@ type
     ds_CuentasEspeciales: TDADataSource;
     tbl_Epigrafes: TDAMemDataTable;
     ds_Epigrafes: TDADataSource;
+    tbl_Asientos: TDAMemDataTable;
+    ds_Asientos: TDADataSource;
+    tbl_Cuentas: TDAMemDataTable;
+    ds_Cuentas: TDADataSource;
+    tbl_SubCuentas: TDAMemDataTable;
+    ds_SubCuentas: TDADataSource;
     procedure DAClientDataModuleCreate(Sender: TObject);
   public
     function GetEpigrafeItems: IBizEpigrafe;
+    function GetCuentaItems: IBizCuenta;
+    function GetSubCuentaItems: IBizSubCuenta;
+    function GetAsientoItems: IBizAsiento;
     function GetCuentaEspecialItems: IBizCuentaEspecial;
     function GetBalanceItems: IBizBalance;
   end;
@@ -43,6 +54,20 @@ begin
   RORemoteService.Message := dmConexion.Message;
 end;
 
+function TDataModuleContabilidad.GetAsientoItems: IBizAsiento;
+var
+  AContabilidadAsiento : TDAMemDataTable;
+begin
+  ShowHourglassCursor;
+  try
+    AContabilidadAsiento := CloneDataTable(tbl_Asientos);
+    AContabilidadAsiento.BusinessRulesID := BIZ_CLIENT_ASIENTO;
+    Result := (AContabilidadAsiento as IBizAsiento);
+  finally
+    HideHourglassCursor;
+  end;
+end;
+
 function TDataModuleContabilidad.GetBalanceItems: IBizBalance;
 var
   AContabilidadBalance : TDAMemDataTable;
@@ -71,6 +96,20 @@ begin
   end;
 end;
 
+function TDataModuleContabilidad.GetCuentaItems: IBizCuenta;
+var
+  AContabilidadCuenta : TDAMemDataTable;
+begin
+  ShowHourglassCursor;
+  try
+    AContabilidadCuenta := CloneDataTable(tbl_Cuentas);
+    AContabilidadCuenta.BusinessRulesID := BIZ_CLIENT_CUENTA;
+    Result := (AContabilidadCuenta as IBizCuenta);
+  finally
+    HideHourglassCursor;
+  end;
+end;
+
 function TDataModuleContabilidad.GetEpigrafeItems: IBizEpigrafe;
 var
   AContabilidadEpigrafe : TDAMemDataTable;
@@ -85,4 +124,18 @@ begin
   end;
 end;
 
+function TDataModuleContabilidad.GetSubCuentaItems: IBizSubCuenta;
+var
+  AContabilidadSubCuenta : TDAMemDataTable;
+begin
+  ShowHourglassCursor;
+  try
+    AContabilidadSubCuenta := CloneDataTable(tbl_SubCuentas);
+    AContabilidadSubCuenta.BusinessRulesID := BIZ_CLIENT_SUBCUENTA;
+    Result := (AContabilidadSubCuenta as IBizSubCuenta);
+  finally
+    HideHourglassCursor;
+  end;
+end;
+
 end.
diff --git a/Source/Modulos/Contabilidad/Model/Contabilidad_model.dpk b/Source/Modulos/Contabilidad/Model/Contabilidad_model.dpk
index 21466f6f..273db36a 100644
--- a/Source/Modulos/Contabilidad/Model/Contabilidad_model.dpk
+++ b/Source/Modulos/Contabilidad/Model/Contabilidad_model.dpk
@@ -42,6 +42,9 @@ contains
   uBizEpigrafes in 'uBizEpigrafes.pas',
   schContabilidadClient_Intf in 'schContabilidadClient_Intf.pas',
   uBizBalances in 'uBizBalances.pas',
-  uIDataModuleContabilidad in 'Data\uIDataModuleContabilidad.pas';
+  uIDataModuleContabilidad in 'Data\uIDataModuleContabilidad.pas',
+  uBizCuentas in 'uBizCuentas.pas',
+  uBizSubCuentas in 'uBizSubCuentas.pas',
+  uBizAsientos in 'uBizAsientos.pas';
 
 end.
diff --git a/Source/Modulos/Contabilidad/Model/Contabilidad_model.dproj b/Source/Modulos/Contabilidad/Model/Contabilidad_model.dproj
index 18c45b02..a80dd1b2 100644
--- a/Source/Modulos/Contabilidad/Model/Contabilidad_model.dproj
+++ b/Source/Modulos/Contabilidad/Model/Contabilidad_model.dproj
@@ -47,22 +47,25 @@
     <DelphiCompile Include="Contabilidad_model.dpk">
       <MainSource>MainSource</MainSource>
     </DelphiCompile>
-    <DCCReference Include="Data\adortl.dcp" />
-    <DCCReference Include="Data\ApplicationBase.dcp" />
-    <DCCReference Include="Data\Base.dcp" />
-    <DCCReference Include="Data\DataAbstract_Core_D11.dcp" />
-    <DCCReference Include="Data\dbrtl.dcp" />
-    <DCCReference Include="Data\dsnap.dcp" />
-    <DCCReference Include="Data\GUIBase.dcp" />
-    <DCCReference Include="Data\RemObjects_Core_D11.dcp" />
-    <DCCReference Include="Data\rtl.dcp" />
+    <DCCReference Include="adortl.dcp" />
+    <DCCReference Include="ApplicationBase.dcp" />
+    <DCCReference Include="Base.dcp" />
+    <DCCReference Include="DataAbstract_Core_D11.dcp" />
     <DCCReference Include="Data\uIDataModuleContabilidad.pas" />
-    <DCCReference Include="Data\vcl.dcp" />
-    <DCCReference Include="Data\vcldb.dcp" />
+    <DCCReference Include="dbrtl.dcp" />
+    <DCCReference Include="dsnap.dcp" />
+    <DCCReference Include="GUIBase.dcp" />
+    <DCCReference Include="RemObjects_Core_D11.dcp" />
+    <DCCReference Include="rtl.dcp" />
     <DCCReference Include="schContabilidadClient_Intf.pas" />
+    <DCCReference Include="uBizAsientos.pas" />
     <DCCReference Include="uBizBalances.pas" />
+    <DCCReference Include="uBizCuentas.pas" />
     <DCCReference Include="uBizCuentasEspeciales.pas" />
     <DCCReference Include="uBizEpigrafes.pas" />
+    <DCCReference Include="uBizSubCuentas.pas" />
+    <DCCReference Include="vcl.dcp" />
+    <DCCReference Include="vcldb.dcp" />
   </ItemGroup>
 </Project>
 <!-- EurekaLog First Line
diff --git a/Source/Modulos/Contabilidad/Model/Contabilidad_model.res b/Source/Modulos/Contabilidad/Model/Contabilidad_model.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/Model/Data/uIDataModuleContabilidad.pas b/Source/Modulos/Contabilidad/Model/Data/uIDataModuleContabilidad.pas
index db5d3b50..b5be46cc 100644
--- a/Source/Modulos/Contabilidad/Model/Data/uIDataModuleContabilidad.pas
+++ b/Source/Modulos/Contabilidad/Model/Data/uIDataModuleContabilidad.pas
@@ -3,7 +3,8 @@ unit uIDataModuleContabilidad;
 interface
 
 uses
-  uBizEpigrafes, uBizCuentasEspeciales, uBizBalances;
+  uBizEpigrafes, uBizCuentasEspeciales, uBizBalances, uBizCuentas, uBizSubCuentas,
+  uBizAsientos;
 
 type
   IDataModuleContabilidad = interface(IInterface)
@@ -11,6 +12,9 @@ type
     function GetEpigrafeItems: IBizEpigrafe;
     function GetCuentaEspecialItems: IBizCuentaEspecial;
     function GetBalanceItems: IBizBalance;
+    function GetCuentaItems: IBizCuenta;
+    function GetSubCuentaItems: IBizSubCuenta;
+    function GetAsientoItems: IBizAsiento;
   end;
 
 implementation
diff --git a/Source/Modulos/Contabilidad/Model/schContabilidadClient_Intf.dcu b/Source/Modulos/Contabilidad/Model/schContabilidadClient_Intf.dcu
index c2f0bae041049dd5d8490722de7f871deac11de3..c736d6742344e20412ad1e925b96032e1881a559 100644
GIT binary patch
literal 85823
zcmeFa4?rB(buK<LJG(o(?7}YAB4L9g6r&17t7?&ugr9J=z$(TSvXF#pTw{AJt)z89
z5)$}lT;rM~q(%;DNJDB;NJARZlA0v+g*0+P8WJln<e4@~LlV-^hPI?pU)6^G%6m~?
zh~Iba&YihC>>pXreN9ryzPoeJ{qA?qJ#+6lXJ%)YH%n6fFWoOo&C$2->3?+jMM=5+
z!tv8JXV0`pACI@hPef1Dw8Ud)+8?bu(|+>(lDhBQo$1@RpNn32$N1a!NGBXeJ1?}y
zS|#bE<3juS_?c6me#@`_-br`(%!T+-v+e|G>{RT$Yw+Y3Pdcm5o^6Rm&-~k)hGQqS
zqpi`FmN>?I&lf*(Qmg4We?E5Rc<0_zBUexPj@|$G6S3p%+iT+&&PCggpPqET@{Usl
zhBS6E+R@T}Z}iNGme~1EQ`<V;cHn$0R(Iw?d-Tll*k`E4v%jV#df`IN`B=0)_V<Mk
zeCbsF{_x56*m+n0igz4ukDopBTLo|bWyq^zC(oXb)y53@%j(fTI^|6;F!9;WA7B37
zyHDlrPYiw_eg>21y!zO=%g0YRVUfBs@pehVF&i{?fsU2hYI@Vq+}Iv(VKR5ek^2qE
z$=i+{xt|Pm{$%uc>_lSj{a1bKPi;!ku)U!pcD~bq|A}k!Cr*{7!mXL*%W0u&CjME1
zz9|*!q1gY&?fW@^j-T*!)P`%L?a^b=$6I1p4uy5KVXT0&XHK<r9_u_8J7F~b?N>kl
z^^@8OoQL*!YwXv4x&P=%|1qKSk&c$wg~g{@@=tn1@n&z)<f%JE2?K6_Ypgwtv-f0d
z&tUh*QUQ)~z+M7uSj%wm?Ac%IICn3#-nq6F{D$go!rYz`bF>{3I!x_FDckEVL|V_a
zcix|#;YjTGp|kaA+A#^%eu&yPr5vF?ik*1={&TdFFVv;MfhP%fUm6_EI@TVIx9EJo
zoCXKJB-}y56|dE=?!tk1tmVX^j+T}Nf}}7~4V=PxhB^YoNgqh6J1)e}#4cQ5XL?Wn
z(Xvzd+t+Zva`3(rsZMLSy*+yTbPkP{;-r(-$4`6G=#tn8_n(WM@ev}$vSZtd0Dc0b
zm~n!lrseE~SbmyO5?hlHw-F-6;!BWVr^U{<uS+u!V@W^)X$DHrL{7xp3kZ>JIs{ms
zk>c>#3+)>+Q4pYz0BI*vLq56XcEY5vTEZj@az{p*+E`1hJyw*7CIKnVNOSb~`Liu8
zcV?nVK;A@<H?3KG+Y_ce5<7W5cH#8KG-I(@>6nr<nETJvL|cxt^?zYg8h!3R1HTJD
zaQ6I(H>c6({xgYbN6w!=d;YGpJanoVq%<vrP9=kECdkIMQ@{Vrfp`mCPC}tyAk>>v
zq1fz?9zPvxjbe%|TL`!%Es&h;kyu*?!Y`rA2z^&7bi(o`?^Z&VrAJzb-;!311Tn!I
z&z*o*CpESa`WI4>v)LtsgIRSxA3w)tx1ErgjK+b#NWjvx<A=|kYw1jAdtpbG(d%R9
zPa(T$X^)07k8T3X(~gdFA4BY=`6JrLqOCg#x;d4i3A2it?jmeK3M|}e1+}eT+r}K~
zZfZ>7)IlCQbK>qatqITbU(&QDw#`0jO`#I)mnv#Yq0)i)`3vp$q@hhX=3h!fdk`^u
zf10*Kv8UR@Y1(LSR#RIFbq=48pFLkgjVUaIxL$q#f!g$~k^2uss5QlYN8iL&uQ}Us
zru{$~j)P~9W6!*mw<d+~?T>~}oPZyEc;fW*sY0AwOY0Fh_2`9IGd0u9lA9CB`y<qt
zVrGffM`>JQrWMI@(L|Q0r|pkXb5dxc{4wEl51&7K4q>))G8n2qRd6JBDo*)SGS9F7
z>-U|<PdE<LAFDoog3@`);2*3%h&=oxRb9w}BWF$_X^|whT@#gROiI6&IT}6597^P=
z<1v=16`p>!`FKowAbLI?J=2cMf>SDGNf)=C>pSJ#4{=S)`M3SXJ6n&(d>E@5mm23g
z?~S!URl0<Tc`>4K6+pcyvtkpfL14qx6S6^bj;H?Mxvw6t$Z+NNob>2t-u>sw@e1R@
zPCZ^>Ueatr#kgR(>v#pbsM&nHLb$5ga=aqxvS#b?3d^;@Zm=I{ZLhAWm89<`(1r>B
z>UgQ=NL}rt;R|#zdiKIa$-n*fZdG~YHT>HwNz$*^RD^0OcI^oT!+Q?w3GNE-s18<#
z%6A1r2WrBhJqJRO@UGe}sWg{Zj&?j=(*d3+cn*E*i+?KeR99D*hbto$L97+<MD|t(
z!=YWZ!J3*qwUO|F^4jvfJHeAfJO;@f-VgskBnj_`RPU+Yy)#&`BXj^HyLJRC_wFeV
zRz&vf2!|q(ox662K@t#1A{WlZj>n_8#<?hUZGGuwk#6sv(5{+Lc};M~&I6!3P`wj$
z)q8?_c314&S$m+icK7ZY(0Pe2axQ-AJQfpZs+y(>M4C`!Zzxi+r#e`%Ye#u-*WSG_
zRypQZURjO-c1L#X2@wr5bak|avMsP&82|luiYz-TD=PLJ*u5vXvz+Dz(%{}mWJj<j
zT)nqEw7aHu@7{7^Inx>wPuEvlzNadi=yYi~UHm-agb+?VA)h|>h0m(WW<t7wG@D>_
z!Wu@`e(^`=Rb?XqodD``SXDrYR{i2jpSVv|b`joh;!Ok$NIeAuM!)y2sH)sWJzVHv
zwCJ-lZM5~spMO`F9dE$wPPUvdtWZ~bQF`a!JyotM1w^TUvaVJtElI{a8a`SVIdts)
zM{Dk{KO8x9G+cZCMQPp62Y*Xd_EEP0>y`o~m2R*w9c`?xX#`jJq9i{!`rlM#D-n1S
z1V*D&S}68A5UII0%;_&mTOazz8dcdw9lhw7)GC#(6MNR&f2byM_!!icj-B|LU=QA4
z!5?lsbS%QA_gduiM+7`?kV<_be{G~Xa#8y0^}Vp*?WB+jg-9rs`bFHm;p)hdi_*X!
z{_ajyDI%a9Kqkc*iJy2X>5RP8_4lFM(Oz1T+`>(ebRIsD04t>%EMUW$7o|T=VARq=
z5tC%Ni_&BQ<S1Pyg1DhBN}oxzYsu~0Fc+oICfePlKCyqoLZ45xc}o3an{JiqL}PBk
zwC3(gvpDY{!<wigkpqtkQ(gY!tKSzEM^dZ4tjxZ(k)t(7>JHb`-G2!4D-Rt~l`V8~
za@bik+N9F;$zzhE)mQP(KfUY~Hl)!amEOLlPvpMHk(xS;c2T<f(dEwM#cwoXiII^^
zEy)hXlDH$eEopuiC1WwL6Kzr?P1INo>yx<*-G#Mq`x=O$r?4WtG*#W(r8#Q>0YXZ1
z`@MPmeNPC!)ojv@Zm>Qo44lz=1;R)aeGb>X^+@;tw&~}tJXS57V4+Pa6+0yvE7PhF
z=LELu@WC+L%|$72-&-#Ub26Kx(&A+05>|LLa`bSdrY?N&qV)B`f9O?}-Lwevu?W%C
z0zpWiQ(~A!SQ-JL!L*~WDA@TndWr@$mPCQTAs9$l5h5blQrtg?dYE$;97J*QAeI?k
zlnigdww<o985Ps4ur~>&HNh}M<VfTYtb0-V)r~(~70!#<B$aMV**STBnf!w=BXjJe
zjr*pQ5K{-?JZ($~O;W}<VR@vukp`qO4U47*h}MR=D_&~--%i03iH%5HEbNaS4%Z&R
z3U~H>tXYVTILoX-kN3t%Nh)XBNy!S*!n;9NnMbBF#!E6dbAd*aI4{A}Y^@p~J`W*c
zvZ!hRk|tyX%;b@hwKt+B%e#0QmgYRM_0BP*vEfqe>+OFl_%5MM_g%c#q42TBBjJOQ
zhp^svebm=3tar0XD$S=8YxJpmAaXEtQ5w3|_EuH7lbnwO&gT#l>*thX1q-0ZU*`OY
zOISQ&W2!OAFG|0cVvO?iW1z=hr5ywP*3M(+Md`yS#@LyD4D?t`I|ll({EW{(X^An1
z%3FkUA}lcGE;+<J1HuZ+rzLD4^iyH1Ew=u6t7u;#{H|qy*^G279Ro0iqg~4YqZoNv
zItE}~NjQDqR#zRrfO=kf@LON`&7$2{L6ZHp%^S8K<1NW|D4vtf|IzX1@07N#PXl;f
z`mJyE?B2LFr_M}do|m53xT0=i<W+f_Z{L2*Y_rmT`kT-G=q_n%VOq%Z(qAYeAKkoF
ztJ7o5^U{Z(o%+TW#(v4adHwcddV`hv(A)plrmfP}g4FHLOTYGs!YkXh=5t;%Bs?!Y
z{pGG>+Y=*rHkTM9m=Nn&)u)<&ZHKgVBOfar@_Fge-~Nrl@~!SV!(BZuHAm_{yNiuh
znYX!c`!S=*I?BU;`+IlpmbPw4hj?D<%=_Z2dvTumVtiiux7Y5-y*qI#*3o(9EmrO?
zfBdtJ`{+EU20SnQ?ROSz_v}%&?>QjtmnwuiOn-O0BE`L=e>lG7&NORgd*bHWbJE}a
zuMhm0^n~A5y|F|+8f!UOAZ^r2<n0Agt)s*pH8d=c3e@96@~jQl>%NV7Ti%q8SHCUy
zoU}y5_l4{!h(WZ#i8iGp!d<+&+6SU79kJ)6PZ8JMLk?3%$41AI*abW+P#`%Z@LkQy
zhtD+)zDeRc_`IN+qr?$qgXK#O4SXw{@68$YtGhsV_MVeIO@#Z0w3G^Jq@b+omP<>>
z6y$_|LWExvHPlQEH3fuTPFRsq!xY!Tx=}xq&^d!q3$qTvbWT6SB^u(0I18(tOZgDH
zU+*lqrCz2n4rDTYDC-#MroqSfERFF^aURyQQN_pDmU$k=6}Wy9K9}_*)MaH(Xm4en
z%4+*Y&K$f!ow+$apVj2itkf2zIrX1rwRCG%YP$a~-U-u9{RN_aa40{;9z7}L(;n^2
zN)4@3QBM=~BPrL%CMn+s>K;y=F3Phz`l8m{B45mE?Eb9WR<$|zm$F)Wm~(H*utxa3
zFWu0u5bMDqRWS6M4R5WIcOA>h3XLtSmx(pWmk4`Mb%S-1vzFa}uG|D)&T8K2th9o%
zoc6zEwd^dX&16}A*HE|YSBQ20kXx{<83*08gy*xeLRkyz%o@uIUfNCPYl*XFvMgui
zCirSr%Pwc76_n+)|2?Z^S2^un8P);aZ`G~(DltAd<Vj)Glahz5>ay#>J1rv=6&PoU
zF`Yl~kUt1;#?mZ0@@fBBR%@1IrPP(=lz*PplEJK$@U`sjv~J3;Wi@4GR!V3oQeMew
z%Lu33oWYiilF$6>S&i9{m6NN<IsYQ7HJdr-#<W*jMp|C*=1<?l((=tbE#I6WEsrzi
z&3Ri&(lZ;0`Ff(J#C$C^7G@`>x+^`En414+6WEZNn`GA1yypfOVN4@AzfO!u&ILv@
z^<~L<KW8k>q9Z>y|3;KZ&jm`;Z?g1!_y#DMlAQ8?6D1OKlTrvrEI}XRl)so!OS&Cm
z&E0;?OfaOH<PJ*&oxA~Z=$ndsmB<lDO>#kV7D%T#`HmacoZICm#Ex{_WEa*0Gxh8Z
zuv=B<?5`0!5^<AV(4AR*p0fut>Mq<N(p{HC+X7jONo}?H(hX2U@wL=4QD?OHGN(>|
zpN0}dftp)HA?}R!UcCYCWVJcBjkq&f+vT9Z2*>l5jMm1j-o%F&x~)|r-k-^71a5#B
zN?VETYb-6KGR$|BaN=z@rZKmLBdeW*H^3~a%$c28tz5~OGp`QuhPrNOEvum;H^80H
z+W4qJ=XPbabpz+l>;Xl+xl!C%&E0$h<QBy_c}`Y~$2oa1znf^>2}?YE#&4g!{O8-_
zEKYCZae7;ZINiZ$x8>osT*@1!+l?UoS>mN2y_Oe2x`*?Wq~Q@G^m~X35!z%DJTkj^
z)}M`z*-=03{X~cGEYMlP^Dw8|lu0{&GTuvkh|L0@B{q*`<74V^zTYN31ZI=Z8X_h+
zUs-znC~zjZtoN~L52+@tH9SmbqlKDlXa|TEp~0jTv}M6~meX#%5pB5@-cP&;3ns5{
z(peau&&HdiF6aFn;zdX>c?Er00AAv}Z%MDOxa0L@^&$}?B$&j4!fcf;XCr3I!2Cp1
zCmvj5VQWZO<;2@=Ok-|~4`j8m%Squ8`#l}AMP<(XyIHLq;LI6T1zA~ts6)5KP*x+C
zWaHH}PUaoXYU3d1&9W+VUT%mFW;JnTHsWN3Iq~mhwQz(JXRxr4kLecv5b+|56qd0i
zb8pDT3x(J6j;yh;u<w|kXy&{bEG+PHLwq=^h2z<XlNIK~zn|5@9h^9WAI2KiKik(0
z{1Kwf=qI|f(I!?zGVSOZ`&zw3AE(W*9!zby6+W8Pyo1?zlhozBe~{I>qntOC(W_Y=
zD$=d|hgq#Wk&Ql~c53>utk$05^yRNddv2YNWwrWDHvW|AbN)ZdYW+FR{|j9IbRS0>
zw|w6JU*9*uQps|jN|t9xB^TKM<#}7SWF5drDu0JYprmr`2uLcIIiuk~(yA<`m+v4_
zq?abAHE^%qI5D%jz6N`U7>TApY)Ld-8iiNbzzDCIHRh-9oy3fkQ((5FoPir>W-4>$
z-y~)vpC+^5rdfJa!kKqwJ#Vlw@<sirJl!bIGouWt<^a|-G<f3!K=m~P^wI!GNX-F+
z8L&W8$p_f=`ewjwbdg3tYHE%kEEtxWMs9qBq$%(bUZ4?>q?#iLb6{to;l@WuzU`u)
zhIeH>4b3+`0_GqDW_^Udtmh%lN2s`w^B|1C&Ghc9C!*uVhe)0TAL6&No{4Tg#GBGR
zQDZpB&;8=JPA~_#mpjP4860FEBi@_0Wn)@m!!b?~Gdae!%y5juoaxPJnM8;9K_Y`g
zG`WQJ&8}p|vJ=9b#tre`BSJVrfzaXzCpqC=nKk66<wL{>2PiOF9N=_zMy4WX93e(H
zK9kY9<z_i!Fq4jSfo!>G`7oRQkZMv}UEX|lYABn6`uB+%&d#J3v}Vq3iBqS2B#iFM
ziqza9A0ckIIg?vh2F%SZXXm!4&ACU38xGFo7W8HgZk2PFWwJK%RrWlx?sGm$w8*VZ
zT0v#Da$PQpxY$(bY1y(!qWyz4R<`EW0ZzO1MzrNt_`|FgF3HX-sLOfBvRXIDdADWK
zS8%zyfj>sfxH=RJY`HqD%+3sr*E0Xn8XF5Mg018TXU@3)1ZHlIm$I6<Av<-l(wurc
ztEHQ>Q#0SY=C;qri8|w2j%TM%EDr09?@z3;wRJsraO#X+gYM7p$M?BKKAF|n-PyS<
zYIE+1tk&-1+;^sV1l5Se_x$gF`CS%^@8Pldo(!>gkn!F_kBz2&wAH-v{Yyklp?EDZ
zLh%?U+LVq+jKmsoArhNZR)02`m5<p{-@Y#5Lm(FTEP;5M^SwEve*BEMi4bvEAhg8c
z*{p<2K~9)Mgb2eXq2LBsV3_BGZ^@t`#k1u5BOW&OA=M<d2H~Zw#L#ptv6qMuf=yyU
zW9GP)Iq|j|)0o>LmzWWNO=jWjvjDuBl{r~u&YVZg2)`z?pfj_w%S~|-3w~<`oy~7K
z=<Cau)yRRYywG?JuRp7eOE_<)RbldSL*!>QaWE@!lER$$wyYMe<iwjZS(trGM7Qp`
ztk#WW<s@ZA&OlbnHgL{g$f_rwd_h*LHfJR@6y>DrvsyIHNi*#;AwLM|cHNNGt{qvK
zp>7K1!mQTq=FGti))kq#Id0Et<G!ra7Nt4$9a$|s$f>ig-E!T=MOke;nw66;3C>xZ
z)w&a$Gwa$d=aauPt6itEk{XI~(l=$b=nN;l!L`e6uraG$=dv;<F9Xh8lGVD4ocRXV
zu3_U%S#5kRE44*wZs|8?we)pPoptT*)YtA^S#503(W7NrPQD~KXK7aJ`Z;ITwY!r~
zesfm47H1_j6y>D9kkz7Pob(3QF1Nv!tah!)%AC9mICEK6>xMb=4X$0o##^)6xIQbj
zMQLv7w`8?+6Q}mD-*=5a9i`t=dQPIBd6gb6c~7-;{DaDtjK8HsU)GdDjuMTqKdF`Q
zOECMTRe9BR%qweAo8+_0gMYHF=~G=jzx?U{^76syw>|U!E7Eqia8;sIBPo^ROqHU%
z?QYD5-|16orF)0uR^F7udg;?s4oLS6$!$g(>&Dye#Z3jdgSQnYu87zE7)@eBD)&i;
z@SLxKW=v_n!=)UQ4iCv)9DQdxZm!B9>Bx}WZNSr!bNFHD7#?Th@O24x%j2-h5$S;;
zxz_+CIIW;#c!Xc><Dh_riI4Yy^w5ypZ=ftx9QB~|@Q^%Upum;lTR+M}(j!Cipn(Ec
zD%8W$W4MLPQ3X~mKI9|P<3sX@0ke{E*kjU(A$gR;d|*rdnvC+ebP|`z1^_%3zzON}
zkUY)-eu06HaZ-9>NS-hd0tH8$mRj(28;&3?_?JKQCH91LW=Otd06<{@v`FWM<S7my
zEjWOWaYi~nBu^U%fr2B>N$o@OWsdNG!~6<{a$b6JNS-ko(Oqb4m!86RS$U&Z@5y<e
zl%5`vuNbX*SKj)R^vsYvXSAZP@NEU<Y3W&f3CCzfU$ONW={bD$mAB^dzMT45>1{*u
zqS4Gd^JZC=-huDp=<Oi|zd)rpev$`=^jtirm41td9plTe9HQ0LCOS)smH@WpbO^v}
z92mg8sI~sWpzqA-5_&E3UU#JIWf`$Mr$^|!!uxvA*Vw|wK)pGA0{A)y=Zjzqe}B$^
z&}Ef(@h0s>Ny$&le=uiQK+7IVJc{x{w<V!1BaGyX3VrOnkH$Baq^Jq<v7B)M=;FX!
z4z%!2<V*^1FNbS<CrFAr!FwrZN&xyfFqZ=@ywf?C1$cnNRoVcO;z@AM<je}7LJo2h
z$ijCeXHI|?bEuuIY=dw<XF))fa8!=)#T#Q4F6Jx=*is#P{H+pxU~XfB^MGI0T5XcH
zPP#X4Ym<K>ZB&Y+pX^Txqv}&vZ9_wH8SA?-IgYANuh^a+l7qZ0DUhnq$SOL9j7DrT
zzD=G}pY^KfS-~5#gi=+O3yG}Kz%#NGTPfieRl8hD{8b#EEu5+@IYa}5jSlGsNSw3h
zRIgk`BSd(I)FD;%%XP$CXTTD?#*WnW4akkeR?lH+!m3&*M~SY%z**?HcExfl@iiJa
zxWJ^Xr;l5L@8W{5$-sdx6|NLttOZ{)$E6FeYMI<mgi!-%CFB|g<zZrsap2kztA_CX
zRdB@(2)Otb*Y&T!mr=pe${{JjtXe5g6HS|e5oowJRq`zHba2etP^*UVolnqo8W7NM
z$DnHy!528e(#0Vu!mU~-FB46-fe~o9Hudr<@$_&^a>!L1@I6UT^cu~eFoUkzh%Y^&
zcOP%Igk7~sE}`!IM!VjfkKQZ?ssDh{&cmlZ%cxvQ{RfS9^cRA!8j~Z`f0(yh!><~b
z8;D@U0B{1XL95(M45K=LMPOBrz-68w{W_x_fyX$+jKHcMfkU1O0XWWqX(BMEuk=(2
zy(W0Cj1icR81_VjzLUIfas=iB)p_a#@FfmT6@fW_gQrpGGR3=CBCx7Q;3iMAfS%^)
zlo6PZ5cR}_K9_kPGXkr61de-J1>g(^S|c#$ZS!;p@L3KwBe1GR;7(7M0KCG1)(Fgb
zyFEPue2&8t5m?nDaIdFN0L^od7=bxozh^*zE^w$GfjQxzXIMZja#T_T=8PkrQ31Q8
zV}H?+_+HBwlqY9xej74Ly<vw_e^%xT%1;(-A^VVgO>a4VEFf!bxbS_V<$U4g(VElY
z@zWm-J-H#rwf4IAop{KQb=#C2uW{XrZMDLilEO8vdoK>j*NrypNh4Y-_e$>?l2>^f
z1t<D|$r8kHz58zb{)(4UJq#QGLn_ok={-ZTouep_B%yR4pd6Cki|>OQFe@2{9hTmQ
zpJ?H*+rTE=g-$puT-LsSNcI~TP_4xrlU~G^#W{w8xq#t=Js^ExNG>!$$wVCVpakDm
z%s~_akW`Cbal!TM2Z!Vm0|6Q<;$i7SLvkrc<cl19m`9`!BP%l?A_<2)CVd3S8HeZz
zit$OfZk)%Zk0MDkKnWfz=!Eo#NY*$=PfiRFAMd2}F{Ee)%0k6ar=^#WnCYmbi>qbN
zim+G09Adh5esOi(vnl{19OzA2NXFHI?6uR+^6C+zj-zi&LMOB{5@(m!EA*-7eR70F
zVetFC0Rh{<v3>z-VK4L+3q2Zn50|kFjO(-#Z>fN6;>bJ$X<;t&1_gXG$5RM0PM1L*
z@>U4oC<jvrGQbx8N^h0WC8l>tTu^KtbQ~y@wXVbkMW-#yE+{swy`bo!=pSc&HzzwN
z_33^J{H?q#$wR5n3{%H8qmeDJgo3!B7^9vYyfKZB!iB^nk#rh3kR&YxJ;|}l)5O=s
zaq0XNE*xfwu-gDy3Aut^d7c=1I54HJ!u7%u(e)ZA&<P7k*DfG06IUNcrS@02T398r
zegl?F#x*OJT@J7fa99eTrIyG62dD-O45*AnsB2X!mk`e|$E5OGxIhRJ(TD*OiMU2V
zxssShIViR7!UaNvxW)`vg3DOEx?UA>1F?;BSQ`I@3x#H)n=o(|I<8%n94Ed>9ha1z
z#=Wh=2D!u`rVrzZL7TTj08VkB#fR~HtJB*hpr<)Hr4QpHbbEV*K9_l)Bp=54d%b-E
zc7|h9_%P1i?;Q|&%<>+B5968cpm$h6Ug5|!K8!Puct-{N9LFd7Fit+^9T&j!9GuFB
zasCPKq|jwS?;@mRaXY1Ci+Y2Yl6BfCC0o*4jvsT$S~pU%r|+<PKKkUZR{rt}Z`tub
ze*72fUtF7#eH=L+>$WA?;~^#cB$7Pdl;rS`lKn9<Iirm&M|}|@CHoXoIo?KFjoesL
zo^hY_X=HQ;1l`v_4oaUvV#guml1vC6>5%j?(z;wq>!AE?Ni-aDSo$22I*v)bU6F@<
z9x0sxvh1$JW>t<!UqC{~L20(C@__V3q;v+#LdCUuP<jPP9Y@jZD6}Pgr4q^5myy#M
z7@a8@^RV<4q;wp^XP5jHO63vhtH|mMP%;tM=rQS4Bz7E>G6dk0g+D`PXJA0ICIBdS
z1{|p!$E0@u%1P<#NbL+zG7;D4wDb+6b{wR;?4)PXlqaNbBCj(biJ2usTBL6yspAmc
z(mI5XbVm9PZm=1cBpQx6Cw&+9)HvpLG4VBilw4mZ=cT{GeKiA`piB8RIHg_s9`3Di
z=p89pxdu;4e}nsL1~w%v$37+f9qzH|*rZhUs`r}UW12X`3<ErsUG}aBz-A6~o7>RH
zGp~DB1!$B*eI_)amyyKEx%ON$@s05g$&QqNvf;}03g9>gr*foRcYkg`=+er&<OrM0
z$TbUdiv?^O$NB}VMf;N6QlUo&?~xR~_y+=Ixj_Nj$+0QI7uP+MTOsu5;yv8ZM_;yv
z>Xo@w0<@b$eJ0eRc{n#Bbm-w7$ds1#X^c^qTQ79!<y|(c?P3|LA-7TJ*r#_)B;?z?
z&I9<gyf2ZE_u8T?A>Xn#A@8TOr=RuRmK>hcr-v!k8Q^V6@kxDVj5-b)jcl_d6huNk
zNj-;oW2y*+Y<!v+Mhp-b%;l`7Z+3Z>m_|7$Wt2i5K2KC*1}ce)E9I4!h-;jqxG(3A
zhwDT7<z*t9FklHcU`;Fo@+z@Sa#)&Zg*@El1l=VAXQAWT70Ur9_@+26WyC@%UP5fs
z21;j3idkx@93-yG9K~mv9JP>+R}$Hb0ZS(1ng!(uvCVQ=%E*O$yn)EB7$}gfiCt=i
z+)P|^9F;nHAsdeq*}MTuCgYk_$sNSDz+tH(81CJ76W5{vO3X4ThN%&`kC>J?C}kAG
z{rf?px@w@3sJK@3@+fg#<ETuL4EOUVh;rEgCnznxLSLGV@)R+zaB#+GhI{=pM19>r
zr=;duH_LOxy{e;=E^PX92LwkW=TSPiEiYt7G@f1$<_-%$I|qspjbC+)<c<nZ7l*Em
zXq<a2cU<V;<sFhE8oxA{$ek3xehy9*(K!F5+$o_;fOkoXXq<jJ_p*R3<k%DujkC|>
z&I&z>d5@%s#!Yi2cTT{TaBPZ*#@Xj{7la<AyoVUkxay0!O9HfvL)S($&V4oan$RK0
zJEV$ee2nGX6`@OrcS#@7_*mC-SA~uhdPm{%tiwT<XO((`czM?2pv$u=z2*3^kgWCN
z^6a6%uY7uQY+-%vC;z$QPq*Fn*|xQpXWvI=%DQb&j(@m3`vDSC-jo#naC!C*$Uu!Y
zwzc%Fgv+ykM9RtA^x&8D6?5D!|0iUc1_a#^`jR0Br5_@}<PbgZ=@35BA?aW60j_~b
zqT!gs(!b)vTLXgxc#T`e)!F~V=e7n0JZmw>q#xlUTaHQXxN&XvZ@9f@fRc&0Mh{9q
z#(h2=l$1J$^CEPsR=-`_#v!Jo;VE2QUcCV9;6QRTx`~X`xgoDnfOc{yIhrJE8mV(r
zUbE1li+4!csyz9O=EVeTH^-*fs$BDUUaQcfNAHnH+RE`49xG&RIFYms+Dcf`wta2V
zwn~n@m-Q`AUbO1dE)8zHkGCbQTJ@QLhK~J4BhHWUL67=u3H2P{jj7fxlC~f*3>u)M
zC1)gUmBcj6K`GZRlC}s@jTopTDt)csQHuuR8Z}U<)-UdyHWSyFfl6L@x?TY}PF&+0
zm3j>$W9uNY2?Lf)#x*OJyNPX5hb0Bf-n>5HBwykXa~*Ss*Pk~a0H-)mT*o{r4CW0B
z&}j}`yN)^cNZzQ>;WF=#w2nFXSl+mRo#EIN>zK1o<V^}aX7wI|t6p@HtG=Q)h^~6s
zNv?WMZ#jMpPa=)bhnwHJqvuWMh90@^li&a6_=e}U1=hOipCBh>-F79fdbny?K_bZ8
zl2$!@wH=L%MkCIrvFhQhU1(h5jkG4{D#UW9=sw8{)KvqOSgTglLCFu)HICw+LvSwc
z{|-q3z?Kb|g^a@vOND@~a2P$7f=fc-yX0`&#Xwv)5Nu*eh+|R-5UU)a-`!^%e3%EM
zQb1%MC3P^XUm)R-2c<GV>>QHv0suGDf&jS;5O~%Gk%y%aKwb_?y#sMOtpX^&fl8+0
zT0JIJ0u?Y&3Hw;C({M+v3aCN@m6)CtbwUaQRm@RoF6MAoEdp4H0ke>C%}z^ofR*a7
zqzE^kw;*hrG7d341CJAnc}oH?$blYlaT+o1YTh*g9OB@75u8xYh;qw$D?*nF-UW&z
z7Laj!;(Fey0IcM|Tn@DG%09c#4B=HAp5%3S^mO^W0yfOCDZCE1ir*IydPI1S<ck1)
zTdUAlEP(4cIMqb}=P&V<3SH{;E{W*8cffG~&tZ%wqVt&k8RxFG(Rqx*M+57-H`!0A
zPft?JXyk24eoB32nmRTajcj%4Yf61~mU=ex#?*ca@p+y&q6Q2c;vz62^b)bfI4q5)
zLX2J}y10R}&~fFw@+$GQa@<;9g%Is>fvU}bB=(Nr&eVV$aDk<RLsEDv1m_Z>=`=6`
z4cDev4iZln$E5UExRp{#Ox*?wOluq#Zly$stB0dfdo0{aX&|y*1C~t2H4Dnk#MWoP
zQu-|1ONkR(zX3~3(&DsmGo^#r1~@E@*TUVDZlW7Ba27hQU6tHNe8V~}DWhrdH3}PJ
zghNcf#q)wDU$X!l<-laW#nX<cFD8J;I5?Hx;{0)6tI%bfcQO4IzX)yfbqK%-4z&6$
z&fDqh65x{@p5(W<+TFe$0egvKQ}`{;-s|fVdQ9;i$$pD#-tQX_z|$O@%5QQ0LEo^@
z<+9#I$j16K%Eo5&1~D5O)+igB)mx6!cdRCmjRoZSspv;v`rua&y{Gj;^xJ>*(nr^(
zWA%t~S6Iipll>g>u?Dow@wOyChkUFNjq^q$TaNl7L_XGp#s%J}Upw#{^9lcj%jaf*
z77Y*>$jc?&)5Djlq5v&%5cimtPo@q@F`%v*sAMXx)nO?P)HRNxYa{cU`npm_q*h>-
z4GfspV2(*`z^rf#&CbN|!5)x00J?5~l889yL8%j<RSu#DZN+cRBOU8PyX>d54reEq
zNQ7_ID-TQEXt(qBJflA!;1Q_@0G9zU2sq#|sTTk*2Ut9#{>^pdUwuIN4HReuFUwIU
zq<)|R97Uc?MDZa{N&|ou8ZZkPhn<!N0W0P(!#4W&hVh~1FxpFuc0M)U-Xe{ly_B~b
zw&C9nR?bMH0F)U3gMe#rP8tIs$N?7H@Nv#d<3NQBRPuB<s$H4@s)C~|wlQ>iQkn#;
z(tugWxMojDmjJ8cFvB+b_fqlYswuRGjdngY-u{d<jrIs{H*CYdeX2YwT?U}e02l;Z
z1AN7528eo&uo#CAWS6B`z#0r#@`O0dB}-QTYveGCc?`9@vNQ)=lYz6)aqaxFG!I;}
zj!R13ulVK!FB|0$GYIlDa^ANf0An1OBRDA|cVF}^3D`Kt`UPx4HzRew>boZNXyrZJ
zrYAATmwhV&w2ec3Ce*@x-M1=q=-?e3`rqH>nY-+_`^_xBlfyg-n1$2j_X^-H11#=v
zLu0=`Ab`6$I9~)?_zV5TLYE%iC82Y<!Cc}m6=1y_me5(>Muv^c{6PWSXMhDYOy-ck
zLIC%3u&A?@ztUeNbQ$1X5<2fRbPoF?0&I}O5<2T^+t9hrUoU`%4X~iI$=u*?6u=`K
zEb46KZ}K+_T}JgTiHoCq`q?+irV<xNmu%ha*5%!6FODWD6&+)J?@3M?)TgH@{T%0Q
zNlAnH%q(@BFdDIajhi^?v-8w*k~gMI8gOm2L==|{6exsEW?ULA6W0_+rA`}gWwc6U
z(*`V=EU`lAn_@0E*e-Kes>A`8MgcdtW(*Lx%nhpR6_87aX_kXhrVh9~3KG>71C>O@
zwJMe?iEECdj3A(gV_X|Wh-TgZ5RH&M;IgQJ7#29d2m>KLMw#496pIGJpx}t094C$?
zj<Cc5u1iSnAfl@V3`D|;=CBI6o7k>#m?aJvdR5AOM7M0<EOcDEDtVCjRyfYEksg-u
zx$-CxT{i%Hf*cT$Cx~H{0}LDSkd4oir-(w%rz8!#A<v-TTGY!k#9`+Mi;ehD4e}fj
zxeQqHq&TcmUL-azhgoc7=+z`&BRao<v(Rzvn&s=n7vMO<MtX2oqq02*M1=-`Pmlv*
zvOfn5#T;PRh{tVwVXT-aN(_WS!L?|W%ZQ_tBP=%JL$%2jL{w(Lk|)Js9del1f*fYC
zk)c<oTu*c%181S*+I7iI#8;u?k}j&p{NsW{t>h3hpWv5w6aGm7SjB-!`2@c>z2u(~
zuwjl(kxy{;Y5!%RM}+qf^9fEq<DV6vbsV}jpWxhA{BuHwdftKO6P$P6zaYRGI4n7z
z;GB#8B>~)MfJLt$aptT3YXZ25gT*+f`v!^gFZ)-7F3r3P&nGzZb^odWi*i_UKEXNV
ze0#o`FvSe8pmVvQvn$^#fa4r2>df;A&hO6;2whrv7oJaWoeT4e1y~!0CFc{Ivn0P%
z0CyN*LFb)@&Sm*Q0o=*KqRu>@;QXQd3ZYAv-bJ`+G3cV37TtP-c++CcMK>*a^p@kb
z628>FpKen>m-pIhul>e{_Tx|r(=W&1_ZwDi_oBV%yN)LkzoY4pilpOA^p$Es#D8W|
zk?=FTi5{BJoUsRf>hR}ljQks&IsT~g&Du)6(J|DUAH#j4W8g3Q-t0U)H#!FX&h1a{
z7@LIsu_>YGCSiYUlGf~xP2V;5N0uJ?{@C<g^PFetp`Y`g)-g<9l4TycFS(g{{QHlw
zML6eM66bu2aL%`^J?C45bDpJ#e$KZD=R8Xf{hZ&-7^bbVjG>>8pVl$V{gGuJ|LJYD
zU0A!@6Ki+7uy(hvUAx<bwVS1fzIL|@Yd1>|{e1j%j<HLy)vkoCb_urHwboX<1Y2e4
zq1$SgV5=-WbX(ob80J3DGKRj-Z)Oa04`vzTr+OZD3+Mdq#5uoPIOlh-J?D1|=R8Xf
z{hZ$|obxO_bX(mTqvfPSx@D_0EAi)OUA6r8LyC&4&^%XN_(D8(rv2;%x+q=q)1?`H
z3U#CO+H0@A{R`ha{DSntb3a7q-&F7V60iTOrT!yJ{l}KNBq#S*Ep^RO_gLyaOMRWC
zzQIy2veY+P>UUY{TP*c$mii7$eV3)a*HYhSsqeScYc2JAE%k$z`e94`n5F)prT(y`
z{+OkH!csqNskd0_FImp#C(Zg*97<Rh{GF|rPnqqk{uxXCbC&uSEcI6`^{-g!uUhI~
zv(&#~sejv2|AATOdjEU9v-yA59FNt%XQ}@kuh-tCe(wdmydb@{@$Ew8F*T{Cz542_
z_)RA1S(JC7$hg_$M=3!mLkXdTQ5sO9DEQ_H9=VY4po4_R3nYA~FX5wf37=j|(jv-L
zlx39bC^Gn5D1MYeloFIOln_cKN*JX9C5nP&BGG-w5|j{17^MLviqeMCjna=Yf--?J
zjdBHL5oH+#AID4h&|4}&3892h8c?DrZ7AI+{U{?S6DZRtS5OvFmQnD(Wc@j2e1k#S
z2s!;bh%!QsFwMWuf#9w*ZMVe#u@+c=jEAn;XnXWn^zoM1k&c$w1v;J1bd7Yv6aO-V
zHc29myqvnD9go*^AUZ}9(b4(?XBjBg-HMK8Ht>HN9dAV!BYM8xDD>|XT_`?$9_3Y(
zFnnYKN)#oI(uUHF(vLENGJ!IUas_1(Wf?_AKR-$d3XeyX#D!9a(ty&05=Dulw4rpO
zbffg6jG%z#4UH|tXWij{iE%bUPXEYtd;+l}-M@E%;8v_iXPq}zUU<xO%_+Qp`sUZ;
z|Ft^N`CETVDTDJby5;=eIOo3~+e*B&{C|CEbSwD$lm#EU&bSBVAc`1Qu418BV@nAB
zn_>#Z6N)7iN5mL1hWZ4`C6sBD8I&t1^C*ibS5cNxuA|U(4_))n^$v!5Lt{@EgbgTB
zls1%Zlzx;ElnE64FIgSXL(pTR?pDdI9ipT)&A*pGa4R;YG0y*EaRL8p?I{9Rnzq*y
zweoq?id;AsJ06eXiijpCTYqaJL;UjmJjJhD{`;rRf5VsFgK`jM8Y`3E@1aYZ*L%-r
z41SIL<0X`7lo^yODDx<bC_E-y$FYp@{3s<TsJ<@$O?c}DdI&rlA*X+|L381c)BU6S
zrMLWVI_tbX`9|(PO$V34lV(M|9-r#2i=2y}Iv+i$`%>$VL1gfyw{8Rp9}C^O5tMu_
z^E3Z31Le*?kN1JB8~i&KU;pt8zW&yIpx5Wm|8LM6jv0<QMGQ#W`g(l7tFAiQ5<PQV
zcm38co@a3Vcl|u2(HoJ$h__+xvea*VLY{0N%J@WkowL;2E%m1?^=B;gTbD6EWtTCp
zP9O$+9_3Y(Fycc4N)&~EUeS%?ev}auij&hQS5OvFmQlp}N!HKL>%d8$p*Nw>=jd^i
zHk3}3Zj^qM5fm(v*L58;4LrZzdcD_Lbe%=lSaf|w*H+6YGUnk&DM1O*oWO7Okben1
zH$qPT$npMjhWk{ng5cJ55;N6L{mc4eJTRsRz3CcnF!COK;2mFY*WUih4=F>IUii)n
zKiv8C7rvaReEA)J*`CJ^PyCjhn&1A4=Y=mn@~dAu`hbCc;V+*1n;+{P-tm{uI`u;W
zz3}Z9zQl0sW#`uueSEJSxtADT_?Oh}-+V!Pt^XAamWkrM^qA4FeyQ<=f806KfPW7_
z?JqQ*ei+gdukAR|yAhMxqN^f~ez-4^m}p<)4<Dp~=<%nWUwEjg=|r#Z^l?-;;7jcD
z-~aK$M_yQJwoc_`+I*R3BS11tNI>~sOEafO#W}r2oRir*^R!Oh=(ONgvQ5i`WSW+V
zx|wMiy>E6}Z-3=S$!qInI7V}3`xlDt`rQTfuBM0B3c}iXt;6$Lhn8epvB!JqA-YGJ
zzo<!;HJ!x!`p=&+#?4N2%_e%8Jbq$j()npPh)wjsue|VYFZ?iRawh6qv<c{$z(*fh
zv&v1>&74J}_sveuatg@-8GG)jR37AI6T%kfhtOlK6A@51Gc99`o1NC$#pw`dw(qa^
z-SxYFy)E<N6nngvo&Zg`IFnGR9cBjSV)TCFCW_xTFi+tPO;qfWexgaJ*F90A_svf9
zRs_9)2)fo)nL#v@t1?lUT$PEsnLTavzUdWUO=ey;V%Q6rCTF5DP0mE!%;b#TH#<3t
zA2x#43+XaBAu2LI{7Py+EE4?(#7@h!jBu5HS|%jZv`o~^oGqjG&7Q4W&geh8GqNmf
zWB;dL*d`>?!ZuMiv#^ccH@mPc(-OT$>I=%B4L7tlE*dT%W9TqZnL>w&x|wrk^nQcR
znUOoEUy3Fq(^521H#04x_Zu`VBU4U4EfbPyS|;jdre*ZL*=gMh9sk)w$69A(xb2M2
z$V6pwMkeZJmbcOS*7E*$ywSOK1sE4c8CQUb%CrJZ)Xl5_qxa3O080vCtf=&U+k|BD
z+a~H}re*ZL*=emkXJ&FlYNxvkXreNmGZS?)lQVkX?Bp!x%t%SnpEDDZ>71FUo0*o;
z`(~$gE7snMwU!USexB|b{am}GwUaa4LB<$qqB8kg6ZIeCnAY6NG%lAiPR>MSnw*Kc
znaLTwZ`$jwnVfOalyPz<D%0dl)XhxJ=>5h`&iG^_<K#?KrpcM8o0*)^`;D8NW_*~G
zDaSEUnI>nVZf0^u@0*+)J;i{B7fLaq#KQ}((Ly&LOW1~r{y4&qn!oh+AT`Pt9(y4`
z2cK!j%Ma*CuYbf+rypPu+f}5|Vx4|KN35UV^)E?ys`9nhHlzQq*HnaRDt7G&1;cv|
z><R7)@2Cz|hst*aLkDWYp*;sek?^kCE&*R%U0oioj8p_`!?nOi_ErbOp<T7XnwmYe
zk??`?+VZ_SMSOTiq<T;F?w!Gk9iaoj@7fWp+`FedSP|K?BOHoEcJA687V&%cgm%@0
z%4>o<b{+u!K=n@GtM>%=?5^0kv-Uu3?e5(*B0dz^8;VrysSZ}`+EE_dwRbOOQVylc
zE6c&OJF;U>C<(u_vZ7+of!%w8JIhHQbPw*0M0Nyg!qt1rL%VBg_wFqRf2;jY$%CiH
z<f!dVdGBdY%r>AY`+Z9FqN3FLlmkBHUY~NGPdVsQ4*8VBKIMo{Ip$Ly@F@@al!v|`
z$86ev^0EW--{8SRcXFKBVlUo(@*|r3H=4Xdlgl+ZUz68q@-9s-(BuVRwrldAY4X=J
z`Rkhem?l52$tN`Vq$Z!%<R>(_MU&5H@;OaDugUG2{G=v7rO8ig@-v$JtR_FF$#2u-
zcWClEHTii>zNpFX(&Tq*@_RJ-y_)<!O@6;7zo^L{(BvUa{-7p*NRvOT$sf_=k81KC
zYVyZ4`6W&MxF&y6lmA$gKc&f^*5uD<^2?h1IZgh&CVxSbzo^NtX!4ge`74_IRZV_X
zlV_pyRg@JJS=D4ON+C)qN(iM2r4FSLC5qCD(uvZ8(vLEXGKMmVGL15eGLN!^vW&8d
z;<9UU0Hp*ah*F6XL1{o~w(s?{!oaPzyP1*q9q`}*N4d?miI!}KZNPrxOZIbe2WIi}
zRd!%L8$5X4Q|@GQ+l%+~ORy6b-Tt$-1mjS;2c;in7-bA)5@i}?7G)k~31t~&6~*Pi
zazZIV38GY@L{J(~no;78eV#5Dtjl%}Ga8l@o|TomZAG-CdTayE8(&f{%RMmrf3C6v
z^WEU-g~@u^-1p)={gUf}#ee3OTnCiyM;S&LLzzUGMwvyKM_EEyMp;F1IkDVON>G9*
zl_(LE29#!$I7$afH%cGMAj&Ap1j-c349c8yx2F#V?X!_FH5p41k8aETwjH!22W$hj
z*Rv!C!0@wGc0k_^o<U4`km<e`@9CG+GA#Bpx1<)K^eT!=!*W3>K?$N%qC`*{P?}NV
zC><!>+I=4U1f4u=JIIWJC4ndT<q_LPS`wqLEAYK6kHV}!Uu6g8v%xb4lZ>&s?Ztcg
zB{K|*{>&|zJ}5ngGKn&cGK(^gvV^jXvWntzVL73cpafAWQ6eY}D9tEwln#_`ls?zp
z9{lBJdEB;-84XKn0@aB``afwKaNW3<`J6lnv)?MB4R*jD8$6d_(o4)Xd-0xrNsi%+
z{LC%MK`1?mGL15eGLN!^vW&8d;&Nj-qLiQnQ7Ta)C=DphC~=eylx~zhltGkHlnIn6
zlo^ycltq+lDA!T!IU4@LmWIEfrQxq+Y4{UZ8veeOhQD2<;qOxI_2BRI$y2yIAfsbR
z&)U{08*W#=QJ~zu*|T7CC`B8UZx$$b=6bH$JjwyL^6gyZp9(xHwtQaM<dIdQrO4w|
zH{vp96K~B|zF&^IPx*mI*;wEy)S>H$q*P6ipt8vmGFyr~RUoO-Nzlqjstl4k6I$SD
z6iK3HOOdA)B&`;bR)eI|?6<|!qu$9BW}5ViB*P#XwvY@PBx5E?k!RAZZ1PNtB(ory
zwUEpjB=aV;z_TQhESoJwo>h>nT1Zw65|`bu<rYuCE=;Gyo;W+0TahPd--wIE#M$A7
z4chtHsT4^fB1wZt(hQPj3rVv<61NL0sM9X2pdOust)PB=EL1jmhRv2D&lu>(bb7S1
zlRswAPntRwd8W<ECeN&><2*>_EjrE{Bui$$BG0l}+2mOjNnDPNxE@NjmdnAd6>u1a
zE%1~$4Et~L1kIKrPbEkyEhLo&NyLN}cp5~KX0xTp69-A$LJ~JfIvj$@dmMtv`*jj#
z@?o8xnS9J_!O{i&q)yLGK55WTn`#w#X3feb&%CJP5=fRTIxZO`%O<qIvnrCfoQ55X
zJOSrMTn{9hJmBOeFEOD7o}g1Od8OG><cWYJVj+nbBn@W2B2Tkf+2o0fBpo2>u#j{Z
zB;6*oz|$v^44N%Po>7pDT1Z9>k_i)9;F%IhX3Ul%&m2hREF^OV$)Zy@`O8k><ge-^
z?Bu(&gtgeo4`_nNF3~n3pHBAJB^oz*Q18dwN2OWW<ca7ctfc`Y4LS*TEDZ)pv)K=8
z*{p2xbciI~AnCS{bQ>gnnlRB}O_=DIIh_K}q)yK!I&HRK>4JXNGSOLse%@58$g^Zt
zHhGps9allJYSD4kAaS{jwOrr{xP%2-Vz$5yyWoah$*Vl*;wG;&`(Z7cl}(-ok)#<U
z%@&eogCuT33p^bnNw?Wj<mm%RpM|8)AQ^NCCLePNCZE(v*xH)b>6yuA&6Xn1Jm}|j
zdbBcMK5x)3nQFlen-#cWQAd{>ZrGh{Eti{HE8sS)T;wS+D{#YZ<7B`MgQU_zQfZJx
z%zj0l2D7rs(=3w2K@zu+#0`=TvtN;?+pKKz^ob;cAQ`lf3>qY(X1^lOgjw0-nG#86
zKr&+?nK4M_%zj0lMYFQWb4?_<4wCB@lIsSEJx4IC->hu%6z2$rEz8-6#4`Epl;!ZV
zQ(^Wi@`TOGCQrRc(gczw3rUkf63fYzV>uh-Y1{31M<VI-C@O0CxT)=y6}R#o5AH?s
zqh8}^&^Q`1jxOm(!>U(#PrWv4duP4eSu`%MtbbCzqh1aLyvnupzJ(&?E+yZwODRw`
zIEoa9vcsV&9_4PtR)?}1$Ga3wIqay_YaV4kYuTr_Jdm-)quk@j1>3z2H~Ncx5+l5E
zY$?Za*WTdV(rc5xC1IV{F@rZio7X)i&dyKQ4AN-x?`oSgW2RrZZ-6%G$NcGS`H+&Y
zY~=r`8~YWdcZ2la4Mq6-9LmX!lC-3>Z^Ems8lRSTs)x7WH#+PO;dA>H`|0hHwBXoU
zj$bZu?%jpoO>|c8m853v@ZFLWaGk#g4DRQCd&a-CUBTa}Ra^@GBEp9F1~0we-ns!l
z`JqZhZ5smgerLyqLVDlWxuKZeH+5~m&w(h?mQs4%T1Kzig7mr_KM|rxJ1Xe4ypmq`
zR?+L-VS3#cq1Sur=yiWRy;e8SYi%RF9%xb|w{);EC!W)lGmz6vwL@b$Q#n_1uI5Ck
zc6c?%?<w_Ed16#M(%^}CIz9a!{2Ys0IyUOL<eBv>d0MIVz;%z;TjH(swo&cDdT-R*
z;qCKwQ0<`+@1%FeyXfttQ6KA~*T=i*^+XT7p6sR9(|v?JQ<__uTb~=t?Wfwg&fLD-
zk=#qU15`Udo4c61lIzVIq*{APUPWGAUNmo*YEO3L_2v!dP3Dad*E6H^`s^6JJ~vLU
zZ=0akcTCdjJ1^1e^HbFC-PiNHz7k)hZ<=cFsrN;F9lk!_Wvab*#5d`i@h$phsP?`U
zpUYqDukg=O?frHBW`CQ%*MEg-FAn=B@JF>5{Bu<Mz_Q<-Uzi`tpQmv?v_P*PUZmHL
zEK&Q%I`Vt-hw~@%uTt%$nf!(P<$Tv|*QoaK;@d*EMQ&@pZJF?&TA|lZU#Hj4tkUbt
zvJJ1Fv)h3E;>c~2x6RzPc$<rAudLkWT35WTVx5<2U#?r%ysm9s?>ax#zB0USV%_C+
z3+n<@`|9#Kd!R573KSC8*NW-&>m~I1jZ%93W*NPHJ4mnJ3DN6!E9mvFD(UrmRmAcA
zjzDi<I4~IqQ|$*cfrY?wz*P{T+CLN*gbE@B%>{K-`^UC|o`S)GiGq5n{nO=w`GRW&
z_Vo=^`(few;QH|TruB_f`<K@B-RlR|kFRf{+P_Y(pId)*y}Y5BYX38^p=?9dhQ<w1
z8}`Fb7L~n{XVvzTd0VOdiet*@a=E2-t2US7RSK12rA!Gb1In;6sw^u}8~!Yp3)QGi
zRV6PDJOuSC0i{GKRYFRI5>_HggVG3uL&b0J4B|jjr2so{t5PADqBf5z6|;j}6~E0h
z0*OzRO4&iaiodup3duTE3bKO&6~Emx2FV6hs=&eBl5f>ksZ=TBN{Ox1)^DrxG~;=a
z+f}I&qNuG%m8cC*m#FyRqX`^rRHX<z*rejmH%vlumnzk>gUu>_80iuuTU4nL2f0Mv
zq%<p2O4t^$jo6kwc5l?SRmI<Xm;!8@Dp4Doc2tQeZAypIt@L1eBT$V7+pgkgmZovA
zLzQAU@R5b$N~_YTbSamWS*5|&Xp7onDCH`Cjp;I=yHu%_9qd-|8{jjL>{X=>c5t_f
zzbr8e$v#!;Vh8uA_>J%@knC5b9(GWzNOVeS6^YD!K#|DC_bT{lr>N~dMIvkB*KEmz
zhZKn{b6CMoK1FRu6p4&+Ou-L~vl(52zB8b_uB<99o7YxoD~6g6C=yNmK?T1N6}91a
zWl80S75o}`)b@xXk#dhI`0c1xT26~fe8WCkPm4;2x@@m<HfeVERh#5cSFnKUb6RbR
zLt0ikZL>DE%vKcHX1Dom0b8f7+tzDavR$>U5d6BbqC^2#9nuPe%POR+(5(YfhXX%)
z-USjbNoCur(hI5PkXD(rkfe5-Y#V{p?T}<}&)P~!>cVi7ka`@Fok>F^_1avv8Ax*-
z_~TJMz*dpe4;w5%>T^h5CaoiB0P3zln(x35uJ;1lNYX+~!G&i=);XjAlSWBeOg4nH
zz=1zT)dy@VNlReY5TqL%QZbWulC;!Tg0<XgyWJs`U|G-FdPrJ^HQo$qkwc=zK5JuV
zs>~L&Robd-b+&q2ldahnx3${(2_CeS+1dcV(}BNwH30Z9Nkf45K)TT(1(|e=q!qT1
zZ5Yx`4*YejL0~6IT4}4WO+b2=L#klXX_8i9xXX}kcHpmQ4Ffw%(lAt*hjfcWs$$Z4
zl16M{?3-5GRtNst)(EgmB(1}KvU^)?+Z+;YtXbPKN$W9%LP)neq&nLuq^l%tz_fyp
z?r=!;OzN^j+GuOAMIbGA;Md2-fDMqe3HzxD(p?Uzkx5HP+6=R_Lb}@_HQC024U#kp
zQ*}eS*C91CX(dT%FAhR_w*$XsHUVseq;c%gaY*+$q!^PnkhB%1o`&=u2Y&Tz64+*v
zcEbE~knVR#txVc#!=@xDHf2}hlyzYR^}+bVn9w*t*KEsZ$8PP$8+L0C-mqJH@rK>n
zhd1oje!O9~4&V*Dbr5gZt;2Z3rX0Z=HsvVZuqp8|ByGDfs2cG$c?Z3uJ9g<fnz2hK
z@P=JFX}gE~(X`ELzvLKoE^Djq(wr6VOkN~^->1-U+2*%TImVnTnw%5NS@mAYtIwaM
z?RXh|O0no4hZnHz`!t}lwnF=5$AoiLbLE6{{JBec(fkF1&Vr>9&=c?!wtbI5DG|Ew
zajW2jRdCWOc)}`Zu?o&u1?Q}S^HxE-Rq&)$@RU{Xv{mqoRqzh0;GI^1+bVd!Rq#Hm
z;5}Bsd#!@!t%8eI!Mm)2cUuK7S_L1l3ZAtJp0f(xW)W;tErN#?tH6qAqbM?O>rmS$
z*;ulLae!pwDmy?<am^Ni1UbbrJ3vmcVylA$ImLAxFz>i(lU1+kSBupWHK>Nvh*}Q>
zl8sdx9U$3|nFPs(U2T8_$%cy^AldM$jgTPO@Z*5RsDN6ima1iHSZz|HYLD8hP6C01
zBLG1gB^-t900~F2+6)O2juLi&grgK)+9=^DV+Tk$f@%yBBpe}juvL+0j@uN8CWb2-
zn#~SHB2CK`iPYPrNR5e^HG(##_No2qusWiSs}t%J+IK4wDY93QX!N@kiH6*#NHMjG
ztl6QqZs;L5)eGf|bGs-6_oxeMp}n7^eUOJBMWpRz(qWSJLmq(?k+x4=1a^$11CTdC
zib&hfq?05aguD$>MA`v$3D{|p4ny7pDI)D4lg^TKgyfJS(hjRvft@GmD9r{^MA{K1
zT_Wii<d-2uq#aeS0lQ4nameQ(MWh{L(p8d9Kz<EUMA~t68CaJC(n-kWye^8g6HFQ)
z=_SYuAw{H}R9Apyr}>h4S)G9aR@7BBWUsI{*c<I71fN2OAm9kWml!-q(rL)UkRsAf
zsn<cmmfo~Ft6qU+u41(7s%)>cSJ^8Gei<Da0Y?a)X7C6}XCQBd6e0LBhAp%=kaQOE
zZb%V=XPC5^q*ovxfD|Ek7R-hAI7t^EAA=Mj_zIJD*|4G(aOSb17V(A^wS+gUsH=Fx
zin@k3tf*zYVd1Rc4GZTw-mq|1@rH#X+v8+YzujwJ@#29+Me^D^Nm6L{+g-5oens-z
zyJ>Ni;-qxbRt?$5ae%E_!49xhEA11IV5?TK18mi>eG(FE)d&ulz3S}s_9lBX#%sk0
zUG`pk9}w88b@od*z*eni2iU3&_9;lPRU6p>wrUd=S~qRgW*o3{7`4aj-S!?V>;Y&o
zWxs5n0|Hw$ibFhViJY7rV5`RMGmv1bwz30k)i(PqB-pAQ>;PM}(|!dKY}GDyfXjex
zMu^LR9(I6izZWaGo3i~rc7UY5-@X6|lKKH0uvre;hhc(C&~gSu^Y%ro&TbpB{Xrad
zQ?@_M4sZs@h&TgeIhdWy1zVFTkWkS4kx<a2kvGtUkT=jQkT;O($Qwvs<P9`y<PD@5
z@`i<kaTe^d!|o_?lsZC=3P*#Z(Gi6fNGKNVeRL|9?QI+SX-(N3vST@~kNkw}=yY6m
z43pG_&URlP`3XCdj*-;sa5)Mgg`aRax`1U9_Bsk3#f~yZ&{65Aa@0BM9Zil&g8Lm_
zM-Xs05HEvIlQiJ)J0g(6f%qNWAekj;p(EgEf)oxUz@+meEe3Tfq;MdGjvio_NLqs7
zx*>%FDQ41Tl9pn&gOI|3lsI~UT_tH5EHDl!97rjXx}1;(q3$%Ka3E!lK41eR4Pgp%
zkivlknY4tY6|mqnNZ~+2j(%W+B&~#1Wq%*}i3%pIBxw~)5P%eZqS7${Y=op?n57I-
zxPvMtZ6ImH5q5+jg*ym427zrRX`LhDXoM8*Ai|_^lGeklaY*3~>TrTCJ32_(08@8C
z3U^S?q}?QK#MvHz6d8GgV+7bfk~U!lj6sTwypc%<N!pB4H3ca$@+QY9u<V33JK~O3
zoUk4kVF1LVj&bCVfJYt8jw^s8Rc~hS36jRJw5~#mR6Xh#0}0!mF)W*2SY`yG1;?VJ
z&{^-CB6!>pbF2c696rY2GbC-rnEw1e%HiV}?y_T!q@B>C6jJ2ytxVcSj;qtrN86?g
zZ`d~7c*C}Vvb1e_@rG^Fhc|4Se!OAZ4B!phW)N@KHp6(swi&@2w#_Ksux-ZhhTSpl
z=%7_I<+$XS!KOgweF<iO<g#PRu>c8@@F_<>?Vu};DrY}A!v)N(pPV60k{NKxan-Tn
zxbCn!UCv@>sWa$o1Oi@i$x)00c*(2m0ABK%qXZIo$z^r`XSm`hg#^y<Iy-<fTy>N|
z0%s^Y=>X2q4$6LVhAwt+yCRVaMT$i9cPbKbZd4>9+N4O-=`KYII)_Q`Drd)rRWfb^
z&PZ$iFzx($XODBj$<A8?4riRR&a2LAPM7A@O0^2jr2*dPY;bl14wpcf31@($O_<sM
zq;Lt1&R$5F0h*jKXWZH0?1ZS_Iq1CNoO6~CyxH0090MFKp^3qRB#k<oozsxQB{Vzx
zKvGH4m^12}gA^_y%A^sJ#zB1*Qn-W|xF?(qByGiTtB}Ga#F@02q;1YtXW+JBatW=@
z0bt`K?Qpg^%OHhIXk*e2l6FGfDoEiHI-v1{vzw$nm_h@ja0#7EI&6cndtgZzyBBXT
zb|2ng?0&q#*aLWju?L-tWaBaCs51h+He;bVmq{|=9CJ27vIT3-IYK973inM$Xd%rw
zOL2gOG|LXKUamOHAi;W>V+U9-^Ufe7ST74WV76X#E`fQ)DQkAkuLZO+Ed&G>(xQ_N
zu#lG60T$9#X9Xl!NY~f_7Sb|IJwgj<g&iPxUUybOg5bHz4iG$LEey#<tU7jp;OWvL
zkRW(^*#Uy5U#o)z!85=Pkd@F>kd=`B$Vy0QWF@2!vJ%n)SxIGL0+pbx)7rESty}BS
z`n3UV1no#yND-tfG&**DL}TkSqQ$jVtyk;Q#<X#5TDzhxq8;v_P8%m{Hffz3#^}_w
z0yucvI4$ouaI4xRN!!qQ98#>}RwkV$X$OX%h7_x~O}h;2EJ-_|(j25%tQ|}`Ptq=}
zQ@aK!7Hg+A1MCt>yR|NS4{MwjYZsF)le7m@3P6g*+6~TC{0C_-rdb9l7Hbcax?GU<
zVNzj8u~>UCt5q#P(tb>|5mGGHJ|-<8=>W_WhZKvoUz-CqNYX)=t_xBu)&VB1B<ZjQ
zIi!eRgW5c>5t5E*!`c|6h+o4@+Cb7#n0^XU#IF%;0a&)eMzskT?=n=KgK$YJc9poA
z2|lKcYF7Y9U>jxdI7!EGX0Aetz&3`Hv#NEFbOL8<6;cGYaVG61=_IKAfpH3K6JTD|
z`bavB;YuMzV4GypamsV2ae}d;F5?X=Y6fpuQL}i%in@X~tf)D>Vd2c<4GU)hZ&)~s
zc*FWwf+fMdqAhD}IDLp5%di0?tJ;dz0||o2iZ(%O$mO!T*<uU03SASffV<E=?yk>?
z=8WV_=1kC54M03WTb0@;$h8-{CUJnRTEY&nRZCr$Ai-8G!vQm7&=qo3xx%h`R|5<f
zb+x+MfWTG_x~6b|tr}tn*s2w-X-KeDE7<|IYL)9UB-pB9c7UxKam_%2ty;$puvP0_
zvyfn`Hn0P1)kfD9NU&9#*a5a`vuh3#Y}F_`K%N_O%|n7bH_i@_=eD{QAVHqn#tx9@
zcDNQHL7v-*12&m1SGTLr)$ba1jbO%8P>RMzp4;VG!U6K!Zgy}t@@LmoNcJIrW(W5m
ze|BAiWIys}c2JG{*|iKwEz)FmZ~$qtYXy>fRcVABAb^vp5x~jN2;gL01aPt(0yvoq
z0i0}vs7;1Js3wgb!s@`=!&n^&#pf`mB@DabDt4E+gYJ;K$~{5%&BzLmVcFpAaV#6W
zoxrle+eutc;q5f8r||X!Ru0};uv}bIv|Q}&t__p4ZVTN3cWYpZTuuNh#+5To(qb&1
zZb;#BXdSt7W=UG&E_M$<3YSyto`7_oq@~bk3{tq95++?DX_>p!Jq;;bPN{nm*kzIi
z-DU1MNa1qIm~@q-A<XD1q;NSw_a$KQ5f74B%yJb{xSSA^21r`zu5bqmrpV<~xTk<E
zA!(Jn(p?5ATuvpE21y!*m8u|x%c*it1Irdc*j?{#a5uZ7?pAl3yUX3}?n7_DBkr)f
z0dV-DFoQ=(TIY_q<B-A^MckJ`(m>LBcb&TnQuv}eCT%8Z1E~8Ug)gdi&j1@IX(NUk
zg%mEQfk`_^+T?C@PeBTo)99WBwwt8Q?k4vYNa1ptn6!_iQK-8FDO^so`wFmwB#mJT
z*CB<=i8ARZN#pLA+rNH_a_N|R4%i8jwz}i)Qb>_Y$C-4Bq-`)kC8WruTix@(&XBYN
zW~ql1DRUc>&XKg!-QkWwij=v-y#VYYNxR&g?oLRN8Fw=2HIjD2tbLFoGwyOP0(+gL
zJuvkMq{xiBnbe*GX|KD-eF@UL5n0?z!1_tr=k9gSLb?x;g-MG^+K*GU2<bhDEbgno
zvJ=|x9(Ipl<z2!_n}H$bL0(4i0e8Q91@Qd{ISgJw(n0rt+q+@PR*jJ3z6O#oNr&Bo
z?h;6A5ptNco}?q7u7LCaLXLYG*d~&WW4Jm<??uRA(kV*S$K6x3(<ktToj!>-?DR``
z!%m;V8+Q6M-mudz;|)7~25;Euvv|W!zk)Yx=sCP$L(k(48+rk6*wBl3!-ihM8#eS+
zH=FiV4Be5_n=_NMkW=gldD=WZc<3KH{Tg7{>C5gx+FWwZsyl*hbOv`%++!qh<;Xcr
zketJfl$<N{K`(A-;<Yqqk=~SROtegHq9La-XW!7eRU3bDfIl-pPYYZpoMV-6Q9M{+
zSBc4`qS}e44E(GbplWYUf6n*mzWxB7HmJf=1xubvZy%l#h~e}8V#4LcTF<tZ5Oy?Y
zET@c#ezZF13zBFO&nZ-pXwPkuuaYFQcy1w_=yxR68X?g_&QcDGe=9jIPjPN2w=gf5
z*P7Rzx14A9)idlf7hm)>5cYb`YEBaqosOT0HIvBY@q1z<lHyb?!J`mt-t<I7gZ?Z8
ze+r_Fbv+R~zpI0=Ay1{Ji$w44rfNO#y;ODdQMDPJ2Uv&i{>qEKK@xS~$%+vs+V|j#
zzEKkOc=|l!2~^JS_$Ej+;=y=KL`qJPXabL6uv358Gw&(%2EDD`Ztt{r&Kt>X%Dqfj
z{3eHQhM+TeUgHYuE!CW@pCi${XVJ4jBHVUEb;WZ%F-8732Y--*9^tr3xL2<c&hGVk
zSEzc2^x$<86yxC!*$zP-sE^w15Cy#zUM~}c9}KtqNmS>p_ZBjd8hg=KOrj<{DN@Qr
z>+(O~D<e@G9vulW(Km))^i`0k+uQ4{B9RoP>acgjTgMPIk$Mu1L%~K8$x0K|FXM?5
zcCzTf6aG*Mf1D)BsA7bh^DcN>sapS@4tm3_LwX~d^)gf+p-OT~a|c*;kg6d(q%uO)
zyx7tB)1xG+!&58c3^75~rrc=mC8|1?aTQLIj@-`N%M36>)gC<A!cN;@?s)FCTsbeC
z*O)huH<nlE3;M1w+#KPC@%+mIRr4hIsrVv^#&aiguQJ3ns?Oxj=CYac$7A?|G4x2x
z3hTOm;zi$e!p`Ff8reZ?U;D2w`s@yfmg$iiCW@VDKjbHooaf48ThoijYbNt5@j%R?
zuL2LdEciqDg@ncZD&UIqO7cpn`X|zUXBkO?cqS)A5~YHw5j>z%#ke1X24NC4<~8Tl
zG0~%E&Yq|zQCnU|ULzApXHNY}6N$Q^dX$O&G4=spj6{QYyoXJbp7Ob_KefZ3*J))~
zx&3^!jj&^R6M3B^!c7&t&gAv7$^d&EB*Y3RMyQ$>Zf`$7N+P?@>l-K0S0|`ijK_j5
zu?|yI4f-m4msxd&s&&44-xaE^5B<n7N0KHyI>b(BtFPNP?VIxj{AK>Qzso=6zv5qD
zJr@brh6jwUvg$RecKdpL%ta0Q#(md(vVXuo=D+G+^|$7C=dUo_b;1q%Mtp4g{GlZN
zI1)XGBs-xAZl(Y?j%Sv<RLy(W4`1~8Npu+xF%>eA{MOTFi%B%+Tkw?{qB0UK`&N7*
z5-Al_mHjS%6|07+T8KxV>R5-b{PqWY^&~3uhy0Bss!=}KM1qLF&L3r%W3i{&V<h@N
zJ)BQSYuO#g6V1K3iLvJ2P0YeFLPAMFYQPABDNl>9&G3YgHp~dMHM|KOVZx9y7P1J8
zi$H}Z)YqnM+6r|cC8b#i;}mIK2+hJ47g=OsAq%0F2AYM7EL`N$&+nW%i{IeycfaRz
z&hMU=cSg_GS734FFH03Em9b5!M#Me!?3;RaOjSkes)?=^s)y<-J(RSG_E?dmiH4L~
zn66G#>2r58cq*l9Tv#nNs4ZzXbQijibmCIdVdyb*t)6xy9b?l{I~EG3!i{h%JP41&
zxyV-JI?{{WDqUA}HfF9nmG&h~g%`pPlFoe9)d&vdtBvqTJ$G9q-uJ)lH7tac@P1fz
z`t0|5c6y1&Yg(i;AH;tZ42kvtOISim?|<!mb51HvEMh4oD*f0MOiQU1J`bzU<pp-J
z9gJUD3|{?c1{;<ymQi!NU7oB+JK>vfPL2NCUw#u@lTr_#Szb!6O-YBC&I*!FY)d*0
z8<C=VT9PyonTwPq^+K#jCC#F%QknTY-3->Gw1!hnH7JI)XEWNf4Xv)U-}y!}cqrPf
z$adtLF3)(f64|hi)w9Kqn!%=gRf(*A&Xa0n(>|5lwfY6=QKZQK+y}>#{O}{P7A-^v
z(Q&kFAJ}ctOq>h#glR9;kSj^s7~(oAy^*woJFct5JxP0!ex$FS-b?xz8AS$?&bYIG
z`ub2x?x-)S{zTZ(baXFTi(W;$(U6_88+OYciPr1(dY(j@z-#CB$zly3X*!yTPOCH|
z=|(gkRd43mhWBj1Q`S4Bn-g6DmtIPxX-Ugi_A-*ry#CnrIxD4Gv>we#X<|*%X7nVQ
zR|7UBZQ<)Hr~%*qK{L25rE83SMWrZ7+Kt{t%S!RykD9@Xl!npAXjPSdnE&qUnv}*k
z0_&>u=|`V@cqk<si=b*joPy78znlO2{EkIC(GXqAUa(Kp&_Dk4gFl?fR~vR)75@77
zX7EzJ;(J?^6)+w3;9req@J31p_MzQXrT_l28SF`^iLJ1&O8k?eAKpu;WuMyvJ@Dtv
z;802(`^Fwg$@L^@k9Dby8`xtz7u$**$IfC8v8UKdd^7I$qmu)j8zs8Os5mW^nNRm#
ze;kt1*fwGbDe)aFX(BckQ=LEi7@r-C;$2KBU0QT$Y>pX~W+h$2^O#fVnxtE??byFv
zUl~vC;C(dkIJWUJ7H0EGu_=mjtP(3oDr?)8N)4-IQ3*<tHt<cBRa%ksEY^-yRa%qu
zI@XERC7t<r?{)rAN?jIstV+M1_;s)$r2%eB)r^=fpY4{<M#~dLI~Cni%pGs3v@NNP
z_CnJCTuPe4r+KZOb|lSV+Pqb1SJKURA$}+6L|@Xqcsc$c=?wp(*k=PNRdIF(#OiYt
zKaJnVNAc`ze)dr`o{>C1#`if^Lsq|N2HjJXPUEe(ZwiHLTGFfdb$s=A{B7`T3w<_(
z+M=2HS?;&Ngy?Q@jn1pmXMb)6Q&M`sM!N82DI=v(d>mg<rB8lR`c_U#p;>!&LrSt6
zd8y1}Io*;<eEuIZ1*xoHLEVuG-`kMpXSZhmDP8T&mS-!o`?J;A+H6Ul*Jppxn7*Cd
zb-5N@-N~eN$4{<$eE)tox$N{OUr70WGG;ySQ;5OjdrXK$#59LIeVkmz9HIt3@e`5p
zWWaiweCdn{w?`=rk7*j7RmbO9#rLuMj_aLp$g^bGo}~$!a>(<>NoeI9$~j8&C{rHA
zOnU<6f+t|5J+GVvBBPaAlv&TZv*KBI<ur2*<_63S0BfGNPF^cFQEpP&f?3eaZJ0YS
zx8dy&MXfBMEWzA^S=P)7%zc>q04gx6o)<xSuK}oe-gWAp7p~wt6Nj)4J>PSVHKzfm
z0jCM)L~~BzoWVJRa|)*=%0)aB0rQ-}ZO=>RLe{p6_aR_ic>?}R)^$Z(Yi0*#2j&gT
zTg~jk?7{58?83a$%09|IrF;5)(ESdWW(aoxZ%909<p|{n<`c}ZX1a|f%P^KE3}e-C
z8*d$-q57RR0_L>wu45ajUtAbg!uXyuZ>arE8K#*s)}6Gm?piR^{$}80;bh@t;H+p)
z4o(ivhUVnq<l$^-P618<&NiGK%_+hu!70Hh!r3#_ABwV(wDygpr(z_{ePh|F!sB(;
zjF@#`#LT+p9l|^0>5;LFTR;tLuz)7BHjI}}lQ_}JQ<SGnab~Q#T6*R-GoLf_IpwzT
z#<>vXA|8Q&c?IB-!Pmmvb#+K@jDWvmymD@cTg~jk?9xq-ZtgU*5Az=8J<LAcJZR<s
z<`BpL=A&kgNS|Pi;5`vz&2*b4rh#?GFxT+`s5d=rE?FUd6D(w|I@9J`$2QfTBv2+O
z&6%rQ%B$W}W`N80fR!>|IcZ`+D>EoFFtadMG&2Wt4dxnv9Lx=^%%jXx+Jw2KnFW~J
zFbnXui5;yhqAbEJ!Q9i#GRz9h3V<@qeGRCZN$bE&dTM48^TD!HH`PuanlbChjB$&t
zx@o{`@U&?zbBV0FIc4TEW<E7vI%h;nE88gBOmWT{FZ9fp%zVYnSClW!H_o*v7hPPr
zn>PSD489fSE*HxIt7iuMT{`IzcbeIU*{7R(x_Qvd0n8!HA<O~YJZj|#<%rS~vyb&U
z-QEDV(E-ctedQR0&#O9`_L}Cjcijnj*Il+(?PS8cWX*Y(Cg!}WPQv@vnb*n`$`qxv
zca@7|)q4hJ7G?%smRQls9LgNbHJBTknTNRva}z)w=9VZIxiDti02I70ogHEBa?u;G
zO5T9K2(Lu!X=WK_8D<6MzGhZo)?n6PR$(4!WgTUm(jn_S((62Cng-lscnzYdl_w}q
zV4lJ})65pkHq17F7R+<4yg+$D=@RCZW?sYWz`TanA#Swt7UeC>F3g^0-ofm{>;t%i
zd9MKv-lR43COrdh(j0m@zq~Kxm5jVG>&Y84$C~H1_@r6Oj$tix>8jrPv=uNzR)CxN
zmrjVVEwz&glnIMZn#Cv0QahQlmbeUFnn+VlS#O*LQ7&=^%eDc?FnC3nyIiyexPuM&
zbJi<ojo8r4Jj}ec?rd7?t}V?hz}$wp4YOdqb@)9kVHRPQfD~cwX=a(U0<#RSLhNg1
z6=oG?4d#Jn)?psPJcL<?d88XXwvyajCb{cOnoZupiKX7qsTJeaF=n<juMMxw({tX?
zg&ugxVy>9|lEqvR*IL;@*<p$s-q5X{xy#HwX6{k$@`mnoH+=y20QwAm(A^A3hjcTb
zlOge_nIo7Zx_P3Tv1Yn`oLxT7E+1!?kF(3C_GjA1Cyi3bx60+A+R213V9xnC!+fut
zIbvQbQz%nD&M_b7m`|T$FtaeT05ULFM7hX~V8C1hkn_ECHiWs$O<=&<^acERc$>tQ
zW)@%;U~a?Q(aa*u63i0JBFsIlETb$_s<6&|z0NAr)ZkX()rbSFtfQ>MJcN0qna402
zFdG1lVKz13#Fw<rd`Zu#FKM3nmYtSQ?PS{*v(9}n^Fs43;a&3d%D2pAo_a$aX1-zO
z4h`NAw_4dn*=33zYrNAl_nG;gneQq0eQ%rxQ7&?8$C(CTz~D#yhDM}MyrB`DJP~8f
zbo=?F`8m`4oN0c2rujM3{G4fi&NM$~nqM&!ezwiew)tN=^M3W#Q>1BsfLl7wG-5%N
zL2lYO(_m&{u4rZs<{Hd3m^qjmnwf{W2_z45OEU|k+b|38wuv3hEW#|pEWzB<%reXh
z%nHmh%ze$Q!mI(Q!aUH-I_V+II=n;TNHdRN9>Z+FY-;8S%u|@BFi&8fX=V#%8%PW0
zxn^FFUc$V9cS&4n<~7V~m>rlmnt2Pe3$qLJ7G_T~?_l<U+`+up%m>l|%m;V_VyKyq
zFdt!#U_NQ)7^Zt_X~I3V>WpC;Q)-X6%rd8^0{pfDe@RZMJ+es?Qvts{^~y;QbD|8o
z=BG?^ernxGO|84qQ)=HArk1P>%nZzhskcs6Ggn~dfULk=)65OhJj@Mvd16yDw_t9;
cEWq5>%pI6Tm_?X7FiTVKxR`!I{_86K4=P{D#sB~S

literal 41984
zcmeHw4_I8sb?@BSyLa!xB7q{1P{0PFRfJ+xkOUU4aJ2}C*A=pmglb%4YYi)DU691T
z)VRhKu}Lk-q{cOVQ3^@Oi_(%BC*+0HIKj`vCNJbOY4D5EkeEa?CN+6c8u~)Mq6Yka
z=iZ&WcQ3oFtfpVvJnPfhJ9FkYzd3X6%$b?He|R5b>)2-)OKWbwwd?-*k1@WfspjOq
z)2Et!4+QE0wZ7VYbpijW=KH;;nvXxr<UMC@ieA3`jIZfnWBaYFRyo|-)a<Wk?6}g@
z+!#1@;>#cSlTRLx^PFl591i6jAoZW{H##pK|Jrd!@#)ibe&4BUH~0EaBp$izfd~CH
z&D%=?O=o<~H7AGSUVZ#TilOx%_qEhD-{Ct|Tjy{5GL@|tWo3<izxPyAv+q=m{{<>>
z?cG=BYiiop==U}I|1tIGD<{_N^&D^ZH=>s?uBE0qaQf7rr#$xi&=>oUpKkP*_znGw
z^5MTZk)ShZ>eH>i9=r0<6KnSBjh6*Z`ReLg=Z>8jtEqLM*WOcsX2y`#8ud3(nwJ#Q
zMMZICbD&Ps#kCx|%YYnz&yhoSkuw^P`)d5Pdf&U|5;vU4icqk<qQ&3XYQX>2x#jaG
z+>vlAdii2h=!%Yig`hV_Vm;vhW8vSg0#sA$YANxQ_?mr3d=J$5am!P^B_7=6)2B|<
zwH|3b<F7RefBemtUO%36!~{RoQs-})d8lsPahF-WB_VC-#Cy#e4Y>V-{$>yE*N6PK
zUTptdB*0+-*iC?qD;f5mKK(~6XYQcVn^u;B-!L|gFq<M`4mV>c9i;NKh~?g<()u&a
zt#?IdIOMN6aJoE7IXa=0AE5HAh%J=+Fuxk_IzwZ($r}X+o-o{<QE=32f3q)87v%f>
zC^+zi;r0_QeWiWgrm}#)uJ%AnU0nr1A~<Ourh21>It0Y=M35A>GzCuio0_yceQVd@
z>=Wy@ui$=l|DCmwZmXxc*;jKio?44=)5+?ZlddSX=wtt`GyYSFgorTgw24H3BmzX}
zu}-nC?sSuXU6fYz$w-Lz5F*0h(@8M5{Ef})qco(k=#b<n4e2zcwSndoLPYBh0XD2k
zaqx6g^TyRE2#`vEsGZqIQMhgsVIp`<cZmjh@2WH<{yKlNKW#M{9g@B(&EcBH({*(>
ztwy6mZYIdhD+b?o-L;4O#~b}kCo`h7rS&R^$&7-z>(oA9U5z&Wo3f(VbJr<ETEv0V
zjkWKKV$WTt^lq0nHlA+W9F>P|wFYrVh0v|kAX^BMv9jxTohl2|A>`-=y`NC;i-gj8
zf4JtPzut!~)@>!=)~G-Vwuk%;Em&{~olWS?k<hy5L%iDvnH?QzA^t#AGjw8tSDvXw
zR3|fTA@utrk!!sR2j|4JxiN4?>)m!juI4lW{2c<iqqgrkbEd9Ux3(!aM(gGN#uM1j
z)HVC^R&PB7+!3{P+<QOPUg|&AcfYTGCqcJFGE{e~+0tEvO^JX-Sk0%h4J*sEfLcI>
z5rR6%{ikYgi&Cmbp5Kj9s!y9eR2sn~nlD9E7Qv*lKx0$$?NMm;!2EkrX!m2y-W#Rt
zfd8RpPn0s6o5fTX!JLDQfzyrqs4#+uu&x*1RaO$cwDhjBQYwuw-%(ee>ibT&oN6wM
z!m<B!4d%=TMQPX)zWshrZ7t&9y@Mx5Po(1JT1pQgsQa4y)l^J93oq8U>-SM%gr4c8
z_fxyXOe0d;ed@c!;70uz6^AWNw13ot?!m^>XRyq+4&~&PpGZ06KM|n)R5;I{{PHJ`
znp&l-{77+4Ep6aw&wh9LemV+K)`@*@>8TUgv@oVkS3OgVP6badhkeJjfKvKUjbGcU
zrJj7Wy2h^_^)&{3r<!pPI3d$6>HM}cohKZ7q25>5_~AeONPUez5p5OYaM9R$hrbS{
z(xJhhfEJB?Kh>t4mDZtsSlDo0!fr6s#}j{b_M0{NtDNV~vio27=-=_0eB-z#*W`x|
zF*hM&98ofA^0i}3R!zR?9J9G5KkOj0r6%8U8rT8$vij!YeI<;2S4SHz{9cVa`H;8d
z{(UVtVfva%o6h)a0zMoF&a;l{qz;+i_cs1*VT}FBt+{!*x909F&e@%JYktlyPhM%x
z?pyN<a`xqx?#SJjpI1;;wy%x36Ns+#OyEQ#JP(@B|F7FVVy4M0EiEX$6*RZzc}jD3
z<(HM@6c^@|<?Jje-B-A4cYbMEA<?*qrr1|UTNAK+qVb=8Zf4n+mtV4Tck!;A+>%`-
zIlFf3EXXO$EiTO|DA-Y0xVxla=Z@WZU`akz?~l~CuRZtqJ7vC$`j&*gt>`_vK{ZX?
z@LhS*C-coz!-*P32`nXK$kJ_x{_YK#XAw{ZP!urthU0a$D{b+XoM#_-^PwFwPoXLt
zRlFt4eRD+cq0+L_L!}4yc|GUZA7=bwN#<LqQXDFUikLeiV&#(3!}|_-5AO5cb>KXE
zVMpEpnQx`q@u+PogQ0=ihawyLT-!h9tq0tFb3{nU2HbWX%H0_ep{54UvoGpc*}aww
zH(VRVHK}1Bw0VE&LGK3-dCE%9v*+sn)gkk3)Ge3p6r&J>A*>>X*FjIoAyjg7ey-Yd
z$3y{hZw#vtX7XzO3pbEv!=0sv_Ics>^X#_!=UYt%nhTkGEx9VJ`-a0)!-~Q?ZMZr)
z3?%wt^6$nlKv;){^n0MV!&@>Nh*6`1RQDS4j2PNc?vpm&1%@mx_U!i@*awH(H`sq{
z8hoZQ=1ws)AMhNhJmlG5dJo3?uFobmo5p*nh`HB=)$txJ-Jf@!^;~WEpv-Tgp`c(W
z9MIIkdn&9lc>pzj5dXJM)4eelMrvcndG^T&ZS08N25S5;Y8$AxvL8Fovrk88V`ua>
zP-7-)8>qL2hJffl-8o~3Y13YmnC^*bE~l6)hwgxBgslrh1aE~gwzTmlnlSs<G_+PS
zz-?dA2VR^z8Urvd=@^%LB?Fu?s+X>b$^gu(Iwo=3I`4`V;R*Ke*V~Sy6ksT^QP-Bt
z?MGHX!nZDGS@DVLKibH)WyC^0!S4TyKTX}VEzWDq{U=y;Y57;uwAKpOZb{vK#3-`1
za_^5ndDBg7+s0^!Cs^y+uf3MB&FK}6e}Y|m`@L(jH1eYLTQ+V#B1){>Uw{59m7CeN
z4N(A3upfVa+P39ZzI|62+sg7yo2nny<VV;(y;-yM{jt2UUEf%qWzYVPX9n4WNw#g9
zGUdbmy5lKqlbR`QPhqzxnQ=bD)D)H|*YrqJ+`(AlrnOtQ#%v(CH$BV#8?|s}o;^Yf
zV4M?-ABf3_J*~IosIRWYf0jK?q__1bA*+=P<&eJ#56e@S!a%%m{ls|OXApM~@%|@F
z#wwYLPiu7@Q&bR3wxADgxju`%O|<hp%RWNPdwbM~CaYv}!u2z2CJW|2Bj#_LZB|1z
zs~pU!f_dll*o?3g+yDi={e<R}9@%92`wVZ(<P`VyHvrRDG;od@I25G^avU1S6AkQo
zXFU);I!`T>t>*or>u({f3!;S!)WUb8^g+7|-s^7xW8D<FgSX+yn75(w`ddIBR<_U?
z^FH`Q3;EY`A51L>H+?kbji|r=Cc--*n)vgWccN7^adWhQZUo4${?6amY5_7s1jvk4
z0%V6qoUwLmMpR-WFpdy21;&-k81UVK>3va|%mMKeM23JE;<5(BzSx9trx6H0NrVW5
zCc;oq(E{OsAl$sVh2pk+iWm_9O^l(Ktp&j0*o>Nqg0YVn5%@xk*1$I=7;{#$k@jKY
zcoUp!pVqqHBZsIJOURpyO$}osQ2%$LMz9M}o2=G?-L#;Nx+9^7A7*Odk<Sn}!d!^k
zGz>H!&&B4pm@T+35jO%{h}&eh7T^{HclK)D7DuL_r$0-ydsiE|l1wWuCRKD=ZCL0>
z%^>Yxt?;sSAx{vr+pfo2;f24B>EYDaye4x6Z+}ehx&`kotJ!M`xj|2Sj+pnaHk9*X
zGsEJQ%zv}O$EFdXjpQQ1yz2ZjF$;G*7t_t&*wo=h3+jQGp012dt;OEZGl!t7pC{^7
z$FeUrwLUnE#~DHD&#&;cbv)M#>Q$qL`B{VT$QNQdyEQhq#caVn7}MJwg8QZ@Cm>@j
zzWrbS`7gD#c#Bwzx2&=jcWJy^)^5Ey8n3Yw{~i(3QoNEFOL3nd%8Ev0UWrxW!b%*X
zGKFC6XfhC!PxEE)#yg1*3$cmMvJejozW1$apSUA&M2L0RL}*!u$6^v{1`5J>BE&Kr
zA~b~oZDE)cgdbSNLR!y)Pp^VqcWGVkkwe7RMR+<UF)Uq4oIu1_f<we6i?zTtCx~yk
zK8uAf)(|rm;1ILv?rRJ1LQLjxlLhlyV#e|tVm8^Vd0Dd4I*9?lZ55kC50rvVPK@c~
zgqXarcm;1#OdqET-ql7$h*vmbT}&6dV-klMEQsF|)5Cd!c*|-Y)*i?Oy}Lf9cZ*_j
zlCfsa<d~lI3eNY(v{Q6GC8k#^W0D$%3epWRJ?ayrtIadh{va>t*Nrj#S|5`c=0;#n
zjp^N1!JM;-cg@Vg9h+kMxFaUD#b`nO-k6^564Wur?v9|3(_;F#HzubT5`r^5rg!@V
zXUws?Lv;S8n0_6KNop7>NN<km(NRHqonu${AS0$<Ct@;(4+FuR8PmH{g84efuHoaX
zm_DA3No_G&c=~-YJv}d|V~*XO!LhqJrjM6ma*81#INdS5>r{d(aLlp0Q*?eyOur__
zBsB~br0<XE(M&;lonu${U~5dj=EP(U9|nRsJEnIF1@m=|UBk!QV*0o=Cbh+A;pq>=
z^mK)wc4?oX4?OInPp_P1^ig_tZ{}0mSj{K+)>S{fLT`t$JX@wp*yR$2&o69cOVX0<
zNS>tja^||{tsiY3%=(Gf^QGT=^np)5w(s+tZI3e@N_a8b-Xr-mOH$Tuk3(m~gFaru
za(g7dD2mr=1$)QK*p414V3cXqMA;o|SC3RL%GRMC_Ss?Y8}K_>L66j6Ku~=JWIx;8
zBee*~d%{>mO9ybAl3EQ+7>&RjWP5s~HUk45(*mr=1b&F!-Xpae81Ssb9Kp#*>JXUq
z;XI<TqpY|`I%j~wi3I3wR?;JN20?iopEu#k@><-;vp&U7Z<cH69;r(}RBwr1mvL1G
z29$aeuv-A*LSAHC)}akbiwSyBKodhy3wNv1W~$IDD#V*yVvx5h9VTp_z$Tfn7WQ*W
zr>VxJV2zp&GJINR6Fw-FFRA^UscYCBmw2YM%rbZiTizQsX61(#cu$YiuhrcYK4|5K
zCEF7{(ts!n8@2Ky2{u$5GzxKlglo^rkET-1AyF7<+{zN(&jQ1+0SX&(`e>5vcuxvU
zBLWn0?8;85h^R&lR2WrotjGzHm$=3ZRQR|HwwNSU64$ta3LkhuRI=nFt_gvPJci{|
zsh-Ft4Olptuq<6_CAP~!m^O~(;5hDA223}3N<c#6SPqWkL1oAUoEAXyIF^Iscvu-R
zL1zSX<v14Hqso}6!mOweHjV}PxH4hF&IxRUaV*#;mCL3YSA#WvN73Itf0=)1iYM86
zr1@Y$t|RzJ>1Dn=$MfuX8#-80b0kSp2N0?sOnJHOx#zQf?D?PTO8)+ZpVs|qWvDLe
zkruUTY2l+Dq56&<X-O1?4SIy?JMrGMgZ3Y&7LU7WjCp<s9{=LuK(LGk1j2&l9S;QS
z13i+{0O{k@3fj*O;(clXO13Zs2Ms^K4)sV$2FgMuPzTwO9w}L%62TSz&H&=|QM`3+
z0JJWdpYih}?Cu^ZT>z3y45E#r?4BMe(?FOg1mbRXFW$Zu2%5yEs1{r}?qT=!NZAGk
zEGsehvSU3`j=)5obo@T{0N%<rK;cBfqGPPKN6I%qdao>xgZTsOc#l+Qfb@=8LAC5;
zk5nW;bhjcr{pH8mgFTYRKv}4SRVP_pk5n2&g)L``%93f0cm*UB2E=kEIcUo**1d88
zbeRXEvF11(2_|rb0IxHHb=!>PGRcu_s!}Pczz}`Z7z=Q!Bi#h762LVAXyMItxJ~eC
z0S^l?Vja$Q<e0ENfsGJigjez$`KB6vQNv}vRfgq-jv^B{Ai(R)V2kx0N2#eweXxqY
z6lZiRWyz8{tS`kw+@meUX)BlFK3Xdpw7MDLK}mjifEI`rQ5F`J<VS|7VyjW84X)sj
zk{=zTnr)&ma$Le<JV_kw1`HhLL0~M$)5O*xU{PWd7UVgiJ7?f5bi%j<X@U4U1#V@0
zl9MD!233~<(Wj2~fmdTOPLRRUEg%tM6jtI?qPb{bOf<rpbjeLTy#f<4PRW^49x?S9
zC@`&vRI*ztBCbmU6**SP*^-yY`VCk(nXoKJswB1n17?XbK}Y0CK4Kd*V0tGl5lhaO
z>WOVgz@o$~xln2)x?uxnp%c~>Ngc#D62ygVUm6@Orin2sAfdP=HUX`UHWP460K?;!
z*kiOiI!xek0ge>61phflr>V+>s1k}>V#C$t=r#c-1<)F|1n)&huL*uxz{BE}FuTuj
z$%LH}*a&e;u=hI#Of{xOjqtc7EFW|XnZPpw94T%I{$a<6smg4yifQZBVWX|rT(H2r
z_3F0K*6V7pq~=J1q>f<gl`N&ZTYtIWYCrI~v$LP-`R5}zNQWIca7;dh&74**D?H3$
z?{x;dIZ+fA<*@f^#Fot{)5c<O1Y+;ij6Itu3my`}-{->C>qFSPspxJZntc!IQ-BM5
zFO2VJ4`B}{Fd|k4F`}^p>|yNT3{W_c03BqHU=JribN~vy#}eG|9Ab}R17|?MvjTF2
zoyG1=K&W3Kh-m33`!F_e1}2O~VD4s*V-F`VYlz46UI)L2eFPggqnIen#rHDIZnr32
zYt$C(_p$TXxf$g~by0qdJ&9eLD7Qqy;Cl_&Ykd^EHUk6_Q&1J4TJ{unZ30Ab%M23j
z9cNEt+h(9FR04I9J%fFlKp8#>KIP>PvS+bjGm1s0L~$Ma7<Ou+*zk#XlFLuAkM~Gk
zqui)2T0g@OS<6Ma#V4YXM)rvwslot-cSL}i*{6D>N&&L?#IWZ>?9)9`m4UKQ39BAr
zpXrgR1<LSA@aZ9cn0*!xxQt@aDN+0g`)fSp62*p3#1lgPDEk~9bQ$GFb<w&cvFGr#
zO8_iR5v|xI_B^&p1}eNO0_Bw07qDRxD2rPRlM*EMMQoi6n1xJOmL#z+VG|XEg>B5|
z9Sf!i+AbiW1x{>17adC`V21$4o1&1hFPBt1ed8+l@amkvCYi9hX~wqPsV10ebcz~r
zp?G1CC#lIMXqSK{hM*SiR5jgHp<7f?f?q@tyYfucZGv4CFqaOqaAvDHCUCC-HqU3n
z;yg9q1nv{yb!M=IzfdhQRk<Xp=r->#m_2H#3Dz%Qy3N7KWBAysmYcu>2H0dqh`B<o
zG=T>N*le?vze=q(RT&ahbene?Hv3e+2{tTXy3N6nZP*-8>rLPh18lN6#N42^n82d~
zY_{3T->SBms*DAz=m(!IU5+w5kQvtxK4ZLHJNRU+JopUIHgjC7yCr-_AU`}zTgwSi
z7Pcjj9~q;HlSUzCukk!aesq#*UKWKBHw8HNOcTYFfdYkTk{QRIIpUfYsK^@woO%|B
zY{r0vlj$S$ES^J3cCgI~SftGXjy(x>aLpMYaD^tQaqvkcrmF%Jaf5)PkDI9G4OAGF
zuqs{3Bd!I3GJ=0_?ZvsLh-elK0MVGX2{`h2iD5|qj0GT1w2>`U5(OTBX&<54zSf`+
zh#bjB9Cm@QtO3H7JgJ_DoCXX;rV%Y*`BE#fB?y>h6)@~7lsbqm$-r6Ygmpzy7x5(v
zoZ+M3S}c2{ULs000HT8eP%8BkL%IMMJ`xMH?3IRyBGW(^6vB#fX_PqJ0%7ryXsSY*
zAfjvo7TzfVtCXgQEl0pCJ~Hg8l4gl6&%jyegmu-@Jn`iVoZ+M3$}Ib&B_b*`0HT8e
z;Fp{V7>WeI@R3-x<$#o|fWl)S3<_aIy_88Dr2=8`k!Y$x${`}J0SoVxfVD`4#8xg~
z79SaQwMwN#S7G2Rbi%qese<?_gSfB*^SC-;3aC{A653CQquZo<*#xW>z_9&<ICxH}
z(<ZD>U?c1&1pACSYpUTFHO%`7K|ZHmH9-Rcx^h1uxaZXcQ-yj_LF^|4@1nY7f;9+O
z_<llgN=`d{nLW5;YB9j(sK5lX)0tobw+gU%oeRbWCis(_$)+l8qKep02<B90x(U`U
zVBz}-!I|lFo4_3g*ktn#!{%&fjtP8DfXz0G{e<ApbLN|>bc!lsKOt-`bQYOlT>=)q
zpAeiLXQ>I?ZGcTS?=)=oI?GMqivn!6S?nhSe}%KsRHZjq#q>a;OQr`BeZd0r1BpJF
z9!OjYmeiEc+n`&u0kIa}oc_~K?Zx<D9(rH@7RHxscc47w4dp@oQ_c!YVKtiS8{14O
z@gZPN-*?n&sHWmoYv6;ZdJXw{YsjL;f5tY_OukCf4NWuoDvho1RoWY&e#EE|^i|p$
zAz#I)5%krKv=O@JG1>^;^BZa7x1%3frhA^H-}5ZfJ<nQs&$CSTJVuS+J<l@T^B6UP
z_x#;9>W(YyU0+2RiN8hTs&45?nRYc1e#L<nGs*giv{gRf=3;NZ{n}$MUpaVzT{!y-
zRQ@x0^D83%OH2M=Ecsts@=OY^FI)1eCGWE26D|4mmi$IbKFyMU&SK9OLisr)8Tuuz
zT7SP3D%bKaSn^-B<X^VrU$x}FVadN{$$#6D|Bfa9Jxl(rP+r*m?{(Gs|3;`iEq}$5
ze^ca3Hp^Eo;N=2)JL54^=9nCoQ(t>65BsXyA^Rbts6Gjqflxo@A$YjU@EDb4Lh>LU
zNCm_PX@Imtx*&a!e#jtX7%~bOhfG4IATy9T$UI~bBB8w`NG1eXMn8g;3CV+aAQccF
zqyf?n>4Nk@1|br}I)&~9PX_e#Z$Bi_rX?f3)PZ1g#FBTF@6-b^e_MtEp(7@WZkhgX
zl~~9ak*ziTN)1(!tREU%g<<_~Q#8%MFgC9Sn=SdRmi#T2e6A(G%aY%1$?vh`-;L(R
zYV}T|{=ZK&A4Cj%3Gy1mgPT<W@j(KR21q-k3(^M}gp5KaAv2J9h&d)_gM-$FLgIpW
zAr+7+hz}BgG(cJ*?T{`=9|Sb-D3*@`KM9$E%tIs)BtbGEc@X?()(QT7w37in{iDF~
z{3@~jNf5jn>or&XyT3&J1u$(5h+6tiVt?p2#HcqbKC`k)=->Qq=nown{;i>ZFJ_f_
z=_#?~@37?eTk;1j`6HJ6-In~lmi#eGzSfdIY01-$&us4*OTO8Xf5?)5#FBq^>HAN%
z^u0ESHQ*)4YY<wmXst4@Q|2{l5M`r~NyrRj9wMP$5+oCn4atKPLOc*Jqyka}@j(KR
z21qNU9nuBqgJ6*SM%O+M2rD2yNCTuD(go>*3_?aBlaLw6JVZi2k|3FoJn9qdv3{!W
z2e2~(diqC!_n#;>NBQ>}2;N;gqd4b3nL64pWNJ%qw8HCLc@H0b{Pkw_u~&aV&pX(K
z?_c=E&etz|UC(^|@gFp=)snS;Zl~hMUUgmg`h9=+%Hg91`ojM{`wzbkR(Sjek2-=$
z0$uptg;zA3_OkPJy-woWhwdPT3;!Is{JR&_x4T|NW2;d-O;2<F@RiC7KifH8fqzF~
z_REzg?}fJZ?cCaP8R*p3peg3o4|bO79qp|A#og2pJ!RVY@;y~mwdWE~)*vGQuV~x;
z|MQFcF3eU(u=Yioe|m?=;EMgQ_UIp6xOU+e=2lIpzo*vd8Q1;ySv_MyCB7Y{XZNF~
z(X$UkZe#V%9e)R%Lwvc8&V^8`buNUuk<J;lZ@6>s4)6cZhj)0GdC?eA7otTX6J(WO
zWJ3MN3~XxveG#kwb<EljYPDG#LfuH`jM_IkYc2PT7P{3}j~7Fb)$UmcbtBy}YTszL
z-d$_oU284d9#a@uZ6gtiTC2_45b8#Tw^93shxc!DNLsOBwS=5#TR<adTv+YSg-|zg
z=ZxCFxjRSu{n-245Nfr~g-|!rIivP(u5<LY?bw|Qp;qf$2z4W!Giv|lI!E7ViQTyn
zYPHUVP&d*!qxNsEbLw?<E`(aGb0O4?bk3-KgPo(ZD~_ygbVxtgy-fo>bQrw_ncyMx
zU#eeuEQboErrZn3lz5>8FK<yQm~Xb^KO^$5FgzQ7M}K20gulK&rWL|p-=EE5_5L-?
zg<o%ydU>w2>!hoXciZ@FiG0rt=eH;Fy@|Xyk(VU$vP6DIBEK_{?@#0h68XVIekhS2
zc}eQy>VGlGg}obHm(b-)n(e!BO_c6dr8iXR7FF7=N^4XpQI&F4X`PBc4WdfhROuV4
z^i5TIO_lCZrF&KBK2<uVN)M<~ttuT?rIV`kpeog=(kWFsqe_jc)T~M$Ql*Df>0woR
zM3o*@rL(H^VO4rul|G_MPpHy)ReDmDKB`JjsnXM`^o%M!t4beJrH`vpk1Bmal|H3P
zpH`*MsM2Ru>91AkbE@>5Dm|}CUr?nls?wKK>C3A0f-1eJN?%o_msIIxRr;DLy{bxI
zSMe88RQ%}?6@Mi}#ozN#@s~GL{Fso6-wIOkOF$}q=SRh__^9}e9u+^pqvF?f?sWCT
zA^m*6=9Gdm7k(v18sHf;BnEl6{rZQ*i_#!k{_T=n^k<`M2re1Y`nDU_=tHI(9^Lj|
zZOC-M=sw5*WEe6AnS@M3<{%3YNyc!3q(a<~JV+753#o+oAoY+|NQZoz3%}?g4f8#k
z(=ep)?RRN}-$X-dly^I?e@J~*8im{66|)a=;g5~3F}QS0^UZEtqYueG+>!rsL$V7-
z4?u<?V~|P6G-M940KpFt;7foQju1B_4^jm2LMkCXNIj$#(gEp$^g{X}Ly%F(1Y`;_
z3z>&3L7a+;?@y`thLno0KdJa`lZx*xsrXLPZr3;*KF)8`oQ@$q#n<!ooA|d<c*+*n
z99Q_p4F2sDzG;nXfxGzLIR5$?{#J@hvaJ)DELVcfC`ogr+A<KGvqb4Seq{&piTod2
zJT1lL4%S=G-%4}kg)&*Lq9BP@;suE}NCJgM;x$MrL-o>JzECF1Rc|I~1xc%gq}3ql
zu$emAZ8LSWFVvkB*FcaSz0PtChf301W1t_ibac$1pA4Cm=9&&=vRrd!8y7&bV6kz*
zAdzI<v2a0(D?!#>j!c#-HB^%3a?2TrUb@SLx7@ODd0wbqnyV<3$#QwkB$Xhkw2)L9
zB)$+d#Z_-6X$_U6xjI17VIk=-NV;T`%ll-L%Ljra+SnQn(rYds3zej~CP6<Lq(`YX
zEG7;5>5y4zuDMVq%e7#(QL<-XqJ?`)vI}n|*bOgZEQc~#F1Ovd85p`C$+M8;86-ua
zdTB0iD3j%?G?Vy1;<J$W43hd#y);*AD3j&tFq3qFq{~9mWsvlS>ZQ5*LzyhskeOr@
zB%>CRQG;Y6R4>gn70P6}X3Zq?Aepz2%o`+2p?Ya9r($?H%ayE{9Gj_RAWVhdolHgC
zot#j;G*@9LljSNklT?7D!a`DEkW?#cq-tfOG{HCFim;UE;xcmUuv3hacpU$Z3k$qR
zjRjNHJb^zoZCj8&RxTALC-AEq5~tJnX1-3@#Z&l3B@MAMSCJ7UZ&MVc3y|K$Ren$@
z3F^>Gtz=KI<Y@GgxRQS}vu?pVXcN{%sq-7KM)%4)v*tg#&Zqb~p20KZj4sam;@Q)#
z6vm#~wu!N??M`DXffr}c=N1oU(Wg5aw=h;NpZ$wAwKSRI3x|9eA2{CF8IR9Z$ZS(r
zyq&IT-SJK;%u1lw&G@_pXInJ*Evb~=o=&g1_zXrIE4XMMu#eiO>~6~KzG|10WF<$*
zrrd2FrBVqf?Me>e_u}&!oE7KOYe^x!mKD+K9Uj6S7*nQ{tBT!GO1Xon_#Hiuqsrl>
z+@X3$JAV3Vz)?=QBcqPXjyZ><R#5I}vYL$_)TmS|iR<1fdcCijUXS_c^#MP<)&}VH
zcs;$IY@pW%Tj;f}l{gwNssrk%I;FNzuK6l9BFXqpYdhsW<iXcI1I~752jw2>cJ@0*
zoR^*FDEIK3bIF+$mmSwhxkrlPD&qWcZE;<cd$cR=QrvLdWL!7p&d$ay#wEnN<1bR~
z!-etX@xJ)h_+Ik%`ImPwWyyA4;^nqDwtmU>)YH#@<C||L@FbqY^LQ`kGJERzUM|b*
z>E~Spc;?xjPkiRHU-;4suk~_8X3u<~m#Z>+7MD1gee8?9+$FP*<FZC(JzwhOi8A{H
zF6(6WsW12P^)mZ3E-5nm%nQAIqs%^w%O=jyLK<h_xQR2=&EO1mvN!{FGiNXKlc_Iv
z#ut#SFZXh<ynt_>%HRA(m%X2Jg?;1AYmyC$*S>iP3Rz*_eDhiYDZcgEFcgZyUi-;4
z&H8VB=euwG@Fze0c`{Gssf76Uw<ds4751&4TyvA+^>5EY5vQ<kzjX~CQc~payuJv9
zOJT3Sb*+dL-~CR4($Ci@>^ncbhL0{O^7p=*2}Pp9zWdW_m8AIo_X?p{r?Bt+>>57M
zq{wf4zZ{D73j6-guGN#`hi~|xNKx1uKfi{LIVtj+KWu?wqr!gp^K1R&k~jOwB|qsW
zm%P<aF8OIcx#Va4<dUE7X09dMFY|34d%)hU1k{2rA^)pFTdBRl-m5gIQ{<pu{W1X4
zw{Z5$f-j@^n#Wdd@30Rl9qJqvU;9-Xinnt1tAb;2tX5p`fRU;-Qpb(dgGQ>(NS!iL
zXN**%k!m(lA2L!88L5Yj)FVdfaU=B+BNb<)o;6a>7^$a>)YC@l2_tphNIhw!K5C>s
zW~4rDq#iX=XN}Z{MQW=oQb)OwGIRqpR3%KD0h&4qJb(lyPm-3vd`af@&|t=-Y6;Al
zblw0BW=$p%+8}lFY@W{xc`5huN?rwE3lNx4ZY_Z+m8~T(sd9KLiZHG6v;-zrK5v5t
zQ>#!*Y?4_KZ-*vL#^?4Zag)qSc?S|1GCp<Q!L?~$&MRPHD?bPQAfMoq{3=peGAq|q
zn`M09kIJ^ltde&ku~o)L)hV%!GwS0loKeTNb9`!jfah{XChy?*{Q3Y^c-E%(tPSmT
z@*zIV$M`tE%%}J)$_qF?;y%E4b4F&}#u>G=hqF%L;LTp%6_1bqDe@rHBg!z%_yKOW
zd29ou9fHA=&|=yTYT9Aa4x^P>XfgMPxD(hh(vE;}5n9amVNE+p+EG5jlN`e|=|^}1
zu+yX+<D=XSEoT0xrkx}0I4m!O7Sn$WKfmm;Es%Bsy(xzlF<@NNN;0&QaHJnv1cC{k
z3~T~vFT=U5&>|X4YT8uNPQe?U&>|#UMr88X+@zg`hx(vJT$s|dd8D1;(|j1(O$wXl
z>A)6|c9zfZ324(4eCU$2UeeCN!!yv{q_A0@39UB5=J*0%gaeXnskTg8w#{er+bRiu
zm7@so428{Ua35*sF&Yx^ORZT7yUN`l(Z<X?yq#=w+p28U@IsYbEzisK1Yh9uJQMKE
z3O@Qt@K(|;qRo70w<v6ZXG7aTTDxtLd!gN`utiNfOe4x}8>SKE#04WN0T+y@BwR3}
zl5xR^O2q{OCmk0IoJ?FWaNM|H;AGo6=&lsn@@?I?+xY$+5~T6i3T^$+?B%S`HbR4|
z9Bvw+sal0TjL=l2&WzB~=Cds#fvM`(5}2w1+Y&UGs`W@{j%={C*xJ!r7x?>Zmu!Q!
zAs{eS8*CDIF;!c%1g2`M%?=HwYMYk8RBg98p}|z`&=Q!c=P*P@XsUK<2~5>4TM{&w
zs@+-wGxDM>85+#UUM+zc*=I|I1~c-Kme?k<ep@;;x5#WjOKg|fpe+-cT$v4Ni5)T<
z#t<9fyJR+kgw~l+Op;04W!sEx7Cn|^r%Y`Z$ZXV>jl^!5jcJM7WHxTgfo6})CbY!u
zGMlvJL9<t8m$gK(%%*Jl(3Hq*T1%A4Y{pgy%^fnE)e?7dMy|$JBgxSRI3w>K<cvIb
z2!jBZBNzm@9K|5O<!%fDT<*ajz~x>H0^RUbIaAJ-^W;L=C;R0FxkYYA`F$82xE#ai
zz~upq4qR$6I&eA88Fk<!XJqw*7$CURVN_s(V^nzM?)U*3p4D=d+=ZX&LddDY@GiFx
zlhz0QC1??HXwaA2$4Kjkei&MW9G|=Z?IdXf&`&^%kmJ|1)1<A3eimAUoPfLt>>Ozu
zpkIU*AqNR)7f9OzeS&kGLQaFc1g&I;wiWtJXc2N+G;IQD+n_Im79poqmh9#BRMNIX
zUk)uoPMfB6lePnTAG8QL?Xn$MZ4h+GU2?bFCts2W<so@g9+M~W10sN*LxmQ=5sNxB
zcoAtkq3?tivFM!a1c{flUC{SIi&)gDX)8(F4gC<bh(%p;0<b>PUW9%eT7;Z#O<Pae
zUg&3_Maa1*Cjr|^+CJzPphaZq)wCU?y#&28Zk!@ZpPUSA7is&UPlpzf<&viDCG7z8
z`Ot1tSihVKY(HrSq4z?23sx3QJ4D(c=&PaKj+I4D2X>US!_YTCn~Rl2(@v0f1p0H(
z?!d|-X97D#+EM6xq1}a*Mbplbb`1JKXbZ5i$ZlZgNjnbx7__^wvS`{R(oR4>4ef1M
zS>$YBoeH#*(9c7=2P=!FO(yMS=<V_2{C2D?at^TC4ZSSS$g>!EOSowX_GEjy-EGe#
z_!KIn0=^eZjt0*m?KJdx&=zCK!HqAs7m{`c`ci01u;ggkQqs;sUj=O$mK-@B*b36l
zLthW=9awTS?KsCwpU2F?OkcnSGkp;k%=9H(Fw-UbIL&lBE|}>~TrkrUaKTJZ!UZ!u
z85d0GR9rBj({aIs&cp>1+Kme)bT%%S&^daybL{!{Vf%zVf&Nq}{y@pBvZ##HOwR)h
zGd<tlMU$)4jvX|n+$qjH_CC^-+e__j(466{)ILoIwYAL4*3VKZV85y<zJ1q~4cZ#m
zWxr$}Q6?3?qt%h1W~yE4C3TS?FE3FX>9$|A7xduNBo3<Lh)Rc3yA3$3all=|IW~#1
zYkz(Fl?}<H8o_8w*ASVMov>fFU!n8YlsyNBT04%X12~3O;^3I$%qE<Ty_`eHIr~+6
zzQ%R(r7If>NwtWBu}4!io^Cl)N~$EBl*={x3d&|G*-Dj`t)^^|;!*rs1y&aD2S`;8
ziyJgV3uXN{TWdX|Bepm`i-U8UR`m_<l@0BLZNZ;=Ij5^Wc4b2srMi`i8rLQ5wVzP*
z$20~h`@2n8M4_0(p?pLuAEoRZPUz#5UEAVkfeBJADw5-}rmFkLnGI8<N_M0=W=N&X
zQr3;5yfzC89p(6?>psT}ewQ>~#f}5NCw7%^4wh@1CukAQ{EMW)GK6foqtaoQkv;JT
zTO3Xqnt-F;p><h25fIM;=qW%FL6u~}wc>$6I%Ss}nUtqr&d#PhmK<dJ9Q}@bEn7(0
z5yz;*L)kyh-OEc!Gl548<)m5r(AFPqs36rWo;g%$b*d@5fZt5@YluzkWFSB)`t{NV
zO~opk{4J!)gjsE*;_Z~BpZ?U$rw10|p@Vqba84udB%D{RP`fGXkeJd-iGX@Z%i~-B
zgOpgy%F0@X2-^*!5l!{N*p&^Vq`HL18RMFYhTjCKM(}*&GO73!Whd|pZ8I7ofgLzK
zODg)Uw5ysbnFX5WNwtUvA=;fwaArDv&K4(D4yQ9NJ+3;gA#Rbdh#tVvFOb>oly%yX
z&2(lvlPJ5kIdHr+nN&qik5lWoc$y-fqtFwSbi)3@@d8ICLCf*HC0irQp{ySdU-GqV
zA!S>fZO$uf&62Gh4`H(Luw^pNjRz?nt+{`B@ydo$LUlR2o#mP;h2i#*st*rtsz|k=
z;LA!iX@>D2$FG5WjfZ^!QjI$&oeiX7EtH*g&N<sO#Ls?!c|@uO*n5st_)t$`CutJm
zlH#<k(Sso45s-NJqt%XM|2OX<VbkN>aebuvz+c)fk)jYa1~kl>Gl%_yr1Ih^(y*qY
zn>Ru#A08`>8LDwoHN>^XO=_yA-n_EmGO0S_y5goa6~mAF&5)`WX1M4n#bDf6oIO4@
zzAC;xeon)zV=w*aDq)83lxjg!ec|GdHY}2AEN&uBQi7edE6~iu&7zZuOE&QwOFY3!
z5U?bI&EqLoDrwfHux;zpN#%^kV=qm06Pw<UO{&!R%=kP_<@cO9lTWJr_`>)iO?AB4
z-{>J#DV~veNrkY7Y&9O3RZ<pHLariBeSAy&cj#$UXM9(DcYHM!_QpTsQ>OSa#&X#-
z->lAJlRks3$}BIyALQ9f>Z?3OoyUf2fgi*z#EC~y7E!vy3-ARwt)kuLQk*uIYPXdw
zJ0S@+4Vh$9lqB1p<z(9)oP3UDu#9!-wq0tbZ5K{ydzRB}PcFL&nTxZJOUVI2HY(>4
z=P?|9Txy}s6_;<@zg!3@(m6fg^w^4*OKru>t8<ovvjUtI;4HU2y<DktR)Mn`Bvs(_
z>70IK1K{+7F9506IUB&)0L~V0w(6X1;A{tHJ2>0G*+B%kIO=RxyKI}~PTOXs%T}=5
zZQD!gi?$TC*OsF6>3o;KcL}BawgQ}Gw2Ff;W(chh!k8h*u#Ox7as*9`!b4+v%j0Ny
z0xeHKJq`~|5;7MD6qhmug3G8pO`OMYFmb7~=*<jzG7Fj0Ij@5ADta@I-Yn>xi{M-W
z=Mp#<(HlwD?vGto6uZ1<*(vYANky|WNp@j9aA9TGznlz7)sg8yrpv|4nQ}1>B-)+K
zmUpQ+@-ChOf^7Ne<vc>>;z;6B3PF%Bmn|0&=P~9%wp4b-dB9f+@#>uA;4BAc1vo2p
z&MI(LgR>f(Rp9jLNI#H%r~<IFUbnLW&9s2G0emfxRvp;}WE(i!!P%j6o&#qmI6Fab
z4xC*&LAShF?UgrU!@e2oMZt2PyqC<sB&VqTa*8sb^9_P;5T!$M0d~lmhepuyC|Vvt
z2S*`eI&vJyaWpXj8z=RaFQertv^)j%W%<eFX+q{=)9F%XK`?{LbGnDFB0CQcT}4mk
zAqzU^A~+Y(n<ex{vTI(q+jpr>`!4RZ?^(9npI%O|Yn(}T+%`LIo4sr~)vkFx9obB~
zD=yu>e>oH4CS)S^n~IWcFJ8{E7h_YYapr@w5S)eJ%m-(Y&glVXDM&ov^y-}0oU0Y!
zEC*i&q*CXs0%sLCtHJ5hIsM=afHMG2KRD}k&IWL{fTRJOtvY8LvhCn(17AC&L+3mP
z&U4`G1ZS7d*$vK%;JgUVZgBSMoPFTD1d={*_UoJj$PR*Y0DOaxA)Rv=oWtN80q3aB
zIR?&gaE^m>44e}>=Oj2UgJcq%Q#$7~vNPbE2Hy;1R_B}p=Nve%f^%NyTma`HI2XaW
z0L~?yQ&L=tU2&<Bf*`4A_b36`B*hh%pzL2xf+Q>2JxWy+B~>Y2PFISt$JOqUTiK;%
z<Ne5NWzVu(d3rgAkhv@mocSQh181SmS%j<yoJHXCKuUE^FF3v6EC*+W&RGf0DsWbT
Rvl5)uN(RFa;q=OU{}15<Pv!ss

diff --git a/Source/Modulos/Contabilidad/Model/schContabilidadClient_Intf.pas b/Source/Modulos/Contabilidad/Model/schContabilidadClient_Intf.pas
index cce81a86..9ecd6659 100644
--- a/Source/Modulos/Contabilidad/Model/schContabilidadClient_Intf.pas
+++ b/Source/Modulos/Contabilidad/Model/schContabilidadClient_Intf.pas
@@ -3,21 +3,79 @@ unit schContabilidadClient_Intf;
 interface
 
 uses
-  Classes, DB, schBase_Intf, SysUtils, uROClasses, uDADataTable, FmtBCD, uROXMLIntf;
+  Classes, DB, SysUtils, uROClasses, uDADataTable, FmtBCD, uROXMLIntf;
 
 const
   { Data table rules ids
        Feel free to change them to something more human readable
        but make sure they are unique in the context of your application }
-  RID_CuentasEspeciales = '{7010703B-8175-4A1E-8756-C0E20C516FFC}';
-  RID_Epigrafes = '{0EE6E73B-71AE-45FD-B91F-3DEC9485EF9C}';
-  RID_Balances = '{C15D38B4-0D4D-4236-90BE-662998D63281}';
+  RID_Asientos = '{C51C5471-A7F7-4A0B-B124-1FCA17F1EA4D}';
+  RID_SubCuentas = '{BBB2A9E5-DAD7-4E8B-A14D-CC7DEAF2D283}';
+  RID_Cuentas = '{A0EB7B63-501F-4E40-9872-5E70A1EE346A}';
+  RID_CuentasEspeciales = '{8714C12C-03FF-4FB3-98B7-76533DFDD66C}';
+  RID_Epigrafes = '{1E81E57B-5402-4881-A28B-2927146E071C}';
+  RID_Balances = '{39557F67-321F-41E8-8EE0-CAB8216CD882}';
 
   { Data table names }
+  nme_Asientos = 'Asientos';
+  nme_SubCuentas = 'SubCuentas';
+  nme_Cuentas = 'Cuentas';
   nme_CuentasEspeciales = 'CuentasEspeciales';
   nme_Epigrafes = 'Epigrafes';
   nme_Balances = 'Balances';
 
+  { Asientos fields }
+  fld_AsientosID = 'ID';
+  fld_AsientosID_ASIENTO_COMPENSADO = 'ID_ASIENTO_COMPENSADO';
+  fld_AsientosID_SUBCUENTA = 'ID_SUBCUENTA';
+  fld_AsientosFECHA_ASIENTO = 'FECHA_ASIENTO';
+  fld_AsientosCONCEPTO = 'CONCEPTO';
+  fld_AsientosPUNTEADO = 'PUNTEADO';
+  fld_AsientosDEBE = 'DEBE';
+  fld_AsientosHABER = 'HABER';
+
+  { Asientos field indexes }
+  idx_AsientosID = 0;
+  idx_AsientosID_ASIENTO_COMPENSADO = 1;
+  idx_AsientosID_SUBCUENTA = 2;
+  idx_AsientosFECHA_ASIENTO = 3;
+  idx_AsientosCONCEPTO = 4;
+  idx_AsientosPUNTEADO = 5;
+  idx_AsientosDEBE = 6;
+  idx_AsientosHABER = 7;
+
+  { SubCuentas fields }
+  fld_SubCuentasID = 'ID';
+  fld_SubCuentasREF_SUBCUENTA = 'REF_SUBCUENTA';
+  fld_SubCuentasDESCRIPCION = 'DESCRIPCION';
+  fld_SubCuentasID_CUENTA = 'ID_CUENTA';
+  fld_SubCuentasID_EJERCICIO = 'ID_EJERCICIO';
+
+  { SubCuentas field indexes }
+  idx_SubCuentasID = 0;
+  idx_SubCuentasREF_SUBCUENTA = 1;
+  idx_SubCuentasDESCRIPCION = 2;
+  idx_SubCuentasID_CUENTA = 3;
+  idx_SubCuentasID_EJERCICIO = 4;
+
+  { Cuentas fields }
+  fld_CuentasID = 'ID';
+  fld_CuentasREF_CUENTA = 'REF_CUENTA';
+  fld_CuentasID_EJERCICIO = 'ID_EJERCICIO';
+  fld_CuentasID_EPIGRAFE = 'ID_EPIGRAFE';
+  fld_CuentasDESCRIPCION = 'DESCRIPCION';
+  fld_CuentasID_BALANCE = 'ID_BALANCE';
+  fld_CuentasID_CUENTA_ESPECIAL = 'ID_CUENTA_ESPECIAL';
+
+  { Cuentas field indexes }
+  idx_CuentasID = 0;
+  idx_CuentasREF_CUENTA = 1;
+  idx_CuentasID_EJERCICIO = 2;
+  idx_CuentasID_EPIGRAFE = 3;
+  idx_CuentasDESCRIPCION = 4;
+  idx_CuentasID_BALANCE = 5;
+  idx_CuentasID_CUENTA_ESPECIAL = 6;
+
   { CuentasEspeciales fields }
   fld_CuentasEspecialesID = 'ID';
   fld_CuentasEspecialesREFERENCIA = 'REFERENCIA';
@@ -65,9 +123,318 @@ const
   idx_BalancesDESCRIPCION3 = 8;
 
 type
+  { IAsientos }
+  IAsientos = interface(IDAStronglyTypedDataTable)
+  ['{5914B799-7DB4-4B85-B63B-BA4CC1827CF3}']
+    { Property getters and setters }
+    function GetIDValue: Integer;
+    procedure SetIDValue(const aValue: Integer);
+    function GetIDIsNull: Boolean;
+    procedure SetIDIsNull(const aValue: Boolean);
+    function GetID_ASIENTO_COMPENSADOValue: Integer;
+    procedure SetID_ASIENTO_COMPENSADOValue(const aValue: Integer);
+    function GetID_ASIENTO_COMPENSADOIsNull: Boolean;
+    procedure SetID_ASIENTO_COMPENSADOIsNull(const aValue: Boolean);
+    function GetID_SUBCUENTAValue: Integer;
+    procedure SetID_SUBCUENTAValue(const aValue: Integer);
+    function GetID_SUBCUENTAIsNull: Boolean;
+    procedure SetID_SUBCUENTAIsNull(const aValue: Boolean);
+    function GetFECHA_ASIENTOValue: DateTime;
+    procedure SetFECHA_ASIENTOValue(const aValue: DateTime);
+    function GetFECHA_ASIENTOIsNull: Boolean;
+    procedure SetFECHA_ASIENTOIsNull(const aValue: Boolean);
+    function GetCONCEPTOValue: String;
+    procedure SetCONCEPTOValue(const aValue: String);
+    function GetCONCEPTOIsNull: Boolean;
+    procedure SetCONCEPTOIsNull(const aValue: Boolean);
+    function GetPUNTEADOValue: SmallInt;
+    procedure SetPUNTEADOValue(const aValue: SmallInt);
+    function GetPUNTEADOIsNull: Boolean;
+    procedure SetPUNTEADOIsNull(const aValue: Boolean);
+    function GetDEBEValue: Currency;
+    procedure SetDEBEValue(const aValue: Currency);
+    function GetDEBEIsNull: Boolean;
+    procedure SetDEBEIsNull(const aValue: Boolean);
+    function GetHABERValue: Currency;
+    procedure SetHABERValue(const aValue: Currency);
+    function GetHABERIsNull: Boolean;
+    procedure SetHABERIsNull(const aValue: Boolean);
+
+
+    { Properties }
+    property ID: Integer read GetIDValue write SetIDValue;
+    property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
+    property ID_ASIENTO_COMPENSADO: Integer read GetID_ASIENTO_COMPENSADOValue write SetID_ASIENTO_COMPENSADOValue;
+    property ID_ASIENTO_COMPENSADOIsNull: Boolean read GetID_ASIENTO_COMPENSADOIsNull write SetID_ASIENTO_COMPENSADOIsNull;
+    property ID_SUBCUENTA: Integer read GetID_SUBCUENTAValue write SetID_SUBCUENTAValue;
+    property ID_SUBCUENTAIsNull: Boolean read GetID_SUBCUENTAIsNull write SetID_SUBCUENTAIsNull;
+    property FECHA_ASIENTO: DateTime read GetFECHA_ASIENTOValue write SetFECHA_ASIENTOValue;
+    property FECHA_ASIENTOIsNull: Boolean read GetFECHA_ASIENTOIsNull write SetFECHA_ASIENTOIsNull;
+    property CONCEPTO: String read GetCONCEPTOValue write SetCONCEPTOValue;
+    property CONCEPTOIsNull: Boolean read GetCONCEPTOIsNull write SetCONCEPTOIsNull;
+    property PUNTEADO: SmallInt read GetPUNTEADOValue write SetPUNTEADOValue;
+    property PUNTEADOIsNull: Boolean read GetPUNTEADOIsNull write SetPUNTEADOIsNull;
+    property DEBE: Currency read GetDEBEValue write SetDEBEValue;
+    property DEBEIsNull: Boolean read GetDEBEIsNull write SetDEBEIsNull;
+    property HABER: Currency read GetHABERValue write SetHABERValue;
+    property HABERIsNull: Boolean read GetHABERIsNull write SetHABERIsNull;
+  end;
+
+  { TAsientosDataTableRules }
+  TAsientosDataTableRules = class(TDADataTableRules, IAsientos)
+  private
+  protected
+    { Property getters and setters }
+    function GetIDValue: Integer; virtual;
+    procedure SetIDValue(const aValue: Integer); virtual;
+    function GetIDIsNull: Boolean; virtual;
+    procedure SetIDIsNull(const aValue: Boolean); virtual;
+    function GetID_ASIENTO_COMPENSADOValue: Integer; virtual;
+    procedure SetID_ASIENTO_COMPENSADOValue(const aValue: Integer); virtual;
+    function GetID_ASIENTO_COMPENSADOIsNull: Boolean; virtual;
+    procedure SetID_ASIENTO_COMPENSADOIsNull(const aValue: Boolean); virtual;
+    function GetID_SUBCUENTAValue: Integer; virtual;
+    procedure SetID_SUBCUENTAValue(const aValue: Integer); virtual;
+    function GetID_SUBCUENTAIsNull: Boolean; virtual;
+    procedure SetID_SUBCUENTAIsNull(const aValue: Boolean); virtual;
+    function GetFECHA_ASIENTOValue: DateTime; virtual;
+    procedure SetFECHA_ASIENTOValue(const aValue: DateTime); virtual;
+    function GetFECHA_ASIENTOIsNull: Boolean; virtual;
+    procedure SetFECHA_ASIENTOIsNull(const aValue: Boolean); virtual;
+    function GetCONCEPTOValue: String; virtual;
+    procedure SetCONCEPTOValue(const aValue: String); virtual;
+    function GetCONCEPTOIsNull: Boolean; virtual;
+    procedure SetCONCEPTOIsNull(const aValue: Boolean); virtual;
+    function GetPUNTEADOValue: SmallInt; virtual;
+    procedure SetPUNTEADOValue(const aValue: SmallInt); virtual;
+    function GetPUNTEADOIsNull: Boolean; virtual;
+    procedure SetPUNTEADOIsNull(const aValue: Boolean); virtual;
+    function GetDEBEValue: Currency; virtual;
+    procedure SetDEBEValue(const aValue: Currency); virtual;
+    function GetDEBEIsNull: Boolean; virtual;
+    procedure SetDEBEIsNull(const aValue: Boolean); virtual;
+    function GetHABERValue: Currency; virtual;
+    procedure SetHABERValue(const aValue: Currency); virtual;
+    function GetHABERIsNull: Boolean; virtual;
+    procedure SetHABERIsNull(const aValue: Boolean); virtual;
+
+    { Properties }
+    property ID: Integer read GetIDValue write SetIDValue;
+    property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
+    property ID_ASIENTO_COMPENSADO: Integer read GetID_ASIENTO_COMPENSADOValue write SetID_ASIENTO_COMPENSADOValue;
+    property ID_ASIENTO_COMPENSADOIsNull: Boolean read GetID_ASIENTO_COMPENSADOIsNull write SetID_ASIENTO_COMPENSADOIsNull;
+    property ID_SUBCUENTA: Integer read GetID_SUBCUENTAValue write SetID_SUBCUENTAValue;
+    property ID_SUBCUENTAIsNull: Boolean read GetID_SUBCUENTAIsNull write SetID_SUBCUENTAIsNull;
+    property FECHA_ASIENTO: DateTime read GetFECHA_ASIENTOValue write SetFECHA_ASIENTOValue;
+    property FECHA_ASIENTOIsNull: Boolean read GetFECHA_ASIENTOIsNull write SetFECHA_ASIENTOIsNull;
+    property CONCEPTO: String read GetCONCEPTOValue write SetCONCEPTOValue;
+    property CONCEPTOIsNull: Boolean read GetCONCEPTOIsNull write SetCONCEPTOIsNull;
+    property PUNTEADO: SmallInt read GetPUNTEADOValue write SetPUNTEADOValue;
+    property PUNTEADOIsNull: Boolean read GetPUNTEADOIsNull write SetPUNTEADOIsNull;
+    property DEBE: Currency read GetDEBEValue write SetDEBEValue;
+    property DEBEIsNull: Boolean read GetDEBEIsNull write SetDEBEIsNull;
+    property HABER: Currency read GetHABERValue write SetHABERValue;
+    property HABERIsNull: Boolean read GetHABERIsNull write SetHABERIsNull;
+
+  public
+    constructor Create(aDataTable: TDADataTable); override;
+    destructor Destroy; override;
+
+  end;
+
+  { ISubCuentas }
+  ISubCuentas = interface(IDAStronglyTypedDataTable)
+  ['{C519726C-43A5-4168-AD68-A63176180B09}']
+    { Property getters and setters }
+    function GetIDValue: Integer;
+    procedure SetIDValue(const aValue: Integer);
+    function GetIDIsNull: Boolean;
+    procedure SetIDIsNull(const aValue: Boolean);
+    function GetREF_SUBCUENTAValue: String;
+    procedure SetREF_SUBCUENTAValue(const aValue: String);
+    function GetREF_SUBCUENTAIsNull: Boolean;
+    procedure SetREF_SUBCUENTAIsNull(const aValue: Boolean);
+    function GetDESCRIPCIONValue: String;
+    procedure SetDESCRIPCIONValue(const aValue: String);
+    function GetDESCRIPCIONIsNull: Boolean;
+    procedure SetDESCRIPCIONIsNull(const aValue: Boolean);
+    function GetID_CUENTAValue: Integer;
+    procedure SetID_CUENTAValue(const aValue: Integer);
+    function GetID_CUENTAIsNull: Boolean;
+    procedure SetID_CUENTAIsNull(const aValue: Boolean);
+    function GetID_EJERCICIOValue: Integer;
+    procedure SetID_EJERCICIOValue(const aValue: Integer);
+    function GetID_EJERCICIOIsNull: Boolean;
+    procedure SetID_EJERCICIOIsNull(const aValue: Boolean);
+
+
+    { Properties }
+    property ID: Integer read GetIDValue write SetIDValue;
+    property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
+    property REF_SUBCUENTA: String read GetREF_SUBCUENTAValue write SetREF_SUBCUENTAValue;
+    property REF_SUBCUENTAIsNull: Boolean read GetREF_SUBCUENTAIsNull write SetREF_SUBCUENTAIsNull;
+    property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
+    property DESCRIPCIONIsNull: Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull;
+    property ID_CUENTA: Integer read GetID_CUENTAValue write SetID_CUENTAValue;
+    property ID_CUENTAIsNull: Boolean read GetID_CUENTAIsNull write SetID_CUENTAIsNull;
+    property ID_EJERCICIO: Integer read GetID_EJERCICIOValue write SetID_EJERCICIOValue;
+    property ID_EJERCICIOIsNull: Boolean read GetID_EJERCICIOIsNull write SetID_EJERCICIOIsNull;
+  end;
+
+  { TSubCuentasDataTableRules }
+  TSubCuentasDataTableRules = class(TDADataTableRules, ISubCuentas)
+  private
+  protected
+    { Property getters and setters }
+    function GetIDValue: Integer; virtual;
+    procedure SetIDValue(const aValue: Integer); virtual;
+    function GetIDIsNull: Boolean; virtual;
+    procedure SetIDIsNull(const aValue: Boolean); virtual;
+    function GetREF_SUBCUENTAValue: String; virtual;
+    procedure SetREF_SUBCUENTAValue(const aValue: String); virtual;
+    function GetREF_SUBCUENTAIsNull: Boolean; virtual;
+    procedure SetREF_SUBCUENTAIsNull(const aValue: Boolean); virtual;
+    function GetDESCRIPCIONValue: String; virtual;
+    procedure SetDESCRIPCIONValue(const aValue: String); virtual;
+    function GetDESCRIPCIONIsNull: Boolean; virtual;
+    procedure SetDESCRIPCIONIsNull(const aValue: Boolean); virtual;
+    function GetID_CUENTAValue: Integer; virtual;
+    procedure SetID_CUENTAValue(const aValue: Integer); virtual;
+    function GetID_CUENTAIsNull: Boolean; virtual;
+    procedure SetID_CUENTAIsNull(const aValue: Boolean); virtual;
+    function GetID_EJERCICIOValue: Integer; virtual;
+    procedure SetID_EJERCICIOValue(const aValue: Integer); virtual;
+    function GetID_EJERCICIOIsNull: Boolean; virtual;
+    procedure SetID_EJERCICIOIsNull(const aValue: Boolean); virtual;
+
+    { Properties }
+    property ID: Integer read GetIDValue write SetIDValue;
+    property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
+    property REF_SUBCUENTA: String read GetREF_SUBCUENTAValue write SetREF_SUBCUENTAValue;
+    property REF_SUBCUENTAIsNull: Boolean read GetREF_SUBCUENTAIsNull write SetREF_SUBCUENTAIsNull;
+    property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
+    property DESCRIPCIONIsNull: Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull;
+    property ID_CUENTA: Integer read GetID_CUENTAValue write SetID_CUENTAValue;
+    property ID_CUENTAIsNull: Boolean read GetID_CUENTAIsNull write SetID_CUENTAIsNull;
+    property ID_EJERCICIO: Integer read GetID_EJERCICIOValue write SetID_EJERCICIOValue;
+    property ID_EJERCICIOIsNull: Boolean read GetID_EJERCICIOIsNull write SetID_EJERCICIOIsNull;
+
+  public
+    constructor Create(aDataTable: TDADataTable); override;
+    destructor Destroy; override;
+
+  end;
+
+  { ICuentas }
+  ICuentas = interface(IDAStronglyTypedDataTable)
+  ['{A60C051B-5B76-4B39-8B2B-30EBFCD31798}']
+    { Property getters and setters }
+    function GetIDValue: Integer;
+    procedure SetIDValue(const aValue: Integer);
+    function GetIDIsNull: Boolean;
+    procedure SetIDIsNull(const aValue: Boolean);
+    function GetREF_CUENTAValue: String;
+    procedure SetREF_CUENTAValue(const aValue: String);
+    function GetREF_CUENTAIsNull: Boolean;
+    procedure SetREF_CUENTAIsNull(const aValue: Boolean);
+    function GetID_EJERCICIOValue: Integer;
+    procedure SetID_EJERCICIOValue(const aValue: Integer);
+    function GetID_EJERCICIOIsNull: Boolean;
+    procedure SetID_EJERCICIOIsNull(const aValue: Boolean);
+    function GetID_EPIGRAFEValue: Integer;
+    procedure SetID_EPIGRAFEValue(const aValue: Integer);
+    function GetID_EPIGRAFEIsNull: Boolean;
+    procedure SetID_EPIGRAFEIsNull(const aValue: Boolean);
+    function GetDESCRIPCIONValue: String;
+    procedure SetDESCRIPCIONValue(const aValue: String);
+    function GetDESCRIPCIONIsNull: Boolean;
+    procedure SetDESCRIPCIONIsNull(const aValue: Boolean);
+    function GetID_BALANCEValue: Integer;
+    procedure SetID_BALANCEValue(const aValue: Integer);
+    function GetID_BALANCEIsNull: Boolean;
+    procedure SetID_BALANCEIsNull(const aValue: Boolean);
+    function GetID_CUENTA_ESPECIALValue: Integer;
+    procedure SetID_CUENTA_ESPECIALValue(const aValue: Integer);
+    function GetID_CUENTA_ESPECIALIsNull: Boolean;
+    procedure SetID_CUENTA_ESPECIALIsNull(const aValue: Boolean);
+
+
+    { Properties }
+    property ID: Integer read GetIDValue write SetIDValue;
+    property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
+    property REF_CUENTA: String read GetREF_CUENTAValue write SetREF_CUENTAValue;
+    property REF_CUENTAIsNull: Boolean read GetREF_CUENTAIsNull write SetREF_CUENTAIsNull;
+    property ID_EJERCICIO: Integer read GetID_EJERCICIOValue write SetID_EJERCICIOValue;
+    property ID_EJERCICIOIsNull: Boolean read GetID_EJERCICIOIsNull write SetID_EJERCICIOIsNull;
+    property ID_EPIGRAFE: Integer read GetID_EPIGRAFEValue write SetID_EPIGRAFEValue;
+    property ID_EPIGRAFEIsNull: Boolean read GetID_EPIGRAFEIsNull write SetID_EPIGRAFEIsNull;
+    property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
+    property DESCRIPCIONIsNull: Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull;
+    property ID_BALANCE: Integer read GetID_BALANCEValue write SetID_BALANCEValue;
+    property ID_BALANCEIsNull: Boolean read GetID_BALANCEIsNull write SetID_BALANCEIsNull;
+    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;
+  end;
+
+  { TCuentasDataTableRules }
+  TCuentasDataTableRules = class(TDADataTableRules, ICuentas)
+  private
+  protected
+    { Property getters and setters }
+    function GetIDValue: Integer; virtual;
+    procedure SetIDValue(const aValue: Integer); virtual;
+    function GetIDIsNull: Boolean; virtual;
+    procedure SetIDIsNull(const aValue: Boolean); virtual;
+    function GetREF_CUENTAValue: String; virtual;
+    procedure SetREF_CUENTAValue(const aValue: String); virtual;
+    function GetREF_CUENTAIsNull: Boolean; virtual;
+    procedure SetREF_CUENTAIsNull(const aValue: Boolean); virtual;
+    function GetID_EJERCICIOValue: Integer; virtual;
+    procedure SetID_EJERCICIOValue(const aValue: Integer); virtual;
+    function GetID_EJERCICIOIsNull: Boolean; virtual;
+    procedure SetID_EJERCICIOIsNull(const aValue: Boolean); virtual;
+    function GetID_EPIGRAFEValue: Integer; virtual;
+    procedure SetID_EPIGRAFEValue(const aValue: Integer); virtual;
+    function GetID_EPIGRAFEIsNull: Boolean; virtual;
+    procedure SetID_EPIGRAFEIsNull(const aValue: Boolean); virtual;
+    function GetDESCRIPCIONValue: String; virtual;
+    procedure SetDESCRIPCIONValue(const aValue: String); virtual;
+    function GetDESCRIPCIONIsNull: Boolean; virtual;
+    procedure SetDESCRIPCIONIsNull(const aValue: Boolean); virtual;
+    function GetID_BALANCEValue: Integer; virtual;
+    procedure SetID_BALANCEValue(const aValue: Integer); virtual;
+    function GetID_BALANCEIsNull: Boolean; virtual;
+    procedure SetID_BALANCEIsNull(const aValue: Boolean); virtual;
+    function GetID_CUENTA_ESPECIALValue: Integer; virtual;
+    procedure SetID_CUENTA_ESPECIALValue(const aValue: Integer); virtual;
+    function GetID_CUENTA_ESPECIALIsNull: Boolean; virtual;
+    procedure SetID_CUENTA_ESPECIALIsNull(const aValue: Boolean); virtual;
+
+    { Properties }
+    property ID: Integer read GetIDValue write SetIDValue;
+    property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
+    property REF_CUENTA: String read GetREF_CUENTAValue write SetREF_CUENTAValue;
+    property REF_CUENTAIsNull: Boolean read GetREF_CUENTAIsNull write SetREF_CUENTAIsNull;
+    property ID_EJERCICIO: Integer read GetID_EJERCICIOValue write SetID_EJERCICIOValue;
+    property ID_EJERCICIOIsNull: Boolean read GetID_EJERCICIOIsNull write SetID_EJERCICIOIsNull;
+    property ID_EPIGRAFE: Integer read GetID_EPIGRAFEValue write SetID_EPIGRAFEValue;
+    property ID_EPIGRAFEIsNull: Boolean read GetID_EPIGRAFEIsNull write SetID_EPIGRAFEIsNull;
+    property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
+    property DESCRIPCIONIsNull: Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull;
+    property ID_BALANCE: Integer read GetID_BALANCEValue write SetID_BALANCEValue;
+    property ID_BALANCEIsNull: Boolean read GetID_BALANCEIsNull write SetID_BALANCEIsNull;
+    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;
+
+  public
+    constructor Create(aDataTable: TDADataTable); override;
+    destructor Destroy; override;
+
+  end;
+
   { ICuentasEspeciales }
   ICuentasEspeciales = interface(IDAStronglyTypedDataTable)
-  ['{B124DFE8-E622-4149-B43F-7E62A28343AF}']
+  ['{267A39E7-DD65-4417-B0EF-75BF2C13BB71}']
     { Property getters and setters }
     function GetIDValue: Integer;
     procedure SetIDValue(const aValue: Integer);
@@ -93,7 +460,7 @@ type
   end;
 
   { TCuentasEspecialesDataTableRules }
-  TCuentasEspecialesDataTableRules = class(TIntfObjectDADataTableRules, ICuentasEspeciales)
+  TCuentasEspecialesDataTableRules = class(TDADataTableRules, ICuentasEspeciales)
   private
   protected
     { Property getters and setters }
@@ -126,7 +493,7 @@ type
 
   { IEpigrafes }
   IEpigrafes = interface(IDAStronglyTypedDataTable)
-  ['{AC7DC016-22AE-41E3-BF12-44D7B8EA6CF6}']
+  ['{1F851BD7-9C70-4A5E-B0E6-EF6918802C15}']
     { Property getters and setters }
     function GetIDValue: Integer;
     procedure SetIDValue(const aValue: Integer);
@@ -164,7 +531,7 @@ type
   end;
 
   { TEpigrafesDataTableRules }
-  TEpigrafesDataTableRules = class(TIntfObjectDADataTableRules, IEpigrafes)
+  TEpigrafesDataTableRules = class(TDADataTableRules, IEpigrafes)
   private
   protected
     { Property getters and setters }
@@ -209,7 +576,7 @@ type
 
   { IBalances }
   IBalances = interface(IDAStronglyTypedDataTable)
-  ['{F479251D-0CF5-4E81-AA80-E5A09CF25400}']
+  ['{A661BDD9-9EAC-4ECA-906D-7361D8ABACA6}']
     { Property getters and setters }
     function GetIDValue: Integer;
     procedure SetIDValue(const aValue: Integer);
@@ -271,7 +638,7 @@ type
   end;
 
   { TBalancesDataTableRules }
-  TBalancesDataTableRules = class(TIntfObjectDADataTableRules, IBalances)
+  TBalancesDataTableRules = class(TDADataTableRules, IBalances)
   private
   protected
     { Property getters and setters }
@@ -342,6 +709,462 @@ implementation
 
 uses Variants, uROBinaryHelpers;
 
+{ TAsientosDataTableRules }
+constructor TAsientosDataTableRules.Create(aDataTable: TDADataTable);
+begin
+  inherited;
+end;
+
+destructor TAsientosDataTableRules.Destroy;
+begin
+  inherited;
+end;
+
+function TAsientosDataTableRules.GetIDValue: Integer;
+begin
+  result := DataTable.Fields[idx_AsientosID].AsInteger;
+end;
+
+procedure TAsientosDataTableRules.SetIDValue(const aValue: Integer);
+begin
+  DataTable.Fields[idx_AsientosID].AsInteger := aValue;
+end;
+
+function TAsientosDataTableRules.GetIDIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_AsientosID].IsNull;
+end;
+
+procedure TAsientosDataTableRules.SetIDIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_AsientosID].AsVariant := Null;
+end;
+
+function TAsientosDataTableRules.GetID_ASIENTO_COMPENSADOValue: Integer;
+begin
+  result := DataTable.Fields[idx_AsientosID_ASIENTO_COMPENSADO].AsInteger;
+end;
+
+procedure TAsientosDataTableRules.SetID_ASIENTO_COMPENSADOValue(const aValue: Integer);
+begin
+  DataTable.Fields[idx_AsientosID_ASIENTO_COMPENSADO].AsInteger := aValue;
+end;
+
+function TAsientosDataTableRules.GetID_ASIENTO_COMPENSADOIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_AsientosID_ASIENTO_COMPENSADO].IsNull;
+end;
+
+procedure TAsientosDataTableRules.SetID_ASIENTO_COMPENSADOIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_AsientosID_ASIENTO_COMPENSADO].AsVariant := Null;
+end;
+
+function TAsientosDataTableRules.GetID_SUBCUENTAValue: Integer;
+begin
+  result := DataTable.Fields[idx_AsientosID_SUBCUENTA].AsInteger;
+end;
+
+procedure TAsientosDataTableRules.SetID_SUBCUENTAValue(const aValue: Integer);
+begin
+  DataTable.Fields[idx_AsientosID_SUBCUENTA].AsInteger := aValue;
+end;
+
+function TAsientosDataTableRules.GetID_SUBCUENTAIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_AsientosID_SUBCUENTA].IsNull;
+end;
+
+procedure TAsientosDataTableRules.SetID_SUBCUENTAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_AsientosID_SUBCUENTA].AsVariant := Null;
+end;
+
+function TAsientosDataTableRules.GetFECHA_ASIENTOValue: DateTime;
+begin
+  result := DataTable.Fields[idx_AsientosFECHA_ASIENTO].AsDateTime;
+end;
+
+procedure TAsientosDataTableRules.SetFECHA_ASIENTOValue(const aValue: DateTime);
+begin
+  DataTable.Fields[idx_AsientosFECHA_ASIENTO].AsDateTime := aValue;
+end;
+
+function TAsientosDataTableRules.GetFECHA_ASIENTOIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_AsientosFECHA_ASIENTO].IsNull;
+end;
+
+procedure TAsientosDataTableRules.SetFECHA_ASIENTOIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_AsientosFECHA_ASIENTO].AsVariant := Null;
+end;
+
+function TAsientosDataTableRules.GetCONCEPTOValue: String;
+begin
+  result := DataTable.Fields[idx_AsientosCONCEPTO].AsString;
+end;
+
+procedure TAsientosDataTableRules.SetCONCEPTOValue(const aValue: String);
+begin
+  DataTable.Fields[idx_AsientosCONCEPTO].AsString := aValue;
+end;
+
+function TAsientosDataTableRules.GetCONCEPTOIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_AsientosCONCEPTO].IsNull;
+end;
+
+procedure TAsientosDataTableRules.SetCONCEPTOIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_AsientosCONCEPTO].AsVariant := Null;
+end;
+
+function TAsientosDataTableRules.GetPUNTEADOValue: SmallInt;
+begin
+  result := DataTable.Fields[idx_AsientosPUNTEADO].AsSmallInt;
+end;
+
+procedure TAsientosDataTableRules.SetPUNTEADOValue(const aValue: SmallInt);
+begin
+  DataTable.Fields[idx_AsientosPUNTEADO].AsSmallInt := aValue;
+end;
+
+function TAsientosDataTableRules.GetPUNTEADOIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_AsientosPUNTEADO].IsNull;
+end;
+
+procedure TAsientosDataTableRules.SetPUNTEADOIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_AsientosPUNTEADO].AsVariant := Null;
+end;
+
+function TAsientosDataTableRules.GetDEBEValue: Currency;
+begin
+  result := DataTable.Fields[idx_AsientosDEBE].AsCurrency;
+end;
+
+procedure TAsientosDataTableRules.SetDEBEValue(const aValue: Currency);
+begin
+  DataTable.Fields[idx_AsientosDEBE].AsCurrency := aValue;
+end;
+
+function TAsientosDataTableRules.GetDEBEIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_AsientosDEBE].IsNull;
+end;
+
+procedure TAsientosDataTableRules.SetDEBEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_AsientosDEBE].AsVariant := Null;
+end;
+
+function TAsientosDataTableRules.GetHABERValue: Currency;
+begin
+  result := DataTable.Fields[idx_AsientosHABER].AsCurrency;
+end;
+
+procedure TAsientosDataTableRules.SetHABERValue(const aValue: Currency);
+begin
+  DataTable.Fields[idx_AsientosHABER].AsCurrency := aValue;
+end;
+
+function TAsientosDataTableRules.GetHABERIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_AsientosHABER].IsNull;
+end;
+
+procedure TAsientosDataTableRules.SetHABERIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_AsientosHABER].AsVariant := Null;
+end;
+
+
+{ TSubCuentasDataTableRules }
+constructor TSubCuentasDataTableRules.Create(aDataTable: TDADataTable);
+begin
+  inherited;
+end;
+
+destructor TSubCuentasDataTableRules.Destroy;
+begin
+  inherited;
+end;
+
+function TSubCuentasDataTableRules.GetIDValue: Integer;
+begin
+  result := DataTable.Fields[idx_SubCuentasID].AsInteger;
+end;
+
+procedure TSubCuentasDataTableRules.SetIDValue(const aValue: Integer);
+begin
+  DataTable.Fields[idx_SubCuentasID].AsInteger := aValue;
+end;
+
+function TSubCuentasDataTableRules.GetIDIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_SubCuentasID].IsNull;
+end;
+
+procedure TSubCuentasDataTableRules.SetIDIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_SubCuentasID].AsVariant := Null;
+end;
+
+function TSubCuentasDataTableRules.GetREF_SUBCUENTAValue: String;
+begin
+  result := DataTable.Fields[idx_SubCuentasREF_SUBCUENTA].AsString;
+end;
+
+procedure TSubCuentasDataTableRules.SetREF_SUBCUENTAValue(const aValue: String);
+begin
+  DataTable.Fields[idx_SubCuentasREF_SUBCUENTA].AsString := aValue;
+end;
+
+function TSubCuentasDataTableRules.GetREF_SUBCUENTAIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_SubCuentasREF_SUBCUENTA].IsNull;
+end;
+
+procedure TSubCuentasDataTableRules.SetREF_SUBCUENTAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_SubCuentasREF_SUBCUENTA].AsVariant := Null;
+end;
+
+function TSubCuentasDataTableRules.GetDESCRIPCIONValue: String;
+begin
+  result := DataTable.Fields[idx_SubCuentasDESCRIPCION].AsString;
+end;
+
+procedure TSubCuentasDataTableRules.SetDESCRIPCIONValue(const aValue: String);
+begin
+  DataTable.Fields[idx_SubCuentasDESCRIPCION].AsString := aValue;
+end;
+
+function TSubCuentasDataTableRules.GetDESCRIPCIONIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_SubCuentasDESCRIPCION].IsNull;
+end;
+
+procedure TSubCuentasDataTableRules.SetDESCRIPCIONIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_SubCuentasDESCRIPCION].AsVariant := Null;
+end;
+
+function TSubCuentasDataTableRules.GetID_CUENTAValue: Integer;
+begin
+  result := DataTable.Fields[idx_SubCuentasID_CUENTA].AsInteger;
+end;
+
+procedure TSubCuentasDataTableRules.SetID_CUENTAValue(const aValue: Integer);
+begin
+  DataTable.Fields[idx_SubCuentasID_CUENTA].AsInteger := aValue;
+end;
+
+function TSubCuentasDataTableRules.GetID_CUENTAIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_SubCuentasID_CUENTA].IsNull;
+end;
+
+procedure TSubCuentasDataTableRules.SetID_CUENTAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_SubCuentasID_CUENTA].AsVariant := Null;
+end;
+
+function TSubCuentasDataTableRules.GetID_EJERCICIOValue: Integer;
+begin
+  result := DataTable.Fields[idx_SubCuentasID_EJERCICIO].AsInteger;
+end;
+
+procedure TSubCuentasDataTableRules.SetID_EJERCICIOValue(const aValue: Integer);
+begin
+  DataTable.Fields[idx_SubCuentasID_EJERCICIO].AsInteger := aValue;
+end;
+
+function TSubCuentasDataTableRules.GetID_EJERCICIOIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_SubCuentasID_EJERCICIO].IsNull;
+end;
+
+procedure TSubCuentasDataTableRules.SetID_EJERCICIOIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_SubCuentasID_EJERCICIO].AsVariant := Null;
+end;
+
+
+{ TCuentasDataTableRules }
+constructor TCuentasDataTableRules.Create(aDataTable: TDADataTable);
+begin
+  inherited;
+end;
+
+destructor TCuentasDataTableRules.Destroy;
+begin
+  inherited;
+end;
+
+function TCuentasDataTableRules.GetIDValue: Integer;
+begin
+  result := DataTable.Fields[idx_CuentasID].AsInteger;
+end;
+
+procedure TCuentasDataTableRules.SetIDValue(const aValue: Integer);
+begin
+  DataTable.Fields[idx_CuentasID].AsInteger := aValue;
+end;
+
+function TCuentasDataTableRules.GetIDIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_CuentasID].IsNull;
+end;
+
+procedure TCuentasDataTableRules.SetIDIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_CuentasID].AsVariant := Null;
+end;
+
+function TCuentasDataTableRules.GetREF_CUENTAValue: String;
+begin
+  result := DataTable.Fields[idx_CuentasREF_CUENTA].AsString;
+end;
+
+procedure TCuentasDataTableRules.SetREF_CUENTAValue(const aValue: String);
+begin
+  DataTable.Fields[idx_CuentasREF_CUENTA].AsString := aValue;
+end;
+
+function TCuentasDataTableRules.GetREF_CUENTAIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_CuentasREF_CUENTA].IsNull;
+end;
+
+procedure TCuentasDataTableRules.SetREF_CUENTAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_CuentasREF_CUENTA].AsVariant := Null;
+end;
+
+function TCuentasDataTableRules.GetID_EJERCICIOValue: Integer;
+begin
+  result := DataTable.Fields[idx_CuentasID_EJERCICIO].AsInteger;
+end;
+
+procedure TCuentasDataTableRules.SetID_EJERCICIOValue(const aValue: Integer);
+begin
+  DataTable.Fields[idx_CuentasID_EJERCICIO].AsInteger := aValue;
+end;
+
+function TCuentasDataTableRules.GetID_EJERCICIOIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_CuentasID_EJERCICIO].IsNull;
+end;
+
+procedure TCuentasDataTableRules.SetID_EJERCICIOIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_CuentasID_EJERCICIO].AsVariant := Null;
+end;
+
+function TCuentasDataTableRules.GetID_EPIGRAFEValue: Integer;
+begin
+  result := DataTable.Fields[idx_CuentasID_EPIGRAFE].AsInteger;
+end;
+
+procedure TCuentasDataTableRules.SetID_EPIGRAFEValue(const aValue: Integer);
+begin
+  DataTable.Fields[idx_CuentasID_EPIGRAFE].AsInteger := aValue;
+end;
+
+function TCuentasDataTableRules.GetID_EPIGRAFEIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_CuentasID_EPIGRAFE].IsNull;
+end;
+
+procedure TCuentasDataTableRules.SetID_EPIGRAFEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_CuentasID_EPIGRAFE].AsVariant := Null;
+end;
+
+function TCuentasDataTableRules.GetDESCRIPCIONValue: String;
+begin
+  result := DataTable.Fields[idx_CuentasDESCRIPCION].AsString;
+end;
+
+procedure TCuentasDataTableRules.SetDESCRIPCIONValue(const aValue: String);
+begin
+  DataTable.Fields[idx_CuentasDESCRIPCION].AsString := aValue;
+end;
+
+function TCuentasDataTableRules.GetDESCRIPCIONIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_CuentasDESCRIPCION].IsNull;
+end;
+
+procedure TCuentasDataTableRules.SetDESCRIPCIONIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_CuentasDESCRIPCION].AsVariant := Null;
+end;
+
+function TCuentasDataTableRules.GetID_BALANCEValue: Integer;
+begin
+  result := DataTable.Fields[idx_CuentasID_BALANCE].AsInteger;
+end;
+
+procedure TCuentasDataTableRules.SetID_BALANCEValue(const aValue: Integer);
+begin
+  DataTable.Fields[idx_CuentasID_BALANCE].AsInteger := aValue;
+end;
+
+function TCuentasDataTableRules.GetID_BALANCEIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_CuentasID_BALANCE].IsNull;
+end;
+
+procedure TCuentasDataTableRules.SetID_BALANCEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_CuentasID_BALANCE].AsVariant := Null;
+end;
+
+function TCuentasDataTableRules.GetID_CUENTA_ESPECIALValue: Integer;
+begin
+  result := DataTable.Fields[idx_CuentasID_CUENTA_ESPECIAL].AsInteger;
+end;
+
+procedure TCuentasDataTableRules.SetID_CUENTA_ESPECIALValue(const aValue: Integer);
+begin
+  DataTable.Fields[idx_CuentasID_CUENTA_ESPECIAL].AsInteger := aValue;
+end;
+
+function TCuentasDataTableRules.GetID_CUENTA_ESPECIALIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_CuentasID_CUENTA_ESPECIAL].IsNull;
+end;
+
+procedure TCuentasDataTableRules.SetID_CUENTA_ESPECIALIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_CuentasID_CUENTA_ESPECIAL].AsVariant := Null;
+end;
+
+
 { TCuentasEspecialesDataTableRules }
 constructor TCuentasEspecialesDataTableRules.Create(aDataTable: TDADataTable);
 begin
@@ -736,6 +1559,9 @@ end;
 
 
 initialization
+  RegisterDataTableRules(RID_Asientos, TAsientosDataTableRules);
+  RegisterDataTableRules(RID_SubCuentas, TSubCuentasDataTableRules);
+  RegisterDataTableRules(RID_Cuentas, TCuentasDataTableRules);
   RegisterDataTableRules(RID_CuentasEspeciales, TCuentasEspecialesDataTableRules);
   RegisterDataTableRules(RID_Epigrafes, TEpigrafesDataTableRules);
   RegisterDataTableRules(RID_Balances, TBalancesDataTableRules);
diff --git a/Source/Modulos/Contabilidad/Model/schContabilidadServer_Intf.pas b/Source/Modulos/Contabilidad/Model/schContabilidadServer_Intf.pas
index bb3ade4c..3165f1b5 100644
--- a/Source/Modulos/Contabilidad/Model/schContabilidadServer_Intf.pas
+++ b/Source/Modulos/Contabilidad/Model/schContabilidadServer_Intf.pas
@@ -9,14 +9,323 @@ 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_CuentasEspecialesDelta = '{4D4FE910-3F37-4077-8FBA-E2CFC412CF13}';
-  RID_EpigrafesDelta = '{5515CCA6-9D22-4C9C-BE52-492B6143F817}';
-  RID_BalancesDelta = '{37149E5B-96DE-4CA9-AFBB-F410CBC4BEE7}';
+  RID_AsientosDelta = '{E5444D5F-9D7A-4EF7-A3EC-54E04047ABB8}';
+  RID_SubCuentasDelta = '{06655A2F-ECFC-4984-B5EF-275E3B2F84E3}';
+  RID_CuentasDelta = '{FB48551E-0531-4FC3-8494-51ABBA80938C}';
+  RID_CuentasEspecialesDelta = '{4A7CF142-4CE5-41BE-863B-A4983EB6D7DC}';
+  RID_EpigrafesDelta = '{691EBC10-A868-46C5-9EDF-8E55A27221D0}';
+  RID_BalancesDelta = '{C6255FDC-F284-4F1F-9559-685B3FEE30A9}';
 
 type
+  { IAsientosDelta }
+  IAsientosDelta = interface(IAsientos)
+  ['{E5444D5F-9D7A-4EF7-A3EC-54E04047ABB8}']
+    { Property getters and setters }
+    function GetOldIDValue : Integer;
+    function GetOldID_ASIENTO_COMPENSADOValue : Integer;
+    function GetOldID_SUBCUENTAValue : Integer;
+    function GetOldFECHA_ASIENTOValue : DateTime;
+    function GetOldCONCEPTOValue : String;
+    function GetOldPUNTEADOValue : SmallInt;
+    function GetOldDEBEValue : Currency;
+    function GetOldHABERValue : Currency;
+
+    { Properties }
+    property OldID : Integer read GetOldIDValue;
+    property OldID_ASIENTO_COMPENSADO : Integer read GetOldID_ASIENTO_COMPENSADOValue;
+    property OldID_SUBCUENTA : Integer read GetOldID_SUBCUENTAValue;
+    property OldFECHA_ASIENTO : DateTime read GetOldFECHA_ASIENTOValue;
+    property OldCONCEPTO : String read GetOldCONCEPTOValue;
+    property OldPUNTEADO : SmallInt read GetOldPUNTEADOValue;
+    property OldDEBE : Currency read GetOldDEBEValue;
+    property OldHABER : Currency read GetOldHABERValue;
+  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 GetID_ASIENTO_COMPENSADOValue: Integer; virtual;
+    function GetID_ASIENTO_COMPENSADOIsNull: Boolean; virtual;
+    function GetOldID_ASIENTO_COMPENSADOValue: Integer; virtual;
+    function GetOldID_ASIENTO_COMPENSADOIsNull: Boolean; virtual;
+    procedure SetID_ASIENTO_COMPENSADOValue(const aValue: Integer); virtual;
+    procedure SetID_ASIENTO_COMPENSADOIsNull(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 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 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 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;
+    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;
+
+    { 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_COMPENSADO : Integer read GetID_ASIENTO_COMPENSADOValue write SetID_ASIENTO_COMPENSADOValue;
+    property ID_ASIENTO_COMPENSADOIsNull : Boolean read GetID_ASIENTO_COMPENSADOIsNull write SetID_ASIENTO_COMPENSADOIsNull;
+    property OldID_ASIENTO_COMPENSADO : Integer read GetOldID_ASIENTO_COMPENSADOValue;
+    property OldID_ASIENTO_COMPENSADOIsNull : Boolean read GetOldID_ASIENTO_COMPENSADOIsNull;
+    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 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 CONCEPTO : String read GetCONCEPTOValue write SetCONCEPTOValue;
+    property CONCEPTOIsNull : Boolean read GetCONCEPTOIsNull write SetCONCEPTOIsNull;
+    property OldCONCEPTO : String read GetOldCONCEPTOValue;
+    property OldCONCEPTOIsNull : Boolean read GetOldCONCEPTOIsNull;
+    property PUNTEADO : SmallInt read GetPUNTEADOValue write SetPUNTEADOValue;
+    property PUNTEADOIsNull : Boolean read GetPUNTEADOIsNull write SetPUNTEADOIsNull;
+    property OldPUNTEADO : SmallInt read GetOldPUNTEADOValue;
+    property OldPUNTEADOIsNull : Boolean read GetOldPUNTEADOIsNull;
+    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;
+
+  public
+    constructor Create(aBusinessProcessor: TDABusinessProcessor); override;
+    destructor Destroy; override;
+
+  end;
+
+  { ISubCuentasDelta }
+  ISubCuentasDelta = interface(ISubCuentas)
+  ['{06655A2F-ECFC-4984-B5EF-275E3B2F84E3}']
+    { Property getters and setters }
+    function GetOldIDValue : Integer;
+    function GetOldREF_SUBCUENTAValue : String;
+    function GetOldDESCRIPCIONValue : String;
+    function GetOldID_CUENTAValue : Integer;
+    function GetOldID_EJERCICIOValue : Integer;
+
+    { Properties }
+    property OldID : Integer read GetOldIDValue;
+    property OldREF_SUBCUENTA : String read GetOldREF_SUBCUENTAValue;
+    property OldDESCRIPCION : String read GetOldDESCRIPCIONValue;
+    property OldID_CUENTA : Integer read GetOldID_CUENTAValue;
+    property OldID_EJERCICIO : Integer read GetOldID_EJERCICIOValue;
+  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_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 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;
+
+    { 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_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 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;
+
+  public
+    constructor Create(aBusinessProcessor: TDABusinessProcessor); override;
+    destructor Destroy; override;
+
+  end;
+
+  { ICuentasDelta }
+  ICuentasDelta = interface(ICuentas)
+  ['{FB48551E-0531-4FC3-8494-51ABBA80938C}']
+    { Property getters and setters }
+    function GetOldIDValue : Integer;
+    function GetOldREF_CUENTAValue : String;
+    function GetOldID_EJERCICIOValue : Integer;
+    function GetOldID_EPIGRAFEValue : Integer;
+    function GetOldDESCRIPCIONValue : String;
+    function GetOldID_BALANCEValue : Integer;
+    function GetOldID_CUENTA_ESPECIALValue : Integer;
+
+    { Properties }
+    property OldID : Integer read GetOldIDValue;
+    property OldREF_CUENTA : String read GetOldREF_CUENTAValue;
+    property OldID_EJERCICIO : Integer read GetOldID_EJERCICIOValue;
+    property OldID_EPIGRAFE : Integer read GetOldID_EPIGRAFEValue;
+    property OldDESCRIPCION : String read GetOldDESCRIPCIONValue;
+    property OldID_BALANCE : Integer read GetOldID_BALANCEValue;
+    property OldID_CUENTA_ESPECIAL : Integer read GetOldID_CUENTA_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 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 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_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 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;
+
+    { 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 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 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_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 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;
+
+  public
+    constructor Create(aBusinessProcessor: TDABusinessProcessor); override;
+    destructor Destroy; override;
+
+  end;
+
   { ICuentasEspecialesDelta }
   ICuentasEspecialesDelta = interface(ICuentasEspeciales)
-  ['{4D4FE910-3F37-4077-8FBA-E2CFC412CF13}']
+  ['{4A7CF142-4CE5-41BE-863B-A4983EB6D7DC}']
     { Property getters and setters }
     function GetOldIDValue : Integer;
     function GetOldREFERENCIAValue : String;
@@ -74,7 +383,7 @@ type
 
   { IEpigrafesDelta }
   IEpigrafesDelta = interface(IEpigrafes)
-  ['{5515CCA6-9D22-4C9C-BE52-492B6143F817}']
+  ['{691EBC10-A868-46C5-9EDF-8E55A27221D0}']
     { Property getters and setters }
     function GetOldIDValue : Integer;
     function GetOldREF_EPIGRAFEValue : String;
@@ -156,7 +465,7 @@ type
 
   { IBalancesDelta }
   IBalancesDelta = interface(IBalances)
-  ['{37149E5B-96DE-4CA9-AFBB-F410CBC4BEE7}']
+  ['{C6255FDC-F284-4F1F-9559-685B3FEE30A9}']
     { Property getters and setters }
     function GetOldIDValue : Integer;
     function GetOldREF_BALANCEValue : String;
@@ -289,6 +598,662 @@ implementation
 uses
   Variants, uROBinaryHelpers, uDAInterfaces;
 
+{ 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.GetID_ASIENTO_COMPENSADOValue: Integer;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosID_ASIENTO_COMPENSADO];
+end;
+
+function TAsientosBusinessProcessorRules.GetID_ASIENTO_COMPENSADOIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosID_ASIENTO_COMPENSADO]);
+end;
+
+function TAsientosBusinessProcessorRules.GetOldID_ASIENTO_COMPENSADOValue: Integer;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_AsientosID_ASIENTO_COMPENSADO];
+end;
+
+function TAsientosBusinessProcessorRules.GetOldID_ASIENTO_COMPENSADOIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_AsientosID_ASIENTO_COMPENSADO]);
+end;
+
+procedure TAsientosBusinessProcessorRules.SetID_ASIENTO_COMPENSADOValue(const aValue: Integer);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosID_ASIENTO_COMPENSADO] := aValue;
+end;
+
+procedure TAsientosBusinessProcessorRules.SetID_ASIENTO_COMPENSADOIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosID_ASIENTO_COMPENSADO] := Null;
+end;
+
+function TAsientosBusinessProcessorRules.GetID_SUBCUENTAValue: Integer;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosID_SUBCUENTA];
+end;
+
+function TAsientosBusinessProcessorRules.GetID_SUBCUENTAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosID_SUBCUENTA]);
+end;
+
+function TAsientosBusinessProcessorRules.GetOldID_SUBCUENTAValue: Integer;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_AsientosID_SUBCUENTA];
+end;
+
+function TAsientosBusinessProcessorRules.GetOldID_SUBCUENTAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_AsientosID_SUBCUENTA]);
+end;
+
+procedure TAsientosBusinessProcessorRules.SetID_SUBCUENTAValue(const aValue: Integer);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosID_SUBCUENTA] := aValue;
+end;
+
+procedure TAsientosBusinessProcessorRules.SetID_SUBCUENTAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosID_SUBCUENTA] := 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.GetCONCEPTOValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosCONCEPTO];
+end;
+
+function TAsientosBusinessProcessorRules.GetCONCEPTOIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosCONCEPTO]);
+end;
+
+function TAsientosBusinessProcessorRules.GetOldCONCEPTOValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_AsientosCONCEPTO];
+end;
+
+function TAsientosBusinessProcessorRules.GetOldCONCEPTOIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_AsientosCONCEPTO]);
+end;
+
+procedure TAsientosBusinessProcessorRules.SetCONCEPTOValue(const aValue: String);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosCONCEPTO] := aValue;
+end;
+
+procedure TAsientosBusinessProcessorRules.SetCONCEPTOIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosCONCEPTO] := Null;
+end;
+
+function TAsientosBusinessProcessorRules.GetPUNTEADOValue: SmallInt;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosPUNTEADO];
+end;
+
+function TAsientosBusinessProcessorRules.GetPUNTEADOIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosPUNTEADO]);
+end;
+
+function TAsientosBusinessProcessorRules.GetOldPUNTEADOValue: SmallInt;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_AsientosPUNTEADO];
+end;
+
+function TAsientosBusinessProcessorRules.GetOldPUNTEADOIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_AsientosPUNTEADO]);
+end;
+
+procedure TAsientosBusinessProcessorRules.SetPUNTEADOValue(const aValue: SmallInt);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosPUNTEADO] := aValue;
+end;
+
+procedure TAsientosBusinessProcessorRules.SetPUNTEADOIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosPUNTEADO] := Null;
+end;
+
+function TAsientosBusinessProcessorRules.GetDEBEValue: Currency;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosDEBE];
+end;
+
+function TAsientosBusinessProcessorRules.GetDEBEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosDEBE]);
+end;
+
+function TAsientosBusinessProcessorRules.GetOldDEBEValue: Currency;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_AsientosDEBE];
+end;
+
+function TAsientosBusinessProcessorRules.GetOldDEBEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_AsientosDEBE]);
+end;
+
+procedure TAsientosBusinessProcessorRules.SetDEBEValue(const aValue: Currency);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosDEBE] := aValue;
+end;
+
+procedure TAsientosBusinessProcessorRules.SetDEBEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosDEBE] := Null;
+end;
+
+function TAsientosBusinessProcessorRules.GetHABERValue: Currency;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosHABER];
+end;
+
+function TAsientosBusinessProcessorRules.GetHABERIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosHABER]);
+end;
+
+function TAsientosBusinessProcessorRules.GetOldHABERValue: Currency;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_AsientosHABER];
+end;
+
+function TAsientosBusinessProcessorRules.GetOldHABERIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_AsientosHABER]);
+end;
+
+procedure TAsientosBusinessProcessorRules.SetHABERValue(const aValue: Currency);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosHABER] := aValue;
+end;
+
+procedure TAsientosBusinessProcessorRules.SetHABERIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_AsientosHABER] := 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_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.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;
+
+
+{ 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.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.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_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.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;
+
+
 { TCuentasEspecialesBusinessProcessorRules }
 constructor TCuentasEspecialesBusinessProcessorRules.Create(aBusinessProcessor: TDABusinessProcessor);
 begin
@@ -853,6 +1818,9 @@ end;
 
 
 initialization
+  RegisterBusinessProcessorRules(RID_AsientosDelta, TAsientosBusinessProcessorRules);
+  RegisterBusinessProcessorRules(RID_SubCuentasDelta, TSubCuentasBusinessProcessorRules);
+  RegisterBusinessProcessorRules(RID_CuentasDelta, TCuentasBusinessProcessorRules);
   RegisterBusinessProcessorRules(RID_CuentasEspecialesDelta, TCuentasEspecialesBusinessProcessorRules);
   RegisterBusinessProcessorRules(RID_EpigrafesDelta, TEpigrafesBusinessProcessorRules);
   RegisterBusinessProcessorRules(RID_BalancesDelta, TBalancesBusinessProcessorRules);
diff --git a/Source/Modulos/Contabilidad/Model/uBizEpigrafes.pas b/Source/Modulos/Contabilidad/Model/uBizEpigrafes.pas
index d50a1717..67756ae2 100644
--- a/Source/Modulos/Contabilidad/Model/uBizEpigrafes.pas
+++ b/Source/Modulos/Contabilidad/Model/uBizEpigrafes.pas
@@ -36,7 +36,7 @@ end;
 
 procedure TBizEpigrafe.IniciarValoresEpigrafeNueva;
 begin
-  ID_EJERCICIO := 5//AppFactuGES.EmpresaActiva.EjercicioActivo.ID;
+  ID_EJERCICIO := AppFactuGES.EjercicioActivo.ID;
 end;
 
 procedure TBizEpigrafe.OnNewRecord(Sender: TDADataTable);
diff --git a/Source/Modulos/Contabilidad/Servidor/srvContabilidad_Impl.dfm b/Source/Modulos/Contabilidad/Servidor/srvContabilidad_Impl.dfm
index cbe7e859..8fcc13d7 100644
--- a/Source/Modulos/Contabilidad/Servidor/srvContabilidad_Impl.dfm
+++ b/Source/Modulos/Contabilidad/Servidor/srvContabilidad_Impl.dfm
@@ -70,6 +70,7 @@ object srvContabilidad: TsrvContabilidad
         Name = 'Epigrafes_ID'
         DataType = datAutoInc
         Required = True
+        ServerAutoRefresh = True
       end
       item
         Name = 'Epigrafes_REF_EPIGRAFE'
@@ -105,6 +106,103 @@ object srvContabilidad: TsrvContabilidad
         Name = 'CuentasEspeciales_DESCRIPCION'
         DataType = datString
         Size = 255
+      end
+      item
+        Name = 'Cuentas_ID'
+        DataType = datAutoInc
+        GeneratorName = 'GEN_CONT_CUENTAS_ID'
+        Required = True
+        DisplayLabel = 'ID'
+        ServerAutoRefresh = True
+      end
+      item
+        Name = 'Cuentas_REF_CUENTA'
+        DataType = datString
+        Size = 10
+      end
+      item
+        Name = 'Cuentas_ID_EJERCICIO'
+        DataType = datInteger
+      end
+      item
+        Name = 'Cuentas_ID_EPIGRAFE'
+        DataType = datInteger
+      end
+      item
+        Name = 'Cuentas_DESCRIPCION'
+        DataType = datString
+        Size = 255
+      end
+      item
+        Name = 'Cuentas_ID_BALANCE'
+        DataType = datInteger
+      end
+      item
+        Name = 'Cuentas_ID_CUENTA_ESPECIAL'
+        DataType = datInteger
+      end
+      item
+        Name = 'SubCuentas_ID'
+        DataType = datAutoInc
+        GeneratorName = 'GEN_CONT_SUBCUENTAS_ID'
+        Required = True
+        DisplayLabel = 'ID'
+        ServerAutoRefresh = True
+      end
+      item
+        Name = 'SubCuentas_REF_SUBCUENTA'
+        DataType = datString
+        Size = 15
+      end
+      item
+        Name = 'SubCuentas_DESCRIPCION'
+        DataType = datString
+        Size = 255
+      end
+      item
+        Name = 'SubCuentas_ID_CUENTA'
+        DataType = datInteger
+      end
+      item
+        Name = 'SubCuentas_ID_EJERCICIO'
+        DataType = datInteger
+      end
+      item
+        Name = 'Asientos_ID'
+        DataType = datAutoInc
+        GeneratorName = 'GEN_CONT_ASIENTOS_ID'
+        Required = True
+        DisplayLabel = 'ID'
+        ServerAutoRefresh = True
+      end
+      item
+        Name = 'Asientos_ID_ASIENTO_COMPENSADO'
+        DataType = datInteger
+      end
+      item
+        Name = 'Asientos_ID_SUBCUENTA'
+        DataType = datInteger
+      end
+      item
+        Name = 'Asientos_FECHA_ASIENTO'
+        DataType = datDateTime
+      end
+      item
+        Name = 'Asientos_CONCEPTO'
+        DataType = datString
+        Size = 255
+      end
+      item
+        Name = 'Asientos_PUNTEADO'
+        DataType = datSmallInt
+      end
+      item
+        Name = 'Asientos_DEBE'
+        DataType = datCurrency
+      end
+      item
+        Name = 'Asientos_HABER'
+        DataType = datCurrency
       end>
     Left = 150
     Top = 24
@@ -114,6 +212,244 @@ object srvContabilidad: TsrvContabilidad
     DataDictionary = DataDictionary
     Diagrams = Diagrams
     Datasets = <
+      item
+        Params = <>
+        Statements = <
+          item
+            Connection = 'IBX'
+            ConnectionType = 'Interbase'
+            Default = True
+            TargetTable = 'CONT_ASIENTOS'
+            Name = 'IBX'
+            StatementType = stAutoSQL
+            ColumnMappings = <
+              item
+                DatasetField = 'ID'
+                TableField = 'ID'
+              end
+              item
+                DatasetField = 'ID_ASIENTO_COMPENSADO'
+                TableField = 'ID_ASIENTO_COMPENSADO'
+              end
+              item
+                DatasetField = 'ID_SUBCUENTA'
+                TableField = 'ID_SUBCUENTA'
+              end
+              item
+                DatasetField = 'FECHA_ASIENTO'
+                TableField = 'FECHA_ASIENTO'
+              end
+              item
+                DatasetField = 'CONCEPTO'
+                TableField = 'CONCEPTO'
+              end
+              item
+                DatasetField = 'PUNTEADO'
+                TableField = 'PUNTEADO'
+              end
+              item
+                DatasetField = 'DEBE'
+                TableField = 'DEBE'
+              end
+              item
+                DatasetField = 'HABER'
+                TableField = 'HABER'
+              end>
+          end>
+        Name = 'Asientos'
+        Fields = <
+          item
+            Name = 'ID'
+            DataType = datAutoInc
+            GeneratorName = 'GEN_CONT_ASIENTOS_ID'
+            ServerAutoRefresh = True
+            DictionaryEntry = 'Asientos_ID'
+            InPrimaryKey = True
+          end
+          item
+            Name = 'ID_ASIENTO_COMPENSADO'
+            DataType = datInteger
+            DictionaryEntry = 'Asientos_ID_ASIENTO_COMPENSADO'
+          end
+          item
+            Name = 'ID_SUBCUENTA'
+            DataType = datInteger
+            DictionaryEntry = 'Asientos_ID_SUBCUENTA'
+          end
+          item
+            Name = 'FECHA_ASIENTO'
+            DataType = datDateTime
+            DictionaryEntry = 'Asientos_FECHA_ASIENTO'
+          end
+          item
+            Name = 'CONCEPTO'
+            DataType = datString
+            Size = 255
+            DictionaryEntry = 'Asientos_CONCEPTO'
+          end
+          item
+            Name = 'PUNTEADO'
+            DataType = datSmallInt
+            DictionaryEntry = 'Asientos_PUNTEADO'
+          end
+          item
+            Name = 'DEBE'
+            DataType = datCurrency
+            DictionaryEntry = 'Asientos_DEBE'
+          end
+          item
+            Name = 'HABER'
+            DataType = datCurrency
+            DictionaryEntry = 'Asientos_HABER'
+          end>
+      end
+      item
+        Params = <>
+        Statements = <
+          item
+            Connection = 'IBX'
+            ConnectionType = 'Interbase'
+            Default = True
+            TargetTable = 'CONT_SUBCUENTAS'
+            Name = 'IBX'
+            StatementType = stAutoSQL
+            ColumnMappings = <
+              item
+                DatasetField = 'ID'
+                TableField = 'ID'
+              end
+              item
+                DatasetField = 'REF_SUBCUENTA'
+                TableField = 'REF_SUBCUENTA'
+              end
+              item
+                DatasetField = 'DESCRIPCION'
+                TableField = 'DESCRIPCION'
+              end
+              item
+                DatasetField = 'ID_CUENTA'
+                TableField = 'ID_CUENTA'
+              end
+              item
+                DatasetField = 'ID_EJERCICIO'
+                TableField = 'ID_EJERCICIO'
+              end>
+          end>
+        Name = 'SubCuentas'
+        Fields = <
+          item
+            Name = 'ID'
+            DataType = datAutoInc
+            GeneratorName = 'GEN_CONT_SUBCUENTAS_ID'
+            DictionaryEntry = 'SubCuentas_ID'
+            InPrimaryKey = True
+          end
+          item
+            Name = 'REF_SUBCUENTA'
+            DataType = datString
+            Size = 15
+            DictionaryEntry = 'SubCuentas_REF_SUBCUENTA'
+          end
+          item
+            Name = 'DESCRIPCION'
+            DataType = datString
+            Size = 255
+            DictionaryEntry = 'SubCuentas_DESCRIPCION'
+          end
+          item
+            Name = 'ID_CUENTA'
+            DataType = datInteger
+            DictionaryEntry = 'SubCuentas_ID_CUENTA'
+          end
+          item
+            Name = 'ID_EJERCICIO'
+            DataType = datInteger
+            DictionaryEntry = 'SubCuentas_ID_EJERCICIO'
+          end>
+      end
+      item
+        Params = <>
+        Statements = <
+          item
+            Connection = 'IBX'
+            ConnectionType = 'Interbase'
+            Default = True
+            TargetTable = 'CONT_CUENTAS'
+            Name = 'IBX'
+            StatementType = stAutoSQL
+            ColumnMappings = <
+              item
+                DatasetField = 'ID'
+                TableField = 'ID'
+              end
+              item
+                DatasetField = 'REF_CUENTA'
+                TableField = 'REF_CUENTA'
+              end
+              item
+                DatasetField = 'ID_EJERCICIO'
+                TableField = 'ID_EJERCICIO'
+              end
+              item
+                DatasetField = 'ID_EPIGRAFE'
+                TableField = 'ID_EPIGRAFE'
+              end
+              item
+                DatasetField = 'DESCRIPCION'
+                TableField = 'DESCRIPCION'
+              end
+              item
+                DatasetField = 'ID_BALANCE'
+                TableField = 'ID_BALANCE'
+              end
+              item
+                DatasetField = 'ID_CUENTA_ESPECIAL'
+                TableField = 'ID_CUENTA_ESPECIAL'
+              end>
+          end>
+        Name = 'Cuentas'
+        Fields = <
+          item
+            Name = 'ID'
+            DataType = datAutoInc
+            GeneratorName = 'GEN_CONT_CUENTAS_ID'
+            ServerAutoRefresh = True
+            DictionaryEntry = 'Cuentas_ID'
+            InPrimaryKey = True
+          end
+          item
+            Name = 'REF_CUENTA'
+            DataType = datString
+            Size = 10
+            DictionaryEntry = 'Cuentas_REF_CUENTA'
+          end
+          item
+            Name = 'ID_EJERCICIO'
+            DataType = datInteger
+            DictionaryEntry = 'Cuentas_ID_EJERCICIO'
+          end
+          item
+            Name = 'ID_EPIGRAFE'
+            DataType = datInteger
+            DictionaryEntry = 'Cuentas_ID_EPIGRAFE'
+          end
+          item
+            Name = 'DESCRIPCION'
+            DataType = datString
+            Size = 255
+            DictionaryEntry = 'Cuentas_DESCRIPCION'
+          end
+          item
+            Name = 'ID_BALANCE'
+            DataType = datInteger
+            DictionaryEntry = 'Cuentas_ID_BALANCE'
+          end
+          item
+            Name = 'ID_CUENTA_ESPECIAL'
+            DataType = datInteger
+            DictionaryEntry = 'Cuentas_ID_CUENTA_ESPECIAL'
+          end>
+      end
       item
         Params = <>
         Statements = <
@@ -199,6 +535,7 @@ object srvContabilidad: TsrvContabilidad
             DataType = datAutoInc
             GeneratorName = 'GEN_CONT_EPIGRAFES_ID'
             Required = True
+            ServerAutoRefresh = True
             InPrimaryKey = True
           end
           item