diff --git a/Build/Build.fbl6 b/Build/Build.fbl6
index a75f923..0d47ad4 100644
Binary files a/Build/Build.fbl6 and b/Build/Build.fbl6 differ
diff --git a/Database/scripts/VISTAS.SQL b/Database/scripts/VISTAS.SQL
index 58aec80..57bdfcb 100644
--- a/Database/scripts/VISTAS.SQL
+++ b/Database/scripts/VISTAS.SQL
@@ -1,3 +1,4 @@
+DROP VIEW V_INF_VENTAS_ALB_ARTICULOS;
 DROP VIEW V_INF_VENTAS_ARTICULOS;
 DROP VIEW V_INF_ULTVEN_PORCLIENTE;
 DROP VIEW V_INF_ULTVEN_PORARTICULO;
@@ -316,3 +317,123 @@ on ((AGENTES_COMISIONES.ID_AGENTE = AGENTES.ID) and (AGENTES_COMISIONES.ID_PROVE
 where (FACTURAS_CLIENTE_DETALLES.ID_ARTICULO is not null) and (FACTURAS_CLIENTE_DETALLES.ID_ARTICULO > 0)  /*Quitamos conceptos libres*/
 /*and (FACTURAS_CLIENTE_DETALLES.cantidad > 0)                                                               Quitamos los abonos*/
 and (ARTICULOS.INVENTARIABLE = 1);
+
+
+
+
+CREATE VIEW V_INF_VENTAS_ALB_ARTICULOS(
+    ID_ALBARAN,
+    ID_EMPRESA,
+    REFERENCIA_ALBARAN,
+    FECHA_ALBARAN,
+    IMPORTE_TOTAL_ALBARAN,
+    ID_ARTICULO,
+    FAMILIA,
+    REFERENCIA,
+    REFERENCIA_PROV,
+    DESCRIPCION,
+    COMISIONABLE,
+    INVENTARIABLE,
+    IMPORTE_UNIDAD_COSTE,
+    DESCUENTO_PROVEEDOR_COSTE,
+    IMPORTE_NETO_COSTE,
+    IMPORTE_PORTE_COSTE,
+    CANTIDAD,
+    IMPORTE_UNIDAD_VENTA,
+    DESCUENTO_CLIENTE_VENTA,
+    IMPORTE_NETO_VENTA,
+    IMPORTE_PORTE_VENTA,
+    IMPORTE_TOTAL_VENTA,
+    NIF_CIF_PROVEEDOR,
+    NOMBRE_PROVEEDOR,
+    CALLE_PROVEEDOR,
+    POBLACION_PROVEEDOR,
+    PROVINCIA_PROVEEDOR,
+    NIF_CIF_CLIENTE,
+    NOMBRE_CLIENTE,
+    NOMBRE_COMERCIAL_CLIENTE,
+    CALLE_CLIENTE,
+    POBLACION_CLIENTE,
+    PROVINCIA_CLIENTE,
+    NIF_CIF_AGENTE,
+    NOMBRE_AGENTE,
+    CALLE_AGENTE,
+    POBLACION_AGENTE,
+    PROVINCIA_AGENTE,
+    COMISION_AGENTE,
+    IMPORTE_COMISION_AGENTE)
+AS
+select
+albaranes_cliente.ID,
+albaranes_cliente.ID_EMPRESA,
+albaranes_cliente.REFERENCIA,
+albaranes_cliente.FECHA_ALBARAN,
+albaranes_cliente.IMPORTE_TOTAL,
+
+ALBARANES_CLIENTE_DETALLES.ID_ARTICULO,
+
+ARTICULOS.FAMILIA,
+ARTICULOS.REFERENCIA,
+ARTICULOS.REFERENCIA_PROV,
+ARTICULOS.DESCRIPCION,
+ARTICULOS.COMISIONABLE,
+ARTICULOS.INVENTARIABLE,
+
+ARTICULOS.PRECIO_COSTE,
+ARTICULOS.DESCUENTO,
+ARTICULOS.PRECIO_NETO,
+ARTICULOS.PRECIO_PORTE,
+
+ALBARANES_CLIENTE_DETALLES.CANTIDAD,
+ALBARANES_CLIENTE_DETALLES.IMPORTE_UNIDAD as importe_unidad_venta,
+ALBARANES_CLIENTE_DETALLES.DESCUENTO,
+
+case when ALBARANES_CLIENTE_DETALLES.CANTIDAD < 0 then
+/*En caso de ser un abono el importe neto venta debe ser negativo para que los informes no salgan falseados*/
+(-1)*(ALBARANES_CLIENTE_DETALLES.IMPORTE_UNIDAD - (ALBARANES_CLIENTE_DETALLES.IMPORTE_UNIDAD * (ALBARANES_CLIENTE_DETALLES.DESCUENTO/100)))
+else
+ALBARANES_CLIENTE_DETALLES.IMPORTE_UNIDAD - (ALBARANES_CLIENTE_DETALLES.IMPORTE_UNIDAD * (ALBARANES_CLIENTE_DETALLES.DESCUENTO/100))
+end as importe_neto_venta,
+
+ALBARANES_CLIENTE_DETALLES.IMPORTE_PORTE as importe_porte_venta,
+ALBARANES_CLIENTE_DETALLES.IMPORTE_TOTAL,
+
+PROVEEDORES.NIF_CIF,
+PROVEEDORES.NOMBRE,
+PROVEEDORES.CALLE,
+PROVEEDORES.POBLACION,
+PROVEEDORES.PROVINCIA,
+
+CLIENTES.NIF_CIF,
+CLIENTES.NOMBRE,
+CLIENTES_DATOS.NOMBRE_COMERCIAL,
+CLIENTES.CALLE,
+CLIENTES.POBLACION,
+CLIENTES.PROVINCIA,
+
+AGENTES.NIF_CIF,
+AGENTES.NOMBRE,
+AGENTES.CALLE,
+AGENTES.POBLACION,
+AGENTES.PROVINCIA,
+
+COALESCE(AGENTES_COMISIONES.COMISION, 0) AS COMISION,
+
+(CASE COALESCE(AGENTES_COMISIONES.COMISION, 0) WHEN 0 THEN 0
+       ELSE ((ALBARANES_CLIENTE_DETALLES.IMPORTE_TOTAL * AGENTES_COMISIONES.COMISION)/100) END) as IMPORTE_COMISION
+
+
+from ALBARANES_CLIENTE_DETALLES
+left join ARTICULOS on (ARTICULOS.ID = ALBARANES_CLIENTE_DETALLES.ID_ARTICULO)
+left join CONTACTOS PROVEEDORES on (PROVEEDORES.ID = ARTICULOS.ID_PROVEEDOR)
+left join ALBARANES_CLIENTE on (ALBARANES_CLIENTE.ID = ALBARANES_CLIENTE_DETALLES.ID_ALBARAN)
+left join CONTACTOS CLIENTES on (CLIENTES.ID = ALBARANES_CLIENTE.ID_CLIENTE)
+left join CLIENTES_DATOS on (CLIENTES_DATOS.ID_CLIENTE = CLIENTES.ID)
+left join CONTACTOS AGENTES on (AGENTES.ID = CLIENTES_DATOS.ID_AGENTE)
+left join AGENTES_COMISIONES
+on ((AGENTES_COMISIONES.ID_AGENTE = AGENTES.ID) and (AGENTES_COMISIONES.ID_PROVEEDOR = PROVEEDORES.ID))
+
+where (ALBARANES_CLIENTE_DETALLES.ID_ARTICULO is not null) and (ALBARANES_CLIENTE_DETALLES.ID_ARTICULO > 0)  /*Quitamos conceptos libres*/
+/*and (FACTURAS_CLIENTE_DETALLES.cantidad > 0)                                                               Quitamos los abonos*/
+and (ARTICULOS.INVENTARIABLE = 1)
+;
diff --git a/Source/Cliente/FactuGES.dproj b/Source/Cliente/FactuGES.dproj
index 6137f46..9bffa75 100644
--- a/Source/Cliente/FactuGES.dproj
+++ b/Source/Cliente/FactuGES.dproj
@@ -53,7 +53,7 @@
     <Borland.Personality>Delphi.Personality</Borland.Personality>
     <Borland.ProjectType>VCLApplication</Borland.ProjectType>
     <BorlandProject>
-<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Language><Language Name="RootDir">C:\Archivos de programa\Borland\Delphi7\Bin\</Language></Language><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">4</VersionInfo><VersionInfo Name="MinorVer">1</VersionInfo><VersionInfo Name="Release">7</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">Rodax Software S.L.</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">4.1.7.0</VersionInfoKeys><VersionInfoKeys Name="InternalName">FactuGES</VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">FactuGES</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">4.1.7.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys></VersionInfoKeys><Excluded_Packages></Excluded_Packages><Source><Source Name="MainSource">FactuGES.dpr</Source></Source></Delphi.Personality><ModelSupport>False</ModelSupport></BorlandProject></BorlandProject>
+<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Language><Language Name="RootDir">C:\Archivos de programa\Borland\Delphi7\Bin\</Language></Language><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">4</VersionInfo><VersionInfo Name="MinorVer">1</VersionInfo><VersionInfo Name="Release">8</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">Rodax Software S.L.</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">4.1.8.0</VersionInfoKeys><VersionInfoKeys Name="InternalName">FactuGES</VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">FactuGES</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">4.1.8.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys></VersionInfoKeys><Excluded_Packages></Excluded_Packages><Source><Source Name="MainSource">FactuGES.dpr</Source></Source></Delphi.Personality><ModelSupport>False</ModelSupport></BorlandProject></BorlandProject>
   </ProjectExtensions>
   <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
   <ItemGroup>
diff --git a/Source/Cliente/FactuGES.rc b/Source/Cliente/FactuGES.rc
index ba8d97e..5936bf9 100644
--- a/Source/Cliente/FactuGES.rc
+++ b/Source/Cliente/FactuGES.rc
@@ -1,7 +1,7 @@
 MAINICON ICON "C:\Codigo\Resources\Iconos\Factuges.ico"
 1 VERSIONINFO
-FILEVERSION 4,1,7,0
-PRODUCTVERSION 4,1,7,0
+FILEVERSION 4,1,8,0
+PRODUCTVERSION 4,1,8,0
 FILEFLAGSMASK 0x3FL
 FILEFLAGS 0x00L
 FILEOS 0x40004L
@@ -13,10 +13,10 @@ BEGIN
          BLOCK "0C0A04E4"
          BEGIN
               VALUE "CompanyName", "Rodax Software S.L.\0"
-              VALUE "FileVersion", "4.1.7.0\0"
+              VALUE "FileVersion", "4.1.8.0\0"
               VALUE "InternalName", "FactuGES\0"
               VALUE "ProductName", "FactuGES\0"
-              VALUE "ProductVersion", "4.1.7.0\0"
+              VALUE "ProductVersion", "4.1.8.0\0"
          END
     END
     BLOCK "VarFileInfo"
diff --git a/Source/Cliente/FactuGES.res b/Source/Cliente/FactuGES.res
index 50c42f5..7529b0b 100644
Binary files a/Source/Cliente/FactuGES.res and b/Source/Cliente/FactuGES.res differ
diff --git a/Source/GUIBase/GUIBase.res b/Source/GUIBase/GUIBase.res
index 1641339..8b251f3 100644
Binary files a/Source/GUIBase/GUIBase.res and b/Source/GUIBase/GUIBase.res differ
diff --git a/Source/Modulos/Informe margen por articulo/Data/InfMargenArticulo_data.drc b/Source/Modulos/Informe margen por articulo/Data/InfMargenArticulo_data.drc
index b993e7b..871aebe 100644
--- a/Source/Modulos/Informe margen por articulo/Data/InfMargenArticulo_data.drc	
+++ b/Source/Modulos/Informe margen por articulo/Data/InfMargenArticulo_data.drc	
@@ -14,4 +14,4 @@ END
 
 /* C:\Codigo\Source\Modulos\Informe margen por articulo\Data\uDataModuleInfMargenArticulo.dfm */
 /* C:\Codigo\Source\Modulos\Informe margen por articulo\Data\InfMargenArticulo_data.res */
-/* c:\temp\dtf2FB.tmp */
+/* c:\temp\dtf338.tmp */
diff --git a/Source/Modulos/Informe margen por articulo/Model/InfMargenArticulo_model.drc b/Source/Modulos/Informe margen por articulo/Model/InfMargenArticulo_model.drc
index 65fa79a..d45cce3 100644
--- a/Source/Modulos/Informe margen por articulo/Model/InfMargenArticulo_model.drc	
+++ b/Source/Modulos/Informe margen por articulo/Model/InfMargenArticulo_model.drc	
@@ -13,4 +13,4 @@ BEGIN
 END
 
 /* C:\Codigo\Source\Modulos\Informe margen por articulo\Model\InfMargenArticulo_model.res */
-/* c:\temp\dtf2F9.tmp */
+/* c:\temp\dtf336.tmp */
diff --git a/Source/Modulos/Informe margen por articulo/Views/InfMargenArticulo_view.drc b/Source/Modulos/Informe margen por articulo/Views/InfMargenArticulo_view.drc
index 8819abb..7023121 100644
--- a/Source/Modulos/Informe margen por articulo/Views/InfMargenArticulo_view.drc	
+++ b/Source/Modulos/Informe margen por articulo/Views/InfMargenArticulo_view.drc	
@@ -16,4 +16,4 @@ END
 /* C:\Codigo\Source\Modulos\Informe margen por articulo\Views\uViewInfMargenArticulo.dfm */
 /* C:\Codigo\Source\Modulos\Informe margen por articulo\Views\uEditorInfMargenArticulo.dfm */
 /* C:\Codigo\Source\Modulos\Informe margen por articulo\Views\InfMargenArticulo_view.res */
-/* c:\temp\dtf2FF.tmp */
+/* c:\temp\dtf33C.tmp */
diff --git a/Source/Modulos/Informe ventas por articulo/Controller/InfVentasArticulo_controller.dpk b/Source/Modulos/Informe ventas por articulo/Controller/InfVentasArticulo_controller.dpk
index 69992dc..4308399 100644
--- a/Source/Modulos/Informe ventas por articulo/Controller/InfVentasArticulo_controller.dpk	
+++ b/Source/Modulos/Informe ventas por articulo/Controller/InfVentasArticulo_controller.dpk	
@@ -31,11 +31,26 @@ requires
   Informes_model,
   InformesBase_controller,
   GUIBase,
-  ApplicationBase;
+  ApplicationBase,
+  rtl,
+  vcl,
+  dbrtl,
+  cxLibraryD11,
+  dxThemeD11,
+  dxGDIPlusD11,
+  dxCoreD11,
+  vclx,
+  RemObjects_Core_D11,
+  DataAbstract_Core_D11,
+  vcldb,
+  dsnap,
+  adortl;
 
 contains
   uInfVentasArticuloController in 'uInfVentasArticuloController.pas',
   uIEditorInfVentasArticulo in 'View\uIEditorInfVentasArticulo.pas',
-  uInfVentasArticuloInformeRegister in 'uInfVentasArticuloInformeRegister.pas';
+  uInfVentasArticuloInformeRegister in 'uInfVentasArticuloInformeRegister.pas',
+  uInfVentasAlbArticuloController in 'uInfVentasAlbArticuloController.pas',
+  uIEditorInfVentasAlbArticulo in 'View\uIEditorInfVentasAlbArticulo.pas';
 
 end.
diff --git a/Source/Modulos/Informe ventas por articulo/Controller/InfVentasArticulo_controller.dproj b/Source/Modulos/Informe ventas por articulo/Controller/InfVentasArticulo_controller.dproj
index 4295413..653fbcf 100644
--- a/Source/Modulos/Informe ventas por articulo/Controller/InfVentasArticulo_controller.dproj	
+++ b/Source/Modulos/Informe ventas por articulo/Controller/InfVentasArticulo_controller.dproj	
@@ -1,4 +1,5 @@
-<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+<?xml version="1.0" encoding="utf-8"?>
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
   <PropertyGroup>
     <ProjectGuid>{5874467b-b5ec-4f13-a56b-36d9d93d49a5}</ProjectGuid>
     <MainSource>InfVentasArticulo_controller.dpk</MainSource>
@@ -39,44 +40,15 @@
     <Borland.Personality>Delphi.Personality</Borland.Personality>
     <Borland.ProjectType>Package</Borland.ProjectType>
     <BorlandProject>
-<BorlandProject xmlns=""> <Delphi.Personality>   <Parameters>
-      <Parameters Name="UseLauncher">False</Parameters>
-      <Parameters Name="LoadAllSymbols">True</Parameters>
-      <Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
-    </Parameters>
-    <Package_Options>
-      <Package_Options Name="ImplicitBuild">True</Package_Options>
-      <Package_Options Name="DesigntimeOnly">False</Package_Options>
-      <Package_Options Name="RuntimeOnly">False</Package_Options>
-    </Package_Options>
-    <VersionInfo>
-      <VersionInfo Name="IncludeVerInfo">True</VersionInfo>
-      <VersionInfo Name="AutoIncBuild">False</VersionInfo>
-      <VersionInfo Name="MajorVer">1</VersionInfo>
-      <VersionInfo Name="MinorVer">0</VersionInfo>
-      <VersionInfo Name="Release">0</VersionInfo>
-      <VersionInfo Name="Build">0</VersionInfo>
-      <VersionInfo Name="Debug">False</VersionInfo>
-      <VersionInfo Name="PreRelease">False</VersionInfo>
-      <VersionInfo Name="Special">False</VersionInfo>
-      <VersionInfo Name="Private">False</VersionInfo>
-      <VersionInfo Name="DLL">False</VersionInfo>
-      <VersionInfo Name="Locale">3082</VersionInfo>
-      <VersionInfo Name="CodePage">1252</VersionInfo>
-    </VersionInfo>
-    <VersionInfoKeys>
-      <VersionInfoKeys Name="CompanyName"></VersionInfoKeys>
-      <VersionInfoKeys Name="FileDescription"></VersionInfoKeys>
-      <VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys>
-      <VersionInfoKeys Name="InternalName"></VersionInfoKeys>
-      <VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys>
-      <VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys>
-      <VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys>
-      <VersionInfoKeys Name="ProductName"></VersionInfoKeys>
-      <VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
-      <VersionInfoKeys Name="Comments"></VersionInfoKeys>
-    </VersionInfoKeys>
-    <Excluded_Packages>
+<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="ImplicitBuild">True</Package_Options><Package_Options Name="DesigntimeOnly">False</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName"></VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName"></VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
+      
+      
+      
+      
+      
+      
+      
+      
       
       
       
@@ -89,30 +61,40 @@
       
       <Excluded_Packages Name="C:\Documents and Settings\Usuario\Mis documentos\Borland Studio Projects\Bpl\EasyListviewD10.bpl">Muststang Peak EasyListview Runtime Package</Excluded_Packages>
       <Excluded_Packages Name="C:\Archivos de programa\RemObjects Software\Pascal Script\Dcu\D10\PascalScript_RO_D10.bpl">RemObjects Pascal Script - RemObjects SDK 3.0 Integration</Excluded_Packages>
-    </Excluded_Packages>
-    <Source>
-      <Source Name="MainSource">InfVentasArticulo_controller.dpk</Source>
-    </Source>
-  </Delphi.Personality> </BorlandProject></BorlandProject>
+    </Excluded_Packages><Source><Source Name="MainSource">InfVentasArticulo_controller.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
   </ProjectExtensions>
   <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
   <ItemGroup>
     <DelphiCompile Include="InfVentasArticulo_controller.dpk">
       <MainSource>MainSource</MainSource>
     </DelphiCompile>
-    <DCCReference Include="..\..\..\Lib\ApplicationBase.dcp" />
-    <DCCReference Include="..\..\..\Lib\GUIBase.dcp" />
-    <DCCReference Include="..\..\..\Lib\InformesBase_controller.dcp" />
-    <DCCReference Include="..\..\..\Lib\InformesBase_view.dcp" />
-    <DCCReference Include="..\..\..\Lib\Informes_model.dcp" />
-    <DCCReference Include="..\..\..\Lib\InfVentasArticulo_data.dcp" />
-    <DCCReference Include="..\..\..\Lib\InfVentasArticulo_model.dcp" />
+    <DCCReference Include="uInfVentasAlbArticuloController.pas" />
     <DCCReference Include="uInfVentasArticuloController.pas" />
     <DCCReference Include="uInfVentasArticuloInformeRegister.pas" />
+    <DCCReference Include="View\adortl.dcp" />
+    <DCCReference Include="View\ApplicationBase.dcp" />
+    <DCCReference Include="View\cxLibraryD11.dcp" />
+    <DCCReference Include="View\DataAbstract_Core_D11.dcp" />
+    <DCCReference Include="View\dbrtl.dcp" />
+    <DCCReference Include="View\dsnap.dcp" />
+    <DCCReference Include="View\dxCoreD11.dcp" />
+    <DCCReference Include="View\dxGDIPlusD11.dcp" />
+    <DCCReference Include="View\dxThemeD11.dcp" />
+    <DCCReference Include="View\GUIBase.dcp" />
+    <DCCReference Include="View\InformesBase_controller.dcp" />
+    <DCCReference Include="View\InformesBase_view.dcp" />
+    <DCCReference Include="View\Informes_model.dcp" />
+    <DCCReference Include="View\InfVentasArticulo_data.dcp" />
+    <DCCReference Include="View\InfVentasArticulo_model.dcp" />
+    <DCCReference Include="View\RemObjects_Core_D11.dcp" />
+    <DCCReference Include="View\rtl.dcp" />
+    <DCCReference Include="View\uIEditorInfVentasAlbArticulo.pas" />
     <DCCReference Include="View\uIEditorInfVentasArticulo.pas" />
+    <DCCReference Include="View\vcl.dcp" />
+    <DCCReference Include="View\vcldb.dcp" />
+    <DCCReference Include="View\vclx.dcp" />
   </ItemGroup>
 </Project>
-
 <!-- EurekaLog First Line
 [Exception Log]
 EurekaLog Version=6011
diff --git a/Source/Modulos/Informe ventas por articulo/Controller/View/uIEditorInfVentasAlbArticulo.pas b/Source/Modulos/Informe ventas por articulo/Controller/View/uIEditorInfVentasAlbArticulo.pas
new file mode 100644
index 0000000..156c8a1
--- /dev/null
+++ b/Source/Modulos/Informe ventas por articulo/Controller/View/uIEditorInfVentasAlbArticulo.pas	
@@ -0,0 +1,18 @@
+unit uIEditorInfVentasAlbArticulo;
+
+interface
+
+uses
+  uEditorInformeBaseInforme, uBizInfVentasArticulo, uInfVentasAlbArticuloController;
+
+type
+  IEditorInfVentasAlbArticulo = interface(IEditorInformeBaseInforme)
+  ['{0A8FCEC2-6D9A-4188-8913-8DEA8FC092AA}']
+    function GetController : IInfVentasAlbArticuloController;
+    procedure SetController (const Value : IInfVentasAlbArticuloController);
+    property Controller : IInfVentasAlbArticuloController read GetController write SetController;
+  end;
+
+implementation
+
+end.
diff --git a/Source/Modulos/Informe ventas por articulo/Controller/uInfVentasAlbArticuloController.pas b/Source/Modulos/Informe ventas por articulo/Controller/uInfVentasAlbArticuloController.pas
new file mode 100644
index 0000000..9b714a4
--- /dev/null
+++ b/Source/Modulos/Informe ventas por articulo/Controller/uInfVentasAlbArticuloController.pas	
@@ -0,0 +1,110 @@
+unit uInfVentasAlbArticuloController;
+
+interface
+
+
+uses
+  Classes, SysUtils, uDADataTable, uControllerBase, uEditorDBItem,
+  uBizInfVentasArticulo, uIDataModuleInfVentasArticulo, uInformeBaseController,
+  uBizInformes;
+
+type
+  IInfVentasAlbArticuloController = interface (IInformeBaseController)
+  ['{1EA7396B-D88E-4006-8BF3-C0A4BFFB16FD}']
+    function BuscarTodos(const AColumns: String; const AWhere: String): IBizInfVentasAlbArticulo;
+  end;
+
+  TInfVentasAlbArticuloController = class(TInterfacedObject, IInfVentasAlbArticuloController, IInformeBaseController)
+  protected
+    FDataModule : IDataModuleInfVentasArticulo;
+
+    function CreateEditor(const AName : String; const IID: TGUID; out Intf): Boolean;
+
+    function BuscarTodos(const AColumns: String; const AWhere: String): IBizInfVentasAlbArticulo;
+    procedure AsignarDataModule; virtual;
+
+  public
+    constructor Create; virtual;
+    destructor Destroy; override;
+
+    procedure Nuevo(AInforme : IBizInforme);
+    procedure Ver(AInforme : IBizInforme);
+  end;
+
+implementation
+
+uses
+  Forms, cxControls, DB, uEditorRegistryUtils,
+  uIEditorInfVentasAlbArticulo, uDataModuleUsuarios,
+  uDataModuleInfVentasArticulo, uFactuGES_App,
+  uDAInterfaces, uDataTableUtils,
+  uDateUtils, uROTypes, DateUtils, Controls, Windows,
+  dialogs, Variants, uControllerDetallesBase, uDialogUtils,
+  schInfVentasArticuloClient_Intf;
+
+{ TInfVentasArticuloController }
+
+procedure TInfVentasAlbArticuloController.AsignarDataModule;
+begin
+  FDataModule := TdmInfVentasArticulo.Create(Nil);
+end;
+
+function TInfVentasAlbArticuloController.BuscarTodos(const AColumns: String; const AWhere: String): IBizInfVentasAlbArticulo;
+begin
+  Result := FDataModule.GetItemsAlbaranes(AColumns, AWhere);
+//  FiltrarEmpresa(Result);
+end;
+
+constructor TInfVentasAlbArticuloController.Create;
+begin
+  AsignarDataModule;
+end;
+
+function TInfVentasAlbArticuloController.CreateEditor(const AName: String; const IID: TGUID; out Intf): Boolean;
+begin
+  Result := Supports(EditorRegistry.CreateEditor(AName), IID, Intf);
+end;
+
+destructor TInfVentasAlbArticuloController.Destroy;
+begin
+  FDataModule := Nil;
+  inherited;
+end;
+
+procedure TInfVentasAlbArticuloController.Ver(AInforme: IBizInforme);
+var
+  AEditor : IEditorInfVentasAlbArticulo;
+begin
+  AEditor := NIL;
+  ShowHourglassCursor;
+  try
+    CreateEditor('EditorInfVentasAlbArticulo', IEditorInfVentasAlbArticulo, AEditor);
+    with (AEditor as IEditorInfVentasAlbArticulo) do
+    begin
+      if not Assigned(FDataModule) then
+         AsignarDataModule;
+      Controller := Self; //OJO ORDEN MUY IMPORTANTE
+      Informe := AInforme;
+    end;
+  finally
+    HideHourglassCursor;
+  end;
+
+  if Assigned(AEditor) then
+    try
+      AEditor.ShowModal;
+      AEditor.Release;
+    finally
+      AEditor := NIL;
+    end;
+end;
+
+procedure TInfVentasAlbArticuloController.Nuevo(AInforme: IBizInforme);
+begin
+  AInforme.Insert;
+  AInforme.CATEGORIA := 'VENTAS ARTICULOS';
+  AInforme.CONTROLLER := 'InfVentasAlbArticuloController';
+  AInforme.ID_EMPRESA := AppFactuGES.EmpresaActiva.ID;
+end;
+
+end.
diff --git a/Source/Modulos/Informe ventas por articulo/Controller/uInfVentasArticuloController.pas b/Source/Modulos/Informe ventas por articulo/Controller/uInfVentasArticuloController.pas
index 01915a5..e509739 100644
--- a/Source/Modulos/Informe ventas por articulo/Controller/uInfVentasArticuloController.pas	
+++ b/Source/Modulos/Informe ventas por articulo/Controller/uInfVentasArticuloController.pas	
@@ -74,7 +74,7 @@ end;
 
 function TInfVentasArticuloController.BuscarTodos(const AColumns: String; const AWhere: String): IBizInfVentasArticulo;
 begin
-  Result := FDataModule.GetItems(AColumns, AWhere);
+  Result := FDataModule.GetItemsFacturas(AColumns, AWhere);
 //  FiltrarEmpresa(Result);
 end;
 
diff --git a/Source/Modulos/Informe ventas por articulo/Controller/uInfVentasArticuloInformeRegister.pas b/Source/Modulos/Informe ventas por articulo/Controller/uInfVentasArticuloInformeRegister.pas
index 491eef2..c4bf10b 100644
--- a/Source/Modulos/Informe ventas por articulo/Controller/uInfVentasArticuloInformeRegister.pas	
+++ b/Source/Modulos/Informe ventas por articulo/Controller/uInfVentasArticuloInformeRegister.pas	
@@ -8,16 +8,18 @@ procedure UnregisterInformes;
 implementation
 
 uses
-  uInformeRegistryUtils, uInfVentasArticuloController;
+  uInformeRegistryUtils, uInfVentasArticuloController, uInfVentasAlbArticuloController;
 
 procedure RegisterInformes;
 begin
   InformeRegistry.RegisterClass(TInfVentasArticuloController, 'InfVentasArticuloController');
+  InformeRegistry.RegisterClass(TInfVentasAlbArticuloController, 'InfVentasAlbArticuloController');
 end;
 
 procedure UnregisterInformes;
 begin
   InformeRegistry.UnRegisterClass(TInfVentasArticuloController);
+  InformeRegistry.UnRegisterClass(TInfVentasAlbArticuloController);  
 end;
 
 end.
diff --git a/Source/Modulos/Informe ventas por articulo/Data/InfVentasArticulo_data.drc b/Source/Modulos/Informe ventas por articulo/Data/InfVentasArticulo_data.drc
index 81854d5..513362d 100644
--- a/Source/Modulos/Informe ventas por articulo/Data/InfVentasArticulo_data.drc	
+++ b/Source/Modulos/Informe ventas por articulo/Data/InfVentasArticulo_data.drc	
@@ -14,4 +14,4 @@ END
 
 /* C:\Codigo\Source\Modulos\Informe ventas por articulo\Data\uDataModuleInfVentasArticulo.dfm */
 /* C:\Codigo\Source\Modulos\Informe ventas por articulo\Data\InfVentasArticulo_data.res */
-/* c:\temp\dtf2F1.tmp */
+/* c:\temp\dtf32E.tmp */
diff --git a/Source/Modulos/Informe ventas por articulo/Data/uDataModuleInfVentasArticulo.dfm b/Source/Modulos/Informe ventas por articulo/Data/uDataModuleInfVentasArticulo.dfm
index b2611cb..24c4f3d 100644
--- a/Source/Modulos/Informe ventas por articulo/Data/uDataModuleInfVentasArticulo.dfm	
+++ b/Source/Modulos/Informe ventas por articulo/Data/uDataModuleInfVentasArticulo.dfm	
@@ -328,4 +328,235 @@ inherited dmInfVentasArticulo: TdmInfVentasArticulo
     Left = 280
     Top = 152
   end
+  object rda_InfVentasAlbArticulo: TDARemoteDataAdapter
+    DataStreamer = Bin2DataStreamer
+    GetSchemaCall.RemoteService = RORemoteService
+    GetDataCall.RemoteService = RORemoteService
+    GetDataCall.MethodName = 'GetData'
+    GetDataCall.Params = <
+      item
+        Name = 'Result'
+        DataType = rtBinary
+        Flag = fResult
+        Value = Null
+      end
+      item
+        Name = 'aTableNameArray'
+        DataType = rtUserDefined
+        Flag = fIn
+        TypeName = 'StringArray'
+        Value = Null
+      end
+      item
+        Name = 'aTableRequestInfoArray'
+        DataType = rtUserDefined
+        Flag = fIn
+        TypeName = 'TableRequestInfoArray'
+        Value = Null
+      end>
+    GetDataCall.Default = False
+    GetDataCall.OutgoingTableNamesParameter = 'aTableNameArray'
+    GetDataCall.OutgoingTableRequestInfosParameter = 'aTableRequestInfoArray'
+    GetDataCall.IncomingDataParameter = 'Result'
+    GetDataCall.OutgoingIncludeSchemaParameter = 'aIncludeSchema'
+    GetDataCall.OutgoingMaxRecordsParameter = 'aMaxRecords'
+    UpdateDataCall.RemoteService = RORemoteService
+    GetScriptsCall.RemoteService = RORemoteService
+    RemoteService = RORemoteService
+    Left = 280
+    Top = 216
+  end
+  object tbl_InfVentasAlbArticulo: TDAMemDataTable
+    RemoteUpdatesOptions = []
+    Fields = <
+      item
+        Name = 'ID_ALBARAN'
+        DataType = datInteger
+      end
+      item
+        Name = 'ID_EMPRESA'
+        DataType = datInteger
+      end
+      item
+        Name = 'REFERENCIA_ALBARAN'
+        DataType = datString
+        Size = 255
+      end
+      item
+        Name = 'FECHA_ALBARAN'
+        DataType = datDateTime
+      end
+      item
+        Name = 'IMPORTE_TOTAL_ALBARAN'
+        DataType = datCurrency
+      end
+      item
+        Name = 'ID_ARTICULO'
+        DataType = datInteger
+      end
+      item
+        Name = 'FAMILIA'
+        DataType = datString
+        Size = 255
+      end
+      item
+        Name = 'REFERENCIA'
+        DataType = datString
+        Size = 255
+      end
+      item
+        Name = 'REFERENCIA_PROV'
+        DataType = datString
+        Size = 255
+      end
+      item
+        Name = 'DESCRIPCION'
+        DataType = datString
+        Size = 255
+      end
+      item
+        Name = 'COMISIONABLE'
+        DataType = datSmallInt
+      end
+      item
+        Name = 'INVENTARIABLE'
+        DataType = datSmallInt
+      end
+      item
+        Name = 'IMPORTE_UNIDAD_COSTE'
+        DataType = datCurrency
+      end
+      item
+        Name = 'DESCUENTO_PROVEEDOR_COSTE'
+        DataType = datFloat
+      end
+      item
+        Name = 'IMPORTE_NETO_COSTE'
+        DataType = datCurrency
+      end
+      item
+        Name = 'IMPORTE_PORTE_COSTE'
+        DataType = datCurrency
+      end
+      item
+        Name = 'CANTIDAD'
+        DataType = datCurrency
+      end
+      item
+        Name = 'IMPORTE_UNIDAD_VENTA'
+        DataType = datCurrency
+      end
+      item
+        Name = 'DESCUENTO_CLIENTE_VENTA'
+        DataType = datFloat
+      end
+      item
+        Name = 'IMPORTE_NETO_VENTA'
+        DataType = datFloat
+      end
+      item
+        Name = 'IMPORTE_PORTE_VENTA'
+        DataType = datCurrency
+      end
+      item
+        Name = 'IMPORTE_TOTAL_VENTA'
+        DataType = datCurrency
+      end
+      item
+        Name = 'NIF_CIF_PROVEEDOR'
+        DataType = datString
+        Size = 15
+      end
+      item
+        Name = 'NOMBRE_PROVEEDOR'
+        DataType = datString
+        Size = 255
+      end
+      item
+        Name = 'CALLE_PROVEEDOR'
+        DataType = datString
+        Size = 255
+      end
+      item
+        Name = 'POBLACION_PROVEEDOR'
+        DataType = datString
+        Size = 255
+      end
+      item
+        Name = 'PROVINCIA_PROVEEDOR'
+        DataType = datString
+        Size = 255
+      end
+      item
+        Name = 'NIF_CIF_CLIENTE'
+        DataType = datString
+        Size = 15
+      end
+      item
+        Name = 'NOMBRE_CLIENTE'
+        DataType = datString
+        Size = 255
+      end
+      item
+        Name = 'NOMBRE_COMERCIAL_CLIENTE'
+        DataType = datString
+        Size = 255
+      end
+      item
+        Name = 'CALLE_CLIENTE'
+        DataType = datString
+        Size = 255
+      end
+      item
+        Name = 'POBLACION_CLIENTE'
+        DataType = datString
+        Size = 255
+      end
+      item
+        Name = 'PROVINCIA_CLIENTE'
+        DataType = datString
+        Size = 255
+      end
+      item
+        Name = 'NIF_CIF_AGENTE'
+        DataType = datString
+        Size = 15
+      end
+      item
+        Name = 'NOMBRE_AGENTE'
+        DataType = datString
+        Size = 255
+      end
+      item
+        Name = 'CALLE_AGENTE'
+        DataType = datString
+        Size = 255
+      end
+      item
+        Name = 'POBLACION_AGENTE'
+        DataType = datString
+        Size = 255
+      end
+      item
+        Name = 'PROVINCIA_AGENTE'
+        DataType = datString
+        Size = 255
+      end
+      item
+        Name = 'COMISION_AGENTE'
+        DataType = datFloat
+      end
+      item
+        Name = 'IMPORTE_COMISION_AGENTE'
+        DataType = datFloat
+      end>
+    Params = <>
+    MasterMappingMode = mmDataRequest
+    StreamingOptions = [soDisableEventsWhileStreaming]
+    RemoteDataAdapter = rda_InfVentasAlbArticulo
+    LogicalName = 'InfVentasAlbArticulo'
+    IndexDefs = <>
+    Left = 280
+    Top = 272
+  end
 end
diff --git a/Source/Modulos/Informe ventas por articulo/Data/uDataModuleInfVentasArticulo.pas b/Source/Modulos/Informe ventas por articulo/Data/uDataModuleInfVentasArticulo.pas
index bc9f146..75b77b6 100644
--- a/Source/Modulos/Informe ventas por articulo/Data/uDataModuleInfVentasArticulo.pas	
+++ b/Source/Modulos/Informe ventas por articulo/Data/uDataModuleInfVentasArticulo.pas	
@@ -25,13 +25,20 @@ type
     rda_TablaVacia: TDARemoteDataAdapter;
     tbl_TablaVacia: TDAMemDataTable;
     tbl_InfVentasArticulo: TDAMemDataTable;
+    rda_InfVentasAlbArticulo: TDARemoteDataAdapter;
+    tbl_InfVentasAlbArticulo: TDAMemDataTable;
     procedure DAClientDataModuleCreate(Sender: TObject);
 
   private
-    procedure InitRDA(var aDataTable: TDAMemDataTable; const AWhere: String; aIncludeSchema: Boolean; AMaxRecords: integer);
+    procedure InitRDAFacturas(var aDataTable: TDAMemDataTable; const AWhere: String; aIncludeSchema: Boolean; AMaxRecords: integer);
+    procedure InitRDAAlbaranes(var aDataTable: TDAMemDataTable; const AWhere: String; aIncludeSchema: Boolean; AMaxRecords: integer);
+//    function GetItemsFacturas(const AColumns: String; const AWhere: String) : IBizInfVentasArticulo;
+//    function GetItemsAlbaranes(const AColumns: String; const AWhere: String) : IBizInfVentasAlbArticulo;
+//    function GetItems(const AColumns, AWhere: String): IBizInfVentasArticulo;
 
   public
-    function GetItems(const AColumns: String; const AWhere: String) : IBizInfVentasArticulo;
+    function GetItemsFacturas(const AColumns: String; const AWhere: String) : IBizInfVentasArticulo;
+    function GetItemsAlbaranes(const AColumns: String; const AWhere: String) : IBizInfVentasAlbArticulo;
     function GetNameColumns: String;
   end;
 
@@ -51,7 +58,7 @@ uses
 const
   CAMPOS_AVG = '#IMPORTE_NETO_VENTA#';
 
-  CAMPOS_SUMA = '#IMPORTE_TOTAL_FACTURA#IMPORTE_UNIDAD_COSTE#IMPORTE_NETO_COSTE#IMPORTE_PORTE_COSTE#CANTIDAD#IMPORTE_UNIDAD_VENTA#IMPORTE_PORTE_VENTA#IMPORTE_TOTAL_VENTA#IMPORTE_COMISION_AGENTE#';
+  CAMPOS_SUMA = '#IMPORTE_TOTAL_ALBARAN#IMPORTE_TOTAL_FACTURA#IMPORTE_UNIDAD_COSTE#IMPORTE_NETO_COSTE#IMPORTE_PORTE_COSTE#CANTIDAD#IMPORTE_UNIDAD_VENTA#IMPORTE_PORTE_VENTA#IMPORTE_TOTAL_VENTA#IMPORTE_COMISION_AGENTE#';
 
 
 procedure TdmInfVentasArticulo.DAClientDataModuleCreate(Sender: TObject);
@@ -60,7 +67,7 @@ begin
   RORemoteService.Message := dmConexion.Message;
 end;
 
-function TdmInfVentasArticulo.GetItems(const AColumns: String; const AWhere: String): IBizInfVentasArticulo;
+function TdmInfVentasArticulo.GetItemsFacturas(const AColumns: String; const AWhere: String): IBizInfVentasArticulo;
 var
   AInfVentasArticulo : TDAMemDataTable;
 begin
@@ -70,7 +77,7 @@ begin
     AInfVentasArticulo.BusinessRulesID := BIZ_InfVentasArticulo;
     (AInfVentasArticulo as IBizInfVentasArticulo).VisibleColumns := AColumns;
 
-    InitRDA(AInfVentasArticulo, Awhere, True, 0);
+    InitRDAFacturas(AInfVentasArticulo, Awhere, True, 0);
     AInfVentasArticulo.Close;
 
     Result := (AInfVentasArticulo as IBizInfVentasArticulo);
@@ -79,6 +86,26 @@ begin
   end;
 end;
 
+function TdmInfVentasArticulo.GetItemsAlbaranes(const AColumns,
+  AWhere: String): IBizInfVentasAlbArticulo;
+var
+  AInfVentasAlbArticulo : TDAMemDataTable;
+begin
+  ShowHourglassCursor;
+  try
+    AInfVentasAlbArticulo := CloneDataTable(tbl_TablaVacia);
+    AInfVentasAlbArticulo.BusinessRulesID := BIZ_InfVentasAlbArticulo;
+    (AInfVentasAlbArticulo as IBizInfVentasAlbArticulo).VisibleColumns := AColumns;
+
+    InitRDAAlbaranes(AInfVentasAlbArticulo, Awhere, True, 0);
+    AInfVentasAlbArticulo.Close;
+
+    Result := (AInfVentasAlbArticulo as IBizInfVentasAlbArticulo);
+  finally
+    HideHourglassCursor;
+  end;
+end;
+
 function TdmInfVentasArticulo.GetNameColumns: String;
 var
   AList : TStringList;
@@ -95,7 +122,35 @@ begin
   end;
 end;
 
-procedure TdmInfVentasArticulo.InitRDA(var aDataTable: TDAMemDataTable; const AWhere: String;
+procedure TdmInfVentasArticulo.InitRDAAlbaranes(var aDataTable: TDAMemDataTable;
+  const AWhere: String; aIncludeSchema: Boolean; AMaxRecords: integer);
+var
+  ASql: String;
+begin
+  with tbl_TablaVacia do begin
+    Close;
+
+    with TReplicarDataSet.Create do
+    begin
+      FROM_SQL := 'FROM V_INF_VENTAS_ALB_ARTICULOS ' + 'where (' + fld_InfVentasArticuloID_EMPRESA + ' = ' + IntToStr(AppFactuGES.EmpresaActiva.ID) + ') and ' + AWhere ;
+      Columnas := (aDataTable as IBizInfVentasAlbArticulo).VisibleColumns;
+      ColumnasQueSuman := CAMPOS_SUMA;
+      ColumnasQueAVG := CAMPOS_AVG;
+      try
+        ASql := GenerateNewSQL;
+        dmBase.EscribirLog(ASql);
+      finally
+        Free;
+      end;
+    end;
+
+    rda_TablaVacia.GetDataCall.ParamByName('aSQLText').AsString := ASql;
+    MaxRecords := AMaxRecords;
+    rda_TablaVacia.Fill([tbl_TablaVacia], true, aIncludeSchema);
+  end;
+end;
+
+procedure TdmInfVentasArticulo.InitRDAFacturas(var aDataTable: TDAMemDataTable; const AWhere: String;
  aIncludeSchema: Boolean; AMaxRecords: integer);
 var
   ASql: String;
diff --git a/Source/Modulos/Informe ventas por articulo/Model/Data/uIDataModuleInfVentasArticulo.pas b/Source/Modulos/Informe ventas por articulo/Model/Data/uIDataModuleInfVentasArticulo.pas
index 34e6411..109f7a5 100644
--- a/Source/Modulos/Informe ventas por articulo/Model/Data/uIDataModuleInfVentasArticulo.pas	
+++ b/Source/Modulos/Informe ventas por articulo/Model/Data/uIDataModuleInfVentasArticulo.pas	
@@ -8,7 +8,9 @@ uses
 type
   IDataModuleInfVentasArticulo = interface
   ['{802EC507-6C31-4AEB-B481-577D177D474D}']
-    function GetItems(const AColumns: String; const AWhere: String) : IBizInfVentasArticulo;
+//    function GetItems(const AColumns: String; const AWhere: String) : IBizInfVentasArticulo;
+    function GetItemsFacturas(const AColumns: String; const AWhere: String) : IBizInfVentasArticulo;
+    function GetItemsAlbaranes(const AColumns: String; const AWhere: String) : IBizInfVentasAlbArticulo;
     function GetNameColumns: String;
   end;
 
diff --git a/Source/Modulos/Informe ventas por articulo/Model/InfVentasArticulo_model.drc b/Source/Modulos/Informe ventas por articulo/Model/InfVentasArticulo_model.drc
index 48e16a5..d0e4bff 100644
--- a/Source/Modulos/Informe ventas por articulo/Model/InfVentasArticulo_model.drc	
+++ b/Source/Modulos/Informe ventas por articulo/Model/InfVentasArticulo_model.drc	
@@ -13,4 +13,4 @@ BEGIN
 END
 
 /* C:\Codigo\Source\Modulos\Informe ventas por articulo\Model\InfVentasArticulo_model.res */
-/* c:\temp\dtf2EF.tmp */
+/* c:\temp\dtf32C.tmp */
diff --git a/Source/Modulos/Informe ventas por articulo/Model/schInfVentasArticuloClient_Intf.pas b/Source/Modulos/Informe ventas por articulo/Model/schInfVentasArticuloClient_Intf.pas
index ab87fd3..760f765 100644
--- a/Source/Modulos/Informe ventas por articulo/Model/schInfVentasArticuloClient_Intf.pas	
+++ b/Source/Modulos/Informe ventas por articulo/Model/schInfVentasArticuloClient_Intf.pas	
@@ -3,16 +3,20 @@ unit schInfVentasArticuloClient_Intf;
 interface
 
 uses
-  Classes, DB, schBase_Intf, SysUtils, uROClasses, uDADataTable;
+  Classes, DB, schBase_Intf, SysUtils, uROClasses, uDAInterfaces, uDADataTable, FmtBCD, uROXMLIntf;
 
 const
   { Data table rules ids
        Feel free to change them to something more human readable
        but make sure they are unique in the context of your application }
-  RID_InfVentasArticulo = '{0585A6F2-C390-425E-A7A6-8609D559D3B3}';
+  RID_InfVentasArticulo = '{7CC515C6-D346-4DAD-AB07-4331002BFA39}';
+  RID_TablaVacia = '{7DCC4ABB-5070-4D20-8B87-4B887CC84D94}';
+  RID_InfVentasAlbArticulo = '{32940B83-836B-424C-B365-9747E0A8E076}';
 
   { Data table names }
   nme_InfVentasArticulo = 'InfVentasArticulo';
+  nme_TablaVacia = 'TablaVacia';
+  nme_InfVentasAlbArticulo = 'InfVentasAlbArticulo';
 
   { InfVentasArticulo fields }
   fld_InfVentasArticuloID_FACTURA = 'ID_FACTURA';
@@ -100,137 +104,348 @@ const
   idx_InfVentasArticuloCOMISION_AGENTE = 39;
   idx_InfVentasArticuloIMPORTE_COMISION_AGENTE = 40;
 
+  { TablaVacia fields }
+
+  { TablaVacia field indexes }
+
+  { InfVentasAlbArticulo fields }
+  fld_InfVentasAlbArticuloID_ALBARAN = 'ID_ALBARAN';
+  fld_InfVentasAlbArticuloID_EMPRESA = 'ID_EMPRESA';
+  fld_InfVentasAlbArticuloREFERENCIA_ALBARAN = 'REFERENCIA_ALBARAN';
+  fld_InfVentasAlbArticuloFECHA_ALBARAN = 'FECHA_ALBARAN';
+  fld_InfVentasAlbArticuloIMPORTE_TOTAL_ALBARAN = 'IMPORTE_TOTAL_ALBARAN';
+  fld_InfVentasAlbArticuloID_ARTICULO = 'ID_ARTICULO';
+  fld_InfVentasAlbArticuloFAMILIA = 'FAMILIA';
+  fld_InfVentasAlbArticuloREFERENCIA = 'REFERENCIA';
+  fld_InfVentasAlbArticuloREFERENCIA_PROV = 'REFERENCIA_PROV';
+  fld_InfVentasAlbArticuloDESCRIPCION = 'DESCRIPCION';
+  fld_InfVentasAlbArticuloCOMISIONABLE = 'COMISIONABLE';
+  fld_InfVentasAlbArticuloINVENTARIABLE = 'INVENTARIABLE';
+  fld_InfVentasAlbArticuloIMPORTE_UNIDAD_COSTE = 'IMPORTE_UNIDAD_COSTE';
+  fld_InfVentasAlbArticuloDESCUENTO_PROVEEDOR_COSTE = 'DESCUENTO_PROVEEDOR_COSTE';
+  fld_InfVentasAlbArticuloIMPORTE_NETO_COSTE = 'IMPORTE_NETO_COSTE';
+  fld_InfVentasAlbArticuloIMPORTE_PORTE_COSTE = 'IMPORTE_PORTE_COSTE';
+  fld_InfVentasAlbArticuloCANTIDAD = 'CANTIDAD';
+  fld_InfVentasAlbArticuloIMPORTE_UNIDAD_VENTA = 'IMPORTE_UNIDAD_VENTA';
+  fld_InfVentasAlbArticuloDESCUENTO_CLIENTE_VENTA = 'DESCUENTO_CLIENTE_VENTA';
+  fld_InfVentasAlbArticuloIMPORTE_NETO_VENTA = 'IMPORTE_NETO_VENTA';
+  fld_InfVentasAlbArticuloIMPORTE_PORTE_VENTA = 'IMPORTE_PORTE_VENTA';
+  fld_InfVentasAlbArticuloIMPORTE_TOTAL_VENTA = 'IMPORTE_TOTAL_VENTA';
+  fld_InfVentasAlbArticuloNIF_CIF_PROVEEDOR = 'NIF_CIF_PROVEEDOR';
+  fld_InfVentasAlbArticuloNOMBRE_PROVEEDOR = 'NOMBRE_PROVEEDOR';
+  fld_InfVentasAlbArticuloCALLE_PROVEEDOR = 'CALLE_PROVEEDOR';
+  fld_InfVentasAlbArticuloPOBLACION_PROVEEDOR = 'POBLACION_PROVEEDOR';
+  fld_InfVentasAlbArticuloPROVINCIA_PROVEEDOR = 'PROVINCIA_PROVEEDOR';
+  fld_InfVentasAlbArticuloNIF_CIF_CLIENTE = 'NIF_CIF_CLIENTE';
+  fld_InfVentasAlbArticuloNOMBRE_CLIENTE = 'NOMBRE_CLIENTE';
+  fld_InfVentasAlbArticuloNOMBRE_COMERCIAL_CLIENTE = 'NOMBRE_COMERCIAL_CLIENTE';
+  fld_InfVentasAlbArticuloCALLE_CLIENTE = 'CALLE_CLIENTE';
+  fld_InfVentasAlbArticuloPOBLACION_CLIENTE = 'POBLACION_CLIENTE';
+  fld_InfVentasAlbArticuloPROVINCIA_CLIENTE = 'PROVINCIA_CLIENTE';
+  fld_InfVentasAlbArticuloNIF_CIF_AGENTE = 'NIF_CIF_AGENTE';
+  fld_InfVentasAlbArticuloNOMBRE_AGENTE = 'NOMBRE_AGENTE';
+  fld_InfVentasAlbArticuloCALLE_AGENTE = 'CALLE_AGENTE';
+  fld_InfVentasAlbArticuloPOBLACION_AGENTE = 'POBLACION_AGENTE';
+  fld_InfVentasAlbArticuloPROVINCIA_AGENTE = 'PROVINCIA_AGENTE';
+  fld_InfVentasAlbArticuloCOMISION_AGENTE = 'COMISION_AGENTE';
+  fld_InfVentasAlbArticuloIMPORTE_COMISION_AGENTE = 'IMPORTE_COMISION_AGENTE';
+
+  { InfVentasAlbArticulo field indexes }
+  idx_InfVentasAlbArticuloID_ALBARAN = 0;
+  idx_InfVentasAlbArticuloID_EMPRESA = 1;
+  idx_InfVentasAlbArticuloREFERENCIA_ALBARAN = 2;
+  idx_InfVentasAlbArticuloFECHA_ALBARAN = 3;
+  idx_InfVentasAlbArticuloIMPORTE_TOTAL_ALBARAN = 4;
+  idx_InfVentasAlbArticuloID_ARTICULO = 5;
+  idx_InfVentasAlbArticuloFAMILIA = 6;
+  idx_InfVentasAlbArticuloREFERENCIA = 7;
+  idx_InfVentasAlbArticuloREFERENCIA_PROV = 8;
+  idx_InfVentasAlbArticuloDESCRIPCION = 9;
+  idx_InfVentasAlbArticuloCOMISIONABLE = 10;
+  idx_InfVentasAlbArticuloINVENTARIABLE = 11;
+  idx_InfVentasAlbArticuloIMPORTE_UNIDAD_COSTE = 12;
+  idx_InfVentasAlbArticuloDESCUENTO_PROVEEDOR_COSTE = 13;
+  idx_InfVentasAlbArticuloIMPORTE_NETO_COSTE = 14;
+  idx_InfVentasAlbArticuloIMPORTE_PORTE_COSTE = 15;
+  idx_InfVentasAlbArticuloCANTIDAD = 16;
+  idx_InfVentasAlbArticuloIMPORTE_UNIDAD_VENTA = 17;
+  idx_InfVentasAlbArticuloDESCUENTO_CLIENTE_VENTA = 18;
+  idx_InfVentasAlbArticuloIMPORTE_NETO_VENTA = 19;
+  idx_InfVentasAlbArticuloIMPORTE_PORTE_VENTA = 20;
+  idx_InfVentasAlbArticuloIMPORTE_TOTAL_VENTA = 21;
+  idx_InfVentasAlbArticuloNIF_CIF_PROVEEDOR = 22;
+  idx_InfVentasAlbArticuloNOMBRE_PROVEEDOR = 23;
+  idx_InfVentasAlbArticuloCALLE_PROVEEDOR = 24;
+  idx_InfVentasAlbArticuloPOBLACION_PROVEEDOR = 25;
+  idx_InfVentasAlbArticuloPROVINCIA_PROVEEDOR = 26;
+  idx_InfVentasAlbArticuloNIF_CIF_CLIENTE = 27;
+  idx_InfVentasAlbArticuloNOMBRE_CLIENTE = 28;
+  idx_InfVentasAlbArticuloNOMBRE_COMERCIAL_CLIENTE = 29;
+  idx_InfVentasAlbArticuloCALLE_CLIENTE = 30;
+  idx_InfVentasAlbArticuloPOBLACION_CLIENTE = 31;
+  idx_InfVentasAlbArticuloPROVINCIA_CLIENTE = 32;
+  idx_InfVentasAlbArticuloNIF_CIF_AGENTE = 33;
+  idx_InfVentasAlbArticuloNOMBRE_AGENTE = 34;
+  idx_InfVentasAlbArticuloCALLE_AGENTE = 35;
+  idx_InfVentasAlbArticuloPOBLACION_AGENTE = 36;
+  idx_InfVentasAlbArticuloPROVINCIA_AGENTE = 37;
+  idx_InfVentasAlbArticuloCOMISION_AGENTE = 38;
+  idx_InfVentasAlbArticuloIMPORTE_COMISION_AGENTE = 39;
+
 type
   { IInfVentasArticulo }
   IInfVentasArticulo = interface(IDAStronglyTypedDataTable)
-  ['{91CC4592-F38D-477E-8271-C7D2E9747130}']
+  ['{B8E2CE74-5892-4A40-82EB-8F21DBEA58EE}']
     { Property getters and setters }
     function GetID_FACTURAValue: Integer;
     procedure SetID_FACTURAValue(const aValue: Integer);
+    function GetID_FACTURAIsNull: Boolean;
+    procedure SetID_FACTURAIsNull(const aValue: Boolean);
     function GetID_EMPRESAValue: Integer;
     procedure SetID_EMPRESAValue(const aValue: Integer);
+    function GetID_EMPRESAIsNull: Boolean;
+    procedure SetID_EMPRESAIsNull(const aValue: Boolean);
     function GetREFERENCIA_FACTURAValue: String;
     procedure SetREFERENCIA_FACTURAValue(const aValue: String);
+    function GetREFERENCIA_FACTURAIsNull: Boolean;
+    procedure SetREFERENCIA_FACTURAIsNull(const aValue: Boolean);
     function GetFECHA_FACTURAValue: DateTime;
     procedure SetFECHA_FACTURAValue(const aValue: DateTime);
+    function GetFECHA_FACTURAIsNull: Boolean;
+    procedure SetFECHA_FACTURAIsNull(const aValue: Boolean);
     function GetIMPORTE_TOTAL_FACTURAValue: Currency;
     procedure SetIMPORTE_TOTAL_FACTURAValue(const aValue: Currency);
+    function GetIMPORTE_TOTAL_FACTURAIsNull: Boolean;
+    procedure SetIMPORTE_TOTAL_FACTURAIsNull(const aValue: Boolean);
     function GetID_COMISION_FACTURAValue: Integer;
     procedure SetID_COMISION_FACTURAValue(const aValue: Integer);
+    function GetID_COMISION_FACTURAIsNull: Boolean;
+    procedure SetID_COMISION_FACTURAIsNull(const aValue: Boolean);
     function GetID_ARTICULOValue: Integer;
     procedure SetID_ARTICULOValue(const aValue: Integer);
+    function GetID_ARTICULOIsNull: Boolean;
+    procedure SetID_ARTICULOIsNull(const aValue: Boolean);
     function GetFAMILIAValue: String;
     procedure SetFAMILIAValue(const aValue: String);
+    function GetFAMILIAIsNull: Boolean;
+    procedure SetFAMILIAIsNull(const aValue: Boolean);
     function GetREFERENCIAValue: String;
     procedure SetREFERENCIAValue(const aValue: String);
+    function GetREFERENCIAIsNull: Boolean;
+    procedure SetREFERENCIAIsNull(const aValue: Boolean);
     function GetREFERENCIA_PROVValue: String;
     procedure SetREFERENCIA_PROVValue(const aValue: String);
+    function GetREFERENCIA_PROVIsNull: Boolean;
+    procedure SetREFERENCIA_PROVIsNull(const aValue: Boolean);
     function GetDESCRIPCIONValue: String;
     procedure SetDESCRIPCIONValue(const aValue: String);
-    function GetCOMISIONABLEValue: Integer;
-    procedure SetCOMISIONABLEValue(const aValue: Integer);
-    function GetINVENTARIABLEValue: Integer;
-    procedure SetINVENTARIABLEValue(const aValue: Integer);
+    function GetDESCRIPCIONIsNull: Boolean;
+    procedure SetDESCRIPCIONIsNull(const aValue: Boolean);
+    function GetCOMISIONABLEValue: SmallInt;
+    procedure SetCOMISIONABLEValue(const aValue: SmallInt);
+    function GetCOMISIONABLEIsNull: Boolean;
+    procedure SetCOMISIONABLEIsNull(const aValue: Boolean);
+    function GetINVENTARIABLEValue: SmallInt;
+    procedure SetINVENTARIABLEValue(const aValue: SmallInt);
+    function GetINVENTARIABLEIsNull: Boolean;
+    procedure SetINVENTARIABLEIsNull(const aValue: Boolean);
     function GetIMPORTE_UNIDAD_COSTEValue: Currency;
     procedure SetIMPORTE_UNIDAD_COSTEValue(const aValue: Currency);
+    function GetIMPORTE_UNIDAD_COSTEIsNull: Boolean;
+    procedure SetIMPORTE_UNIDAD_COSTEIsNull(const aValue: Boolean);
     function GetDESCUENTO_PROVEEDOR_COSTEValue: Float;
     procedure SetDESCUENTO_PROVEEDOR_COSTEValue(const aValue: Float);
+    function GetDESCUENTO_PROVEEDOR_COSTEIsNull: Boolean;
+    procedure SetDESCUENTO_PROVEEDOR_COSTEIsNull(const aValue: Boolean);
     function GetIMPORTE_NETO_COSTEValue: Currency;
     procedure SetIMPORTE_NETO_COSTEValue(const aValue: Currency);
+    function GetIMPORTE_NETO_COSTEIsNull: Boolean;
+    procedure SetIMPORTE_NETO_COSTEIsNull(const aValue: Boolean);
     function GetIMPORTE_PORTE_COSTEValue: Currency;
     procedure SetIMPORTE_PORTE_COSTEValue(const aValue: Currency);
-    function GetCANTIDADValue: Integer;
-    procedure SetCANTIDADValue(const aValue: Integer);
+    function GetIMPORTE_PORTE_COSTEIsNull: Boolean;
+    procedure SetIMPORTE_PORTE_COSTEIsNull(const aValue: Boolean);
+    function GetCANTIDADValue: Currency;
+    procedure SetCANTIDADValue(const aValue: Currency);
+    function GetCANTIDADIsNull: Boolean;
+    procedure SetCANTIDADIsNull(const aValue: Boolean);
     function GetIMPORTE_UNIDAD_VENTAValue: Currency;
     procedure SetIMPORTE_UNIDAD_VENTAValue(const aValue: Currency);
+    function GetIMPORTE_UNIDAD_VENTAIsNull: Boolean;
+    procedure SetIMPORTE_UNIDAD_VENTAIsNull(const aValue: Boolean);
     function GetDESCUENTO_CLIENTE_VENTAValue: Float;
     procedure SetDESCUENTO_CLIENTE_VENTAValue(const aValue: Float);
+    function GetDESCUENTO_CLIENTE_VENTAIsNull: Boolean;
+    procedure SetDESCUENTO_CLIENTE_VENTAIsNull(const aValue: Boolean);
     function GetIMPORTE_NETO_VENTAValue: Float;
     procedure SetIMPORTE_NETO_VENTAValue(const aValue: Float);
-    function GetIMPORTE_PORTE_VENTAValue: Float;
-    procedure SetIMPORTE_PORTE_VENTAValue(const aValue: Float);
+    function GetIMPORTE_NETO_VENTAIsNull: Boolean;
+    procedure SetIMPORTE_NETO_VENTAIsNull(const aValue: Boolean);
+    function GetIMPORTE_PORTE_VENTAValue: Currency;
+    procedure SetIMPORTE_PORTE_VENTAValue(const aValue: Currency);
+    function GetIMPORTE_PORTE_VENTAIsNull: Boolean;
+    procedure SetIMPORTE_PORTE_VENTAIsNull(const aValue: Boolean);
     function GetIMPORTE_TOTAL_VENTAValue: Currency;
     procedure SetIMPORTE_TOTAL_VENTAValue(const aValue: Currency);
+    function GetIMPORTE_TOTAL_VENTAIsNull: Boolean;
+    procedure SetIMPORTE_TOTAL_VENTAIsNull(const aValue: Boolean);
     function GetNIF_CIF_PROVEEDORValue: String;
     procedure SetNIF_CIF_PROVEEDORValue(const aValue: String);
+    function GetNIF_CIF_PROVEEDORIsNull: Boolean;
+    procedure SetNIF_CIF_PROVEEDORIsNull(const aValue: Boolean);
     function GetNOMBRE_PROVEEDORValue: String;
     procedure SetNOMBRE_PROVEEDORValue(const aValue: String);
+    function GetNOMBRE_PROVEEDORIsNull: Boolean;
+    procedure SetNOMBRE_PROVEEDORIsNull(const aValue: Boolean);
     function GetCALLE_PROVEEDORValue: String;
     procedure SetCALLE_PROVEEDORValue(const aValue: String);
+    function GetCALLE_PROVEEDORIsNull: Boolean;
+    procedure SetCALLE_PROVEEDORIsNull(const aValue: Boolean);
     function GetPOBLACION_PROVEEDORValue: String;
     procedure SetPOBLACION_PROVEEDORValue(const aValue: String);
+    function GetPOBLACION_PROVEEDORIsNull: Boolean;
+    procedure SetPOBLACION_PROVEEDORIsNull(const aValue: Boolean);
     function GetPROVINCIA_PROVEEDORValue: String;
     procedure SetPROVINCIA_PROVEEDORValue(const aValue: String);
+    function GetPROVINCIA_PROVEEDORIsNull: Boolean;
+    procedure SetPROVINCIA_PROVEEDORIsNull(const aValue: Boolean);
     function GetNIF_CIF_CLIENTEValue: String;
     procedure SetNIF_CIF_CLIENTEValue(const aValue: String);
+    function GetNIF_CIF_CLIENTEIsNull: Boolean;
+    procedure SetNIF_CIF_CLIENTEIsNull(const aValue: Boolean);
     function GetNOMBRE_CLIENTEValue: String;
     procedure SetNOMBRE_CLIENTEValue(const aValue: String);
+    function GetNOMBRE_CLIENTEIsNull: Boolean;
+    procedure SetNOMBRE_CLIENTEIsNull(const aValue: Boolean);
     function GetNOMBRE_COMERCIAL_CLIENTEValue: String;
     procedure SetNOMBRE_COMERCIAL_CLIENTEValue(const aValue: String);
+    function GetNOMBRE_COMERCIAL_CLIENTEIsNull: Boolean;
+    procedure SetNOMBRE_COMERCIAL_CLIENTEIsNull(const aValue: Boolean);
     function GetCALLE_CLIENTEValue: String;
     procedure SetCALLE_CLIENTEValue(const aValue: String);
+    function GetCALLE_CLIENTEIsNull: Boolean;
+    procedure SetCALLE_CLIENTEIsNull(const aValue: Boolean);
     function GetPOBLACION_CLIENTEValue: String;
     procedure SetPOBLACION_CLIENTEValue(const aValue: String);
+    function GetPOBLACION_CLIENTEIsNull: Boolean;
+    procedure SetPOBLACION_CLIENTEIsNull(const aValue: Boolean);
     function GetPROVINCIA_CLIENTEValue: String;
     procedure SetPROVINCIA_CLIENTEValue(const aValue: String);
+    function GetPROVINCIA_CLIENTEIsNull: Boolean;
+    procedure SetPROVINCIA_CLIENTEIsNull(const aValue: Boolean);
     function GetNIF_CIF_AGENTEValue: String;
     procedure SetNIF_CIF_AGENTEValue(const aValue: String);
+    function GetNIF_CIF_AGENTEIsNull: Boolean;
+    procedure SetNIF_CIF_AGENTEIsNull(const aValue: Boolean);
     function GetNOMBRE_AGENTEValue: String;
     procedure SetNOMBRE_AGENTEValue(const aValue: String);
+    function GetNOMBRE_AGENTEIsNull: Boolean;
+    procedure SetNOMBRE_AGENTEIsNull(const aValue: Boolean);
     function GetCALLE_AGENTEValue: String;
     procedure SetCALLE_AGENTEValue(const aValue: String);
+    function GetCALLE_AGENTEIsNull: Boolean;
+    procedure SetCALLE_AGENTEIsNull(const aValue: Boolean);
     function GetPOBLACION_AGENTEValue: String;
     procedure SetPOBLACION_AGENTEValue(const aValue: String);
+    function GetPOBLACION_AGENTEIsNull: Boolean;
+    procedure SetPOBLACION_AGENTEIsNull(const aValue: Boolean);
     function GetPROVINCIA_AGENTEValue: String;
     procedure SetPROVINCIA_AGENTEValue(const aValue: String);
+    function GetPROVINCIA_AGENTEIsNull: Boolean;
+    procedure SetPROVINCIA_AGENTEIsNull(const aValue: Boolean);
     function GetCOMISION_AGENTEValue: Float;
     procedure SetCOMISION_AGENTEValue(const aValue: Float);
-    function GetIMPORTE_COMISION_AGENTEValue: Currency;
-    procedure SetIMPORTE_COMISION_AGENTEValue(const aValue: Currency);
+    function GetCOMISION_AGENTEIsNull: Boolean;
+    procedure SetCOMISION_AGENTEIsNull(const aValue: Boolean);
+    function GetIMPORTE_COMISION_AGENTEValue: Float;
+    procedure SetIMPORTE_COMISION_AGENTEValue(const aValue: Float);
+    function GetIMPORTE_COMISION_AGENTEIsNull: Boolean;
+    procedure SetIMPORTE_COMISION_AGENTEIsNull(const aValue: Boolean);
 
 
     { Properties }
     property ID_FACTURA: Integer read GetID_FACTURAValue write SetID_FACTURAValue;
+    property ID_FACTURAIsNull: Boolean read GetID_FACTURAIsNull write SetID_FACTURAIsNull;
     property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
+    property ID_EMPRESAIsNull: Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull;
     property REFERENCIA_FACTURA: String read GetREFERENCIA_FACTURAValue write SetREFERENCIA_FACTURAValue;
+    property REFERENCIA_FACTURAIsNull: Boolean read GetREFERENCIA_FACTURAIsNull write SetREFERENCIA_FACTURAIsNull;
     property FECHA_FACTURA: DateTime read GetFECHA_FACTURAValue write SetFECHA_FACTURAValue;
+    property FECHA_FACTURAIsNull: Boolean read GetFECHA_FACTURAIsNull write SetFECHA_FACTURAIsNull;
     property IMPORTE_TOTAL_FACTURA: Currency read GetIMPORTE_TOTAL_FACTURAValue write SetIMPORTE_TOTAL_FACTURAValue;
+    property IMPORTE_TOTAL_FACTURAIsNull: Boolean read GetIMPORTE_TOTAL_FACTURAIsNull write SetIMPORTE_TOTAL_FACTURAIsNull;
     property ID_COMISION_FACTURA: Integer read GetID_COMISION_FACTURAValue write SetID_COMISION_FACTURAValue;
+    property ID_COMISION_FACTURAIsNull: Boolean read GetID_COMISION_FACTURAIsNull write SetID_COMISION_FACTURAIsNull;
     property ID_ARTICULO: Integer read GetID_ARTICULOValue write SetID_ARTICULOValue;
+    property ID_ARTICULOIsNull: Boolean read GetID_ARTICULOIsNull write SetID_ARTICULOIsNull;
     property FAMILIA: String read GetFAMILIAValue write SetFAMILIAValue;
+    property FAMILIAIsNull: Boolean read GetFAMILIAIsNull write SetFAMILIAIsNull;
     property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
+    property REFERENCIAIsNull: Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull;
     property REFERENCIA_PROV: String read GetREFERENCIA_PROVValue write SetREFERENCIA_PROVValue;
+    property REFERENCIA_PROVIsNull: Boolean read GetREFERENCIA_PROVIsNull write SetREFERENCIA_PROVIsNull;
     property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
-    property COMISIONABLE: Integer read GetCOMISIONABLEValue write SetCOMISIONABLEValue;
-    property INVENTARIABLE: Integer read GetINVENTARIABLEValue write SetINVENTARIABLEValue;
+    property DESCRIPCIONIsNull: Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull;
+    property COMISIONABLE: SmallInt read GetCOMISIONABLEValue write SetCOMISIONABLEValue;
+    property COMISIONABLEIsNull: Boolean read GetCOMISIONABLEIsNull write SetCOMISIONABLEIsNull;
+    property INVENTARIABLE: SmallInt read GetINVENTARIABLEValue write SetINVENTARIABLEValue;
+    property INVENTARIABLEIsNull: Boolean read GetINVENTARIABLEIsNull write SetINVENTARIABLEIsNull;
     property IMPORTE_UNIDAD_COSTE: Currency read GetIMPORTE_UNIDAD_COSTEValue write SetIMPORTE_UNIDAD_COSTEValue;
+    property IMPORTE_UNIDAD_COSTEIsNull: Boolean read GetIMPORTE_UNIDAD_COSTEIsNull write SetIMPORTE_UNIDAD_COSTEIsNull;
     property DESCUENTO_PROVEEDOR_COSTE: Float read GetDESCUENTO_PROVEEDOR_COSTEValue write SetDESCUENTO_PROVEEDOR_COSTEValue;
+    property DESCUENTO_PROVEEDOR_COSTEIsNull: Boolean read GetDESCUENTO_PROVEEDOR_COSTEIsNull write SetDESCUENTO_PROVEEDOR_COSTEIsNull;
     property IMPORTE_NETO_COSTE: Currency read GetIMPORTE_NETO_COSTEValue write SetIMPORTE_NETO_COSTEValue;
+    property IMPORTE_NETO_COSTEIsNull: Boolean read GetIMPORTE_NETO_COSTEIsNull write SetIMPORTE_NETO_COSTEIsNull;
     property IMPORTE_PORTE_COSTE: Currency read GetIMPORTE_PORTE_COSTEValue write SetIMPORTE_PORTE_COSTEValue;
-    property CANTIDAD: Integer read GetCANTIDADValue write SetCANTIDADValue;
+    property IMPORTE_PORTE_COSTEIsNull: Boolean read GetIMPORTE_PORTE_COSTEIsNull write SetIMPORTE_PORTE_COSTEIsNull;
+    property CANTIDAD: Currency read GetCANTIDADValue write SetCANTIDADValue;
+    property CANTIDADIsNull: Boolean read GetCANTIDADIsNull write SetCANTIDADIsNull;
     property IMPORTE_UNIDAD_VENTA: Currency read GetIMPORTE_UNIDAD_VENTAValue write SetIMPORTE_UNIDAD_VENTAValue;
+    property IMPORTE_UNIDAD_VENTAIsNull: Boolean read GetIMPORTE_UNIDAD_VENTAIsNull write SetIMPORTE_UNIDAD_VENTAIsNull;
     property DESCUENTO_CLIENTE_VENTA: Float read GetDESCUENTO_CLIENTE_VENTAValue write SetDESCUENTO_CLIENTE_VENTAValue;
+    property DESCUENTO_CLIENTE_VENTAIsNull: Boolean read GetDESCUENTO_CLIENTE_VENTAIsNull write SetDESCUENTO_CLIENTE_VENTAIsNull;
     property IMPORTE_NETO_VENTA: Float read GetIMPORTE_NETO_VENTAValue write SetIMPORTE_NETO_VENTAValue;
-    property IMPORTE_PORTE_VENTA: Float read GetIMPORTE_PORTE_VENTAValue write SetIMPORTE_PORTE_VENTAValue;
+    property IMPORTE_NETO_VENTAIsNull: Boolean read GetIMPORTE_NETO_VENTAIsNull write SetIMPORTE_NETO_VENTAIsNull;
+    property IMPORTE_PORTE_VENTA: Currency read GetIMPORTE_PORTE_VENTAValue write SetIMPORTE_PORTE_VENTAValue;
+    property IMPORTE_PORTE_VENTAIsNull: Boolean read GetIMPORTE_PORTE_VENTAIsNull write SetIMPORTE_PORTE_VENTAIsNull;
     property IMPORTE_TOTAL_VENTA: Currency read GetIMPORTE_TOTAL_VENTAValue write SetIMPORTE_TOTAL_VENTAValue;
+    property IMPORTE_TOTAL_VENTAIsNull: Boolean read GetIMPORTE_TOTAL_VENTAIsNull write SetIMPORTE_TOTAL_VENTAIsNull;
     property NIF_CIF_PROVEEDOR: String read GetNIF_CIF_PROVEEDORValue write SetNIF_CIF_PROVEEDORValue;
+    property NIF_CIF_PROVEEDORIsNull: Boolean read GetNIF_CIF_PROVEEDORIsNull write SetNIF_CIF_PROVEEDORIsNull;
     property NOMBRE_PROVEEDOR: String read GetNOMBRE_PROVEEDORValue write SetNOMBRE_PROVEEDORValue;
+    property NOMBRE_PROVEEDORIsNull: Boolean read GetNOMBRE_PROVEEDORIsNull write SetNOMBRE_PROVEEDORIsNull;
     property CALLE_PROVEEDOR: String read GetCALLE_PROVEEDORValue write SetCALLE_PROVEEDORValue;
+    property CALLE_PROVEEDORIsNull: Boolean read GetCALLE_PROVEEDORIsNull write SetCALLE_PROVEEDORIsNull;
     property POBLACION_PROVEEDOR: String read GetPOBLACION_PROVEEDORValue write SetPOBLACION_PROVEEDORValue;
+    property POBLACION_PROVEEDORIsNull: Boolean read GetPOBLACION_PROVEEDORIsNull write SetPOBLACION_PROVEEDORIsNull;
     property PROVINCIA_PROVEEDOR: String read GetPROVINCIA_PROVEEDORValue write SetPROVINCIA_PROVEEDORValue;
+    property PROVINCIA_PROVEEDORIsNull: Boolean read GetPROVINCIA_PROVEEDORIsNull write SetPROVINCIA_PROVEEDORIsNull;
     property NIF_CIF_CLIENTE: String read GetNIF_CIF_CLIENTEValue write SetNIF_CIF_CLIENTEValue;
+    property NIF_CIF_CLIENTEIsNull: Boolean read GetNIF_CIF_CLIENTEIsNull write SetNIF_CIF_CLIENTEIsNull;
     property NOMBRE_CLIENTE: String read GetNOMBRE_CLIENTEValue write SetNOMBRE_CLIENTEValue;
+    property NOMBRE_CLIENTEIsNull: Boolean read GetNOMBRE_CLIENTEIsNull write SetNOMBRE_CLIENTEIsNull;
     property NOMBRE_COMERCIAL_CLIENTE: String read GetNOMBRE_COMERCIAL_CLIENTEValue write SetNOMBRE_COMERCIAL_CLIENTEValue;
+    property NOMBRE_COMERCIAL_CLIENTEIsNull: Boolean read GetNOMBRE_COMERCIAL_CLIENTEIsNull write SetNOMBRE_COMERCIAL_CLIENTEIsNull;
     property CALLE_CLIENTE: String read GetCALLE_CLIENTEValue write SetCALLE_CLIENTEValue;
+    property CALLE_CLIENTEIsNull: Boolean read GetCALLE_CLIENTEIsNull write SetCALLE_CLIENTEIsNull;
     property POBLACION_CLIENTE: String read GetPOBLACION_CLIENTEValue write SetPOBLACION_CLIENTEValue;
+    property POBLACION_CLIENTEIsNull: Boolean read GetPOBLACION_CLIENTEIsNull write SetPOBLACION_CLIENTEIsNull;
     property PROVINCIA_CLIENTE: String read GetPROVINCIA_CLIENTEValue write SetPROVINCIA_CLIENTEValue;
+    property PROVINCIA_CLIENTEIsNull: Boolean read GetPROVINCIA_CLIENTEIsNull write SetPROVINCIA_CLIENTEIsNull;
     property NIF_CIF_AGENTE: String read GetNIF_CIF_AGENTEValue write SetNIF_CIF_AGENTEValue;
+    property NIF_CIF_AGENTEIsNull: Boolean read GetNIF_CIF_AGENTEIsNull write SetNIF_CIF_AGENTEIsNull;
     property NOMBRE_AGENTE: String read GetNOMBRE_AGENTEValue write SetNOMBRE_AGENTEValue;
+    property NOMBRE_AGENTEIsNull: Boolean read GetNOMBRE_AGENTEIsNull write SetNOMBRE_AGENTEIsNull;
     property CALLE_AGENTE: String read GetCALLE_AGENTEValue write SetCALLE_AGENTEValue;
+    property CALLE_AGENTEIsNull: Boolean read GetCALLE_AGENTEIsNull write SetCALLE_AGENTEIsNull;
     property POBLACION_AGENTE: String read GetPOBLACION_AGENTEValue write SetPOBLACION_AGENTEValue;
+    property POBLACION_AGENTEIsNull: Boolean read GetPOBLACION_AGENTEIsNull write SetPOBLACION_AGENTEIsNull;
     property PROVINCIA_AGENTE: String read GetPROVINCIA_AGENTEValue write SetPROVINCIA_AGENTEValue;
+    property PROVINCIA_AGENTEIsNull: Boolean read GetPROVINCIA_AGENTEIsNull write SetPROVINCIA_AGENTEIsNull;
     property COMISION_AGENTE: Float read GetCOMISION_AGENTEValue write SetCOMISION_AGENTEValue;
-    property IMPORTE_COMISION_AGENTE: Currency read GetIMPORTE_COMISION_AGENTEValue write SetIMPORTE_COMISION_AGENTEValue;
+    property COMISION_AGENTEIsNull: Boolean read GetCOMISION_AGENTEIsNull write SetCOMISION_AGENTEIsNull;
+    property IMPORTE_COMISION_AGENTE: Float read GetIMPORTE_COMISION_AGENTEValue write SetIMPORTE_COMISION_AGENTEValue;
+    property IMPORTE_COMISION_AGENTEIsNull: Boolean read GetIMPORTE_COMISION_AGENTEIsNull write SetIMPORTE_COMISION_AGENTEIsNull;
   end;
 
   { TInfVentasArticuloDataTableRules }
@@ -240,129 +455,778 @@ type
     { Property getters and setters }
     function GetID_FACTURAValue: Integer; virtual;
     procedure SetID_FACTURAValue(const aValue: Integer); virtual;
+    function GetID_FACTURAIsNull: Boolean; virtual;
+    procedure SetID_FACTURAIsNull(const aValue: Boolean); virtual;
     function GetID_EMPRESAValue: Integer; virtual;
     procedure SetID_EMPRESAValue(const aValue: Integer); virtual;
+    function GetID_EMPRESAIsNull: Boolean; virtual;
+    procedure SetID_EMPRESAIsNull(const aValue: Boolean); virtual;
     function GetREFERENCIA_FACTURAValue: String; virtual;
     procedure SetREFERENCIA_FACTURAValue(const aValue: String); virtual;
+    function GetREFERENCIA_FACTURAIsNull: Boolean; virtual;
+    procedure SetREFERENCIA_FACTURAIsNull(const aValue: Boolean); virtual;
     function GetFECHA_FACTURAValue: DateTime; virtual;
     procedure SetFECHA_FACTURAValue(const aValue: DateTime); virtual;
+    function GetFECHA_FACTURAIsNull: Boolean; virtual;
+    procedure SetFECHA_FACTURAIsNull(const aValue: Boolean); virtual;
     function GetIMPORTE_TOTAL_FACTURAValue: Currency; virtual;
     procedure SetIMPORTE_TOTAL_FACTURAValue(const aValue: Currency); virtual;
+    function GetIMPORTE_TOTAL_FACTURAIsNull: Boolean; virtual;
+    procedure SetIMPORTE_TOTAL_FACTURAIsNull(const aValue: Boolean); virtual;
     function GetID_COMISION_FACTURAValue: Integer; virtual;
     procedure SetID_COMISION_FACTURAValue(const aValue: Integer); virtual;
+    function GetID_COMISION_FACTURAIsNull: Boolean; virtual;
+    procedure SetID_COMISION_FACTURAIsNull(const aValue: Boolean); virtual;
     function GetID_ARTICULOValue: Integer; virtual;
     procedure SetID_ARTICULOValue(const aValue: Integer); virtual;
+    function GetID_ARTICULOIsNull: Boolean; virtual;
+    procedure SetID_ARTICULOIsNull(const aValue: Boolean); virtual;
     function GetFAMILIAValue: String; virtual;
     procedure SetFAMILIAValue(const aValue: String); virtual;
+    function GetFAMILIAIsNull: Boolean; virtual;
+    procedure SetFAMILIAIsNull(const aValue: Boolean); virtual;
     function GetREFERENCIAValue: String; virtual;
     procedure SetREFERENCIAValue(const aValue: String); virtual;
+    function GetREFERENCIAIsNull: Boolean; virtual;
+    procedure SetREFERENCIAIsNull(const aValue: Boolean); virtual;
     function GetREFERENCIA_PROVValue: String; virtual;
     procedure SetREFERENCIA_PROVValue(const aValue: String); virtual;
+    function GetREFERENCIA_PROVIsNull: Boolean; virtual;
+    procedure SetREFERENCIA_PROVIsNull(const aValue: Boolean); virtual;
     function GetDESCRIPCIONValue: String; virtual;
     procedure SetDESCRIPCIONValue(const aValue: String); virtual;
-    function GetCOMISIONABLEValue: Integer; virtual;
-    procedure SetCOMISIONABLEValue(const aValue: Integer); virtual;
-    function GetINVENTARIABLEValue: Integer; virtual;
-    procedure SetINVENTARIABLEValue(const aValue: Integer); virtual;
+    function GetDESCRIPCIONIsNull: Boolean; virtual;
+    procedure SetDESCRIPCIONIsNull(const aValue: Boolean); virtual;
+    function GetCOMISIONABLEValue: SmallInt; virtual;
+    procedure SetCOMISIONABLEValue(const aValue: SmallInt); virtual;
+    function GetCOMISIONABLEIsNull: Boolean; virtual;
+    procedure SetCOMISIONABLEIsNull(const aValue: Boolean); virtual;
+    function GetINVENTARIABLEValue: SmallInt; virtual;
+    procedure SetINVENTARIABLEValue(const aValue: SmallInt); virtual;
+    function GetINVENTARIABLEIsNull: Boolean; virtual;
+    procedure SetINVENTARIABLEIsNull(const aValue: Boolean); virtual;
     function GetIMPORTE_UNIDAD_COSTEValue: Currency; virtual;
     procedure SetIMPORTE_UNIDAD_COSTEValue(const aValue: Currency); virtual;
+    function GetIMPORTE_UNIDAD_COSTEIsNull: Boolean; virtual;
+    procedure SetIMPORTE_UNIDAD_COSTEIsNull(const aValue: Boolean); virtual;
     function GetDESCUENTO_PROVEEDOR_COSTEValue: Float; virtual;
     procedure SetDESCUENTO_PROVEEDOR_COSTEValue(const aValue: Float); virtual;
+    function GetDESCUENTO_PROVEEDOR_COSTEIsNull: Boolean; virtual;
+    procedure SetDESCUENTO_PROVEEDOR_COSTEIsNull(const aValue: Boolean); virtual;
     function GetIMPORTE_NETO_COSTEValue: Currency; virtual;
     procedure SetIMPORTE_NETO_COSTEValue(const aValue: Currency); virtual;
+    function GetIMPORTE_NETO_COSTEIsNull: Boolean; virtual;
+    procedure SetIMPORTE_NETO_COSTEIsNull(const aValue: Boolean); virtual;
     function GetIMPORTE_PORTE_COSTEValue: Currency; virtual;
     procedure SetIMPORTE_PORTE_COSTEValue(const aValue: Currency); virtual;
-    function GetCANTIDADValue: Integer; virtual;
-    procedure SetCANTIDADValue(const aValue: Integer); virtual;
+    function GetIMPORTE_PORTE_COSTEIsNull: Boolean; virtual;
+    procedure SetIMPORTE_PORTE_COSTEIsNull(const aValue: Boolean); virtual;
+    function GetCANTIDADValue: Currency; virtual;
+    procedure SetCANTIDADValue(const aValue: Currency); virtual;
+    function GetCANTIDADIsNull: Boolean; virtual;
+    procedure SetCANTIDADIsNull(const aValue: Boolean); virtual;
     function GetIMPORTE_UNIDAD_VENTAValue: Currency; virtual;
     procedure SetIMPORTE_UNIDAD_VENTAValue(const aValue: Currency); virtual;
+    function GetIMPORTE_UNIDAD_VENTAIsNull: Boolean; virtual;
+    procedure SetIMPORTE_UNIDAD_VENTAIsNull(const aValue: Boolean); virtual;
     function GetDESCUENTO_CLIENTE_VENTAValue: Float; virtual;
     procedure SetDESCUENTO_CLIENTE_VENTAValue(const aValue: Float); virtual;
+    function GetDESCUENTO_CLIENTE_VENTAIsNull: Boolean; virtual;
+    procedure SetDESCUENTO_CLIENTE_VENTAIsNull(const aValue: Boolean); virtual;
     function GetIMPORTE_NETO_VENTAValue: Float; virtual;
     procedure SetIMPORTE_NETO_VENTAValue(const aValue: Float); virtual;
-    function GetIMPORTE_PORTE_VENTAValue: Float; virtual;
-    procedure SetIMPORTE_PORTE_VENTAValue(const aValue: Float); virtual;
+    function GetIMPORTE_NETO_VENTAIsNull: Boolean; virtual;
+    procedure SetIMPORTE_NETO_VENTAIsNull(const aValue: Boolean); virtual;
+    function GetIMPORTE_PORTE_VENTAValue: Currency; virtual;
+    procedure SetIMPORTE_PORTE_VENTAValue(const aValue: Currency); virtual;
+    function GetIMPORTE_PORTE_VENTAIsNull: Boolean; virtual;
+    procedure SetIMPORTE_PORTE_VENTAIsNull(const aValue: Boolean); virtual;
     function GetIMPORTE_TOTAL_VENTAValue: Currency; virtual;
     procedure SetIMPORTE_TOTAL_VENTAValue(const aValue: Currency); virtual;
+    function GetIMPORTE_TOTAL_VENTAIsNull: Boolean; virtual;
+    procedure SetIMPORTE_TOTAL_VENTAIsNull(const aValue: Boolean); virtual;
     function GetNIF_CIF_PROVEEDORValue: String; virtual;
     procedure SetNIF_CIF_PROVEEDORValue(const aValue: String); virtual;
+    function GetNIF_CIF_PROVEEDORIsNull: Boolean; virtual;
+    procedure SetNIF_CIF_PROVEEDORIsNull(const aValue: Boolean); virtual;
     function GetNOMBRE_PROVEEDORValue: String; virtual;
     procedure SetNOMBRE_PROVEEDORValue(const aValue: String); virtual;
+    function GetNOMBRE_PROVEEDORIsNull: Boolean; virtual;
+    procedure SetNOMBRE_PROVEEDORIsNull(const aValue: Boolean); virtual;
     function GetCALLE_PROVEEDORValue: String; virtual;
     procedure SetCALLE_PROVEEDORValue(const aValue: String); virtual;
+    function GetCALLE_PROVEEDORIsNull: Boolean; virtual;
+    procedure SetCALLE_PROVEEDORIsNull(const aValue: Boolean); virtual;
     function GetPOBLACION_PROVEEDORValue: String; virtual;
     procedure SetPOBLACION_PROVEEDORValue(const aValue: String); virtual;
+    function GetPOBLACION_PROVEEDORIsNull: Boolean; virtual;
+    procedure SetPOBLACION_PROVEEDORIsNull(const aValue: Boolean); virtual;
     function GetPROVINCIA_PROVEEDORValue: String; virtual;
     procedure SetPROVINCIA_PROVEEDORValue(const aValue: String); virtual;
+    function GetPROVINCIA_PROVEEDORIsNull: Boolean; virtual;
+    procedure SetPROVINCIA_PROVEEDORIsNull(const aValue: Boolean); virtual;
     function GetNIF_CIF_CLIENTEValue: String; virtual;
     procedure SetNIF_CIF_CLIENTEValue(const aValue: String); virtual;
+    function GetNIF_CIF_CLIENTEIsNull: Boolean; virtual;
+    procedure SetNIF_CIF_CLIENTEIsNull(const aValue: Boolean); virtual;
     function GetNOMBRE_CLIENTEValue: String; virtual;
     procedure SetNOMBRE_CLIENTEValue(const aValue: String); virtual;
+    function GetNOMBRE_CLIENTEIsNull: Boolean; virtual;
+    procedure SetNOMBRE_CLIENTEIsNull(const aValue: Boolean); virtual;
     function GetNOMBRE_COMERCIAL_CLIENTEValue: String; virtual;
     procedure SetNOMBRE_COMERCIAL_CLIENTEValue(const aValue: String); virtual;
+    function GetNOMBRE_COMERCIAL_CLIENTEIsNull: Boolean; virtual;
+    procedure SetNOMBRE_COMERCIAL_CLIENTEIsNull(const aValue: Boolean); virtual;
     function GetCALLE_CLIENTEValue: String; virtual;
     procedure SetCALLE_CLIENTEValue(const aValue: String); virtual;
+    function GetCALLE_CLIENTEIsNull: Boolean; virtual;
+    procedure SetCALLE_CLIENTEIsNull(const aValue: Boolean); virtual;
     function GetPOBLACION_CLIENTEValue: String; virtual;
     procedure SetPOBLACION_CLIENTEValue(const aValue: String); virtual;
+    function GetPOBLACION_CLIENTEIsNull: Boolean; virtual;
+    procedure SetPOBLACION_CLIENTEIsNull(const aValue: Boolean); virtual;
     function GetPROVINCIA_CLIENTEValue: String; virtual;
     procedure SetPROVINCIA_CLIENTEValue(const aValue: String); virtual;
+    function GetPROVINCIA_CLIENTEIsNull: Boolean; virtual;
+    procedure SetPROVINCIA_CLIENTEIsNull(const aValue: Boolean); virtual;
     function GetNIF_CIF_AGENTEValue: String; virtual;
     procedure SetNIF_CIF_AGENTEValue(const aValue: String); virtual;
+    function GetNIF_CIF_AGENTEIsNull: Boolean; virtual;
+    procedure SetNIF_CIF_AGENTEIsNull(const aValue: Boolean); virtual;
     function GetNOMBRE_AGENTEValue: String; virtual;
     procedure SetNOMBRE_AGENTEValue(const aValue: String); virtual;
+    function GetNOMBRE_AGENTEIsNull: Boolean; virtual;
+    procedure SetNOMBRE_AGENTEIsNull(const aValue: Boolean); virtual;
     function GetCALLE_AGENTEValue: String; virtual;
     procedure SetCALLE_AGENTEValue(const aValue: String); virtual;
+    function GetCALLE_AGENTEIsNull: Boolean; virtual;
+    procedure SetCALLE_AGENTEIsNull(const aValue: Boolean); virtual;
     function GetPOBLACION_AGENTEValue: String; virtual;
     procedure SetPOBLACION_AGENTEValue(const aValue: String); virtual;
+    function GetPOBLACION_AGENTEIsNull: Boolean; virtual;
+    procedure SetPOBLACION_AGENTEIsNull(const aValue: Boolean); virtual;
     function GetPROVINCIA_AGENTEValue: String; virtual;
     procedure SetPROVINCIA_AGENTEValue(const aValue: String); virtual;
+    function GetPROVINCIA_AGENTEIsNull: Boolean; virtual;
+    procedure SetPROVINCIA_AGENTEIsNull(const aValue: Boolean); virtual;
     function GetCOMISION_AGENTEValue: Float; virtual;
     procedure SetCOMISION_AGENTEValue(const aValue: Float); virtual;
-    function GetIMPORTE_COMISION_AGENTEValue: Currency; virtual;
-    procedure SetIMPORTE_COMISION_AGENTEValue(const aValue: Currency); virtual;
+    function GetCOMISION_AGENTEIsNull: Boolean; virtual;
+    procedure SetCOMISION_AGENTEIsNull(const aValue: Boolean); virtual;
+    function GetIMPORTE_COMISION_AGENTEValue: Float; virtual;
+    procedure SetIMPORTE_COMISION_AGENTEValue(const aValue: Float); virtual;
+    function GetIMPORTE_COMISION_AGENTEIsNull: Boolean; virtual;
+    procedure SetIMPORTE_COMISION_AGENTEIsNull(const aValue: Boolean); virtual;
 
     { Properties }
     property ID_FACTURA: Integer read GetID_FACTURAValue write SetID_FACTURAValue;
+    property ID_FACTURAIsNull: Boolean read GetID_FACTURAIsNull write SetID_FACTURAIsNull;
     property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
+    property ID_EMPRESAIsNull: Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull;
     property REFERENCIA_FACTURA: String read GetREFERENCIA_FACTURAValue write SetREFERENCIA_FACTURAValue;
+    property REFERENCIA_FACTURAIsNull: Boolean read GetREFERENCIA_FACTURAIsNull write SetREFERENCIA_FACTURAIsNull;
     property FECHA_FACTURA: DateTime read GetFECHA_FACTURAValue write SetFECHA_FACTURAValue;
+    property FECHA_FACTURAIsNull: Boolean read GetFECHA_FACTURAIsNull write SetFECHA_FACTURAIsNull;
     property IMPORTE_TOTAL_FACTURA: Currency read GetIMPORTE_TOTAL_FACTURAValue write SetIMPORTE_TOTAL_FACTURAValue;
+    property IMPORTE_TOTAL_FACTURAIsNull: Boolean read GetIMPORTE_TOTAL_FACTURAIsNull write SetIMPORTE_TOTAL_FACTURAIsNull;
     property ID_COMISION_FACTURA: Integer read GetID_COMISION_FACTURAValue write SetID_COMISION_FACTURAValue;
+    property ID_COMISION_FACTURAIsNull: Boolean read GetID_COMISION_FACTURAIsNull write SetID_COMISION_FACTURAIsNull;
     property ID_ARTICULO: Integer read GetID_ARTICULOValue write SetID_ARTICULOValue;
+    property ID_ARTICULOIsNull: Boolean read GetID_ARTICULOIsNull write SetID_ARTICULOIsNull;
     property FAMILIA: String read GetFAMILIAValue write SetFAMILIAValue;
+    property FAMILIAIsNull: Boolean read GetFAMILIAIsNull write SetFAMILIAIsNull;
     property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
+    property REFERENCIAIsNull: Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull;
     property REFERENCIA_PROV: String read GetREFERENCIA_PROVValue write SetREFERENCIA_PROVValue;
+    property REFERENCIA_PROVIsNull: Boolean read GetREFERENCIA_PROVIsNull write SetREFERENCIA_PROVIsNull;
     property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
-    property COMISIONABLE: Integer read GetCOMISIONABLEValue write SetCOMISIONABLEValue;
-    property INVENTARIABLE: Integer read GetINVENTARIABLEValue write SetINVENTARIABLEValue;
+    property DESCRIPCIONIsNull: Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull;
+    property COMISIONABLE: SmallInt read GetCOMISIONABLEValue write SetCOMISIONABLEValue;
+    property COMISIONABLEIsNull: Boolean read GetCOMISIONABLEIsNull write SetCOMISIONABLEIsNull;
+    property INVENTARIABLE: SmallInt read GetINVENTARIABLEValue write SetINVENTARIABLEValue;
+    property INVENTARIABLEIsNull: Boolean read GetINVENTARIABLEIsNull write SetINVENTARIABLEIsNull;
     property IMPORTE_UNIDAD_COSTE: Currency read GetIMPORTE_UNIDAD_COSTEValue write SetIMPORTE_UNIDAD_COSTEValue;
+    property IMPORTE_UNIDAD_COSTEIsNull: Boolean read GetIMPORTE_UNIDAD_COSTEIsNull write SetIMPORTE_UNIDAD_COSTEIsNull;
     property DESCUENTO_PROVEEDOR_COSTE: Float read GetDESCUENTO_PROVEEDOR_COSTEValue write SetDESCUENTO_PROVEEDOR_COSTEValue;
+    property DESCUENTO_PROVEEDOR_COSTEIsNull: Boolean read GetDESCUENTO_PROVEEDOR_COSTEIsNull write SetDESCUENTO_PROVEEDOR_COSTEIsNull;
     property IMPORTE_NETO_COSTE: Currency read GetIMPORTE_NETO_COSTEValue write SetIMPORTE_NETO_COSTEValue;
+    property IMPORTE_NETO_COSTEIsNull: Boolean read GetIMPORTE_NETO_COSTEIsNull write SetIMPORTE_NETO_COSTEIsNull;
     property IMPORTE_PORTE_COSTE: Currency read GetIMPORTE_PORTE_COSTEValue write SetIMPORTE_PORTE_COSTEValue;
-    property CANTIDAD: Integer read GetCANTIDADValue write SetCANTIDADValue;
+    property IMPORTE_PORTE_COSTEIsNull: Boolean read GetIMPORTE_PORTE_COSTEIsNull write SetIMPORTE_PORTE_COSTEIsNull;
+    property CANTIDAD: Currency read GetCANTIDADValue write SetCANTIDADValue;
+    property CANTIDADIsNull: Boolean read GetCANTIDADIsNull write SetCANTIDADIsNull;
     property IMPORTE_UNIDAD_VENTA: Currency read GetIMPORTE_UNIDAD_VENTAValue write SetIMPORTE_UNIDAD_VENTAValue;
+    property IMPORTE_UNIDAD_VENTAIsNull: Boolean read GetIMPORTE_UNIDAD_VENTAIsNull write SetIMPORTE_UNIDAD_VENTAIsNull;
     property DESCUENTO_CLIENTE_VENTA: Float read GetDESCUENTO_CLIENTE_VENTAValue write SetDESCUENTO_CLIENTE_VENTAValue;
+    property DESCUENTO_CLIENTE_VENTAIsNull: Boolean read GetDESCUENTO_CLIENTE_VENTAIsNull write SetDESCUENTO_CLIENTE_VENTAIsNull;
     property IMPORTE_NETO_VENTA: Float read GetIMPORTE_NETO_VENTAValue write SetIMPORTE_NETO_VENTAValue;
-    property IMPORTE_PORTE_VENTA: Float read GetIMPORTE_PORTE_VENTAValue write SetIMPORTE_PORTE_VENTAValue;
+    property IMPORTE_NETO_VENTAIsNull: Boolean read GetIMPORTE_NETO_VENTAIsNull write SetIMPORTE_NETO_VENTAIsNull;
+    property IMPORTE_PORTE_VENTA: Currency read GetIMPORTE_PORTE_VENTAValue write SetIMPORTE_PORTE_VENTAValue;
+    property IMPORTE_PORTE_VENTAIsNull: Boolean read GetIMPORTE_PORTE_VENTAIsNull write SetIMPORTE_PORTE_VENTAIsNull;
     property IMPORTE_TOTAL_VENTA: Currency read GetIMPORTE_TOTAL_VENTAValue write SetIMPORTE_TOTAL_VENTAValue;
+    property IMPORTE_TOTAL_VENTAIsNull: Boolean read GetIMPORTE_TOTAL_VENTAIsNull write SetIMPORTE_TOTAL_VENTAIsNull;
     property NIF_CIF_PROVEEDOR: String read GetNIF_CIF_PROVEEDORValue write SetNIF_CIF_PROVEEDORValue;
+    property NIF_CIF_PROVEEDORIsNull: Boolean read GetNIF_CIF_PROVEEDORIsNull write SetNIF_CIF_PROVEEDORIsNull;
     property NOMBRE_PROVEEDOR: String read GetNOMBRE_PROVEEDORValue write SetNOMBRE_PROVEEDORValue;
+    property NOMBRE_PROVEEDORIsNull: Boolean read GetNOMBRE_PROVEEDORIsNull write SetNOMBRE_PROVEEDORIsNull;
     property CALLE_PROVEEDOR: String read GetCALLE_PROVEEDORValue write SetCALLE_PROVEEDORValue;
+    property CALLE_PROVEEDORIsNull: Boolean read GetCALLE_PROVEEDORIsNull write SetCALLE_PROVEEDORIsNull;
     property POBLACION_PROVEEDOR: String read GetPOBLACION_PROVEEDORValue write SetPOBLACION_PROVEEDORValue;
+    property POBLACION_PROVEEDORIsNull: Boolean read GetPOBLACION_PROVEEDORIsNull write SetPOBLACION_PROVEEDORIsNull;
     property PROVINCIA_PROVEEDOR: String read GetPROVINCIA_PROVEEDORValue write SetPROVINCIA_PROVEEDORValue;
+    property PROVINCIA_PROVEEDORIsNull: Boolean read GetPROVINCIA_PROVEEDORIsNull write SetPROVINCIA_PROVEEDORIsNull;
     property NIF_CIF_CLIENTE: String read GetNIF_CIF_CLIENTEValue write SetNIF_CIF_CLIENTEValue;
+    property NIF_CIF_CLIENTEIsNull: Boolean read GetNIF_CIF_CLIENTEIsNull write SetNIF_CIF_CLIENTEIsNull;
     property NOMBRE_CLIENTE: String read GetNOMBRE_CLIENTEValue write SetNOMBRE_CLIENTEValue;
+    property NOMBRE_CLIENTEIsNull: Boolean read GetNOMBRE_CLIENTEIsNull write SetNOMBRE_CLIENTEIsNull;
     property NOMBRE_COMERCIAL_CLIENTE: String read GetNOMBRE_COMERCIAL_CLIENTEValue write SetNOMBRE_COMERCIAL_CLIENTEValue;
+    property NOMBRE_COMERCIAL_CLIENTEIsNull: Boolean read GetNOMBRE_COMERCIAL_CLIENTEIsNull write SetNOMBRE_COMERCIAL_CLIENTEIsNull;
     property CALLE_CLIENTE: String read GetCALLE_CLIENTEValue write SetCALLE_CLIENTEValue;
+    property CALLE_CLIENTEIsNull: Boolean read GetCALLE_CLIENTEIsNull write SetCALLE_CLIENTEIsNull;
     property POBLACION_CLIENTE: String read GetPOBLACION_CLIENTEValue write SetPOBLACION_CLIENTEValue;
+    property POBLACION_CLIENTEIsNull: Boolean read GetPOBLACION_CLIENTEIsNull write SetPOBLACION_CLIENTEIsNull;
     property PROVINCIA_CLIENTE: String read GetPROVINCIA_CLIENTEValue write SetPROVINCIA_CLIENTEValue;
+    property PROVINCIA_CLIENTEIsNull: Boolean read GetPROVINCIA_CLIENTEIsNull write SetPROVINCIA_CLIENTEIsNull;
     property NIF_CIF_AGENTE: String read GetNIF_CIF_AGENTEValue write SetNIF_CIF_AGENTEValue;
+    property NIF_CIF_AGENTEIsNull: Boolean read GetNIF_CIF_AGENTEIsNull write SetNIF_CIF_AGENTEIsNull;
     property NOMBRE_AGENTE: String read GetNOMBRE_AGENTEValue write SetNOMBRE_AGENTEValue;
+    property NOMBRE_AGENTEIsNull: Boolean read GetNOMBRE_AGENTEIsNull write SetNOMBRE_AGENTEIsNull;
     property CALLE_AGENTE: String read GetCALLE_AGENTEValue write SetCALLE_AGENTEValue;
+    property CALLE_AGENTEIsNull: Boolean read GetCALLE_AGENTEIsNull write SetCALLE_AGENTEIsNull;
     property POBLACION_AGENTE: String read GetPOBLACION_AGENTEValue write SetPOBLACION_AGENTEValue;
+    property POBLACION_AGENTEIsNull: Boolean read GetPOBLACION_AGENTEIsNull write SetPOBLACION_AGENTEIsNull;
     property PROVINCIA_AGENTE: String read GetPROVINCIA_AGENTEValue write SetPROVINCIA_AGENTEValue;
+    property PROVINCIA_AGENTEIsNull: Boolean read GetPROVINCIA_AGENTEIsNull write SetPROVINCIA_AGENTEIsNull;
     property COMISION_AGENTE: Float read GetCOMISION_AGENTEValue write SetCOMISION_AGENTEValue;
-    property IMPORTE_COMISION_AGENTE: Currency read GetIMPORTE_COMISION_AGENTEValue write SetIMPORTE_COMISION_AGENTEValue;
+    property COMISION_AGENTEIsNull: Boolean read GetCOMISION_AGENTEIsNull write SetCOMISION_AGENTEIsNull;
+    property IMPORTE_COMISION_AGENTE: Float read GetIMPORTE_COMISION_AGENTEValue write SetIMPORTE_COMISION_AGENTEValue;
+    property IMPORTE_COMISION_AGENTEIsNull: Boolean read GetIMPORTE_COMISION_AGENTEIsNull write SetIMPORTE_COMISION_AGENTEIsNull;
+
+  public
+    constructor Create(aDataTable: TDADataTable); override;
+    destructor Destroy; override;
+
+  end;
+
+  { ITablaVacia }
+  ITablaVacia = interface(IDAStronglyTypedDataTable)
+  ['{20AF542A-D8B1-4055-8B62-C01D55420E90}']
+    { Property getters and setters }
+
+
+    { Properties }
+  end;
+
+  { TTablaVaciaDataTableRules }
+  TTablaVaciaDataTableRules = class(TIntfObjectDADataTableRules, ITablaVacia)
+  private
+  protected
+    { Property getters and setters }
+
+    { Properties }
+
+  public
+    constructor Create(aDataTable: TDADataTable); override;
+    destructor Destroy; override;
+
+  end;
+
+  { IInfVentasAlbArticulo }
+  IInfVentasAlbArticulo = interface(IDAStronglyTypedDataTable)
+  ['{B4818DB8-0075-4D21-BCDC-42A6A4C00609}']
+    { Property getters and setters }
+    function GetID_ALBARANValue: Integer;
+    procedure SetID_ALBARANValue(const aValue: Integer);
+    function GetID_ALBARANIsNull: Boolean;
+    procedure SetID_ALBARANIsNull(const aValue: Boolean);
+    function GetID_EMPRESAValue: Integer;
+    procedure SetID_EMPRESAValue(const aValue: Integer);
+    function GetID_EMPRESAIsNull: Boolean;
+    procedure SetID_EMPRESAIsNull(const aValue: Boolean);
+    function GetREFERENCIA_ALBARANValue: String;
+    procedure SetREFERENCIA_ALBARANValue(const aValue: String);
+    function GetREFERENCIA_ALBARANIsNull: Boolean;
+    procedure SetREFERENCIA_ALBARANIsNull(const aValue: Boolean);
+    function GetFECHA_ALBARANValue: DateTime;
+    procedure SetFECHA_ALBARANValue(const aValue: DateTime);
+    function GetFECHA_ALBARANIsNull: Boolean;
+    procedure SetFECHA_ALBARANIsNull(const aValue: Boolean);
+    function GetIMPORTE_TOTAL_ALBARANValue: Currency;
+    procedure SetIMPORTE_TOTAL_ALBARANValue(const aValue: Currency);
+    function GetIMPORTE_TOTAL_ALBARANIsNull: Boolean;
+    procedure SetIMPORTE_TOTAL_ALBARANIsNull(const aValue: Boolean);
+    function GetID_ARTICULOValue: Integer;
+    procedure SetID_ARTICULOValue(const aValue: Integer);
+    function GetID_ARTICULOIsNull: Boolean;
+    procedure SetID_ARTICULOIsNull(const aValue: Boolean);
+    function GetFAMILIAValue: String;
+    procedure SetFAMILIAValue(const aValue: String);
+    function GetFAMILIAIsNull: Boolean;
+    procedure SetFAMILIAIsNull(const aValue: Boolean);
+    function GetREFERENCIAValue: String;
+    procedure SetREFERENCIAValue(const aValue: String);
+    function GetREFERENCIAIsNull: Boolean;
+    procedure SetREFERENCIAIsNull(const aValue: Boolean);
+    function GetREFERENCIA_PROVValue: String;
+    procedure SetREFERENCIA_PROVValue(const aValue: String);
+    function GetREFERENCIA_PROVIsNull: Boolean;
+    procedure SetREFERENCIA_PROVIsNull(const aValue: Boolean);
+    function GetDESCRIPCIONValue: String;
+    procedure SetDESCRIPCIONValue(const aValue: String);
+    function GetDESCRIPCIONIsNull: Boolean;
+    procedure SetDESCRIPCIONIsNull(const aValue: Boolean);
+    function GetCOMISIONABLEValue: SmallInt;
+    procedure SetCOMISIONABLEValue(const aValue: SmallInt);
+    function GetCOMISIONABLEIsNull: Boolean;
+    procedure SetCOMISIONABLEIsNull(const aValue: Boolean);
+    function GetINVENTARIABLEValue: SmallInt;
+    procedure SetINVENTARIABLEValue(const aValue: SmallInt);
+    function GetINVENTARIABLEIsNull: Boolean;
+    procedure SetINVENTARIABLEIsNull(const aValue: Boolean);
+    function GetIMPORTE_UNIDAD_COSTEValue: Currency;
+    procedure SetIMPORTE_UNIDAD_COSTEValue(const aValue: Currency);
+    function GetIMPORTE_UNIDAD_COSTEIsNull: Boolean;
+    procedure SetIMPORTE_UNIDAD_COSTEIsNull(const aValue: Boolean);
+    function GetDESCUENTO_PROVEEDOR_COSTEValue: Float;
+    procedure SetDESCUENTO_PROVEEDOR_COSTEValue(const aValue: Float);
+    function GetDESCUENTO_PROVEEDOR_COSTEIsNull: Boolean;
+    procedure SetDESCUENTO_PROVEEDOR_COSTEIsNull(const aValue: Boolean);
+    function GetIMPORTE_NETO_COSTEValue: Currency;
+    procedure SetIMPORTE_NETO_COSTEValue(const aValue: Currency);
+    function GetIMPORTE_NETO_COSTEIsNull: Boolean;
+    procedure SetIMPORTE_NETO_COSTEIsNull(const aValue: Boolean);
+    function GetIMPORTE_PORTE_COSTEValue: Currency;
+    procedure SetIMPORTE_PORTE_COSTEValue(const aValue: Currency);
+    function GetIMPORTE_PORTE_COSTEIsNull: Boolean;
+    procedure SetIMPORTE_PORTE_COSTEIsNull(const aValue: Boolean);
+    function GetCANTIDADValue: Currency;
+    procedure SetCANTIDADValue(const aValue: Currency);
+    function GetCANTIDADIsNull: Boolean;
+    procedure SetCANTIDADIsNull(const aValue: Boolean);
+    function GetIMPORTE_UNIDAD_VENTAValue: Currency;
+    procedure SetIMPORTE_UNIDAD_VENTAValue(const aValue: Currency);
+    function GetIMPORTE_UNIDAD_VENTAIsNull: Boolean;
+    procedure SetIMPORTE_UNIDAD_VENTAIsNull(const aValue: Boolean);
+    function GetDESCUENTO_CLIENTE_VENTAValue: Float;
+    procedure SetDESCUENTO_CLIENTE_VENTAValue(const aValue: Float);
+    function GetDESCUENTO_CLIENTE_VENTAIsNull: Boolean;
+    procedure SetDESCUENTO_CLIENTE_VENTAIsNull(const aValue: Boolean);
+    function GetIMPORTE_NETO_VENTAValue: Float;
+    procedure SetIMPORTE_NETO_VENTAValue(const aValue: Float);
+    function GetIMPORTE_NETO_VENTAIsNull: Boolean;
+    procedure SetIMPORTE_NETO_VENTAIsNull(const aValue: Boolean);
+    function GetIMPORTE_PORTE_VENTAValue: Currency;
+    procedure SetIMPORTE_PORTE_VENTAValue(const aValue: Currency);
+    function GetIMPORTE_PORTE_VENTAIsNull: Boolean;
+    procedure SetIMPORTE_PORTE_VENTAIsNull(const aValue: Boolean);
+    function GetIMPORTE_TOTAL_VENTAValue: Currency;
+    procedure SetIMPORTE_TOTAL_VENTAValue(const aValue: Currency);
+    function GetIMPORTE_TOTAL_VENTAIsNull: Boolean;
+    procedure SetIMPORTE_TOTAL_VENTAIsNull(const aValue: Boolean);
+    function GetNIF_CIF_PROVEEDORValue: String;
+    procedure SetNIF_CIF_PROVEEDORValue(const aValue: String);
+    function GetNIF_CIF_PROVEEDORIsNull: Boolean;
+    procedure SetNIF_CIF_PROVEEDORIsNull(const aValue: Boolean);
+    function GetNOMBRE_PROVEEDORValue: String;
+    procedure SetNOMBRE_PROVEEDORValue(const aValue: String);
+    function GetNOMBRE_PROVEEDORIsNull: Boolean;
+    procedure SetNOMBRE_PROVEEDORIsNull(const aValue: Boolean);
+    function GetCALLE_PROVEEDORValue: String;
+    procedure SetCALLE_PROVEEDORValue(const aValue: String);
+    function GetCALLE_PROVEEDORIsNull: Boolean;
+    procedure SetCALLE_PROVEEDORIsNull(const aValue: Boolean);
+    function GetPOBLACION_PROVEEDORValue: String;
+    procedure SetPOBLACION_PROVEEDORValue(const aValue: String);
+    function GetPOBLACION_PROVEEDORIsNull: Boolean;
+    procedure SetPOBLACION_PROVEEDORIsNull(const aValue: Boolean);
+    function GetPROVINCIA_PROVEEDORValue: String;
+    procedure SetPROVINCIA_PROVEEDORValue(const aValue: String);
+    function GetPROVINCIA_PROVEEDORIsNull: Boolean;
+    procedure SetPROVINCIA_PROVEEDORIsNull(const aValue: Boolean);
+    function GetNIF_CIF_CLIENTEValue: String;
+    procedure SetNIF_CIF_CLIENTEValue(const aValue: String);
+    function GetNIF_CIF_CLIENTEIsNull: Boolean;
+    procedure SetNIF_CIF_CLIENTEIsNull(const aValue: Boolean);
+    function GetNOMBRE_CLIENTEValue: String;
+    procedure SetNOMBRE_CLIENTEValue(const aValue: String);
+    function GetNOMBRE_CLIENTEIsNull: Boolean;
+    procedure SetNOMBRE_CLIENTEIsNull(const aValue: Boolean);
+    function GetNOMBRE_COMERCIAL_CLIENTEValue: String;
+    procedure SetNOMBRE_COMERCIAL_CLIENTEValue(const aValue: String);
+    function GetNOMBRE_COMERCIAL_CLIENTEIsNull: Boolean;
+    procedure SetNOMBRE_COMERCIAL_CLIENTEIsNull(const aValue: Boolean);
+    function GetCALLE_CLIENTEValue: String;
+    procedure SetCALLE_CLIENTEValue(const aValue: String);
+    function GetCALLE_CLIENTEIsNull: Boolean;
+    procedure SetCALLE_CLIENTEIsNull(const aValue: Boolean);
+    function GetPOBLACION_CLIENTEValue: String;
+    procedure SetPOBLACION_CLIENTEValue(const aValue: String);
+    function GetPOBLACION_CLIENTEIsNull: Boolean;
+    procedure SetPOBLACION_CLIENTEIsNull(const aValue: Boolean);
+    function GetPROVINCIA_CLIENTEValue: String;
+    procedure SetPROVINCIA_CLIENTEValue(const aValue: String);
+    function GetPROVINCIA_CLIENTEIsNull: Boolean;
+    procedure SetPROVINCIA_CLIENTEIsNull(const aValue: Boolean);
+    function GetNIF_CIF_AGENTEValue: String;
+    procedure SetNIF_CIF_AGENTEValue(const aValue: String);
+    function GetNIF_CIF_AGENTEIsNull: Boolean;
+    procedure SetNIF_CIF_AGENTEIsNull(const aValue: Boolean);
+    function GetNOMBRE_AGENTEValue: String;
+    procedure SetNOMBRE_AGENTEValue(const aValue: String);
+    function GetNOMBRE_AGENTEIsNull: Boolean;
+    procedure SetNOMBRE_AGENTEIsNull(const aValue: Boolean);
+    function GetCALLE_AGENTEValue: String;
+    procedure SetCALLE_AGENTEValue(const aValue: String);
+    function GetCALLE_AGENTEIsNull: Boolean;
+    procedure SetCALLE_AGENTEIsNull(const aValue: Boolean);
+    function GetPOBLACION_AGENTEValue: String;
+    procedure SetPOBLACION_AGENTEValue(const aValue: String);
+    function GetPOBLACION_AGENTEIsNull: Boolean;
+    procedure SetPOBLACION_AGENTEIsNull(const aValue: Boolean);
+    function GetPROVINCIA_AGENTEValue: String;
+    procedure SetPROVINCIA_AGENTEValue(const aValue: String);
+    function GetPROVINCIA_AGENTEIsNull: Boolean;
+    procedure SetPROVINCIA_AGENTEIsNull(const aValue: Boolean);
+    function GetCOMISION_AGENTEValue: Float;
+    procedure SetCOMISION_AGENTEValue(const aValue: Float);
+    function GetCOMISION_AGENTEIsNull: Boolean;
+    procedure SetCOMISION_AGENTEIsNull(const aValue: Boolean);
+    function GetIMPORTE_COMISION_AGENTEValue: Float;
+    procedure SetIMPORTE_COMISION_AGENTEValue(const aValue: Float);
+    function GetIMPORTE_COMISION_AGENTEIsNull: Boolean;
+    procedure SetIMPORTE_COMISION_AGENTEIsNull(const aValue: Boolean);
+
+
+    { Properties }
+    property ID_ALBARAN: Integer read GetID_ALBARANValue write SetID_ALBARANValue;
+    property ID_ALBARANIsNull: Boolean read GetID_ALBARANIsNull write SetID_ALBARANIsNull;
+    property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
+    property ID_EMPRESAIsNull: Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull;
+    property REFERENCIA_ALBARAN: String read GetREFERENCIA_ALBARANValue write SetREFERENCIA_ALBARANValue;
+    property REFERENCIA_ALBARANIsNull: Boolean read GetREFERENCIA_ALBARANIsNull write SetREFERENCIA_ALBARANIsNull;
+    property FECHA_ALBARAN: DateTime read GetFECHA_ALBARANValue write SetFECHA_ALBARANValue;
+    property FECHA_ALBARANIsNull: Boolean read GetFECHA_ALBARANIsNull write SetFECHA_ALBARANIsNull;
+    property IMPORTE_TOTAL_ALBARAN: Currency read GetIMPORTE_TOTAL_ALBARANValue write SetIMPORTE_TOTAL_ALBARANValue;
+    property IMPORTE_TOTAL_ALBARANIsNull: Boolean read GetIMPORTE_TOTAL_ALBARANIsNull write SetIMPORTE_TOTAL_ALBARANIsNull;
+    property ID_ARTICULO: Integer read GetID_ARTICULOValue write SetID_ARTICULOValue;
+    property ID_ARTICULOIsNull: Boolean read GetID_ARTICULOIsNull write SetID_ARTICULOIsNull;
+    property FAMILIA: String read GetFAMILIAValue write SetFAMILIAValue;
+    property FAMILIAIsNull: Boolean read GetFAMILIAIsNull write SetFAMILIAIsNull;
+    property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
+    property REFERENCIAIsNull: Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull;
+    property REFERENCIA_PROV: String read GetREFERENCIA_PROVValue write SetREFERENCIA_PROVValue;
+    property REFERENCIA_PROVIsNull: Boolean read GetREFERENCIA_PROVIsNull write SetREFERENCIA_PROVIsNull;
+    property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
+    property DESCRIPCIONIsNull: Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull;
+    property COMISIONABLE: SmallInt read GetCOMISIONABLEValue write SetCOMISIONABLEValue;
+    property COMISIONABLEIsNull: Boolean read GetCOMISIONABLEIsNull write SetCOMISIONABLEIsNull;
+    property INVENTARIABLE: SmallInt read GetINVENTARIABLEValue write SetINVENTARIABLEValue;
+    property INVENTARIABLEIsNull: Boolean read GetINVENTARIABLEIsNull write SetINVENTARIABLEIsNull;
+    property IMPORTE_UNIDAD_COSTE: Currency read GetIMPORTE_UNIDAD_COSTEValue write SetIMPORTE_UNIDAD_COSTEValue;
+    property IMPORTE_UNIDAD_COSTEIsNull: Boolean read GetIMPORTE_UNIDAD_COSTEIsNull write SetIMPORTE_UNIDAD_COSTEIsNull;
+    property DESCUENTO_PROVEEDOR_COSTE: Float read GetDESCUENTO_PROVEEDOR_COSTEValue write SetDESCUENTO_PROVEEDOR_COSTEValue;
+    property DESCUENTO_PROVEEDOR_COSTEIsNull: Boolean read GetDESCUENTO_PROVEEDOR_COSTEIsNull write SetDESCUENTO_PROVEEDOR_COSTEIsNull;
+    property IMPORTE_NETO_COSTE: Currency read GetIMPORTE_NETO_COSTEValue write SetIMPORTE_NETO_COSTEValue;
+    property IMPORTE_NETO_COSTEIsNull: Boolean read GetIMPORTE_NETO_COSTEIsNull write SetIMPORTE_NETO_COSTEIsNull;
+    property IMPORTE_PORTE_COSTE: Currency read GetIMPORTE_PORTE_COSTEValue write SetIMPORTE_PORTE_COSTEValue;
+    property IMPORTE_PORTE_COSTEIsNull: Boolean read GetIMPORTE_PORTE_COSTEIsNull write SetIMPORTE_PORTE_COSTEIsNull;
+    property CANTIDAD: Currency read GetCANTIDADValue write SetCANTIDADValue;
+    property CANTIDADIsNull: Boolean read GetCANTIDADIsNull write SetCANTIDADIsNull;
+    property IMPORTE_UNIDAD_VENTA: Currency read GetIMPORTE_UNIDAD_VENTAValue write SetIMPORTE_UNIDAD_VENTAValue;
+    property IMPORTE_UNIDAD_VENTAIsNull: Boolean read GetIMPORTE_UNIDAD_VENTAIsNull write SetIMPORTE_UNIDAD_VENTAIsNull;
+    property DESCUENTO_CLIENTE_VENTA: Float read GetDESCUENTO_CLIENTE_VENTAValue write SetDESCUENTO_CLIENTE_VENTAValue;
+    property DESCUENTO_CLIENTE_VENTAIsNull: Boolean read GetDESCUENTO_CLIENTE_VENTAIsNull write SetDESCUENTO_CLIENTE_VENTAIsNull;
+    property IMPORTE_NETO_VENTA: Float read GetIMPORTE_NETO_VENTAValue write SetIMPORTE_NETO_VENTAValue;
+    property IMPORTE_NETO_VENTAIsNull: Boolean read GetIMPORTE_NETO_VENTAIsNull write SetIMPORTE_NETO_VENTAIsNull;
+    property IMPORTE_PORTE_VENTA: Currency read GetIMPORTE_PORTE_VENTAValue write SetIMPORTE_PORTE_VENTAValue;
+    property IMPORTE_PORTE_VENTAIsNull: Boolean read GetIMPORTE_PORTE_VENTAIsNull write SetIMPORTE_PORTE_VENTAIsNull;
+    property IMPORTE_TOTAL_VENTA: Currency read GetIMPORTE_TOTAL_VENTAValue write SetIMPORTE_TOTAL_VENTAValue;
+    property IMPORTE_TOTAL_VENTAIsNull: Boolean read GetIMPORTE_TOTAL_VENTAIsNull write SetIMPORTE_TOTAL_VENTAIsNull;
+    property NIF_CIF_PROVEEDOR: String read GetNIF_CIF_PROVEEDORValue write SetNIF_CIF_PROVEEDORValue;
+    property NIF_CIF_PROVEEDORIsNull: Boolean read GetNIF_CIF_PROVEEDORIsNull write SetNIF_CIF_PROVEEDORIsNull;
+    property NOMBRE_PROVEEDOR: String read GetNOMBRE_PROVEEDORValue write SetNOMBRE_PROVEEDORValue;
+    property NOMBRE_PROVEEDORIsNull: Boolean read GetNOMBRE_PROVEEDORIsNull write SetNOMBRE_PROVEEDORIsNull;
+    property CALLE_PROVEEDOR: String read GetCALLE_PROVEEDORValue write SetCALLE_PROVEEDORValue;
+    property CALLE_PROVEEDORIsNull: Boolean read GetCALLE_PROVEEDORIsNull write SetCALLE_PROVEEDORIsNull;
+    property POBLACION_PROVEEDOR: String read GetPOBLACION_PROVEEDORValue write SetPOBLACION_PROVEEDORValue;
+    property POBLACION_PROVEEDORIsNull: Boolean read GetPOBLACION_PROVEEDORIsNull write SetPOBLACION_PROVEEDORIsNull;
+    property PROVINCIA_PROVEEDOR: String read GetPROVINCIA_PROVEEDORValue write SetPROVINCIA_PROVEEDORValue;
+    property PROVINCIA_PROVEEDORIsNull: Boolean read GetPROVINCIA_PROVEEDORIsNull write SetPROVINCIA_PROVEEDORIsNull;
+    property NIF_CIF_CLIENTE: String read GetNIF_CIF_CLIENTEValue write SetNIF_CIF_CLIENTEValue;
+    property NIF_CIF_CLIENTEIsNull: Boolean read GetNIF_CIF_CLIENTEIsNull write SetNIF_CIF_CLIENTEIsNull;
+    property NOMBRE_CLIENTE: String read GetNOMBRE_CLIENTEValue write SetNOMBRE_CLIENTEValue;
+    property NOMBRE_CLIENTEIsNull: Boolean read GetNOMBRE_CLIENTEIsNull write SetNOMBRE_CLIENTEIsNull;
+    property NOMBRE_COMERCIAL_CLIENTE: String read GetNOMBRE_COMERCIAL_CLIENTEValue write SetNOMBRE_COMERCIAL_CLIENTEValue;
+    property NOMBRE_COMERCIAL_CLIENTEIsNull: Boolean read GetNOMBRE_COMERCIAL_CLIENTEIsNull write SetNOMBRE_COMERCIAL_CLIENTEIsNull;
+    property CALLE_CLIENTE: String read GetCALLE_CLIENTEValue write SetCALLE_CLIENTEValue;
+    property CALLE_CLIENTEIsNull: Boolean read GetCALLE_CLIENTEIsNull write SetCALLE_CLIENTEIsNull;
+    property POBLACION_CLIENTE: String read GetPOBLACION_CLIENTEValue write SetPOBLACION_CLIENTEValue;
+    property POBLACION_CLIENTEIsNull: Boolean read GetPOBLACION_CLIENTEIsNull write SetPOBLACION_CLIENTEIsNull;
+    property PROVINCIA_CLIENTE: String read GetPROVINCIA_CLIENTEValue write SetPROVINCIA_CLIENTEValue;
+    property PROVINCIA_CLIENTEIsNull: Boolean read GetPROVINCIA_CLIENTEIsNull write SetPROVINCIA_CLIENTEIsNull;
+    property NIF_CIF_AGENTE: String read GetNIF_CIF_AGENTEValue write SetNIF_CIF_AGENTEValue;
+    property NIF_CIF_AGENTEIsNull: Boolean read GetNIF_CIF_AGENTEIsNull write SetNIF_CIF_AGENTEIsNull;
+    property NOMBRE_AGENTE: String read GetNOMBRE_AGENTEValue write SetNOMBRE_AGENTEValue;
+    property NOMBRE_AGENTEIsNull: Boolean read GetNOMBRE_AGENTEIsNull write SetNOMBRE_AGENTEIsNull;
+    property CALLE_AGENTE: String read GetCALLE_AGENTEValue write SetCALLE_AGENTEValue;
+    property CALLE_AGENTEIsNull: Boolean read GetCALLE_AGENTEIsNull write SetCALLE_AGENTEIsNull;
+    property POBLACION_AGENTE: String read GetPOBLACION_AGENTEValue write SetPOBLACION_AGENTEValue;
+    property POBLACION_AGENTEIsNull: Boolean read GetPOBLACION_AGENTEIsNull write SetPOBLACION_AGENTEIsNull;
+    property PROVINCIA_AGENTE: String read GetPROVINCIA_AGENTEValue write SetPROVINCIA_AGENTEValue;
+    property PROVINCIA_AGENTEIsNull: Boolean read GetPROVINCIA_AGENTEIsNull write SetPROVINCIA_AGENTEIsNull;
+    property COMISION_AGENTE: Float read GetCOMISION_AGENTEValue write SetCOMISION_AGENTEValue;
+    property COMISION_AGENTEIsNull: Boolean read GetCOMISION_AGENTEIsNull write SetCOMISION_AGENTEIsNull;
+    property IMPORTE_COMISION_AGENTE: Float read GetIMPORTE_COMISION_AGENTEValue write SetIMPORTE_COMISION_AGENTEValue;
+    property IMPORTE_COMISION_AGENTEIsNull: Boolean read GetIMPORTE_COMISION_AGENTEIsNull write SetIMPORTE_COMISION_AGENTEIsNull;
+  end;
+
+  { TInfVentasAlbArticuloDataTableRules }
+  TInfVentasAlbArticuloDataTableRules = class(TIntfObjectDADataTableRules, IInfVentasAlbArticulo)
+  private
+  protected
+    { Property getters and setters }
+    function GetID_ALBARANValue: Integer; virtual;
+    procedure SetID_ALBARANValue(const aValue: Integer); virtual;
+    function GetID_ALBARANIsNull: Boolean; virtual;
+    procedure SetID_ALBARANIsNull(const aValue: Boolean); virtual;
+    function GetID_EMPRESAValue: Integer; virtual;
+    procedure SetID_EMPRESAValue(const aValue: Integer); virtual;
+    function GetID_EMPRESAIsNull: Boolean; virtual;
+    procedure SetID_EMPRESAIsNull(const aValue: Boolean); virtual;
+    function GetREFERENCIA_ALBARANValue: String; virtual;
+    procedure SetREFERENCIA_ALBARANValue(const aValue: String); virtual;
+    function GetREFERENCIA_ALBARANIsNull: Boolean; virtual;
+    procedure SetREFERENCIA_ALBARANIsNull(const aValue: Boolean); virtual;
+    function GetFECHA_ALBARANValue: DateTime; virtual;
+    procedure SetFECHA_ALBARANValue(const aValue: DateTime); virtual;
+    function GetFECHA_ALBARANIsNull: Boolean; virtual;
+    procedure SetFECHA_ALBARANIsNull(const aValue: Boolean); virtual;
+    function GetIMPORTE_TOTAL_ALBARANValue: Currency; virtual;
+    procedure SetIMPORTE_TOTAL_ALBARANValue(const aValue: Currency); virtual;
+    function GetIMPORTE_TOTAL_ALBARANIsNull: Boolean; virtual;
+    procedure SetIMPORTE_TOTAL_ALBARANIsNull(const aValue: Boolean); virtual;
+    function GetID_ARTICULOValue: Integer; virtual;
+    procedure SetID_ARTICULOValue(const aValue: Integer); virtual;
+    function GetID_ARTICULOIsNull: Boolean; virtual;
+    procedure SetID_ARTICULOIsNull(const aValue: Boolean); virtual;
+    function GetFAMILIAValue: String; virtual;
+    procedure SetFAMILIAValue(const aValue: String); virtual;
+    function GetFAMILIAIsNull: Boolean; virtual;
+    procedure SetFAMILIAIsNull(const aValue: Boolean); virtual;
+    function GetREFERENCIAValue: String; virtual;
+    procedure SetREFERENCIAValue(const aValue: String); virtual;
+    function GetREFERENCIAIsNull: Boolean; virtual;
+    procedure SetREFERENCIAIsNull(const aValue: Boolean); virtual;
+    function GetREFERENCIA_PROVValue: String; virtual;
+    procedure SetREFERENCIA_PROVValue(const aValue: String); virtual;
+    function GetREFERENCIA_PROVIsNull: Boolean; virtual;
+    procedure SetREFERENCIA_PROVIsNull(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 GetCOMISIONABLEValue: SmallInt; virtual;
+    procedure SetCOMISIONABLEValue(const aValue: SmallInt); virtual;
+    function GetCOMISIONABLEIsNull: Boolean; virtual;
+    procedure SetCOMISIONABLEIsNull(const aValue: Boolean); virtual;
+    function GetINVENTARIABLEValue: SmallInt; virtual;
+    procedure SetINVENTARIABLEValue(const aValue: SmallInt); virtual;
+    function GetINVENTARIABLEIsNull: Boolean; virtual;
+    procedure SetINVENTARIABLEIsNull(const aValue: Boolean); virtual;
+    function GetIMPORTE_UNIDAD_COSTEValue: Currency; virtual;
+    procedure SetIMPORTE_UNIDAD_COSTEValue(const aValue: Currency); virtual;
+    function GetIMPORTE_UNIDAD_COSTEIsNull: Boolean; virtual;
+    procedure SetIMPORTE_UNIDAD_COSTEIsNull(const aValue: Boolean); virtual;
+    function GetDESCUENTO_PROVEEDOR_COSTEValue: Float; virtual;
+    procedure SetDESCUENTO_PROVEEDOR_COSTEValue(const aValue: Float); virtual;
+    function GetDESCUENTO_PROVEEDOR_COSTEIsNull: Boolean; virtual;
+    procedure SetDESCUENTO_PROVEEDOR_COSTEIsNull(const aValue: Boolean); virtual;
+    function GetIMPORTE_NETO_COSTEValue: Currency; virtual;
+    procedure SetIMPORTE_NETO_COSTEValue(const aValue: Currency); virtual;
+    function GetIMPORTE_NETO_COSTEIsNull: Boolean; virtual;
+    procedure SetIMPORTE_NETO_COSTEIsNull(const aValue: Boolean); virtual;
+    function GetIMPORTE_PORTE_COSTEValue: Currency; virtual;
+    procedure SetIMPORTE_PORTE_COSTEValue(const aValue: Currency); virtual;
+    function GetIMPORTE_PORTE_COSTEIsNull: Boolean; virtual;
+    procedure SetIMPORTE_PORTE_COSTEIsNull(const aValue: Boolean); virtual;
+    function GetCANTIDADValue: Currency; virtual;
+    procedure SetCANTIDADValue(const aValue: Currency); virtual;
+    function GetCANTIDADIsNull: Boolean; virtual;
+    procedure SetCANTIDADIsNull(const aValue: Boolean); virtual;
+    function GetIMPORTE_UNIDAD_VENTAValue: Currency; virtual;
+    procedure SetIMPORTE_UNIDAD_VENTAValue(const aValue: Currency); virtual;
+    function GetIMPORTE_UNIDAD_VENTAIsNull: Boolean; virtual;
+    procedure SetIMPORTE_UNIDAD_VENTAIsNull(const aValue: Boolean); virtual;
+    function GetDESCUENTO_CLIENTE_VENTAValue: Float; virtual;
+    procedure SetDESCUENTO_CLIENTE_VENTAValue(const aValue: Float); virtual;
+    function GetDESCUENTO_CLIENTE_VENTAIsNull: Boolean; virtual;
+    procedure SetDESCUENTO_CLIENTE_VENTAIsNull(const aValue: Boolean); virtual;
+    function GetIMPORTE_NETO_VENTAValue: Float; virtual;
+    procedure SetIMPORTE_NETO_VENTAValue(const aValue: Float); virtual;
+    function GetIMPORTE_NETO_VENTAIsNull: Boolean; virtual;
+    procedure SetIMPORTE_NETO_VENTAIsNull(const aValue: Boolean); virtual;
+    function GetIMPORTE_PORTE_VENTAValue: Currency; virtual;
+    procedure SetIMPORTE_PORTE_VENTAValue(const aValue: Currency); virtual;
+    function GetIMPORTE_PORTE_VENTAIsNull: Boolean; virtual;
+    procedure SetIMPORTE_PORTE_VENTAIsNull(const aValue: Boolean); virtual;
+    function GetIMPORTE_TOTAL_VENTAValue: Currency; virtual;
+    procedure SetIMPORTE_TOTAL_VENTAValue(const aValue: Currency); virtual;
+    function GetIMPORTE_TOTAL_VENTAIsNull: Boolean; virtual;
+    procedure SetIMPORTE_TOTAL_VENTAIsNull(const aValue: Boolean); virtual;
+    function GetNIF_CIF_PROVEEDORValue: String; virtual;
+    procedure SetNIF_CIF_PROVEEDORValue(const aValue: String); virtual;
+    function GetNIF_CIF_PROVEEDORIsNull: Boolean; virtual;
+    procedure SetNIF_CIF_PROVEEDORIsNull(const aValue: Boolean); virtual;
+    function GetNOMBRE_PROVEEDORValue: String; virtual;
+    procedure SetNOMBRE_PROVEEDORValue(const aValue: String); virtual;
+    function GetNOMBRE_PROVEEDORIsNull: Boolean; virtual;
+    procedure SetNOMBRE_PROVEEDORIsNull(const aValue: Boolean); virtual;
+    function GetCALLE_PROVEEDORValue: String; virtual;
+    procedure SetCALLE_PROVEEDORValue(const aValue: String); virtual;
+    function GetCALLE_PROVEEDORIsNull: Boolean; virtual;
+    procedure SetCALLE_PROVEEDORIsNull(const aValue: Boolean); virtual;
+    function GetPOBLACION_PROVEEDORValue: String; virtual;
+    procedure SetPOBLACION_PROVEEDORValue(const aValue: String); virtual;
+    function GetPOBLACION_PROVEEDORIsNull: Boolean; virtual;
+    procedure SetPOBLACION_PROVEEDORIsNull(const aValue: Boolean); virtual;
+    function GetPROVINCIA_PROVEEDORValue: String; virtual;
+    procedure SetPROVINCIA_PROVEEDORValue(const aValue: String); virtual;
+    function GetPROVINCIA_PROVEEDORIsNull: Boolean; virtual;
+    procedure SetPROVINCIA_PROVEEDORIsNull(const aValue: Boolean); virtual;
+    function GetNIF_CIF_CLIENTEValue: String; virtual;
+    procedure SetNIF_CIF_CLIENTEValue(const aValue: String); virtual;
+    function GetNIF_CIF_CLIENTEIsNull: Boolean; virtual;
+    procedure SetNIF_CIF_CLIENTEIsNull(const aValue: Boolean); virtual;
+    function GetNOMBRE_CLIENTEValue: String; virtual;
+    procedure SetNOMBRE_CLIENTEValue(const aValue: String); virtual;
+    function GetNOMBRE_CLIENTEIsNull: Boolean; virtual;
+    procedure SetNOMBRE_CLIENTEIsNull(const aValue: Boolean); virtual;
+    function GetNOMBRE_COMERCIAL_CLIENTEValue: String; virtual;
+    procedure SetNOMBRE_COMERCIAL_CLIENTEValue(const aValue: String); virtual;
+    function GetNOMBRE_COMERCIAL_CLIENTEIsNull: Boolean; virtual;
+    procedure SetNOMBRE_COMERCIAL_CLIENTEIsNull(const aValue: Boolean); virtual;
+    function GetCALLE_CLIENTEValue: String; virtual;
+    procedure SetCALLE_CLIENTEValue(const aValue: String); virtual;
+    function GetCALLE_CLIENTEIsNull: Boolean; virtual;
+    procedure SetCALLE_CLIENTEIsNull(const aValue: Boolean); virtual;
+    function GetPOBLACION_CLIENTEValue: String; virtual;
+    procedure SetPOBLACION_CLIENTEValue(const aValue: String); virtual;
+    function GetPOBLACION_CLIENTEIsNull: Boolean; virtual;
+    procedure SetPOBLACION_CLIENTEIsNull(const aValue: Boolean); virtual;
+    function GetPROVINCIA_CLIENTEValue: String; virtual;
+    procedure SetPROVINCIA_CLIENTEValue(const aValue: String); virtual;
+    function GetPROVINCIA_CLIENTEIsNull: Boolean; virtual;
+    procedure SetPROVINCIA_CLIENTEIsNull(const aValue: Boolean); virtual;
+    function GetNIF_CIF_AGENTEValue: String; virtual;
+    procedure SetNIF_CIF_AGENTEValue(const aValue: String); virtual;
+    function GetNIF_CIF_AGENTEIsNull: Boolean; virtual;
+    procedure SetNIF_CIF_AGENTEIsNull(const aValue: Boolean); virtual;
+    function GetNOMBRE_AGENTEValue: String; virtual;
+    procedure SetNOMBRE_AGENTEValue(const aValue: String); virtual;
+    function GetNOMBRE_AGENTEIsNull: Boolean; virtual;
+    procedure SetNOMBRE_AGENTEIsNull(const aValue: Boolean); virtual;
+    function GetCALLE_AGENTEValue: String; virtual;
+    procedure SetCALLE_AGENTEValue(const aValue: String); virtual;
+    function GetCALLE_AGENTEIsNull: Boolean; virtual;
+    procedure SetCALLE_AGENTEIsNull(const aValue: Boolean); virtual;
+    function GetPOBLACION_AGENTEValue: String; virtual;
+    procedure SetPOBLACION_AGENTEValue(const aValue: String); virtual;
+    function GetPOBLACION_AGENTEIsNull: Boolean; virtual;
+    procedure SetPOBLACION_AGENTEIsNull(const aValue: Boolean); virtual;
+    function GetPROVINCIA_AGENTEValue: String; virtual;
+    procedure SetPROVINCIA_AGENTEValue(const aValue: String); virtual;
+    function GetPROVINCIA_AGENTEIsNull: Boolean; virtual;
+    procedure SetPROVINCIA_AGENTEIsNull(const aValue: Boolean); virtual;
+    function GetCOMISION_AGENTEValue: Float; virtual;
+    procedure SetCOMISION_AGENTEValue(const aValue: Float); virtual;
+    function GetCOMISION_AGENTEIsNull: Boolean; virtual;
+    procedure SetCOMISION_AGENTEIsNull(const aValue: Boolean); virtual;
+    function GetIMPORTE_COMISION_AGENTEValue: Float; virtual;
+    procedure SetIMPORTE_COMISION_AGENTEValue(const aValue: Float); virtual;
+    function GetIMPORTE_COMISION_AGENTEIsNull: Boolean; virtual;
+    procedure SetIMPORTE_COMISION_AGENTEIsNull(const aValue: Boolean); virtual;
+
+    { Properties }
+    property ID_ALBARAN: Integer read GetID_ALBARANValue write SetID_ALBARANValue;
+    property ID_ALBARANIsNull: Boolean read GetID_ALBARANIsNull write SetID_ALBARANIsNull;
+    property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
+    property ID_EMPRESAIsNull: Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull;
+    property REFERENCIA_ALBARAN: String read GetREFERENCIA_ALBARANValue write SetREFERENCIA_ALBARANValue;
+    property REFERENCIA_ALBARANIsNull: Boolean read GetREFERENCIA_ALBARANIsNull write SetREFERENCIA_ALBARANIsNull;
+    property FECHA_ALBARAN: DateTime read GetFECHA_ALBARANValue write SetFECHA_ALBARANValue;
+    property FECHA_ALBARANIsNull: Boolean read GetFECHA_ALBARANIsNull write SetFECHA_ALBARANIsNull;
+    property IMPORTE_TOTAL_ALBARAN: Currency read GetIMPORTE_TOTAL_ALBARANValue write SetIMPORTE_TOTAL_ALBARANValue;
+    property IMPORTE_TOTAL_ALBARANIsNull: Boolean read GetIMPORTE_TOTAL_ALBARANIsNull write SetIMPORTE_TOTAL_ALBARANIsNull;
+    property ID_ARTICULO: Integer read GetID_ARTICULOValue write SetID_ARTICULOValue;
+    property ID_ARTICULOIsNull: Boolean read GetID_ARTICULOIsNull write SetID_ARTICULOIsNull;
+    property FAMILIA: String read GetFAMILIAValue write SetFAMILIAValue;
+    property FAMILIAIsNull: Boolean read GetFAMILIAIsNull write SetFAMILIAIsNull;
+    property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
+    property REFERENCIAIsNull: Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull;
+    property REFERENCIA_PROV: String read GetREFERENCIA_PROVValue write SetREFERENCIA_PROVValue;
+    property REFERENCIA_PROVIsNull: Boolean read GetREFERENCIA_PROVIsNull write SetREFERENCIA_PROVIsNull;
+    property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
+    property DESCRIPCIONIsNull: Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull;
+    property COMISIONABLE: SmallInt read GetCOMISIONABLEValue write SetCOMISIONABLEValue;
+    property COMISIONABLEIsNull: Boolean read GetCOMISIONABLEIsNull write SetCOMISIONABLEIsNull;
+    property INVENTARIABLE: SmallInt read GetINVENTARIABLEValue write SetINVENTARIABLEValue;
+    property INVENTARIABLEIsNull: Boolean read GetINVENTARIABLEIsNull write SetINVENTARIABLEIsNull;
+    property IMPORTE_UNIDAD_COSTE: Currency read GetIMPORTE_UNIDAD_COSTEValue write SetIMPORTE_UNIDAD_COSTEValue;
+    property IMPORTE_UNIDAD_COSTEIsNull: Boolean read GetIMPORTE_UNIDAD_COSTEIsNull write SetIMPORTE_UNIDAD_COSTEIsNull;
+    property DESCUENTO_PROVEEDOR_COSTE: Float read GetDESCUENTO_PROVEEDOR_COSTEValue write SetDESCUENTO_PROVEEDOR_COSTEValue;
+    property DESCUENTO_PROVEEDOR_COSTEIsNull: Boolean read GetDESCUENTO_PROVEEDOR_COSTEIsNull write SetDESCUENTO_PROVEEDOR_COSTEIsNull;
+    property IMPORTE_NETO_COSTE: Currency read GetIMPORTE_NETO_COSTEValue write SetIMPORTE_NETO_COSTEValue;
+    property IMPORTE_NETO_COSTEIsNull: Boolean read GetIMPORTE_NETO_COSTEIsNull write SetIMPORTE_NETO_COSTEIsNull;
+    property IMPORTE_PORTE_COSTE: Currency read GetIMPORTE_PORTE_COSTEValue write SetIMPORTE_PORTE_COSTEValue;
+    property IMPORTE_PORTE_COSTEIsNull: Boolean read GetIMPORTE_PORTE_COSTEIsNull write SetIMPORTE_PORTE_COSTEIsNull;
+    property CANTIDAD: Currency read GetCANTIDADValue write SetCANTIDADValue;
+    property CANTIDADIsNull: Boolean read GetCANTIDADIsNull write SetCANTIDADIsNull;
+    property IMPORTE_UNIDAD_VENTA: Currency read GetIMPORTE_UNIDAD_VENTAValue write SetIMPORTE_UNIDAD_VENTAValue;
+    property IMPORTE_UNIDAD_VENTAIsNull: Boolean read GetIMPORTE_UNIDAD_VENTAIsNull write SetIMPORTE_UNIDAD_VENTAIsNull;
+    property DESCUENTO_CLIENTE_VENTA: Float read GetDESCUENTO_CLIENTE_VENTAValue write SetDESCUENTO_CLIENTE_VENTAValue;
+    property DESCUENTO_CLIENTE_VENTAIsNull: Boolean read GetDESCUENTO_CLIENTE_VENTAIsNull write SetDESCUENTO_CLIENTE_VENTAIsNull;
+    property IMPORTE_NETO_VENTA: Float read GetIMPORTE_NETO_VENTAValue write SetIMPORTE_NETO_VENTAValue;
+    property IMPORTE_NETO_VENTAIsNull: Boolean read GetIMPORTE_NETO_VENTAIsNull write SetIMPORTE_NETO_VENTAIsNull;
+    property IMPORTE_PORTE_VENTA: Currency read GetIMPORTE_PORTE_VENTAValue write SetIMPORTE_PORTE_VENTAValue;
+    property IMPORTE_PORTE_VENTAIsNull: Boolean read GetIMPORTE_PORTE_VENTAIsNull write SetIMPORTE_PORTE_VENTAIsNull;
+    property IMPORTE_TOTAL_VENTA: Currency read GetIMPORTE_TOTAL_VENTAValue write SetIMPORTE_TOTAL_VENTAValue;
+    property IMPORTE_TOTAL_VENTAIsNull: Boolean read GetIMPORTE_TOTAL_VENTAIsNull write SetIMPORTE_TOTAL_VENTAIsNull;
+    property NIF_CIF_PROVEEDOR: String read GetNIF_CIF_PROVEEDORValue write SetNIF_CIF_PROVEEDORValue;
+    property NIF_CIF_PROVEEDORIsNull: Boolean read GetNIF_CIF_PROVEEDORIsNull write SetNIF_CIF_PROVEEDORIsNull;
+    property NOMBRE_PROVEEDOR: String read GetNOMBRE_PROVEEDORValue write SetNOMBRE_PROVEEDORValue;
+    property NOMBRE_PROVEEDORIsNull: Boolean read GetNOMBRE_PROVEEDORIsNull write SetNOMBRE_PROVEEDORIsNull;
+    property CALLE_PROVEEDOR: String read GetCALLE_PROVEEDORValue write SetCALLE_PROVEEDORValue;
+    property CALLE_PROVEEDORIsNull: Boolean read GetCALLE_PROVEEDORIsNull write SetCALLE_PROVEEDORIsNull;
+    property POBLACION_PROVEEDOR: String read GetPOBLACION_PROVEEDORValue write SetPOBLACION_PROVEEDORValue;
+    property POBLACION_PROVEEDORIsNull: Boolean read GetPOBLACION_PROVEEDORIsNull write SetPOBLACION_PROVEEDORIsNull;
+    property PROVINCIA_PROVEEDOR: String read GetPROVINCIA_PROVEEDORValue write SetPROVINCIA_PROVEEDORValue;
+    property PROVINCIA_PROVEEDORIsNull: Boolean read GetPROVINCIA_PROVEEDORIsNull write SetPROVINCIA_PROVEEDORIsNull;
+    property NIF_CIF_CLIENTE: String read GetNIF_CIF_CLIENTEValue write SetNIF_CIF_CLIENTEValue;
+    property NIF_CIF_CLIENTEIsNull: Boolean read GetNIF_CIF_CLIENTEIsNull write SetNIF_CIF_CLIENTEIsNull;
+    property NOMBRE_CLIENTE: String read GetNOMBRE_CLIENTEValue write SetNOMBRE_CLIENTEValue;
+    property NOMBRE_CLIENTEIsNull: Boolean read GetNOMBRE_CLIENTEIsNull write SetNOMBRE_CLIENTEIsNull;
+    property NOMBRE_COMERCIAL_CLIENTE: String read GetNOMBRE_COMERCIAL_CLIENTEValue write SetNOMBRE_COMERCIAL_CLIENTEValue;
+    property NOMBRE_COMERCIAL_CLIENTEIsNull: Boolean read GetNOMBRE_COMERCIAL_CLIENTEIsNull write SetNOMBRE_COMERCIAL_CLIENTEIsNull;
+    property CALLE_CLIENTE: String read GetCALLE_CLIENTEValue write SetCALLE_CLIENTEValue;
+    property CALLE_CLIENTEIsNull: Boolean read GetCALLE_CLIENTEIsNull write SetCALLE_CLIENTEIsNull;
+    property POBLACION_CLIENTE: String read GetPOBLACION_CLIENTEValue write SetPOBLACION_CLIENTEValue;
+    property POBLACION_CLIENTEIsNull: Boolean read GetPOBLACION_CLIENTEIsNull write SetPOBLACION_CLIENTEIsNull;
+    property PROVINCIA_CLIENTE: String read GetPROVINCIA_CLIENTEValue write SetPROVINCIA_CLIENTEValue;
+    property PROVINCIA_CLIENTEIsNull: Boolean read GetPROVINCIA_CLIENTEIsNull write SetPROVINCIA_CLIENTEIsNull;
+    property NIF_CIF_AGENTE: String read GetNIF_CIF_AGENTEValue write SetNIF_CIF_AGENTEValue;
+    property NIF_CIF_AGENTEIsNull: Boolean read GetNIF_CIF_AGENTEIsNull write SetNIF_CIF_AGENTEIsNull;
+    property NOMBRE_AGENTE: String read GetNOMBRE_AGENTEValue write SetNOMBRE_AGENTEValue;
+    property NOMBRE_AGENTEIsNull: Boolean read GetNOMBRE_AGENTEIsNull write SetNOMBRE_AGENTEIsNull;
+    property CALLE_AGENTE: String read GetCALLE_AGENTEValue write SetCALLE_AGENTEValue;
+    property CALLE_AGENTEIsNull: Boolean read GetCALLE_AGENTEIsNull write SetCALLE_AGENTEIsNull;
+    property POBLACION_AGENTE: String read GetPOBLACION_AGENTEValue write SetPOBLACION_AGENTEValue;
+    property POBLACION_AGENTEIsNull: Boolean read GetPOBLACION_AGENTEIsNull write SetPOBLACION_AGENTEIsNull;
+    property PROVINCIA_AGENTE: String read GetPROVINCIA_AGENTEValue write SetPROVINCIA_AGENTEValue;
+    property PROVINCIA_AGENTEIsNull: Boolean read GetPROVINCIA_AGENTEIsNull write SetPROVINCIA_AGENTEIsNull;
+    property COMISION_AGENTE: Float read GetCOMISION_AGENTEValue write SetCOMISION_AGENTEValue;
+    property COMISION_AGENTEIsNull: Boolean read GetCOMISION_AGENTEIsNull write SetCOMISION_AGENTEIsNull;
+    property IMPORTE_COMISION_AGENTE: Float read GetIMPORTE_COMISION_AGENTEValue write SetIMPORTE_COMISION_AGENTEValue;
+    property IMPORTE_COMISION_AGENTEIsNull: Boolean read GetIMPORTE_COMISION_AGENTEIsNull write SetIMPORTE_COMISION_AGENTEIsNull;
 
   public
     constructor Create(aDataTable: TDADataTable); override;
@@ -372,7 +1236,7 @@ type
 
 implementation
 
-uses Variants;
+uses Variants, uROBinaryHelpers;
 
 { TInfVentasArticuloDataTableRules }
 constructor TInfVentasArticuloDataTableRules.Create(aDataTable: TDADataTable);
@@ -395,6 +1259,17 @@ begin
   DataTable.Fields[idx_InfVentasArticuloID_FACTURA].AsInteger := aValue;
 end;
 
+function TInfVentasArticuloDataTableRules.GetID_FACTURAIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasArticuloID_FACTURA].IsNull;
+end;
+
+procedure TInfVentasArticuloDataTableRules.SetID_FACTURAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasArticuloID_FACTURA].AsVariant := Null;
+end;
+
 function TInfVentasArticuloDataTableRules.GetID_EMPRESAValue: Integer;
 begin
   result := DataTable.Fields[idx_InfVentasArticuloID_EMPRESA].AsInteger;
@@ -405,6 +1280,17 @@ begin
   DataTable.Fields[idx_InfVentasArticuloID_EMPRESA].AsInteger := aValue;
 end;
 
+function TInfVentasArticuloDataTableRules.GetID_EMPRESAIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasArticuloID_EMPRESA].IsNull;
+end;
+
+procedure TInfVentasArticuloDataTableRules.SetID_EMPRESAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasArticuloID_EMPRESA].AsVariant := Null;
+end;
+
 function TInfVentasArticuloDataTableRules.GetREFERENCIA_FACTURAValue: String;
 begin
   result := DataTable.Fields[idx_InfVentasArticuloREFERENCIA_FACTURA].AsString;
@@ -415,6 +1301,17 @@ begin
   DataTable.Fields[idx_InfVentasArticuloREFERENCIA_FACTURA].AsString := aValue;
 end;
 
+function TInfVentasArticuloDataTableRules.GetREFERENCIA_FACTURAIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasArticuloREFERENCIA_FACTURA].IsNull;
+end;
+
+procedure TInfVentasArticuloDataTableRules.SetREFERENCIA_FACTURAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasArticuloREFERENCIA_FACTURA].AsVariant := Null;
+end;
+
 function TInfVentasArticuloDataTableRules.GetFECHA_FACTURAValue: DateTime;
 begin
   result := DataTable.Fields[idx_InfVentasArticuloFECHA_FACTURA].AsDateTime;
@@ -425,6 +1322,17 @@ begin
   DataTable.Fields[idx_InfVentasArticuloFECHA_FACTURA].AsDateTime := aValue;
 end;
 
+function TInfVentasArticuloDataTableRules.GetFECHA_FACTURAIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasArticuloFECHA_FACTURA].IsNull;
+end;
+
+procedure TInfVentasArticuloDataTableRules.SetFECHA_FACTURAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasArticuloFECHA_FACTURA].AsVariant := Null;
+end;
+
 function TInfVentasArticuloDataTableRules.GetIMPORTE_TOTAL_FACTURAValue: Currency;
 begin
   result := DataTable.Fields[idx_InfVentasArticuloIMPORTE_TOTAL_FACTURA].AsCurrency;
@@ -435,6 +1343,17 @@ begin
   DataTable.Fields[idx_InfVentasArticuloIMPORTE_TOTAL_FACTURA].AsCurrency := aValue;
 end;
 
+function TInfVentasArticuloDataTableRules.GetIMPORTE_TOTAL_FACTURAIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasArticuloIMPORTE_TOTAL_FACTURA].IsNull;
+end;
+
+procedure TInfVentasArticuloDataTableRules.SetIMPORTE_TOTAL_FACTURAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasArticuloIMPORTE_TOTAL_FACTURA].AsVariant := Null;
+end;
+
 function TInfVentasArticuloDataTableRules.GetID_COMISION_FACTURAValue: Integer;
 begin
   result := DataTable.Fields[idx_InfVentasArticuloID_COMISION_FACTURA].AsInteger;
@@ -445,6 +1364,17 @@ begin
   DataTable.Fields[idx_InfVentasArticuloID_COMISION_FACTURA].AsInteger := aValue;
 end;
 
+function TInfVentasArticuloDataTableRules.GetID_COMISION_FACTURAIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasArticuloID_COMISION_FACTURA].IsNull;
+end;
+
+procedure TInfVentasArticuloDataTableRules.SetID_COMISION_FACTURAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasArticuloID_COMISION_FACTURA].AsVariant := Null;
+end;
+
 function TInfVentasArticuloDataTableRules.GetID_ARTICULOValue: Integer;
 begin
   result := DataTable.Fields[idx_InfVentasArticuloID_ARTICULO].AsInteger;
@@ -455,6 +1385,17 @@ begin
   DataTable.Fields[idx_InfVentasArticuloID_ARTICULO].AsInteger := aValue;
 end;
 
+function TInfVentasArticuloDataTableRules.GetID_ARTICULOIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasArticuloID_ARTICULO].IsNull;
+end;
+
+procedure TInfVentasArticuloDataTableRules.SetID_ARTICULOIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasArticuloID_ARTICULO].AsVariant := Null;
+end;
+
 function TInfVentasArticuloDataTableRules.GetFAMILIAValue: String;
 begin
   result := DataTable.Fields[idx_InfVentasArticuloFAMILIA].AsString;
@@ -465,6 +1406,17 @@ begin
   DataTable.Fields[idx_InfVentasArticuloFAMILIA].AsString := aValue;
 end;
 
+function TInfVentasArticuloDataTableRules.GetFAMILIAIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasArticuloFAMILIA].IsNull;
+end;
+
+procedure TInfVentasArticuloDataTableRules.SetFAMILIAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasArticuloFAMILIA].AsVariant := Null;
+end;
+
 function TInfVentasArticuloDataTableRules.GetREFERENCIAValue: String;
 begin
   result := DataTable.Fields[idx_InfVentasArticuloREFERENCIA].AsString;
@@ -475,6 +1427,17 @@ begin
   DataTable.Fields[idx_InfVentasArticuloREFERENCIA].AsString := aValue;
 end;
 
+function TInfVentasArticuloDataTableRules.GetREFERENCIAIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasArticuloREFERENCIA].IsNull;
+end;
+
+procedure TInfVentasArticuloDataTableRules.SetREFERENCIAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasArticuloREFERENCIA].AsVariant := Null;
+end;
+
 function TInfVentasArticuloDataTableRules.GetREFERENCIA_PROVValue: String;
 begin
   result := DataTable.Fields[idx_InfVentasArticuloREFERENCIA_PROV].AsString;
@@ -485,6 +1448,17 @@ begin
   DataTable.Fields[idx_InfVentasArticuloREFERENCIA_PROV].AsString := aValue;
 end;
 
+function TInfVentasArticuloDataTableRules.GetREFERENCIA_PROVIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasArticuloREFERENCIA_PROV].IsNull;
+end;
+
+procedure TInfVentasArticuloDataTableRules.SetREFERENCIA_PROVIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasArticuloREFERENCIA_PROV].AsVariant := Null;
+end;
+
 function TInfVentasArticuloDataTableRules.GetDESCRIPCIONValue: String;
 begin
   result := DataTable.Fields[idx_InfVentasArticuloDESCRIPCION].AsString;
@@ -495,24 +1469,57 @@ begin
   DataTable.Fields[idx_InfVentasArticuloDESCRIPCION].AsString := aValue;
 end;
 
-function TInfVentasArticuloDataTableRules.GetCOMISIONABLEValue: Integer;
+function TInfVentasArticuloDataTableRules.GetDESCRIPCIONIsNull: boolean;
 begin
-  result := DataTable.Fields[idx_InfVentasArticuloCOMISIONABLE].AsInteger;
+  result := DataTable.Fields[idx_InfVentasArticuloDESCRIPCION].IsNull;
 end;
 
-procedure TInfVentasArticuloDataTableRules.SetCOMISIONABLEValue(const aValue: Integer);
+procedure TInfVentasArticuloDataTableRules.SetDESCRIPCIONIsNull(const aValue: Boolean);
 begin
-  DataTable.Fields[idx_InfVentasArticuloCOMISIONABLE].AsInteger := aValue;
+  if aValue then
+    DataTable.Fields[idx_InfVentasArticuloDESCRIPCION].AsVariant := Null;
 end;
 
-function TInfVentasArticuloDataTableRules.GetINVENTARIABLEValue: Integer;
+function TInfVentasArticuloDataTableRules.GetCOMISIONABLEValue: SmallInt;
 begin
-  result := DataTable.Fields[idx_InfVentasArticuloINVENTARIABLE].AsInteger;
+  result := DataTable.Fields[idx_InfVentasArticuloCOMISIONABLE].AsSmallInt;
 end;
 
-procedure TInfVentasArticuloDataTableRules.SetINVENTARIABLEValue(const aValue: Integer);
+procedure TInfVentasArticuloDataTableRules.SetCOMISIONABLEValue(const aValue: SmallInt);
 begin
-  DataTable.Fields[idx_InfVentasArticuloINVENTARIABLE].AsInteger := aValue;
+  DataTable.Fields[idx_InfVentasArticuloCOMISIONABLE].AsSmallInt := aValue;
+end;
+
+function TInfVentasArticuloDataTableRules.GetCOMISIONABLEIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasArticuloCOMISIONABLE].IsNull;
+end;
+
+procedure TInfVentasArticuloDataTableRules.SetCOMISIONABLEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasArticuloCOMISIONABLE].AsVariant := Null;
+end;
+
+function TInfVentasArticuloDataTableRules.GetINVENTARIABLEValue: SmallInt;
+begin
+  result := DataTable.Fields[idx_InfVentasArticuloINVENTARIABLE].AsSmallInt;
+end;
+
+procedure TInfVentasArticuloDataTableRules.SetINVENTARIABLEValue(const aValue: SmallInt);
+begin
+  DataTable.Fields[idx_InfVentasArticuloINVENTARIABLE].AsSmallInt := aValue;
+end;
+
+function TInfVentasArticuloDataTableRules.GetINVENTARIABLEIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasArticuloINVENTARIABLE].IsNull;
+end;
+
+procedure TInfVentasArticuloDataTableRules.SetINVENTARIABLEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasArticuloINVENTARIABLE].AsVariant := Null;
 end;
 
 function TInfVentasArticuloDataTableRules.GetIMPORTE_UNIDAD_COSTEValue: Currency;
@@ -525,6 +1532,17 @@ begin
   DataTable.Fields[idx_InfVentasArticuloIMPORTE_UNIDAD_COSTE].AsCurrency := aValue;
 end;
 
+function TInfVentasArticuloDataTableRules.GetIMPORTE_UNIDAD_COSTEIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasArticuloIMPORTE_UNIDAD_COSTE].IsNull;
+end;
+
+procedure TInfVentasArticuloDataTableRules.SetIMPORTE_UNIDAD_COSTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasArticuloIMPORTE_UNIDAD_COSTE].AsVariant := Null;
+end;
+
 function TInfVentasArticuloDataTableRules.GetDESCUENTO_PROVEEDOR_COSTEValue: Float;
 begin
   result := DataTable.Fields[idx_InfVentasArticuloDESCUENTO_PROVEEDOR_COSTE].AsFloat;
@@ -535,6 +1553,17 @@ begin
   DataTable.Fields[idx_InfVentasArticuloDESCUENTO_PROVEEDOR_COSTE].AsFloat := aValue;
 end;
 
+function TInfVentasArticuloDataTableRules.GetDESCUENTO_PROVEEDOR_COSTEIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasArticuloDESCUENTO_PROVEEDOR_COSTE].IsNull;
+end;
+
+procedure TInfVentasArticuloDataTableRules.SetDESCUENTO_PROVEEDOR_COSTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasArticuloDESCUENTO_PROVEEDOR_COSTE].AsVariant := Null;
+end;
+
 function TInfVentasArticuloDataTableRules.GetIMPORTE_NETO_COSTEValue: Currency;
 begin
   result := DataTable.Fields[idx_InfVentasArticuloIMPORTE_NETO_COSTE].AsCurrency;
@@ -545,6 +1574,17 @@ begin
   DataTable.Fields[idx_InfVentasArticuloIMPORTE_NETO_COSTE].AsCurrency := aValue;
 end;
 
+function TInfVentasArticuloDataTableRules.GetIMPORTE_NETO_COSTEIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasArticuloIMPORTE_NETO_COSTE].IsNull;
+end;
+
+procedure TInfVentasArticuloDataTableRules.SetIMPORTE_NETO_COSTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasArticuloIMPORTE_NETO_COSTE].AsVariant := Null;
+end;
+
 function TInfVentasArticuloDataTableRules.GetIMPORTE_PORTE_COSTEValue: Currency;
 begin
   result := DataTable.Fields[idx_InfVentasArticuloIMPORTE_PORTE_COSTE].AsCurrency;
@@ -555,14 +1595,36 @@ begin
   DataTable.Fields[idx_InfVentasArticuloIMPORTE_PORTE_COSTE].AsCurrency := aValue;
 end;
 
-function TInfVentasArticuloDataTableRules.GetCANTIDADValue: Integer;
+function TInfVentasArticuloDataTableRules.GetIMPORTE_PORTE_COSTEIsNull: boolean;
 begin
-  result := DataTable.Fields[idx_InfVentasArticuloCANTIDAD].AsInteger;
+  result := DataTable.Fields[idx_InfVentasArticuloIMPORTE_PORTE_COSTE].IsNull;
 end;
 
-procedure TInfVentasArticuloDataTableRules.SetCANTIDADValue(const aValue: Integer);
+procedure TInfVentasArticuloDataTableRules.SetIMPORTE_PORTE_COSTEIsNull(const aValue: Boolean);
 begin
-  DataTable.Fields[idx_InfVentasArticuloCANTIDAD].AsInteger := aValue;
+  if aValue then
+    DataTable.Fields[idx_InfVentasArticuloIMPORTE_PORTE_COSTE].AsVariant := Null;
+end;
+
+function TInfVentasArticuloDataTableRules.GetCANTIDADValue: Currency;
+begin
+  result := DataTable.Fields[idx_InfVentasArticuloCANTIDAD].AsCurrency;
+end;
+
+procedure TInfVentasArticuloDataTableRules.SetCANTIDADValue(const aValue: Currency);
+begin
+  DataTable.Fields[idx_InfVentasArticuloCANTIDAD].AsCurrency := aValue;
+end;
+
+function TInfVentasArticuloDataTableRules.GetCANTIDADIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasArticuloCANTIDAD].IsNull;
+end;
+
+procedure TInfVentasArticuloDataTableRules.SetCANTIDADIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasArticuloCANTIDAD].AsVariant := Null;
 end;
 
 function TInfVentasArticuloDataTableRules.GetIMPORTE_UNIDAD_VENTAValue: Currency;
@@ -575,6 +1637,17 @@ begin
   DataTable.Fields[idx_InfVentasArticuloIMPORTE_UNIDAD_VENTA].AsCurrency := aValue;
 end;
 
+function TInfVentasArticuloDataTableRules.GetIMPORTE_UNIDAD_VENTAIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasArticuloIMPORTE_UNIDAD_VENTA].IsNull;
+end;
+
+procedure TInfVentasArticuloDataTableRules.SetIMPORTE_UNIDAD_VENTAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasArticuloIMPORTE_UNIDAD_VENTA].AsVariant := Null;
+end;
+
 function TInfVentasArticuloDataTableRules.GetDESCUENTO_CLIENTE_VENTAValue: Float;
 begin
   result := DataTable.Fields[idx_InfVentasArticuloDESCUENTO_CLIENTE_VENTA].AsFloat;
@@ -585,6 +1658,17 @@ begin
   DataTable.Fields[idx_InfVentasArticuloDESCUENTO_CLIENTE_VENTA].AsFloat := aValue;
 end;
 
+function TInfVentasArticuloDataTableRules.GetDESCUENTO_CLIENTE_VENTAIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasArticuloDESCUENTO_CLIENTE_VENTA].IsNull;
+end;
+
+procedure TInfVentasArticuloDataTableRules.SetDESCUENTO_CLIENTE_VENTAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasArticuloDESCUENTO_CLIENTE_VENTA].AsVariant := Null;
+end;
+
 function TInfVentasArticuloDataTableRules.GetIMPORTE_NETO_VENTAValue: Float;
 begin
   result := DataTable.Fields[idx_InfVentasArticuloIMPORTE_NETO_VENTA].AsFloat;
@@ -595,14 +1679,36 @@ begin
   DataTable.Fields[idx_InfVentasArticuloIMPORTE_NETO_VENTA].AsFloat := aValue;
 end;
 
-function TInfVentasArticuloDataTableRules.GetIMPORTE_PORTE_VENTAValue: Float;
+function TInfVentasArticuloDataTableRules.GetIMPORTE_NETO_VENTAIsNull: boolean;
 begin
-  result := DataTable.Fields[idx_InfVentasArticuloIMPORTE_PORTE_VENTA].AsFloat;
+  result := DataTable.Fields[idx_InfVentasArticuloIMPORTE_NETO_VENTA].IsNull;
 end;
 
-procedure TInfVentasArticuloDataTableRules.SetIMPORTE_PORTE_VENTAValue(const aValue: Float);
+procedure TInfVentasArticuloDataTableRules.SetIMPORTE_NETO_VENTAIsNull(const aValue: Boolean);
 begin
-  DataTable.Fields[idx_InfVentasArticuloIMPORTE_PORTE_VENTA].AsFloat := aValue;
+  if aValue then
+    DataTable.Fields[idx_InfVentasArticuloIMPORTE_NETO_VENTA].AsVariant := Null;
+end;
+
+function TInfVentasArticuloDataTableRules.GetIMPORTE_PORTE_VENTAValue: Currency;
+begin
+  result := DataTable.Fields[idx_InfVentasArticuloIMPORTE_PORTE_VENTA].AsCurrency;
+end;
+
+procedure TInfVentasArticuloDataTableRules.SetIMPORTE_PORTE_VENTAValue(const aValue: Currency);
+begin
+  DataTable.Fields[idx_InfVentasArticuloIMPORTE_PORTE_VENTA].AsCurrency := aValue;
+end;
+
+function TInfVentasArticuloDataTableRules.GetIMPORTE_PORTE_VENTAIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasArticuloIMPORTE_PORTE_VENTA].IsNull;
+end;
+
+procedure TInfVentasArticuloDataTableRules.SetIMPORTE_PORTE_VENTAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasArticuloIMPORTE_PORTE_VENTA].AsVariant := Null;
 end;
 
 function TInfVentasArticuloDataTableRules.GetIMPORTE_TOTAL_VENTAValue: Currency;
@@ -615,6 +1721,17 @@ begin
   DataTable.Fields[idx_InfVentasArticuloIMPORTE_TOTAL_VENTA].AsCurrency := aValue;
 end;
 
+function TInfVentasArticuloDataTableRules.GetIMPORTE_TOTAL_VENTAIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasArticuloIMPORTE_TOTAL_VENTA].IsNull;
+end;
+
+procedure TInfVentasArticuloDataTableRules.SetIMPORTE_TOTAL_VENTAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasArticuloIMPORTE_TOTAL_VENTA].AsVariant := Null;
+end;
+
 function TInfVentasArticuloDataTableRules.GetNIF_CIF_PROVEEDORValue: String;
 begin
   result := DataTable.Fields[idx_InfVentasArticuloNIF_CIF_PROVEEDOR].AsString;
@@ -625,6 +1742,17 @@ begin
   DataTable.Fields[idx_InfVentasArticuloNIF_CIF_PROVEEDOR].AsString := aValue;
 end;
 
+function TInfVentasArticuloDataTableRules.GetNIF_CIF_PROVEEDORIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasArticuloNIF_CIF_PROVEEDOR].IsNull;
+end;
+
+procedure TInfVentasArticuloDataTableRules.SetNIF_CIF_PROVEEDORIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasArticuloNIF_CIF_PROVEEDOR].AsVariant := Null;
+end;
+
 function TInfVentasArticuloDataTableRules.GetNOMBRE_PROVEEDORValue: String;
 begin
   result := DataTable.Fields[idx_InfVentasArticuloNOMBRE_PROVEEDOR].AsString;
@@ -635,6 +1763,17 @@ begin
   DataTable.Fields[idx_InfVentasArticuloNOMBRE_PROVEEDOR].AsString := aValue;
 end;
 
+function TInfVentasArticuloDataTableRules.GetNOMBRE_PROVEEDORIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasArticuloNOMBRE_PROVEEDOR].IsNull;
+end;
+
+procedure TInfVentasArticuloDataTableRules.SetNOMBRE_PROVEEDORIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasArticuloNOMBRE_PROVEEDOR].AsVariant := Null;
+end;
+
 function TInfVentasArticuloDataTableRules.GetCALLE_PROVEEDORValue: String;
 begin
   result := DataTable.Fields[idx_InfVentasArticuloCALLE_PROVEEDOR].AsString;
@@ -645,6 +1784,17 @@ begin
   DataTable.Fields[idx_InfVentasArticuloCALLE_PROVEEDOR].AsString := aValue;
 end;
 
+function TInfVentasArticuloDataTableRules.GetCALLE_PROVEEDORIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasArticuloCALLE_PROVEEDOR].IsNull;
+end;
+
+procedure TInfVentasArticuloDataTableRules.SetCALLE_PROVEEDORIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasArticuloCALLE_PROVEEDOR].AsVariant := Null;
+end;
+
 function TInfVentasArticuloDataTableRules.GetPOBLACION_PROVEEDORValue: String;
 begin
   result := DataTable.Fields[idx_InfVentasArticuloPOBLACION_PROVEEDOR].AsString;
@@ -655,6 +1805,17 @@ begin
   DataTable.Fields[idx_InfVentasArticuloPOBLACION_PROVEEDOR].AsString := aValue;
 end;
 
+function TInfVentasArticuloDataTableRules.GetPOBLACION_PROVEEDORIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasArticuloPOBLACION_PROVEEDOR].IsNull;
+end;
+
+procedure TInfVentasArticuloDataTableRules.SetPOBLACION_PROVEEDORIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasArticuloPOBLACION_PROVEEDOR].AsVariant := Null;
+end;
+
 function TInfVentasArticuloDataTableRules.GetPROVINCIA_PROVEEDORValue: String;
 begin
   result := DataTable.Fields[idx_InfVentasArticuloPROVINCIA_PROVEEDOR].AsString;
@@ -665,6 +1826,17 @@ begin
   DataTable.Fields[idx_InfVentasArticuloPROVINCIA_PROVEEDOR].AsString := aValue;
 end;
 
+function TInfVentasArticuloDataTableRules.GetPROVINCIA_PROVEEDORIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasArticuloPROVINCIA_PROVEEDOR].IsNull;
+end;
+
+procedure TInfVentasArticuloDataTableRules.SetPROVINCIA_PROVEEDORIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasArticuloPROVINCIA_PROVEEDOR].AsVariant := Null;
+end;
+
 function TInfVentasArticuloDataTableRules.GetNIF_CIF_CLIENTEValue: String;
 begin
   result := DataTable.Fields[idx_InfVentasArticuloNIF_CIF_CLIENTE].AsString;
@@ -675,6 +1847,17 @@ begin
   DataTable.Fields[idx_InfVentasArticuloNIF_CIF_CLIENTE].AsString := aValue;
 end;
 
+function TInfVentasArticuloDataTableRules.GetNIF_CIF_CLIENTEIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasArticuloNIF_CIF_CLIENTE].IsNull;
+end;
+
+procedure TInfVentasArticuloDataTableRules.SetNIF_CIF_CLIENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasArticuloNIF_CIF_CLIENTE].AsVariant := Null;
+end;
+
 function TInfVentasArticuloDataTableRules.GetNOMBRE_CLIENTEValue: String;
 begin
   result := DataTable.Fields[idx_InfVentasArticuloNOMBRE_CLIENTE].AsString;
@@ -685,6 +1868,17 @@ begin
   DataTable.Fields[idx_InfVentasArticuloNOMBRE_CLIENTE].AsString := aValue;
 end;
 
+function TInfVentasArticuloDataTableRules.GetNOMBRE_CLIENTEIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasArticuloNOMBRE_CLIENTE].IsNull;
+end;
+
+procedure TInfVentasArticuloDataTableRules.SetNOMBRE_CLIENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasArticuloNOMBRE_CLIENTE].AsVariant := Null;
+end;
+
 function TInfVentasArticuloDataTableRules.GetNOMBRE_COMERCIAL_CLIENTEValue: String;
 begin
   result := DataTable.Fields[idx_InfVentasArticuloNOMBRE_COMERCIAL_CLIENTE].AsString;
@@ -695,6 +1889,17 @@ begin
   DataTable.Fields[idx_InfVentasArticuloNOMBRE_COMERCIAL_CLIENTE].AsString := aValue;
 end;
 
+function TInfVentasArticuloDataTableRules.GetNOMBRE_COMERCIAL_CLIENTEIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasArticuloNOMBRE_COMERCIAL_CLIENTE].IsNull;
+end;
+
+procedure TInfVentasArticuloDataTableRules.SetNOMBRE_COMERCIAL_CLIENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasArticuloNOMBRE_COMERCIAL_CLIENTE].AsVariant := Null;
+end;
+
 function TInfVentasArticuloDataTableRules.GetCALLE_CLIENTEValue: String;
 begin
   result := DataTable.Fields[idx_InfVentasArticuloCALLE_CLIENTE].AsString;
@@ -705,6 +1910,17 @@ begin
   DataTable.Fields[idx_InfVentasArticuloCALLE_CLIENTE].AsString := aValue;
 end;
 
+function TInfVentasArticuloDataTableRules.GetCALLE_CLIENTEIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasArticuloCALLE_CLIENTE].IsNull;
+end;
+
+procedure TInfVentasArticuloDataTableRules.SetCALLE_CLIENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasArticuloCALLE_CLIENTE].AsVariant := Null;
+end;
+
 function TInfVentasArticuloDataTableRules.GetPOBLACION_CLIENTEValue: String;
 begin
   result := DataTable.Fields[idx_InfVentasArticuloPOBLACION_CLIENTE].AsString;
@@ -715,6 +1931,17 @@ begin
   DataTable.Fields[idx_InfVentasArticuloPOBLACION_CLIENTE].AsString := aValue;
 end;
 
+function TInfVentasArticuloDataTableRules.GetPOBLACION_CLIENTEIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasArticuloPOBLACION_CLIENTE].IsNull;
+end;
+
+procedure TInfVentasArticuloDataTableRules.SetPOBLACION_CLIENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasArticuloPOBLACION_CLIENTE].AsVariant := Null;
+end;
+
 function TInfVentasArticuloDataTableRules.GetPROVINCIA_CLIENTEValue: String;
 begin
   result := DataTable.Fields[idx_InfVentasArticuloPROVINCIA_CLIENTE].AsString;
@@ -725,6 +1952,17 @@ begin
   DataTable.Fields[idx_InfVentasArticuloPROVINCIA_CLIENTE].AsString := aValue;
 end;
 
+function TInfVentasArticuloDataTableRules.GetPROVINCIA_CLIENTEIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasArticuloPROVINCIA_CLIENTE].IsNull;
+end;
+
+procedure TInfVentasArticuloDataTableRules.SetPROVINCIA_CLIENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasArticuloPROVINCIA_CLIENTE].AsVariant := Null;
+end;
+
 function TInfVentasArticuloDataTableRules.GetNIF_CIF_AGENTEValue: String;
 begin
   result := DataTable.Fields[idx_InfVentasArticuloNIF_CIF_AGENTE].AsString;
@@ -735,6 +1973,17 @@ begin
   DataTable.Fields[idx_InfVentasArticuloNIF_CIF_AGENTE].AsString := aValue;
 end;
 
+function TInfVentasArticuloDataTableRules.GetNIF_CIF_AGENTEIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasArticuloNIF_CIF_AGENTE].IsNull;
+end;
+
+procedure TInfVentasArticuloDataTableRules.SetNIF_CIF_AGENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasArticuloNIF_CIF_AGENTE].AsVariant := Null;
+end;
+
 function TInfVentasArticuloDataTableRules.GetNOMBRE_AGENTEValue: String;
 begin
   result := DataTable.Fields[idx_InfVentasArticuloNOMBRE_AGENTE].AsString;
@@ -745,6 +1994,17 @@ begin
   DataTable.Fields[idx_InfVentasArticuloNOMBRE_AGENTE].AsString := aValue;
 end;
 
+function TInfVentasArticuloDataTableRules.GetNOMBRE_AGENTEIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasArticuloNOMBRE_AGENTE].IsNull;
+end;
+
+procedure TInfVentasArticuloDataTableRules.SetNOMBRE_AGENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasArticuloNOMBRE_AGENTE].AsVariant := Null;
+end;
+
 function TInfVentasArticuloDataTableRules.GetCALLE_AGENTEValue: String;
 begin
   result := DataTable.Fields[idx_InfVentasArticuloCALLE_AGENTE].AsString;
@@ -755,6 +2015,17 @@ begin
   DataTable.Fields[idx_InfVentasArticuloCALLE_AGENTE].AsString := aValue;
 end;
 
+function TInfVentasArticuloDataTableRules.GetCALLE_AGENTEIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasArticuloCALLE_AGENTE].IsNull;
+end;
+
+procedure TInfVentasArticuloDataTableRules.SetCALLE_AGENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasArticuloCALLE_AGENTE].AsVariant := Null;
+end;
+
 function TInfVentasArticuloDataTableRules.GetPOBLACION_AGENTEValue: String;
 begin
   result := DataTable.Fields[idx_InfVentasArticuloPOBLACION_AGENTE].AsString;
@@ -765,6 +2036,17 @@ begin
   DataTable.Fields[idx_InfVentasArticuloPOBLACION_AGENTE].AsString := aValue;
 end;
 
+function TInfVentasArticuloDataTableRules.GetPOBLACION_AGENTEIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasArticuloPOBLACION_AGENTE].IsNull;
+end;
+
+procedure TInfVentasArticuloDataTableRules.SetPOBLACION_AGENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasArticuloPOBLACION_AGENTE].AsVariant := Null;
+end;
+
 function TInfVentasArticuloDataTableRules.GetPROVINCIA_AGENTEValue: String;
 begin
   result := DataTable.Fields[idx_InfVentasArticuloPROVINCIA_AGENTE].AsString;
@@ -775,6 +2057,17 @@ begin
   DataTable.Fields[idx_InfVentasArticuloPROVINCIA_AGENTE].AsString := aValue;
 end;
 
+function TInfVentasArticuloDataTableRules.GetPROVINCIA_AGENTEIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasArticuloPROVINCIA_AGENTE].IsNull;
+end;
+
+procedure TInfVentasArticuloDataTableRules.SetPROVINCIA_AGENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasArticuloPROVINCIA_AGENTE].AsVariant := Null;
+end;
+
 function TInfVentasArticuloDataTableRules.GetCOMISION_AGENTEValue: Float;
 begin
   result := DataTable.Fields[idx_InfVentasArticuloCOMISION_AGENTE].AsFloat;
@@ -785,18 +2078,906 @@ begin
   DataTable.Fields[idx_InfVentasArticuloCOMISION_AGENTE].AsFloat := aValue;
 end;
 
-function TInfVentasArticuloDataTableRules.GetIMPORTE_COMISION_AGENTEValue: Currency;
+function TInfVentasArticuloDataTableRules.GetCOMISION_AGENTEIsNull: boolean;
 begin
-  result := DataTable.Fields[idx_InfVentasArticuloIMPORTE_COMISION_AGENTE].AsCurrency;
+  result := DataTable.Fields[idx_InfVentasArticuloCOMISION_AGENTE].IsNull;
 end;
 
-procedure TInfVentasArticuloDataTableRules.SetIMPORTE_COMISION_AGENTEValue(const aValue: Currency);
+procedure TInfVentasArticuloDataTableRules.SetCOMISION_AGENTEIsNull(const aValue: Boolean);
 begin
-  DataTable.Fields[idx_InfVentasArticuloIMPORTE_COMISION_AGENTE].AsCurrency := aValue;
+  if aValue then
+    DataTable.Fields[idx_InfVentasArticuloCOMISION_AGENTE].AsVariant := Null;
+end;
+
+function TInfVentasArticuloDataTableRules.GetIMPORTE_COMISION_AGENTEValue: Float;
+begin
+  result := DataTable.Fields[idx_InfVentasArticuloIMPORTE_COMISION_AGENTE].AsFloat;
+end;
+
+procedure TInfVentasArticuloDataTableRules.SetIMPORTE_COMISION_AGENTEValue(const aValue: Float);
+begin
+  DataTable.Fields[idx_InfVentasArticuloIMPORTE_COMISION_AGENTE].AsFloat := aValue;
+end;
+
+function TInfVentasArticuloDataTableRules.GetIMPORTE_COMISION_AGENTEIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasArticuloIMPORTE_COMISION_AGENTE].IsNull;
+end;
+
+procedure TInfVentasArticuloDataTableRules.SetIMPORTE_COMISION_AGENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasArticuloIMPORTE_COMISION_AGENTE].AsVariant := Null;
+end;
+
+
+{ TTablaVaciaDataTableRules }
+constructor TTablaVaciaDataTableRules.Create(aDataTable: TDADataTable);
+begin
+  inherited;
+end;
+
+destructor TTablaVaciaDataTableRules.Destroy;
+begin
+  inherited;
+end;
+
+
+{ TInfVentasAlbArticuloDataTableRules }
+constructor TInfVentasAlbArticuloDataTableRules.Create(aDataTable: TDADataTable);
+begin
+  inherited;
+end;
+
+destructor TInfVentasAlbArticuloDataTableRules.Destroy;
+begin
+  inherited;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetID_ALBARANValue: Integer;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloID_ALBARAN].AsInteger;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetID_ALBARANValue(const aValue: Integer);
+begin
+  DataTable.Fields[idx_InfVentasAlbArticuloID_ALBARAN].AsInteger := aValue;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetID_ALBARANIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloID_ALBARAN].IsNull;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetID_ALBARANIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasAlbArticuloID_ALBARAN].AsVariant := Null;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetID_EMPRESAValue: Integer;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloID_EMPRESA].AsInteger;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetID_EMPRESAValue(const aValue: Integer);
+begin
+  DataTable.Fields[idx_InfVentasAlbArticuloID_EMPRESA].AsInteger := aValue;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetID_EMPRESAIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloID_EMPRESA].IsNull;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetID_EMPRESAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasAlbArticuloID_EMPRESA].AsVariant := Null;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetREFERENCIA_ALBARANValue: String;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloREFERENCIA_ALBARAN].AsString;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetREFERENCIA_ALBARANValue(const aValue: String);
+begin
+  DataTable.Fields[idx_InfVentasAlbArticuloREFERENCIA_ALBARAN].AsString := aValue;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetREFERENCIA_ALBARANIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloREFERENCIA_ALBARAN].IsNull;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetREFERENCIA_ALBARANIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasAlbArticuloREFERENCIA_ALBARAN].AsVariant := Null;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetFECHA_ALBARANValue: DateTime;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloFECHA_ALBARAN].AsDateTime;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetFECHA_ALBARANValue(const aValue: DateTime);
+begin
+  DataTable.Fields[idx_InfVentasAlbArticuloFECHA_ALBARAN].AsDateTime := aValue;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetFECHA_ALBARANIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloFECHA_ALBARAN].IsNull;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetFECHA_ALBARANIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasAlbArticuloFECHA_ALBARAN].AsVariant := Null;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetIMPORTE_TOTAL_ALBARANValue: Currency;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloIMPORTE_TOTAL_ALBARAN].AsCurrency;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetIMPORTE_TOTAL_ALBARANValue(const aValue: Currency);
+begin
+  DataTable.Fields[idx_InfVentasAlbArticuloIMPORTE_TOTAL_ALBARAN].AsCurrency := aValue;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetIMPORTE_TOTAL_ALBARANIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloIMPORTE_TOTAL_ALBARAN].IsNull;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetIMPORTE_TOTAL_ALBARANIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasAlbArticuloIMPORTE_TOTAL_ALBARAN].AsVariant := Null;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetID_ARTICULOValue: Integer;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloID_ARTICULO].AsInteger;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetID_ARTICULOValue(const aValue: Integer);
+begin
+  DataTable.Fields[idx_InfVentasAlbArticuloID_ARTICULO].AsInteger := aValue;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetID_ARTICULOIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloID_ARTICULO].IsNull;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetID_ARTICULOIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasAlbArticuloID_ARTICULO].AsVariant := Null;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetFAMILIAValue: String;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloFAMILIA].AsString;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetFAMILIAValue(const aValue: String);
+begin
+  DataTable.Fields[idx_InfVentasAlbArticuloFAMILIA].AsString := aValue;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetFAMILIAIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloFAMILIA].IsNull;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetFAMILIAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasAlbArticuloFAMILIA].AsVariant := Null;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetREFERENCIAValue: String;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloREFERENCIA].AsString;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetREFERENCIAValue(const aValue: String);
+begin
+  DataTable.Fields[idx_InfVentasAlbArticuloREFERENCIA].AsString := aValue;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetREFERENCIAIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloREFERENCIA].IsNull;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetREFERENCIAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasAlbArticuloREFERENCIA].AsVariant := Null;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetREFERENCIA_PROVValue: String;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloREFERENCIA_PROV].AsString;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetREFERENCIA_PROVValue(const aValue: String);
+begin
+  DataTable.Fields[idx_InfVentasAlbArticuloREFERENCIA_PROV].AsString := aValue;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetREFERENCIA_PROVIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloREFERENCIA_PROV].IsNull;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetREFERENCIA_PROVIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasAlbArticuloREFERENCIA_PROV].AsVariant := Null;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetDESCRIPCIONValue: String;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloDESCRIPCION].AsString;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetDESCRIPCIONValue(const aValue: String);
+begin
+  DataTable.Fields[idx_InfVentasAlbArticuloDESCRIPCION].AsString := aValue;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetDESCRIPCIONIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloDESCRIPCION].IsNull;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetDESCRIPCIONIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasAlbArticuloDESCRIPCION].AsVariant := Null;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetCOMISIONABLEValue: SmallInt;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloCOMISIONABLE].AsSmallInt;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetCOMISIONABLEValue(const aValue: SmallInt);
+begin
+  DataTable.Fields[idx_InfVentasAlbArticuloCOMISIONABLE].AsSmallInt := aValue;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetCOMISIONABLEIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloCOMISIONABLE].IsNull;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetCOMISIONABLEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasAlbArticuloCOMISIONABLE].AsVariant := Null;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetINVENTARIABLEValue: SmallInt;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloINVENTARIABLE].AsSmallInt;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetINVENTARIABLEValue(const aValue: SmallInt);
+begin
+  DataTable.Fields[idx_InfVentasAlbArticuloINVENTARIABLE].AsSmallInt := aValue;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetINVENTARIABLEIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloINVENTARIABLE].IsNull;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetINVENTARIABLEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasAlbArticuloINVENTARIABLE].AsVariant := Null;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetIMPORTE_UNIDAD_COSTEValue: Currency;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloIMPORTE_UNIDAD_COSTE].AsCurrency;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetIMPORTE_UNIDAD_COSTEValue(const aValue: Currency);
+begin
+  DataTable.Fields[idx_InfVentasAlbArticuloIMPORTE_UNIDAD_COSTE].AsCurrency := aValue;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetIMPORTE_UNIDAD_COSTEIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloIMPORTE_UNIDAD_COSTE].IsNull;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetIMPORTE_UNIDAD_COSTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasAlbArticuloIMPORTE_UNIDAD_COSTE].AsVariant := Null;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetDESCUENTO_PROVEEDOR_COSTEValue: Float;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloDESCUENTO_PROVEEDOR_COSTE].AsFloat;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetDESCUENTO_PROVEEDOR_COSTEValue(const aValue: Float);
+begin
+  DataTable.Fields[idx_InfVentasAlbArticuloDESCUENTO_PROVEEDOR_COSTE].AsFloat := aValue;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetDESCUENTO_PROVEEDOR_COSTEIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloDESCUENTO_PROVEEDOR_COSTE].IsNull;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetDESCUENTO_PROVEEDOR_COSTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasAlbArticuloDESCUENTO_PROVEEDOR_COSTE].AsVariant := Null;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetIMPORTE_NETO_COSTEValue: Currency;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloIMPORTE_NETO_COSTE].AsCurrency;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetIMPORTE_NETO_COSTEValue(const aValue: Currency);
+begin
+  DataTable.Fields[idx_InfVentasAlbArticuloIMPORTE_NETO_COSTE].AsCurrency := aValue;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetIMPORTE_NETO_COSTEIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloIMPORTE_NETO_COSTE].IsNull;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetIMPORTE_NETO_COSTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasAlbArticuloIMPORTE_NETO_COSTE].AsVariant := Null;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetIMPORTE_PORTE_COSTEValue: Currency;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloIMPORTE_PORTE_COSTE].AsCurrency;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetIMPORTE_PORTE_COSTEValue(const aValue: Currency);
+begin
+  DataTable.Fields[idx_InfVentasAlbArticuloIMPORTE_PORTE_COSTE].AsCurrency := aValue;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetIMPORTE_PORTE_COSTEIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloIMPORTE_PORTE_COSTE].IsNull;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetIMPORTE_PORTE_COSTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasAlbArticuloIMPORTE_PORTE_COSTE].AsVariant := Null;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetCANTIDADValue: Currency;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloCANTIDAD].AsCurrency;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetCANTIDADValue(const aValue: Currency);
+begin
+  DataTable.Fields[idx_InfVentasAlbArticuloCANTIDAD].AsCurrency := aValue;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetCANTIDADIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloCANTIDAD].IsNull;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetCANTIDADIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasAlbArticuloCANTIDAD].AsVariant := Null;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetIMPORTE_UNIDAD_VENTAValue: Currency;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloIMPORTE_UNIDAD_VENTA].AsCurrency;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetIMPORTE_UNIDAD_VENTAValue(const aValue: Currency);
+begin
+  DataTable.Fields[idx_InfVentasAlbArticuloIMPORTE_UNIDAD_VENTA].AsCurrency := aValue;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetIMPORTE_UNIDAD_VENTAIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloIMPORTE_UNIDAD_VENTA].IsNull;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetIMPORTE_UNIDAD_VENTAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasAlbArticuloIMPORTE_UNIDAD_VENTA].AsVariant := Null;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetDESCUENTO_CLIENTE_VENTAValue: Float;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloDESCUENTO_CLIENTE_VENTA].AsFloat;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetDESCUENTO_CLIENTE_VENTAValue(const aValue: Float);
+begin
+  DataTable.Fields[idx_InfVentasAlbArticuloDESCUENTO_CLIENTE_VENTA].AsFloat := aValue;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetDESCUENTO_CLIENTE_VENTAIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloDESCUENTO_CLIENTE_VENTA].IsNull;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetDESCUENTO_CLIENTE_VENTAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasAlbArticuloDESCUENTO_CLIENTE_VENTA].AsVariant := Null;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetIMPORTE_NETO_VENTAValue: Float;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloIMPORTE_NETO_VENTA].AsFloat;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetIMPORTE_NETO_VENTAValue(const aValue: Float);
+begin
+  DataTable.Fields[idx_InfVentasAlbArticuloIMPORTE_NETO_VENTA].AsFloat := aValue;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetIMPORTE_NETO_VENTAIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloIMPORTE_NETO_VENTA].IsNull;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetIMPORTE_NETO_VENTAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasAlbArticuloIMPORTE_NETO_VENTA].AsVariant := Null;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetIMPORTE_PORTE_VENTAValue: Currency;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloIMPORTE_PORTE_VENTA].AsCurrency;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetIMPORTE_PORTE_VENTAValue(const aValue: Currency);
+begin
+  DataTable.Fields[idx_InfVentasAlbArticuloIMPORTE_PORTE_VENTA].AsCurrency := aValue;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetIMPORTE_PORTE_VENTAIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloIMPORTE_PORTE_VENTA].IsNull;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetIMPORTE_PORTE_VENTAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasAlbArticuloIMPORTE_PORTE_VENTA].AsVariant := Null;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetIMPORTE_TOTAL_VENTAValue: Currency;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloIMPORTE_TOTAL_VENTA].AsCurrency;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetIMPORTE_TOTAL_VENTAValue(const aValue: Currency);
+begin
+  DataTable.Fields[idx_InfVentasAlbArticuloIMPORTE_TOTAL_VENTA].AsCurrency := aValue;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetIMPORTE_TOTAL_VENTAIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloIMPORTE_TOTAL_VENTA].IsNull;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetIMPORTE_TOTAL_VENTAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasAlbArticuloIMPORTE_TOTAL_VENTA].AsVariant := Null;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetNIF_CIF_PROVEEDORValue: String;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloNIF_CIF_PROVEEDOR].AsString;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetNIF_CIF_PROVEEDORValue(const aValue: String);
+begin
+  DataTable.Fields[idx_InfVentasAlbArticuloNIF_CIF_PROVEEDOR].AsString := aValue;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetNIF_CIF_PROVEEDORIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloNIF_CIF_PROVEEDOR].IsNull;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetNIF_CIF_PROVEEDORIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasAlbArticuloNIF_CIF_PROVEEDOR].AsVariant := Null;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetNOMBRE_PROVEEDORValue: String;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloNOMBRE_PROVEEDOR].AsString;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetNOMBRE_PROVEEDORValue(const aValue: String);
+begin
+  DataTable.Fields[idx_InfVentasAlbArticuloNOMBRE_PROVEEDOR].AsString := aValue;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetNOMBRE_PROVEEDORIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloNOMBRE_PROVEEDOR].IsNull;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetNOMBRE_PROVEEDORIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasAlbArticuloNOMBRE_PROVEEDOR].AsVariant := Null;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetCALLE_PROVEEDORValue: String;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloCALLE_PROVEEDOR].AsString;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetCALLE_PROVEEDORValue(const aValue: String);
+begin
+  DataTable.Fields[idx_InfVentasAlbArticuloCALLE_PROVEEDOR].AsString := aValue;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetCALLE_PROVEEDORIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloCALLE_PROVEEDOR].IsNull;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetCALLE_PROVEEDORIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasAlbArticuloCALLE_PROVEEDOR].AsVariant := Null;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetPOBLACION_PROVEEDORValue: String;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloPOBLACION_PROVEEDOR].AsString;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetPOBLACION_PROVEEDORValue(const aValue: String);
+begin
+  DataTable.Fields[idx_InfVentasAlbArticuloPOBLACION_PROVEEDOR].AsString := aValue;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetPOBLACION_PROVEEDORIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloPOBLACION_PROVEEDOR].IsNull;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetPOBLACION_PROVEEDORIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasAlbArticuloPOBLACION_PROVEEDOR].AsVariant := Null;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetPROVINCIA_PROVEEDORValue: String;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloPROVINCIA_PROVEEDOR].AsString;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetPROVINCIA_PROVEEDORValue(const aValue: String);
+begin
+  DataTable.Fields[idx_InfVentasAlbArticuloPROVINCIA_PROVEEDOR].AsString := aValue;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetPROVINCIA_PROVEEDORIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloPROVINCIA_PROVEEDOR].IsNull;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetPROVINCIA_PROVEEDORIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasAlbArticuloPROVINCIA_PROVEEDOR].AsVariant := Null;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetNIF_CIF_CLIENTEValue: String;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloNIF_CIF_CLIENTE].AsString;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetNIF_CIF_CLIENTEValue(const aValue: String);
+begin
+  DataTable.Fields[idx_InfVentasAlbArticuloNIF_CIF_CLIENTE].AsString := aValue;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetNIF_CIF_CLIENTEIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloNIF_CIF_CLIENTE].IsNull;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetNIF_CIF_CLIENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasAlbArticuloNIF_CIF_CLIENTE].AsVariant := Null;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetNOMBRE_CLIENTEValue: String;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloNOMBRE_CLIENTE].AsString;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetNOMBRE_CLIENTEValue(const aValue: String);
+begin
+  DataTable.Fields[idx_InfVentasAlbArticuloNOMBRE_CLIENTE].AsString := aValue;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetNOMBRE_CLIENTEIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloNOMBRE_CLIENTE].IsNull;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetNOMBRE_CLIENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasAlbArticuloNOMBRE_CLIENTE].AsVariant := Null;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetNOMBRE_COMERCIAL_CLIENTEValue: String;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloNOMBRE_COMERCIAL_CLIENTE].AsString;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetNOMBRE_COMERCIAL_CLIENTEValue(const aValue: String);
+begin
+  DataTable.Fields[idx_InfVentasAlbArticuloNOMBRE_COMERCIAL_CLIENTE].AsString := aValue;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetNOMBRE_COMERCIAL_CLIENTEIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloNOMBRE_COMERCIAL_CLIENTE].IsNull;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetNOMBRE_COMERCIAL_CLIENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasAlbArticuloNOMBRE_COMERCIAL_CLIENTE].AsVariant := Null;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetCALLE_CLIENTEValue: String;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloCALLE_CLIENTE].AsString;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetCALLE_CLIENTEValue(const aValue: String);
+begin
+  DataTable.Fields[idx_InfVentasAlbArticuloCALLE_CLIENTE].AsString := aValue;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetCALLE_CLIENTEIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloCALLE_CLIENTE].IsNull;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetCALLE_CLIENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasAlbArticuloCALLE_CLIENTE].AsVariant := Null;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetPOBLACION_CLIENTEValue: String;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloPOBLACION_CLIENTE].AsString;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetPOBLACION_CLIENTEValue(const aValue: String);
+begin
+  DataTable.Fields[idx_InfVentasAlbArticuloPOBLACION_CLIENTE].AsString := aValue;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetPOBLACION_CLIENTEIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloPOBLACION_CLIENTE].IsNull;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetPOBLACION_CLIENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasAlbArticuloPOBLACION_CLIENTE].AsVariant := Null;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetPROVINCIA_CLIENTEValue: String;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloPROVINCIA_CLIENTE].AsString;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetPROVINCIA_CLIENTEValue(const aValue: String);
+begin
+  DataTable.Fields[idx_InfVentasAlbArticuloPROVINCIA_CLIENTE].AsString := aValue;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetPROVINCIA_CLIENTEIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloPROVINCIA_CLIENTE].IsNull;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetPROVINCIA_CLIENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasAlbArticuloPROVINCIA_CLIENTE].AsVariant := Null;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetNIF_CIF_AGENTEValue: String;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloNIF_CIF_AGENTE].AsString;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetNIF_CIF_AGENTEValue(const aValue: String);
+begin
+  DataTable.Fields[idx_InfVentasAlbArticuloNIF_CIF_AGENTE].AsString := aValue;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetNIF_CIF_AGENTEIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloNIF_CIF_AGENTE].IsNull;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetNIF_CIF_AGENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasAlbArticuloNIF_CIF_AGENTE].AsVariant := Null;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetNOMBRE_AGENTEValue: String;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloNOMBRE_AGENTE].AsString;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetNOMBRE_AGENTEValue(const aValue: String);
+begin
+  DataTable.Fields[idx_InfVentasAlbArticuloNOMBRE_AGENTE].AsString := aValue;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetNOMBRE_AGENTEIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloNOMBRE_AGENTE].IsNull;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetNOMBRE_AGENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasAlbArticuloNOMBRE_AGENTE].AsVariant := Null;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetCALLE_AGENTEValue: String;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloCALLE_AGENTE].AsString;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetCALLE_AGENTEValue(const aValue: String);
+begin
+  DataTable.Fields[idx_InfVentasAlbArticuloCALLE_AGENTE].AsString := aValue;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetCALLE_AGENTEIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloCALLE_AGENTE].IsNull;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetCALLE_AGENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasAlbArticuloCALLE_AGENTE].AsVariant := Null;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetPOBLACION_AGENTEValue: String;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloPOBLACION_AGENTE].AsString;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetPOBLACION_AGENTEValue(const aValue: String);
+begin
+  DataTable.Fields[idx_InfVentasAlbArticuloPOBLACION_AGENTE].AsString := aValue;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetPOBLACION_AGENTEIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloPOBLACION_AGENTE].IsNull;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetPOBLACION_AGENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasAlbArticuloPOBLACION_AGENTE].AsVariant := Null;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetPROVINCIA_AGENTEValue: String;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloPROVINCIA_AGENTE].AsString;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetPROVINCIA_AGENTEValue(const aValue: String);
+begin
+  DataTable.Fields[idx_InfVentasAlbArticuloPROVINCIA_AGENTE].AsString := aValue;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetPROVINCIA_AGENTEIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloPROVINCIA_AGENTE].IsNull;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetPROVINCIA_AGENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasAlbArticuloPROVINCIA_AGENTE].AsVariant := Null;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetCOMISION_AGENTEValue: Float;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloCOMISION_AGENTE].AsFloat;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetCOMISION_AGENTEValue(const aValue: Float);
+begin
+  DataTable.Fields[idx_InfVentasAlbArticuloCOMISION_AGENTE].AsFloat := aValue;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetCOMISION_AGENTEIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloCOMISION_AGENTE].IsNull;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetCOMISION_AGENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasAlbArticuloCOMISION_AGENTE].AsVariant := Null;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetIMPORTE_COMISION_AGENTEValue: Float;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloIMPORTE_COMISION_AGENTE].AsFloat;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetIMPORTE_COMISION_AGENTEValue(const aValue: Float);
+begin
+  DataTable.Fields[idx_InfVentasAlbArticuloIMPORTE_COMISION_AGENTE].AsFloat := aValue;
+end;
+
+function TInfVentasAlbArticuloDataTableRules.GetIMPORTE_COMISION_AGENTEIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_InfVentasAlbArticuloIMPORTE_COMISION_AGENTE].IsNull;
+end;
+
+procedure TInfVentasAlbArticuloDataTableRules.SetIMPORTE_COMISION_AGENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_InfVentasAlbArticuloIMPORTE_COMISION_AGENTE].AsVariant := Null;
 end;
 
 
 initialization
   RegisterDataTableRules(RID_InfVentasArticulo, TInfVentasArticuloDataTableRules);
+  RegisterDataTableRules(RID_TablaVacia, TTablaVaciaDataTableRules);
+  RegisterDataTableRules(RID_InfVentasAlbArticulo, TInfVentasAlbArticuloDataTableRules);
 
 end.
diff --git a/Source/Modulos/Informe ventas por articulo/Model/schInfVentasArticuloServer_Intf.pas b/Source/Modulos/Informe ventas por articulo/Model/schInfVentasArticuloServer_Intf.pas
index 6f0555d..895dfdc 100644
--- a/Source/Modulos/Informe ventas por articulo/Model/schInfVentasArticuloServer_Intf.pas	
+++ b/Source/Modulos/Informe ventas por articulo/Model/schInfVentasArticuloServer_Intf.pas	
@@ -3,18 +3,20 @@ unit schInfVentasArticuloServer_Intf;
 interface
 
 uses
-  Classes, DB, SysUtils, uROClasses, uDADataTable, uDABusinessProcessor, schInfVentasArticuloClient_Intf;
+  Classes, DB, SysUtils, uROClasses, uDADataTable, uDABusinessProcessor, FmtBCD, uROXMLIntf, schInfVentasArticuloClient_Intf;
 
 const
   { Delta rules ids 
        Feel free to change them to something more human readable
        but make sure they are unique in the context of your application }
-  RID_InfVentasArticuloDelta = '{6635FE65-F0F8-4CD2-B59F-7D652D70ED1A}';
+  RID_InfVentasArticuloDelta = '{3F5E554C-CDAD-4F0C-B179-FEA811CB32B9}';
+  RID_TablaVaciaDelta = '{28BB0A71-A847-4434-8B08-BD59D8251C55}';
+  RID_InfVentasAlbArticuloDelta = '{FAD814C2-7B05-4C19-BECF-CED46F0CF599}';
 
 type
   { IInfVentasArticuloDelta }
   IInfVentasArticuloDelta = interface(IInfVentasArticulo)
-  ['{6635FE65-F0F8-4CD2-B59F-7D652D70ED1A}']
+  ['{3F5E554C-CDAD-4F0C-B179-FEA811CB32B9}']
     { Property getters and setters }
     function GetOldID_FACTURAValue : Integer;
     function GetOldID_EMPRESAValue : Integer;
@@ -27,17 +29,17 @@ type
     function GetOldREFERENCIAValue : String;
     function GetOldREFERENCIA_PROVValue : String;
     function GetOldDESCRIPCIONValue : String;
-    function GetOldCOMISIONABLEValue : Integer;
-    function GetOldINVENTARIABLEValue : Integer;
+    function GetOldCOMISIONABLEValue : SmallInt;
+    function GetOldINVENTARIABLEValue : SmallInt;
     function GetOldIMPORTE_UNIDAD_COSTEValue : Currency;
     function GetOldDESCUENTO_PROVEEDOR_COSTEValue : Float;
     function GetOldIMPORTE_NETO_COSTEValue : Currency;
     function GetOldIMPORTE_PORTE_COSTEValue : Currency;
-    function GetOldCANTIDADValue : Integer;
+    function GetOldCANTIDADValue : Currency;
     function GetOldIMPORTE_UNIDAD_VENTAValue : Currency;
     function GetOldDESCUENTO_CLIENTE_VENTAValue : Float;
     function GetOldIMPORTE_NETO_VENTAValue : Float;
-    function GetOldIMPORTE_PORTE_VENTAValue : Float;
+    function GetOldIMPORTE_PORTE_VENTAValue : Currency;
     function GetOldIMPORTE_TOTAL_VENTAValue : Currency;
     function GetOldNIF_CIF_PROVEEDORValue : String;
     function GetOldNOMBRE_PROVEEDORValue : String;
@@ -56,7 +58,7 @@ type
     function GetOldPOBLACION_AGENTEValue : String;
     function GetOldPROVINCIA_AGENTEValue : String;
     function GetOldCOMISION_AGENTEValue : Float;
-    function GetOldIMPORTE_COMISION_AGENTEValue : Currency;
+    function GetOldIMPORTE_COMISION_AGENTEValue : Float;
 
     { Properties }
     property OldID_FACTURA : Integer read GetOldID_FACTURAValue;
@@ -70,17 +72,17 @@ type
     property OldREFERENCIA : String read GetOldREFERENCIAValue;
     property OldREFERENCIA_PROV : String read GetOldREFERENCIA_PROVValue;
     property OldDESCRIPCION : String read GetOldDESCRIPCIONValue;
-    property OldCOMISIONABLE : Integer read GetOldCOMISIONABLEValue;
-    property OldINVENTARIABLE : Integer read GetOldINVENTARIABLEValue;
+    property OldCOMISIONABLE : SmallInt read GetOldCOMISIONABLEValue;
+    property OldINVENTARIABLE : SmallInt read GetOldINVENTARIABLEValue;
     property OldIMPORTE_UNIDAD_COSTE : Currency read GetOldIMPORTE_UNIDAD_COSTEValue;
     property OldDESCUENTO_PROVEEDOR_COSTE : Float read GetOldDESCUENTO_PROVEEDOR_COSTEValue;
     property OldIMPORTE_NETO_COSTE : Currency read GetOldIMPORTE_NETO_COSTEValue;
     property OldIMPORTE_PORTE_COSTE : Currency read GetOldIMPORTE_PORTE_COSTEValue;
-    property OldCANTIDAD : Integer read GetOldCANTIDADValue;
+    property OldCANTIDAD : Currency read GetOldCANTIDADValue;
     property OldIMPORTE_UNIDAD_VENTA : Currency read GetOldIMPORTE_UNIDAD_VENTAValue;
     property OldDESCUENTO_CLIENTE_VENTA : Float read GetOldDESCUENTO_CLIENTE_VENTAValue;
     property OldIMPORTE_NETO_VENTA : Float read GetOldIMPORTE_NETO_VENTAValue;
-    property OldIMPORTE_PORTE_VENTA : Float read GetOldIMPORTE_PORTE_VENTAValue;
+    property OldIMPORTE_PORTE_VENTA : Currency read GetOldIMPORTE_PORTE_VENTAValue;
     property OldIMPORTE_TOTAL_VENTA : Currency read GetOldIMPORTE_TOTAL_VENTAValue;
     property OldNIF_CIF_PROVEEDOR : String read GetOldNIF_CIF_PROVEEDORValue;
     property OldNOMBRE_PROVEEDOR : String read GetOldNOMBRE_PROVEEDORValue;
@@ -99,7 +101,7 @@ type
     property OldPOBLACION_AGENTE : String read GetOldPOBLACION_AGENTEValue;
     property OldPROVINCIA_AGENTE : String read GetOldPROVINCIA_AGENTEValue;
     property OldCOMISION_AGENTE : Float read GetOldCOMISION_AGENTEValue;
-    property OldIMPORTE_COMISION_AGENTE : Currency read GetOldIMPORTE_COMISION_AGENTEValue;
+    property OldIMPORTE_COMISION_AGENTE : Float read GetOldIMPORTE_COMISION_AGENTEValue;
   end;
 
   { TInfVentasArticuloBusinessProcessorRules }
@@ -108,212 +110,941 @@ type
   protected
     { Property getters and setters }
     function GetID_FACTURAValue: Integer; virtual;
+    function GetID_FACTURAIsNull: Boolean; virtual;
     function GetOldID_FACTURAValue: Integer; virtual;
+    function GetOldID_FACTURAIsNull: Boolean; virtual;
     procedure SetID_FACTURAValue(const aValue: Integer); virtual;
+    procedure SetID_FACTURAIsNull(const aValue: Boolean); virtual;
     function GetID_EMPRESAValue: Integer; virtual;
+    function GetID_EMPRESAIsNull: Boolean; virtual;
     function GetOldID_EMPRESAValue: Integer; virtual;
+    function GetOldID_EMPRESAIsNull: Boolean; virtual;
     procedure SetID_EMPRESAValue(const aValue: Integer); virtual;
+    procedure SetID_EMPRESAIsNull(const aValue: Boolean); virtual;
     function GetREFERENCIA_FACTURAValue: String; virtual;
+    function GetREFERENCIA_FACTURAIsNull: Boolean; virtual;
     function GetOldREFERENCIA_FACTURAValue: String; virtual;
+    function GetOldREFERENCIA_FACTURAIsNull: Boolean; virtual;
     procedure SetREFERENCIA_FACTURAValue(const aValue: String); virtual;
+    procedure SetREFERENCIA_FACTURAIsNull(const aValue: Boolean); virtual;
     function GetFECHA_FACTURAValue: DateTime; virtual;
+    function GetFECHA_FACTURAIsNull: Boolean; virtual;
     function GetOldFECHA_FACTURAValue: DateTime; virtual;
+    function GetOldFECHA_FACTURAIsNull: Boolean; virtual;
     procedure SetFECHA_FACTURAValue(const aValue: DateTime); virtual;
+    procedure SetFECHA_FACTURAIsNull(const aValue: Boolean); virtual;
     function GetIMPORTE_TOTAL_FACTURAValue: Currency; virtual;
+    function GetIMPORTE_TOTAL_FACTURAIsNull: Boolean; virtual;
     function GetOldIMPORTE_TOTAL_FACTURAValue: Currency; virtual;
+    function GetOldIMPORTE_TOTAL_FACTURAIsNull: Boolean; virtual;
     procedure SetIMPORTE_TOTAL_FACTURAValue(const aValue: Currency); virtual;
+    procedure SetIMPORTE_TOTAL_FACTURAIsNull(const aValue: Boolean); virtual;
     function GetID_COMISION_FACTURAValue: Integer; virtual;
+    function GetID_COMISION_FACTURAIsNull: Boolean; virtual;
     function GetOldID_COMISION_FACTURAValue: Integer; virtual;
+    function GetOldID_COMISION_FACTURAIsNull: Boolean; virtual;
     procedure SetID_COMISION_FACTURAValue(const aValue: Integer); virtual;
+    procedure SetID_COMISION_FACTURAIsNull(const aValue: Boolean); virtual;
     function GetID_ARTICULOValue: Integer; virtual;
+    function GetID_ARTICULOIsNull: Boolean; virtual;
     function GetOldID_ARTICULOValue: Integer; virtual;
+    function GetOldID_ARTICULOIsNull: Boolean; virtual;
     procedure SetID_ARTICULOValue(const aValue: Integer); virtual;
+    procedure SetID_ARTICULOIsNull(const aValue: Boolean); virtual;
     function GetFAMILIAValue: String; virtual;
+    function GetFAMILIAIsNull: Boolean; virtual;
     function GetOldFAMILIAValue: String; virtual;
+    function GetOldFAMILIAIsNull: Boolean; virtual;
     procedure SetFAMILIAValue(const aValue: String); virtual;
+    procedure SetFAMILIAIsNull(const aValue: Boolean); virtual;
     function GetREFERENCIAValue: String; virtual;
+    function GetREFERENCIAIsNull: Boolean; virtual;
     function GetOldREFERENCIAValue: String; virtual;
+    function GetOldREFERENCIAIsNull: Boolean; virtual;
     procedure SetREFERENCIAValue(const aValue: String); virtual;
+    procedure SetREFERENCIAIsNull(const aValue: Boolean); virtual;
     function GetREFERENCIA_PROVValue: String; virtual;
+    function GetREFERENCIA_PROVIsNull: Boolean; virtual;
     function GetOldREFERENCIA_PROVValue: String; virtual;
+    function GetOldREFERENCIA_PROVIsNull: Boolean; virtual;
     procedure SetREFERENCIA_PROVValue(const aValue: String); virtual;
+    procedure SetREFERENCIA_PROVIsNull(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;
-    function GetCOMISIONABLEValue: Integer; virtual;
-    function GetOldCOMISIONABLEValue: Integer; virtual;
-    procedure SetCOMISIONABLEValue(const aValue: Integer); virtual;
-    function GetINVENTARIABLEValue: Integer; virtual;
-    function GetOldINVENTARIABLEValue: Integer; virtual;
-    procedure SetINVENTARIABLEValue(const aValue: Integer); virtual;
+    procedure SetDESCRIPCIONIsNull(const aValue: Boolean); virtual;
+    function GetCOMISIONABLEValue: SmallInt; virtual;
+    function GetCOMISIONABLEIsNull: Boolean; virtual;
+    function GetOldCOMISIONABLEValue: SmallInt; virtual;
+    function GetOldCOMISIONABLEIsNull: Boolean; virtual;
+    procedure SetCOMISIONABLEValue(const aValue: SmallInt); virtual;
+    procedure SetCOMISIONABLEIsNull(const aValue: Boolean); virtual;
+    function GetINVENTARIABLEValue: SmallInt; virtual;
+    function GetINVENTARIABLEIsNull: Boolean; virtual;
+    function GetOldINVENTARIABLEValue: SmallInt; virtual;
+    function GetOldINVENTARIABLEIsNull: Boolean; virtual;
+    procedure SetINVENTARIABLEValue(const aValue: SmallInt); virtual;
+    procedure SetINVENTARIABLEIsNull(const aValue: Boolean); virtual;
     function GetIMPORTE_UNIDAD_COSTEValue: Currency; virtual;
+    function GetIMPORTE_UNIDAD_COSTEIsNull: Boolean; virtual;
     function GetOldIMPORTE_UNIDAD_COSTEValue: Currency; virtual;
+    function GetOldIMPORTE_UNIDAD_COSTEIsNull: Boolean; virtual;
     procedure SetIMPORTE_UNIDAD_COSTEValue(const aValue: Currency); virtual;
+    procedure SetIMPORTE_UNIDAD_COSTEIsNull(const aValue: Boolean); virtual;
     function GetDESCUENTO_PROVEEDOR_COSTEValue: Float; virtual;
+    function GetDESCUENTO_PROVEEDOR_COSTEIsNull: Boolean; virtual;
     function GetOldDESCUENTO_PROVEEDOR_COSTEValue: Float; virtual;
+    function GetOldDESCUENTO_PROVEEDOR_COSTEIsNull: Boolean; virtual;
     procedure SetDESCUENTO_PROVEEDOR_COSTEValue(const aValue: Float); virtual;
+    procedure SetDESCUENTO_PROVEEDOR_COSTEIsNull(const aValue: Boolean); virtual;
     function GetIMPORTE_NETO_COSTEValue: Currency; virtual;
+    function GetIMPORTE_NETO_COSTEIsNull: Boolean; virtual;
     function GetOldIMPORTE_NETO_COSTEValue: Currency; virtual;
+    function GetOldIMPORTE_NETO_COSTEIsNull: Boolean; virtual;
     procedure SetIMPORTE_NETO_COSTEValue(const aValue: Currency); virtual;
+    procedure SetIMPORTE_NETO_COSTEIsNull(const aValue: Boolean); virtual;
     function GetIMPORTE_PORTE_COSTEValue: Currency; virtual;
+    function GetIMPORTE_PORTE_COSTEIsNull: Boolean; virtual;
     function GetOldIMPORTE_PORTE_COSTEValue: Currency; virtual;
+    function GetOldIMPORTE_PORTE_COSTEIsNull: Boolean; virtual;
     procedure SetIMPORTE_PORTE_COSTEValue(const aValue: Currency); virtual;
-    function GetCANTIDADValue: Integer; virtual;
-    function GetOldCANTIDADValue: Integer; virtual;
-    procedure SetCANTIDADValue(const aValue: Integer); virtual;
+    procedure SetIMPORTE_PORTE_COSTEIsNull(const aValue: Boolean); virtual;
+    function GetCANTIDADValue: Currency; virtual;
+    function GetCANTIDADIsNull: Boolean; virtual;
+    function GetOldCANTIDADValue: Currency; virtual;
+    function GetOldCANTIDADIsNull: Boolean; virtual;
+    procedure SetCANTIDADValue(const aValue: Currency); virtual;
+    procedure SetCANTIDADIsNull(const aValue: Boolean); virtual;
     function GetIMPORTE_UNIDAD_VENTAValue: Currency; virtual;
+    function GetIMPORTE_UNIDAD_VENTAIsNull: Boolean; virtual;
     function GetOldIMPORTE_UNIDAD_VENTAValue: Currency; virtual;
+    function GetOldIMPORTE_UNIDAD_VENTAIsNull: Boolean; virtual;
     procedure SetIMPORTE_UNIDAD_VENTAValue(const aValue: Currency); virtual;
+    procedure SetIMPORTE_UNIDAD_VENTAIsNull(const aValue: Boolean); virtual;
     function GetDESCUENTO_CLIENTE_VENTAValue: Float; virtual;
+    function GetDESCUENTO_CLIENTE_VENTAIsNull: Boolean; virtual;
     function GetOldDESCUENTO_CLIENTE_VENTAValue: Float; virtual;
+    function GetOldDESCUENTO_CLIENTE_VENTAIsNull: Boolean; virtual;
     procedure SetDESCUENTO_CLIENTE_VENTAValue(const aValue: Float); virtual;
+    procedure SetDESCUENTO_CLIENTE_VENTAIsNull(const aValue: Boolean); virtual;
     function GetIMPORTE_NETO_VENTAValue: Float; virtual;
+    function GetIMPORTE_NETO_VENTAIsNull: Boolean; virtual;
     function GetOldIMPORTE_NETO_VENTAValue: Float; virtual;
+    function GetOldIMPORTE_NETO_VENTAIsNull: Boolean; virtual;
     procedure SetIMPORTE_NETO_VENTAValue(const aValue: Float); virtual;
-    function GetIMPORTE_PORTE_VENTAValue: Float; virtual;
-    function GetOldIMPORTE_PORTE_VENTAValue: Float; virtual;
-    procedure SetIMPORTE_PORTE_VENTAValue(const aValue: Float); virtual;
+    procedure SetIMPORTE_NETO_VENTAIsNull(const aValue: Boolean); virtual;
+    function GetIMPORTE_PORTE_VENTAValue: Currency; virtual;
+    function GetIMPORTE_PORTE_VENTAIsNull: Boolean; virtual;
+    function GetOldIMPORTE_PORTE_VENTAValue: Currency; virtual;
+    function GetOldIMPORTE_PORTE_VENTAIsNull: Boolean; virtual;
+    procedure SetIMPORTE_PORTE_VENTAValue(const aValue: Currency); virtual;
+    procedure SetIMPORTE_PORTE_VENTAIsNull(const aValue: Boolean); virtual;
     function GetIMPORTE_TOTAL_VENTAValue: Currency; virtual;
+    function GetIMPORTE_TOTAL_VENTAIsNull: Boolean; virtual;
     function GetOldIMPORTE_TOTAL_VENTAValue: Currency; virtual;
+    function GetOldIMPORTE_TOTAL_VENTAIsNull: Boolean; virtual;
     procedure SetIMPORTE_TOTAL_VENTAValue(const aValue: Currency); virtual;
+    procedure SetIMPORTE_TOTAL_VENTAIsNull(const aValue: Boolean); virtual;
     function GetNIF_CIF_PROVEEDORValue: String; virtual;
+    function GetNIF_CIF_PROVEEDORIsNull: Boolean; virtual;
     function GetOldNIF_CIF_PROVEEDORValue: String; virtual;
+    function GetOldNIF_CIF_PROVEEDORIsNull: Boolean; virtual;
     procedure SetNIF_CIF_PROVEEDORValue(const aValue: String); virtual;
+    procedure SetNIF_CIF_PROVEEDORIsNull(const aValue: Boolean); virtual;
     function GetNOMBRE_PROVEEDORValue: String; virtual;
+    function GetNOMBRE_PROVEEDORIsNull: Boolean; virtual;
     function GetOldNOMBRE_PROVEEDORValue: String; virtual;
+    function GetOldNOMBRE_PROVEEDORIsNull: Boolean; virtual;
     procedure SetNOMBRE_PROVEEDORValue(const aValue: String); virtual;
+    procedure SetNOMBRE_PROVEEDORIsNull(const aValue: Boolean); virtual;
     function GetCALLE_PROVEEDORValue: String; virtual;
+    function GetCALLE_PROVEEDORIsNull: Boolean; virtual;
     function GetOldCALLE_PROVEEDORValue: String; virtual;
+    function GetOldCALLE_PROVEEDORIsNull: Boolean; virtual;
     procedure SetCALLE_PROVEEDORValue(const aValue: String); virtual;
+    procedure SetCALLE_PROVEEDORIsNull(const aValue: Boolean); virtual;
     function GetPOBLACION_PROVEEDORValue: String; virtual;
+    function GetPOBLACION_PROVEEDORIsNull: Boolean; virtual;
     function GetOldPOBLACION_PROVEEDORValue: String; virtual;
+    function GetOldPOBLACION_PROVEEDORIsNull: Boolean; virtual;
     procedure SetPOBLACION_PROVEEDORValue(const aValue: String); virtual;
+    procedure SetPOBLACION_PROVEEDORIsNull(const aValue: Boolean); virtual;
     function GetPROVINCIA_PROVEEDORValue: String; virtual;
+    function GetPROVINCIA_PROVEEDORIsNull: Boolean; virtual;
     function GetOldPROVINCIA_PROVEEDORValue: String; virtual;
+    function GetOldPROVINCIA_PROVEEDORIsNull: Boolean; virtual;
     procedure SetPROVINCIA_PROVEEDORValue(const aValue: String); virtual;
+    procedure SetPROVINCIA_PROVEEDORIsNull(const aValue: Boolean); virtual;
     function GetNIF_CIF_CLIENTEValue: String; virtual;
+    function GetNIF_CIF_CLIENTEIsNull: Boolean; virtual;
     function GetOldNIF_CIF_CLIENTEValue: String; virtual;
+    function GetOldNIF_CIF_CLIENTEIsNull: Boolean; virtual;
     procedure SetNIF_CIF_CLIENTEValue(const aValue: String); virtual;
+    procedure SetNIF_CIF_CLIENTEIsNull(const aValue: Boolean); virtual;
     function GetNOMBRE_CLIENTEValue: String; virtual;
+    function GetNOMBRE_CLIENTEIsNull: Boolean; virtual;
     function GetOldNOMBRE_CLIENTEValue: String; virtual;
+    function GetOldNOMBRE_CLIENTEIsNull: Boolean; virtual;
     procedure SetNOMBRE_CLIENTEValue(const aValue: String); virtual;
+    procedure SetNOMBRE_CLIENTEIsNull(const aValue: Boolean); virtual;
     function GetNOMBRE_COMERCIAL_CLIENTEValue: String; virtual;
+    function GetNOMBRE_COMERCIAL_CLIENTEIsNull: Boolean; virtual;
     function GetOldNOMBRE_COMERCIAL_CLIENTEValue: String; virtual;
+    function GetOldNOMBRE_COMERCIAL_CLIENTEIsNull: Boolean; virtual;
     procedure SetNOMBRE_COMERCIAL_CLIENTEValue(const aValue: String); virtual;
+    procedure SetNOMBRE_COMERCIAL_CLIENTEIsNull(const aValue: Boolean); virtual;
     function GetCALLE_CLIENTEValue: String; virtual;
+    function GetCALLE_CLIENTEIsNull: Boolean; virtual;
     function GetOldCALLE_CLIENTEValue: String; virtual;
+    function GetOldCALLE_CLIENTEIsNull: Boolean; virtual;
     procedure SetCALLE_CLIENTEValue(const aValue: String); virtual;
+    procedure SetCALLE_CLIENTEIsNull(const aValue: Boolean); virtual;
     function GetPOBLACION_CLIENTEValue: String; virtual;
+    function GetPOBLACION_CLIENTEIsNull: Boolean; virtual;
     function GetOldPOBLACION_CLIENTEValue: String; virtual;
+    function GetOldPOBLACION_CLIENTEIsNull: Boolean; virtual;
     procedure SetPOBLACION_CLIENTEValue(const aValue: String); virtual;
+    procedure SetPOBLACION_CLIENTEIsNull(const aValue: Boolean); virtual;
     function GetPROVINCIA_CLIENTEValue: String; virtual;
+    function GetPROVINCIA_CLIENTEIsNull: Boolean; virtual;
     function GetOldPROVINCIA_CLIENTEValue: String; virtual;
+    function GetOldPROVINCIA_CLIENTEIsNull: Boolean; virtual;
     procedure SetPROVINCIA_CLIENTEValue(const aValue: String); virtual;
+    procedure SetPROVINCIA_CLIENTEIsNull(const aValue: Boolean); virtual;
     function GetNIF_CIF_AGENTEValue: String; virtual;
+    function GetNIF_CIF_AGENTEIsNull: Boolean; virtual;
     function GetOldNIF_CIF_AGENTEValue: String; virtual;
+    function GetOldNIF_CIF_AGENTEIsNull: Boolean; virtual;
     procedure SetNIF_CIF_AGENTEValue(const aValue: String); virtual;
+    procedure SetNIF_CIF_AGENTEIsNull(const aValue: Boolean); virtual;
     function GetNOMBRE_AGENTEValue: String; virtual;
+    function GetNOMBRE_AGENTEIsNull: Boolean; virtual;
     function GetOldNOMBRE_AGENTEValue: String; virtual;
+    function GetOldNOMBRE_AGENTEIsNull: Boolean; virtual;
     procedure SetNOMBRE_AGENTEValue(const aValue: String); virtual;
+    procedure SetNOMBRE_AGENTEIsNull(const aValue: Boolean); virtual;
     function GetCALLE_AGENTEValue: String; virtual;
+    function GetCALLE_AGENTEIsNull: Boolean; virtual;
     function GetOldCALLE_AGENTEValue: String; virtual;
+    function GetOldCALLE_AGENTEIsNull: Boolean; virtual;
     procedure SetCALLE_AGENTEValue(const aValue: String); virtual;
+    procedure SetCALLE_AGENTEIsNull(const aValue: Boolean); virtual;
     function GetPOBLACION_AGENTEValue: String; virtual;
+    function GetPOBLACION_AGENTEIsNull: Boolean; virtual;
     function GetOldPOBLACION_AGENTEValue: String; virtual;
+    function GetOldPOBLACION_AGENTEIsNull: Boolean; virtual;
     procedure SetPOBLACION_AGENTEValue(const aValue: String); virtual;
+    procedure SetPOBLACION_AGENTEIsNull(const aValue: Boolean); virtual;
     function GetPROVINCIA_AGENTEValue: String; virtual;
+    function GetPROVINCIA_AGENTEIsNull: Boolean; virtual;
     function GetOldPROVINCIA_AGENTEValue: String; virtual;
+    function GetOldPROVINCIA_AGENTEIsNull: Boolean; virtual;
     procedure SetPROVINCIA_AGENTEValue(const aValue: String); virtual;
+    procedure SetPROVINCIA_AGENTEIsNull(const aValue: Boolean); virtual;
     function GetCOMISION_AGENTEValue: Float; virtual;
+    function GetCOMISION_AGENTEIsNull: Boolean; virtual;
     function GetOldCOMISION_AGENTEValue: Float; virtual;
+    function GetOldCOMISION_AGENTEIsNull: Boolean; virtual;
     procedure SetCOMISION_AGENTEValue(const aValue: Float); virtual;
-    function GetIMPORTE_COMISION_AGENTEValue: Currency; virtual;
-    function GetOldIMPORTE_COMISION_AGENTEValue: Currency; virtual;
-    procedure SetIMPORTE_COMISION_AGENTEValue(const aValue: Currency); virtual;
+    procedure SetCOMISION_AGENTEIsNull(const aValue: Boolean); virtual;
+    function GetIMPORTE_COMISION_AGENTEValue: Float; virtual;
+    function GetIMPORTE_COMISION_AGENTEIsNull: Boolean; virtual;
+    function GetOldIMPORTE_COMISION_AGENTEValue: Float; virtual;
+    function GetOldIMPORTE_COMISION_AGENTEIsNull: Boolean; virtual;
+    procedure SetIMPORTE_COMISION_AGENTEValue(const aValue: Float); virtual;
+    procedure SetIMPORTE_COMISION_AGENTEIsNull(const aValue: Boolean); virtual;
 
     { Properties }
     property ID_FACTURA : Integer read GetID_FACTURAValue write SetID_FACTURAValue;
+    property ID_FACTURAIsNull : Boolean read GetID_FACTURAIsNull write SetID_FACTURAIsNull;
     property OldID_FACTURA : Integer read GetOldID_FACTURAValue;
+    property OldID_FACTURAIsNull : Boolean read GetOldID_FACTURAIsNull;
     property ID_EMPRESA : Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
+    property ID_EMPRESAIsNull : Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull;
     property OldID_EMPRESA : Integer read GetOldID_EMPRESAValue;
+    property OldID_EMPRESAIsNull : Boolean read GetOldID_EMPRESAIsNull;
     property REFERENCIA_FACTURA : String read GetREFERENCIA_FACTURAValue write SetREFERENCIA_FACTURAValue;
+    property REFERENCIA_FACTURAIsNull : Boolean read GetREFERENCIA_FACTURAIsNull write SetREFERENCIA_FACTURAIsNull;
     property OldREFERENCIA_FACTURA : String read GetOldREFERENCIA_FACTURAValue;
+    property OldREFERENCIA_FACTURAIsNull : Boolean read GetOldREFERENCIA_FACTURAIsNull;
     property FECHA_FACTURA : DateTime read GetFECHA_FACTURAValue write SetFECHA_FACTURAValue;
+    property FECHA_FACTURAIsNull : Boolean read GetFECHA_FACTURAIsNull write SetFECHA_FACTURAIsNull;
     property OldFECHA_FACTURA : DateTime read GetOldFECHA_FACTURAValue;
+    property OldFECHA_FACTURAIsNull : Boolean read GetOldFECHA_FACTURAIsNull;
     property IMPORTE_TOTAL_FACTURA : Currency read GetIMPORTE_TOTAL_FACTURAValue write SetIMPORTE_TOTAL_FACTURAValue;
+    property IMPORTE_TOTAL_FACTURAIsNull : Boolean read GetIMPORTE_TOTAL_FACTURAIsNull write SetIMPORTE_TOTAL_FACTURAIsNull;
     property OldIMPORTE_TOTAL_FACTURA : Currency read GetOldIMPORTE_TOTAL_FACTURAValue;
+    property OldIMPORTE_TOTAL_FACTURAIsNull : Boolean read GetOldIMPORTE_TOTAL_FACTURAIsNull;
     property ID_COMISION_FACTURA : Integer read GetID_COMISION_FACTURAValue write SetID_COMISION_FACTURAValue;
+    property ID_COMISION_FACTURAIsNull : Boolean read GetID_COMISION_FACTURAIsNull write SetID_COMISION_FACTURAIsNull;
     property OldID_COMISION_FACTURA : Integer read GetOldID_COMISION_FACTURAValue;
+    property OldID_COMISION_FACTURAIsNull : Boolean read GetOldID_COMISION_FACTURAIsNull;
     property ID_ARTICULO : Integer read GetID_ARTICULOValue write SetID_ARTICULOValue;
+    property ID_ARTICULOIsNull : Boolean read GetID_ARTICULOIsNull write SetID_ARTICULOIsNull;
     property OldID_ARTICULO : Integer read GetOldID_ARTICULOValue;
+    property OldID_ARTICULOIsNull : Boolean read GetOldID_ARTICULOIsNull;
     property FAMILIA : String read GetFAMILIAValue write SetFAMILIAValue;
+    property FAMILIAIsNull : Boolean read GetFAMILIAIsNull write SetFAMILIAIsNull;
     property OldFAMILIA : String read GetOldFAMILIAValue;
+    property OldFAMILIAIsNull : Boolean read GetOldFAMILIAIsNull;
     property REFERENCIA : String read GetREFERENCIAValue write SetREFERENCIAValue;
+    property REFERENCIAIsNull : Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull;
     property OldREFERENCIA : String read GetOldREFERENCIAValue;
+    property OldREFERENCIAIsNull : Boolean read GetOldREFERENCIAIsNull;
     property REFERENCIA_PROV : String read GetREFERENCIA_PROVValue write SetREFERENCIA_PROVValue;
+    property REFERENCIA_PROVIsNull : Boolean read GetREFERENCIA_PROVIsNull write SetREFERENCIA_PROVIsNull;
     property OldREFERENCIA_PROV : String read GetOldREFERENCIA_PROVValue;
+    property OldREFERENCIA_PROVIsNull : Boolean read GetOldREFERENCIA_PROVIsNull;
     property DESCRIPCION : String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
+    property DESCRIPCIONIsNull : Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull;
     property OldDESCRIPCION : String read GetOldDESCRIPCIONValue;
-    property COMISIONABLE : Integer read GetCOMISIONABLEValue write SetCOMISIONABLEValue;
-    property OldCOMISIONABLE : Integer read GetOldCOMISIONABLEValue;
-    property INVENTARIABLE : Integer read GetINVENTARIABLEValue write SetINVENTARIABLEValue;
-    property OldINVENTARIABLE : Integer read GetOldINVENTARIABLEValue;
+    property OldDESCRIPCIONIsNull : Boolean read GetOldDESCRIPCIONIsNull;
+    property COMISIONABLE : SmallInt read GetCOMISIONABLEValue write SetCOMISIONABLEValue;
+    property COMISIONABLEIsNull : Boolean read GetCOMISIONABLEIsNull write SetCOMISIONABLEIsNull;
+    property OldCOMISIONABLE : SmallInt read GetOldCOMISIONABLEValue;
+    property OldCOMISIONABLEIsNull : Boolean read GetOldCOMISIONABLEIsNull;
+    property INVENTARIABLE : SmallInt read GetINVENTARIABLEValue write SetINVENTARIABLEValue;
+    property INVENTARIABLEIsNull : Boolean read GetINVENTARIABLEIsNull write SetINVENTARIABLEIsNull;
+    property OldINVENTARIABLE : SmallInt read GetOldINVENTARIABLEValue;
+    property OldINVENTARIABLEIsNull : Boolean read GetOldINVENTARIABLEIsNull;
     property IMPORTE_UNIDAD_COSTE : Currency read GetIMPORTE_UNIDAD_COSTEValue write SetIMPORTE_UNIDAD_COSTEValue;
+    property IMPORTE_UNIDAD_COSTEIsNull : Boolean read GetIMPORTE_UNIDAD_COSTEIsNull write SetIMPORTE_UNIDAD_COSTEIsNull;
     property OldIMPORTE_UNIDAD_COSTE : Currency read GetOldIMPORTE_UNIDAD_COSTEValue;
+    property OldIMPORTE_UNIDAD_COSTEIsNull : Boolean read GetOldIMPORTE_UNIDAD_COSTEIsNull;
     property DESCUENTO_PROVEEDOR_COSTE : Float read GetDESCUENTO_PROVEEDOR_COSTEValue write SetDESCUENTO_PROVEEDOR_COSTEValue;
+    property DESCUENTO_PROVEEDOR_COSTEIsNull : Boolean read GetDESCUENTO_PROVEEDOR_COSTEIsNull write SetDESCUENTO_PROVEEDOR_COSTEIsNull;
     property OldDESCUENTO_PROVEEDOR_COSTE : Float read GetOldDESCUENTO_PROVEEDOR_COSTEValue;
+    property OldDESCUENTO_PROVEEDOR_COSTEIsNull : Boolean read GetOldDESCUENTO_PROVEEDOR_COSTEIsNull;
     property IMPORTE_NETO_COSTE : Currency read GetIMPORTE_NETO_COSTEValue write SetIMPORTE_NETO_COSTEValue;
+    property IMPORTE_NETO_COSTEIsNull : Boolean read GetIMPORTE_NETO_COSTEIsNull write SetIMPORTE_NETO_COSTEIsNull;
     property OldIMPORTE_NETO_COSTE : Currency read GetOldIMPORTE_NETO_COSTEValue;
+    property OldIMPORTE_NETO_COSTEIsNull : Boolean read GetOldIMPORTE_NETO_COSTEIsNull;
     property IMPORTE_PORTE_COSTE : Currency read GetIMPORTE_PORTE_COSTEValue write SetIMPORTE_PORTE_COSTEValue;
+    property IMPORTE_PORTE_COSTEIsNull : Boolean read GetIMPORTE_PORTE_COSTEIsNull write SetIMPORTE_PORTE_COSTEIsNull;
     property OldIMPORTE_PORTE_COSTE : Currency read GetOldIMPORTE_PORTE_COSTEValue;
-    property CANTIDAD : Integer read GetCANTIDADValue write SetCANTIDADValue;
-    property OldCANTIDAD : Integer read GetOldCANTIDADValue;
+    property OldIMPORTE_PORTE_COSTEIsNull : Boolean read GetOldIMPORTE_PORTE_COSTEIsNull;
+    property CANTIDAD : Currency read GetCANTIDADValue write SetCANTIDADValue;
+    property CANTIDADIsNull : Boolean read GetCANTIDADIsNull write SetCANTIDADIsNull;
+    property OldCANTIDAD : Currency read GetOldCANTIDADValue;
+    property OldCANTIDADIsNull : Boolean read GetOldCANTIDADIsNull;
     property IMPORTE_UNIDAD_VENTA : Currency read GetIMPORTE_UNIDAD_VENTAValue write SetIMPORTE_UNIDAD_VENTAValue;
+    property IMPORTE_UNIDAD_VENTAIsNull : Boolean read GetIMPORTE_UNIDAD_VENTAIsNull write SetIMPORTE_UNIDAD_VENTAIsNull;
     property OldIMPORTE_UNIDAD_VENTA : Currency read GetOldIMPORTE_UNIDAD_VENTAValue;
+    property OldIMPORTE_UNIDAD_VENTAIsNull : Boolean read GetOldIMPORTE_UNIDAD_VENTAIsNull;
     property DESCUENTO_CLIENTE_VENTA : Float read GetDESCUENTO_CLIENTE_VENTAValue write SetDESCUENTO_CLIENTE_VENTAValue;
+    property DESCUENTO_CLIENTE_VENTAIsNull : Boolean read GetDESCUENTO_CLIENTE_VENTAIsNull write SetDESCUENTO_CLIENTE_VENTAIsNull;
     property OldDESCUENTO_CLIENTE_VENTA : Float read GetOldDESCUENTO_CLIENTE_VENTAValue;
+    property OldDESCUENTO_CLIENTE_VENTAIsNull : Boolean read GetOldDESCUENTO_CLIENTE_VENTAIsNull;
     property IMPORTE_NETO_VENTA : Float read GetIMPORTE_NETO_VENTAValue write SetIMPORTE_NETO_VENTAValue;
+    property IMPORTE_NETO_VENTAIsNull : Boolean read GetIMPORTE_NETO_VENTAIsNull write SetIMPORTE_NETO_VENTAIsNull;
     property OldIMPORTE_NETO_VENTA : Float read GetOldIMPORTE_NETO_VENTAValue;
-    property IMPORTE_PORTE_VENTA : Float read GetIMPORTE_PORTE_VENTAValue write SetIMPORTE_PORTE_VENTAValue;
-    property OldIMPORTE_PORTE_VENTA : Float read GetOldIMPORTE_PORTE_VENTAValue;
+    property OldIMPORTE_NETO_VENTAIsNull : Boolean read GetOldIMPORTE_NETO_VENTAIsNull;
+    property IMPORTE_PORTE_VENTA : Currency read GetIMPORTE_PORTE_VENTAValue write SetIMPORTE_PORTE_VENTAValue;
+    property IMPORTE_PORTE_VENTAIsNull : Boolean read GetIMPORTE_PORTE_VENTAIsNull write SetIMPORTE_PORTE_VENTAIsNull;
+    property OldIMPORTE_PORTE_VENTA : Currency read GetOldIMPORTE_PORTE_VENTAValue;
+    property OldIMPORTE_PORTE_VENTAIsNull : Boolean read GetOldIMPORTE_PORTE_VENTAIsNull;
     property IMPORTE_TOTAL_VENTA : Currency read GetIMPORTE_TOTAL_VENTAValue write SetIMPORTE_TOTAL_VENTAValue;
+    property IMPORTE_TOTAL_VENTAIsNull : Boolean read GetIMPORTE_TOTAL_VENTAIsNull write SetIMPORTE_TOTAL_VENTAIsNull;
     property OldIMPORTE_TOTAL_VENTA : Currency read GetOldIMPORTE_TOTAL_VENTAValue;
+    property OldIMPORTE_TOTAL_VENTAIsNull : Boolean read GetOldIMPORTE_TOTAL_VENTAIsNull;
     property NIF_CIF_PROVEEDOR : String read GetNIF_CIF_PROVEEDORValue write SetNIF_CIF_PROVEEDORValue;
+    property NIF_CIF_PROVEEDORIsNull : Boolean read GetNIF_CIF_PROVEEDORIsNull write SetNIF_CIF_PROVEEDORIsNull;
     property OldNIF_CIF_PROVEEDOR : String read GetOldNIF_CIF_PROVEEDORValue;
+    property OldNIF_CIF_PROVEEDORIsNull : Boolean read GetOldNIF_CIF_PROVEEDORIsNull;
     property NOMBRE_PROVEEDOR : String read GetNOMBRE_PROVEEDORValue write SetNOMBRE_PROVEEDORValue;
+    property NOMBRE_PROVEEDORIsNull : Boolean read GetNOMBRE_PROVEEDORIsNull write SetNOMBRE_PROVEEDORIsNull;
     property OldNOMBRE_PROVEEDOR : String read GetOldNOMBRE_PROVEEDORValue;
+    property OldNOMBRE_PROVEEDORIsNull : Boolean read GetOldNOMBRE_PROVEEDORIsNull;
     property CALLE_PROVEEDOR : String read GetCALLE_PROVEEDORValue write SetCALLE_PROVEEDORValue;
+    property CALLE_PROVEEDORIsNull : Boolean read GetCALLE_PROVEEDORIsNull write SetCALLE_PROVEEDORIsNull;
     property OldCALLE_PROVEEDOR : String read GetOldCALLE_PROVEEDORValue;
+    property OldCALLE_PROVEEDORIsNull : Boolean read GetOldCALLE_PROVEEDORIsNull;
     property POBLACION_PROVEEDOR : String read GetPOBLACION_PROVEEDORValue write SetPOBLACION_PROVEEDORValue;
+    property POBLACION_PROVEEDORIsNull : Boolean read GetPOBLACION_PROVEEDORIsNull write SetPOBLACION_PROVEEDORIsNull;
     property OldPOBLACION_PROVEEDOR : String read GetOldPOBLACION_PROVEEDORValue;
+    property OldPOBLACION_PROVEEDORIsNull : Boolean read GetOldPOBLACION_PROVEEDORIsNull;
     property PROVINCIA_PROVEEDOR : String read GetPROVINCIA_PROVEEDORValue write SetPROVINCIA_PROVEEDORValue;
+    property PROVINCIA_PROVEEDORIsNull : Boolean read GetPROVINCIA_PROVEEDORIsNull write SetPROVINCIA_PROVEEDORIsNull;
     property OldPROVINCIA_PROVEEDOR : String read GetOldPROVINCIA_PROVEEDORValue;
+    property OldPROVINCIA_PROVEEDORIsNull : Boolean read GetOldPROVINCIA_PROVEEDORIsNull;
     property NIF_CIF_CLIENTE : String read GetNIF_CIF_CLIENTEValue write SetNIF_CIF_CLIENTEValue;
+    property NIF_CIF_CLIENTEIsNull : Boolean read GetNIF_CIF_CLIENTEIsNull write SetNIF_CIF_CLIENTEIsNull;
     property OldNIF_CIF_CLIENTE : String read GetOldNIF_CIF_CLIENTEValue;
+    property OldNIF_CIF_CLIENTEIsNull : Boolean read GetOldNIF_CIF_CLIENTEIsNull;
     property NOMBRE_CLIENTE : String read GetNOMBRE_CLIENTEValue write SetNOMBRE_CLIENTEValue;
+    property NOMBRE_CLIENTEIsNull : Boolean read GetNOMBRE_CLIENTEIsNull write SetNOMBRE_CLIENTEIsNull;
     property OldNOMBRE_CLIENTE : String read GetOldNOMBRE_CLIENTEValue;
+    property OldNOMBRE_CLIENTEIsNull : Boolean read GetOldNOMBRE_CLIENTEIsNull;
     property NOMBRE_COMERCIAL_CLIENTE : String read GetNOMBRE_COMERCIAL_CLIENTEValue write SetNOMBRE_COMERCIAL_CLIENTEValue;
+    property NOMBRE_COMERCIAL_CLIENTEIsNull : Boolean read GetNOMBRE_COMERCIAL_CLIENTEIsNull write SetNOMBRE_COMERCIAL_CLIENTEIsNull;
     property OldNOMBRE_COMERCIAL_CLIENTE : String read GetOldNOMBRE_COMERCIAL_CLIENTEValue;
+    property OldNOMBRE_COMERCIAL_CLIENTEIsNull : Boolean read GetOldNOMBRE_COMERCIAL_CLIENTEIsNull;
     property CALLE_CLIENTE : String read GetCALLE_CLIENTEValue write SetCALLE_CLIENTEValue;
+    property CALLE_CLIENTEIsNull : Boolean read GetCALLE_CLIENTEIsNull write SetCALLE_CLIENTEIsNull;
     property OldCALLE_CLIENTE : String read GetOldCALLE_CLIENTEValue;
+    property OldCALLE_CLIENTEIsNull : Boolean read GetOldCALLE_CLIENTEIsNull;
     property POBLACION_CLIENTE : String read GetPOBLACION_CLIENTEValue write SetPOBLACION_CLIENTEValue;
+    property POBLACION_CLIENTEIsNull : Boolean read GetPOBLACION_CLIENTEIsNull write SetPOBLACION_CLIENTEIsNull;
     property OldPOBLACION_CLIENTE : String read GetOldPOBLACION_CLIENTEValue;
+    property OldPOBLACION_CLIENTEIsNull : Boolean read GetOldPOBLACION_CLIENTEIsNull;
     property PROVINCIA_CLIENTE : String read GetPROVINCIA_CLIENTEValue write SetPROVINCIA_CLIENTEValue;
+    property PROVINCIA_CLIENTEIsNull : Boolean read GetPROVINCIA_CLIENTEIsNull write SetPROVINCIA_CLIENTEIsNull;
     property OldPROVINCIA_CLIENTE : String read GetOldPROVINCIA_CLIENTEValue;
+    property OldPROVINCIA_CLIENTEIsNull : Boolean read GetOldPROVINCIA_CLIENTEIsNull;
     property NIF_CIF_AGENTE : String read GetNIF_CIF_AGENTEValue write SetNIF_CIF_AGENTEValue;
+    property NIF_CIF_AGENTEIsNull : Boolean read GetNIF_CIF_AGENTEIsNull write SetNIF_CIF_AGENTEIsNull;
     property OldNIF_CIF_AGENTE : String read GetOldNIF_CIF_AGENTEValue;
+    property OldNIF_CIF_AGENTEIsNull : Boolean read GetOldNIF_CIF_AGENTEIsNull;
     property NOMBRE_AGENTE : String read GetNOMBRE_AGENTEValue write SetNOMBRE_AGENTEValue;
+    property NOMBRE_AGENTEIsNull : Boolean read GetNOMBRE_AGENTEIsNull write SetNOMBRE_AGENTEIsNull;
     property OldNOMBRE_AGENTE : String read GetOldNOMBRE_AGENTEValue;
+    property OldNOMBRE_AGENTEIsNull : Boolean read GetOldNOMBRE_AGENTEIsNull;
     property CALLE_AGENTE : String read GetCALLE_AGENTEValue write SetCALLE_AGENTEValue;
+    property CALLE_AGENTEIsNull : Boolean read GetCALLE_AGENTEIsNull write SetCALLE_AGENTEIsNull;
     property OldCALLE_AGENTE : String read GetOldCALLE_AGENTEValue;
+    property OldCALLE_AGENTEIsNull : Boolean read GetOldCALLE_AGENTEIsNull;
     property POBLACION_AGENTE : String read GetPOBLACION_AGENTEValue write SetPOBLACION_AGENTEValue;
+    property POBLACION_AGENTEIsNull : Boolean read GetPOBLACION_AGENTEIsNull write SetPOBLACION_AGENTEIsNull;
     property OldPOBLACION_AGENTE : String read GetOldPOBLACION_AGENTEValue;
+    property OldPOBLACION_AGENTEIsNull : Boolean read GetOldPOBLACION_AGENTEIsNull;
     property PROVINCIA_AGENTE : String read GetPROVINCIA_AGENTEValue write SetPROVINCIA_AGENTEValue;
+    property PROVINCIA_AGENTEIsNull : Boolean read GetPROVINCIA_AGENTEIsNull write SetPROVINCIA_AGENTEIsNull;
     property OldPROVINCIA_AGENTE : String read GetOldPROVINCIA_AGENTEValue;
+    property OldPROVINCIA_AGENTEIsNull : Boolean read GetOldPROVINCIA_AGENTEIsNull;
     property COMISION_AGENTE : Float read GetCOMISION_AGENTEValue write SetCOMISION_AGENTEValue;
+    property COMISION_AGENTEIsNull : Boolean read GetCOMISION_AGENTEIsNull write SetCOMISION_AGENTEIsNull;
     property OldCOMISION_AGENTE : Float read GetOldCOMISION_AGENTEValue;
-    property IMPORTE_COMISION_AGENTE : Currency read GetIMPORTE_COMISION_AGENTEValue write SetIMPORTE_COMISION_AGENTEValue;
-    property OldIMPORTE_COMISION_AGENTE : Currency read GetOldIMPORTE_COMISION_AGENTEValue;
+    property OldCOMISION_AGENTEIsNull : Boolean read GetOldCOMISION_AGENTEIsNull;
+    property IMPORTE_COMISION_AGENTE : Float read GetIMPORTE_COMISION_AGENTEValue write SetIMPORTE_COMISION_AGENTEValue;
+    property IMPORTE_COMISION_AGENTEIsNull : Boolean read GetIMPORTE_COMISION_AGENTEIsNull write SetIMPORTE_COMISION_AGENTEIsNull;
+    property OldIMPORTE_COMISION_AGENTE : Float read GetOldIMPORTE_COMISION_AGENTEValue;
+    property OldIMPORTE_COMISION_AGENTEIsNull : Boolean read GetOldIMPORTE_COMISION_AGENTEIsNull;
+
+  public
+    constructor Create(aBusinessProcessor: TDABusinessProcessor); override;
+    destructor Destroy; override;
+
+  end;
+
+  { ITablaVaciaDelta }
+  ITablaVaciaDelta = interface(ITablaVacia)
+  ['{28BB0A71-A847-4434-8B08-BD59D8251C55}']
+    { Property getters and setters }
+
+    { Properties }
+  end;
+
+  { TTablaVaciaBusinessProcessorRules }
+  TTablaVaciaBusinessProcessorRules = class(TDABusinessProcessorRules, ITablaVacia, ITablaVaciaDelta)
+  private
+  protected
+    { Property getters and setters }
+
+    { Properties }
+
+  public
+    constructor Create(aBusinessProcessor: TDABusinessProcessor); override;
+    destructor Destroy; override;
+
+  end;
+
+  { IInfVentasAlbArticuloDelta }
+  IInfVentasAlbArticuloDelta = interface(IInfVentasAlbArticulo)
+  ['{FAD814C2-7B05-4C19-BECF-CED46F0CF599}']
+    { Property getters and setters }
+    function GetOldID_ALBARANValue : Integer;
+    function GetOldID_EMPRESAValue : Integer;
+    function GetOldREFERENCIA_ALBARANValue : String;
+    function GetOldFECHA_ALBARANValue : DateTime;
+    function GetOldIMPORTE_TOTAL_ALBARANValue : Currency;
+    function GetOldID_ARTICULOValue : Integer;
+    function GetOldFAMILIAValue : String;
+    function GetOldREFERENCIAValue : String;
+    function GetOldREFERENCIA_PROVValue : String;
+    function GetOldDESCRIPCIONValue : String;
+    function GetOldCOMISIONABLEValue : SmallInt;
+    function GetOldINVENTARIABLEValue : SmallInt;
+    function GetOldIMPORTE_UNIDAD_COSTEValue : Currency;
+    function GetOldDESCUENTO_PROVEEDOR_COSTEValue : Float;
+    function GetOldIMPORTE_NETO_COSTEValue : Currency;
+    function GetOldIMPORTE_PORTE_COSTEValue : Currency;
+    function GetOldCANTIDADValue : Currency;
+    function GetOldIMPORTE_UNIDAD_VENTAValue : Currency;
+    function GetOldDESCUENTO_CLIENTE_VENTAValue : Float;
+    function GetOldIMPORTE_NETO_VENTAValue : Float;
+    function GetOldIMPORTE_PORTE_VENTAValue : Currency;
+    function GetOldIMPORTE_TOTAL_VENTAValue : Currency;
+    function GetOldNIF_CIF_PROVEEDORValue : String;
+    function GetOldNOMBRE_PROVEEDORValue : String;
+    function GetOldCALLE_PROVEEDORValue : String;
+    function GetOldPOBLACION_PROVEEDORValue : String;
+    function GetOldPROVINCIA_PROVEEDORValue : String;
+    function GetOldNIF_CIF_CLIENTEValue : String;
+    function GetOldNOMBRE_CLIENTEValue : String;
+    function GetOldNOMBRE_COMERCIAL_CLIENTEValue : String;
+    function GetOldCALLE_CLIENTEValue : String;
+    function GetOldPOBLACION_CLIENTEValue : String;
+    function GetOldPROVINCIA_CLIENTEValue : String;
+    function GetOldNIF_CIF_AGENTEValue : String;
+    function GetOldNOMBRE_AGENTEValue : String;
+    function GetOldCALLE_AGENTEValue : String;
+    function GetOldPOBLACION_AGENTEValue : String;
+    function GetOldPROVINCIA_AGENTEValue : String;
+    function GetOldCOMISION_AGENTEValue : Float;
+    function GetOldIMPORTE_COMISION_AGENTEValue : Float;
+
+    { Properties }
+    property OldID_ALBARAN : Integer read GetOldID_ALBARANValue;
+    property OldID_EMPRESA : Integer read GetOldID_EMPRESAValue;
+    property OldREFERENCIA_ALBARAN : String read GetOldREFERENCIA_ALBARANValue;
+    property OldFECHA_ALBARAN : DateTime read GetOldFECHA_ALBARANValue;
+    property OldIMPORTE_TOTAL_ALBARAN : Currency read GetOldIMPORTE_TOTAL_ALBARANValue;
+    property OldID_ARTICULO : Integer read GetOldID_ARTICULOValue;
+    property OldFAMILIA : String read GetOldFAMILIAValue;
+    property OldREFERENCIA : String read GetOldREFERENCIAValue;
+    property OldREFERENCIA_PROV : String read GetOldREFERENCIA_PROVValue;
+    property OldDESCRIPCION : String read GetOldDESCRIPCIONValue;
+    property OldCOMISIONABLE : SmallInt read GetOldCOMISIONABLEValue;
+    property OldINVENTARIABLE : SmallInt read GetOldINVENTARIABLEValue;
+    property OldIMPORTE_UNIDAD_COSTE : Currency read GetOldIMPORTE_UNIDAD_COSTEValue;
+    property OldDESCUENTO_PROVEEDOR_COSTE : Float read GetOldDESCUENTO_PROVEEDOR_COSTEValue;
+    property OldIMPORTE_NETO_COSTE : Currency read GetOldIMPORTE_NETO_COSTEValue;
+    property OldIMPORTE_PORTE_COSTE : Currency read GetOldIMPORTE_PORTE_COSTEValue;
+    property OldCANTIDAD : Currency read GetOldCANTIDADValue;
+    property OldIMPORTE_UNIDAD_VENTA : Currency read GetOldIMPORTE_UNIDAD_VENTAValue;
+    property OldDESCUENTO_CLIENTE_VENTA : Float read GetOldDESCUENTO_CLIENTE_VENTAValue;
+    property OldIMPORTE_NETO_VENTA : Float read GetOldIMPORTE_NETO_VENTAValue;
+    property OldIMPORTE_PORTE_VENTA : Currency read GetOldIMPORTE_PORTE_VENTAValue;
+    property OldIMPORTE_TOTAL_VENTA : Currency read GetOldIMPORTE_TOTAL_VENTAValue;
+    property OldNIF_CIF_PROVEEDOR : String read GetOldNIF_CIF_PROVEEDORValue;
+    property OldNOMBRE_PROVEEDOR : String read GetOldNOMBRE_PROVEEDORValue;
+    property OldCALLE_PROVEEDOR : String read GetOldCALLE_PROVEEDORValue;
+    property OldPOBLACION_PROVEEDOR : String read GetOldPOBLACION_PROVEEDORValue;
+    property OldPROVINCIA_PROVEEDOR : String read GetOldPROVINCIA_PROVEEDORValue;
+    property OldNIF_CIF_CLIENTE : String read GetOldNIF_CIF_CLIENTEValue;
+    property OldNOMBRE_CLIENTE : String read GetOldNOMBRE_CLIENTEValue;
+    property OldNOMBRE_COMERCIAL_CLIENTE : String read GetOldNOMBRE_COMERCIAL_CLIENTEValue;
+    property OldCALLE_CLIENTE : String read GetOldCALLE_CLIENTEValue;
+    property OldPOBLACION_CLIENTE : String read GetOldPOBLACION_CLIENTEValue;
+    property OldPROVINCIA_CLIENTE : String read GetOldPROVINCIA_CLIENTEValue;
+    property OldNIF_CIF_AGENTE : String read GetOldNIF_CIF_AGENTEValue;
+    property OldNOMBRE_AGENTE : String read GetOldNOMBRE_AGENTEValue;
+    property OldCALLE_AGENTE : String read GetOldCALLE_AGENTEValue;
+    property OldPOBLACION_AGENTE : String read GetOldPOBLACION_AGENTEValue;
+    property OldPROVINCIA_AGENTE : String read GetOldPROVINCIA_AGENTEValue;
+    property OldCOMISION_AGENTE : Float read GetOldCOMISION_AGENTEValue;
+    property OldIMPORTE_COMISION_AGENTE : Float read GetOldIMPORTE_COMISION_AGENTEValue;
+  end;
+
+  { TInfVentasAlbArticuloBusinessProcessorRules }
+  TInfVentasAlbArticuloBusinessProcessorRules = class(TDABusinessProcessorRules, IInfVentasAlbArticulo, IInfVentasAlbArticuloDelta)
+  private
+  protected
+    { Property getters and setters }
+    function GetID_ALBARANValue: Integer; virtual;
+    function GetID_ALBARANIsNull: Boolean; virtual;
+    function GetOldID_ALBARANValue: Integer; virtual;
+    function GetOldID_ALBARANIsNull: Boolean; virtual;
+    procedure SetID_ALBARANValue(const aValue: Integer); virtual;
+    procedure SetID_ALBARANIsNull(const aValue: Boolean); virtual;
+    function GetID_EMPRESAValue: Integer; virtual;
+    function GetID_EMPRESAIsNull: Boolean; virtual;
+    function GetOldID_EMPRESAValue: Integer; virtual;
+    function GetOldID_EMPRESAIsNull: Boolean; virtual;
+    procedure SetID_EMPRESAValue(const aValue: Integer); virtual;
+    procedure SetID_EMPRESAIsNull(const aValue: Boolean); virtual;
+    function GetREFERENCIA_ALBARANValue: String; virtual;
+    function GetREFERENCIA_ALBARANIsNull: Boolean; virtual;
+    function GetOldREFERENCIA_ALBARANValue: String; virtual;
+    function GetOldREFERENCIA_ALBARANIsNull: Boolean; virtual;
+    procedure SetREFERENCIA_ALBARANValue(const aValue: String); virtual;
+    procedure SetREFERENCIA_ALBARANIsNull(const aValue: Boolean); virtual;
+    function GetFECHA_ALBARANValue: DateTime; virtual;
+    function GetFECHA_ALBARANIsNull: Boolean; virtual;
+    function GetOldFECHA_ALBARANValue: DateTime; virtual;
+    function GetOldFECHA_ALBARANIsNull: Boolean; virtual;
+    procedure SetFECHA_ALBARANValue(const aValue: DateTime); virtual;
+    procedure SetFECHA_ALBARANIsNull(const aValue: Boolean); virtual;
+    function GetIMPORTE_TOTAL_ALBARANValue: Currency; virtual;
+    function GetIMPORTE_TOTAL_ALBARANIsNull: Boolean; virtual;
+    function GetOldIMPORTE_TOTAL_ALBARANValue: Currency; virtual;
+    function GetOldIMPORTE_TOTAL_ALBARANIsNull: Boolean; virtual;
+    procedure SetIMPORTE_TOTAL_ALBARANValue(const aValue: Currency); virtual;
+    procedure SetIMPORTE_TOTAL_ALBARANIsNull(const aValue: Boolean); virtual;
+    function GetID_ARTICULOValue: Integer; virtual;
+    function GetID_ARTICULOIsNull: Boolean; virtual;
+    function GetOldID_ARTICULOValue: Integer; virtual;
+    function GetOldID_ARTICULOIsNull: Boolean; virtual;
+    procedure SetID_ARTICULOValue(const aValue: Integer); virtual;
+    procedure SetID_ARTICULOIsNull(const aValue: Boolean); virtual;
+    function GetFAMILIAValue: String; virtual;
+    function GetFAMILIAIsNull: Boolean; virtual;
+    function GetOldFAMILIAValue: String; virtual;
+    function GetOldFAMILIAIsNull: Boolean; virtual;
+    procedure SetFAMILIAValue(const aValue: String); virtual;
+    procedure SetFAMILIAIsNull(const aValue: Boolean); virtual;
+    function GetREFERENCIAValue: String; virtual;
+    function GetREFERENCIAIsNull: Boolean; virtual;
+    function GetOldREFERENCIAValue: String; virtual;
+    function GetOldREFERENCIAIsNull: Boolean; virtual;
+    procedure SetREFERENCIAValue(const aValue: String); virtual;
+    procedure SetREFERENCIAIsNull(const aValue: Boolean); virtual;
+    function GetREFERENCIA_PROVValue: String; virtual;
+    function GetREFERENCIA_PROVIsNull: Boolean; virtual;
+    function GetOldREFERENCIA_PROVValue: String; virtual;
+    function GetOldREFERENCIA_PROVIsNull: Boolean; virtual;
+    procedure SetREFERENCIA_PROVValue(const aValue: String); virtual;
+    procedure SetREFERENCIA_PROVIsNull(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 GetCOMISIONABLEValue: SmallInt; virtual;
+    function GetCOMISIONABLEIsNull: Boolean; virtual;
+    function GetOldCOMISIONABLEValue: SmallInt; virtual;
+    function GetOldCOMISIONABLEIsNull: Boolean; virtual;
+    procedure SetCOMISIONABLEValue(const aValue: SmallInt); virtual;
+    procedure SetCOMISIONABLEIsNull(const aValue: Boolean); virtual;
+    function GetINVENTARIABLEValue: SmallInt; virtual;
+    function GetINVENTARIABLEIsNull: Boolean; virtual;
+    function GetOldINVENTARIABLEValue: SmallInt; virtual;
+    function GetOldINVENTARIABLEIsNull: Boolean; virtual;
+    procedure SetINVENTARIABLEValue(const aValue: SmallInt); virtual;
+    procedure SetINVENTARIABLEIsNull(const aValue: Boolean); virtual;
+    function GetIMPORTE_UNIDAD_COSTEValue: Currency; virtual;
+    function GetIMPORTE_UNIDAD_COSTEIsNull: Boolean; virtual;
+    function GetOldIMPORTE_UNIDAD_COSTEValue: Currency; virtual;
+    function GetOldIMPORTE_UNIDAD_COSTEIsNull: Boolean; virtual;
+    procedure SetIMPORTE_UNIDAD_COSTEValue(const aValue: Currency); virtual;
+    procedure SetIMPORTE_UNIDAD_COSTEIsNull(const aValue: Boolean); virtual;
+    function GetDESCUENTO_PROVEEDOR_COSTEValue: Float; virtual;
+    function GetDESCUENTO_PROVEEDOR_COSTEIsNull: Boolean; virtual;
+    function GetOldDESCUENTO_PROVEEDOR_COSTEValue: Float; virtual;
+    function GetOldDESCUENTO_PROVEEDOR_COSTEIsNull: Boolean; virtual;
+    procedure SetDESCUENTO_PROVEEDOR_COSTEValue(const aValue: Float); virtual;
+    procedure SetDESCUENTO_PROVEEDOR_COSTEIsNull(const aValue: Boolean); virtual;
+    function GetIMPORTE_NETO_COSTEValue: Currency; virtual;
+    function GetIMPORTE_NETO_COSTEIsNull: Boolean; virtual;
+    function GetOldIMPORTE_NETO_COSTEValue: Currency; virtual;
+    function GetOldIMPORTE_NETO_COSTEIsNull: Boolean; virtual;
+    procedure SetIMPORTE_NETO_COSTEValue(const aValue: Currency); virtual;
+    procedure SetIMPORTE_NETO_COSTEIsNull(const aValue: Boolean); virtual;
+    function GetIMPORTE_PORTE_COSTEValue: Currency; virtual;
+    function GetIMPORTE_PORTE_COSTEIsNull: Boolean; virtual;
+    function GetOldIMPORTE_PORTE_COSTEValue: Currency; virtual;
+    function GetOldIMPORTE_PORTE_COSTEIsNull: Boolean; virtual;
+    procedure SetIMPORTE_PORTE_COSTEValue(const aValue: Currency); virtual;
+    procedure SetIMPORTE_PORTE_COSTEIsNull(const aValue: Boolean); virtual;
+    function GetCANTIDADValue: Currency; virtual;
+    function GetCANTIDADIsNull: Boolean; virtual;
+    function GetOldCANTIDADValue: Currency; virtual;
+    function GetOldCANTIDADIsNull: Boolean; virtual;
+    procedure SetCANTIDADValue(const aValue: Currency); virtual;
+    procedure SetCANTIDADIsNull(const aValue: Boolean); virtual;
+    function GetIMPORTE_UNIDAD_VENTAValue: Currency; virtual;
+    function GetIMPORTE_UNIDAD_VENTAIsNull: Boolean; virtual;
+    function GetOldIMPORTE_UNIDAD_VENTAValue: Currency; virtual;
+    function GetOldIMPORTE_UNIDAD_VENTAIsNull: Boolean; virtual;
+    procedure SetIMPORTE_UNIDAD_VENTAValue(const aValue: Currency); virtual;
+    procedure SetIMPORTE_UNIDAD_VENTAIsNull(const aValue: Boolean); virtual;
+    function GetDESCUENTO_CLIENTE_VENTAValue: Float; virtual;
+    function GetDESCUENTO_CLIENTE_VENTAIsNull: Boolean; virtual;
+    function GetOldDESCUENTO_CLIENTE_VENTAValue: Float; virtual;
+    function GetOldDESCUENTO_CLIENTE_VENTAIsNull: Boolean; virtual;
+    procedure SetDESCUENTO_CLIENTE_VENTAValue(const aValue: Float); virtual;
+    procedure SetDESCUENTO_CLIENTE_VENTAIsNull(const aValue: Boolean); virtual;
+    function GetIMPORTE_NETO_VENTAValue: Float; virtual;
+    function GetIMPORTE_NETO_VENTAIsNull: Boolean; virtual;
+    function GetOldIMPORTE_NETO_VENTAValue: Float; virtual;
+    function GetOldIMPORTE_NETO_VENTAIsNull: Boolean; virtual;
+    procedure SetIMPORTE_NETO_VENTAValue(const aValue: Float); virtual;
+    procedure SetIMPORTE_NETO_VENTAIsNull(const aValue: Boolean); virtual;
+    function GetIMPORTE_PORTE_VENTAValue: Currency; virtual;
+    function GetIMPORTE_PORTE_VENTAIsNull: Boolean; virtual;
+    function GetOldIMPORTE_PORTE_VENTAValue: Currency; virtual;
+    function GetOldIMPORTE_PORTE_VENTAIsNull: Boolean; virtual;
+    procedure SetIMPORTE_PORTE_VENTAValue(const aValue: Currency); virtual;
+    procedure SetIMPORTE_PORTE_VENTAIsNull(const aValue: Boolean); virtual;
+    function GetIMPORTE_TOTAL_VENTAValue: Currency; virtual;
+    function GetIMPORTE_TOTAL_VENTAIsNull: Boolean; virtual;
+    function GetOldIMPORTE_TOTAL_VENTAValue: Currency; virtual;
+    function GetOldIMPORTE_TOTAL_VENTAIsNull: Boolean; virtual;
+    procedure SetIMPORTE_TOTAL_VENTAValue(const aValue: Currency); virtual;
+    procedure SetIMPORTE_TOTAL_VENTAIsNull(const aValue: Boolean); virtual;
+    function GetNIF_CIF_PROVEEDORValue: String; virtual;
+    function GetNIF_CIF_PROVEEDORIsNull: Boolean; virtual;
+    function GetOldNIF_CIF_PROVEEDORValue: String; virtual;
+    function GetOldNIF_CIF_PROVEEDORIsNull: Boolean; virtual;
+    procedure SetNIF_CIF_PROVEEDORValue(const aValue: String); virtual;
+    procedure SetNIF_CIF_PROVEEDORIsNull(const aValue: Boolean); virtual;
+    function GetNOMBRE_PROVEEDORValue: String; virtual;
+    function GetNOMBRE_PROVEEDORIsNull: Boolean; virtual;
+    function GetOldNOMBRE_PROVEEDORValue: String; virtual;
+    function GetOldNOMBRE_PROVEEDORIsNull: Boolean; virtual;
+    procedure SetNOMBRE_PROVEEDORValue(const aValue: String); virtual;
+    procedure SetNOMBRE_PROVEEDORIsNull(const aValue: Boolean); virtual;
+    function GetCALLE_PROVEEDORValue: String; virtual;
+    function GetCALLE_PROVEEDORIsNull: Boolean; virtual;
+    function GetOldCALLE_PROVEEDORValue: String; virtual;
+    function GetOldCALLE_PROVEEDORIsNull: Boolean; virtual;
+    procedure SetCALLE_PROVEEDORValue(const aValue: String); virtual;
+    procedure SetCALLE_PROVEEDORIsNull(const aValue: Boolean); virtual;
+    function GetPOBLACION_PROVEEDORValue: String; virtual;
+    function GetPOBLACION_PROVEEDORIsNull: Boolean; virtual;
+    function GetOldPOBLACION_PROVEEDORValue: String; virtual;
+    function GetOldPOBLACION_PROVEEDORIsNull: Boolean; virtual;
+    procedure SetPOBLACION_PROVEEDORValue(const aValue: String); virtual;
+    procedure SetPOBLACION_PROVEEDORIsNull(const aValue: Boolean); virtual;
+    function GetPROVINCIA_PROVEEDORValue: String; virtual;
+    function GetPROVINCIA_PROVEEDORIsNull: Boolean; virtual;
+    function GetOldPROVINCIA_PROVEEDORValue: String; virtual;
+    function GetOldPROVINCIA_PROVEEDORIsNull: Boolean; virtual;
+    procedure SetPROVINCIA_PROVEEDORValue(const aValue: String); virtual;
+    procedure SetPROVINCIA_PROVEEDORIsNull(const aValue: Boolean); virtual;
+    function GetNIF_CIF_CLIENTEValue: String; virtual;
+    function GetNIF_CIF_CLIENTEIsNull: Boolean; virtual;
+    function GetOldNIF_CIF_CLIENTEValue: String; virtual;
+    function GetOldNIF_CIF_CLIENTEIsNull: Boolean; virtual;
+    procedure SetNIF_CIF_CLIENTEValue(const aValue: String); virtual;
+    procedure SetNIF_CIF_CLIENTEIsNull(const aValue: Boolean); virtual;
+    function GetNOMBRE_CLIENTEValue: String; virtual;
+    function GetNOMBRE_CLIENTEIsNull: Boolean; virtual;
+    function GetOldNOMBRE_CLIENTEValue: String; virtual;
+    function GetOldNOMBRE_CLIENTEIsNull: Boolean; virtual;
+    procedure SetNOMBRE_CLIENTEValue(const aValue: String); virtual;
+    procedure SetNOMBRE_CLIENTEIsNull(const aValue: Boolean); virtual;
+    function GetNOMBRE_COMERCIAL_CLIENTEValue: String; virtual;
+    function GetNOMBRE_COMERCIAL_CLIENTEIsNull: Boolean; virtual;
+    function GetOldNOMBRE_COMERCIAL_CLIENTEValue: String; virtual;
+    function GetOldNOMBRE_COMERCIAL_CLIENTEIsNull: Boolean; virtual;
+    procedure SetNOMBRE_COMERCIAL_CLIENTEValue(const aValue: String); virtual;
+    procedure SetNOMBRE_COMERCIAL_CLIENTEIsNull(const aValue: Boolean); virtual;
+    function GetCALLE_CLIENTEValue: String; virtual;
+    function GetCALLE_CLIENTEIsNull: Boolean; virtual;
+    function GetOldCALLE_CLIENTEValue: String; virtual;
+    function GetOldCALLE_CLIENTEIsNull: Boolean; virtual;
+    procedure SetCALLE_CLIENTEValue(const aValue: String); virtual;
+    procedure SetCALLE_CLIENTEIsNull(const aValue: Boolean); virtual;
+    function GetPOBLACION_CLIENTEValue: String; virtual;
+    function GetPOBLACION_CLIENTEIsNull: Boolean; virtual;
+    function GetOldPOBLACION_CLIENTEValue: String; virtual;
+    function GetOldPOBLACION_CLIENTEIsNull: Boolean; virtual;
+    procedure SetPOBLACION_CLIENTEValue(const aValue: String); virtual;
+    procedure SetPOBLACION_CLIENTEIsNull(const aValue: Boolean); virtual;
+    function GetPROVINCIA_CLIENTEValue: String; virtual;
+    function GetPROVINCIA_CLIENTEIsNull: Boolean; virtual;
+    function GetOldPROVINCIA_CLIENTEValue: String; virtual;
+    function GetOldPROVINCIA_CLIENTEIsNull: Boolean; virtual;
+    procedure SetPROVINCIA_CLIENTEValue(const aValue: String); virtual;
+    procedure SetPROVINCIA_CLIENTEIsNull(const aValue: Boolean); virtual;
+    function GetNIF_CIF_AGENTEValue: String; virtual;
+    function GetNIF_CIF_AGENTEIsNull: Boolean; virtual;
+    function GetOldNIF_CIF_AGENTEValue: String; virtual;
+    function GetOldNIF_CIF_AGENTEIsNull: Boolean; virtual;
+    procedure SetNIF_CIF_AGENTEValue(const aValue: String); virtual;
+    procedure SetNIF_CIF_AGENTEIsNull(const aValue: Boolean); virtual;
+    function GetNOMBRE_AGENTEValue: String; virtual;
+    function GetNOMBRE_AGENTEIsNull: Boolean; virtual;
+    function GetOldNOMBRE_AGENTEValue: String; virtual;
+    function GetOldNOMBRE_AGENTEIsNull: Boolean; virtual;
+    procedure SetNOMBRE_AGENTEValue(const aValue: String); virtual;
+    procedure SetNOMBRE_AGENTEIsNull(const aValue: Boolean); virtual;
+    function GetCALLE_AGENTEValue: String; virtual;
+    function GetCALLE_AGENTEIsNull: Boolean; virtual;
+    function GetOldCALLE_AGENTEValue: String; virtual;
+    function GetOldCALLE_AGENTEIsNull: Boolean; virtual;
+    procedure SetCALLE_AGENTEValue(const aValue: String); virtual;
+    procedure SetCALLE_AGENTEIsNull(const aValue: Boolean); virtual;
+    function GetPOBLACION_AGENTEValue: String; virtual;
+    function GetPOBLACION_AGENTEIsNull: Boolean; virtual;
+    function GetOldPOBLACION_AGENTEValue: String; virtual;
+    function GetOldPOBLACION_AGENTEIsNull: Boolean; virtual;
+    procedure SetPOBLACION_AGENTEValue(const aValue: String); virtual;
+    procedure SetPOBLACION_AGENTEIsNull(const aValue: Boolean); virtual;
+    function GetPROVINCIA_AGENTEValue: String; virtual;
+    function GetPROVINCIA_AGENTEIsNull: Boolean; virtual;
+    function GetOldPROVINCIA_AGENTEValue: String; virtual;
+    function GetOldPROVINCIA_AGENTEIsNull: Boolean; virtual;
+    procedure SetPROVINCIA_AGENTEValue(const aValue: String); virtual;
+    procedure SetPROVINCIA_AGENTEIsNull(const aValue: Boolean); virtual;
+    function GetCOMISION_AGENTEValue: Float; virtual;
+    function GetCOMISION_AGENTEIsNull: Boolean; virtual;
+    function GetOldCOMISION_AGENTEValue: Float; virtual;
+    function GetOldCOMISION_AGENTEIsNull: Boolean; virtual;
+    procedure SetCOMISION_AGENTEValue(const aValue: Float); virtual;
+    procedure SetCOMISION_AGENTEIsNull(const aValue: Boolean); virtual;
+    function GetIMPORTE_COMISION_AGENTEValue: Float; virtual;
+    function GetIMPORTE_COMISION_AGENTEIsNull: Boolean; virtual;
+    function GetOldIMPORTE_COMISION_AGENTEValue: Float; virtual;
+    function GetOldIMPORTE_COMISION_AGENTEIsNull: Boolean; virtual;
+    procedure SetIMPORTE_COMISION_AGENTEValue(const aValue: Float); virtual;
+    procedure SetIMPORTE_COMISION_AGENTEIsNull(const aValue: Boolean); virtual;
+
+    { Properties }
+    property ID_ALBARAN : Integer read GetID_ALBARANValue write SetID_ALBARANValue;
+    property ID_ALBARANIsNull : Boolean read GetID_ALBARANIsNull write SetID_ALBARANIsNull;
+    property OldID_ALBARAN : Integer read GetOldID_ALBARANValue;
+    property OldID_ALBARANIsNull : Boolean read GetOldID_ALBARANIsNull;
+    property ID_EMPRESA : Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
+    property ID_EMPRESAIsNull : Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull;
+    property OldID_EMPRESA : Integer read GetOldID_EMPRESAValue;
+    property OldID_EMPRESAIsNull : Boolean read GetOldID_EMPRESAIsNull;
+    property REFERENCIA_ALBARAN : String read GetREFERENCIA_ALBARANValue write SetREFERENCIA_ALBARANValue;
+    property REFERENCIA_ALBARANIsNull : Boolean read GetREFERENCIA_ALBARANIsNull write SetREFERENCIA_ALBARANIsNull;
+    property OldREFERENCIA_ALBARAN : String read GetOldREFERENCIA_ALBARANValue;
+    property OldREFERENCIA_ALBARANIsNull : Boolean read GetOldREFERENCIA_ALBARANIsNull;
+    property FECHA_ALBARAN : DateTime read GetFECHA_ALBARANValue write SetFECHA_ALBARANValue;
+    property FECHA_ALBARANIsNull : Boolean read GetFECHA_ALBARANIsNull write SetFECHA_ALBARANIsNull;
+    property OldFECHA_ALBARAN : DateTime read GetOldFECHA_ALBARANValue;
+    property OldFECHA_ALBARANIsNull : Boolean read GetOldFECHA_ALBARANIsNull;
+    property IMPORTE_TOTAL_ALBARAN : Currency read GetIMPORTE_TOTAL_ALBARANValue write SetIMPORTE_TOTAL_ALBARANValue;
+    property IMPORTE_TOTAL_ALBARANIsNull : Boolean read GetIMPORTE_TOTAL_ALBARANIsNull write SetIMPORTE_TOTAL_ALBARANIsNull;
+    property OldIMPORTE_TOTAL_ALBARAN : Currency read GetOldIMPORTE_TOTAL_ALBARANValue;
+    property OldIMPORTE_TOTAL_ALBARANIsNull : Boolean read GetOldIMPORTE_TOTAL_ALBARANIsNull;
+    property ID_ARTICULO : Integer read GetID_ARTICULOValue write SetID_ARTICULOValue;
+    property ID_ARTICULOIsNull : Boolean read GetID_ARTICULOIsNull write SetID_ARTICULOIsNull;
+    property OldID_ARTICULO : Integer read GetOldID_ARTICULOValue;
+    property OldID_ARTICULOIsNull : Boolean read GetOldID_ARTICULOIsNull;
+    property FAMILIA : String read GetFAMILIAValue write SetFAMILIAValue;
+    property FAMILIAIsNull : Boolean read GetFAMILIAIsNull write SetFAMILIAIsNull;
+    property OldFAMILIA : String read GetOldFAMILIAValue;
+    property OldFAMILIAIsNull : Boolean read GetOldFAMILIAIsNull;
+    property REFERENCIA : String read GetREFERENCIAValue write SetREFERENCIAValue;
+    property REFERENCIAIsNull : Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull;
+    property OldREFERENCIA : String read GetOldREFERENCIAValue;
+    property OldREFERENCIAIsNull : Boolean read GetOldREFERENCIAIsNull;
+    property REFERENCIA_PROV : String read GetREFERENCIA_PROVValue write SetREFERENCIA_PROVValue;
+    property REFERENCIA_PROVIsNull : Boolean read GetREFERENCIA_PROVIsNull write SetREFERENCIA_PROVIsNull;
+    property OldREFERENCIA_PROV : String read GetOldREFERENCIA_PROVValue;
+    property OldREFERENCIA_PROVIsNull : Boolean read GetOldREFERENCIA_PROVIsNull;
+    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 COMISIONABLE : SmallInt read GetCOMISIONABLEValue write SetCOMISIONABLEValue;
+    property COMISIONABLEIsNull : Boolean read GetCOMISIONABLEIsNull write SetCOMISIONABLEIsNull;
+    property OldCOMISIONABLE : SmallInt read GetOldCOMISIONABLEValue;
+    property OldCOMISIONABLEIsNull : Boolean read GetOldCOMISIONABLEIsNull;
+    property INVENTARIABLE : SmallInt read GetINVENTARIABLEValue write SetINVENTARIABLEValue;
+    property INVENTARIABLEIsNull : Boolean read GetINVENTARIABLEIsNull write SetINVENTARIABLEIsNull;
+    property OldINVENTARIABLE : SmallInt read GetOldINVENTARIABLEValue;
+    property OldINVENTARIABLEIsNull : Boolean read GetOldINVENTARIABLEIsNull;
+    property IMPORTE_UNIDAD_COSTE : Currency read GetIMPORTE_UNIDAD_COSTEValue write SetIMPORTE_UNIDAD_COSTEValue;
+    property IMPORTE_UNIDAD_COSTEIsNull : Boolean read GetIMPORTE_UNIDAD_COSTEIsNull write SetIMPORTE_UNIDAD_COSTEIsNull;
+    property OldIMPORTE_UNIDAD_COSTE : Currency read GetOldIMPORTE_UNIDAD_COSTEValue;
+    property OldIMPORTE_UNIDAD_COSTEIsNull : Boolean read GetOldIMPORTE_UNIDAD_COSTEIsNull;
+    property DESCUENTO_PROVEEDOR_COSTE : Float read GetDESCUENTO_PROVEEDOR_COSTEValue write SetDESCUENTO_PROVEEDOR_COSTEValue;
+    property DESCUENTO_PROVEEDOR_COSTEIsNull : Boolean read GetDESCUENTO_PROVEEDOR_COSTEIsNull write SetDESCUENTO_PROVEEDOR_COSTEIsNull;
+    property OldDESCUENTO_PROVEEDOR_COSTE : Float read GetOldDESCUENTO_PROVEEDOR_COSTEValue;
+    property OldDESCUENTO_PROVEEDOR_COSTEIsNull : Boolean read GetOldDESCUENTO_PROVEEDOR_COSTEIsNull;
+    property IMPORTE_NETO_COSTE : Currency read GetIMPORTE_NETO_COSTEValue write SetIMPORTE_NETO_COSTEValue;
+    property IMPORTE_NETO_COSTEIsNull : Boolean read GetIMPORTE_NETO_COSTEIsNull write SetIMPORTE_NETO_COSTEIsNull;
+    property OldIMPORTE_NETO_COSTE : Currency read GetOldIMPORTE_NETO_COSTEValue;
+    property OldIMPORTE_NETO_COSTEIsNull : Boolean read GetOldIMPORTE_NETO_COSTEIsNull;
+    property IMPORTE_PORTE_COSTE : Currency read GetIMPORTE_PORTE_COSTEValue write SetIMPORTE_PORTE_COSTEValue;
+    property IMPORTE_PORTE_COSTEIsNull : Boolean read GetIMPORTE_PORTE_COSTEIsNull write SetIMPORTE_PORTE_COSTEIsNull;
+    property OldIMPORTE_PORTE_COSTE : Currency read GetOldIMPORTE_PORTE_COSTEValue;
+    property OldIMPORTE_PORTE_COSTEIsNull : Boolean read GetOldIMPORTE_PORTE_COSTEIsNull;
+    property CANTIDAD : Currency read GetCANTIDADValue write SetCANTIDADValue;
+    property CANTIDADIsNull : Boolean read GetCANTIDADIsNull write SetCANTIDADIsNull;
+    property OldCANTIDAD : Currency read GetOldCANTIDADValue;
+    property OldCANTIDADIsNull : Boolean read GetOldCANTIDADIsNull;
+    property IMPORTE_UNIDAD_VENTA : Currency read GetIMPORTE_UNIDAD_VENTAValue write SetIMPORTE_UNIDAD_VENTAValue;
+    property IMPORTE_UNIDAD_VENTAIsNull : Boolean read GetIMPORTE_UNIDAD_VENTAIsNull write SetIMPORTE_UNIDAD_VENTAIsNull;
+    property OldIMPORTE_UNIDAD_VENTA : Currency read GetOldIMPORTE_UNIDAD_VENTAValue;
+    property OldIMPORTE_UNIDAD_VENTAIsNull : Boolean read GetOldIMPORTE_UNIDAD_VENTAIsNull;
+    property DESCUENTO_CLIENTE_VENTA : Float read GetDESCUENTO_CLIENTE_VENTAValue write SetDESCUENTO_CLIENTE_VENTAValue;
+    property DESCUENTO_CLIENTE_VENTAIsNull : Boolean read GetDESCUENTO_CLIENTE_VENTAIsNull write SetDESCUENTO_CLIENTE_VENTAIsNull;
+    property OldDESCUENTO_CLIENTE_VENTA : Float read GetOldDESCUENTO_CLIENTE_VENTAValue;
+    property OldDESCUENTO_CLIENTE_VENTAIsNull : Boolean read GetOldDESCUENTO_CLIENTE_VENTAIsNull;
+    property IMPORTE_NETO_VENTA : Float read GetIMPORTE_NETO_VENTAValue write SetIMPORTE_NETO_VENTAValue;
+    property IMPORTE_NETO_VENTAIsNull : Boolean read GetIMPORTE_NETO_VENTAIsNull write SetIMPORTE_NETO_VENTAIsNull;
+    property OldIMPORTE_NETO_VENTA : Float read GetOldIMPORTE_NETO_VENTAValue;
+    property OldIMPORTE_NETO_VENTAIsNull : Boolean read GetOldIMPORTE_NETO_VENTAIsNull;
+    property IMPORTE_PORTE_VENTA : Currency read GetIMPORTE_PORTE_VENTAValue write SetIMPORTE_PORTE_VENTAValue;
+    property IMPORTE_PORTE_VENTAIsNull : Boolean read GetIMPORTE_PORTE_VENTAIsNull write SetIMPORTE_PORTE_VENTAIsNull;
+    property OldIMPORTE_PORTE_VENTA : Currency read GetOldIMPORTE_PORTE_VENTAValue;
+    property OldIMPORTE_PORTE_VENTAIsNull : Boolean read GetOldIMPORTE_PORTE_VENTAIsNull;
+    property IMPORTE_TOTAL_VENTA : Currency read GetIMPORTE_TOTAL_VENTAValue write SetIMPORTE_TOTAL_VENTAValue;
+    property IMPORTE_TOTAL_VENTAIsNull : Boolean read GetIMPORTE_TOTAL_VENTAIsNull write SetIMPORTE_TOTAL_VENTAIsNull;
+    property OldIMPORTE_TOTAL_VENTA : Currency read GetOldIMPORTE_TOTAL_VENTAValue;
+    property OldIMPORTE_TOTAL_VENTAIsNull : Boolean read GetOldIMPORTE_TOTAL_VENTAIsNull;
+    property NIF_CIF_PROVEEDOR : String read GetNIF_CIF_PROVEEDORValue write SetNIF_CIF_PROVEEDORValue;
+    property NIF_CIF_PROVEEDORIsNull : Boolean read GetNIF_CIF_PROVEEDORIsNull write SetNIF_CIF_PROVEEDORIsNull;
+    property OldNIF_CIF_PROVEEDOR : String read GetOldNIF_CIF_PROVEEDORValue;
+    property OldNIF_CIF_PROVEEDORIsNull : Boolean read GetOldNIF_CIF_PROVEEDORIsNull;
+    property NOMBRE_PROVEEDOR : String read GetNOMBRE_PROVEEDORValue write SetNOMBRE_PROVEEDORValue;
+    property NOMBRE_PROVEEDORIsNull : Boolean read GetNOMBRE_PROVEEDORIsNull write SetNOMBRE_PROVEEDORIsNull;
+    property OldNOMBRE_PROVEEDOR : String read GetOldNOMBRE_PROVEEDORValue;
+    property OldNOMBRE_PROVEEDORIsNull : Boolean read GetOldNOMBRE_PROVEEDORIsNull;
+    property CALLE_PROVEEDOR : String read GetCALLE_PROVEEDORValue write SetCALLE_PROVEEDORValue;
+    property CALLE_PROVEEDORIsNull : Boolean read GetCALLE_PROVEEDORIsNull write SetCALLE_PROVEEDORIsNull;
+    property OldCALLE_PROVEEDOR : String read GetOldCALLE_PROVEEDORValue;
+    property OldCALLE_PROVEEDORIsNull : Boolean read GetOldCALLE_PROVEEDORIsNull;
+    property POBLACION_PROVEEDOR : String read GetPOBLACION_PROVEEDORValue write SetPOBLACION_PROVEEDORValue;
+    property POBLACION_PROVEEDORIsNull : Boolean read GetPOBLACION_PROVEEDORIsNull write SetPOBLACION_PROVEEDORIsNull;
+    property OldPOBLACION_PROVEEDOR : String read GetOldPOBLACION_PROVEEDORValue;
+    property OldPOBLACION_PROVEEDORIsNull : Boolean read GetOldPOBLACION_PROVEEDORIsNull;
+    property PROVINCIA_PROVEEDOR : String read GetPROVINCIA_PROVEEDORValue write SetPROVINCIA_PROVEEDORValue;
+    property PROVINCIA_PROVEEDORIsNull : Boolean read GetPROVINCIA_PROVEEDORIsNull write SetPROVINCIA_PROVEEDORIsNull;
+    property OldPROVINCIA_PROVEEDOR : String read GetOldPROVINCIA_PROVEEDORValue;
+    property OldPROVINCIA_PROVEEDORIsNull : Boolean read GetOldPROVINCIA_PROVEEDORIsNull;
+    property NIF_CIF_CLIENTE : String read GetNIF_CIF_CLIENTEValue write SetNIF_CIF_CLIENTEValue;
+    property NIF_CIF_CLIENTEIsNull : Boolean read GetNIF_CIF_CLIENTEIsNull write SetNIF_CIF_CLIENTEIsNull;
+    property OldNIF_CIF_CLIENTE : String read GetOldNIF_CIF_CLIENTEValue;
+    property OldNIF_CIF_CLIENTEIsNull : Boolean read GetOldNIF_CIF_CLIENTEIsNull;
+    property NOMBRE_CLIENTE : String read GetNOMBRE_CLIENTEValue write SetNOMBRE_CLIENTEValue;
+    property NOMBRE_CLIENTEIsNull : Boolean read GetNOMBRE_CLIENTEIsNull write SetNOMBRE_CLIENTEIsNull;
+    property OldNOMBRE_CLIENTE : String read GetOldNOMBRE_CLIENTEValue;
+    property OldNOMBRE_CLIENTEIsNull : Boolean read GetOldNOMBRE_CLIENTEIsNull;
+    property NOMBRE_COMERCIAL_CLIENTE : String read GetNOMBRE_COMERCIAL_CLIENTEValue write SetNOMBRE_COMERCIAL_CLIENTEValue;
+    property NOMBRE_COMERCIAL_CLIENTEIsNull : Boolean read GetNOMBRE_COMERCIAL_CLIENTEIsNull write SetNOMBRE_COMERCIAL_CLIENTEIsNull;
+    property OldNOMBRE_COMERCIAL_CLIENTE : String read GetOldNOMBRE_COMERCIAL_CLIENTEValue;
+    property OldNOMBRE_COMERCIAL_CLIENTEIsNull : Boolean read GetOldNOMBRE_COMERCIAL_CLIENTEIsNull;
+    property CALLE_CLIENTE : String read GetCALLE_CLIENTEValue write SetCALLE_CLIENTEValue;
+    property CALLE_CLIENTEIsNull : Boolean read GetCALLE_CLIENTEIsNull write SetCALLE_CLIENTEIsNull;
+    property OldCALLE_CLIENTE : String read GetOldCALLE_CLIENTEValue;
+    property OldCALLE_CLIENTEIsNull : Boolean read GetOldCALLE_CLIENTEIsNull;
+    property POBLACION_CLIENTE : String read GetPOBLACION_CLIENTEValue write SetPOBLACION_CLIENTEValue;
+    property POBLACION_CLIENTEIsNull : Boolean read GetPOBLACION_CLIENTEIsNull write SetPOBLACION_CLIENTEIsNull;
+    property OldPOBLACION_CLIENTE : String read GetOldPOBLACION_CLIENTEValue;
+    property OldPOBLACION_CLIENTEIsNull : Boolean read GetOldPOBLACION_CLIENTEIsNull;
+    property PROVINCIA_CLIENTE : String read GetPROVINCIA_CLIENTEValue write SetPROVINCIA_CLIENTEValue;
+    property PROVINCIA_CLIENTEIsNull : Boolean read GetPROVINCIA_CLIENTEIsNull write SetPROVINCIA_CLIENTEIsNull;
+    property OldPROVINCIA_CLIENTE : String read GetOldPROVINCIA_CLIENTEValue;
+    property OldPROVINCIA_CLIENTEIsNull : Boolean read GetOldPROVINCIA_CLIENTEIsNull;
+    property NIF_CIF_AGENTE : String read GetNIF_CIF_AGENTEValue write SetNIF_CIF_AGENTEValue;
+    property NIF_CIF_AGENTEIsNull : Boolean read GetNIF_CIF_AGENTEIsNull write SetNIF_CIF_AGENTEIsNull;
+    property OldNIF_CIF_AGENTE : String read GetOldNIF_CIF_AGENTEValue;
+    property OldNIF_CIF_AGENTEIsNull : Boolean read GetOldNIF_CIF_AGENTEIsNull;
+    property NOMBRE_AGENTE : String read GetNOMBRE_AGENTEValue write SetNOMBRE_AGENTEValue;
+    property NOMBRE_AGENTEIsNull : Boolean read GetNOMBRE_AGENTEIsNull write SetNOMBRE_AGENTEIsNull;
+    property OldNOMBRE_AGENTE : String read GetOldNOMBRE_AGENTEValue;
+    property OldNOMBRE_AGENTEIsNull : Boolean read GetOldNOMBRE_AGENTEIsNull;
+    property CALLE_AGENTE : String read GetCALLE_AGENTEValue write SetCALLE_AGENTEValue;
+    property CALLE_AGENTEIsNull : Boolean read GetCALLE_AGENTEIsNull write SetCALLE_AGENTEIsNull;
+    property OldCALLE_AGENTE : String read GetOldCALLE_AGENTEValue;
+    property OldCALLE_AGENTEIsNull : Boolean read GetOldCALLE_AGENTEIsNull;
+    property POBLACION_AGENTE : String read GetPOBLACION_AGENTEValue write SetPOBLACION_AGENTEValue;
+    property POBLACION_AGENTEIsNull : Boolean read GetPOBLACION_AGENTEIsNull write SetPOBLACION_AGENTEIsNull;
+    property OldPOBLACION_AGENTE : String read GetOldPOBLACION_AGENTEValue;
+    property OldPOBLACION_AGENTEIsNull : Boolean read GetOldPOBLACION_AGENTEIsNull;
+    property PROVINCIA_AGENTE : String read GetPROVINCIA_AGENTEValue write SetPROVINCIA_AGENTEValue;
+    property PROVINCIA_AGENTEIsNull : Boolean read GetPROVINCIA_AGENTEIsNull write SetPROVINCIA_AGENTEIsNull;
+    property OldPROVINCIA_AGENTE : String read GetOldPROVINCIA_AGENTEValue;
+    property OldPROVINCIA_AGENTEIsNull : Boolean read GetOldPROVINCIA_AGENTEIsNull;
+    property COMISION_AGENTE : Float read GetCOMISION_AGENTEValue write SetCOMISION_AGENTEValue;
+    property COMISION_AGENTEIsNull : Boolean read GetCOMISION_AGENTEIsNull write SetCOMISION_AGENTEIsNull;
+    property OldCOMISION_AGENTE : Float read GetOldCOMISION_AGENTEValue;
+    property OldCOMISION_AGENTEIsNull : Boolean read GetOldCOMISION_AGENTEIsNull;
+    property IMPORTE_COMISION_AGENTE : Float read GetIMPORTE_COMISION_AGENTEValue write SetIMPORTE_COMISION_AGENTEValue;
+    property IMPORTE_COMISION_AGENTEIsNull : Boolean read GetIMPORTE_COMISION_AGENTEIsNull write SetIMPORTE_COMISION_AGENTEIsNull;
+    property OldIMPORTE_COMISION_AGENTE : Float read GetOldIMPORTE_COMISION_AGENTEValue;
+    property OldIMPORTE_COMISION_AGENTEIsNull : Boolean read GetOldIMPORTE_COMISION_AGENTEIsNull;
 
   public
     constructor Create(aBusinessProcessor: TDABusinessProcessor); override;
@@ -324,7 +1055,7 @@ type
 implementation
 
 uses
-  Variants, uROBinaryHelpers;
+  Variants, uROBinaryHelpers, uDAInterfaces;
 
 { TInfVentasArticuloBusinessProcessorRules }
 constructor TInfVentasArticuloBusinessProcessorRules.Create(aBusinessProcessor: TDABusinessProcessor);
@@ -342,618 +1073,2540 @@ begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloID_FACTURA];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetID_FACTURAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloID_FACTURA]);
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetOldID_FACTURAValue: Integer;
 begin
   result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloID_FACTURA];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetOldID_FACTURAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloID_FACTURA]);
+end;
+
 procedure TInfVentasArticuloBusinessProcessorRules.SetID_FACTURAValue(const aValue: Integer);
 begin
   BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloID_FACTURA] := aValue;
 end;
 
+procedure TInfVentasArticuloBusinessProcessorRules.SetID_FACTURAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloID_FACTURA] := Null;
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetID_EMPRESAValue: Integer;
 begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloID_EMPRESA];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetID_EMPRESAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloID_EMPRESA]);
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetOldID_EMPRESAValue: Integer;
 begin
   result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloID_EMPRESA];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetOldID_EMPRESAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloID_EMPRESA]);
+end;
+
 procedure TInfVentasArticuloBusinessProcessorRules.SetID_EMPRESAValue(const aValue: Integer);
 begin
   BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloID_EMPRESA] := aValue;
 end;
 
+procedure TInfVentasArticuloBusinessProcessorRules.SetID_EMPRESAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloID_EMPRESA] := Null;
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetREFERENCIA_FACTURAValue: String;
 begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloREFERENCIA_FACTURA];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetREFERENCIA_FACTURAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloREFERENCIA_FACTURA]);
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetOldREFERENCIA_FACTURAValue: String;
 begin
   result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloREFERENCIA_FACTURA];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetOldREFERENCIA_FACTURAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloREFERENCIA_FACTURA]);
+end;
+
 procedure TInfVentasArticuloBusinessProcessorRules.SetREFERENCIA_FACTURAValue(const aValue: String);
 begin
   BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloREFERENCIA_FACTURA] := aValue;
 end;
 
+procedure TInfVentasArticuloBusinessProcessorRules.SetREFERENCIA_FACTURAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloREFERENCIA_FACTURA] := Null;
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetFECHA_FACTURAValue: DateTime;
 begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloFECHA_FACTURA];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetFECHA_FACTURAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloFECHA_FACTURA]);
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetOldFECHA_FACTURAValue: DateTime;
 begin
   result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloFECHA_FACTURA];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetOldFECHA_FACTURAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloFECHA_FACTURA]);
+end;
+
 procedure TInfVentasArticuloBusinessProcessorRules.SetFECHA_FACTURAValue(const aValue: DateTime);
 begin
   BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloFECHA_FACTURA] := aValue;
 end;
 
+procedure TInfVentasArticuloBusinessProcessorRules.SetFECHA_FACTURAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloFECHA_FACTURA] := Null;
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetIMPORTE_TOTAL_FACTURAValue: Currency;
 begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_TOTAL_FACTURA];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetIMPORTE_TOTAL_FACTURAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_TOTAL_FACTURA]);
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetOldIMPORTE_TOTAL_FACTURAValue: Currency;
 begin
   result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloIMPORTE_TOTAL_FACTURA];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetOldIMPORTE_TOTAL_FACTURAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloIMPORTE_TOTAL_FACTURA]);
+end;
+
 procedure TInfVentasArticuloBusinessProcessorRules.SetIMPORTE_TOTAL_FACTURAValue(const aValue: Currency);
 begin
   BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_TOTAL_FACTURA] := aValue;
 end;
 
+procedure TInfVentasArticuloBusinessProcessorRules.SetIMPORTE_TOTAL_FACTURAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_TOTAL_FACTURA] := Null;
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetID_COMISION_FACTURAValue: Integer;
 begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloID_COMISION_FACTURA];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetID_COMISION_FACTURAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloID_COMISION_FACTURA]);
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetOldID_COMISION_FACTURAValue: Integer;
 begin
   result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloID_COMISION_FACTURA];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetOldID_COMISION_FACTURAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloID_COMISION_FACTURA]);
+end;
+
 procedure TInfVentasArticuloBusinessProcessorRules.SetID_COMISION_FACTURAValue(const aValue: Integer);
 begin
   BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloID_COMISION_FACTURA] := aValue;
 end;
 
+procedure TInfVentasArticuloBusinessProcessorRules.SetID_COMISION_FACTURAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloID_COMISION_FACTURA] := Null;
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetID_ARTICULOValue: Integer;
 begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloID_ARTICULO];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetID_ARTICULOIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloID_ARTICULO]);
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetOldID_ARTICULOValue: Integer;
 begin
   result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloID_ARTICULO];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetOldID_ARTICULOIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloID_ARTICULO]);
+end;
+
 procedure TInfVentasArticuloBusinessProcessorRules.SetID_ARTICULOValue(const aValue: Integer);
 begin
   BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloID_ARTICULO] := aValue;
 end;
 
+procedure TInfVentasArticuloBusinessProcessorRules.SetID_ARTICULOIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloID_ARTICULO] := Null;
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetFAMILIAValue: String;
 begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloFAMILIA];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetFAMILIAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloFAMILIA]);
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetOldFAMILIAValue: String;
 begin
   result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloFAMILIA];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetOldFAMILIAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloFAMILIA]);
+end;
+
 procedure TInfVentasArticuloBusinessProcessorRules.SetFAMILIAValue(const aValue: String);
 begin
   BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloFAMILIA] := aValue;
 end;
 
+procedure TInfVentasArticuloBusinessProcessorRules.SetFAMILIAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloFAMILIA] := Null;
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetREFERENCIAValue: String;
 begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloREFERENCIA];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetREFERENCIAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloREFERENCIA]);
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetOldREFERENCIAValue: String;
 begin
   result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloREFERENCIA];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetOldREFERENCIAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloREFERENCIA]);
+end;
+
 procedure TInfVentasArticuloBusinessProcessorRules.SetREFERENCIAValue(const aValue: String);
 begin
   BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloREFERENCIA] := aValue;
 end;
 
+procedure TInfVentasArticuloBusinessProcessorRules.SetREFERENCIAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloREFERENCIA] := Null;
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetREFERENCIA_PROVValue: String;
 begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloREFERENCIA_PROV];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetREFERENCIA_PROVIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloREFERENCIA_PROV]);
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetOldREFERENCIA_PROVValue: String;
 begin
   result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloREFERENCIA_PROV];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetOldREFERENCIA_PROVIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloREFERENCIA_PROV]);
+end;
+
 procedure TInfVentasArticuloBusinessProcessorRules.SetREFERENCIA_PROVValue(const aValue: String);
 begin
   BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloREFERENCIA_PROV] := aValue;
 end;
 
+procedure TInfVentasArticuloBusinessProcessorRules.SetREFERENCIA_PROVIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloREFERENCIA_PROV] := Null;
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetDESCRIPCIONValue: String;
 begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloDESCRIPCION];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetDESCRIPCIONIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloDESCRIPCION]);
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetOldDESCRIPCIONValue: String;
 begin
   result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloDESCRIPCION];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetOldDESCRIPCIONIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloDESCRIPCION]);
+end;
+
 procedure TInfVentasArticuloBusinessProcessorRules.SetDESCRIPCIONValue(const aValue: String);
 begin
   BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloDESCRIPCION] := aValue;
 end;
 
-function TInfVentasArticuloBusinessProcessorRules.GetCOMISIONABLEValue: Integer;
+procedure TInfVentasArticuloBusinessProcessorRules.SetDESCRIPCIONIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloDESCRIPCION] := Null;
+end;
+
+function TInfVentasArticuloBusinessProcessorRules.GetCOMISIONABLEValue: SmallInt;
 begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloCOMISIONABLE];
 end;
 
-function TInfVentasArticuloBusinessProcessorRules.GetOldCOMISIONABLEValue: Integer;
+function TInfVentasArticuloBusinessProcessorRules.GetCOMISIONABLEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloCOMISIONABLE]);
+end;
+
+function TInfVentasArticuloBusinessProcessorRules.GetOldCOMISIONABLEValue: SmallInt;
 begin
   result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloCOMISIONABLE];
 end;
 
-procedure TInfVentasArticuloBusinessProcessorRules.SetCOMISIONABLEValue(const aValue: Integer);
+function TInfVentasArticuloBusinessProcessorRules.GetOldCOMISIONABLEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloCOMISIONABLE]);
+end;
+
+procedure TInfVentasArticuloBusinessProcessorRules.SetCOMISIONABLEValue(const aValue: SmallInt);
 begin
   BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloCOMISIONABLE] := aValue;
 end;
 
-function TInfVentasArticuloBusinessProcessorRules.GetINVENTARIABLEValue: Integer;
+procedure TInfVentasArticuloBusinessProcessorRules.SetCOMISIONABLEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloCOMISIONABLE] := Null;
+end;
+
+function TInfVentasArticuloBusinessProcessorRules.GetINVENTARIABLEValue: SmallInt;
 begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloINVENTARIABLE];
 end;
 
-function TInfVentasArticuloBusinessProcessorRules.GetOldINVENTARIABLEValue: Integer;
+function TInfVentasArticuloBusinessProcessorRules.GetINVENTARIABLEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloINVENTARIABLE]);
+end;
+
+function TInfVentasArticuloBusinessProcessorRules.GetOldINVENTARIABLEValue: SmallInt;
 begin
   result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloINVENTARIABLE];
 end;
 
-procedure TInfVentasArticuloBusinessProcessorRules.SetINVENTARIABLEValue(const aValue: Integer);
+function TInfVentasArticuloBusinessProcessorRules.GetOldINVENTARIABLEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloINVENTARIABLE]);
+end;
+
+procedure TInfVentasArticuloBusinessProcessorRules.SetINVENTARIABLEValue(const aValue: SmallInt);
 begin
   BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloINVENTARIABLE] := aValue;
 end;
 
+procedure TInfVentasArticuloBusinessProcessorRules.SetINVENTARIABLEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloINVENTARIABLE] := Null;
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetIMPORTE_UNIDAD_COSTEValue: Currency;
 begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_UNIDAD_COSTE];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetIMPORTE_UNIDAD_COSTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_UNIDAD_COSTE]);
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetOldIMPORTE_UNIDAD_COSTEValue: Currency;
 begin
   result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloIMPORTE_UNIDAD_COSTE];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetOldIMPORTE_UNIDAD_COSTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloIMPORTE_UNIDAD_COSTE]);
+end;
+
 procedure TInfVentasArticuloBusinessProcessorRules.SetIMPORTE_UNIDAD_COSTEValue(const aValue: Currency);
 begin
   BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_UNIDAD_COSTE] := aValue;
 end;
 
+procedure TInfVentasArticuloBusinessProcessorRules.SetIMPORTE_UNIDAD_COSTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_UNIDAD_COSTE] := Null;
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetDESCUENTO_PROVEEDOR_COSTEValue: Float;
 begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloDESCUENTO_PROVEEDOR_COSTE];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetDESCUENTO_PROVEEDOR_COSTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloDESCUENTO_PROVEEDOR_COSTE]);
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetOldDESCUENTO_PROVEEDOR_COSTEValue: Float;
 begin
   result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloDESCUENTO_PROVEEDOR_COSTE];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetOldDESCUENTO_PROVEEDOR_COSTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloDESCUENTO_PROVEEDOR_COSTE]);
+end;
+
 procedure TInfVentasArticuloBusinessProcessorRules.SetDESCUENTO_PROVEEDOR_COSTEValue(const aValue: Float);
 begin
   BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloDESCUENTO_PROVEEDOR_COSTE] := aValue;
 end;
 
+procedure TInfVentasArticuloBusinessProcessorRules.SetDESCUENTO_PROVEEDOR_COSTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloDESCUENTO_PROVEEDOR_COSTE] := Null;
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetIMPORTE_NETO_COSTEValue: Currency;
 begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_NETO_COSTE];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetIMPORTE_NETO_COSTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_NETO_COSTE]);
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetOldIMPORTE_NETO_COSTEValue: Currency;
 begin
   result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloIMPORTE_NETO_COSTE];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetOldIMPORTE_NETO_COSTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloIMPORTE_NETO_COSTE]);
+end;
+
 procedure TInfVentasArticuloBusinessProcessorRules.SetIMPORTE_NETO_COSTEValue(const aValue: Currency);
 begin
   BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_NETO_COSTE] := aValue;
 end;
 
+procedure TInfVentasArticuloBusinessProcessorRules.SetIMPORTE_NETO_COSTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_NETO_COSTE] := Null;
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetIMPORTE_PORTE_COSTEValue: Currency;
 begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_PORTE_COSTE];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetIMPORTE_PORTE_COSTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_PORTE_COSTE]);
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetOldIMPORTE_PORTE_COSTEValue: Currency;
 begin
   result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloIMPORTE_PORTE_COSTE];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetOldIMPORTE_PORTE_COSTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloIMPORTE_PORTE_COSTE]);
+end;
+
 procedure TInfVentasArticuloBusinessProcessorRules.SetIMPORTE_PORTE_COSTEValue(const aValue: Currency);
 begin
   BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_PORTE_COSTE] := aValue;
 end;
 
-function TInfVentasArticuloBusinessProcessorRules.GetCANTIDADValue: Integer;
+procedure TInfVentasArticuloBusinessProcessorRules.SetIMPORTE_PORTE_COSTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_PORTE_COSTE] := Null;
+end;
+
+function TInfVentasArticuloBusinessProcessorRules.GetCANTIDADValue: Currency;
 begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloCANTIDAD];
 end;
 
-function TInfVentasArticuloBusinessProcessorRules.GetOldCANTIDADValue: Integer;
+function TInfVentasArticuloBusinessProcessorRules.GetCANTIDADIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloCANTIDAD]);
+end;
+
+function TInfVentasArticuloBusinessProcessorRules.GetOldCANTIDADValue: Currency;
 begin
   result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloCANTIDAD];
 end;
 
-procedure TInfVentasArticuloBusinessProcessorRules.SetCANTIDADValue(const aValue: Integer);
+function TInfVentasArticuloBusinessProcessorRules.GetOldCANTIDADIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloCANTIDAD]);
+end;
+
+procedure TInfVentasArticuloBusinessProcessorRules.SetCANTIDADValue(const aValue: Currency);
 begin
   BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloCANTIDAD] := aValue;
 end;
 
+procedure TInfVentasArticuloBusinessProcessorRules.SetCANTIDADIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloCANTIDAD] := Null;
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetIMPORTE_UNIDAD_VENTAValue: Currency;
 begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_UNIDAD_VENTA];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetIMPORTE_UNIDAD_VENTAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_UNIDAD_VENTA]);
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetOldIMPORTE_UNIDAD_VENTAValue: Currency;
 begin
   result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloIMPORTE_UNIDAD_VENTA];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetOldIMPORTE_UNIDAD_VENTAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloIMPORTE_UNIDAD_VENTA]);
+end;
+
 procedure TInfVentasArticuloBusinessProcessorRules.SetIMPORTE_UNIDAD_VENTAValue(const aValue: Currency);
 begin
   BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_UNIDAD_VENTA] := aValue;
 end;
 
+procedure TInfVentasArticuloBusinessProcessorRules.SetIMPORTE_UNIDAD_VENTAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_UNIDAD_VENTA] := Null;
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetDESCUENTO_CLIENTE_VENTAValue: Float;
 begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloDESCUENTO_CLIENTE_VENTA];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetDESCUENTO_CLIENTE_VENTAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloDESCUENTO_CLIENTE_VENTA]);
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetOldDESCUENTO_CLIENTE_VENTAValue: Float;
 begin
   result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloDESCUENTO_CLIENTE_VENTA];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetOldDESCUENTO_CLIENTE_VENTAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloDESCUENTO_CLIENTE_VENTA]);
+end;
+
 procedure TInfVentasArticuloBusinessProcessorRules.SetDESCUENTO_CLIENTE_VENTAValue(const aValue: Float);
 begin
   BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloDESCUENTO_CLIENTE_VENTA] := aValue;
 end;
 
+procedure TInfVentasArticuloBusinessProcessorRules.SetDESCUENTO_CLIENTE_VENTAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloDESCUENTO_CLIENTE_VENTA] := Null;
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetIMPORTE_NETO_VENTAValue: Float;
 begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_NETO_VENTA];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetIMPORTE_NETO_VENTAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_NETO_VENTA]);
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetOldIMPORTE_NETO_VENTAValue: Float;
 begin
   result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloIMPORTE_NETO_VENTA];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetOldIMPORTE_NETO_VENTAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloIMPORTE_NETO_VENTA]);
+end;
+
 procedure TInfVentasArticuloBusinessProcessorRules.SetIMPORTE_NETO_VENTAValue(const aValue: Float);
 begin
   BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_NETO_VENTA] := aValue;
 end;
 
-function TInfVentasArticuloBusinessProcessorRules.GetIMPORTE_PORTE_VENTAValue: Float;
+procedure TInfVentasArticuloBusinessProcessorRules.SetIMPORTE_NETO_VENTAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_NETO_VENTA] := Null;
+end;
+
+function TInfVentasArticuloBusinessProcessorRules.GetIMPORTE_PORTE_VENTAValue: Currency;
 begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_PORTE_VENTA];
 end;
 
-function TInfVentasArticuloBusinessProcessorRules.GetOldIMPORTE_PORTE_VENTAValue: Float;
+function TInfVentasArticuloBusinessProcessorRules.GetIMPORTE_PORTE_VENTAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_PORTE_VENTA]);
+end;
+
+function TInfVentasArticuloBusinessProcessorRules.GetOldIMPORTE_PORTE_VENTAValue: Currency;
 begin
   result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloIMPORTE_PORTE_VENTA];
 end;
 
-procedure TInfVentasArticuloBusinessProcessorRules.SetIMPORTE_PORTE_VENTAValue(const aValue: Float);
+function TInfVentasArticuloBusinessProcessorRules.GetOldIMPORTE_PORTE_VENTAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloIMPORTE_PORTE_VENTA]);
+end;
+
+procedure TInfVentasArticuloBusinessProcessorRules.SetIMPORTE_PORTE_VENTAValue(const aValue: Currency);
 begin
   BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_PORTE_VENTA] := aValue;
 end;
 
+procedure TInfVentasArticuloBusinessProcessorRules.SetIMPORTE_PORTE_VENTAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_PORTE_VENTA] := Null;
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetIMPORTE_TOTAL_VENTAValue: Currency;
 begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_TOTAL_VENTA];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetIMPORTE_TOTAL_VENTAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_TOTAL_VENTA]);
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetOldIMPORTE_TOTAL_VENTAValue: Currency;
 begin
   result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloIMPORTE_TOTAL_VENTA];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetOldIMPORTE_TOTAL_VENTAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloIMPORTE_TOTAL_VENTA]);
+end;
+
 procedure TInfVentasArticuloBusinessProcessorRules.SetIMPORTE_TOTAL_VENTAValue(const aValue: Currency);
 begin
   BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_TOTAL_VENTA] := aValue;
 end;
 
+procedure TInfVentasArticuloBusinessProcessorRules.SetIMPORTE_TOTAL_VENTAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_TOTAL_VENTA] := Null;
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetNIF_CIF_PROVEEDORValue: String;
 begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNIF_CIF_PROVEEDOR];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetNIF_CIF_PROVEEDORIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNIF_CIF_PROVEEDOR]);
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetOldNIF_CIF_PROVEEDORValue: String;
 begin
   result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloNIF_CIF_PROVEEDOR];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetOldNIF_CIF_PROVEEDORIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloNIF_CIF_PROVEEDOR]);
+end;
+
 procedure TInfVentasArticuloBusinessProcessorRules.SetNIF_CIF_PROVEEDORValue(const aValue: String);
 begin
   BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNIF_CIF_PROVEEDOR] := aValue;
 end;
 
+procedure TInfVentasArticuloBusinessProcessorRules.SetNIF_CIF_PROVEEDORIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNIF_CIF_PROVEEDOR] := Null;
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetNOMBRE_PROVEEDORValue: String;
 begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNOMBRE_PROVEEDOR];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetNOMBRE_PROVEEDORIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNOMBRE_PROVEEDOR]);
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetOldNOMBRE_PROVEEDORValue: String;
 begin
   result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloNOMBRE_PROVEEDOR];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetOldNOMBRE_PROVEEDORIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloNOMBRE_PROVEEDOR]);
+end;
+
 procedure TInfVentasArticuloBusinessProcessorRules.SetNOMBRE_PROVEEDORValue(const aValue: String);
 begin
   BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNOMBRE_PROVEEDOR] := aValue;
 end;
 
+procedure TInfVentasArticuloBusinessProcessorRules.SetNOMBRE_PROVEEDORIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNOMBRE_PROVEEDOR] := Null;
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetCALLE_PROVEEDORValue: String;
 begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloCALLE_PROVEEDOR];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetCALLE_PROVEEDORIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloCALLE_PROVEEDOR]);
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetOldCALLE_PROVEEDORValue: String;
 begin
   result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloCALLE_PROVEEDOR];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetOldCALLE_PROVEEDORIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloCALLE_PROVEEDOR]);
+end;
+
 procedure TInfVentasArticuloBusinessProcessorRules.SetCALLE_PROVEEDORValue(const aValue: String);
 begin
   BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloCALLE_PROVEEDOR] := aValue;
 end;
 
+procedure TInfVentasArticuloBusinessProcessorRules.SetCALLE_PROVEEDORIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloCALLE_PROVEEDOR] := Null;
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetPOBLACION_PROVEEDORValue: String;
 begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPOBLACION_PROVEEDOR];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetPOBLACION_PROVEEDORIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPOBLACION_PROVEEDOR]);
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetOldPOBLACION_PROVEEDORValue: String;
 begin
   result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloPOBLACION_PROVEEDOR];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetOldPOBLACION_PROVEEDORIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloPOBLACION_PROVEEDOR]);
+end;
+
 procedure TInfVentasArticuloBusinessProcessorRules.SetPOBLACION_PROVEEDORValue(const aValue: String);
 begin
   BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPOBLACION_PROVEEDOR] := aValue;
 end;
 
+procedure TInfVentasArticuloBusinessProcessorRules.SetPOBLACION_PROVEEDORIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPOBLACION_PROVEEDOR] := Null;
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetPROVINCIA_PROVEEDORValue: String;
 begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPROVINCIA_PROVEEDOR];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetPROVINCIA_PROVEEDORIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPROVINCIA_PROVEEDOR]);
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetOldPROVINCIA_PROVEEDORValue: String;
 begin
   result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloPROVINCIA_PROVEEDOR];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetOldPROVINCIA_PROVEEDORIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloPROVINCIA_PROVEEDOR]);
+end;
+
 procedure TInfVentasArticuloBusinessProcessorRules.SetPROVINCIA_PROVEEDORValue(const aValue: String);
 begin
   BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPROVINCIA_PROVEEDOR] := aValue;
 end;
 
+procedure TInfVentasArticuloBusinessProcessorRules.SetPROVINCIA_PROVEEDORIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPROVINCIA_PROVEEDOR] := Null;
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetNIF_CIF_CLIENTEValue: String;
 begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNIF_CIF_CLIENTE];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetNIF_CIF_CLIENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNIF_CIF_CLIENTE]);
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetOldNIF_CIF_CLIENTEValue: String;
 begin
   result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloNIF_CIF_CLIENTE];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetOldNIF_CIF_CLIENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloNIF_CIF_CLIENTE]);
+end;
+
 procedure TInfVentasArticuloBusinessProcessorRules.SetNIF_CIF_CLIENTEValue(const aValue: String);
 begin
   BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNIF_CIF_CLIENTE] := aValue;
 end;
 
+procedure TInfVentasArticuloBusinessProcessorRules.SetNIF_CIF_CLIENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNIF_CIF_CLIENTE] := Null;
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetNOMBRE_CLIENTEValue: String;
 begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNOMBRE_CLIENTE];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetNOMBRE_CLIENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNOMBRE_CLIENTE]);
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetOldNOMBRE_CLIENTEValue: String;
 begin
   result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloNOMBRE_CLIENTE];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetOldNOMBRE_CLIENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloNOMBRE_CLIENTE]);
+end;
+
 procedure TInfVentasArticuloBusinessProcessorRules.SetNOMBRE_CLIENTEValue(const aValue: String);
 begin
   BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNOMBRE_CLIENTE] := aValue;
 end;
 
+procedure TInfVentasArticuloBusinessProcessorRules.SetNOMBRE_CLIENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNOMBRE_CLIENTE] := Null;
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetNOMBRE_COMERCIAL_CLIENTEValue: String;
 begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNOMBRE_COMERCIAL_CLIENTE];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetNOMBRE_COMERCIAL_CLIENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNOMBRE_COMERCIAL_CLIENTE]);
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetOldNOMBRE_COMERCIAL_CLIENTEValue: String;
 begin
   result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloNOMBRE_COMERCIAL_CLIENTE];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetOldNOMBRE_COMERCIAL_CLIENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloNOMBRE_COMERCIAL_CLIENTE]);
+end;
+
 procedure TInfVentasArticuloBusinessProcessorRules.SetNOMBRE_COMERCIAL_CLIENTEValue(const aValue: String);
 begin
   BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNOMBRE_COMERCIAL_CLIENTE] := aValue;
 end;
 
+procedure TInfVentasArticuloBusinessProcessorRules.SetNOMBRE_COMERCIAL_CLIENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNOMBRE_COMERCIAL_CLIENTE] := Null;
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetCALLE_CLIENTEValue: String;
 begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloCALLE_CLIENTE];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetCALLE_CLIENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloCALLE_CLIENTE]);
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetOldCALLE_CLIENTEValue: String;
 begin
   result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloCALLE_CLIENTE];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetOldCALLE_CLIENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloCALLE_CLIENTE]);
+end;
+
 procedure TInfVentasArticuloBusinessProcessorRules.SetCALLE_CLIENTEValue(const aValue: String);
 begin
   BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloCALLE_CLIENTE] := aValue;
 end;
 
+procedure TInfVentasArticuloBusinessProcessorRules.SetCALLE_CLIENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloCALLE_CLIENTE] := Null;
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetPOBLACION_CLIENTEValue: String;
 begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPOBLACION_CLIENTE];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetPOBLACION_CLIENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPOBLACION_CLIENTE]);
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetOldPOBLACION_CLIENTEValue: String;
 begin
   result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloPOBLACION_CLIENTE];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetOldPOBLACION_CLIENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloPOBLACION_CLIENTE]);
+end;
+
 procedure TInfVentasArticuloBusinessProcessorRules.SetPOBLACION_CLIENTEValue(const aValue: String);
 begin
   BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPOBLACION_CLIENTE] := aValue;
 end;
 
+procedure TInfVentasArticuloBusinessProcessorRules.SetPOBLACION_CLIENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPOBLACION_CLIENTE] := Null;
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetPROVINCIA_CLIENTEValue: String;
 begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPROVINCIA_CLIENTE];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetPROVINCIA_CLIENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPROVINCIA_CLIENTE]);
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetOldPROVINCIA_CLIENTEValue: String;
 begin
   result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloPROVINCIA_CLIENTE];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetOldPROVINCIA_CLIENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloPROVINCIA_CLIENTE]);
+end;
+
 procedure TInfVentasArticuloBusinessProcessorRules.SetPROVINCIA_CLIENTEValue(const aValue: String);
 begin
   BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPROVINCIA_CLIENTE] := aValue;
 end;
 
+procedure TInfVentasArticuloBusinessProcessorRules.SetPROVINCIA_CLIENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPROVINCIA_CLIENTE] := Null;
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetNIF_CIF_AGENTEValue: String;
 begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNIF_CIF_AGENTE];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetNIF_CIF_AGENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNIF_CIF_AGENTE]);
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetOldNIF_CIF_AGENTEValue: String;
 begin
   result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloNIF_CIF_AGENTE];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetOldNIF_CIF_AGENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloNIF_CIF_AGENTE]);
+end;
+
 procedure TInfVentasArticuloBusinessProcessorRules.SetNIF_CIF_AGENTEValue(const aValue: String);
 begin
   BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNIF_CIF_AGENTE] := aValue;
 end;
 
+procedure TInfVentasArticuloBusinessProcessorRules.SetNIF_CIF_AGENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNIF_CIF_AGENTE] := Null;
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetNOMBRE_AGENTEValue: String;
 begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNOMBRE_AGENTE];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetNOMBRE_AGENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNOMBRE_AGENTE]);
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetOldNOMBRE_AGENTEValue: String;
 begin
   result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloNOMBRE_AGENTE];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetOldNOMBRE_AGENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloNOMBRE_AGENTE]);
+end;
+
 procedure TInfVentasArticuloBusinessProcessorRules.SetNOMBRE_AGENTEValue(const aValue: String);
 begin
   BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNOMBRE_AGENTE] := aValue;
 end;
 
+procedure TInfVentasArticuloBusinessProcessorRules.SetNOMBRE_AGENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloNOMBRE_AGENTE] := Null;
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetCALLE_AGENTEValue: String;
 begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloCALLE_AGENTE];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetCALLE_AGENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloCALLE_AGENTE]);
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetOldCALLE_AGENTEValue: String;
 begin
   result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloCALLE_AGENTE];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetOldCALLE_AGENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloCALLE_AGENTE]);
+end;
+
 procedure TInfVentasArticuloBusinessProcessorRules.SetCALLE_AGENTEValue(const aValue: String);
 begin
   BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloCALLE_AGENTE] := aValue;
 end;
 
+procedure TInfVentasArticuloBusinessProcessorRules.SetCALLE_AGENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloCALLE_AGENTE] := Null;
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetPOBLACION_AGENTEValue: String;
 begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPOBLACION_AGENTE];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetPOBLACION_AGENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPOBLACION_AGENTE]);
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetOldPOBLACION_AGENTEValue: String;
 begin
   result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloPOBLACION_AGENTE];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetOldPOBLACION_AGENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloPOBLACION_AGENTE]);
+end;
+
 procedure TInfVentasArticuloBusinessProcessorRules.SetPOBLACION_AGENTEValue(const aValue: String);
 begin
   BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPOBLACION_AGENTE] := aValue;
 end;
 
+procedure TInfVentasArticuloBusinessProcessorRules.SetPOBLACION_AGENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPOBLACION_AGENTE] := Null;
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetPROVINCIA_AGENTEValue: String;
 begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPROVINCIA_AGENTE];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetPROVINCIA_AGENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPROVINCIA_AGENTE]);
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetOldPROVINCIA_AGENTEValue: String;
 begin
   result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloPROVINCIA_AGENTE];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetOldPROVINCIA_AGENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloPROVINCIA_AGENTE]);
+end;
+
 procedure TInfVentasArticuloBusinessProcessorRules.SetPROVINCIA_AGENTEValue(const aValue: String);
 begin
   BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPROVINCIA_AGENTE] := aValue;
 end;
 
+procedure TInfVentasArticuloBusinessProcessorRules.SetPROVINCIA_AGENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloPROVINCIA_AGENTE] := Null;
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetCOMISION_AGENTEValue: Float;
 begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloCOMISION_AGENTE];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetCOMISION_AGENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloCOMISION_AGENTE]);
+end;
+
 function TInfVentasArticuloBusinessProcessorRules.GetOldCOMISION_AGENTEValue: Float;
 begin
   result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloCOMISION_AGENTE];
 end;
 
+function TInfVentasArticuloBusinessProcessorRules.GetOldCOMISION_AGENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloCOMISION_AGENTE]);
+end;
+
 procedure TInfVentasArticuloBusinessProcessorRules.SetCOMISION_AGENTEValue(const aValue: Float);
 begin
   BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloCOMISION_AGENTE] := aValue;
 end;
 
-function TInfVentasArticuloBusinessProcessorRules.GetIMPORTE_COMISION_AGENTEValue: Currency;
+procedure TInfVentasArticuloBusinessProcessorRules.SetCOMISION_AGENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloCOMISION_AGENTE] := Null;
+end;
+
+function TInfVentasArticuloBusinessProcessorRules.GetIMPORTE_COMISION_AGENTEValue: Float;
 begin
   result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_COMISION_AGENTE];
 end;
 
-function TInfVentasArticuloBusinessProcessorRules.GetOldIMPORTE_COMISION_AGENTEValue: Currency;
+function TInfVentasArticuloBusinessProcessorRules.GetIMPORTE_COMISION_AGENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_COMISION_AGENTE]);
+end;
+
+function TInfVentasArticuloBusinessProcessorRules.GetOldIMPORTE_COMISION_AGENTEValue: Float;
 begin
   result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloIMPORTE_COMISION_AGENTE];
 end;
 
-procedure TInfVentasArticuloBusinessProcessorRules.SetIMPORTE_COMISION_AGENTEValue(const aValue: Currency);
+function TInfVentasArticuloBusinessProcessorRules.GetOldIMPORTE_COMISION_AGENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasArticuloIMPORTE_COMISION_AGENTE]);
+end;
+
+procedure TInfVentasArticuloBusinessProcessorRules.SetIMPORTE_COMISION_AGENTEValue(const aValue: Float);
 begin
   BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_COMISION_AGENTE] := aValue;
 end;
 
+procedure TInfVentasArticuloBusinessProcessorRules.SetIMPORTE_COMISION_AGENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasArticuloIMPORTE_COMISION_AGENTE] := Null;
+end;
+
+
+{ TTablaVaciaBusinessProcessorRules }
+constructor TTablaVaciaBusinessProcessorRules.Create(aBusinessProcessor: TDABusinessProcessor);
+begin
+  inherited;
+end;
+
+destructor TTablaVaciaBusinessProcessorRules.Destroy;
+begin
+  inherited;
+end;
+
+
+{ TInfVentasAlbArticuloBusinessProcessorRules }
+constructor TInfVentasAlbArticuloBusinessProcessorRules.Create(aBusinessProcessor: TDABusinessProcessor);
+begin
+  inherited;
+end;
+
+destructor TInfVentasAlbArticuloBusinessProcessorRules.Destroy;
+begin
+  inherited;
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetID_ALBARANValue: Integer;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloID_ALBARAN];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetID_ALBARANIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloID_ALBARAN]);
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldID_ALBARANValue: Integer;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloID_ALBARAN];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldID_ALBARANIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloID_ALBARAN]);
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetID_ALBARANValue(const aValue: Integer);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloID_ALBARAN] := aValue;
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetID_ALBARANIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloID_ALBARAN] := Null;
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetID_EMPRESAValue: Integer;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloID_EMPRESA];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetID_EMPRESAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloID_EMPRESA]);
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldID_EMPRESAValue: Integer;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloID_EMPRESA];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldID_EMPRESAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloID_EMPRESA]);
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetID_EMPRESAValue(const aValue: Integer);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloID_EMPRESA] := aValue;
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetID_EMPRESAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloID_EMPRESA] := Null;
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetREFERENCIA_ALBARANValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloREFERENCIA_ALBARAN];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetREFERENCIA_ALBARANIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloREFERENCIA_ALBARAN]);
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldREFERENCIA_ALBARANValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloREFERENCIA_ALBARAN];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldREFERENCIA_ALBARANIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloREFERENCIA_ALBARAN]);
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetREFERENCIA_ALBARANValue(const aValue: String);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloREFERENCIA_ALBARAN] := aValue;
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetREFERENCIA_ALBARANIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloREFERENCIA_ALBARAN] := Null;
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetFECHA_ALBARANValue: DateTime;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloFECHA_ALBARAN];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetFECHA_ALBARANIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloFECHA_ALBARAN]);
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldFECHA_ALBARANValue: DateTime;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloFECHA_ALBARAN];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldFECHA_ALBARANIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloFECHA_ALBARAN]);
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetFECHA_ALBARANValue(const aValue: DateTime);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloFECHA_ALBARAN] := aValue;
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetFECHA_ALBARANIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloFECHA_ALBARAN] := Null;
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetIMPORTE_TOTAL_ALBARANValue: Currency;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloIMPORTE_TOTAL_ALBARAN];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetIMPORTE_TOTAL_ALBARANIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloIMPORTE_TOTAL_ALBARAN]);
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldIMPORTE_TOTAL_ALBARANValue: Currency;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloIMPORTE_TOTAL_ALBARAN];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldIMPORTE_TOTAL_ALBARANIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloIMPORTE_TOTAL_ALBARAN]);
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetIMPORTE_TOTAL_ALBARANValue(const aValue: Currency);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloIMPORTE_TOTAL_ALBARAN] := aValue;
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetIMPORTE_TOTAL_ALBARANIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloIMPORTE_TOTAL_ALBARAN] := Null;
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetID_ARTICULOValue: Integer;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloID_ARTICULO];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetID_ARTICULOIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloID_ARTICULO]);
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldID_ARTICULOValue: Integer;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloID_ARTICULO];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldID_ARTICULOIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloID_ARTICULO]);
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetID_ARTICULOValue(const aValue: Integer);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloID_ARTICULO] := aValue;
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetID_ARTICULOIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloID_ARTICULO] := Null;
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetFAMILIAValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloFAMILIA];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetFAMILIAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloFAMILIA]);
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldFAMILIAValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloFAMILIA];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldFAMILIAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloFAMILIA]);
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetFAMILIAValue(const aValue: String);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloFAMILIA] := aValue;
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetFAMILIAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloFAMILIA] := Null;
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetREFERENCIAValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloREFERENCIA];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetREFERENCIAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloREFERENCIA]);
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldREFERENCIAValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloREFERENCIA];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldREFERENCIAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloREFERENCIA]);
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetREFERENCIAValue(const aValue: String);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloREFERENCIA] := aValue;
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetREFERENCIAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloREFERENCIA] := Null;
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetREFERENCIA_PROVValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloREFERENCIA_PROV];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetREFERENCIA_PROVIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloREFERENCIA_PROV]);
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldREFERENCIA_PROVValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloREFERENCIA_PROV];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldREFERENCIA_PROVIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloREFERENCIA_PROV]);
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetREFERENCIA_PROVValue(const aValue: String);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloREFERENCIA_PROV] := aValue;
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetREFERENCIA_PROVIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloREFERENCIA_PROV] := Null;
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetDESCRIPCIONValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloDESCRIPCION];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetDESCRIPCIONIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloDESCRIPCION]);
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldDESCRIPCIONValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloDESCRIPCION];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldDESCRIPCIONIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloDESCRIPCION]);
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetDESCRIPCIONValue(const aValue: String);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloDESCRIPCION] := aValue;
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetDESCRIPCIONIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloDESCRIPCION] := Null;
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetCOMISIONABLEValue: SmallInt;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloCOMISIONABLE];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetCOMISIONABLEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloCOMISIONABLE]);
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldCOMISIONABLEValue: SmallInt;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloCOMISIONABLE];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldCOMISIONABLEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloCOMISIONABLE]);
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetCOMISIONABLEValue(const aValue: SmallInt);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloCOMISIONABLE] := aValue;
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetCOMISIONABLEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloCOMISIONABLE] := Null;
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetINVENTARIABLEValue: SmallInt;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloINVENTARIABLE];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetINVENTARIABLEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloINVENTARIABLE]);
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldINVENTARIABLEValue: SmallInt;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloINVENTARIABLE];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldINVENTARIABLEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloINVENTARIABLE]);
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetINVENTARIABLEValue(const aValue: SmallInt);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloINVENTARIABLE] := aValue;
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetINVENTARIABLEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloINVENTARIABLE] := Null;
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetIMPORTE_UNIDAD_COSTEValue: Currency;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloIMPORTE_UNIDAD_COSTE];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetIMPORTE_UNIDAD_COSTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloIMPORTE_UNIDAD_COSTE]);
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldIMPORTE_UNIDAD_COSTEValue: Currency;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloIMPORTE_UNIDAD_COSTE];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldIMPORTE_UNIDAD_COSTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloIMPORTE_UNIDAD_COSTE]);
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetIMPORTE_UNIDAD_COSTEValue(const aValue: Currency);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloIMPORTE_UNIDAD_COSTE] := aValue;
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetIMPORTE_UNIDAD_COSTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloIMPORTE_UNIDAD_COSTE] := Null;
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetDESCUENTO_PROVEEDOR_COSTEValue: Float;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloDESCUENTO_PROVEEDOR_COSTE];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetDESCUENTO_PROVEEDOR_COSTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloDESCUENTO_PROVEEDOR_COSTE]);
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldDESCUENTO_PROVEEDOR_COSTEValue: Float;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloDESCUENTO_PROVEEDOR_COSTE];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldDESCUENTO_PROVEEDOR_COSTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloDESCUENTO_PROVEEDOR_COSTE]);
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetDESCUENTO_PROVEEDOR_COSTEValue(const aValue: Float);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloDESCUENTO_PROVEEDOR_COSTE] := aValue;
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetDESCUENTO_PROVEEDOR_COSTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloDESCUENTO_PROVEEDOR_COSTE] := Null;
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetIMPORTE_NETO_COSTEValue: Currency;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloIMPORTE_NETO_COSTE];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetIMPORTE_NETO_COSTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloIMPORTE_NETO_COSTE]);
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldIMPORTE_NETO_COSTEValue: Currency;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloIMPORTE_NETO_COSTE];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldIMPORTE_NETO_COSTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloIMPORTE_NETO_COSTE]);
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetIMPORTE_NETO_COSTEValue(const aValue: Currency);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloIMPORTE_NETO_COSTE] := aValue;
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetIMPORTE_NETO_COSTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloIMPORTE_NETO_COSTE] := Null;
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetIMPORTE_PORTE_COSTEValue: Currency;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloIMPORTE_PORTE_COSTE];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetIMPORTE_PORTE_COSTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloIMPORTE_PORTE_COSTE]);
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldIMPORTE_PORTE_COSTEValue: Currency;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloIMPORTE_PORTE_COSTE];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldIMPORTE_PORTE_COSTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloIMPORTE_PORTE_COSTE]);
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetIMPORTE_PORTE_COSTEValue(const aValue: Currency);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloIMPORTE_PORTE_COSTE] := aValue;
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetIMPORTE_PORTE_COSTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloIMPORTE_PORTE_COSTE] := Null;
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetCANTIDADValue: Currency;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloCANTIDAD];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetCANTIDADIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloCANTIDAD]);
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldCANTIDADValue: Currency;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloCANTIDAD];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldCANTIDADIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloCANTIDAD]);
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetCANTIDADValue(const aValue: Currency);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloCANTIDAD] := aValue;
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetCANTIDADIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloCANTIDAD] := Null;
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetIMPORTE_UNIDAD_VENTAValue: Currency;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloIMPORTE_UNIDAD_VENTA];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetIMPORTE_UNIDAD_VENTAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloIMPORTE_UNIDAD_VENTA]);
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldIMPORTE_UNIDAD_VENTAValue: Currency;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloIMPORTE_UNIDAD_VENTA];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldIMPORTE_UNIDAD_VENTAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloIMPORTE_UNIDAD_VENTA]);
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetIMPORTE_UNIDAD_VENTAValue(const aValue: Currency);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloIMPORTE_UNIDAD_VENTA] := aValue;
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetIMPORTE_UNIDAD_VENTAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloIMPORTE_UNIDAD_VENTA] := Null;
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetDESCUENTO_CLIENTE_VENTAValue: Float;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloDESCUENTO_CLIENTE_VENTA];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetDESCUENTO_CLIENTE_VENTAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloDESCUENTO_CLIENTE_VENTA]);
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldDESCUENTO_CLIENTE_VENTAValue: Float;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloDESCUENTO_CLIENTE_VENTA];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldDESCUENTO_CLIENTE_VENTAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloDESCUENTO_CLIENTE_VENTA]);
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetDESCUENTO_CLIENTE_VENTAValue(const aValue: Float);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloDESCUENTO_CLIENTE_VENTA] := aValue;
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetDESCUENTO_CLIENTE_VENTAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloDESCUENTO_CLIENTE_VENTA] := Null;
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetIMPORTE_NETO_VENTAValue: Float;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloIMPORTE_NETO_VENTA];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetIMPORTE_NETO_VENTAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloIMPORTE_NETO_VENTA]);
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldIMPORTE_NETO_VENTAValue: Float;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloIMPORTE_NETO_VENTA];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldIMPORTE_NETO_VENTAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloIMPORTE_NETO_VENTA]);
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetIMPORTE_NETO_VENTAValue(const aValue: Float);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloIMPORTE_NETO_VENTA] := aValue;
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetIMPORTE_NETO_VENTAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloIMPORTE_NETO_VENTA] := Null;
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetIMPORTE_PORTE_VENTAValue: Currency;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloIMPORTE_PORTE_VENTA];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetIMPORTE_PORTE_VENTAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloIMPORTE_PORTE_VENTA]);
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldIMPORTE_PORTE_VENTAValue: Currency;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloIMPORTE_PORTE_VENTA];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldIMPORTE_PORTE_VENTAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloIMPORTE_PORTE_VENTA]);
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetIMPORTE_PORTE_VENTAValue(const aValue: Currency);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloIMPORTE_PORTE_VENTA] := aValue;
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetIMPORTE_PORTE_VENTAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloIMPORTE_PORTE_VENTA] := Null;
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetIMPORTE_TOTAL_VENTAValue: Currency;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloIMPORTE_TOTAL_VENTA];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetIMPORTE_TOTAL_VENTAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloIMPORTE_TOTAL_VENTA]);
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldIMPORTE_TOTAL_VENTAValue: Currency;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloIMPORTE_TOTAL_VENTA];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldIMPORTE_TOTAL_VENTAIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloIMPORTE_TOTAL_VENTA]);
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetIMPORTE_TOTAL_VENTAValue(const aValue: Currency);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloIMPORTE_TOTAL_VENTA] := aValue;
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetIMPORTE_TOTAL_VENTAIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloIMPORTE_TOTAL_VENTA] := Null;
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetNIF_CIF_PROVEEDORValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloNIF_CIF_PROVEEDOR];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetNIF_CIF_PROVEEDORIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloNIF_CIF_PROVEEDOR]);
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldNIF_CIF_PROVEEDORValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloNIF_CIF_PROVEEDOR];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldNIF_CIF_PROVEEDORIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloNIF_CIF_PROVEEDOR]);
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetNIF_CIF_PROVEEDORValue(const aValue: String);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloNIF_CIF_PROVEEDOR] := aValue;
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetNIF_CIF_PROVEEDORIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloNIF_CIF_PROVEEDOR] := Null;
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetNOMBRE_PROVEEDORValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloNOMBRE_PROVEEDOR];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetNOMBRE_PROVEEDORIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloNOMBRE_PROVEEDOR]);
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldNOMBRE_PROVEEDORValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloNOMBRE_PROVEEDOR];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldNOMBRE_PROVEEDORIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloNOMBRE_PROVEEDOR]);
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetNOMBRE_PROVEEDORValue(const aValue: String);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloNOMBRE_PROVEEDOR] := aValue;
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetNOMBRE_PROVEEDORIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloNOMBRE_PROVEEDOR] := Null;
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetCALLE_PROVEEDORValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloCALLE_PROVEEDOR];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetCALLE_PROVEEDORIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloCALLE_PROVEEDOR]);
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldCALLE_PROVEEDORValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloCALLE_PROVEEDOR];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldCALLE_PROVEEDORIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloCALLE_PROVEEDOR]);
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetCALLE_PROVEEDORValue(const aValue: String);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloCALLE_PROVEEDOR] := aValue;
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetCALLE_PROVEEDORIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloCALLE_PROVEEDOR] := Null;
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetPOBLACION_PROVEEDORValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloPOBLACION_PROVEEDOR];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetPOBLACION_PROVEEDORIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloPOBLACION_PROVEEDOR]);
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldPOBLACION_PROVEEDORValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloPOBLACION_PROVEEDOR];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldPOBLACION_PROVEEDORIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloPOBLACION_PROVEEDOR]);
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetPOBLACION_PROVEEDORValue(const aValue: String);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloPOBLACION_PROVEEDOR] := aValue;
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetPOBLACION_PROVEEDORIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloPOBLACION_PROVEEDOR] := Null;
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetPROVINCIA_PROVEEDORValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloPROVINCIA_PROVEEDOR];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetPROVINCIA_PROVEEDORIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloPROVINCIA_PROVEEDOR]);
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldPROVINCIA_PROVEEDORValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloPROVINCIA_PROVEEDOR];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldPROVINCIA_PROVEEDORIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloPROVINCIA_PROVEEDOR]);
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetPROVINCIA_PROVEEDORValue(const aValue: String);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloPROVINCIA_PROVEEDOR] := aValue;
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetPROVINCIA_PROVEEDORIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloPROVINCIA_PROVEEDOR] := Null;
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetNIF_CIF_CLIENTEValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloNIF_CIF_CLIENTE];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetNIF_CIF_CLIENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloNIF_CIF_CLIENTE]);
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldNIF_CIF_CLIENTEValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloNIF_CIF_CLIENTE];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldNIF_CIF_CLIENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloNIF_CIF_CLIENTE]);
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetNIF_CIF_CLIENTEValue(const aValue: String);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloNIF_CIF_CLIENTE] := aValue;
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetNIF_CIF_CLIENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloNIF_CIF_CLIENTE] := Null;
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetNOMBRE_CLIENTEValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloNOMBRE_CLIENTE];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetNOMBRE_CLIENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloNOMBRE_CLIENTE]);
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldNOMBRE_CLIENTEValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloNOMBRE_CLIENTE];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldNOMBRE_CLIENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloNOMBRE_CLIENTE]);
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetNOMBRE_CLIENTEValue(const aValue: String);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloNOMBRE_CLIENTE] := aValue;
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetNOMBRE_CLIENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloNOMBRE_CLIENTE] := Null;
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetNOMBRE_COMERCIAL_CLIENTEValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloNOMBRE_COMERCIAL_CLIENTE];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetNOMBRE_COMERCIAL_CLIENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloNOMBRE_COMERCIAL_CLIENTE]);
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldNOMBRE_COMERCIAL_CLIENTEValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloNOMBRE_COMERCIAL_CLIENTE];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldNOMBRE_COMERCIAL_CLIENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloNOMBRE_COMERCIAL_CLIENTE]);
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetNOMBRE_COMERCIAL_CLIENTEValue(const aValue: String);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloNOMBRE_COMERCIAL_CLIENTE] := aValue;
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetNOMBRE_COMERCIAL_CLIENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloNOMBRE_COMERCIAL_CLIENTE] := Null;
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetCALLE_CLIENTEValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloCALLE_CLIENTE];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetCALLE_CLIENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloCALLE_CLIENTE]);
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldCALLE_CLIENTEValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloCALLE_CLIENTE];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldCALLE_CLIENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloCALLE_CLIENTE]);
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetCALLE_CLIENTEValue(const aValue: String);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloCALLE_CLIENTE] := aValue;
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetCALLE_CLIENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloCALLE_CLIENTE] := Null;
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetPOBLACION_CLIENTEValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloPOBLACION_CLIENTE];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetPOBLACION_CLIENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloPOBLACION_CLIENTE]);
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldPOBLACION_CLIENTEValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloPOBLACION_CLIENTE];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldPOBLACION_CLIENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloPOBLACION_CLIENTE]);
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetPOBLACION_CLIENTEValue(const aValue: String);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloPOBLACION_CLIENTE] := aValue;
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetPOBLACION_CLIENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloPOBLACION_CLIENTE] := Null;
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetPROVINCIA_CLIENTEValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloPROVINCIA_CLIENTE];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetPROVINCIA_CLIENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloPROVINCIA_CLIENTE]);
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldPROVINCIA_CLIENTEValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloPROVINCIA_CLIENTE];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldPROVINCIA_CLIENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloPROVINCIA_CLIENTE]);
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetPROVINCIA_CLIENTEValue(const aValue: String);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloPROVINCIA_CLIENTE] := aValue;
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetPROVINCIA_CLIENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloPROVINCIA_CLIENTE] := Null;
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetNIF_CIF_AGENTEValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloNIF_CIF_AGENTE];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetNIF_CIF_AGENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloNIF_CIF_AGENTE]);
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldNIF_CIF_AGENTEValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloNIF_CIF_AGENTE];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldNIF_CIF_AGENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloNIF_CIF_AGENTE]);
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetNIF_CIF_AGENTEValue(const aValue: String);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloNIF_CIF_AGENTE] := aValue;
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetNIF_CIF_AGENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloNIF_CIF_AGENTE] := Null;
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetNOMBRE_AGENTEValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloNOMBRE_AGENTE];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetNOMBRE_AGENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloNOMBRE_AGENTE]);
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldNOMBRE_AGENTEValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloNOMBRE_AGENTE];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldNOMBRE_AGENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloNOMBRE_AGENTE]);
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetNOMBRE_AGENTEValue(const aValue: String);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloNOMBRE_AGENTE] := aValue;
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetNOMBRE_AGENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloNOMBRE_AGENTE] := Null;
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetCALLE_AGENTEValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloCALLE_AGENTE];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetCALLE_AGENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloCALLE_AGENTE]);
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldCALLE_AGENTEValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloCALLE_AGENTE];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldCALLE_AGENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloCALLE_AGENTE]);
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetCALLE_AGENTEValue(const aValue: String);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloCALLE_AGENTE] := aValue;
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetCALLE_AGENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloCALLE_AGENTE] := Null;
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetPOBLACION_AGENTEValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloPOBLACION_AGENTE];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetPOBLACION_AGENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloPOBLACION_AGENTE]);
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldPOBLACION_AGENTEValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloPOBLACION_AGENTE];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldPOBLACION_AGENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloPOBLACION_AGENTE]);
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetPOBLACION_AGENTEValue(const aValue: String);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloPOBLACION_AGENTE] := aValue;
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetPOBLACION_AGENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloPOBLACION_AGENTE] := Null;
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetPROVINCIA_AGENTEValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloPROVINCIA_AGENTE];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetPROVINCIA_AGENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloPROVINCIA_AGENTE]);
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldPROVINCIA_AGENTEValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloPROVINCIA_AGENTE];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldPROVINCIA_AGENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloPROVINCIA_AGENTE]);
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetPROVINCIA_AGENTEValue(const aValue: String);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloPROVINCIA_AGENTE] := aValue;
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetPROVINCIA_AGENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloPROVINCIA_AGENTE] := Null;
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetCOMISION_AGENTEValue: Float;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloCOMISION_AGENTE];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetCOMISION_AGENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloCOMISION_AGENTE]);
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldCOMISION_AGENTEValue: Float;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloCOMISION_AGENTE];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldCOMISION_AGENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloCOMISION_AGENTE]);
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetCOMISION_AGENTEValue(const aValue: Float);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloCOMISION_AGENTE] := aValue;
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetCOMISION_AGENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloCOMISION_AGENTE] := Null;
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetIMPORTE_COMISION_AGENTEValue: Float;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloIMPORTE_COMISION_AGENTE];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetIMPORTE_COMISION_AGENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloIMPORTE_COMISION_AGENTE]);
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldIMPORTE_COMISION_AGENTEValue: Float;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloIMPORTE_COMISION_AGENTE];
+end;
+
+function TInfVentasAlbArticuloBusinessProcessorRules.GetOldIMPORTE_COMISION_AGENTEIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloIMPORTE_COMISION_AGENTE]);
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetIMPORTE_COMISION_AGENTEValue(const aValue: Float);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloIMPORTE_COMISION_AGENTE] := aValue;
+end;
+
+procedure TInfVentasAlbArticuloBusinessProcessorRules.SetIMPORTE_COMISION_AGENTEIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloIMPORTE_COMISION_AGENTE] := Null;
+end;
+
 
 initialization
   RegisterBusinessProcessorRules(RID_InfVentasArticuloDelta, TInfVentasArticuloBusinessProcessorRules);
+  RegisterBusinessProcessorRules(RID_TablaVaciaDelta, TTablaVaciaBusinessProcessorRules);
+  RegisterBusinessProcessorRules(RID_InfVentasAlbArticuloDelta, TInfVentasAlbArticuloBusinessProcessorRules);
 
 end.
diff --git a/Source/Modulos/Informe ventas por articulo/Model/uBizInfVentasArticulo.pas b/Source/Modulos/Informe ventas por articulo/Model/uBizInfVentasArticulo.pas
index d86a438..21c9397 100644
--- a/Source/Modulos/Informe ventas por articulo/Model/uBizInfVentasArticulo.pas	
+++ b/Source/Modulos/Informe ventas por articulo/Model/uBizInfVentasArticulo.pas	
@@ -8,6 +8,7 @@ uses
 
 const
   BIZ_InfVentasArticulo = 'Client.InfVentasArticulo';
+  BIZ_InfVentasAlbArticulo = 'Client.InfVentasAlbArticulo';
 
 type
   IBizInfVentasArticulo = interface(IInfVentasArticulo)
@@ -17,6 +18,13 @@ type
     property VisibleColumns : String read GetVisibleColumns write SetVisibleColumns;
   end;
 
+  IBizInfVentasAlbArticulo = interface(IInfVentasAlbArticulo)
+  ['{85BA702E-85F5-4725-BF13-3E017E76C37A}']
+    function GetVisibleColumns: String;
+    procedure SetVisibleColumns(const Value: String);
+    property VisibleColumns : String read GetVisibleColumns write SetVisibleColumns;
+  end;
+
   TBizInfVentasArticulo = class(TInfVentasArticuloDataTableRules, IBizInfVentasArticulo)
   private
     FVisibleColumns : String;
@@ -27,6 +35,15 @@ type
     property VisibleColumns : String read GetVisibleColumns write SetVisibleColumns;
   end;
 
+  TBizInfVentasAlbArticulo = class(TInfVentasAlbArticuloDataTableRules, IBizInfVentasAlbArticulo)
+  private
+    FVisibleColumns : String;
+  protected
+    function GetVisibleColumns: String;
+    procedure SetVisibleColumns(const Value: String);
+  public
+    property VisibleColumns : String read GetVisibleColumns write SetVisibleColumns;
+  end;
 
 implementation
 
@@ -42,8 +59,21 @@ begin
   FVisibleColumns := Value
 end;
 
+{ TBizInfVentasAlbArticulo }
+
+function TBizInfVentasAlbArticulo.GetVisibleColumns: String;
+begin
+  Result := FVisibleColumns
+end;
+
+procedure TBizInfVentasAlbArticulo.SetVisibleColumns(const Value: String);
+begin
+  FVisibleColumns := Value
+end;
+
 initialization
   RegisterDataTableRules(BIZ_InfVentasArticulo, TBizInfVentasArticulo);
+  RegisterDataTableRules(BIZ_InfVentasAlbArticulo, TBizInfVentasAlbArticulo);
 
 finalization
 
diff --git a/Source/Modulos/Informe ventas por articulo/Servidor/srvInfVentasArticulo_Impl.dfm b/Source/Modulos/Informe ventas por articulo/Servidor/srvInfVentasArticulo_Impl.dfm
index f772945..fa0399a 100644
--- a/Source/Modulos/Informe ventas por articulo/Servidor/srvInfVentasArticulo_Impl.dfm	
+++ b/Source/Modulos/Informe ventas por articulo/Servidor/srvInfVentasArticulo_Impl.dfm	
@@ -384,6 +384,360 @@ object srvInfVentasArticulo: TsrvInfVentasArticulo
           end>
         Name = 'TablaVacia'
         Fields = <>
+      end
+      item
+        Params = <>
+        Statements = <
+          item
+            Connection = 'IBX'
+            Default = True
+            TargetTable = 'V_INF_VENTAS_ALB_ARTICULOS'
+            StatementType = stAutoSQL
+            ColumnMappings = <
+              item
+                DatasetField = 'ID_EMPRESA'
+                TableField = 'ID_EMPRESA'
+              end
+              item
+                DatasetField = 'REFERENCIA_ALBARAN'
+                TableField = 'REFERENCIA_ALBARAN'
+              end
+              item
+                DatasetField = 'FECHA_ALBARAN'
+                TableField = 'FECHA_ALBARAN'
+              end
+              item
+                DatasetField = 'IMPORTE_TOTAL_ALBARAN'
+                TableField = 'IMPORTE_TOTAL_ALBARAN'
+              end
+              item
+                DatasetField = 'ID_ARTICULO'
+                TableField = 'ID_ARTICULO'
+              end
+              item
+                DatasetField = 'FAMILIA'
+                TableField = 'FAMILIA'
+              end
+              item
+                DatasetField = 'REFERENCIA'
+                TableField = 'REFERENCIA'
+              end
+              item
+                DatasetField = 'REFERENCIA_PROV'
+                TableField = 'REFERENCIA_PROV'
+              end
+              item
+                DatasetField = 'DESCRIPCION'
+                TableField = 'DESCRIPCION'
+              end
+              item
+                DatasetField = 'COMISIONABLE'
+                TableField = 'COMISIONABLE'
+              end
+              item
+                DatasetField = 'INVENTARIABLE'
+                TableField = 'INVENTARIABLE'
+              end
+              item
+                DatasetField = 'IMPORTE_UNIDAD_COSTE'
+                TableField = 'IMPORTE_UNIDAD_COSTE'
+              end
+              item
+                DatasetField = 'DESCUENTO_PROVEEDOR_COSTE'
+                TableField = 'DESCUENTO_PROVEEDOR_COSTE'
+              end
+              item
+                DatasetField = 'IMPORTE_NETO_COSTE'
+                TableField = 'IMPORTE_NETO_COSTE'
+              end
+              item
+                DatasetField = 'IMPORTE_PORTE_COSTE'
+                TableField = 'IMPORTE_PORTE_COSTE'
+              end
+              item
+                DatasetField = 'CANTIDAD'
+                TableField = 'CANTIDAD'
+              end
+              item
+                DatasetField = 'IMPORTE_UNIDAD_VENTA'
+                TableField = 'IMPORTE_UNIDAD_VENTA'
+              end
+              item
+                DatasetField = 'DESCUENTO_CLIENTE_VENTA'
+                TableField = 'DESCUENTO_CLIENTE_VENTA'
+              end
+              item
+                DatasetField = 'IMPORTE_NETO_VENTA'
+                TableField = 'IMPORTE_NETO_VENTA'
+              end
+              item
+                DatasetField = 'IMPORTE_PORTE_VENTA'
+                TableField = 'IMPORTE_PORTE_VENTA'
+              end
+              item
+                DatasetField = 'IMPORTE_TOTAL_VENTA'
+                TableField = 'IMPORTE_TOTAL_VENTA'
+              end
+              item
+                DatasetField = 'NIF_CIF_PROVEEDOR'
+                TableField = 'NIF_CIF_PROVEEDOR'
+              end
+              item
+                DatasetField = 'NOMBRE_PROVEEDOR'
+                TableField = 'NOMBRE_PROVEEDOR'
+              end
+              item
+                DatasetField = 'CALLE_PROVEEDOR'
+                TableField = 'CALLE_PROVEEDOR'
+              end
+              item
+                DatasetField = 'POBLACION_PROVEEDOR'
+                TableField = 'POBLACION_PROVEEDOR'
+              end
+              item
+                DatasetField = 'PROVINCIA_PROVEEDOR'
+                TableField = 'PROVINCIA_PROVEEDOR'
+              end
+              item
+                DatasetField = 'NIF_CIF_CLIENTE'
+                TableField = 'NIF_CIF_CLIENTE'
+              end
+              item
+                DatasetField = 'NOMBRE_CLIENTE'
+                TableField = 'NOMBRE_CLIENTE'
+              end
+              item
+                DatasetField = 'NOMBRE_COMERCIAL_CLIENTE'
+                TableField = 'NOMBRE_COMERCIAL_CLIENTE'
+              end
+              item
+                DatasetField = 'CALLE_CLIENTE'
+                TableField = 'CALLE_CLIENTE'
+              end
+              item
+                DatasetField = 'POBLACION_CLIENTE'
+                TableField = 'POBLACION_CLIENTE'
+              end
+              item
+                DatasetField = 'PROVINCIA_CLIENTE'
+                TableField = 'PROVINCIA_CLIENTE'
+              end
+              item
+                DatasetField = 'NIF_CIF_AGENTE'
+                TableField = 'NIF_CIF_AGENTE'
+              end
+              item
+                DatasetField = 'NOMBRE_AGENTE'
+                TableField = 'NOMBRE_AGENTE'
+              end
+              item
+                DatasetField = 'CALLE_AGENTE'
+                TableField = 'CALLE_AGENTE'
+              end
+              item
+                DatasetField = 'POBLACION_AGENTE'
+                TableField = 'POBLACION_AGENTE'
+              end
+              item
+                DatasetField = 'PROVINCIA_AGENTE'
+                TableField = 'PROVINCIA_AGENTE'
+              end
+              item
+                DatasetField = 'COMISION_AGENTE'
+                TableField = 'COMISION_AGENTE'
+              end
+              item
+                DatasetField = 'IMPORTE_COMISION_AGENTE'
+                TableField = 'IMPORTE_COMISION_AGENTE'
+              end
+              item
+                DatasetField = 'ID_ALBARAN'
+                TableField = 'ID_ALBARAN'
+              end>
+          end>
+        Name = 'InfVentasAlbArticulo'
+        Fields = <
+          item
+            Name = 'ID_ALBARAN'
+            DataType = datInteger
+          end
+          item
+            Name = 'ID_EMPRESA'
+            DataType = datInteger
+          end
+          item
+            Name = 'REFERENCIA_ALBARAN'
+            DataType = datString
+            Size = 255
+          end
+          item
+            Name = 'FECHA_ALBARAN'
+            DataType = datDateTime
+          end
+          item
+            Name = 'IMPORTE_TOTAL_ALBARAN'
+            DataType = datCurrency
+          end
+          item
+            Name = 'ID_ARTICULO'
+            DataType = datInteger
+          end
+          item
+            Name = 'FAMILIA'
+            DataType = datString
+            Size = 255
+          end
+          item
+            Name = 'REFERENCIA'
+            DataType = datString
+            Size = 255
+          end
+          item
+            Name = 'REFERENCIA_PROV'
+            DataType = datString
+            Size = 255
+          end
+          item
+            Name = 'DESCRIPCION'
+            DataType = datString
+            Size = 255
+          end
+          item
+            Name = 'COMISIONABLE'
+            DataType = datSmallInt
+          end
+          item
+            Name = 'INVENTARIABLE'
+            DataType = datSmallInt
+          end
+          item
+            Name = 'IMPORTE_UNIDAD_COSTE'
+            DataType = datCurrency
+          end
+          item
+            Name = 'DESCUENTO_PROVEEDOR_COSTE'
+            DataType = datFloat
+          end
+          item
+            Name = 'IMPORTE_NETO_COSTE'
+            DataType = datCurrency
+          end
+          item
+            Name = 'IMPORTE_PORTE_COSTE'
+            DataType = datCurrency
+          end
+          item
+            Name = 'CANTIDAD'
+            DataType = datCurrency
+          end
+          item
+            Name = 'IMPORTE_UNIDAD_VENTA'
+            DataType = datCurrency
+          end
+          item
+            Name = 'DESCUENTO_CLIENTE_VENTA'
+            DataType = datFloat
+          end
+          item
+            Name = 'IMPORTE_NETO_VENTA'
+            DataType = datFloat
+          end
+          item
+            Name = 'IMPORTE_PORTE_VENTA'
+            DataType = datCurrency
+          end
+          item
+            Name = 'IMPORTE_TOTAL_VENTA'
+            DataType = datCurrency
+          end
+          item
+            Name = 'NIF_CIF_PROVEEDOR'
+            DataType = datString
+            Size = 15
+          end
+          item
+            Name = 'NOMBRE_PROVEEDOR'
+            DataType = datString
+            Size = 255
+          end
+          item
+            Name = 'CALLE_PROVEEDOR'
+            DataType = datString
+            Size = 255
+          end
+          item
+            Name = 'POBLACION_PROVEEDOR'
+            DataType = datString
+            Size = 255
+          end
+          item
+            Name = 'PROVINCIA_PROVEEDOR'
+            DataType = datString
+            Size = 255
+          end
+          item
+            Name = 'NIF_CIF_CLIENTE'
+            DataType = datString
+            Size = 15
+          end
+          item
+            Name = 'NOMBRE_CLIENTE'
+            DataType = datString
+            Size = 255
+          end
+          item
+            Name = 'NOMBRE_COMERCIAL_CLIENTE'
+            DataType = datString
+            Size = 255
+          end
+          item
+            Name = 'CALLE_CLIENTE'
+            DataType = datString
+            Size = 255
+          end
+          item
+            Name = 'POBLACION_CLIENTE'
+            DataType = datString
+            Size = 255
+          end
+          item
+            Name = 'PROVINCIA_CLIENTE'
+            DataType = datString
+            Size = 255
+          end
+          item
+            Name = 'NIF_CIF_AGENTE'
+            DataType = datString
+            Size = 15
+          end
+          item
+            Name = 'NOMBRE_AGENTE'
+            DataType = datString
+            Size = 255
+          end
+          item
+            Name = 'CALLE_AGENTE'
+            DataType = datString
+            Size = 255
+          end
+          item
+            Name = 'POBLACION_AGENTE'
+            DataType = datString
+            Size = 255
+          end
+          item
+            Name = 'PROVINCIA_AGENTE'
+            DataType = datString
+            Size = 255
+          end
+          item
+            Name = 'COMISION_AGENTE'
+            DataType = datFloat
+          end
+          item
+            Name = 'IMPORTE_COMISION_AGENTE'
+            DataType = datFloat
+          end>
       end>
     JoinDataTables = <>
     UnionDataTables = <>
diff --git a/Source/Modulos/Informe ventas por articulo/Views/InfVentasArticulo_view.dpk b/Source/Modulos/Informe ventas por articulo/Views/InfVentasArticulo_view.dpk
index 485497c..d721a1a 100644
--- a/Source/Modulos/Informe ventas por articulo/Views/InfVentasArticulo_view.dpk	
+++ b/Source/Modulos/Informe ventas por articulo/Views/InfVentasArticulo_view.dpk	
@@ -30,12 +30,56 @@ requires
   GUIBase,
   Informes_controller,
   Informes_view,
-  Informes_data;
+  Informes_data,
+  rtl,
+  vcl,
+  dbrtl,
+  cxLibraryD11,
+  dxThemeD11,
+  dxGDIPlusD11,
+  dxCoreD11,
+  vclx,
+  cxGridD11,
+  cxPageControlD11,
+  cxExtEditorsD11,
+  cxDataD11,
+  cxEditorsD11,
+  vcljpg,
+  vcldb,
+  cxExportD11,
+  dxPSCoreD11,
+  dxComnD11,
+  DataAbstract_Core_D11,
+  dsnap,
+  adortl,
+  RemObjects_Core_D11,
+  dxPScxCommonD11,
+  dxPSLnksD11,
+  designide,
+  xmlrtl,
+  vclactnband,
+  vclshlctrls,
+  dxPScxGrid6LnkD11,
+  dclcxLibraryD11,
+  PngComponentsD10,
+  PNG_D10,
+  tb2k_d10,
+  tbx_d10,
+  GUISDK_D11R,
+  JvStdCtrlsD11R,
+  JclVcl,
+  Jcl,
+  JvCoreD11R,
+  JvSystemD11R,
+  JvPageCompsD11R;
 
 contains
   uViewInfVentasArticulo in 'uViewInfVentasArticulo.pas' {frViewInfVentasArticulo: TFrame},
   uInfVentasArticuloViewRegister in 'uInfVentasArticuloViewRegister.pas',
   uEditorInfVentasArticulo in 'uEditorInfVentasArticulo.pas' {frEditorInfVentasArticulo: TForm},
-  uViewInfVentasArticuloGrid in 'uViewInfVentasArticuloGrid.pas' {frViewInfVentasArticuloGrid: TFrame};
+  uViewInfVentasArticuloGrid in 'uViewInfVentasArticuloGrid.pas' {frViewInfVentasArticuloGrid: TFrame},
+  uViewInfVentasAlbArticuloGrid in 'uViewInfVentasAlbArticuloGrid.pas' {frViewInfVentasAlbArticuloGrid: TFrame},
+  uViewInfVentasAlbArticulo in 'uViewInfVentasAlbArticulo.pas' {frViewInfVentasAlbArticulo: TFrame},
+  uEditorInfVentasAlbArticulo in 'uEditorInfVentasAlbArticulo.pas' {frEditorInfVentasAlbArticulo: TForm};
 
 end.
diff --git a/Source/Modulos/Informe ventas por articulo/Views/InfVentasArticulo_view.dproj b/Source/Modulos/Informe ventas por articulo/Views/InfVentasArticulo_view.dproj
index d629999..de520b0 100644
--- a/Source/Modulos/Informe ventas por articulo/Views/InfVentasArticulo_view.dproj	
+++ b/Source/Modulos/Informe ventas por articulo/Views/InfVentasArticulo_view.dproj	
@@ -1,4 +1,5 @@
-<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+<?xml version="1.0" encoding="utf-8"?>
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
   <PropertyGroup>
     <ProjectGuid>{87a074ad-cc3c-426d-af6d-c5febdd2dd07}</ProjectGuid>
     <MainSource>InfVentasArticulo_view.dpk</MainSource>
@@ -44,6 +45,14 @@
 <BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="ImplicitBuild">True</Package_Options><Package_Options Name="DesigntimeOnly">False</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName"></VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName"></VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
       
       
+      
+      
+      
+      
+      
+      
+      
+      
       <Excluded_Packages Name="C:\Archivos de programa\RemObjects Software\Pascal Script\Dcu\D10\PascalScript_RO_D10.bpl">RemObjects Pascal Script - RemObjects SDK 3.0 Integration</Excluded_Packages>
     </Excluded_Packages><Source><Source Name="MainSource">InfVentasArticulo_view.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
   </ProjectExtensions>
@@ -52,17 +61,63 @@
     <DelphiCompile Include="InfVentasArticulo_view.dpk">
       <MainSource>MainSource</MainSource>
     </DelphiCompile>
-    <DCCReference Include="..\..\Lib\GUIBase.dcp" />
-    <DCCReference Include="..\..\Lib\Informes_controller.dcp" />
-    <DCCReference Include="..\..\Lib\Informes_data.dcp" />
-    <DCCReference Include="..\..\Lib\Informes_view.dcp" />
-    <DCCReference Include="..\..\Lib\InfVentasArticulo_controller.dcp" />
-    <DCCReference Include="..\..\Lib\InfVentasArticulo_model.dcp" />
+    <DCCReference Include="adortl.dcp" />
+    <DCCReference Include="cxDataD11.dcp" />
+    <DCCReference Include="cxEditorsD11.dcp" />
+    <DCCReference Include="cxExportD11.dcp" />
+    <DCCReference Include="cxExtEditorsD11.dcp" />
+    <DCCReference Include="cxGridD11.dcp" />
+    <DCCReference Include="cxLibraryD11.dcp" />
+    <DCCReference Include="cxPageControlD11.dcp" />
+    <DCCReference Include="DataAbstract_Core_D11.dcp" />
+    <DCCReference Include="dbrtl.dcp" />
+    <DCCReference Include="dclcxLibraryD11.dcp" />
+    <DCCReference Include="designide.dcp" />
+    <DCCReference Include="dsnap.dcp" />
+    <DCCReference Include="dxComnD11.dcp" />
+    <DCCReference Include="dxCoreD11.dcp" />
+    <DCCReference Include="dxGDIPlusD11.dcp" />
+    <DCCReference Include="dxPSCoreD11.dcp" />
+    <DCCReference Include="dxPScxCommonD11.dcp" />
+    <DCCReference Include="dxPScxGrid6LnkD11.dcp" />
+    <DCCReference Include="dxPSLnksD11.dcp" />
+    <DCCReference Include="dxThemeD11.dcp" />
+    <DCCReference Include="GUIBase.dcp" />
+    <DCCReference Include="GUISDK_D11R.dcp" />
+    <DCCReference Include="Informes_controller.dcp" />
+    <DCCReference Include="Informes_data.dcp" />
+    <DCCReference Include="Informes_view.dcp" />
+    <DCCReference Include="InfVentasArticulo_controller.dcp" />
+    <DCCReference Include="InfVentasArticulo_model.dcp" />
+    <DCCReference Include="Jcl.dcp" />
+    <DCCReference Include="JclVcl.dcp" />
+    <DCCReference Include="JvCoreD11R.dcp" />
+    <DCCReference Include="JvPageCompsD11R.dcp" />
+    <DCCReference Include="JvStdCtrlsD11R.dcp" />
+    <DCCReference Include="JvSystemD11R.dcp" />
+    <DCCReference Include="PngComponentsD10.dcp" />
+    <DCCReference Include="PNG_D10.dcp" />
+    <DCCReference Include="RemObjects_Core_D11.dcp" />
+    <DCCReference Include="rtl.dcp" />
+    <DCCReference Include="tb2k_d10.dcp" />
+    <DCCReference Include="tbx_d10.dcp" />
+    <DCCReference Include="uEditorInfVentasAlbArticulo.pas">
+      <Form>frEditorInfVentasAlArticulo</Form>
+      <DesignClass>TForm</DesignClass>
+    </DCCReference>
     <DCCReference Include="uEditorInfVentasArticulo.pas">
       <Form>frEditorInfVentasArticulo</Form>
       <DesignClass>TForm</DesignClass>
     </DCCReference>
     <DCCReference Include="uInfVentasArticuloViewRegister.pas" />
+    <DCCReference Include="uViewInfVentasAlbArticulo.pas">
+      <Form>frViewInfVentasAlbArticulo</Form>
+      <DesignClass>TFrame</DesignClass>
+    </DCCReference>
+    <DCCReference Include="uViewInfVentasAlbArticuloGrid.pas">
+      <Form>frViewInfVentasAlbArticuloGrid</Form>
+      <DesignClass>TFrame</DesignClass>
+    </DCCReference>
     <DCCReference Include="uViewInfVentasArticulo.pas">
       <Form>frViewInfVentasArticulo</Form>
       <DesignClass>TFrame</DesignClass>
@@ -71,6 +126,13 @@
       <Form>frViewInfVentasArticuloGrid</Form>
       <DesignClass>TFrame</DesignClass>
     </DCCReference>
+    <DCCReference Include="vcl.dcp" />
+    <DCCReference Include="vclactnband.dcp" />
+    <DCCReference Include="vcldb.dcp" />
+    <DCCReference Include="vcljpg.dcp" />
+    <DCCReference Include="vclshlctrls.dcp" />
+    <DCCReference Include="vclx.dcp" />
+    <DCCReference Include="xmlrtl.dcp" />
   </ItemGroup>
 </Project>
 <!-- EurekaLog First Line
diff --git a/Source/Modulos/Informe ventas por articulo/Views/InfVentasArticulo_view.drc b/Source/Modulos/Informe ventas por articulo/Views/InfVentasArticulo_view.drc
index 84c96e6..4736e0b 100644
--- a/Source/Modulos/Informe ventas por articulo/Views/InfVentasArticulo_view.drc	
+++ b/Source/Modulos/Informe ventas por articulo/Views/InfVentasArticulo_view.drc	
@@ -15,5 +15,8 @@ END
 /* C:\Codigo\Source\Modulos\Informe ventas por articulo\Views\uViewInfVentasArticuloGrid.dfm */
 /* C:\Codigo\Source\Modulos\Informe ventas por articulo\Views\uViewInfVentasArticulo.dfm */
 /* C:\Codigo\Source\Modulos\Informe ventas por articulo\Views\uEditorInfVentasArticulo.dfm */
+/* C:\Codigo\Source\Modulos\Informe ventas por articulo\Views\uViewInfVentasAlbArticuloGrid.dfm */
+/* C:\Codigo\Source\Modulos\Informe ventas por articulo\Views\uViewInfVentasAlbArticulo.dfm */
+/* C:\Codigo\Source\Modulos\Informe ventas por articulo\Views\uEditorInfVentasAlbArticulo.dfm */
 /* C:\Codigo\Source\Modulos\Informe ventas por articulo\Views\InfVentasArticulo_view.res */
-/* c:\temp\dtf2F5.tmp */
+/* c:\temp\dtf332.tmp */
diff --git a/Source/Modulos/Informe ventas por articulo/Views/uEditorInfVentasAlbArticulo.dfm b/Source/Modulos/Informe ventas por articulo/Views/uEditorInfVentasAlbArticulo.dfm
new file mode 100644
index 0000000..d704dc0
--- /dev/null
+++ b/Source/Modulos/Informe ventas por articulo/Views/uEditorInfVentasAlbArticulo.dfm	
@@ -0,0 +1,1714 @@
+inherited fEditorInfVentasAlbArticulo: TfEditorInfVentasAlbArticulo
+  Left = 531
+  Top = 329
+  Caption = 'fEditorInfVentasAlbArticulo'
+  ClientHeight = 671
+  ClientWidth = 899
+  OnCreate = CustomEditorCreate
+  OnGetModified = CustomEditorGetModified
+  ExplicitWidth = 907
+  ExplicitHeight = 705
+  PixelsPerInch = 96
+  TextHeight = 13
+  inherited JvNavPanelHeader: TJvNavPanelHeader
+    Width = 899
+    ExplicitWidth = 899
+    inherited Image1: TImage
+      Left = 872
+      Picture.Data = {
+        0A54504E474F626A65637489504E470D0A1A0A0000000D494844520000001800
+        0000180806000000E0773DF80000000970485973000017120000171201679FD2
+        5200000A4D6943435050686F746F73686F70204943432070726F66696C650000
+        78DA9D53775893F7163EDFF7650F5642D8F0B1976C81002223AC08C81059A210
+        92006184101240C585880A561415119C4855C482D50A489D88E2A028B867418A
+        885A8B555C38EE1FDCA7B57D7AEFEDEDFBD7FBBCE79CE7FCCE79CF0F80111226
+        91E6A26A003952853C3AD81F8F4F48C4C9BD80021548E0042010E6CBC26705C5
+        0000F00379787E74B03FFC01AF6F00020070D52E2412C7E1FF83BA5026570020
+        9100E02212E70B01905200C82E54C81400C81800B053B3640A009400006C797C
+        422200AA0D00ECF4493E0500D8A993DC1700D8A21CA908008D01009928472402
+        40BB00605581522C02C0C200A0AC40222E04C0AE018059B632470280BD050076
+        8E58900F4060008099422CCC0020380200431E13CD03204C03A030D2BFE0A95F
+        7085B8480100C0CB95CD974BD23314B895D01A77F2F0E0E221E2C26CB1426117
+        29106609E4229C979B231348E7034CCE0C00001AF9D1C1FE383F90E7E6E4E1E6
+        66E76CEFF4C5A2FE6BF06F223E21F1DFFEBC8C020400104ECFEFDA5FE5E5D603
+        70C701B075BF6BA95B00DA560068DFF95D33DB09A05A0AD07AF98B7938FC401E
+        9EA150C83C1D1C0A0B0BED2562A1BD30E38B3EFF33E16FE08B7EF6FC401EFEDB
+        7AF000719A4099ADC0A383FD71616E76AE528EE7CB0442316EF7E723FEC7857F
+        FD8E29D1E234B15C2C158AF15889B850224DC779B952914421C995E212E97F32
+        F11F96FD0993770D00AC864FC04EB607B5CB6CC07EEE01028B0E58D27600407E
+        F32D8C1A0B91001067343279F7000093BFF98F402B0100CD97A4E30000BCE818
+        5CA894174CC608000044A0812AB041070CC114ACC00E9CC11DBCC01702610644
+        400C24C03C104206E4801C0AA11896411954C03AD804B5B0031AA0119AE110B4
+        C131380DE7E0125C81EB70170660189EC218BC86090441C8081361213A881162
+        8ED822CE0817998E04226148349280A420E988145122C5C872A402A9426A915D
+        4823F22D7214398D5C40FA90DBC820328AFC8ABC47319481B25103D4027540B9
+        A81F1A8AC6A073D174340F5D8096A26BD11AB41E3D80B6A2A7D14BE87574007D
+        8A8E6380D1310E668CD9615C8C87456089581A26C71663E55835568F35631D58
+        3776151BC09E61EF0824028B8013EC085E8410C26C82909047584C5843A825EC
+        23B412BA085709838431C2272293A84FB4257A12F9C478623AB1905846AC26EE
+        211E219E255E270E135F9348240EC992E44E0A21259032490B496B48DB482DA4
+        53A43ED210699C4C26EB906DC9DEE408B280AC209791B7900F904F92FBC9C3E4
+        B7143AC588E24C09A22452A494124A35653FE504A59F324299A0AA51CDA99ED4
+        08AA883A9F5A496DA076502F5387A91334759A25CD9B1643CBA42DA3D5D09A69
+        6769F7682FE974BA09DD831E4597D097D26BE807E9E7E983F4770C0D860D83C7
+        486228196B197B19A718B7192F994CA605D39799C85430D7321B9967980F986F
+        55582AF62A7C1591CA12953A9556957E95E7AA545573553FD579AA0B54AB550F
+        AB5E567DA64655B350E3A909D416ABD5A91D55BBA936AECE5277528F50CF515F
+        A3BE5FFD82FA630DB2868546A08648A35463B7C6198D2116C63265F15842D672
+        5603EB2C6B984D625BB2F9EC4C7605FB1B762F7B4C534373AA66AC6691669DE6
+        71CD010EC6B1E0F039D99C4ACE21CE0DCE7B2D032D3F2DB1D66AAD66AD7EAD37
+        DA7ADABEDA62ED72ED16EDEBDAEF75709D409D2C9DF53A6D3AF77509BA36BA51
+        BA85BADB75CFEA3ED363EB79E909F5CAF50EE9DDD147F56DF4A3F517EAEFD6EF
+        D11F373034083690196C313863F0CC9063E86B9869B8D1F084E1A811CB68BA91
+        C468A3D149A327B826EE8767E33578173E66AC6F1C62AC34DE65DC6B3C616269
+        32DBA4C4A4C5E4BE29CD946B9A66BAD1B4D374CCCCC82CDCACD8ACC9EC8E39D5
+        9C6B9E61BED9BCDBFC8D85A5459CC54A8B368BC796DA967CCB05964D96F7AC98
+        563E567956F556D7AC49D65CEB2CEB6DD6576C501B579B0C9B3A9BCBB6A8AD9B
+        ADC4769B6DDF14E2148F29D229F5536EDA31ECFCEC0AEC9AEC06ED39F661F625
+        F66DF6CF1DCC1C121DD63B743B7C727475CC766C70BCEBA4E134C3A9C4A9C3E9
+        57671B67A1739DF33517A64B90CB1297769717536DA78AA76E9F7ACB95E51AEE
+        BAD2B5D3F5A39BBB9BDCADD96DD4DDCC3DC57DABFB4D2E9B1BC95DC33DEF41F4
+        F0F758E271CCE39DA79BA7C2F390E72F5E765E595EFBBD1E4FB39C269ED6306D
+        C8DBC45BE0BDCB7B603A3E3D65FACEE9033EC63E029F7A9F87BEA6BE22DF3DBE
+        237ED67E997E07FC9EFB3BFACBFD8FF8BFE179F216F14E056001C101E501BD81
+        1A81B3036B031F049904A50735058D05BB062F0C3E15420C090D591F72936FC0
+        17F21BF96333DC672C9AD115CA089D155A1BFA30CC264C1ED6118E86CF08DF10
+        7E6FA6F94CE9CCB60888E0476C88B81F69199917F97D14292A32AA2EEA51B453
+        747174F72CD6ACE459FB67BD8EF18FA98CB93BDB6AB6727667AC6A6C526C63EC
+        9BB880B8AAB8817887F845F1971274132409ED89E4C4D8C43D89E37302E76C9A
+        339CE49A54967463AEE5DCA2B917E6E9CECB9E773C593559907C3885981297B2
+        3FE5832042502F184FE5A76E4D1D13F2849B854F45BEA28DA251B1B7B84A3C92
+        E69D5695F638DD3B7D43FA68864F4675C633094F522B79911992B923F34D5644
+        D6DEACCFD971D92D39949C949CA3520D6996B42BD730B728B74F662B2B930DE4
+        79E66DCA1B9387CAF7E423F973F3DB156C854CD1A3B452AE500E164C2FA82B78
+        5B185B78B848BD485AD433DF66FEEAF9230B82167CBD90B050B8B0B3D8B87859
+        F1E022BF45BB16238B5317772E315D52BA647869F0D27DCB68CBB296FD50E258
+        5255F26A79DCF28E5283D2A5A5432B82573495A994C9CB6EAEF45AB963156195
+        6455EF6A97D55B567F2A17955FAC70ACA8AEF8B046B8E6E2574E5FD57CF5796D
+        DADADE4AB7CAEDEB48EBA4EB6EACF759BFAF4ABD6A41D5D086F00DAD1BF18DE5
+        1B5F6D4ADE74A17A6AF58ECDB4CDCACD03356135ED5BCCB6ACDBF2A136A3F67A
+        9D7F5DCB56FDADABB7BED926DAD6BFDD777BF30E831D153BDEEF94ECBCB52B78
+        576BBD457DF56ED2EE82DD8F1A621BBABFE67EDDB847774FC59E8F7BA57B07F6
+        45EFEB6A746F6CDCAFBFBFB2096D52368D1E483A70E59B806FDA9BED9A77B570
+        5A2A0EC241E5C127DFA67C7BE350E8A1CEC3DCC3CDDF997FB7F508EB48792BD2
+        3ABF75AC2DA36DA03DA1BDEFE88CA39D1D5E1D47BEB7FF7EEF31E36375C7358F
+        579EA09D283DF1F9E48293E3A764A79E9D4E3F3DD499DC79F74CFC996B5D515D
+        BD6743CF9E3F1774EE4CB75FF7C9F3DEE78F5DF0BC70F422F762DB25B74BAD3D
+        AE3D477E70FDE148AF5B6FEB65F7CBED573CAE74F44DEB3BD1EFD37FFA6AC0D5
+        73D7F8D72E5D9F79BDEFC6EC1BB76E26DD1CB825BAF5F876F6ED17770AEE4CDC
+        5D7A8F78AFFCBEDAFDEA07FA0FEA7FB4FEB165C06DE0F860C060CFC3590FEF0E
+        09879EFE94FFD387E1D247CC47D52346238D8F9D1F1F1B0D1ABDF264CE93E1A7
+        B2A713CFCA7E56FF79EB73ABE7DFFDE2FB4BCF58FCD8F00BF98BCFBFAE79A9F3
+        72EFABA9AF3AC723C71FBCCE793DF1A6FCADCEDB7DEFB8EFBADFC7BD1F9928FC
+        40FE50F3D1FA63C7A7D04FF73EE77CFEFC2FF784F3FB25D29F33000000046741
+        4D410000B18E7CFB5193000002944944415478DAD5955F4853511CC7BFD7CD9C
+        9BD21F4188FECFA83443E262BED5831689249688BA60E0934F3D582441B58782
+        0A02291641050A8E1C150B8C454669181269AC2D3398D9C31E940C9B685A5EEF
+        EEBDEB9CB3EEDA656EAE720FFDE0C7EF1CCEBDDFCFFDFDCEF99DCB85C361A4D3
+        B8FF1FD0E51E4A1BA1B1AA94630032F8A31725390C5956B0284A2C4A8AC2221B
+        13174332EA9B6D78DB73F337A06970EFB2C23229A728CB102589C579518CCCA9
+        1388BA765274A2FDEE232DC0F9F84DFAF64005A4A3547180952ED592808E32AF
+        06B42158850B9517E3400A11A35EF9E0006673024C7CB86612E67B6B19E48C7C
+        3F31801A1DC78AFB382FF8411E1825939D80A7CC8342A10822C9E098FB3026B2
+        C6E0AF9D62CFE63B4CB0C1953C03555C379401799FC22215F7583DE0DB096837
+        30573C8FDC911C4C6DFF8AFAA747D06B7985BC4E23CBE0B2BE3BF91E44014E02
+        682400474644BC8B87C742E26D1E330DB358E35E8DC98A2FB03CAF814FF2A1E4
+        5B3EDAFACD18A86E4D11109BC107B260202E806510DC318DBC8FEB30BE711CD6
+        FE3AB4751BA19314EC39F40276E393E54F910A9149CAEFF5C3913D7847164A22
+        7BB039B8058B82C0C4AFBB0CEC1D2A4E2D2120F614D15A6E9BA9C6B9F2F30CA2
+        B0B32E479DCE8FF71E8D8A17BBFAC0DDE2B480ABF60E9C3ED1149741F46C139F
+        5E58D0CC63FDD9C352CD97ABC600EA754D32D05C7A6A974ABF3AF38720B23877
+        A905D24400592D5720ADDF0AE5AC154A4882D06A4728333BD2C9242B6A23A39F
+        E201371C3D49BB98F7B96108F8910905FEFD0D2878499AC9948B8183CD4BDF45
+        B1005AAA54ACD3E427D783846CBD0EBA0C0ED6EFBB123EFB577FB431DBA95582
+        F7F5673AD61714D5155EBBD3B7A20056DFDA7245B7C95C914CFC9F00A95ADA01
+        3F01A44422D9EF203E7B0000000049454E44AE426082}
+      ExplicitLeft = 652
+    end
+    inherited lblDesbloquear: TcxLabel
+      Left = 774
+      ExplicitLeft = 774
+      AnchorX = 819
+      AnchorY = 14
+    end
+  end
+  inherited TBXDock: TTBXDock
+    Width = 899
+    ExplicitWidth = 899
+    inherited tbxMain: TTBXToolbar
+      ExplicitWidth = 745
+      object TBXSeparatorItem16: TTBXSeparatorItem [13]
+      end
+      object tbxiExpandir: TTBXItem [14]
+        Action = actExpandir
+      end
+      object tbxiContraer: TTBXItem [15]
+        Action = actContraer
+      end
+      object tbxiAnchoAuto: TTBXItem [16]
+        Action = actAnchoAuto
+        DisplayMode = nbdmImageAndText
+      end
+    end
+    inherited tbxMenu: TTBXToolbar
+      ExplicitWidth = 899
+      inherited TBXSubmenuItem6: TTBXSubmenuItem
+        object TBXItem37: TTBXItem [0]
+          Action = actExpandir
+        end
+        object TBXItem36: TTBXItem [1]
+          Action = actContraer
+        end
+        object TBXItem35: TTBXItem [2]
+          Action = actAnchoAuto
+        end
+        object TBXSeparatorItem17: TTBXSeparatorItem [3]
+        end
+      end
+    end
+  end
+  inherited pgPaginas: TPageControl
+    Width = 893
+    Height = 544
+    ExplicitWidth = 893
+    ExplicitHeight = 544
+    inherited pagGeneral: TTabSheet
+      ExplicitLeft = 0
+      ExplicitTop = 0
+      ExplicitWidth = 885
+      ExplicitHeight = 516
+    end
+  end
+  inherited StatusBar: TJvStatusBar
+    Top = 652
+    Width = 899
+    ExplicitTop = 652
+    ExplicitWidth = 899
+  end
+  inline frViewInfVentasAlbArticulo1: TfrViewInfVentasAlbArticulo [4]
+    Left = 0
+    Top = 102
+    Width = 899
+    Height = 550
+    Align = alClient
+    Font.Charset = DEFAULT_CHARSET
+    Font.Color = clWindowText
+    Font.Height = -11
+    Font.Name = 'Tahoma'
+    Font.Style = []
+    ParentFont = False
+    TabOrder = 4
+    ReadOnly = False
+    ExplicitTop = 102
+    ExplicitWidth = 899
+    ExplicitHeight = 550
+    inherited TBXMultiDock1: TTBXMultiDock
+      Height = 440
+      ExplicitHeight = 440
+      inherited pnlParametros: TTBXDockablePanel
+        ExplicitHeight = 205
+        inherited pcParametros: TPageControl
+          Height = 116
+          ExplicitHeight = 116
+          inherited TabSheet5: TTabSheet
+            ExplicitLeft = 0
+            ExplicitTop = 0
+            ExplicitWidth = 0
+            ExplicitHeight = 29
+          end
+          inherited tsColumnas: TTabSheet
+            ExplicitHeight = 106
+            inherited frViewColumnas1: TfrViewColumnas
+              Height = 106
+              ExplicitHeight = 106
+              inherited lbColumnas: TcxCheckListBox
+                Height = 77
+                ExplicitHeight = 77
+              end
+            end
+          end
+          inherited tsAgrupacion: TTabSheet
+            ExplicitHeight = 29
+            inherited frViewAgrupaciones1: TfrViewAgrupaciones
+              Height = 29
+              ExplicitHeight = 29
+            end
+          end
+        end
+      end
+      inherited pnlTareas: TTBXDockablePanel
+        Top = 205
+        DockPos = 205
+        ExplicitTop = 205
+        ExplicitHeight = 219
+        inherited TBXPageScroller1: TTBXPageScroller
+          Height = 197
+          ExplicitHeight = 197
+          inherited pcTareas: TPageControl
+            Height = 149
+            ExplicitHeight = 149
+            inherited tsSumarios: TTabSheet
+              ExplicitHeight = 48
+              inherited frViewSumarios1: TfrViewSumarios
+                Height = 48
+                ExplicitHeight = 48
+                inherited vgSumarios: TcxVerticalGrid
+                  Height = 19
+                  ExplicitHeight = 19
+                end
+              end
+            end
+            inherited tsFiltros: TTabSheet
+              ExplicitHeight = 139
+              inherited frViewFiltros1: TfrViewFiltros
+                Height = 139
+                ExplicitHeight = 139
+                inherited cxFilterControl1: TcxFilterControl
+                  Height = 80
+                  ExplicitHeight = 80
+                end
+                inherited TBXAlignmentPanel3: TTBXAlignmentPanel
+                  Top = 109
+                  ExplicitTop = 109
+                end
+              end
+            end
+          end
+        end
+      end
+    end
+    inherited frViewInfVentasAlbArticuloGrid1: TfrViewInfVentasAlbArticuloGrid
+      Width = 677
+      Height = 440
+      ExplicitWidth = 677
+      ExplicitHeight = 440
+      inherited cxGrid: TcxGrid
+        Width = 677
+        Height = 440
+        ExplicitWidth = 677
+        ExplicitHeight = 440
+      end
+      inherited dxPrintStyleManager1: TdxPrintStyleManager
+        inherited dxPrintStyleManager1Style1: TdxPSPrintStyle
+          BuiltInStyle = True
+        end
+      end
+      inherited dxComponentPrinter: TdxComponentPrinter
+        inherited dxPrinterLinkcxGrid: TdxGridReportLink
+          BuiltInReportLink = True
+        end
+      end
+    end
+    inherited TBXMultiDock2: TTBXMultiDock
+      Width = 899
+      ExplicitWidth = 899
+      inherited pnlIntervaloFechas: TTBXDockablePanel
+        ExplicitWidth = 883
+        inherited TBXAlignmentPanel3: TTBXAlignmentPanel
+          Width = 879
+          ExplicitWidth = 879
+        end
+        inherited frViewPeriodoFechasInforme1: TfrViewPeriodoFechasInforme
+          Width = 879
+          ExplicitWidth = 124
+          inherited TBXDockablePanel1: TTBXDockablePanel
+            ExplicitWidth = 124
+            inherited dxLayoutControl1: TdxLayoutControl
+              Width = 879
+              ExplicitWidth = 124
+            end
+          end
+        end
+      end
+    end
+  end
+  inherited JvAppRegistryStorage: TJvAppRegistryStorage [5]
+  end
+  inherited SmallImages: TPngImageList [6]
+    PngImages = <
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
+          610000000774494D45000000000000000973942E000000097048597300001712
+          0000171201679FD252000001754944415478DA6364C001D6ECBE900CA4E640B9
+          2921AE0673B1A963C4A739C8598FE1DB8FDF0C33966C67505054C06A08232ECD
+          3EF6BA0C250B7F315C7FF88F6179E15F86456BF76135841197CD79737F324C4E
+          E1008BF345BC63B833959561F13A4C4318D13507BBE833E4CEF9C160ACC1C290
+          60C30296734D5FCD70F2A333564318B1D90CD20C02D72E9C04D33C92A60CAFDF
+          FF6358B8E71B86218CE87E866986D90E738186A92FC397EF0C0C6B8FA21A0232
+          E03FBACD5FBEFF07E30A3F36B801323ABE0C3F7FFF67F8FE938161EFC5EF7043
+          C00678586B32F8B7FD61887167836BFEF59B81A12E186180A8BA0F58F3E76FFF
+          194EDDFE0136A07DDA1AB001C90FEE3F98131BE4C4A092FD9BA12A8A07AC19E4
+          67582C800CE051F0C1D06C636994020F44902171214E0CCA99BF19E25DB8E09A
+          91C301161330CDE040448E46649764D85C473160C6114D0CCD581312B221CEFA
+          9C589D8D3521E13204047069C69B99608680002ECD380D4036E4C98B77383583
+          000005100EB8572466A60000000049454E44AE426082}
+        Name = 'PngImage1'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
+          610000000970485973000017120000171201679FD252000001074944415478DA
+          63FCFFFF3F032580912A06303232E2543079D1766F201505C520B02C37CE331A
+          C400EBC5670054F3960057330631617E0690B2F357EF336CDA7786A1B5289211
+          AF01C89A254505183E7FFDC1F0F5DB0F06311101A021F7184E5DBA733927D643
+          0FAB01E89ADF7EF802D6FCF5FB4F866F406CA6AFC21095DBC6B06C7215238601
+          C4689EB27807C3B153E7300D2056F38B371F18B62EDA79EDFCF9F9DA700348D4
+          CC70E1C2024420022548D68C128D40C906A0E67A5234631860A6A752AF202346
+          B466740396C2521AD020B0A49EA622C39C95BB716AC64889C0405C0A541C2501
+          4C2830804F33D6A40C8A09A0A62DF7EEDD03F3AF1FB98D372301A39191E2DC08
+          0029AC32F01825AACD0000000049454E44AE426082}
+        Name = 'PngImage2'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
+          610000000970485973000017120000171201679FD252000001514944415478DA
+          635CB5E3DC7F062C20CCC388918108C0083220D4DD104570F5CEF30CEDFDB319
+          CEEF9C4ED0109C06D818AB3278C7941134046E40CBAA0760819A3005B80B6000
+          9F21182EF8F1F30F10FF86E05F7F1882926B883300E60264C0C1805D5F69B802
+          238601E836FF04E2CDA7BF339484C9A368EE59F59261D9C1BB0CE7A75933C20D
+          F0B4D56698B0E5195617601AF09021DA4998C1297307C38D35A18C60031CCDD4
+          C036FF84DAFCE7EF3F307DF0FA7FB001112D57C09A57D4E8800D98BBFA346A18
+          58EA2BC235C39C0FC2671EB0A2B8E0DBCF7F0C5F7FFE05E27F60B65DE26C8801
+          7316ADC11A58AEFE69282E4009C8284506F7F4B90C781349F7CA07FF4106A0DB
+          FCFD171003E980BCF9840D48F5916148EFBB8E2197EC2BCB1059B290B001512E
+          92609BC1B602F1EF3FFFC1F437204EAE5A4CD8007F5B71B8E66F480681407AED
+          12C20674CCDE884F0903000B1A00979E81F9710000000049454E44AE426082}
+        Name = 'PngImage3'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
+          61000000097048597300000E9C00000E9C01079453DD000002574944415478DA
+          63FCFFFF3F03258011D9004646468696696B17FFFECAD0DE581A7C0D596155CF
+          0AF77F7FFFD975944755A3E8413760EA929DAF393938D62785D8A7C1C48BBB17
+          711BABAB5C7AF9F6FDDFC2446F354206BC75B6D4E35ABCFE90536B49F87190F8
+          E4853B2779DA1BE46EDE7FE62ED00015BC06F4CFDBBA24CACF26FAD0A99B5B42
+          BDCC7C6BFA563B057B986FFDFDE72FC7D20D072B26D62574E235A0A26DA999B0
+          98E0F2607713F9251B8E85692A4B5698E9AB9AAEDA7EE2DEBB571F3DDAAB226F
+          E33500044A3B979507B898B6BF78F3FEA3B1B612FF992BF7FF1F3975336E425D
+          CC52903C4103EAEBEB5998450D8FAA2A889BC94888306CD977664D675964284C
+          1D0103EA99F8DDF50C8CD439E3FFFE67CB7DFFE9DB1F7E3E9EC637DF5977DC98
+          B3E73C0343E33F9C0670B8AC555292175BC8F6FF9BEEDF6FEF995E7DF8F95941
+          55EDE5AB17AFBEFCFAC7C2F1ECC5FBEF0C4C4C89FF0F47DDC36A8056F2A103FF
+          DEDEE465FBFFB5F1D577EECB8C8CFFF72AAA6A7CFFF4F842CED54D7907184CE7
+          4631B0B227FC3F1AE38AD5008D981DDFD9BEDE48BABCA1703983DE226E09891F
+          D754B4756F7DBC7FBAEFF286BCED0C32BD9C0CB222B7FF1F8B93C16A805ED2EE
+          D74CEFAF445FDC50B48BC172858E34DFFB6582B2DAFB38BEDCFC7166456A0583
+          CE0471063EA103FF8FC66A623540C063F55669B6E747AE3DE3E861E5E158A9C8
+          FBF1D1FD6F628BF4147977FC7A79D3E3F2736E39060E9E84FF47A202B0C782ED
+          627356C6FF935998FEB349737FB9FE95E975F2F32D8DDF98EC9647B1FCFF55F0
+          EB1FD31FA08EC2FF87634F6235801C0000382740F0DFD997BD0000000049454E
+          44AE426082}
+        Name = 'PngImage4'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
+          61000000097048597300000AEB00000AEB01828B0D5A000002854944415478DA
+          A5935D48536118C7FFAFDB8CCD557E7F34B33167F9119617A91596495D781304
+          451021A651362821B1ABA49B6EA4460961D88542055D84DD6545415992174994
+          9625CC8F9C329D9B5F3BE9CED9D9797BCEA1C932A3A0079EC3CBE13CBFE7FF7F
+          9FF330CE39FE2798FAB80BA4E61559EB2551E67B07279AE8D51FA98F2CC99546
+          031A3D6E5FF329993F631D80B52227A6D7929F9BAEA459D1D73BE8DC3330D6B8
+          1AD206641414DA5A6224E1E8ECA47779660955D532EF642F1371BD74331A14FA
+          9C27A4439F5D88777DAE1B65FD230D11485786B9363D65FD35C1EB4B9817427E
+          9F80C335C05BD53E23B2A934132FB23662B71406C2B14698F38AF0E9EB9473E8
+          E3C8655BD686D6F858A5DA3F27B04511E37E0195B5C0A00AD6003FE5259758F0
+          3AD1843C15125218CCB6AD707FF34EAC93973217041154ECF608D8770E188BD8
+          5A01A8A1DEC5F60CF4980CB0A890E8A47AFFF477EC3F037C8EBE975F006ADC37
+          60A7351E3D061DE222C522A5270047AD82DBAB27B21AC09EDA373525E9A52BCB
+          7E5F4CB4822509BE80848AB3C0C09A806380EE7CA1BDC55EB4CDE17AF2984932
+          75A60CCA088739742A84CE1E49C1010730F41BA03B27CD595C517CB1FFF92B04
+          E6035AF142101DCB12DA743AB413243FA468331D0F01E51780D1154057AAF148
+          D92E7BE794778E8DB92634C901116FA6451CAA27214EC06802AE5227AA839ED2
+          45A0729AC6A406182DD9329C10A7B7F57D18D63A93DF99D92076905F4FB4DF56
+          A08C20ED9476027CD1209C7BD9FBDC947BC1C0E2C9596A4B003E27E2F8E9301E
+          AEB507B700334968A6631D019C759C5F627780822413BA194312CDFB41958C13
+          7FDB4052739000430ECEDD913F313B568F9B8B326AC8F7CCBFAEB27A073F0058
+          5538F0EAB25B380000000049454E44AE426082}
+        Name = 'PngImage5'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
+          610000000970485973000017120000171201679FD252000001934944415478DA
+          6364C002662430FC47E6672C606064C001C0122726A06AB870818121A1632A98
+          5D169DCD10E58B90B32840358C11A4D920622A5C604145365833482308D4F5E6
+          3134154F62A8EE4805F35B2B66334CDA8B3004C50098E62F2F6E823581347F7F
+          FB80E1E58DBD0C8BD67D6588F6656258BAF91F7E03AE3D66C009081A800CD61F
+          B161C0072243F419711AF0F7F777864D275D192282F5B06A5EB1F23C43D7FCD9
+          0CE7774E67C43000A41984B79EF3C36AC08F9F7F18366CB8CC10116EC860E491
+          85EA0298E6BFBFBE33ECB8120E36C071E64DB8E6ED09CA40037E33ECD87E03EC
+          02142F206BFEF7FB07C3AE9BF1282E00D90CD20CC6BFFE30EC3B719561CAECE5
+          100374837B503483E8BDF733305C000333DC04198E9EBB893040CBAF1945F3DF
+          3FDF190E3C2E041B806EF34F283E73E52EC200758F2A865B3B3A506CB927739E
+          C1C75383C177F17D0C17745971325CBEF51062004820CF19352F808065E64506
+          172748A0C16CFDF3F71F9806B9E4F683A70803B081E56B2EFEB7B19663D875F4
+          32CEC444D080AED9331808010085EE16005695A1DA0000000049454E44AE4260
+          82}
+        Name = 'PngImage6'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
+          610000000774494D45000000000000000973942E000000097048597300001712
+          0000171201679FD252000002164944415478DA95D35F4853511CC0F1EFD491DD
+          D9587F2C83AC8C328DFE4949908BC0AC142A147BC8077B88A01EECA5E718F958
+          410486C384B50A1F7A991023CBEC0F594F81E5D4C211E130D7D4DDCDA15B5EEF
+          DD5DD74B1B8EA9D90FCEC3EFC0EFC3EF9CF33B06FE46CBE3AE042B886B176B0C
+          0B73C342A0A9B17AD9E2FB4F5EE0E878C6E79776C37F03AAAAD2DAD1CDDEDD3B
+          B96EBB9B425604CC17CB8A4AFBD31EEA6BAC0CFF08A4907F02C962598EE374BD
+          D58F908C2581442241603C8CCBFD89D86C9C9C9C1C0A365A282DDE446FDF37E6
+          AB9277B128F02B10C6DDF385CD074B10D6593019211E9CC2EF1DA5A0C0821895
+          68BE6D5F1A6873BEA6D07A0879951945CD626B1E6C372978BD7EBC5F4710D608
+          DC6A712C0EC84A9C7B6DDDECAF3B459E315B3B3B685B9835448DCD30F4BE0FC1
+          94CB9D56672670A5E1A47E590F1EBDE374C3091D88CD4120063359902B4719F9
+          D88F201835E0612670E97CA5DE41578F870A6B296BD79B096BC0B8B6C4DF3252
+          4024E81960832071B3FD7926D0587B5C7F32DFE8243FC74214EDD906AB4D4C29
+          1011230487BC1419BFB32BE8E06CE7BE4CE0C299637A07B3928CCF37816F4CD4
+          F2040943365234823134C8E1FC094A8A8D4C0DF6B2E5EA8774A0BEFAA80E283A
+          A21012A791E6E6B4618249FF08AFEC97292B2CA7B64221BFAC9C90E74DFA289F
+          AB3A42FFB07FD90FE5B255A510B754379D062C1CD3E5E240AC931D9537B03537
+          19FE00839434866373C4BA0000000049454E44AE426082}
+        Name = 'PngImage7'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
+          610000000774494D45000000000000000973942E000000097048597300001712
+          0000171201679FD252000001724944415478DA6364A0103062135CB1E2C26E20
+          E5824F63448401235603809AA381D412374F5506413E2EB0D89FBFFF187EFFF9
+          0BC62F3EFD6728A999C0B0795E15A60150CD1540CD3A7B4FDCC5B0D5D94299E1
+          CAD3BF0CDD3D53F280064CC666C06EA066176C36FF05B25F7F6544B11DC50098
+          D3C3C3F519D6ECBA8C61BBBDA922C38D17FF41B6C384B6020DF261846AFE0FA4
+          AE809C0EB21DDD6610FFCF9F7F0CE91553194CF49518A4558D1836AE59037609
+          23C8E6AB4F2E2C2136DAE4B5AC186E9CD9C570F3C1278801B53D0BFE3715C7E3
+          D4F0E5C75F86CFDF8118487FF9F18F61C3BA350C12CA260C3B366F4218408CCD
+          17AE3D03D3065A520CEC42AA0C278F1CC4EF02749BBF82F0CFBF0CC7F66E64F8
+          C92AC970FDE259DC06A06BAE3DEFC390ABB49EE1FEB5530CCF9F3F6778FA919D
+          E1F5D3FBD80DC066F3AC743D8680EEB30CAFEE9E61D8BEF72C4CA90CD080A770
+          03A62FDB45542C400D006B062724DFA4366920FD84D86844D68C9212C905001F
+          16FA1194E3DBC30000000049454E44AE426082}
+        Name = 'PngImage8'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
+          610000000774494D45000000000000000973942E000000097048597300001712
+          0000171201679FD2520000015F4944415478DA6364A000FC3060F8CF884D62C5
+          8A0BBB81940BB258E7FC99286A8EBF9CCEC06EE4C5C088457334905AE2E6A9CA
+          20C8C70516FBF3F71F8399770E44D3F9FF0C3F0D19219AE76D6364C4A2B902A8
+          5967EF89BB2806B7F54D6738E7C4C1F073793F58B3D1537986F33BA76318B01B
+          A8D905D9E6DF7FFE82B1437011C3B91DD31818BA8AC07246FB7EA01A00737A78
+          B83EC39A5D9731C205E40274003700A8F93F90BA02723AC876649BFF02D920FE
+          9F3FFF18D22BA63298E82B3148AB1A316C5CB38661F5B92A064690CD579F5C58
+          4228CAB6EC3E893D166A7B16FC6F2A8EC7A9F1CB8FBF0C9FBFFF65F08E2CC01E
+          0B20038849342017608D055C2E80D9FC19487FF9F18F2125B3147B2C6033005D
+          73ED791F86E7B334B1C702BA01E89ABF02F1AC743D8680EEB30CAFEE9E61D8BE
+          F72C4CA9CCE679554FE1064C5FB68B98A0801900D60C6230FA26B54903E92744
+          E946B219C661244123560000C9AFE6B31530CB2E0000000049454E44AE426082}
+        Name = 'PngImage9'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
+          610000000970485973000017120000171201679FD2520000016A4944415478DA
+          63FCFFFF3F03082CDD7212C22000627C2D18616C905E466403A27DCCF16A06AA
+          61E89DB290E1FCCEE98C241BF0EFDF3F86E5DB4E33488B093314D5F5810D21DA
+          0090E6DF7FFE31ACD97596C1C9429BE1E6BD176043CEED98C688D3804D0F0E30
+          F45E6A02B37779EC62E05CC0C6B058EA38D80B3080D30090E6805D4E182E7911
+          FC91E1C4E5C70C8F1E3F6298B774137603609AFFA4FC013B1B64738BB13743CD
+          D9AD0C8FFDDF81C5B6EC3B85DB00A6594C289A91C13DEF3740F1BF0C3B0F9DC5
+          6D0048C1EFDF7F21F49F7F50FA2FC31F181F2877E0E445EC068479988015F02C
+          E640B1F98EE72BB066CDDD120C676D1E311C3D7B05BB0181CE8660DB049773C3
+          FD8DAC3957BB80219A379FE1D4C5EBD80DF0B1D7032B165BCD8B110330CD200B
+          CE5FBD85DD00776B1DB002E9F502609B13CF8781E50C840DE09A41165CB97907
+          BB014EE69A1801060B44986610C06980ADB11AC3A63D2789C994D80D404EA6C4
+          0090010087546EF0ACB0C7920000000049454E44AE426082}
+        Name = 'PngImage10'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
+          610000000970485973000017120000171201679FD252000001024944415478DA
+          63FCFFFF3F03258071D400064674018780D0A7823C7C09EB97CCDD8D4B535EC3
+          C493AF1EDC305B3E7F1A2323BA66090111A9272F9F301CD9BE99119701110999
+          FF416A0E6FDB843000A4F9CFCF1F52F834C2808DA72FD8DF700348D18C6C08D8
+          004B77AF69F292F299308987CF1F4E979256DEB076DEE45D207E7052AEDBB3A7
+          770390D58000DC0B20FFCC98D0CE70E1053FC3DBBF3F191E7F66603831A310C5
+          B6E533A6311C7CC080228F624046C534B82408AC690C856B9611976140970719
+          20ACA0CB30A53E13624068693F5CF2F2E3F70C37E7A5C163019BFCD7AD4D0C2B
+          164C07A72146981F999998C17EFCFBEF2FD630C0260F3660C0933200BCB3BCE1
+          CDA578040000000049454E44AE426082}
+        Name = 'PngImage11'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
+          610000000970485973000017120000171201679FD252000001C04944415478DA
+          63FCFFFF3F0325801164C0C20D47A381F41292353332C6800D58B0FEC8FF8440
+          1BA234FDF9FB8FE1F79FBF60EC105CC4806200A3E14C86FFE7D3C13408E0627F
+          3C12CF70ECEC0D86AAB659D80D4007FF806AFEFC41D80CC2672FDFC1340019C8
+          7A2C6178F2F22B98ADAE20C0D09869CCE06E29CD2068B788E1D9AE48868BD7EF
+          117601C8E673D7DF309846AF6310E66767B8BE3E8441CC6929C3C36D610CD76E
+          3FC46DC0CBB7DF19EA679C613870E619C3C3679F197EFCFA0B36106433C8F97F
+          80F8D6FD27B8BD1053BD8F61E9B6DB0C0B9B1C181C4C2518E43D5780C54136CB
+          7BAD62B8B12E90E1FEE367D85DF0F75C1A836FDE0E866D471E315C5A15CCF0F1
+          CB4F06DBA42D6003EE6E0A6650F65BCB7061B90FC3F357AFB11BF0F3540AC3B1
+          8B2F18A2ABF6313C7BFD8DC1C14412E895E76003AEAEF6077B4123528661FFC4
+          F3A806C4F859C1A30839CAE0ECDF10BE41E416860F7F32188E4F453320DCCB9C
+          81CB621ED8A6177BA218245C9681D9B7360431A805AC03B37F306430FCF8C3C0
+          F0E61B0483D8700382DC4CF0DAFC1B498EDD5785E1FD4A3417F83919319CBA78
+          8BA8FCF0DFCF908171139201A0DC3871C6529273637E46740C00F128724C706C
+          80060000000049454E44AE426082}
+        Name = 'PngImage12'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
+          61000000097048597300000E9C00000E9C01079453DD000002324944415478DA
+          63FCFFFF3F03258011640023232386C4922BFF0D9818FFC57EFFFE57FDEFBFFF
+          CC8CFF19BEF0F1B36D5C73E9EAAAD5613ABF60166318505FFF9F4939F077F98B
+          97BF6BEFDCFEC6F9EDDB3F86BF7F810A9918192424D9FEF3F1B32FBFFA93236E
+          5528C35FB8018D9B7E2C6DF0E38859759581F5E7BF3FD36EDEF89AF4E51B03E3
+          B72F7FC0867EF8F897E1EF3F06867F40ACA1C9F96FE392D5BA5737265D831BE0
+          58F9F0BF83A5F83245796696CB973E87FEF9C70CD6FCE2D92B86E78F6EFCFCF7
+          EFEF17360E5E4151590326666626067D7DDE65F57E1CD12806288BB3FF676567
+          66E0E062036B7EFEF425C39307576E8A2A19B9EE6A557DA217B2A88E9B5FBA41
+          405C87C1DC9CEF01D0004514031444391804843918409ADFBFFFCE70E7EA91FB
+          9F3FF06BDED9E1F513A450357481341FBBD03D611973362B4B2C067CF8C1C060
+          A020C0F0E3FB4F86CF1FDEBCBE7FFD84C3B54DC9D760812B13DACB29CAAAF84A
+          58C69AC7C61A8B01CF9FFF61E014646190E365627870FD40C3A535718DC8D1AA
+          E2B1988F5788E7B998823597A5392FA6010C1F1EC0157FF8F081E1DF9F4F0D1C
+          EC6AFDA7965A7C02899924ED550746C555793523665D1D2ED440C49690D08149
+          D2A9764E3ED90A037DEEFF3696BC7161EA0C4B8836402FF6A41A37AFF0690E2E
+          7E3E7B5B9E65C08494084C48BF8832402BF40A0F8F30DB3E0E2E4153277B9E65
+          0DFE9C60A7E34CCA280098ACCDDF3C5A2925C913ACAFCBB51CA6997803ECF7B3
+          301C74FC834D0AC5004A000026261CF09ABF155A0000000049454E44AE426082}
+        Name = 'PngImage13'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
+          61000000097048597300000AEB00000AEB01828B0D5A000002E64944415478DA
+          8D936B4893511CC6FF67DA74BAC9BC9478C9357338CC4B0EBC1709F929A25414
+          A13E48082D8CFC20267E1B925DD004B3120C75919AA99B5DADD485E56DA2791D
+          739ABA2D9DB7A953379D6EEF5EDFDE14859C810F3C5F0ECFF33BFFF38783E0FF
+          425902A13B668448DCB4C5B658709C40D8F0A4563120A97FB1B61F3AAC291008
+          EDB1630ED7ECECA97C6F7F6FAEABB72BCDB46902B54CAD5BD4CCF7AAC68772C5
+          6F8A06C8286E05484EAEB3F10BB6A49FE2B2F2C2628318E0C440063300410050
+          910596D4B344F7BBB63169FBA7B4D6E65AA915205320E47A9EF4ECB89A7CCE85
+          CDA021950141E2BD2E9049645029E683BB3301EB2AE5F657E15B4955457EAA15
+          205B5095CD8BE33D0C8BE0523C1002B50120E5C12EE03509D8A60078386EC1B7
+          F2066DA3A89C8FFE1DBF9076CADFADFA4A467C829E70829C82AE43B79B97150D
+          B3522956F3F4C9B3030001DD87C3AE49C84CBCBC646640FCA5D29DF3A0B8A09D
+          09F62469E1C3A4B4D7F2EAF1A3DA834FA064DC2D2D8E4DB9984E63F922ED2A02
+          161DE04EE1EE13D4ED7CB090CB5CD9C6E1439978A3FE655189D50E52D37263CE
+          4486374725C5D2168DF6C88E2CE414ED02942400030246C6A7087149C5688DF0
+          7EC63EE0F38DB3C79974A8ECB70B7459649E0F64F17854767800C588D390830D
+          02172A19226F5E58D211DFEB9AF40DD5CFCB46E5DD0568AFECC6C43FFA470747
+          2CEBF420D2048072C57ED3CB2F846005F9D19CBD4E80C96882B9F16942D1DBA7
+          FBD15C2B960F77159355056AB919E0E3E24C17F9C58487E1737218966D429386
+          01F235CB8589854D87D3DCD0448613938D61669B89B1C1099552DEB9AA9B9790
+          E559D204FA99C5EBF78D0A0FB5D5ABA0BF6F0D7AA66CA1757CC4B862D808E9D6
+          9826C990236927D236A4B748AF92C6F6FF82243F890861AE817CC8001D6A0A74
+          2A478D1AFD7A926CC6FC058E20743BEDFA2F1ECC70B45A0CDA2614CB5AFDFAAD
+          BE19B3E828E51D009FCFE710C6F546ED680F473DFF3B7E70DAFCFEA8E5BFFA03
+          503A4EA60D6AAC070000000049454E44AE426082}
+        Name = 'PngImage14'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
+          61000000097048597300000AEB00000AEB01828B0D5A000002E44944415478DA
+          8D936B48D35118C6DFB379D9D4C9BC94A8CB399B38CC4B0E9C9A45427D8C5251
+          82FA2021B430F08398F4258650145A615642A12E4A31AF6565795958A69B685E
+          C7BCB4B92D9D3AA74E7771BAFD37FFFDA728E40A7CE0FDF6FC9E73DE877310FC
+          5FA850200CC22C90ECB06EB1EC76870347D8F88C6E7244D4F8D2B06FFA172910
+          082998BBD7154F8A079F11C5E0043002A8D64D2BA8A56AFDB2463BA8928F1537
+          BF2D1B21AC0E9780ECEC06323BCE9E17CE61DE4D4C8BA5812F0D996C00380EE0
+          81ECB0A25EC0FBDFF74C4B7E7CCAEDEEAC97B8041408849C906321BD97B24FFB
+          B36854A43221106B01ECCE007780203F1CCC2AE576BBF09DA8A6BA24C725A048
+          5053C43DCFBD9F98C4210523046A13C0D0320099BCBBF0360920D87B0BBE56B5
+          E8DA9AAAF8E8EFEB3FA2864705D65ECC4FCF30E2BE70BB54ECD28F542485D676
+          3E2C482458DDD327CF0E04087CC222597519059917566C34B8F358BC031C94A8
+          8B0F339241FBEB870FEA0FAE40CABFF5A23CEDF2B93C2A3302E9D611307D0002
+          29006EC4D529A4DD2ED6B61DF0A1B279A3F15559854B0739B9C5A92792799D29
+          5969D4650B05791200C31B804A74E046B831C061423E8B3757544FD509EFE5EF
+          077CBE76F208DD07DE0C7BC6F82FD3CFC430B95C0F162F9A64715091171981BF
+          0761224E5E5AD1E3DF1A3A8C2DB5CF2BA764FDA5680F0EA43B3E469D8A4B5AD5
+          1BA149130DCA35CA66283B1E67C6B2A97EA147C16AB1C2A27C0E9F1C1CD27FEF
+          AC6F968D8BCB097412755D8F0EF3F7F36962A7F2121D8B3218976E4287860632
+          83FDAC6269D3EB38272193E64B6761988DAC981E55A894B2BE75BD5644C00BC4
+          E0E867217738228597E06654C1F090010666DDA05B3E6159336DC4F76BAC3384
+          8968007C8971BE842D62D6C159C5DE5F109564E1F17403C8C64CD0AB26419F72
+          CAA2319AB3A4F3B62F7008A19BB9577F71613E52A7C3A04731B9AA339A6F0CCD
+          DB9A0E03EF04F0F9FC48DC626ED34D0D44AAB5BFD347E76CAD87859DFA0386D8
+          3FA68502A9830000000049454E44AE426082}
+        Name = 'PngImage0'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
+          61000000097048597300000AEB00000AEB01828B0D5A0000032A4944415478DA
+          6D937B4814411CC77FB3B7777A5E7276969AA4648A20A5592A4585FE654122BD
+          0CAA3FE2841EA45946697591BD8DB27748A2BDA0A43FA2420C893252D2A244B4
+          7C24495986AFBC3BDDDBDB9DDDBDDDDB663714B366F9B2BB33DFCF777E3BB383
+          E0DF66235A19342370912538D0CAB2825BF00A6DA4EF2D1133D5A8AA2AA029EF
+          4126B3292B2E21BA70697A5262626A9C393422040D0FBAFCAD6F3BF187C68ED6
+          9F5F472E2992524FBCE2F400735884ED40E6BAE58539F6CCD0B9F323009111C5
+          EF075191600C7BA0ABEBAB5AF7A071A4ADBEE71CE7C615849126032823B52D77
+          EFBAEBF6BDEBAD164B20E941A092EBF89ED75050960C6ECC805B6060D8E984E7
+          379B9C2D8F3AB71353CD4440CC8ACCE49725D7F2626DB3AC60A028C2535092FF
+          4A2FCD5E1A0F2E3C062E9E8171D1034303A3F0E24CF3A7910EF72A1230826813
+          BDAFF87CEE85ACCD19269AA2C16030C0093273EDC372C8DE92FFD7EACEDDE902
+          06B3D0F1A41777DEED2D5015F5369A1335BBB6ACFA4056745C24A22903941636
+          EBF044C38204BCE003FBEE62B0DAFBC1237A61B8C7A9B69DE979ECF3F836A1A4
+          65F15F4EDD2A880BB606A12B45AD93B02C2BE023D2604D79FB8F02B5F533B022
+          078C9B55BBCF7EEBC43F8424B4243DE19BA37C678CC962844A47B71E204F8212
+          09F1EBF783474E02BBB105BC1207DE711EFACA06BE8B7D520C8A8A0D6F70DCD9
+          951E343B1061598067A54EA8AEBAA4435A0826D22A3976B21406B31B80F76160
+          FB3975E8E2E84785F12F460166E3E91D17361D8E5D1E45F332062C8BD07EC300
+          D7CA4EC1BEA292BF16B177751D6893304D5E9979E0AD5265354FDBC694B4EC05
+          7599FB57844906093862D04CCEBB913AE4D9F01EBC3E1EBC22AF87635680F1FB
+          EC4FB95DC922DBD8A105A0008BF1444641DAA1A88C8800CE8F8123656AA59A1F
+          A740FF9A7AF22CE8B0208AC035F258A8911C20C3D5A9BF72D8CC79C197E3D7CE
+          CBB12D0D09106862D4A13F9F343133F70E63F18D740F7E818330E3D30FD31CA3
+          D5986F5B68B55B532DE128923248269F0EF2DF05856FC58372AF52013C5412AF
+          EB7FA7516B34512232C2063A944E44C1C82C7B14CEEFF2B793929F92B16E2265
+          EA71FE0D330BBCF031BDB9A60000000049454E44AE426082}
+        Name = 'PngImage15'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
+          61000000097048597300000AEB00000AEB01828B0D5A0000031C4944415478DA
+          6D536B481451143E779D5D5D37D95AD354523445905AB32C0A0DFD653F92252B
+          8BFA130A3D40F385D1C3B09766A5652548D23B34FA1115624894A0F6502845CB
+          079298A5F8CA75737677E6CECCCEA3BB532DAB75868F3B73EFF77DE7CCBDF720
+          F8374C045BFC97F8AD3504F8191D0ECEC639B91E32D741407B13154501E4F5ED
+          AFD3EBD263E2220A37A5C49BCD1B62F481214BD1F4E49CDCDDD18F3FB4F7758F
+          8FCC5C9504A98570F9C506FAE01053715A46526166565AE0CA552180C88A24CB
+          C04B02FCC476181818519A1BDA677A5A862E32365C473482C740A3D5ECCFCECF
+          A8C9CADF613418FCC80C02853C678EB4425E5502D8300D368E8669AB155EDE7C
+          67FDF8A4FF002135FE35884A4E4B787DFA464EB469B9117C341AA2D78008329C
+          CF6D55CBB39406C11C4BC33C6F87A989597855FEFEF34C9F6D2B319841948E2A
+          387639BB327D6FAA8ED2505056F066C18E363DAE05CBBE5C30E7BBE02767071A
+          3BA0EFD930EEBF3F9CA748CA5D141A1ED454F5A8383D22260C511A1FA8287CAF
+          8ABC037302ECC92E0263D618D879274C0F59959EF2A1A72EBB6B378ADF1CFBE5
+          FC9DBC9800A33F2201D547BB3C06A228818B80E55C2A728A4E01B3AB0B689B43
+          19BCF0B51F7FE7E2D1FA94B8AF25B587A274062DD971173C2C1D560D448F5020
+          26B23A1E3D790EA62C6DE09C6761B46AE21B3F2A44A1F0E8156D25F70EA7F807
+          F9212C72F0A2C20ACFEB6B3C62F788094E9496C12411B32E0C8E314699BA32FB
+          49A2E575C857AF2D3B58B9FB44745238C58A183AAF890BFEFF5259A947CC082C
+          B893D0EF9C22DDE0BCAD884A8EFB1813375A5637A71525070B3E023084E02631
+          24136E88564D262DADE0E4DD621EB08383F97AC7B8D82BA59363EC731B205F83
+          F66C6ADEC6E3E1A921BE8C8C55B1BB54FDD34418DBD642DE3955CCF13C30ED2C
+          E61A85127251AE7B5FE5E0659101D5B1DB23334D9B96FA721421AA22FC3BEB9F
+          CC4C27C6FC5BE101FC8012A2995FDC4CA15AA336D7B4C69865DC605881C2343E
+          82CEA50AD96F9CC476E3497158AA03166E11EEDCFFBAD11D1481196961271548
+          995100D28B768991E7E45E52F273B236482079B7F32FB7E1BAF0E8F71C040000
+          000049454E44AE426082}
+        Name = 'PngImage16'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
+          610000000970485973000017120000171201679FD2520000019E4944415478DA
+          63FCFFFF3F4341F1F9FF0C6402469801BEFE4A0C0B16DD60583CC71CABC21F3F
+          FF327CFFF90748FF6128ABBCC2A0A5CEC0B072C752E20C40D6FCE3D71F86BAFA
+          1B0CEB963B31A85A241336005DF38FDF7F18DA5AEE3098997032CC5D3D07BF01
+          D834FFFCF597A1B7EB3E612FE0D20CC253263C625092FFC5B0F1C06AEC06E0D3
+          0CE2CF99F68C4152EC0BC3AE931B310D983EC908A119AA11A409660008CC9FF9
+          9C4180F72DC3E14B3B500D00019021840048F3F7EF3F19CEDCDE8F6AC09F3F40
+          DB7EFC024B82E81FDF816C280D11FFC5F0F9D337B03C08DF7C79126180A7B73C
+          86E6CF9FBF43C460867DFB09D70C32ECD1A7F308036CEC44C18A976E9A82D7F9
+          7CFF8DC19A4186BCFE7D0D618089193FD896B5BB67311CDA309341504A87E1C9
+          ED930CEF3FFD60F8F0F927C3FD671F1956AD59CDF0EC96105833C8BBEFFFDF44
+          18A0A3CB0976EAB6C30B182E1CDDCBA06768C8B073FD02B8CDF79F7E64E89C34
+          87E1EE456EB06610403140599519EC827D6796312447F833F072B130B0B0B2A1
+          387FF5D6430C37CF72C0F9700318191919F49D72C9CAD200FAC9B5C145016BDA
+          0000000049454E44AE426082}
+        Name = 'PngImage17'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
+          610000000970485973000017120000171201679FD2520000015D4944415478DA
+          63FCFFFF3F03082CDD7212C22000627C2D1891F98CC80644FB98E3D50C54C3D0
+          3B6521C3F99DD3194936E0DFBF7F0CCBB79D6690161366B04C57058B715C6060
+          24CA0090E6DF7FFE31ACD9759621A4D68281352A97E1F7B2C90C8B2E10E10298
+          E6DFBFFF325C5DC2C1F044E912C39B4B4B19984A3AB17BC171E64DACAEE860D0
+          60D0F399C2F0F2D636868587CC18A41A1A18D218F07801DD669866100E699161
+          10D5F6050726411720DB0CD35CDE369B61DED24DD80DF8FDE72FD856107D6319
+          1786E6ED7B4F311C387911BB01611E260C6E73EF80F9110C1F180C182C18C4D5
+          BC5034830C3E7AF60A7603029D0D212E00FA7DEDAA2B0C2D2D210C6B6A9EA068
+          06E15317AF6337C0C75E8F2160D92330FF4E8B0B838B4B0D985D5CE907D70CC2
+          E7AFDEC26E80BBB50E5CD11FA84B60E181C0FF18AEDCBC83DD0027734D829A41
+          00A701B6C66A0C9BF69C24265362370094D348012003002CB76B52FA97B19500
+          00000049454E44AE426082}
+        Name = 'PngImage18'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
+          610000000970485973000017120000171201679FD252000001B04944415478DA
+          63FCFFFF3F03258071D400064674018780D0A7823C7C09EB97CCDD8D4B535EC3
+          C493AF1EDC305BB1603A2323BA66090111A9272F9F301CD9BE99119701110999
+          FF616A189135FFF9F9430A9F4618B0F1F405FB1B6E0021CDD70CF8FF0B09B0D7
+          481C78D50AE2FF7295B1FBC82F7AF0C585F30C8C96EE5ED3E425E533618A1F3E
+          7F385D4A5A79C3DA79937781F8C149B96E6627F7F4F8B23ED3DD226BC2F04840
+          96A19CE72DC3E7E387182EDEF8389911E49F1913DA192EBCE06778FBF727C3E3
+          CF0C0C276614A2B860F98C690C9BAA5A1854F7F530282A4830DC7FF08261E657
+          318689B76F33820DC8A89806D70C026B1A43E19A65C46518C0F25F3F3048CE28
+          6050BFBC9A61DB7F198693AE390C535AF220068496F6C3355F7EFC9EE1E6BC34
+          782CC0E47F5EBFC060D7E5C170E8BD208301F73B06BE7F1FFD642E316C6604F9
+          F1D9D3BB01CC4CCCE070F8FBEF2F4618FC7D723D22F3EF93C4FB37DE301C1296
+          D9E8FBE68198BED87F4BFEBF1FED084619087CB4178BB974FFD3D42B8F7E7801
+          6D390A12DB28C4BA51558ECB8F2803D6F1B2C67CFEF5C728EEE7FF62A006701A
+          98C0C0202ECBCDB00A00547CD715F016991D0000000049454E44AE426082}
+        Name = 'PngImage19'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
+          610000000970485973000017120000171201679FD2520000019E4944415478DA
+          63FCFFFF3F032580119FE4D64553FE7FF8F001437C9FC439C20680343B392269
+          FEF11E883F30DCBFCFC070FE81220383A3006E03609A6BCAF631B47439C135C3
+          E9EFEF197A3F00C5253F3030AEDB73092510D89F1D62006BAE3BC7D0D2640431
+          A44A11AEF9C3FBFB0CEF8166CCFD013440E13DC48040675DB0E66D8BA7C23597
+          141931F4F4010D291264A8E9BBCF5012F89EE1FD0BA017809A7BD73130280619
+          32306830200C00693632FC00D1347D05434D66044349922043CFBCF70C2D91F7
+          19BCEB10E1A169AAC9709DE70783A2A100AA0B4A9282C19A7FFFF90BC4FF18DA
+          0A6319923DEF33E4F47D6098B1E22443787A3DC3F99DD3C1E1E654E904F63ADC
+          803F7FFF31FC016B846806D1207E7F6532437AFD0C865FBFFF32C4E634C10D80
+          4723C8005F076DAC9A4186823482F06F204E2A6CC56E80A78D06C3DC45BBC102
+          2141B60C6BD61DC6885A530B1D868CD20EEC06B858A8E2B5F9D71F089D5BD58D
+          DD007B136586E5AB0E80057CBC2D18B66C3D81E1026D7D3586A2BA3EEC065819
+          28E0B519E43210C0694073F77442990E0E300CA0343B030039812D6AB16B7539
+          0000000049454E44AE426082}
+        Name = 'PngImage20'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
+          610000000970485973000017120000171201679FD252000000DF4944415478DA
+          63FCFFFF3F032580916203600C9E351CFF19FE3130FCFF09A47EFD67F89EFC0B
+          2E67E09180D596F3DBE733220C58C5F17F89572FC3FBAF1F1832D73630FCC8FA
+          CDC84000805CCF886CF314B73A86F7DF3E32546EEC63F8FF0B22F6BBF62FDCA0
+          8482061497CCEFAF676444B619A41946BFF9FC8E61CDBE7D0C7F5AFF32E27501
+          F762F6FF309B9135BF06E20347CE33FCEDF987DF059C73D9FE839CFA1F1870A9
+          56C1709BC181F903283EE53F7E17C0386C5D2CFF838C1DB1DA4C542CB03633FF
+          FFFF8381289BB1BA801880350C48316008BB006F2C509A1B0127B3B6E11C11A1
+          6B0000000049454E44AE426082}
+        Name = 'PngImage21'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
+          610000000970485973000017120000171201679FD252000000914944415478DA
+          63FCFFFF3F032580916203885164E09180D596F3DBE733320265C09220E23312
+          FE02C41F80D8158F2520D7430C9838112CF0F7F74F868F4F6F33BC7F7283E1CB
+          EBC70C770E3C6008413220A1A001C525F3FBEB1919FF010D60041A80AE1904CE
+          000D4821E4828F401ADDD91FA1F41F20CE20E4024A6200EC028A63812E2E18F8
+          30187817E0CF0B14E64600B6F869E1FAECCCBE0000000049454E44AE426082}
+        Name = 'PngImage22'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
+          610000000970485973000017120000171201679FD252000001124944415478DA
+          63FCFFFF3F03258091620340848147C2FF0B3B1630A24B1223CE08E20CAC0B28
+          0A0098010B361C807BE3E7CF5F0C5FBF7D63F8F2ED3B98D65455C62ADE599ACC
+          886240BCBF3D58E19FBFFF18BE7DFFC5F0EDC72F86D6A98B1826D7E760159FD2
+          908B69C0EF3F7F810A7E337C072ABC71FF15C3FC556B1916F69463155FD45B81
+          3060DAF21DFF93835D18BEFF80D8F0FDC71F8647CFDF334C9CB38061E5D446AC
+          E21B66B7220CE89AB3EE7F6AA80754D16F862F409BDE7FFCC6D0D43F8561DDCC
+          76ACE2FB574C4418503771F1FFB4085F86DB0F5EA3847049633BC3C6F97D58C5
+          CF6E9B8730A0A86DE6FF6FC0D0FDF4F90BC3E72F5FA1F417867FFFFE33589818
+          601587A78381CF4C941A00005C20FBD97F751C0A0000000049454E44AE426082}
+        Name = 'PngImage23'
+        Background = clWindow
+      end>
+    Bitmap = {}
+  end
+  inherited LargeImages: TPngImageList [7]
+    PngImages = <
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D
+          F80000000774494D45000000000000000973942E000000097048597300001712
+          0000171201679FD252000003CD4944415478DA8D96ED4F53571CC7BF17EC9315
+          11864234C607C6D4E9408621F88CBA88D0C64D48EA906C3E3459F40FD077666F
+          7CEB62A2912C43F0A950A12A3001AD2613810908B46869E69E8B2FBA3087F499
+          B6F7B63BF7E0BDB6D2A79BDCDE73EEBDE7F339E7777EE7DC3248E1303C346BC9
+          A5812FDBED767AAF51D7B9C9F4A07E22595B2655F8DED202642D5E089F3F88B6
+          EE415CF8BE857F9C54C2A402DFBD651D7296C8C5FBD3336EE87F7C8206DDBDA4
+          1226197C57493E96662D9A7BF9F810BD861A4BF1EFB4136D5DFDB8D2DC9550C2
+          2482EF2161C9266111E00D470B611C015A75D7E11FD6E2F51B176EF7FC8CA696
+          F812261EFCC0F60D502AA451706DB902A7EB5F60D2F32195B8068EC1E5F1C1D0
+          CD4B62878B4904F7F8392C3A3922C2C361D280B438736900B6D94FA9E4D5FD5A
+          C8A46968E9E8C555FDFC9130EFC3856C8984A72F90E0E31C274AD767A3EBF138
+          7A2D6E64AF2D82C99A4E257FDED320C4B1E87C34881BAD3D511226D1840A70E1
+          B09AE7269987FB021CBCE49C9C545089AD5B0387CB03E39351E80C0F44892008
+          278207D830BE297F27FAB6DD41E182A4A9CF0698CDF8BDA31A334E2F7E7A6A42
+          F36D2395303C3C56B644F69C09BA3139C5E2ECE11C5AE727DA9791274AF8B3C3
+          64A712ABE17338C9C4F70D3D4757DF2FA0829ACF8AE2C2BD410E013F0397C329
+          0A4E9CEB059B5B4005B38110825C083EF25EDFAFFF518959AF86E5E55F387FB9
+          19CCC5EB3D61AD661F14320915683616A2B24C22C2F9DE05FD0B10F4450B9C59
+          6B299C070B23197FE5A082519D0AD6DFFEC677F56F0599194AA8CA8BB1848429
+          BDE40768EABEC6EE923431C6E1800C0C1B2D9852AE8E091FB959058F771643A6
+          0974F7BF04535C716A236963D1D6A95173601B9128A1286BA4924DEB58DA98F5
+          C891217347096CD29531E16E12FFC1B109DC6A7F3837C9FCAF20397144854315
+          5B91A15C88CC9DD7A864F90A2F8A729538B6F7DD662748C602B9F37AFE74D422
+          C2C5348D941CAF55A19A8C840B315855758B4A64996F909FEE84C7350D960D61
+          C6C7D1364D7FC829BCFF4A05A97118187901FD1DE3FC85365FA28646BD132E6F
+          0005070DC0E6CD5015E6C58C390F9748D2D03F3C8E9B6DD1AB38E66627488E7E
+          A942D59E2D9090945DA36EA392B2FCEC28F8B31B9598251FA061B335263CEE76
+          2D48BED25462DFF66228E4527CF4C55D2AA1C75B38CD16027F3F2C49059192BA
+          9A0AEC2A2B2212193ED174D2673CDCED9DCB96D6F64771E109059192DAEAFDD8
+          515A08B94C0A8EAC5A9A2D6396A4F0A48248C9113292BC651F807C1260FFE735
+          F4778D49E129090449E6B25516C7948DD64919A49CD2DF96FF0126B669571175
+          682F0000000049454E44AE426082}
+        Name = 'PngImage1'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D
+          F80000000970485973000017120000171201679FD2520000032A4944415478DA
+          BD95CD4F134118877F5B0A22D84205341E30087E24021A45893131F1E2C178F1
+          2A26FE07C6C478319E8D9E8C8926EA49E217D1B328F142A24123070B2E6DB76C
+          0B5DB6A585B614CA47BB1F6D7D772CDAD22DA0094C32997476F67966DE79F72D
+          97CBE5B0958DDB1601C7719B7EE1D18B8F9768E8A17EB660FA2BF537D7AF5DEC
+          2F5CCBD8FF22C8C3DF5FBED04D2F73882FAC40CF64114BA6E1F3F9797AC693E4
+          EA7F090AE1FB9AEAD9DCD24A1ABA9E81AA6510239920C530CABB71F7E615EE9F
+          0425705A6E80753D4B27C8A0AAD24A630EFE5002E25494242E26D994A01C5C55
+          7528AC6BC866B3A8B7D782B35830198A63C829E2D9BDDEFB4EE7F3DBEB0ACCE0
+          AAA617C155EA29458546D2867A1B72D90CDEF67F41DFD37E3709DACB0ACCE00C
+          AA680CAC685A5EA4B13B38D97E00B14412BC57C2C0E0777C7A37545E50166E80
+          F302E324EC37CD7775B4223EBF0861621AA35E19636322BE7D18361798C2159D
+          ED785550024F2C821F9F82673202419882382A221C0897DEC146F0D59014C213
+          0B4BF0D0CE9D8244F020FC3CC127C31819E92DCE2233785AF90B53F360632E43
+          1FD7098A79742E899F047691C0352621264F63C22D3178D177F0F8E540093C95
+          568BE29EA64C512834468A9EEA6CC34C7C1E6E5F082EA3BBA71097C310F9893F
+          F0B582D7C78EECEFE9EA6883B5C2C2629C5EB373259F9EDDC70F6226364FE020
+          C6082E8E87200B0148A25C045F2B983C77FA684BE7E16696D3A9945A10EBBC48
+          FB0D8FC617081CA44B0D421483181F19C7AC3C5B023715B43637D109AC58585C
+          C64A4A29806B043F84394AC561DE4FE560165E418668C083E6F01281A3CED6D2
+          E4D8853D0D75D8595DC52ED2C89E2C8D5D14F34834C1B2E5873B00C123232147
+          E017A4B2F0B582C14C8E3B5FBDA30A95560BF6EEB6A3916486A4C16187DD5603
+          A77B025E2902371FC072740E9E51DFBAF0926A7AE7415FCE6677C052C1C1565D
+          81C6FA5AAA2B39D45111CBD2627F7086761E424494E0F30436849B966B4362AD
+          AC84BDA69A5295C3F2D21295619D95E5C5E40ABC4E3F8B79FB99F68DD8ACBD7A
+          728B332B153722B1F987E170181ADD81F1DCE8AECFDE4D410B1B950A6E7BFEF4
+          B7B2FD02BC08E5EFAAF547E00000000049454E44AE426082}
+        Name = 'PngImage2'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D
+          F80000000970485973000017120000171201679FD2520000022C4944415478DA
+          63FCFFFF3F032D0123CC82D53BCF13655398871123B18683CC46B120D4DD10AF
+          06A01A86F6FED90CE7774E27CA12922CF80754B776D7050651415E86A2BA3EA2
+          2C21DA0290E17FFFFE63D8B0F712838DB12AC3CD7B2F88B284280BFEFDFBCFF0
+          0768F89FBF7F19B61EBC0A0E2218A08A0520D0B3EA2131410E06A5E10A704BB1
+          5AD0B2EA0186260E0646869230798286831CD2317B23C3DB3DF98C382D00F141
+          610E0E963FFF18FEFEFBC7306BEB4BA22D3051F8CD1052BD0D6C098605216E06
+          D008FDCFF0FBCF5FB0E1A0C89DBBE335410B7EFDF9CF3069DD23866827617022
+          0059F266771E238A0541AEFA0CED6B1E91144440FBC186FF02FA76F69627E020
+          82010C0BFC1C7519DE7EF88661C8B203EFB15A806C388CDEB9FF2458AE6CC679
+          4C0B3C6DB5C061FF179A2C81084CAF3AFC096E4144CB159CC1D49EA60AB6E4E8
+          F133D82D70B5D26098B2FD25C120C2E67264FAF4E9B3D82D70325763F8F8F907
+          8605EB8E7F815B40C87010BE78FE1C760BEC4C5418FEFD852451502A82E4E07F
+          0CDBCEFE005B00323CBA0D7710954629327CFBF997E1F6B58BD82DB0355261B8
+          FFF41D86C6A3B718180A43E419BEFFFA87D5C520F6CFDF08B187B72E61B760DE
+          92B5E0B2071DB8FAA73164F8C912653888FDE2FE654C0B181971975BDD2B1FFC
+          4FF292061B5030E5264E75715E32608BDE3DBE4ABA05316E52045DFE0B5CB430
+          307C7C4A8605614E1244190E026459106027CE70E8E869066201C916209731C4
+          02140B6805009C1383EFACA508270000000049454E44AE426082}
+        Name = 'PngImage3'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D
+          F8000000097048597300000E9C00000E9C01079453DD000004BF4944415478DA
+          B5D37B4C53571800F0737A5B6ECB4B2F2D2D2D2053408286870CD4C9C0B89989
+          8ACEB041F035064CEB365800D93235C0EA40FD836D380C085B44C7C30993111E
+          93199411DE844029B80908586094577B81963EE8E3EE82D311662A35DB97DCE4
+          3CBE737EB9E77C07120401FECF802B010821A8ACACC7BAC453B54A95E6405AE2
+          E111631B7C9E7E331102E87431313C76B1FFAFFD9E071492C0A3A109218D8AD4
+          68C68527040281E1799B9FCF2A738306439314971765244598060C3C9E1406FA
+          BA73EE36F6045E381DD6B672F39339393457C4BE748BFBFAE08AFBED572E9B04
+          94D7B20647645D7111FB7805E58D359DF2817DB97CBE76795E7246717450E096
+          5C7239E5C7AAA62B99C9260039F977B893B3AA9E84A8FD3603C313BA9FAA5B8F
+          9C8F0B2D799A73F6AB627B77676E4750A0375BD43B0ACA6ADA7ECE4C8A085935
+          9097574B1F56C89A2342767A6356E6A0AAB6E3E1AF1DFD5B6E0822D5A1A1C588
+          D71B66D7DF7B3BE0E862767BCF20A8691265647D1115BF6A6031522E9784B130
+          EB9BEF066DA72C68B5C4F5D2BACF5262DF493F935E78684F804FE9C6F53CF8E7
+          040E6E57B7E04A9572DBB7C951FD26018BCDF8B4FCAC5DDB37F377F86C84AD5D
+          0353F79A1FECD9ECC22B3EF8E6AB2EB25925B85327D4F70E8DC5640B22AF3E5D
+          640A004EA7FCC046D7A06D216F6D73E230AD417E59BD243CF8353B081128FC43
+          0C6A9BBBEF4BF48CBD2582B085970296904B45611C1BEB225F4F67848A40E0FA
+          0A178C4864A0F46EEB2C3E33BF332735BA6B79BEC9C062BD5B482D8A5998D5A1
+          0D8E6C60678B01D14331E81D94246509DE4F052BC26400B8FC821E0E5178D9D9
+          326A5BC516E6737225F0B09BEB1892500FB688E7A5A02E52FD72C08E026F3B1E
+          2B92CBC676D3E9664E23A313A85EA7910368A6B1E3602C3A1D5DA0D210B14422
+          BBFF6860FC3BD018DEB53AC03797C659E79062CF65C6418346AF981AD3E85438
+          9C56D3692C864A6EE1E0A3D62AA6AD0787261A210D250044BCD45A832DB93413
+          A8E70544FB49AD5100DB5FF1D14667CE3732F103056A98EBA322C42D8D9ED239
+          348725AEB39CF56438FA2E5066FAB893B8C27D4C4A1D279770C9DF3E09CCE831
+          8002CF12F5C7B28C022E11BF89508DD489AA1ABE26421D12414998FEEF23BBEA
+          6683EF46ED7D09BDACD756A61AE2492A05CAA539A73C3A60EB6F03338623D170
+          C4D328E01E5DAF21A47D5A864EE92FACFAE49F12F42F28DA84C93CA9F67E2832
+          3FECA4C30739DD5567F067F3BEB9A90035FF9468388A1A053CF8CD7238FDFB3C
+          55A7F2E92C8F1D7B329A42A1BCEE52ED8EC9AC11DE56E61A44EE3833DA13DC5D
+          9E50B30CB848023124606514F03AD5D24F99E9B5D42B64FEDD5509834B837E37
+          98660CD8E7B616BF2745DD985C267D977E52745D88D49F0025254F8ED0EFFB22
+          F21EFC48C0D52860B9B7347B2D9C896252E70E8B2AE24BC1CE142AD0B97ECD36
+          577DCC3197F3BB71762B8FC3CAD8C0D46D958FF59DEA2A4F2804DED99B009D71
+          0B204803D170EC43E3651A50E88F52F4D55C0B45E563B9F597900031185DF381
+          BD85A262DA801F5FBAD8C0020F1EDBA61ACE8D40E50225145722C1804AE39355
+          7480A83FDAF8E287E69FCF275BE7C82EC7D152A1C650F5B529037EEE59D52C5D
+          7AD166000C17C85610F94D904F2C0D341ECF79E143FBAFE32F16D672EF3D728C
+          4A0000000049454E44AE426082}
+        Name = 'PngImage4'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D
+          F8000000097048597300000AEB00000AEB01828B0D5A0000043D4944415478DA
+          B5956D6C535518C7FFB7B7ED36B66E5D47D67663731BECD5B18605D8504C084B
+          74982DC16468D4F881AD0305E3870550D100EABE482246712A8AA00182BA9828
+          84252006D7264AA2631B461325DD5C9ABDC0686B6F5FB7DEDEE373EF6869C736
+          B6189FE4A4A7E79EFBFFF5799EFFE9E11863F83F834BFCF211506AD6A7585DFE
+          A99E3611BD4B1553DE7FC0DC797B64FC9C13387B883149017C0064549A528F56
+          5A2A9E31AE2CD00EDF700AB62B034DAD22EC8B117E07482B3019F61516E7ED15
+          6F8DA6BB6F79D84D1F0E5A197B8BDB06F06D7A743F5C8827B4997A684A6A804C
+          031C7F8D78ED97FA9B5BB130E4531E9B2A2D655D191AA9CAE570201C61CC15C0
+          D94911D60EC642DC4915DA9BCA714C97024E6E87C46BA029AE86DA5C08C79F4E
+          A1F7CAB566AB08DB3DC280C19CA77FBBA42877BB776C940F08018444B0DB3E1C
+          EE6178AD1B88CAFDE58E02797526D8561BB1324A00519A191A532174E535181A
+          1A176C3FF42595EB6360836595E1AB1C9DB660CC39A1EC0F46204E06B0AF4DC2
+          BBB17D0A409E1C032AD6E7E3C7223D8C31803C54E999C8B1AC85F3A6CF6BBFFC
+          4BB30C3995A2B2D696E6BC2F8602691E6F50D9E79F4298CAD2DE069C4ECC320E
+          90E32450BF6605BE37A623231122A9782CAF5A0DF7B44618F869F0FC9A55D94F
+          BB275DAA6058549EFB66C45BACC085D9654C02C8F1058F268B09DF64A5429B08
+          11A97419463304B707E1E014A669215696093F9EDB097C399701EE01C8714A83
+          D60773F1499A1A7C1264D6A0864A54F397A8E65DF3396C4E801C67B4D85F9683
+          4EB50ADC5CE25351B04972CB76865716B2F0BC8083D4DFAA545C2DCEC6BA9868
+          34011096ED18C4E1768657659D2501C8519A2C9DB6AB7A6DB955F8E3376EBE12
+          C959F8C238B003E85C3480C497E5E51BCE6C78AA79EBDF17CE21484D5DA80FD3
+          049916B1872047EE0B20F1ACE212F3B71B5B1EDD343E781DA3D7FA93C4C88E1E
+          8941CDABA04B5C8F48F289C58BCF2BE76F1E00D55C5DBF42FF5D43D3238F07C3
+          115CEFB90831CAE222816984DD213446818954158E136463ECD413546E428446
+          FB2E72FA9C80AF759A37B734D4BC9E663070FDBD5721787C890D955C41B45119
+          3E57F6D29FA31BE8500187E8F1B2B8D80CE459827427014EF0D8FC585DD1C53C
+          935E3DEC9CC4B06334A9C6247EC4CAB06776FA1F02D5F4EB8ED3743D77F75EA1
+          DE63DB6EE07C1CD05791FB7B6D85B1CAE70FE1D7010722E2DDD2FC13823D1C45
+          039DD4C83C76D61A8197497D3F8DD43B990428BBADF4CE6505602FCAEE7EA826
+          BFA56FD0018F371417F747E017A650FB027003F70932482D099FA0A9E5CE9240
+          A37127633F739FF16859579ADD3D36E1492A0DB176B72BB7E0E2E23D20450B1C
+          A0E95ECA86A7526DDEC5582F27A759A6852D330575316708615C1A91B0E50D32
+          C9620109BDA9A78F27A9D91D7117D19D6A58AEC6E9340D1AC9350295A796360C
+          2D557C76241D34D97E5E4A8F9270ED506EC4FF1E32E05FC9675CEF0AFC725300
+          00000049454E44AE426082}
+        Name = 'PngImage5'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D
+          F80000000970485973000017120000171201679FD2520000027F4944415478DA
+          63FCFFFF3F032D0123CC02464646AC0A66243060B820630103230391006EC1C9
+          898CEE406A07B2E4890B40C33AA6A268B8B8229761E9E67F0CD1BE4C1886FD67
+          F8E76151C0B0139705FF154C1A18045444212EAFC8061BFEE5C54D86A6E24970
+          0D75BD790C770F4C015BD2B16802C3FFBFBF19FE01F1D7A7BF1836CC69C0F01D
+          8A05061153510C7F7D7527032EF0ECF216B025AD73DAC016DCD8D2C870FEC23F
+          E22C787C6C21C3D64DA70886AFB79F1983988E07D8825B3B3B89B70066092100
+          331C84EFECE923CD027430F9A037410B61A0345C016E095116FCFFFF8F61CA21
+          5F869230798286F7AC7AC8D0317B23C3DB3DF98C445900321C9452A61E0D22DA
+          021385DF0C21D5DBC096E0B50066F8BF3FBF18A69F8C2068C1AF3FFF1926AD7B
+          C410ED24CC70F3DE0BB025382D00451C03D00290E120F6CC33B1382DF8FB0F62
+          F8AF3FFF18666F79020E22BC71003210968160ECD91752B05A806C388CDEB9FF
+          2458AE6CC6794C0BB0190EF2C5DC2B59700B225AAEE00CA6F63455B025478F9F
+          C1B4402F740256C341F4BCEBF9283EC0E67264FAF4E9B39816E8067563351CC4
+          5F70AB046E0121C341F8E2F973981668FBB761351C8417DDAD045B00323CBA0D
+          7710954629327CFBF997E1F6B58B981668FA346235FCFFBF3F0C8BEFD7321486
+          C8337CFFF50FAB8B41EC9FBF11620F6F5DC2B440C3B306ABE120FE92474D0C19
+          7EB244190E62BFB87F19D302559712B8E1E8F4F2E75D0C495ED260030AA6DCC4
+          1944715E32608BDE3DBE8A6981B45E00C3B34B9BB06A3C24798F21C64D8AA0CB
+          416C503C7D7C8A6901B8CABC7001BBCB3E7B3E6008739220CA7010C0B00057A5
+          0F03DD2B1FFC0FB013673874F43403B180640B90CB18620100261ED9D6E5FCF2
+          FA0000000049454E44AE426082}
+        Name = 'PngImage6'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D
+          F80000000970485973000017120000171201679FD2520000037C4944415478DA
+          B595DF4F5B6518C73F2DFD4191B66C6C4E8512618376DD28B485B1C126D90F36
+          8D1B1726264B76B53BAF3431DE99F80F18BDD1449399254B644E1747743ADD94
+          48169C428131268366832D631BC838FC687B0A057AEA7B0EB692B562417D9393
+          9C93F33EDFCFFB7D9EE73C47974824F83F976E25A0E59BCE75D1DEFBF00CD72F
+          7FA4CB0A70E268DD9AC4450C454F17F2E63BEF6784FC2780EAEDCFF3580A6784
+          FC2B403CAE70EEBB007BFD4E22D15846C8BA01AA783C9EE0FC956E0EECDEC1C2
+          E2524648D680E1FB9374760E119A95B1D99FA2AECEC5739BED5C68EBD58AFCE4
+          CA1A1096635CBC14D084B7941761CECB25321D66EAFE440A343032811C959124
+          498B39DDF275760055BCE5B3761C9E321CDB1D42DC844EA7435114E6E57946FB
+          4778187C44D3613F66B3414BDBC5B6AEEC0167CF77905FBC096F4D3936430EF7
+          C2301E5D7E67B5409E3EC648D720F353111A1ADC28A226DFB607B203A839FFE1
+          4A0FF5C71B291169B1EBE14E086E882C0813E488E70D3630CA53F48B4EF2EE72
+          512852F6FDD5EEEC00EAE973375AA93C50C55C04CC0A8C89D3CB4B5060165D24
+          C242E2DE4A98B1BE2114D1413E7F053FFEDC9B1DE0E34F2E535A5341597529C3
+          63301703530E3C9B07361308034C2E08A09009DD1A606CE801FB1AABF8E9D7BE
+          7F06A8C5FAFCC235AC22FFAE3D2E46C661711136E5C266711905A8C0080BC255
+          707A9E4737832CCE84D95959C6D540FFEA80E32FD56A1FD0E8F8B45683FD279B
+          90643D2191A62DA2B076215C201C6C109738070392CC2F5F75E0F26CC5969FCB
+          B59EDF5607BC7AB84673B0245A51EDFF925D4E0A859389591D46B1F519E1C022
+          F2633588B489E79B771E70B73B48B5AF428B09DC185C1DF0CA419FB651854833
+          B2E6C2DFBC1BEB461BB373A20E8A0EBB69B9931E4F4DD37BA90B5FA59D2F4F9F
+          E575DF755AF3DE5E1DD0BCBFFACF39B3EC22223EB6E488F01CF163C9B7109989
+          30D0D6A7C544676EE1609CA6E2DB58BC47986CFF9463AD957F0F78F9054F4A3C
+          098A2B097E17436C38389A9A455B9D0E0C7A3D5F7CF02E45917BD497C6707B8C
+          E4541DD320C5AF756406BCD8B0334D3C39399F0427EF4FBD518FD751AB419C6E
+          03267F730A920638B4C7BD26F1E4BE336FED4B41563A490334D63AB52075AEA8
+          814BF1BF84944422A37872AD846C739B18948CE980BDBE726D22AE77F59C3A99
+          829C934AD201997E1E6B5D55D1560A771C659BC7CB1F1C73BA92B5793DE80000
+          000049454E44AE426082}
+        Name = 'PngImage7'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D
+          F8000000097048597300000B3A00000B3A01647F570D000002724944415478DA
+          63FCFFFF3F032D01235D2C606464C42AB978D3F10C0E76EEE9E4181CEAAE0731
+          1B9F05AB775E3A1DE2A66B822E0EF2F3BF7FFF19FEFEFB8742FF03D217AE3F67
+          E89DB19261F3BC2AFC16C05C0FB480E1E0E97B0CAFDF7FC5E95A51416E067D0D
+          49B02513E6AC66D0D3353A03F481295E0B40AEB73751341115E2818BFDFB0F72
+          2DC4A5A82E87E0CBB75E3014D6F6309CDF391D6C204E0B905D4FACE120B9C9F3
+          D6C05D8FD70264D713133C5A2AE20CD7EEBC44713D4E0BD05D4F8CCB4172A965
+          5318FC3C6C18EEDDBDCEC0C6C6CEA0A363C400348311C30264D7136BF88D7BAF
+          C129C7232C99C152959B61FDFA350C17AE3D63D834B712AB05FF41AE07197EF8
+          CC7D82C1A3A620C2905E3115C570297975866DDBF7A35A50DBB3E03F30821880
+          AE671012E0C69AC681086BFACFAE9ECED0589D07371C04502C689EB8E4FFEF3F
+          7FC9C9B070C0CCCCC2202EA30C371C04E016D4F52EFCDF541C4FD0901FBFFE31
+          7CFFFD1F4CFFF8FD8FE1CF5F18FB3FC3E68D88A0F1F27444F5013116A01B0EA6
+          A18683F0FE9DEBC0110B321C2388401650143EB060E2E063E0E6E165E0E1E621
+          DE07845CFE1D2A7EE1C82686EF7F9818787878C0961C3A749AB005840C5FF4D5
+          8E61C1850B0C4BB5DE30DC38B585E10D304973F3F2822D397BEE067E0B8871B9
+          F76901B0DAB9AAAF181E9CDFC670FFD173065E5E3EB025376F3DC16D01B1C1E2
+          9D21C43083D59481B5790BC38B2BDB192E5EB9C1C0C7C7CFF0F1CB7FD4FA0066
+          0138D9C10C40321C268E6C3848FC75B127D841300B4E9FBBC8C0CA210A361C24
+          8E62415D411CC3EC95BBC94E41CF9F3F07275398E12816C08A0A4A92A8B28621
+          43828F3E4AB90FB7809600004F6ECDEFF6DCFB3B0000000049454E44AE426082}
+        Name = 'PngImage8'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D
+          F8000000097048597300000B3A00000B3A01647F570D000002954944415478DA
+          B5955F6852511CC7BF3E9882694B723D6450D4A21ED61FB3879EEA295CABA058
+          D1CB6A23A315C2A441AC4123368A82FE5011066D63D1ECAF6058291643AC8D60
+          966EB5FE3E64D4966B7B1841B1997A4FF75CF14E773DFE1978E070EE3D1E3F9F
+          EF399C9FCA082190C964284523F73A88AC54020A8F9E3323A7E0B6EB558352A1
+          B2150BAF991C00852B0779742EC143EFDB40CDB64AA3241DDF398EC066F74ABE
+          6399372AC2E93B53904ACF0BE00F7CC5C4E45FC99AB15FA3B054AD07ECE781C6
+          CB4084876FD743D1DC01D97E736E014DBFC5B8DCA8D3CE17E7387E6D824FCE71
+          9CB083CE07BD387CA94AF84CE1FC88E8EE3550D45961F04411F2DAD882F4F42C
+          78821FBB1D3E58E2EF10BD7A425CA7708FC0507F26B7203D3DEB78C423DABA12
+          38DD8868D02D1C0DF6D4C2B0D3CA16CC4E9F2D3927BC13F43CF2C3526B02EE5E
+          037E8401F34940AB83C1740C2DC78F0AB74922484F9F0B4EFB1DD70B74D95D59
+          7717ACDF88AC75C00B084D4FE12F5F8799C7439B6EA10AAB962DC291E6EB30ED
+          3B84CD152A389D0EB4E9E3D23A3875A19BACAD34804F0F6D994A4C3B939A8EC8
+          987378FA9975B0D770168FBB5A9282F62B3D24164FA0D8565EBE985907BB9E8D
+          CF085A2FDE226D4D07F302A7FF71988A11619C8E7178EAF531EB40BF64697182
+          D9703AF6FAFCCC3A90088A3E9FD41131EAA0E01D644B9E7C267833D0C7AC8382
+          04B9E0B4BF0FF533EB20AF201F7C8A7FAE0E94096B3B2BC6F12DE446F87B046A
+          B5062AB51A9FBF8CB00585C0E97C75831637E49B206F7F82B1610F86863F41A3
+          5980DF7F8800A7AC0C413C91064883A7E6D3E1747EA2297945538240700872A5
+          4E8467085AAD0770F3FEF3B95C26A14522110C7EF899011705A99F8A39D3F9B6
+          62F506D4ED5827F9E71204A56CFF01E5E2820611E3A8010000000049454E44AE
+          426082}
+        Name = 'PngImage9'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D
+          F80000000970485973000017120000171201679FD2520000029E4944415478DA
+          63FCFFFF3F032D0123B2054BB79C24CBB6DE290B19CEEF9CCE882C063317C382
+          681F73920C07EA619016136628AAEB43B184AA1618682A30BC7EFB19C512AA58
+          F0F7EF3F8615DB4F33D818AB337CF9F613C5128A2D0019FEF7EF7F86D5BBCE30
+          38596833FCFAFD07C592733BA6319265C1FF7FFF19FE02F11FA00520F6BABDE7
+          C0918C0E48B2E0D687070C53AF4E62B8F0F6020348B59BB41F43A1661603EF12
+          0E8637E15F188E9C7FC0F0F5DB5786B76FDF82D5CF5BBA89780BE6DC58C0B0FD
+          D9620C4B4F3FBFCFF0E4EB038697219FC0C1F5E7DF3F30BD79EF29E22D38FDEA
+          0283F906230CC303551CC1F4FA3BFB199E057E801BFE0F18275B0F9C26DE0287
+          CD4E0C879E1F6028D56B606834AC021B62BEC582415D44106EC123FF7770C341
+          71B3E3D019E22C38F5F20283FB7627860D6EFB18CC8575A0A9E61F83D5762B14
+          0BEEFBBC811B0E8AF83D47CF116741FED12206676064BA49DAC00D1758CE8511
+          5C773D5FC30D07A9D97FE202610B400A6BCEB430D4E95532FC03CA234722321B
+          E6F2B92FA631C408A581C50E9DBE84DF82084F5370068219C4BF9413C3D5F7BC
+          DFC033DAD467ED60B164E112B0FA6367AFE0B720D4CD04C595422BB8E1A9E6E6
+          9BF70C5BACF7C00D7FCEFE942160971343B16E1D83277B3058CFE98BD7F15B10
+          E46C84121CA2AB79512CD868B10B6CF8DC97D319BA2F3530D8493A30F42A2E84
+          EB3977E5267E0BFC1C0D50C25A722D3FDC0274004A454DC67D0CAEAC81703D17
+          AFDFC66F81B79D1E4A10C96C106490E15600E75A74806E3828C2AFDCBC83DF02
+          0F6B1D942092DF2CCC70DBE315C3F2D74B18763DDDC400D265206CC020CA2187
+          61380810B4C0C5520B45132C4271255564C389B2C0DE541D258DC33210580C4B
+          9E40369C280B6C8C54C125222500AF05D82A0F7200CC0200F191E9EFB5062090
+          0000000049454E44AE426082}
+        Name = 'PngImage10'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D
+          F8000000097048597300004E2000004E2001167D99DE0000035A4944415478DA
+          ED954D4C134114C7DFEC6E0B420B085A6A040DD88A45C0C4602D4A2D281F5589
+          F1AB6AA2094A4C5502DC34F160EAD11BF1E4498D462F1A43FC408BA052C11435
+          F8890AA222A2601B6B2D94B26DB73BEEB4168B16E1E2C1C4974C7627F37BFFFF
+          CB9B995D843186BF19E8BFC1940653012693897AF9CEAEA5696825732FE72B6B
+          3877F2B6F01A982A77435595F48F0646A351E4E3E3342CE7BDFBD1F6F1E7024D
+          957CE6BCED6FCC66EF6485D71D3DDE617FDFAD9ECC00E96B6BC5727FAC9A65DD
+          41718EF795A6CBE6F9699A6925738F67ACE091A5A5235AB2C1502DA1E3F108E1
+          A219A0CA4A530C15CFE68F7986DB0814F0072AAC2DD71BC9A276FDA69D98E7CE
+          7198DFDC616E6C8866A0D6EB13C448E48AB6078278A5209E22888F05C531E075
+          F76E5CBB11660B4AD716D30C732BC0F37A6B5363535403B56090F2BB01D209E2
+          4AA96C99DB1D6A0BE251455BD395C6C8E4253A5D929491248F70CCD7A796CBDF
+          A219E495EE8A4F605CEE09060683412C92CED6F03CB64C26FE830F9F6B4A187C
+          D41D144EDECAFBF7D50889AC41039D4EC7C83354050850B0721FEB392441D892
+          1827C62C93E892393F7F3863B1F822049142A110CB6473553C254AA431041806
+          80E3001266A7D8ED036FFA3A3333F94237CB1103B4AD72DF0A0A51EDD18AE91F
+          EA3F2191CCBADA7CE9ECCD88EA614B556DC9E0A7B71BE7CF997FE0579E773B2E
+          386C0EAB5CA962D1DE9A835AD273B25873B41E66C602385900DB28C0C008C0F3
+          0127F49C3282D3ED2F7FD16626170C6FDB53534CE140F39FF8A10FB6D573E6A5
+          DE463B761FC061F17C39C0A03B34C209244892F9702924C5607DD6E2A501719C
+          A4793A7C863203D05C450ED6166AE1C8B17A9821F4718C9B5811097A580CC7AA
+          F38070E1980E1FDC2C7966567ED1AAD50F4945E1707943C3EE9998402A229196
+          9A06D3E159AF6719D2EB6B63B20A942D19E5C6C2746908F0064209E449E0272E
+          1BBC3D5F37D865BD6BCCC9CDE5E4694AB3667F3D4CC5B73E7EB020784CD76EDC
+          BE70C4EBE9D96ABA0831B470DC9CE2F1EA084CFAF9CDE95C33EAF8D49E9D9D0D
+          0AC5224D5C72AA85984CC6B37E9FCAD1FFBA7BFCA269CACA14CB57569CEEEC68
+          2EECEBED1B4F50E6A8067BBA7B770F753F89FC4453E5DB77AE1A1D1EBE13C986
+          F9AE675D455FDEBDEA0DEEC1BFFF47FBE70DBE03EC16D6DE8FAAF1BC00000000
+          49454E44AE426082}
+        Name = 'PngImage11'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D
+          F80000000970485973000017120000171201679FD252000003784944415478DA
+          B5566B48544114FE362D31A3C78F104C7B50145A902FECE15299D12668ADBA61
+          AE925AA405811585F4A31745FD308A0A42DB5EBBE96E56AE9AAF30CD2CC5C79A
+          BB998FCCEDA5640F15823233DC7B9BB9EBBDEEB65BAD5207863967E6CCF7CD39
+          6766EE15B12C8BFF29224AA0CCAF89237DD63F051689E21323C5D91CC1F5BC6A
+          96186302A0EB68EC0CC3C2C430309918B34E7A2AF2DD2751A23A21B22210F965
+          9A17EB5304DD9ECD34256382FF25C11EA84D82DB8A6B9CDEFF301E771FE8A0D4
+          94E0E1ED745B020A36F69DD39EC5F4552A7CAA88437155A37D02478421FE96E0
+          E6366293C610FD5E75D3F822A0E096B9363116E0C4765FA74677690CCA6B0D63
+          23287EDC850B375BF0A4AD177D9FBF63DA94499086CCC1B15D0198E2EA2C44E1
+          21D1E04DF16654D6373B4E702CF3098E663422FFAC049215B35050F5165BD22A
+          B8B9D0200FA84FAE11A2F00ACBC1CB42191EE99E395E03D76597F1FD8709BB36
+          FB207DEF320E689A58C9CD393B89D0551243C6F81A985357D3D4EA5804F47424
+          1DA982BAD488C329FE48952FC6FDDA77901D28177C68CE79F0F91177D09E2B45
+          DDD3F6BF13F005A5EDC730C3919C57B7C063E6645434F40804AF8B64233B67B1
+          28528B67B736A2B1A5E3F704F412D1313EDCEE8F0388492B87FE793FC2C45E50
+          1C0A86A7E4A64060BC1B2D6CC447560083261CFAF64E5B82046930B7800233FC
+          1927FADAE462E85A7BB9B9B6DC284C759B08CF0D390241475EA4E0CBF7CD1D46
+          FB04F4FA0F356CB75AE0BE2E1B43A4C854CA2E4AA02A3222ABE4A54060D044C0
+          89149BFAFAC616A1E146185A3B5FD912C46F5C8989810A7C23EF8AC9E22229B4
+          1D38AED07360625F77246E5A0065A111F7EB7AE03C4184D80DF3B047EE8D3A6F
+          4F81D4455B694B200F5F0E97A02BF85293387A4B99D14233BF1C45ABB490A65B
+          321B29CA73C84C48B54F10131664B573BB4056F3E6776778C447BF74EE9F09A2
+          D707622AB9407D95F1E6428F000D5B00FFFA06D5FB8CA685CA8E3307A1D877CA
+          6A4C2090860660C66A1537D853160B8FF51AC1E9457E14164AB582AD5787C34F
+          5E840CC34E6ED7ECE057B0FD1FC0F4BD0778BDD380EB060B8288103F3B69F8F3
+          EB49D36229DBB78A7145556D3F024A5058A973E89B604F86A242B02D7C01AE92
+          636C5303FAD1CFD196667D1B1C1A3741EC9DD348F40597168D6C3F92E2A4A31F
+          7DF207306E605E3200E1FF6727C90CAFFF0482645308AD8246DC000000004945
+          4E44AE426082}
+        Name = 'PngImage12'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D
+          F8000000097048597300000E9C00000E9C01079453DD000003DC4944415478DA
+          BD947F4C1B6518C79F7BEF8EFBD56BAFC7951F33BA75E9822B88520C88D92C93
+          05C410CA70986D3261B1DB3F261B24D3F92331F2A799C6B0F96B666668165D88
+          12E7FE598CC14C639C43D0988D41B69974DD5A680B584A5B68EFFA7AAD81306C
+          8D0BE2935CEE9E7B9FE7FB79DEF779DF97C018C35A1AF1BF020882C81978E004
+          A6EB6BA106236D0B42E4BD080045E3AA8A35ECA3587A607709717531F60ECD7F
+          0378FFDBF806A9807E2734956898F027A94844054D03C86310701C02AB950B47
+          E3DA075D4EEEA5BB069CB898DCC671D03F3E1655BCDE0548A520F3A4D332DFFA
+          9BA208D8B2D5047351B5EB48BDD09B13F0E27B41E7A580E5870B3D849AF64F5F
+          49BA522AEE1B198E48B11806DE40416C4EBDA380A9192D03E278048D0DE61BDE
+          49B2FAE5ED309515B0AFD7838D14FFEE3C6DE9AEAD559B6211AD7F642842A91A
+          B1243E3D1D85D999202416E2C08B0A30BC5907109999382A045C5E2674B6DAE0
+          93AC8096377EC7452C8F79237DB6AC5CAC1BBA14165329B4243EE10B82DF3B06
+          34237E93C2DA607C36F4B849595F67B26C22B03E0B399F82E626F9B3A76CB027
+          27A0D0600235F9D7325034B5241E0C84E1E6F591A02E7870F058D599F4F87AE7
+          295654882F8B37D434D08CA4C7226869967F7CA6143D9A1320911C305C5EC65F
+          140F8713E0B9368C3535F5E4D069D7F9E53DB0EF38D526291BFB8DCAFD603090
+          B0C3257DB7A79474660534BF12C0884A81C9844056988C7824A24168D283FDDE
+          AB472F7FD17164E52EB3B77D7C1FCF291EB9F8613D8F84D656F3B95D25A83927
+          E076488375051498440C825E5178568399D0ED9F3DD7475CE35FB97D2B01B627
+          3EB218154B405E570D160B05AD2D52DF4E1BDA97133039A3427AD714EA0D33EA
+          907455A169350E40BA075EB37CBA12B0A9ADEF1E91C9BF251557C1462B03CEAD
+          E25BED65E8705640E5013F9E5767F553A4014AA9A07700B4E43CA49271482EC4
+          E7584172FD76A66E7039A0F2D9F35588CCFB49904BC1F1100F763B77F0390779
+          3C2BA0F11830E274805EF4037F3BD731F5428F757EF91FC7DEAFBB04B3ED6D82
+          12A0A9D1A4996554ED76D0C35901FF74D965B347BA6F725AD8F73D27592BD3B9
+          9DED66DF956B0B9547DB8489FF0450D171712F6750FA106D440F3EC0E9CBC39C
+          7CBE266FFF5DDFA6D9CCDE71B98867F02F2C5F50C43024EC6C312646C763F6E3
+          9DD28D5503CADB7F1568160D7086C27A8AD42FB97A51CDB75087DD0EAA373DBE
+          6A40C5FEB10F395674CB324B6C731A4010D09B7E0FF56ACFD34462D580C70E85
+          369BCC7874730987CB4AD9D1C980FAFA0BDBD9CF97C7AC0AE03C3423EDDA2D9C
+          5414FADCAD089CEDAE20FE58199313B016B6E6803F0192C0D6E065D4DD9D0000
+          000049454E44AE426082}
+        Name = 'PngImage13'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D
+          F8000000097048597300000AEB00000AEB01828B0D5A0000053A4944415478DA
+          AD956B50546518C79F73CE2ECB5ED9B3ECB22C48800A02CA45101BBCA005D9D4
+          4C17758C6FD57899FAE0D4871AB3CC6B5FD2748CA91877600AB3A949CA4427E3
+          A65C1409729565B92CEEB2807B935DD80BECB2B773F6F4420A5841493D33E7D3
+          7BDEDFEF39FFF799F760F058C5601F2BAB443E079B0C077DF250304086432117
+          CDC6AD3EA77FACAC6CAF77EAA5B93BB07F8B3EFD55A37872CC95C7E5725E6671
+          584F4570D871188E7182815068D2E3354E38DC17273C8E2B9DC33A4D735599E7
+          B10495E76FC63B6CCED7F8A4708F58267A429620C5C4B1628C601310F006C06E
+          1A656CF7ECA151B3ADDB366256EA07BB2EFEF4CD19FBF427FF13FCA4F29214A3
+          88BD9218F2CDB4DCA531B1F1122C40B0C11B02A0C37F74C822502A011F63EA37
+          33BACEBB8377BBD5A75B9B7EF956A3B9E15C50B063C77922AF20622B29979CC8
+          29484D4C7F428647E038DCF703BC70E826681A34F0F9B15720398F0452C0000F
+          0FC1B0C640AB9A3ABA55ED8DEFFD5C5D797541C1A7E5D5F2E024766C59CEB29D
+          F96B5388380E0BC351CFEE2040E187B3024516096C1680044958FE71467D4D1D
+          AAABAE52B65D6F38BAA0E0E8890B05B21871E5AAC28C94D8043926A601F80480
+          651260DB47B382F47C12BC14008ED6A2793458D4FDE196CBB53D576BBE7B635E
+          C1543C2B32A8ED4B33932A5617670929161F761EB9396F330F6519EB49A06C56
+          4655D3EA3A5B7162DF0282C3112969A9AFA7E7A794E61467478E072360FD66E5
+          CC7A6671E634746E4D0956AD2301BC4EE8ACFDD5AF2C3DF2C9BC824D9B0EB30A
+          3624EF589EBDBC3CB7389B1F2004A06A76CEAC2B5BFA66BA9E5B1B3693601DB6
+          30B7EB5B3D155F1C2B5DF00C0E1CAE2C8C8E8B399BFB744EA2302E16333B3020
+          D08E680EC09EE3B367B0BD98041A4D2A9A5AF08469E8EAE8635A2E5D19BCF07D
+          D9A90505EF1CA84814F1F92757ADCFDC96929F8A8F4DA2F9F7014421C1C62DCA
+          9958B622C154518866754E80A6454D55559EA96F69AA3E3EAF40B57FCB726D50
+          C0D2466DD9268D4F7C376B6396589A28C7EC1E0218344D7DEDB371BD84040CC6
+          80C31F64746A1DEABECE5873F9EBB33A9DFAB3BF15B41F78A690C7659A3D9152
+          D044AE8500AE08B1F83266C593692C91428A071836BA0470E0A2B1E4A10747E1
+          38C6BD8C65C014EEBCFE9BA3B1EEC7DAB6EB57CA298A6AFB8BA0637FF18B3C11
+          5D91B03A534684ECA0712583C61D0316271EE408E4DEA495295162B904E39242
+          60B1D998DFE367D04507F6210BD577476DBD73BBF9467B5BED799FC7D38470EE
+          47041D1F146D1788C22715B9EB92843C0A5CDA4EE8B708A163221E8C7E4269F3
+          B0FB2339FC2269AC224D1EAF904444B2591E97276C1A1A720E1B740383035DB7
+          7A7B54F5341DB88D702E987BD94D752E10D3A58ABC8D4922AE7F1A6E30B2C130
+          26048DD50A23E38EE7CBEB354D19196B93A3158A748C2696D1B43F0AC5002EF7
+          98C334ACEFF47ADD030835821EDF432EF630733E9FFA217ECD3A998817828981
+          2ED0E93130B824A0350D41B7590F6E7FF0B9BA2E67CD833DE8E6017410403CE0
+          4C4D68706A90E0CF3F1CD5C1E2A24801D1B0243707F85C149AF60E188609E877
+          4483D6A8875E8BDEE5F4516F35F6B8CEC1220AEB39FE2CB3247B25F0055C14CB
+          2D1834B2C0E010836678007AAD7ABBCB1B3C78AD775CB918F8B4A0FE5409B366
+          752A50860E1832A1CC4705A0351B416DEC7721F8FBD7FAC6CF2C163E2D38B4EF
+          6D2647781F12682F82F3A0CF6C821EF3008C7A03AF2E36964704BB77EF629688
+          F9407A6CE01CB987E006704FFA76D575BBBFFCAFF06941494949915020688811
+          F1E15E4F2BD82CFA5D63DDEE732A80D0FF21F81D69327688E78891A000000000
+          49454E44AE426082}
+        Name = 'PngImage14'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D
+          F8000000097048597300000AEB00000AEB01828B0D5A000005234944415478DA
+          AD956B4C53671880DF7329BD9CB6B4A5174A454005112F205E16DCD46C3097ED
+          C7B2690CFFB665BAE80FB3FDD8E2DC8C739AFD984EE3C8326203D9702E5B069B
+          139D8E9B82283299454AB9147B81DA9BB4D00BB4F476DAB3AF80896E02D3ED24
+          5F4E4ECEF99EE7FDDEEF7DBF83C1135D0CF6B9BA4E18F2B0C4896848118B46C4
+          8958CC1767E1CE90373C5E59B92F98FCE8E119D8BF459FFAB6553435EE5BC7E5
+          B25F23D9E4F3296C56068663EC6824169B0A04AD931EFFF9C980E7728FC5A0BB
+          5657197822414DED4D95C7E57D93120BDE11C9848B6599524C942EC208160191
+          6004DCB631C675CF1D1BB3BBFA5CA376B571B8F7FCAFDF9F764F2F7921F809F5
+          05294613FB2472F1DEFCE225F27495048B102C08C600E2899908490265251262
+          6C4376C6D07377F86E9FF65447DBEF3FE87437BCF30A76EEAC25D695A4BC2E56
+          488E1795E465AD582CC353701CEE870106BD00D1F84C0E481C40CC678087C7C0
+          A233C7356D5D7D9A5BAD1F5EAAAFB932AFE0CBAA7A45740A3BBAB468E9DB1B36
+          E612196C12C311D11F05E81E07F044101F9B192C12408224647882D15ED5C69A
+          EAEBD49DD75B8ECC2B3872FC5C894C2EAA59B5A520373D53818950C41401E098
+          0218F2CD940B8F35B38A200D80A37769BC3838B44389F68B8DFD571A7EDC33A7
+          20999EE505F48E25ABB3ABD796AD11D024056EEFC2BBC6E502D02E27A369E8F0
+          9DA93EBE7F1EC1E194DCFCBCB7566CC8AD282A2BE44C445360EF6737E704EB5A
+          7470E9B73D4071D043D00B3D8D7F84D5159F7E31A760EBD6C364C973393B9715
+          2EAB2A2E2BA422041F4AB6AAE78D3E295009019C1607D3DDDC11A8FEFA68C5BC
+          0B3E78B8664B5A86FC4CF10B4559828C74ECBE77E1B6C9498D436FD720D37EE1
+          F2F0B99F2A4FCE3BE3FD83D559428A3AB1EAD9D5DB7337E4E1E353A8FE4300A9
+          6C00394A059B98ED83590A8DEE4EEF24E8DAB5745DCDE9E6F6B6FA63730A3407
+          B62DD347F9A43E75DB76A92AEB83359BD788A4590ACC1D208041D5244896650A
+          2A4FD4033896DC7C063CE12863D01A50F44DD6868BDF9D3118B45F3D5670EBE0
+          8B5B785CE65A8023051D67234470658CA464CCF267F249A1528A4718549B0C0E
+          5CB4021E1A3824C03311641C265BA2E7FA9F9ED6A65F1A3BAF5FAEA269BAF31F
+          82AE0365AFF284F1EACCB5AB6544CC0D3A5F0EE8FC727078F1289BAF0866AFCC
+          4D15292418572C0092C5C2C28130830E3A708F38E8C13B5AE79DEE6B376E7536
+          D68602813684F33F22E8FAB874075F9838A12CDE942DE0D1E0D3F7C09043005D
+          932AB08609B52BC01AE2B0A95269BA325FA1524A52382C32E00B246C23235E8B
+          D9601A36F5DE1EE8D734C7E3916E8443ADF850DB2423E78BE215CA759BB385DC
+          F034DC6C6581795C003AA71346273CAF5435EBDA0A0A36E6A429952BB038B134
+          1E0FA7A23480CF3FEEB1598C3DC1A0DF8450A368841E70B10739A728FA67D5FA
+          4D32212F0693A65E30183130FB24A0B78D409FDD08FE70F4E5A65E6FC3EC1CB4
+          C5903C2488590E3A57219A2C24F8FB0F4773A8AC94C3275A1615170185DADCAF
+          BF03660B01439E34D05B8D30E030FABC21FADDD67EDFD9059BE03117D67FEC25
+          6651E14AA0F85C9496DB306C25C1EC1181CE628201A7D1ED0B460F5D1D98503F
+          0D7C5AD07CB29C59BF360F6873178CD850CEC7F8A0B75B416B1DF221F8475707
+          274E3F2D7C5AF0C9FEF79822C17DC88C07119C0783761BF4DB4D30168CBCF1B4
+          697944B07BF72E6691880271C005DED17B086E06FF546857539FFF9BFF0A9F16
+          949797970AF8FC16B990827BFD1DE07218778DF7F9CF6A0062FF87E02F9F6855
+          88E7298D620000000049454E44AE426082}
+        Name = 'PngImage0'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D
+          F8000000097048597300000AEB00000AEB01828B0D5A000005A34944415478DA
+          8D960B50546514C7CFBDFB625958DC455049C8074A3C44B490C67C8C5A098A8E
+          8E61A0E68C363A4C884C5A3E7240D1F1C13496A58E634FCD0AABC9416DB29C18
+          D9626C542052234904158170A10576F7DEBBDF7D75BEBB0B3E82F49BF9CF7767
+          F7DCFFEF7CCF731918B8E950C1283B6AB8D96C8C62F5AC4994149EF0A4197F6B
+          4575A13894D29F81AAAAC00C601EA6D3416A5090F9F9509B65AA2D3C74C490E8
+          C121C19620D6E316E4F616678FCBD973C3E5723B445E2CC7F81A94F7710034EB
+          B17ABD7E516C42744E424AECA8F8F1234D23C63CC10C8D8900539001BC5E1E5A
+          6EFD0DF57537D53F6A1BF9FADAC66B6D8D1DC7144529C3776F51DF8100D43CCD
+          1E11B626754A52C69CACA9831252464358B815581DA305CB8A028AAA804F26E0
+          1638686DBBAB5EB9F417549EAA71D6573595096E72103DAEF442EE07B0A8F1B6
+          48EB96CC97A6A72F58362B3866F43046A763FBD2A1C6C5F90ED8F8EEB3C0893C
+          78509C28809BF74243FD6DF5E7D2AA9ECB3F5DFF9678C91E0C6FF0FBDF034418
+          0CBA4DF397CE5CBD7CCD7C4B544C24A36391C930BDB940D19A735AE0EB7B9F06
+          0FE1347935103EFB38B8D3D0AE3A3EAD72D59737BD8361FB513DBD0093C1C02E
+          9B38257157DE9625914F258F445F06588645E1D46048515E399C2E3D08F372F2
+          20B7244933778B5EF05210422888230234D5DC81F3876B9B3AEA5DEBD1F73402
+          240A181E3ED476287BD5EC3959AFA6B366B34903E8581DF66C9F396D14B0724F
+          3CB87D1E70138F96B936020471124E57B7176A8F5F93AE7F7FFB33C9236D4440
+          07CE33A4C7A5C41ECDDF9A13999C1AA7654DB3A7806DF9157DE6BD80FE5AD4AA
+          0EE071148244A0F9421B5C3DD2D0E469E65620C0C1982C86E21973D336BF5698
+          6D1844774C20FB9D05950F98D31D24490A88921C90FF39B7E02DB0AF6C418080
+          001F74B5F640DD478DA2EBF79E4259944B98109BE5544E6E46E6E2D5E98CDEA0
+          031617F7ED75171ECB9C2A7F7D21985FB901BCE407705E011A4BEFA8CE739D47
+          245E59C9D822C2AAF28AB3274E9FFB0C43E77EDF869AC736F71109DED85C0CCC
+          92BAC0088876465ACF38D5B613CE5F658FFC1C631F32A8A660D7D209A93393B4
+          1D7968F3953E407FA6D243CF9B0A77009F558D009F66EE9345E83CD705EDDF74
+          D6CA6E790263B5592A96AD9B37EDC5ECC98C04321045842FB7DE8413C7DE7FA4
+          39ED0B8B77C13F0BCE6BD3A3017C22749C76A9DD673DD58AA0A432C1A1410766
+          2C9A949BB576B60E8218201844213FEC76C1E71FEEFD5F73AAED3B4BA0655E05
+          F81040307BA18B40676997CAFF269C54457521C31AD8E58993461F78796346A8
+          2DC61A18A61F72699F0A1FECDFDD6758F06651BFDBB431E34704F8DFE11A04E8
+          FECACD49B7E5125556B7D383161F1963FB62F6EA2929492FC4323E55BC079125
+          683C6C85F7DEDEAE01E8822AD957B5E9E051DAB468BDDF5CC445F73838953B2B
+          FCA276AB5BF01C545240A8C1ACDB903C2B6EFDF455A966A3DD0082ECD3168B42
+          44EC5D47A361CF8E426D41DD8B2EF6ED169A756FE634195F1B016F19D72DD5C9
+          5B41828F11E0E9BDECE22DB6A092B4A5E3D3C7A63FA9978D0AC35388F6B27F67
+          E8BF4ED602DB321D81D1899A4445F2F76E51E52A0442CAC5E340A010439BEFBF
+          4D8DA8CCC1636D45E316C4260E993458279914C6171809096CBFF09393E166C6
+          59CDD01730A72324682E54119138C845F52E6C432F074A7AB8E0846255586C1F
+          655D1B3D6D5842449A5DCFD870573DB026FE7511E994507311FF6B2720541322
+          568BD56A3BD0ABFA3B943050C9B4A266996C8615F6C4B099D6849060D3082303
+          363CD1264583116AEA45E05DEC9B7C2AA9177BA4EBF2192CFD9FE0BB9528FE51
+          45DF801AC31AD9857AAB3ED318AE8F3344E843749178EF5A8021DDA24ADA4549
+          724A3DB24BF95375AB65B8A02703F5587A54D1EF6DF477FAC91285953A99D1C3
+          38303276BC074D8A0CBC4A54271EFACBA8AB18D30EFE4F97FF340AF8172272E4
+          FE66E507F40000000049454E44AE426082}
+        Name = 'PngImage16'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D
+          F8000000097048597300000AEB00000AEB01828B0D5A000005A14944415478DA
+          8D960B50546514C7CFBD771FC0C2E22E026A8A2F140145B490C65047AC0445D3
+          F111A463A38DE608CA949A1A83864C2AD5E8543A4D33659AD360E3E8A036D958
+          069B943D80C8576E12A8BCC28559D8C7DDBBDF7D75BECB2EBE60F49BF9CFBD77
+          F7DCFFEF7CE77B5D06066E1C2A0C65450D0F0D350C6375AC5194141FF19166FC
+          AD0DD58DE2514A7F06AAAA0233807924C7415A4848E8F31116D30C4B54C4A8D8
+          1183C3C34C21ACC72DC81DAD0E97D3E1FAD7E974DB449F7801E3EB50DE2701D0
+          ACC7EB74BA25F14923F29252E3C7244E1E6D1C35EE2966485C341843F4E0F5FA
+          A0F5F67F60BF7E4BBD56DFE8B3D737DE686FEC3CA6284A05BE7B9BFA0E04A0E6
+          E9D6E8C882B48C89D9F396CD1894943A1622A3CCC0728C162C2B0A28AA027E99
+          805BE0A1ADFDAE7AE58F7FA0FA4C9DC35ED35421B8C921F4B81284DC0F605193
+          2D31E6A29CA5B3B216AD9C1316377628C3716C5F3AD4B864A30DB61D781678D1
+          071E142F0AE0F679A1C17E47FDA9BCC675F9879B278997ECC3F0865EFF7B8068
+          BD9EDBBE7045E6BA55050B4DC3E262188E4526C30473D12EBB0A2AB5E0B57B13
+          C14378F06A201E3C7E1E5A1A3A54DB17354EFB85A6FD18F231CA150418F57A76
+          E5D48CE43DF945AFC44C48198DBE0CB00C8BC2D260888A5192224169810DCE96
+          1F820579F9F0D2CE58F02284F68482782240535D0BFCF2697D53A7DDB9197DCF
+          2240A280E151432C9FE4AE9D3B6FD96B596C68A85103702C87572C11CB8084CF
+          7E4584F736546900DA2824638BB1B70708E2252C578F17EA8FDF906E7E7BE74B
+          C9236D434027D619B21252E38F6EDC9517939296A0654DB32F2DBCD8EFFCA500
+          3AD892A4C0D2570B21219F0737027CD80B4122D0FC5B3B5C3DD2D0E469E65723
+          C0C6184DFA92D9F3D3776C28CED50FA2332690FDBB85D57DD9DEDF82E6A2246B
+          5AF5FA56B0AE69458080003F74B7B9E0FA678DA2F32F57B12CCA654CB8C57426
+          6F7D76CEF275598C4ECF01CBB25A0FCADEB8F408E061733170BFBEF06D80BC6B
+          1A80F70AD058DEA23A2ABB8E483E650D63898EACC92FC99D3A6BFE338C36B808
+          A0A37F606BED038081CCA9FC44822D3B4AA07BF1AFDA1A693BE750DB4F392EC9
+          1EF939C61A3BA8AE70CF8A29699913B5A9884B09449C31878BEC7D80FE4CA587
+          EEB7179742FB822A0488D055D90D1D27BAEA65B73C85315B4C552BDF5C30F3C5
+          DCE98C0432109C2DA22CC189DD2D1AE049CDDB722AB5ECFD7E113ACF3AD59EF3
+          9E5A4550D298B0889083B3974C5BBF6CD35C0E421820184421DFED75C2A9631F
+          3D91792BCD1CEB4F307BA19B405779B7EAFB5338AD8AEA6286D5B3AB92A78D3D
+          F8F2B6EC084B9CB9370BD4CFFB49BFD3F4C3F7773F98399AD3C1F54BBD89F10D
+          02F47CEDE6A53B72992AABBBE9424B8C89B37C35775D46EAC417E219BF2AF641
+          08968ABE4402CF3D4747C2077B77DDCB9C9605CD8580B98883EDB1F12A7F5EB8
+          A8F6A8453859AA2920421FCABD95322761F3ACB569A106AB1E04D9AF0D163515
+          E5205004B97C02EC2B2DD6CC5B727ED4B20E664E93F1B713F056F03DD27519B3
+          80CF11E0096E7689264B4859FA8AC959E3B346EA6483C2F8E460B77BCD697DC3
+          4E3EAD05DFCAFE5E7BA6A2334EBBBA4595AF1208B9201E0702C518D67CFF6E6A
+          40E50C1E6FD93969517C72ECB4C19C6454187FA02724D083A8D3D3D1FCBC66E8
+          0F98D31E1234176A88486CE477F52EBC835E3694F4F0811381A7C272EB18F3A6
+          1133872645A75B758C0567D50363D23B2E222D093517F1BF0E02422D2162AD58
+          AB7600DDAABF4109031D9966D41CA345BFDA9A1C99694E0A0F338E323060C195
+          6C543418A1A65E04DEC56B935F2576D125DD94CFE1D17F18DFAD46F91E77E8EB
+          51E35803BB5867D6E518A27409FA685D381783FBAE0918D223AAA443942487E4
+          929DCADFAA5BADC0013D1D388FA5C71DFAC1467FA79F2CC3F0A44E617430090C
+          8C15B729A322834F25AA0317FD65D4558CE980DE4F97471A05FC0F622CD6FE88
+          2F15D20000000049454E44AE426082}
+        Name = 'PngImage15'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D
+          F80000000970485973000017120000171201679FD252000002814944415478DA
+          63FCFFFF3F032D0123C8822F5C7FFED767DC625876E301458645692830B0B2FF
+          67E8ECD06184391CCC282EBAF6DFC7478B21AA671BC3F36D5E040DFAF3E71FC3
+          EFBF7F19FEFDFB0F66FF01B275A20E32AC28E766F0F2F26250538B63387F7E3A
+          235E0B3AD73F25CAD571D6BC60DA28E108C3A783A160365116E07339C4D540FC
+          07C1364B3EC6D0E0AFCDF0EBD72F8679F3FA48B7009FE1206C957682A1CA5395
+          E1E7AFDF0C4B974CA65E10051AB28169FBACD30CC5CE0A401FFC6658BD6A06F1
+          3E20E4F2DF50BE73DE59862C2B09A0057F18B66C9E4F9C05C41A0E4A45EE8517
+          18524C44C03ED8B573097E0B40C9AF7BE333A282C8550D92DEBD4B2F31C4E9F1
+          03E3E017C3C1FDAB705BF0748B2786EB103EC04CFF3039FF8A2B0CE11A9C601F
+          1C3FBA1EB7050F37BAE3351C3DB8FE41732CC882402516B005674F6FC16E0138
+          BB032D2107C00C07E583CB1777E1B6E02FD07520853F7FFE82D0504DE86C506A
+          8188C1F81039909A5BD7F763B7006678754D0159BE5056B303EB7FFCE038A605
+          6E6EC05CF813E292D6B60A9002AC86FCFEF593E1F7CF9F0CBF8018C4CE2E3A0A
+          16BF7DF30083AC822558FFCB6767302DB0B757807BB3BBA70E6C0137373758B3
+          868605C3D9B37B310CFFF3FB17437EF969B805E252266033DEBFB9886981A5A5
+          343C0C274D6A065B2025A5C42029A9C8A0AB6BCD307B563586E1BF81EA4B6A2F
+          C22D1014D107B3B15A606C2C0A8DC4DF0C336674802D303676061BAEA666C450
+          90EB8461F81F20AE68BE4E9C053ABA02F0208216B70C09097560C385852519C2
+          8395300C07D1B59D77095BC0C8C8C8505478F5BF82222B72718B35CC910DFF07
+          CC78F53D0F88B300040C0C32A8D202B87061066A9D4C4B40730B0038C31BFE85
+          5838D40000000049454E44AE426082}
+        Name = 'PngImage17'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D
+          F80000000970485973000017120000171201679FD2520000026D4944415478DA
+          B5966D48535118C7FF138A455F84588C0A7A27AA1163CDB69168929851CB5806
+          81D5878A7C29412428484264A85006814342E805112DE8436F94F43E74393775
+          ABC1552C87B5EA6286B7B01AB4BBD3CE8D0DC57976B7D9038773B8F79CDFEF9C
+          F33C17AE821082FF198AE982F607CE946C4DCD3731D8D5A2A063FFDA73E4C9FB
+          469C8CB0E30A4AF61A928247D660F9D225A8BE7019366F0B0CD595C8186B43AB
+          4D9024F322D06E5C8521F75D2CAB2A85E94026E010C00533D1CD09E99D4014C3
+          E87CE482F2A717D93B8A305AA381A97F4282D3484B40E1A248F0BAE33486825A
+          188D464C0A5FF1A3AA002A9EC0C7837D457957C7124A6A958DD896AF4146C08D
+          1B1E23D46A35789E87D56A452010483EC9244C20465A28B27B6767650CFEE5D7
+          38BE8F7F46AF5026C1559BCDB1AA922D48040F0A1E145B57E06C7D2BAEB5DF4B
+          4E20176E7778F0F0A54B9E205E0EA6DF793C38DDC463BB5BFE0992D97974DED3
+          9E01798254E0B4745FF47A120BA2354EFB70E47D435D09FE902294177630E1B4
+          D95D6FD88243BBB324F8AEEB01E95959A8166F3F4E4137F509CEC515B0AC3922
+          C1D7D574CFC8CF95DC050885C370F4FBD88283057A69277432ED2FD51FC5999C
+          85F03FE7E00F2A71E7C322D435DF8A9D303A2F3A767939B6C0B253175BD4D556
+          0197E3154EE95663D0FF1B8E491EE50D7D73C2693FE01B660BF6E569638B8E9F
+          3886D1110E2B5504872D7AE8CD179970DABCDC085BB027678B34B1F8F604BED9
+          CC385FBA1586FD4D33123F179C26DC37FC8E2D28DCAE99B5482E9C464241BE69
+          53CA705982DCAC0DFFEA5F24B36A9C7E132CB82C41B66E3DEE3FEB433AC114D0
+          3F84F988A8E02F75743575B8E251160000000049454E44AE426082}
+        Name = 'PngImage18'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D
+          F8000000097048597300004E2000004E2001167D99DE000004124944415478DA
+          ED955F4C5B551CC77FF7DEFE61D0C204D7758139C15684752C1A565A47D7A983
+          1664449D75337301A7D68D8CBD69F4C11463627858427C30DD8B3A0C8B0FBA10
+          71B8F247470706A6996E93617173C060A56D645DD7526EDBDB7BBCE75E6F2D5A
+          46E2E29BBFE4E49ED3F33DDFCFEFFCEE39B7044208FECB20FE07AC0A584DE070
+          38C889EB011345C1101EC798786D77D747DF72DDE46A6B1B0F1E54DE1560B7DB
+          A57136DB4033B17373FEB9BF262872978F898D5C73B9622B257EB4ED83B1C0B4
+          47BF1280B0B6B6CAD4892C3D4D477873868DD76C543D90A028C9101E47A34BC6
+          1FDD83639916DB6C2D0A2A0785B12E1380686A72C8C91CBA72297A67188B9289
+          64C3E8E0D7BD78D2F4F4B3FB11CB7431887D6ECCD5DB9D09A0B75A7365843494
+          E91D70E64D9C790167BEC49B2340F5DF9D397D46D41A6BEA9EA024926F922C6B
+          1DEDEBEDCB08D07380827F02083367AE55AAB64522425908966818EEEBE94D5F
+          BCD56C5EAB9428F2C38CE4D625F797B733012A6A5ECAC9958422CB00369B4D26
+          55AE33B02C72AF64FEA75E3CD724D7D88C6F903B79DBCF9FD7138474940798CD
+          6689BAB8CC4800C1671EA7A36F2A08E4CECB96215A921752057D373ADDEE789A
+          21A1D168642A5561194B4AF3280449890480610072D7150402B3D7A62E9494B0
+          D5119AC100E285A6D71F27097224533233F3334E85E2FEAF064E7DDA2F663F57
+          21DC01DB867AE7A60D9B0EA7EBF3E6273EFB708DFF45DF758F90C9AB47DE30E1
+          9AE3C191B60EB82F0B204803F8170166C3003FCF0661F2633B042309CB956117
+          BE60E83897EC6B4E07CC3BDF85503F9DD2FB16A2606F7F14C8DDCDFCDCE9CB1C
+          605FF361249A57AA01BC11A189001C18E27ABB06D6CA91B574F3634959B66260
+          E709278890E91E9AD737BE550E64FD81947957DD6E200A353A64AA36C13BED1D
+          B086ABE312B37C0738A83B32686FA900AC1303EB87D5592988BAA41408CBBE94
+          F97B1A9D50226EA272E78E277FC03B102314135A20BA1C50AC2DE6C745EB8B40
+          D48F3F9805AF580BF9BEDF7B93374FF4B3BC9E8E45B711566BABBCD4A81D2CB6
+          D8AB372A05C3585200E02736BF18F2C36F278F7AC747CFD9755BB630EA22ADCB
+          70A803B05E1EFE1D2C6D55BC398EEE636C4A3FF4D3F70FF1C7B4EE99BD0F8763
+          D1C9E71D9F839CE2DE605096DA0D16E3FADF0E069F5A5CB839525E5E0E1ACD23
+          86ECFCF56EA3FD18B4BCBF19FC37A6F9CCF14E30A82AAA033A112F5B98F9D593
+          BA6886DA5A4DD5F6864F2E8C0D544F5D9D4A01B4BA32EFA4E76AF3BCE762FA27
+          9AB4ECDDBFE340E897B37B923EE81CF0420F57B646EE0E8990A2CBC2255EF5FF
+          60A548580BF7708F2FB0399344CD87003AF1EFDC1146E9907B01A0D1F1004CCC
+          254E70E62FA7CFA543FE3560726B3E3A7BE916EE2A38C0E2DFE731A4A1E21E4A
+          745CF86CE838F32B77D3FC01CF05F8A9B438C37F0000000049454E44AE426082}
+        Name = 'PngImage19'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D
+          F80000000970485973000017120000171201679FD252000002F14944415478DA
+          D596494C135118C7FF25404B03B614098807C1A84823081421EC0112A322211E
+          B89078E064E2050F9A885E8C8683CB4D0D116334C881C42A1A448301458C0BC4
+          22298A6C6915D9B1EDD0D26576674ADAD8141968C2C1974CBE37F3BDF9FDDEFB
+          66DE64643CCF632B9B6CCB051B1DD8D972AB5E08E7098248FCD798D78983A109
+          04F89C10128B8B098487B1E0680A2C4582A53DE07C71651EEFEC51988C49813A
+          4EBD718100E7755A13E8DFA3502B59C8927282E134098E7481A11C3050F1988B
+          CB822A761B3C24B5BE4084E76698E1FC69C0AB4F6158B2F238532B03A9D606C0
+          59CA03561070941B46670C4C09B9881104768713B2F61EE39ACF593EDB87C2AC
+          092C7C1F42FF68246AEA4A414C0EA1456FC1C9232CC2637782659855B8001605
+          2CE98191D4602C4E8748A502F61541F0A4DBC89FA8480F80BF7878DB0B9F1B31
+          E2DB8F0854D69678E1C3331A704E2B2CF356E469192855D1A0296A55E2718126
+          DD18B0A930AAC946A45A29AC60255820C2C5B258C73F63782A1EF21D3A6C978F
+          E1D70C8D283987FC4C0568B7036F7A1790B68B44B48201CFD26084076F5E64D0
+          33AD06959A8E70B502B6657BA04084A7259B10661B449F51859A737AB01C07FD
+          DDCB48D698A04D910975A76018F64097AE80FEE957B4F79301AB4FCADD078536
+          01B4503E1B610F5EC1E3E60B981E1FC4A9C6E75E38CB72E0381E2F5B2F41EE1A
+          00870814E5A8B06C36E274338DB3D73A71B1F126BE7435F95F98F286725EA190
+          83A2E84081085A85F201705FFFDED57AD41D73F8E177DA063031B51424F049BC
+          FBC0279082FB72F76F34A0F77D9717CE08D7CD33963505FE8D260AAACB0E6C08
+          FEF72444B8989B9AB7490B8E976A438233C2F9ECE2B2B4E068519AF7E607ADDD
+          FE447555019E757C58F733925F9881058B435A70B82075D333F746E1B0104E69
+          4145DEDE90E062241C6E6941D9A13D5E50DBA3B7FE4455653E3A3A3FAE5BA283
+          D9FBE17091D28212DDEE4DCFDCD77793B4B4A030331986916984DA240557AE37
+          850CF7B57F0AFEFBBF8A3FEEF0D2AAE4F624F60000000049454E44AE426082}
+        Name = 'PngImage20'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D
+          F80000000970485973000017120000171201679FD2520000014D4944415478DA
+          63FCFFFF3F032D0123CD2D40E6182E3104DBF6EFEF3F86BF7FFF32FCFD03C1B7
+          B26EC1D519782490E4220C0BB2A24D5114744CD9CB7037F72E5C1D171717F916
+          E82FD4FF9F1367CEF0F5DB2F861F3FFF30FCFCF58761FEF2130C0F0A1F309262
+          288A05E8C1929F68C5F0F6FD37B0E13F7FFD6558B2EA244A70BDAE7F8D6219A1
+          2063C4162CCF5E7E021B0EF30588FDFDC71F86EDDBCE30BC6B7E47926F18B105
+          0B36C39FBEFACC70FEC435868FED1F49F381CE3C9DFFE8C1826EF8F79FBF19DE
+          7DFCC170FAC82586AFDD5F49F381E62CCDFF45A9B65883E5CEA3F7288A4FEC3F
+          CFF063C20FD27CA0364DED3F2C124111EDEBA98F112C7FFEFC61F8FB1BA2E6F7
+          94DFA4F9009923DD29FDDFD34D1F6FB05094D1245A25FE3B3BE9815D8E2B5828
+          CA68A28DA2FF61E99D9260C1690139806024536AC1A80F86A10F28CA68C40092
+          33DA906F550000E7732B02C862110D0000000049454E44AE426082}
+        Name = 'PngImage21'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D
+          F80000000970485973000017120000171201679FD252000000AA4944415478DA
+          63FCFFFF3F032D0123CD2D205583814702492E22D9022E2E2EDA5A402A60043A
+          07EE2210E33B10FFC0427F05E26F40EC85E628424106B160E24484C8C78F0C0C
+          1F3E3030BC7F0FA1DFBD636078FB9681E1CD1B86B52F5E308490E86B540BF018
+          0EC28BFFFC618823D507FF801630822C20603803D0F099400D19A4FA0018B6FF
+          F185393266C06201411F90E21A72C06846A3BD05432F92477D30F03E187C196D
+          C8B72A00572A73F3ECEFF30C0000000049454E44AE426082}
+        Name = 'PngImage22'
+        Background = clWindow
+      end
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D
+          F80000000970485973000017120000171201679FD2520000018C4944415478DA
+          63FCFFFF3F032D01E3A8054459C0C8C8C860E091F0FFC28E058C843490AA8E3E
+          16187A26D22C9C864910812CA079102DD87000251E40E23F7FFE62F8F90B827F
+          C0D8405A47439528753D15A98C2816C4FBDBA3D8FEFBCF5F08FEFD17CEEE98B1
+          9461626D1651EA26D565E3B6009BA64BB75E306CD8B183617A733E51EA66B414
+          60B7009BA6DF7FFE315CBFF78A61F9860D0C0BBACB8952B7B0A70261C1FCF5FB
+          FF270438E0D404A2EF3C7ACB307FC54A861593EB8852B7724A3DC282192B76FE
+          4F0A76C6A9E91750ECD1F30F0CD3162C625833BD8928759BE6B4212C98B868F3
+          FF9450379C9A40F8C59BCF0C7D336633AC9FDD4694BA5D4B7A111674CD59FB3F
+          2DCC13A7A65FBFFF30BCFBF89DA175E21486CD73BB88527778F51484054D5397
+          FFCF8CF4C1A9E9D7AFBF0C5FBEFF62A8EDEC61D8B6B09F2875A737CF415850DD
+          BFF07F76B43F3889E103152D1D0CDB164D204A1D4A5151D231FBFF2F600EFCF5
+          EB37C3F71F3F187EFCF809A47F42E89F20FA0730DCFF8035DB599912A50E6E01
+          2DC1D0B7000029AD9AF9DFD03E1F0000000049454E44AE426082}
+        Name = 'PngImage23'
+        Background = clWindow
+      end>
+    Bitmap = {}
+  end
+  inherited JvFormStorage: TJvFormStorage [8]
+  end
+  inherited EditorActionList: TActionList [9]
+    object actExpandir: TAction [23]
+      Category = 'Ver'
+      Caption = 'Expandir todo'
+      ImageIndex = 21
+      OnExecute = actExpandirExecute
+    end
+    object actContraer: TAction [24]
+      Category = 'Ver'
+      Caption = 'Contraer todo'
+      ImageIndex = 22
+      OnExecute = actContraerExecute
+    end
+    object actAnchoAuto: TAction [25]
+      Category = 'Ver'
+      Caption = 'Ancho autom'#225'tico'
+      ImageIndex = 23
+      OnExecute = actAnchoAutoExecute
+    end
+  end
+  inherited dsDataTable: TDADataSource [10]
+  end
+end
diff --git a/Source/Modulos/Informe ventas por articulo/Views/uEditorInfVentasAlbArticulo.pas b/Source/Modulos/Informe ventas por articulo/Views/uEditorInfVentasAlbArticulo.pas
new file mode 100644
index 0000000..062085f
--- /dev/null
+++ b/Source/Modulos/Informe ventas por articulo/Views/uEditorInfVentasAlbArticulo.pas	
@@ -0,0 +1,291 @@
+unit uEditorInfVentasAlbArticulo;
+
+interface
+
+uses
+  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
+  Dialogs, uEditorInformeBaseInforme, DB, uDADataTable, JvAppStorage,
+  JvAppRegistryStorage, JvComponentBase, JvFormPlacement, ImgList,
+  PngImageList, StdActns, ActnList, ComCtrls, TBX, TB2Item, TB2Dock,
+  TB2Toolbar, ExtCtrls, JvExControls, JvComponent, JvNavigationPane, uBizInformes,
+  uCustomView, uViewBase, uViewInformeBase, uViewInfVentasAlbArticulo,
+  Grids, DBGrids, pngimage, JvExComCtrls, JvStatusBar, uInfVentasAlbArticuloController,
+  uIEditorInfVentasAlbArticulo, uBizInfVentasArticulo, uInformesController,
+  uViewGridBase, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData,
+  cxDataStorage, cxEdit, cxDBData, cxGridCustomTableView, cxGridTableView,
+  cxGridDBTableView, cxGridLevel, cxClasses, cxControls, cxGridCustomView,
+  cxGrid, TB2ExtItems, TBXExtItems, uDAInterfaces, cxContainer, cxLabel;
+
+
+type
+  TfEditorInfVentasAlbArticulo = class(TfEditorInformeBaseInforme, IEditorInfVentasAlbArticulo)
+    TBXSeparatorItem16: TTBXSeparatorItem;
+    tbxiExpandir: TTBXItem;
+    tbxiContraer: TTBXItem;
+    tbxiAnchoAuto: TTBXItem;
+    actExpandir: TAction;
+    actContraer: TAction;
+    actAnchoAuto: TAction;
+    TBXItem37: TTBXItem;
+    TBXItem36: TTBXItem;
+    TBXItem35: TTBXItem;
+    TBXSeparatorItem17: TTBXSeparatorItem;
+    frViewInfVentasAlbArticulo1: TfrViewInfVentasAlbArticulo;
+    procedure actRefrescarExecute(Sender: TObject);
+    procedure actExpandirExecute(Sender: TObject);
+    procedure actContraerExecute(Sender: TObject);
+    procedure actAnchoAutoExecute(Sender: TObject);
+    procedure CustomEditorCreate(Sender: TObject);
+    procedure CustomEditorGetModified(Sender: TObject; var Modified: Boolean);
+    procedure FormShow(Sender: TObject);
+    procedure actPrevisualizarExecute(Sender: TObject);
+    procedure actImprimirExecute(Sender: TObject);
+    procedure actConfPaginaExecute(Sender: TObject);
+  private
+    FInformesController: IInformesController;
+    procedure RestaurarConfiguracion;
+    procedure GuardarConfiguracion;
+  protected
+    FController : IInfVentasAlbArticuloController;
+    FModificado : Boolean;
+    procedure OnViewControlChanged(Sender: TObject);
+    procedure SetInforme(const Value: IBizInforme); override;
+    procedure RellenarCabeceraInforme; override;
+
+    function GetController : IInfVentasAlbArticuloController;
+    procedure SetController (const Value : IInfVentasAlbArticuloController);
+
+    procedure GuardarInterno; override;
+
+  public
+    property Controller: IInfVentasAlbArticuloController read GetController write SetController;
+
+    constructor Create(AOwner: TComponent); override;
+    destructor Destroy; override;
+  end;
+
+
+implementation
+
+uses
+  uROClasses, //cxControls, cxGridCustomView, //cxGridCustomTableView,
+  //cxGridTableView,
+  uCustomEditor, uDataModuleUsuarios, uSistemaFunc;
+
+{$R *.dfm}
+
+{ TfEditorInfVentasAlbArticulo }
+
+procedure TfEditorInfVentasAlbArticulo.SetController(const Value: IInfVentasAlbArticuloController);
+begin
+  FController := Value;
+  if Assigned(FController) then
+     frViewInfVentasAlbArticulo1.Controller := (FController as IInfVentasAlbArticuloController);
+end;
+
+procedure TfEditorInfVentasAlbArticulo.SetInforme(const Value: IBizInforme);
+begin
+  inherited;
+//  RefrescarTituloEditor;
+  if Assigned(FInforme) then
+  begin
+    frViewInfVentasAlbArticulo1.OnViewChanged := OnViewControlChanged;
+//    with (FInforme as IBizInforme) do
+//    begin
+//      Items.DataTable.Active := False;  // No se abre la tabla hasta que no se pulse en 'Refrescar'
+//      dsVentasTerminadas.DataTable := Items.DataTable;
+//      frViewInfVentasAlbArticulo1.frViewInfVentasAlbArticuloGrid1.FocusedView.DataController.DataSource := dsVentasTerminadas;
+//    end;
+  end;
+end;
+
+procedure TfEditorInfVentasAlbArticulo.actRefrescarExecute(Sender: TObject);
+begin
+  inherited;
+  frViewInfVentasAlbArticulo1.Refresh;
+  while (frViewInfVentasAlbArticulo1.frViewInfVentasAlbArticuloGrid1.FocusedView.Controller.FocusedRecord is TcxGridGroupRow) do
+  begin
+    frViewInfVentasAlbArticulo1.frViewInfVentasAlbArticuloGrid1.FocusedView.Controller.FocusedRecord.Expand(True);
+    if (frViewInfVentasAlbArticulo1.frViewInfVentasAlbArticuloGrid1.FocusedView.Controller.FocusedRecordIndex <
+      frViewInfVentasAlbArticulo1.frViewInfVentasAlbArticuloGrid1.FocusedView.DataController.RowCount - 1) then
+      frViewInfVentasAlbArticulo1.frViewInfVentasAlbArticuloGrid1.FocusedView.Controller.GoToNext(False, True)
+    else
+      Exit;
+  end;
+end;
+
+procedure TfEditorInfVentasAlbArticulo.actExpandirExecute(Sender: TObject);
+begin
+  inherited;
+  frViewInfVentasAlbArticulo1.frViewInfVentasAlbArticuloGrid1.ExpandirTodo;
+end;
+
+procedure TfEditorInfVentasAlbArticulo.actContraerExecute(Sender: TObject);
+begin
+  inherited;
+  frViewInfVentasAlbArticulo1.frViewInfVentasAlbArticuloGrid1.ContraerTodo;
+end;
+
+procedure TfEditorInfVentasAlbArticulo.actAnchoAutoExecute(Sender: TObject);
+begin
+  inherited;
+  frViewInfVentasAlbArticulo1.frViewInfVentasAlbArticuloGrid1.AjustarAncho;
+end;
+
+procedure TfEditorInfVentasAlbArticulo.OnViewControlChanged(
+  Sender: TObject);
+begin
+//  if FInforme.EsModificable then
+    FModificado := True;
+end;
+
+procedure TfEditorInfVentasAlbArticulo.CustomEditorCreate(Sender: TObject);
+begin
+  inherited;
+  FModificado := False;
+end;
+
+procedure TfEditorInfVentasAlbArticulo.CustomEditorGetModified(
+  Sender: TObject; var Modified: Boolean);
+begin
+  inherited;
+  Modified := FModificado;
+end;
+
+destructor TfEditorInfVentasAlbArticulo.Destroy;
+begin
+  FInformesController := Nil;
+  FViewInforme := Nil;  
+  inherited;
+end;
+
+function TfEditorInfVentasAlbArticulo.GetController: IInfVentasAlbArticuloController;
+begin
+  Result := FController;
+end;
+
+procedure TfEditorInfVentasAlbArticulo.GuardarConfiguracion;
+var
+  Aux : IROStrings;
+  Fichero: TextFile;
+  NombreFichero: String;
+
+begin
+  NombreFichero := DarFicheroTemporal;
+  frViewInfVentasAlbArticulo1.frViewInfVentasAlbArticuloGrid1.cxGridView.StoreToIniFile(NombreFichero, true, [gsoUseFilter,gsoUseSummary]);
+
+  with TStringList.Create do
+  try
+     LoadFromFile(NombreFichero);
+     Aux := NewROStrings();
+     Aux.Add(Text);
+
+{     if not (FInforme.DataTable.State in dsEditModes) then
+        FInforme.Edit;
+     FInforme.VISTA := Aux;
+}
+  finally
+     Free;
+  end;
+end;
+
+procedure TfEditorInfVentasAlbArticulo.GuardarInterno;
+begin
+  inherited;
+
+  ShowHourglassCursor;
+
+  try
+    if FModificado then
+       GuardarConfiguracion;
+       FInformesController.Guardar(FInforme);
+       FModificado := False;
+  finally
+    HideHourglassCursor;
+  end;
+
+  Modified := False;
+end;
+
+procedure TfEditorInfVentasAlbArticulo.RestaurarConfiguracion;
+var
+  Fichero: TextFile;
+  NombreFichero: String;
+begin
+  try
+    //Creamos un fichero temporal para guardar la configuración del informe que viene dada
+    //por su campo vista, para luego restaurarla en el grid a partir de dicho fichero porque el Stream falla
+    NombreFichero := DarFicheroTemporal;
+    AssignFile(Fichero, NombreFichero);
+    Rewrite(Fichero);
+    Writeln(Fichero, FInforme.VISTA.Text);
+    CloseFile(Fichero);
+
+    //Restauramos la configuración
+    frViewInfVentasAlbArticulo1.frViewInfVentasAlbArticuloGrid1.cxGridView.RestoreFromIniFile(NombreFichero,True,false,[gsoUseFilter,gsoUseSummary]);
+
+  finally
+    //Eliminamos el fichero temporal
+    DeleteFile(NombreFichero);
+//    FreeAndNil(Fichero)
+  end;
+end;
+
+procedure TfEditorInfVentasAlbArticulo.FormShow(Sender: TObject);
+begin
+  inherited;
+  if FInforme.DataTable.State <> dsInsert then // No restaurar si estamos insertando
+     RestaurarConfiguracion;
+
+  frViewInfVentasAlbArticulo1.frViewColumnas1.Refresh;
+  frViewInfVentasAlbArticulo1.frViewAgrupaciones1.Refresh;
+
+  if FInforme.DataTable.State = dsInsert then // Si es nuevo obligamos a meter nombre
+     actPropiedades.Execute;
+end;
+
+procedure TfEditorInfVentasAlbArticulo.actPrevisualizarExecute(
+  Sender: TObject);
+begin
+  inherited;
+  frViewInfVentasAlbArticulo1.frViewInfVentasAlbArticuloGrid1.Preview;
+end;
+
+procedure TfEditorInfVentasAlbArticulo.actImprimirExecute(Sender: TObject);
+begin
+  inherited;
+  frViewInfVentasAlbArticulo1.frViewInfVentasAlbArticuloGrid1.Print;
+end;
+
+procedure TfEditorInfVentasAlbArticulo.actConfPaginaExecute(
+  Sender: TObject);
+begin
+  inherited;
+  frViewInfVentasAlbArticulo1.frViewInfVentasAlbArticuloGrid1.PrintSetup;
+end;
+
+constructor TfEditorInfVentasAlbArticulo.Create(AOwner: TComponent);
+begin
+  inherited;
+  FInformesController := TInformesController.Create;
+  FViewInforme := frViewInfVentasAlbArticulo1;
+end;
+
+procedure TfEditorInfVentasAlbArticulo.RellenarCabeceraInforme;
+begin
+  inherited;
+  with frViewInfVentasAlbArticulo1.frViewInfVentasAlbArticuloGrid1.dxPrintStyleManager1Style1.PrinterPage.PageHeader do
+  begin
+    LeftTitle.Clear;
+//    LeftTitle.Add(FInforme.NOMBRE);
+    LeftTitle.Add(FInforme.DESCRIPCION);    
+
+    RightTitle.Clear;
+    RightTitle.Add(DateToStr(frViewInfVentasAlbArticulo1.frViewPeriodoFechasInforme1.edtFechaIni.Date) +
+      ' - ' + DateToStr(frViewInfVentasAlbArticulo1.frViewPeriodoFechasInforme1.edtFechaFin.Date));
+    RightTitle.Add(frViewInfVentasAlbArticulo1.frViewInfVentasAlbArticuloGrid1.FocusedView.DataController.Filter.FilterText);
+  end;
+end;
+
+end.
+
diff --git a/Source/Modulos/Informe ventas por articulo/Views/uInfVentasArticuloViewRegister.pas b/Source/Modulos/Informe ventas por articulo/Views/uInfVentasArticuloViewRegister.pas
index 65ac249..3b4133c 100644
--- a/Source/Modulos/Informe ventas por articulo/Views/uInfVentasArticuloViewRegister.pas	
+++ b/Source/Modulos/Informe ventas por articulo/Views/uInfVentasArticuloViewRegister.pas	
@@ -8,16 +8,18 @@ procedure UnregisterViews;
 implementation
 
 uses
-  uEditorRegistryUtils, uEditorInfVentasArticulo;
+  uEditorRegistryUtils, uEditorInfVentasArticulo, uEditorInfVentasAlbArticulo;
 
 procedure RegisterViews;
 begin
   EditorRegistry.RegisterClass(TfEditorInfVentasArticulo, 'EditorInfVentasArticulo');
+  EditorRegistry.RegisterClass(TfEditorInfVentasAlbArticulo, 'EditorInfVentasAlbArticulo');
 end;
 
 procedure UnregisterViews;
 begin
   EditorRegistry.UnRegisterClass(TfEditorInfVentasArticulo);
+  EditorRegistry.UnRegisterClass(TfEditorInfVentasAlbArticulo);  
 end;
 
 end.
diff --git a/Source/Modulos/Informe ventas por articulo/Views/uViewInfVentasAlbArticulo.dfm b/Source/Modulos/Informe ventas por articulo/Views/uViewInfVentasAlbArticulo.dfm
new file mode 100644
index 0000000..1c002b8
--- /dev/null
+++ b/Source/Modulos/Informe ventas por articulo/Views/uViewInfVentasAlbArticulo.dfm	
@@ -0,0 +1,202 @@
+inherited frViewInfVentasAlbArticulo: TfrViewInfVentasAlbArticulo
+  Height = 509
+  ExplicitHeight = 509
+  inherited TBXMultiDock1: TTBXMultiDock
+    Top = 110
+    Height = 399
+    ExplicitTop = 110
+    ExplicitHeight = 399
+    inherited pnlParametros: TTBXDockablePanel
+      ExplicitHeight = 184
+      inherited pcParametros: TPageControl
+        Height = 95
+        ExplicitHeight = 95
+        inherited TabSheet5: TTabSheet
+          ExplicitLeft = 4
+          ExplicitTop = 6
+          ExplicitWidth = 210
+          ExplicitHeight = 85
+        end
+        inherited tsColumnas: TTabSheet
+          ExplicitHeight = 85
+          inherited frViewColumnas1: TfrViewColumnas
+            Height = 85
+            ExplicitHeight = 85
+            inherited lbColumnas: TcxCheckListBox
+              Height = 56
+              ExplicitHeight = 56
+            end
+          end
+        end
+        inherited tsAgrupacion: TTabSheet
+          ExplicitHeight = 85
+          inherited frViewAgrupaciones1: TfrViewAgrupaciones
+            Height = 85
+            ExplicitHeight = 85
+          end
+        end
+      end
+    end
+    inherited pnlTareas: TTBXDockablePanel
+      Top = 184
+      DockPos = 184
+      ExplicitTop = 184
+      ExplicitHeight = 199
+      inherited TBXPageScroller1: TTBXPageScroller
+        Height = 177
+        ExplicitHeight = 177
+        inherited pcTareas: TPageControl
+          Height = 129
+          ExplicitHeight = 129
+          inherited tsSumarios: TTabSheet
+            ExplicitHeight = 119
+            inherited frViewSumarios1: TfrViewSumarios
+              Height = 119
+              ExplicitHeight = 119
+              inherited vgSumarios: TcxVerticalGrid
+                Height = 90
+                ExplicitHeight = 90
+              end
+            end
+          end
+          inherited tsFiltros: TTabSheet
+            ExplicitHeight = 119
+            inherited frViewFiltros1: TfrViewFiltros
+              Height = 119
+              ExplicitHeight = 119
+              inherited cxFilterControl1: TcxFilterControl
+                Height = 60
+                ExplicitHeight = 60
+              end
+              inherited TBXAlignmentPanel3: TTBXAlignmentPanel
+                Top = 89
+                ExplicitTop = 89
+              end
+            end
+          end
+        end
+      end
+    end
+  end
+  inline frViewInfVentasAlbArticuloGrid1: TfrViewInfVentasAlbArticuloGrid [1]
+    Left = 222
+    Top = 110
+    Width = 477
+    Height = 399
+    Align = alClient
+    Font.Charset = DEFAULT_CHARSET
+    Font.Color = clWindowText
+    Font.Height = -11
+    Font.Name = 'Tahoma'
+    Font.Style = []
+    ParentFont = False
+    TabOrder = 1
+    ReadOnly = False
+    ExplicitLeft = 222
+    ExplicitTop = 110
+    ExplicitWidth = 477
+    ExplicitHeight = 399
+    inherited cxGrid: TcxGrid
+      Width = 477
+      Height = 399
+      ExplicitWidth = 477
+      ExplicitHeight = 399
+      inherited cxGridView: TcxGridDBTableView
+        inherited cxGridViewCANTIDAD: TcxGridDBColumn
+          OnHeaderClick = frViewInfVentasAlbArticuloGrid1cxGridViewCANTIDADHeaderClick
+        end
+        inherited cxGridViewIMPORTE_TOTAL_VENTA: TcxGridDBColumn
+          OnHeaderClick = frViewInfVentasAlbArticuloGrid1cxGridViewIMPORTE_TOTAL_VENTAHeaderClick
+        end
+      end
+    end
+    inherited dxPrintStyleManager1: TdxPrintStyleManager
+      inherited dxPrintStyleManager1Style1: TdxPSPrintStyle
+        BuiltInStyle = True
+      end
+    end
+    inherited dxComponentPrinter: TdxComponentPrinter
+      inherited dxPrinterLinkcxGrid: TdxGridReportLink
+        BuiltInReportLink = True
+      end
+    end
+  end
+  inherited TBXMultiDock2: TTBXMultiDock [2]
+    Height = 110
+    ExplicitHeight = 110
+    inherited pnlIntervaloFechas: TTBXDockablePanel
+      DockedHeight = 106
+      ShowCaption = False
+      ShowCaptionWhenDocked = False
+      ExplicitHeight = 110
+      inherited TBXAlignmentPanel3: TTBXAlignmentPanel
+        Top = 76
+        Width = 679
+        ExplicitTop = 76
+        ExplicitWidth = 679
+      end
+      inline frViewPeriodoFechasInforme1: TfrViewPeriodoFechasInforme
+        Left = 0
+        Top = 0
+        Width = 679
+        Height = 76
+        Align = alClient
+        Font.Charset = DEFAULT_CHARSET
+        Font.Color = clWindowText
+        Font.Height = -11
+        Font.Name = 'MS Sans Serif'
+        Font.Style = []
+        ParentFont = False
+        TabOrder = 1
+        ReadOnly = False
+        ExplicitWidth = 679
+        ExplicitHeight = 76
+        inherited TBXDockablePanel1: TTBXDockablePanel
+          ExplicitWidth = 679
+          ExplicitHeight = 76
+          inherited dxLayoutControl1: TdxLayoutControl
+            Width = 679
+            Height = 76
+            ExplicitWidth = 679
+            ExplicitHeight = 76
+            inherited cbPeriodo: TcxComboBox
+              Left = 54
+              ExplicitLeft = 54
+            end
+            inherited edtFechaIni: TcxDateEdit
+              Left = 54
+              ExplicitLeft = 54
+            end
+            inherited edtFechaFin: TcxDateEdit
+              Left = 266
+              ExplicitLeft = 266
+            end
+          end
+        end
+      end
+    end
+  end
+  inherited dsDataSource: TDADataSource [3]
+  end
+  inherited SmallImages: TPngImageList [4]
+  end
+  inherited LargeImages: TPngImageList [5]
+  end
+  inherited EditorActionList: TActionList
+    Left = 248
+    Top = 72
+    inherited actRefrescar: TAction
+      OnExecute = actRefrescarExecute
+    end
+    object actPeriodoFechas: TAction
+      Category = 'Tareas'
+      Caption = 'Periodo de fechas'
+      ImageIndex = 4
+      OnExecute = actPeriodoFechasExecute
+    end
+  end
+  object dsVentasTerminadas: TDADataSource
+    Left = 288
+    Top = 160
+  end
+end
diff --git a/Source/Modulos/Informe ventas por articulo/Views/uViewInfVentasAlbArticulo.pas b/Source/Modulos/Informe ventas por articulo/Views/uViewInfVentasAlbArticulo.pas
new file mode 100644
index 0000000..b5ded27
--- /dev/null
+++ b/Source/Modulos/Informe ventas por articulo/Views/uViewInfVentasAlbArticulo.pas	
@@ -0,0 +1,221 @@
+unit uViewInfVentasAlbArticulo;
+
+interface
+
+uses
+  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
+  Dialogs, uViewInformeBase, ActnList, ImgList, PngImageList, uViewGrid,
+  uViewInformeBaseGrid, uViewSumarios, TBXDkPanels, StdCtrls,
+  uViewAgrupaciones, uCustomView, uViewBase, uViewColumnas, ComCtrls,
+  TB2Dock, uViewInformeBaseParametros, uBizInformes, cxStyles,
+  cxCustomData, cxGraphics, cxFilter, cxData, cxDataStorage, cxEdit, DB,
+  cxDBData, cxGridLevel, cxClasses, cxControls, cxGridCustomView,
+  cxGridCustomTableView, cxGridTableView, cxGridDBTableView, cxGrid,
+  cxTextEdit, uViewFiltros, uBizInfVentasArticulo, uInfVentasAlbArticuloController,
+  uViewPeriodoFechasInforme, uViewInfVentasAlbArticuloGrid, uDADataTable, uViewFiltroBase,
+  uDAInterfaces;
+
+type
+  IViewInfVentasAlbArticulo = interface(IViewInformeBase)
+    ['{B8B9105B-E833-4E7D-BA36-EB9A7EBDCE69}']
+    function GetDatos : IBizInfVentasAlbArticulo;
+    procedure SetDatos (const Value : IBizInfVentasAlbArticulo);
+    property Datos : IBizInfVentasAlbArticulo read GetDatos write SetDatos;
+
+    function GetController : IInfVentasAlbArticuloController;
+    procedure SetController (const Value : IInfVentasAlbArticuloController);
+    property Controller: IInfVentasAlbArticuloController read GetController write SetController;
+  end;
+
+  TfrViewInfVentasAlbArticulo = class(TfrViewInformeBase, IViewInfVentasAlbArticulo)
+    frViewPeriodoFechasInforme1: TfrViewPeriodoFechasInforme;
+    actPeriodoFechas: TAction;
+    frViewInfVentasAlbArticuloGrid1: TfrViewInfVentasAlbArticuloGrid;
+    dsVentasTerminadas: TDADataSource;
+    procedure actRefrescarExecute(Sender: TObject);
+    procedure actPeriodoFechasExecute(Sender: TObject);
+    procedure frViewInfVentasAlbArticuloGrid1cxGridViewIMPORTE_TOTAL_VENTAHeaderClick(Sender: TObject);
+    procedure frViewInfVentasAlbArticuloGrid1cxGridViewCANTIDADHeaderClick(Sender: TObject);
+  protected
+    FDatos : IBizInfVentasAlbArticulo;
+    FController : IInfVentasAlbArticuloController;
+    FModificado : Boolean;
+    procedure OnViewInformeBaseGridChanged(Sender : TObject);
+    procedure OnFilterChanged(Sender : TObject);
+    procedure ActivarTarea(const ATarea: Integer); override;
+    function GetFocusedView: TcxGridDBTableView; override;
+    function GetDatos : IBizInfVentasAlbArticulo;
+    procedure SetDatos (const Value : IBizInfVentasAlbArticulo);
+    function GetController : IInfVentasAlbArticuloController;
+    procedure SetController (const Value : IInfVentasAlbArticuloController);
+
+  public
+    property Controller: IInfVentasAlbArticuloController read GetController write SetController;
+    property Datos : IBizInfVentasAlbArticulo read GetDatos write SetDatos;
+    constructor Create(AOwner: TComponent); override;
+    procedure Refresh; override;
+  end;
+
+implementation
+{$R *.dfm}
+{ TfrViewInfVentasAlbArticulo }
+
+uses schInfVentasArticuloClient_Intf, StrUtils;
+
+const
+  PERIODO = 0;
+
+constructor TfrViewInfVentasAlbArticulo.Create(AOwner: TComponent);
+begin
+  inherited;
+  frViewInfVentasAlbArticuloGrid1.OnViewChanged := OnViewInformeBaseGridChanged;
+  frViewInfVentasAlbArticuloGrid1.OnFilterChanged := OnFilterChanged;
+  frViewColumnas1.ViewInformeBaseGrid := frViewInfVentasAlbArticuloGrid1;
+  frViewAgrupaciones1.ViewInformeBaseGrid := frViewInfVentasAlbArticuloGrid1;
+  frViewSumarios1.ViewInformeBaseGrid := frViewInfVentasAlbArticuloGrid1;
+  frViewFiltros1.ViewInformeBaseGrid := frViewInfVentasAlbArticuloGrid1;
+  pcParametros.ActivePage := TabSheet5;
+end;
+
+procedure TfrViewInfVentasAlbArticulo.frViewInfVentasAlbArticuloGrid1cxGridViewCANTIDADHeaderClick(Sender: TObject);
+begin
+  inherited;
+  frViewInfVentasAlbArticuloGrid1.cxGridView.DataController.Groups.DataController.BeginUpdate;
+  frViewInfVentasAlbArticuloGrid1.cxGridView.GetColumnByFieldName(fld_InfVentasAlbArticuloCANTIDAD).SortIndex := 1;
+  frViewInfVentasAlbArticuloGrid1.cxGridView.GetColumnByFieldName(fld_InfVentasAlbArticuloCANTIDAD).Summary.SortByGroupFooterSummary := True;
+  frViewInfVentasAlbArticuloGrid1.cxGridView.DataController.Groups.DataController.EndUpdate;
+end;
+
+procedure TfrViewInfVentasAlbArticulo.frViewInfVentasAlbArticuloGrid1cxGridViewIMPORTE_TOTAL_VENTAHeaderClick(Sender: TObject);
+begin
+  inherited;
+  frViewInfVentasAlbArticuloGrid1.cxGridView.DataController.Groups.DataController.BeginUpdate;
+  frViewInfVentasAlbArticuloGrid1.cxGridView.GetColumnByFieldName(fld_InfVentasAlbArticuloIMPORTE_TOTAL_VENTA).SortOrder := soAscending;
+  frViewInfVentasAlbArticuloGrid1.cxGridView.GetColumnByFieldName(fld_InfVentasAlbArticuloIMPORTE_TOTAL_VENTA).Summary.SortByGroupFooterSummary := True;
+  frViewInfVentasAlbArticuloGrid1.cxGridView.DataController.Groups.DataController.EndUpdate;
+end;
+
+function TfrViewInfVentasAlbArticulo.GetController: IInfVentasAlbArticuloController;
+begin
+  Result := FController;
+end;
+
+function TfrViewInfVentasAlbArticulo.GetDatos: IBizInfVentasAlbArticulo;
+begin
+  Result := FDatos;
+end;
+
+function TfrViewInfVentasAlbArticulo.GetFocusedView: TcxGridDBTableView;
+begin
+  Result := frViewInfVentasAlbArticuloGrid1.cxGridView;
+end;
+
+procedure TfrViewInfVentasAlbArticulo.Refresh;
+var
+  AColumns : TStringList;
+  AColumnsGroup : TStringList;
+  i: Integer;
+  Condicion: TDAWhereExpression;
+  AWhere : String;
+begin
+  inherited;
+  ShowHourglassCursor;
+  actRefrescar.Enabled := False;
+
+  AWhere := ' ( ' + fld_InfVentasAlbArticuloFECHA_ALBARAN + ' between ''' + ReplaceStr(DateToStr(frViewPeriodoFechasInforme1.FechaInicial),'/','.') + ''' and ''' + ReplaceStr(DateToStr(frViewPeriodoFechasInforme1.FechaFinal),'/','.') + ''') ';
+
+  frViewInfVentasAlbArticuloGrid1.OnViewChanged := nil;
+  frViewInfVentasAlbArticuloGrid1.OnFilterChanged := nil;
+
+  try
+    // Calcular las columnas a pedir al servidor
+    AColumns := frViewColumnas1.GetCheckedColumns;
+    AColumns.sorted := true;
+    AColumns.Duplicates := dupIgnore;
+
+    //Añadimos el nombre de los campos a los que referencia los captions de agrupacion
+    AColumnsGroup := frViewAgrupaciones1.GetAgrupaciones;
+    for i:= 0 to AColumnsGroup.Count - 1 do
+      AColumns.Add((frViewInfVentasAlbArticuloGrid1 as IViewInformeBaseGrid).GetColumnByCaption(AColumnsGroup.Strings[i]).DataBinding.FieldName);
+
+
+    FDatos := FController.BuscarTodos(AColumns.CommaText, Awhere);
+    dsVentasTerminadas.DataTable := FDatos.Datatable;
+    frViewInfVentasAlbArticuloGrid1.FocusedView.DataController.DataSource := dsVentasTerminadas;
+
+
+    with Datos.DataTable do
+    begin
+      DisableControls;
+      try
+        Active := False;
+
+        Active := True;
+
+        frViewColumnas1.Execute;
+        frViewAgrupaciones1.Execute;
+        frViewSumarios1.Refresh;
+        frViewFiltros1.Refresh;
+        pnlTareas.Visible := True;
+
+        if Assigned(FOnViewChanged) then
+          FOnViewChanged(Self);
+      finally
+        EnableControls;
+        frViewInfVentasAlbArticuloGrid1.Refresh;
+        frViewInfVentasAlbArticuloGrid1.ExpandirTodo;
+        frViewInfVentasAlbArticuloGrid1.GotoFirst;
+      end;
+    end;
+
+  finally
+    FreeAndNil(AColumns);
+    actRefrescar.Enabled := True;
+    HideHourglassCursor;
+  end;
+end;
+
+procedure TfrViewInfVentasAlbArticulo.SetController(const Value: IInfVentasAlbArticuloController);
+begin
+  FController := Value;
+end;
+
+procedure TfrViewInfVentasAlbArticulo.SetDatos(const Value: IBizInfVentasAlbArticulo);
+begin
+  FDatos := Value;
+end;
+
+procedure TfrViewInfVentasAlbArticulo.actRefrescarExecute(Sender: TObject);
+begin
+  inherited;
+  Refresh;
+end;
+
+procedure TfrViewInfVentasAlbArticulo.OnViewInformeBaseGridChanged(
+  Sender: TObject);
+begin
+  if Assigned(Self.OnViewChanged) then
+    Self.OnViewChanged(Self);
+end;
+
+procedure TfrViewInfVentasAlbArticulo.OnFilterChanged(Sender: TObject);
+begin
+  frViewFiltros1.Refresh;
+end;
+
+procedure TfrViewInfVentasAlbArticulo.actPeriodoFechasExecute(
+  Sender: TObject);
+begin
+  inherited;
+  ActivarTarea(PERIODO);
+end;
+
+procedure TfrViewInfVentasAlbArticulo.ActivarTarea(const ATarea: Integer);
+begin
+  inherited;
+  case ATarea of
+    PERIODO    : pcParametros.ActivePage := TabSheet5;
+  end;
+end;
+
+end.
diff --git a/Source/Modulos/Informe ventas por articulo/Views/uViewInfVentasAlbArticuloGrid.dfm b/Source/Modulos/Informe ventas por articulo/Views/uViewInfVentasAlbArticuloGrid.dfm
new file mode 100644
index 0000000..95c9659
--- /dev/null
+++ b/Source/Modulos/Informe ventas por articulo/Views/uViewInfVentasAlbArticuloGrid.dfm	
@@ -0,0 +1,255 @@
+inherited frViewInfVentasAlbArticuloGrid: TfrViewInfVentasAlbArticuloGrid
+  Width = 583
+  Height = 378
+  ExplicitWidth = 583
+  ExplicitHeight = 378
+  object cxGrid: TcxGrid [0]
+    Left = 0
+    Top = 0
+    Width = 583
+    Height = 378
+    Align = alClient
+    TabOrder = 0
+    LookAndFeel.Kind = lfStandard
+    LookAndFeel.NativeStyle = True
+    object cxGridView: TcxGridDBTableView
+      NavigatorButtons.ConfirmDelete = False
+      FilterBox.CustomizeDialog = False
+      FilterBox.Visible = fvNever
+      DataController.Filter.Options = [fcoCaseInsensitive]
+      DataController.Filter.OnChanged = cxGridViewDataControllerFilterChanged
+      DataController.KeyFieldNames = 'RecID'
+      DataController.Options = [dcoAnsiSort, dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoSortByDisplayText]
+      DataController.Summary.DefaultGroupSummaryItems = <>
+      DataController.Summary.FooterSummaryItems = <>
+      DataController.Summary.SummaryGroups = <>
+      DataController.Summary.OnAfterSummary = cxGridViewDataControllerSummaryAfterSummary
+      DataController.OnGroupingChanged = cxGridViewDataControllerGroupingChanged
+      DataController.OnSortingChanged = cxGridViewDataControllerSortingChanged
+      OptionsBehavior.CellHints = True
+      OptionsCustomize.ColumnFiltering = False
+      OptionsCustomize.ColumnGrouping = False
+      OptionsCustomize.ColumnsQuickCustomization = True
+      OptionsCustomize.DataRowSizing = True
+      OptionsCustomize.GroupRowSizing = True
+      OptionsData.Deleting = False
+      OptionsData.DeletingConfirmation = False
+      OptionsData.Editing = False
+      OptionsData.Inserting = False
+      OptionsSelection.CellSelect = False
+      OptionsSelection.UnselectFocusedRecordOnExit = False
+      OptionsView.CellEndEllipsis = True
+      OptionsView.CellAutoHeight = True
+      OptionsView.ColumnAutoWidth = True
+      OptionsView.Footer = True
+      OptionsView.FooterAutoHeight = True
+      OptionsView.GridLineColor = cl3DLight
+      OptionsView.GroupByBox = False
+      OptionsView.GroupFooters = gfAlwaysVisible
+      OptionsView.HeaderEndEllipsis = True
+      Styles.FilterBox = cxStyleFilterBox
+      Styles.OnGetContentStyle = cxGridViewStylesGetContentStyle
+      OnColumnPosChanged = cxGridViewColumnPosChanged
+      OnColumnSizeChanged = cxGridViewColumnSizeChanged
+      object cxGridViewRecID: TcxGridDBColumn
+        DataBinding.FieldName = 'RecID'
+        Visible = False
+      end
+      object cxGridViewID_ALBARAN: TcxGridDBColumn
+        Caption = 'Id_albar'#225'n'
+        DataBinding.FieldName = 'ID_ALBARAN'
+      end
+      object cxGridViewID_EMPRESA: TcxGridDBColumn
+        Caption = 'Id_empresa'
+        DataBinding.FieldName = 'ID_EMPRESA'
+      end
+      object cxGridViewREFERENCIA_ALBARAN: TcxGridDBColumn
+        Caption = 'Ref. albar'#225'n'
+        DataBinding.FieldName = 'REFERENCIA_ALBARAN'
+      end
+      object cxGridViewFECHA_ALBARAN: TcxGridDBColumn
+        Caption = 'Fecha albar'#225'n'
+        DataBinding.FieldName = 'FECHA_ALBARAN'
+      end
+      object cxGridViewIMPORTE_TOTAL_ALBARAN: TcxGridDBColumn
+        Caption = 'Importe albar'#225'n'
+        DataBinding.FieldName = 'IMPORTE_TOTAL_ALBARAN'
+      end
+      object cxGridViewID_ARTICULO: TcxGridDBColumn
+        Caption = 'Id_articulo'
+        DataBinding.FieldName = 'ID_ARTICULO'
+      end
+      object cxGridViewFAMILIA: TcxGridDBColumn
+        Caption = 'Familia'
+        DataBinding.FieldName = 'FAMILIA'
+      end
+      object cxGridViewREFERENCIA: TcxGridDBColumn
+        Caption = 'Referencia'
+        DataBinding.FieldName = 'REFERENCIA'
+      end
+      object cxGridViewDESCRIPCION: TcxGridDBColumn
+        Caption = 'Descripci'#243'n'
+        DataBinding.FieldName = 'DESCRIPCION'
+      end
+      object cxGridViewREFERENCIA_PROV: TcxGridDBColumn
+        Caption = 'Ref. proveedor'
+        DataBinding.FieldName = 'REFERENCIA_PROV'
+      end
+      object cxGridViewCOMISIONABLE: TcxGridDBColumn
+        Caption = 'Comisionable'
+        DataBinding.FieldName = 'COMISIONABLE'
+      end
+      object cxGridViewINVENTARIABLE: TcxGridDBColumn
+        Caption = 'Inventariable'
+        DataBinding.FieldName = 'INVENTARIABLE'
+      end
+      object cxGridViewIMPORTE_UNIDAD_COSTE: TcxGridDBColumn
+        Caption = 'Precio uni. compra'
+        DataBinding.FieldName = 'IMPORTE_UNIDAD_COSTE'
+        PropertiesClassName = 'TcxCurrencyEditProperties'
+        Properties.Alignment.Horz = taRightJustify
+        FooterAlignmentHorz = taRightJustify
+        HeaderAlignmentHorz = taRightJustify
+      end
+      object cxGridViewDESCUENTO_PROVEEDOR_COSTE: TcxGridDBColumn
+        Caption = 'Dto proveedor'
+        DataBinding.FieldName = 'DESCUENTO_PROVEEDOR_COSTE'
+        PropertiesClassName = 'TcxCurrencyEditProperties'
+        Properties.Alignment.Horz = taRightJustify
+        Properties.DisplayFormat = ',0.00 %;-,0.00 %'
+        FooterAlignmentHorz = taRightJustify
+        HeaderAlignmentHorz = taRightJustify
+      end
+      object cxGridViewIMPORTE_NETO_COSTE: TcxGridDBColumn
+        Caption = 'Precio neto compra'
+        DataBinding.FieldName = 'IMPORTE_NETO_COSTE'
+        PropertiesClassName = 'TcxCurrencyEditProperties'
+        Properties.Alignment.Horz = taRightJustify
+        FooterAlignmentHorz = taRightJustify
+        HeaderAlignmentHorz = taRightJustify
+      end
+      object cxGridViewIMPORTE_PORTE_COSTE: TcxGridDBColumn
+        Caption = 'Precio porte compra'
+        DataBinding.FieldName = 'IMPORTE_PORTE_COSTE'
+        PropertiesClassName = 'TcxCurrencyEditProperties'
+        Properties.Alignment.Horz = taRightJustify
+        FooterAlignmentHorz = taRightJustify
+        HeaderAlignmentHorz = taRightJustify
+      end
+      object cxGridViewCANTIDAD: TcxGridDBColumn
+        Caption = 'Cantidad'
+        DataBinding.FieldName = 'CANTIDAD'
+      end
+      object cxGridViewIMPORTE_UNIDAD_VENTA: TcxGridDBColumn
+        Caption = 'Precio uni. venta'
+        DataBinding.FieldName = 'IMPORTE_UNIDAD_VENTA'
+        PropertiesClassName = 'TcxCurrencyEditProperties'
+        Properties.Alignment.Horz = taRightJustify
+        FooterAlignmentHorz = taRightJustify
+        HeaderAlignmentHorz = taRightJustify
+      end
+      object cxGridViewDESCUENTO_CLIENTE_VENTA: TcxGridDBColumn
+        Caption = 'Dto. cliente'
+        DataBinding.FieldName = 'DESCUENTO_CLIENTE_VENTA'
+        PropertiesClassName = 'TcxCurrencyEditProperties'
+        Properties.Alignment.Horz = taRightJustify
+        Properties.DisplayFormat = ',0.00 %;-,0.00 %'
+        FooterAlignmentHorz = taRightJustify
+        HeaderAlignmentHorz = taRightJustify
+      end
+      object cxGridViewIMPORTE_NETO_VENTA: TcxGridDBColumn
+        Caption = 'Precio neto venta'
+        DataBinding.FieldName = 'IMPORTE_NETO_VENTA'
+        PropertiesClassName = 'TcxCurrencyEditProperties'
+        Properties.Alignment.Horz = taRightJustify
+        FooterAlignmentHorz = taRightJustify
+        HeaderAlignmentHorz = taRightJustify
+      end
+      object cxGridViewIMPORTE_TOTAL_VENTA: TcxGridDBColumn
+        Caption = 'Importe total venta'
+        DataBinding.FieldName = 'IMPORTE_TOTAL_VENTA'
+        PropertiesClassName = 'TcxCurrencyEditProperties'
+        Properties.Alignment.Horz = taRightJustify
+        FooterAlignmentHorz = taRightJustify
+        HeaderAlignmentHorz = taRightJustify
+      end
+      object cxGridViewNIF_CIF_PROVEEDOR: TcxGridDBColumn
+        Caption = 'NIF/CIF prov.'
+        DataBinding.FieldName = 'NIF_CIF_PROVEEDOR'
+      end
+      object cxGridViewNOMBRE_PROVEEDOR: TcxGridDBColumn
+        Caption = 'Proveedor'
+        DataBinding.FieldName = 'NOMBRE_PROVEEDOR'
+      end
+      object cxGridViewNIF_CIF_CLIENTE: TcxGridDBColumn
+        Caption = 'NIF/CIF cli.'
+        DataBinding.FieldName = 'NIF_CIF_CLIENTE'
+      end
+      object cxGridViewNOMBRE_CLIENTE: TcxGridDBColumn
+        Caption = 'Cliente'
+        DataBinding.FieldName = 'NOMBRE_CLIENTE'
+      end
+      object cxGridViewNOMBRE_COMERCIAL_CLIENTE: TcxGridDBColumn
+        Caption = 'Nombre comercial cli.'
+        DataBinding.FieldName = 'NOMBRE_COMERCIAL_CLIENTE'
+      end
+      object cxGridViewNIF_CIF_AGENTE: TcxGridDBColumn
+        Caption = 'NIF/CIF agente'
+        DataBinding.FieldName = 'NIF_CIF_AGENTE'
+      end
+      object cxGridViewNOMBRE_AGENTE: TcxGridDBColumn
+        Caption = 'Agente'
+        DataBinding.FieldName = 'NOMBRE_AGENTE'
+      end
+      object cxGridViewCOMISION_AGENTE: TcxGridDBColumn
+        Caption = 'Comisi'#243'n agente'
+        DataBinding.FieldName = 'COMISION_AGENTE'
+        PropertiesClassName = 'TcxCurrencyEditProperties'
+        Properties.Alignment.Horz = taRightJustify
+        Properties.DisplayFormat = ',0.00 %;-,0.00 %'
+        FooterAlignmentHorz = taRightJustify
+        HeaderAlignmentHorz = taRightJustify
+      end
+      object cxGridViewIMPORTE_COMISION_AGENTE: TcxGridDBColumn
+        Caption = 'Importe comisi'#243'n'
+        DataBinding.FieldName = 'IMPORTE_COMISION_AGENTE'
+        PropertiesClassName = 'TcxCurrencyEditProperties'
+        Properties.Alignment.Horz = taRightJustify
+        FooterAlignmentHorz = taRightJustify
+        HeaderAlignmentHorz = taRightJustify
+      end
+    end
+    object cxGridLevel: TcxGridLevel
+      GridView = cxGridView
+    end
+  end
+  inherited dxPrintStyleManager1: TdxPrintStyleManager
+    inherited dxPrintStyleManager1Style1: TdxPSPrintStyle
+      BuiltInStyle = True
+    end
+  end
+  inherited dxComponentPrinter: TdxComponentPrinter
+    inherited dxPrinterLinkcxGrid: TdxGridReportLink
+      Component = cxGrid
+      BuiltInReportLink = True
+    end
+  end
+  object cxStyleRepository1: TcxStyleRepository
+    Left = 16
+    Top = 48
+    PixelsPerInch = 96
+    object cxStyleRed: TcxStyle
+      AssignedValues = [svTextColor]
+      TextColor = clRed
+    end
+    object cxStyleBlue: TcxStyle
+      AssignedValues = [svTextColor]
+      TextColor = clBlue
+    end
+    object cxStyleFilterBox: TcxStyle
+      AssignedValues = [svColor, svTextColor]
+      Color = clInfoBk
+      TextColor = clWindowText
+    end
+  end
+end
diff --git a/Source/Modulos/Informe ventas por articulo/Views/uViewInfVentasAlbArticuloGrid.pas b/Source/Modulos/Informe ventas por articulo/Views/uViewInfVentasAlbArticuloGrid.pas
new file mode 100644
index 0000000..db607ad
--- /dev/null
+++ b/Source/Modulos/Informe ventas por articulo/Views/uViewInfVentasAlbArticuloGrid.pas	
@@ -0,0 +1,226 @@
+unit uViewInfVentasAlbArticuloGrid;
+
+interface
+
+uses
+  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
+  Dialogs, uViewInformeBaseGrid, DB, uDADataTable, cxStyles, cxCustomData,
+  cxGraphics, cxFilter, cxData, cxDataStorage, cxEdit, cxDBData,
+  cxTextEdit, cxGridLevel, cxGridCustomTableView, cxGridTableView,
+  cxGridDBTableView, cxClasses, cxControls, cxGridCustomView, cxGrid,
+  cxCurrencyEdit, cxCalendar, dxPSGlbl, dxPSUtl, dxPrnPg, dxBkgnd, dxWrap,
+  dxPrnDev, dxPSEngn, dxPSCompsProvider, dxPSFillPatterns,
+  dxPSEdgePatterns, dxPSCore, dxPScxCommon, dxPScxGrid6Lnk, dxPgsDlg,
+  cxDropDownEdit, StdCtrls, cxSpinEdit;
+
+type
+  IViewInfVentasAlbArticuloGrid = interface(IViewInformeBaseGrid)
+  ['{17FAC839-1CCF-4534-B4E1-32374D0CA77E}']
+  end;
+
+  TfrViewInfVentasAlbArticuloGrid = class(TfrViewInformeBaseGrid, IViewInfVentasAlbArticuloGrid)
+    cxGrid: TcxGrid;
+    cxGridView: TcxGridDBTableView;
+    cxGridLevel: TcxGridLevel;
+    cxStyleRepository1: TcxStyleRepository;
+    cxStyleRed: TcxStyle;
+    cxStyleBlue: TcxStyle;
+    cxStyleFilterBox: TcxStyle;
+    cxGridViewRecID: TcxGridDBColumn;
+    cxGridViewID_ALBARAN: TcxGridDBColumn;
+    cxGridViewID_EMPRESA: TcxGridDBColumn;
+    cxGridViewREFERENCIA_ALBARAN: TcxGridDBColumn;
+    cxGridViewFECHA_ALBARAN: TcxGridDBColumn;
+    cxGridViewIMPORTE_TOTAL_ALBARAN: TcxGridDBColumn;
+    cxGridViewID_ARTICULO: TcxGridDBColumn;
+    cxGridViewFAMILIA: TcxGridDBColumn;
+    cxGridViewREFERENCIA: TcxGridDBColumn;
+    cxGridViewREFERENCIA_PROV: TcxGridDBColumn;
+    cxGridViewDESCRIPCION: TcxGridDBColumn;
+    cxGridViewCOMISIONABLE: TcxGridDBColumn;
+    cxGridViewINVENTARIABLE: TcxGridDBColumn;
+    cxGridViewIMPORTE_UNIDAD_COSTE: TcxGridDBColumn;
+    cxGridViewDESCUENTO_PROVEEDOR_COSTE: TcxGridDBColumn;
+    cxGridViewIMPORTE_NETO_COSTE: TcxGridDBColumn;
+    cxGridViewIMPORTE_PORTE_COSTE: TcxGridDBColumn;
+    cxGridViewCANTIDAD: TcxGridDBColumn;
+    cxGridViewIMPORTE_UNIDAD_VENTA: TcxGridDBColumn;
+    cxGridViewDESCUENTO_CLIENTE_VENTA: TcxGridDBColumn;
+    cxGridViewIMPORTE_TOTAL_VENTA: TcxGridDBColumn;
+    cxGridViewNIF_CIF_PROVEEDOR: TcxGridDBColumn;
+    cxGridViewNOMBRE_PROVEEDOR: TcxGridDBColumn;
+    cxGridViewNIF_CIF_CLIENTE: TcxGridDBColumn;
+    cxGridViewNOMBRE_CLIENTE: TcxGridDBColumn;
+    cxGridViewNOMBRE_COMERCIAL_CLIENTE: TcxGridDBColumn;
+    cxGridViewNIF_CIF_AGENTE: TcxGridDBColumn;
+    cxGridViewNOMBRE_AGENTE: TcxGridDBColumn;
+    cxGridViewCOMISION_AGENTE: TcxGridDBColumn;
+    cxGridViewIMPORTE_COMISION_AGENTE: TcxGridDBColumn;
+    cxGridViewIMPORTE_NETO_VENTA: TcxGridDBColumn;
+    procedure cxGridViewStylesGetContentStyle(Sender: TcxCustomGridTableView; ARecord: TcxCustomGridRecord;
+      AItem: TcxCustomGridTableItem; out AStyle: TcxStyle);
+    procedure cxGridViewColumnPosChanged(Sender: TcxGridTableView; AColumn: TcxGridColumn);
+    procedure cxGridViewColumnSizeChanged(Sender: TcxGridTableView; AColumn: TcxGridColumn);
+    procedure cxGridViewDataControllerGroupingChanged(Sender: TObject);
+    procedure cxGridViewDataControllerSortingChanged(Sender: TObject);
+    procedure cxGridViewDataControllerSummaryAfterSummary(ASender: TcxDataSummary);
+    procedure cxGridViewDataControllerFilterChanged(Sender: TObject);
+  protected
+    procedure ActivarEventos; override;
+    procedure DesactivarEventos; override;
+    function GetFocusedView : TcxGridDBTableView; override;
+  public
+    procedure Refresh; override;
+    constructor Create(AOwner: TComponent); override;
+  end;
+
+implementation
+
+uses
+  cxVariants, uDateUtils;
+
+{$R *.dfm}
+
+{ TfrInfVentasAlbArticuloGrid }
+
+function TfrViewInfVentasAlbArticuloGrid.GetFocusedView: TcxGridDBTableView;
+begin
+  Result := cxGridView;
+end;
+
+procedure TfrViewInfVentasAlbArticuloGrid.Refresh;
+var
+  FocusedRow, TopRow, i : Integer;
+begin
+  inherited;
+  { Refrescar las filas del grid a partir del dataset y colocar la fila
+    seleccionada donde estaba }
+  if FocusedView.DataController.DataSource.DataSet.State = dsBrowse then
+  begin
+    TopRow := FocusedView.Controller.TopRowIndex;
+    FocusedRow := FocusedView.DataController.FocusedRowIndex;
+
+    FocusedView.DataController.UpdateItems(False);  // <- Refresco
+
+    FocusedView.DataController.FocusedRowIndex := FocusedRow;
+    FocusedView.Controller.TopRowIndex := TopRow;
+
+    //Para que el usuario pueda ocultar y desocultar columnas sin afectar al informe
+    for i := 0 to FocusedView.ColumnCount - 1 do
+        FocusedView.Columns[i].Hidden := not FocusedView.Columns[i].Visible;
+  end;
+end;
+
+procedure TfrViewInfVentasAlbArticuloGrid.cxGridViewStylesGetContentStyle(
+  Sender: TcxCustomGridTableView; ARecord: TcxCustomGridRecord;
+  AItem: TcxCustomGridTableItem; out AStyle: TcxStyle);
+var
+  AColumn : TcxGridDBColumn;
+  AFecha : TDateTime;
+begin
+  inherited;
+
+  // La fila es la cabecera de un grupo
+{  if ARecord.Expandable then
+    Exit;
+
+  AColumn := FocusedView.GetColumnByFieldName('FECHA');
+  if Assigned(AColumn) and (AColumn.Visible) then
+  begin
+    try
+      AFecha := VarToDateTime(ARecord.Values[AColumn.Index]);
+    except
+      on Exception do
+        ShowMessage(VarToStr(ARecord.Values[AColumn.Index]));
+    end;
+
+    if DaysBetween(Now, AFecha) > 14 then
+      AStyle := cxStyleRed
+    else
+      if DaysBetween(Now, AFecha) > 7 then
+        AStyle := cxStyleBlue
+  end; }
+end;
+
+procedure TfrViewInfVentasAlbArticuloGrid.cxGridViewColumnPosChanged(
+  Sender: TcxGridTableView; AColumn: TcxGridColumn);
+begin
+  inherited;
+  if Assigned(FOnViewChanged) then
+    FOnViewChanged(Self);
+end;
+
+procedure TfrViewInfVentasAlbArticuloGrid.cxGridViewColumnSizeChanged(
+  Sender: TcxGridTableView; AColumn: TcxGridColumn);
+begin
+  inherited;
+  if Assigned(FOnViewChanged) then
+    FOnViewChanged(Self);
+end;
+
+procedure TfrViewInfVentasAlbArticuloGrid.cxGridViewDataControllerGroupingChanged(
+  Sender: TObject);
+begin
+  inherited;
+  if Assigned(FOnViewChanged) then
+    FOnViewChanged(Self);
+end;
+
+procedure TfrViewInfVentasAlbArticuloGrid.cxGridViewDataControllerSortingChanged(
+  Sender: TObject);
+begin
+  inherited;
+  if Assigned(FOnViewChanged) then
+    FOnViewChanged(Self);
+end;
+
+procedure TfrViewInfVentasAlbArticuloGrid.cxGridViewDataControllerSummaryAfterSummary(
+  ASender: TcxDataSummary);
+begin
+  inherited;
+  if Assigned(FOnViewChanged) then
+    FOnViewChanged(Self);
+end;
+
+procedure TfrViewInfVentasAlbArticuloGrid.cxGridViewDataControllerFilterChanged(
+  Sender: TObject);
+begin
+  if Assigned(FOnFilterChanged) then
+    FOnFilterChanged(Self);
+end;
+
+constructor TfrViewInfVentasAlbArticuloGrid.Create(AOwner: TComponent);
+begin
+  inherited;
+end;
+
+procedure TfrViewInfVentasAlbArticuloGrid.ActivarEventos;
+begin
+  inherited;
+  with cxGridView do
+  begin
+    DataController.Filter.OnChanged := cxGridViewDataControllerFilterChanged;
+    DataController.Summary.OnAfterSummary := cxGridViewDataControllerSummaryAfterSummary;
+    DataController.OnGroupingChanged := cxGridViewDataControllerGroupingChanged;
+    DataController.OnSortingChanged := cxGridViewDataControllerSortingChanged;
+    OnColumnPosChanged := cxGridViewColumnPosChanged;
+    OnColumnSizeChanged := cxGridViewColumnSizeChanged;
+  end;
+end;
+
+procedure TfrViewInfVentasAlbArticuloGrid.DesactivarEventos;
+begin
+  inherited;
+  with cxGridView do
+  begin
+    DataController.Filter.OnChanged := nil;
+    DataController.Summary.OnAfterSummary := nil;
+    DataController.OnGroupingChanged := nil;
+    DataController.OnSortingChanged := nil;
+    OnColumnPosChanged := nil;
+    OnColumnSizeChanged := nil;
+  end;
+end;
+
+end.
+
diff --git a/Source/Modulos/Informes base/Controller/InformesBase_controller.drc b/Source/Modulos/Informes base/Controller/InformesBase_controller.drc
index f063ebf..4082db0 100644
--- a/Source/Modulos/Informes base/Controller/InformesBase_controller.drc	
+++ b/Source/Modulos/Informes base/Controller/InformesBase_controller.drc	
@@ -13,4 +13,4 @@ BEGIN
 END
 
 /* C:\Codigo\Source\Modulos\Informes base\Controller\InformesBase_controller.res */
-/* c:\temp\dtf2E5.tmp */
+/* c:\temp\dtf322.tmp */
diff --git a/Source/Modulos/Informes base/Data/Informes_data.drc b/Source/Modulos/Informes base/Data/Informes_data.drc
index e8c8700..c881353 100644
--- a/Source/Modulos/Informes base/Data/Informes_data.drc	
+++ b/Source/Modulos/Informes base/Data/Informes_data.drc	
@@ -14,4 +14,4 @@ END
 
 /* C:\Codigo\Source\Modulos\Informes base\Data\uDataModuleInformes.dfm */
 /* C:\Codigo\Source\Modulos\Informes base\Data\Informes_data.res */
-/* c:\temp\dtf2E1.tmp */
+/* c:\temp\dtf31E.tmp */
diff --git a/Source/Modulos/Informes base/Model/Informes_model.drc b/Source/Modulos/Informes base/Model/Informes_model.drc
index ffcabfc..d7ff84c 100644
--- a/Source/Modulos/Informes base/Model/Informes_model.drc	
+++ b/Source/Modulos/Informes base/Model/Informes_model.drc	
@@ -13,4 +13,4 @@ BEGIN
 END
 
 /* C:\Codigo\Source\Modulos\Informes base\Model\Informes_model.res */
-/* c:\temp\dtf2DF.tmp */
+/* c:\temp\dtf31C.tmp */
diff --git a/Source/Modulos/Informes base/Views/Informes_view.drc b/Source/Modulos/Informes base/Views/Informes_view.drc
index 59c2405..37c9888 100644
--- a/Source/Modulos/Informes base/Views/Informes_view.drc	
+++ b/Source/Modulos/Informes base/Views/Informes_view.drc	
@@ -15,4 +15,4 @@ END
 /* C:\Codigo\Source\Modulos\Informes base\Views\uViewInformes.dfm */
 /* C:\Codigo\Source\Modulos\Informes base\Views\uEditorInformes.dfm */
 /* C:\Codigo\Source\Modulos\Informes base\Views\Informes_view.res */
-/* c:\temp\dtf2E9.tmp */
+/* c:\temp\dtf326.tmp */
diff --git a/Source/Modulos/Informes base/Views/uEditorInformes.dfm b/Source/Modulos/Informes base/Views/uEditorInformes.dfm
index 3f94b5d..beb205a 100644
--- a/Source/Modulos/Informes base/Views/uEditorInformes.dfm	
+++ b/Source/Modulos/Informes base/Views/uEditorInformes.dfm	
@@ -12,14 +12,12 @@ inherited fEditorInformes: TfEditorInformes
     Top = 27
     ExplicitTop = 27
     inherited tbxMain: TTBXToolbar
-      ExplicitWidth = 179
+      DockPos = 0
+      ExplicitWidth = 401
       inherited TBXItem2: TTBXItem
         ImageIndex = 0
         Images = pngImageNuevo
       end
-      inherited TBXItem29: TTBXItem
-        Visible = False
-      end
       inherited TBXItem27: TTBXItem
         Visible = False
       end
@@ -90,8 +88,6 @@ inherited fEditorInformes: TfEditorInformes
     Top = 128
     inherited actNuevo: TAction
       Caption = 'Nuevo informe...'
-      Enabled = False
-      Visible = False
     end
     inherited actModificar: TAction
       Caption = 'Abrir informe'
diff --git a/Source/Modulos/Inventario/Controller/Inventario_controller.res b/Source/Modulos/Inventario/Controller/Inventario_controller.res
index 1641339..8b251f3 100644
Binary files a/Source/Modulos/Inventario/Controller/Inventario_controller.res and b/Source/Modulos/Inventario/Controller/Inventario_controller.res differ
diff --git a/Source/Modulos/Inventario/Views/Inventario_view.res b/Source/Modulos/Inventario/Views/Inventario_view.res
index 1641339..8b251f3 100644
Binary files a/Source/Modulos/Inventario/Views/Inventario_view.res and b/Source/Modulos/Inventario/Views/Inventario_view.res differ
diff --git a/Source/Modulos/Pedidos de cliente/Controller/PedidosCliente_controller.drc b/Source/Modulos/Pedidos de cliente/Controller/PedidosCliente_controller.drc
index 8d054e6..b58b9b3 100644
--- a/Source/Modulos/Pedidos de cliente/Controller/PedidosCliente_controller.drc	
+++ b/Source/Modulos/Pedidos de cliente/Controller/PedidosCliente_controller.drc	
@@ -13,4 +13,4 @@ BEGIN
 END
 
 /* C:\Codigo\Source\Modulos\Pedidos de cliente\Controller\PedidosCliente_controller.RES */
-/* c:\temp\dtf333.tmp */
+/* c:\temp\dtf370.tmp */
diff --git a/Source/Modulos/Pedidos de cliente/Data/PedidosCliente_data.drc b/Source/Modulos/Pedidos de cliente/Data/PedidosCliente_data.drc
index b486ae5..9b37aa8 100644
--- a/Source/Modulos/Pedidos de cliente/Data/PedidosCliente_data.drc	
+++ b/Source/Modulos/Pedidos de cliente/Data/PedidosCliente_data.drc	
@@ -14,4 +14,4 @@ END
 
 /* C:\Codigo\Source\Modulos\Pedidos de cliente\Data\uDataModulePedidosCliente.dfm */
 /* C:\Codigo\Source\Modulos\Pedidos de cliente\Data\PedidosCliente_data.RES */
-/* c:\temp\dtf331.tmp */
+/* c:\temp\dtf36E.tmp */
diff --git a/Source/Modulos/Pedidos de cliente/Model/PedidosCliente_model.drc b/Source/Modulos/Pedidos de cliente/Model/PedidosCliente_model.drc
index 6ecaf6c..2f84bfb 100644
--- a/Source/Modulos/Pedidos de cliente/Model/PedidosCliente_model.drc	
+++ b/Source/Modulos/Pedidos de cliente/Model/PedidosCliente_model.drc	
@@ -13,4 +13,4 @@ BEGIN
 END
 
 /* C:\Codigo\Source\Modulos\Pedidos de cliente\Model\PedidosCliente_model.RES */
-/* c:\temp\dtf32F.tmp */
+/* c:\temp\dtf36C.tmp */
diff --git a/Source/Modulos/Pedidos de cliente/Plugin/PedidosCliente_plugin.drc b/Source/Modulos/Pedidos de cliente/Plugin/PedidosCliente_plugin.drc
index 378aa87..1e3900b 100644
--- a/Source/Modulos/Pedidos de cliente/Plugin/PedidosCliente_plugin.drc	
+++ b/Source/Modulos/Pedidos de cliente/Plugin/PedidosCliente_plugin.drc	
@@ -14,4 +14,4 @@ END
 
 /* C:\Codigo\Source\Modulos\Pedidos de cliente\Plugin\uPluginPedidosCliente.dfm */
 /* C:\Codigo\Source\Modulos\Pedidos de cliente\Plugin\PedidosCliente_plugin.RES */
-/* c:\temp\dtf397.tmp */
+/* c:\temp\dtf3D4.tmp */
diff --git a/Source/Modulos/Pedidos de cliente/Views/PedidosCliente_view.drc b/Source/Modulos/Pedidos de cliente/Views/PedidosCliente_view.drc
index e4c9283..2ab33c5 100644
--- a/Source/Modulos/Pedidos de cliente/Views/PedidosCliente_view.drc	
+++ b/Source/Modulos/Pedidos de cliente/Views/PedidosCliente_view.drc	
@@ -26,4 +26,4 @@ END
 /* C:\Codigo\Source\Modulos\Pedidos de cliente\Views\uEditorElegirArticulosPedidoCliente.dfm */
 /* C:\Codigo\Source\Modulos\Pedidos de cliente\Views\uEditorDireccionEntregaPedidoCliente.dfm */
 /* C:\Codigo\Source\Modulos\Pedidos de cliente\Views\PedidosCliente_view.RES */
-/* c:\temp\dtf395.tmp */
+/* c:\temp\dtf3D2.tmp */
diff --git a/Source/Modulos/Tienda web/Data/TiendaWeb_data.drc b/Source/Modulos/Tienda web/Data/TiendaWeb_data.drc
index 4d99dca..b1db392 100644
--- a/Source/Modulos/Tienda web/Data/TiendaWeb_data.drc	
+++ b/Source/Modulos/Tienda web/Data/TiendaWeb_data.drc	
@@ -14,4 +14,4 @@ END
 
 /* C:\Codigo\Source\Modulos\Tienda web\Data\uDataModuleTiendaWeb.dfm */
 /* C:\Codigo\Source\Modulos\Tienda web\Data\TiendaWeb_data.res */
-/* c:\temp\dtf349.tmp */
+/* c:\temp\dtf386.tmp */
diff --git a/Source/Servidor/FactuGES_Server.RES b/Source/Servidor/FactuGES_Server.RES
index 6923079..7c74fad 100644
Binary files a/Source/Servidor/FactuGES_Server.RES and b/Source/Servidor/FactuGES_Server.RES differ
diff --git a/Source/Servidor/FactuGES_Server.dpr b/Source/Servidor/FactuGES_Server.dpr
index 14f52e4..7ec85aa 100644
--- a/Source/Servidor/FactuGES_Server.dpr
+++ b/Source/Servidor/FactuGES_Server.dpr
@@ -167,7 +167,9 @@ uses
   schInventarioClient_Intf in '..\Modulos\Inventario\Model\schInventarioClient_Intf.pas',
   schInventarioServer_Intf in '..\Modulos\Inventario\Model\schInventarioServer_Intf.pas',
   schContactosClient_Intf in '..\Modulos\Contactos\Model\schContactosClient_Intf.pas',
-  schContactosServer_Intf in '..\Modulos\Contactos\Model\schContactosServer_Intf.pas';
+  schContactosServer_Intf in '..\Modulos\Contactos\Model\schContactosServer_Intf.pas',
+  schInfVentasArticuloClient_Intf in '..\Modulos\Informe ventas por articulo\Model\schInfVentasArticuloClient_Intf.pas',
+  schInfVentasArticuloServer_Intf in '..\Modulos\Informe ventas por articulo\Model\schInfVentasArticuloServer_Intf.pas';
 
 {$R *.res}
 {$R ..\Servicios\RODLFile.res}
diff --git a/Source/Servidor/FactuGES_Server.dproj b/Source/Servidor/FactuGES_Server.dproj
index c4d9c34..73ba743 100644
--- a/Source/Servidor/FactuGES_Server.dproj
+++ b/Source/Servidor/FactuGES_Server.dproj
@@ -35,7 +35,7 @@
 		<Borland.Personality>Delphi.Personality</Borland.Personality>
 		<Borland.ProjectType/>
 		<BorlandProject>
-			<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters><Parameters Name="RunParams">/standalone</Parameters></Parameters><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">4</VersionInfo><VersionInfo Name="MinorVer">1</VersionInfo><VersionInfo Name="Release">7</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName"></VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">4.1.7.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName"></VersionInfoKeys><VersionInfoKeys Name="ProductVersion">4.1.7.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys><VersionInfoKeys Name="CompileDate">martes, 23 de agosto de 2011 17:50</VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
+			<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters><Parameters Name="RunParams">/standalone</Parameters></Parameters><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">4</VersionInfo><VersionInfo Name="MinorVer">1</VersionInfo><VersionInfo Name="Release">8</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName"></VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">4.1.8.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName"></VersionInfoKeys><VersionInfoKeys Name="ProductVersion">4.1.8.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys><VersionInfoKeys Name="CompileDate">lunes, 03 de octubre de 2011 16:13</VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
 						<Excluded_Packages Name="C:\Documents and Settings\All Users\Documentos\RAD Studio\5.0\Bpl\dxPSCoreD11.bpl">ExpressPrinting System by Developer Express Inc.</Excluded_Packages>
 					</Excluded_Packages><Source><Source Name="MainSource">FactuGES_Server.dpr</Source></Source></Delphi.Personality><ModelSupport>False</ModelSupport></BorlandProject></BorlandProject>
 	</ProjectExtensions>
@@ -205,6 +205,8 @@
 			<Form>srvInfMargenArticulo</Form>
 			<DesignClass>TDARemoteService</DesignClass>
 		</DCCReference>
+		<DCCReference Include="..\Modulos\Informe ventas por articulo\Model\schInfVentasArticuloClient_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Informe ventas por articulo\Model\schInfVentasArticuloServer_Intf.pas"/>
 		<DCCReference Include="..\Modulos\Informe ventas por articulo\Servidor\srvInfVentasArticulo_Impl.pas">
 			<Form>srvInfVentasArticulo</Form>
 			<DesignClass>TDataAbstractService</DesignClass>
diff --git a/Source/Servidor/FactuGES_Server.rc b/Source/Servidor/FactuGES_Server.rc
index 51567ad..b7afabf 100644
--- a/Source/Servidor/FactuGES_Server.rc
+++ b/Source/Servidor/FactuGES_Server.rc
@@ -1,7 +1,7 @@
 MAINICON ICON "C:\Codigo\Resources\Iconos\Servidor.ico"
 1 VERSIONINFO
-FILEVERSION 4,1,7,0
-PRODUCTVERSION 4,1,7,0
+FILEVERSION 4,1,8,0
+PRODUCTVERSION 4,1,8,0
 FILEFLAGSMASK 0x3FL
 FILEFLAGS 0x00L
 FILEOS 0x40004L
@@ -12,9 +12,9 @@ BEGIN
     BEGIN
          BLOCK "0C0A04E4"
          BEGIN
-              VALUE "FileVersion", "4.1.7.0\0"
-              VALUE "ProductVersion", "4.1.7.0\0"
-              VALUE "CompileDate", "martes, 23 de agosto de 2011 18:22\0"
+              VALUE "FileVersion", "4.1.8.0\0"
+              VALUE "ProductVersion", "4.1.8.0\0"
+              VALUE "CompileDate", "lunes, 03 de octubre de 2011 17:23\0"
          END
     END
     BLOCK "VarFileInfo"