From d92d188aa39fa9c22bff501e7931f72790074f13 Mon Sep 17 00:00:00 2001
From: david <darranz@rodax-software.com>
Date: Thu, 31 Jan 2008 17:16:03 +0000
Subject: [PATCH] =?UTF-8?q?Subida=20con=20mejora=20en=20control=20de=20sto?=
 =?UTF-8?q?ck=20ya=20que=20podr=C3=A1=20filtrar=20el=20calculo=20de=20esto?=
 =?UTF-8?q?c=20(entradas,=20salidas=20...)=20a=20partir=20de=20una=20deter?=
 =?UTF-8?q?minada=20fecha?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

git-svn-id: https://192.168.0.254/svn/Proyectos.Varela_PuntosVenta/trunk@98 1c943782-d109-9647-9548-93b3ac332352
---
 Database/2.3 - vistas stock.sql               |   60 +-
 Source/Cliente/AdminPV.rc                     |    2 +-
 Source/Cliente/AdminPV.res                    |  Bin 18472 -> 18468 bytes
 .../Modulos/Parametros/Cliente/Parametros.dpk |    7 +-
 .../Parametros/Cliente/Parametros.dproj       |   50 +-
 .../Modulos/Parametros/Cliente/Parametros.res |  Bin 384 -> 4748 bytes
 .../Cliente/uViewParametrosFecha.dfm          |   32 +
 .../Cliente/uViewParametrosFecha.pas          |   63 +
 .../Stock/Cliente/uEditorControlStockEDI.dfm  |   74 +-
 .../Stock/Cliente/uViewControGridStockEDI.dfm |   65 +-
 .../Stock/Cliente/uViewControGridStockEDI.pas |   19 +-
 .../uViewControGridStockEDIInventario.dfm     |   71 +-
 .../uViewControGridStockEDIInventario.pas     |   16 +-
 .../uViewControGridStockPrendasCentros.dfm    |   40 +-
 .../uViewControGridStockPrendasCentros.pas    |   18 +-
 .../Cliente/uViewControGridStockVARELA.dfm    |    2 +-
 .../Cliente/uViewControGridStockVARELA.pas    |    2 +-
 .../Stock/Reglas/schStockClient_Intf.pas      | 1073 +++++++++++++-
 .../Stock/Reglas/schStockServer_Intf.pas      | 1299 ++++++++++++++++-
 .../Modulos/Stock/Servidor/srvStock_Impl.dfm  |  292 +++-
 Source/Servidor/AdminPV_Server.dproj          |    7 +
 Source/Servidor/AdminPV_Server.rc             |    2 +-
 Source/Servidor/AdminPV_Server.res            |  Bin 23340 -> 23336 bytes
 23 files changed, 3036 insertions(+), 158 deletions(-)
 create mode 100644 Source/Modulos/Parametros/Cliente/uViewParametrosFecha.dfm
 create mode 100644 Source/Modulos/Parametros/Cliente/uViewParametrosFecha.pas

diff --git a/Database/2.3 - vistas stock.sql b/Database/2.3 - vistas stock.sql
index 7204afe..4302909 100644
--- a/Database/2.3 - vistas stock.sql	
+++ b/Database/2.3 - vistas stock.sql	
@@ -1,7 +1,5 @@
 DROP VIEW [RDX_V_CONTROL_INVENTARIO]
 GO
-DROP VIEW [RDX_V_INVENTARIO_STOCK]
-GO
 DROP VIEW [RDX_V_INVENTARIO_STOCK_DESGLOSADO]
 GO
 DROP VIEW [RDX_V_STOCK_CALCULADO_DESGLOSADO]
@@ -128,6 +126,7 @@ GO
 
 CREATE VIEW RDX_V_STOCK AS
 SELECT
+      FECHA = ISNULL(RDX_V_STOCK_INVENTARIO.FECHA, RDX_V_STOCK_VENTAS.FECHA),
       CENTRO = ISNULL(RDX_V_STOCK_INVENTARIO.CENTRO, RDX_V_STOCK_VENTAS.CENTRO),
       FILIAL = ISNULL(RDX_V_STOCK_INVENTARIO.FILIAL, RDX_V_STOCK_VENTAS.FILIAL),
       CODIGO = ISNULL(RDX_V_STOCK_INVENTARIO.CODIGO, RDX_V_STOCK_VENTAS.CODIGO),
@@ -362,6 +361,7 @@ FULL OUTER JOIN RDX_V_STOCK_VENTAS ON
 LEFT OUTER JOIN PRODUTOS ON
      (PRODUTOS.PRODUTO = ISNULL(RDX_V_STOCK_INVENTARIO.CODIGO, RDX_V_STOCK_VENTAS.CODIGO))
 GROUP BY
+      ISNULL(RDX_V_STOCK_INVENTARIO.FECHA, RDX_V_STOCK_VENTAS.FECHA),
       ISNULL(RDX_V_STOCK_INVENTARIO.CENTRO, RDX_V_STOCK_VENTAS.CENTRO),
       ISNULL(RDX_V_STOCK_INVENTARIO.FILIAL, RDX_V_STOCK_VENTAS.FILIAL),
       ISNULL(RDX_V_STOCK_INVENTARIO.CODIGO, RDX_V_STOCK_VENTAS.CODIGO),
@@ -376,6 +376,7 @@ GO
 
 CREATE VIEW RDX_V_STOCK_CALCULADO AS
 SELECT
+      FECHA,
       CENTRO,
       FILIAL,
       CODIGO,
@@ -416,7 +417,8 @@ GO
 /*Y NO LAS DE TIPO2(S,M,L,XL)*/
 
 CREATE VIEW RDX_V_STOCK_CALCULADO_DESGLOSADO AS
-SELECT CENTRO,
+SELECT FECHA, 
+		  CENTRO,
       FILIAL,
       CODIGO,
       PRODUCTO,
@@ -444,6 +446,7 @@ GO
 
 CREATE VIEW RDX_V_INVENTARIO_STOCK_DESGLOSADO AS
 SELECT
+	    ISNULL(RDX_V_STOCK_CALCULADO_DESGLOSADO.FECHA, RDX_V_ULTIMO_INVENTARIO.FECHA) as FECHA,
       ISNULL(RDX_V_STOCK_CALCULADO_DESGLOSADO.CENTRO, RDX_V_ULTIMO_INVENTARIO.CENTRO) as CENTRO,
       ISNULL(RDX_V_STOCK_CALCULADO_DESGLOSADO.FILIAL, RDX_V_ULTIMO_INVENTARIO.FILIAL) as FILIAL,
       ISNULL(RDX_V_STOCK_CALCULADO_DESGLOSADO.CODIGO, RDX_V_ULTIMO_INVENTARIO.CODIGO) as CODIGO,
@@ -464,12 +467,14 @@ FULL OUTER JOIN RDX_V_STOCK_CALCULADO_DESGLOSADO ON
 AND (RDX_V_ULTIMO_INVENTARIO.CODIGO = RDX_V_STOCK_CALCULADO_DESGLOSADO.CODIGO)
 AND (RDX_V_ULTIMO_INVENTARIO.COLOR = RDX_V_STOCK_CALCULADO_DESGLOSADO.COLOR)
 AND (RDX_V_ULTIMO_INVENTARIO.TALLA = RDX_V_STOCK_CALCULADO_DESGLOSADO.TALLA)
+AND (RDX_V_ULTIMO_INVENTARIO.FECHA = RDX_V_STOCK_CALCULADO_DESGLOSADO.FECHA)
 GO
 
 /*--------------- SQL ---------------*/
 
-CREATE VIEW RDX_V_INVENTARIO_STOCK AS
+CREATE VIEW RDX_V_CONTROL_INVENTARIO AS
 select
+		  FECHA,
       CENTRO,
       FILIAL,
       CODIGO,
@@ -552,7 +557,8 @@ select
 
 from RDX_V_INVENTARIO_STOCK_DESGLOSADO
 
-group by CENTRO,
+group by FECHA,
+				 CENTRO,
          FILIAL,
          CODIGO,
          PRODUCTO,
@@ -564,47 +570,3 @@ GO
 
 /*--------------- SQL ---------------*/
 
-CREATE VIEW RDX_V_CONTROL_INVENTARIO AS
-SELECT
-      CENTRO,
-      FILIAL,
-      CODIGO,
-      PRODUCTO,
-      COLOR,
-      TIPO_PRODUCTO,
-      GRUPO_PRODUCTO,
-      COLECCION,
-
-      I38,
-      I40,
-      I42,
-      I44,
-      I46,
-      I48,
-      TI = ISNULL(I38, 0) + ISNULL(I40, 0) + ISNULL(I42, 0) + ISNULL(I44, 0) + ISNULL(I46, 0) + ISNULL(I48, 0),
-
-      K38,
-      K40,
-      K42,
-      K44,
-      K46,
-      K48,
-      TK = ISNULL(K38, 0) + ISNULL(K40, 0) + ISNULL(K42, 0) + ISNULL(K44, 0) + ISNULL(K46, 0) + ISNULL(K48, 0),
-
-      D38 = ISNULL(I38, 0) - ISNULL(K38, 0),
-      D40 = ISNULL(I40, 0) - ISNULL(K40, 0),
-      D42 = ISNULL(I42, 0) - ISNULL(K42, 0),
-      D44 = ISNULL(I44, 0) - ISNULL(K44, 0),
-      D46 = ISNULL(I46, 0) - ISNULL(K46, 0),
-      D48 = ISNULL(I48, 0) - ISNULL(K48, 0),
-      DT = ISNULL(I38, 0) - ISNULL(K38, 0) + ISNULL(I40, 0) - ISNULL(K40, 0) +
-           ISNULL(I42, 0) - ISNULL(K42, 0) + ISNULL(I44, 0) - ISNULL(K44, 0) +
-           ISNULL(I46, 0) - ISNULL(K46, 0) + ISNULL(I48, 0) - ISNULL(K48, 0)
-
-FROM RDX_V_INVENTARIO_STOCK
-where ((ISNULL(I38, 0) - ISNULL(K38, 0) + ISNULL(I40, 0) - ISNULL(K40, 0) +
-       ISNULL(I42, 0) - ISNULL(K42, 0) + ISNULL(I44, 0) - ISNULL(K44, 0) +
-       ISNULL(I46, 0) - ISNULL(K46, 0) + ISNULL(I48, 0) - ISNULL(K48, 0)) <> 0)
-
-GO
-/* EOF */
diff --git a/Source/Cliente/AdminPV.rc b/Source/Cliente/AdminPV.rc
index afcfcb5..0d42ed9 100644
--- a/Source/Cliente/AdminPV.rc
+++ b/Source/Cliente/AdminPV.rc
@@ -17,7 +17,7 @@ BEGIN
               VALUE "InternalName", "Administración de puntos de venta\0"
               VALUE "ProductName", "Administración de puntos de venta\0"
               VALUE "ProductVersion", "1.0.0.0\0"
-              VALUE "CompileDate", "lunes, 08 de octubre de 2007 12:43\0"
+              VALUE "CompileDate", "jueves, 24 de enero de 2008 19:08\0"
          END
     END
     BLOCK "VarFileInfo"
diff --git a/Source/Cliente/AdminPV.res b/Source/Cliente/AdminPV.res
index bef3f48d0fdb97d13584cdb9f2ea042965796538..b50bec2f9f3d45dcf9925391c12fd0c416604acc 100644
GIT binary patch
delta 112
zcmZ26fpN(M#ti|kj9VrLy2=B|Lf2?Uk;!LWl^H*5{^;7x$ehBUG`Zeg)-j8rlp&R&
w42X*vbQlyEj2KLSWD1b40K|DfT*QzM7cpWm0745O-;lwQ!3xBl{LtMU03HMy^Z)<=

delta 116
zcmZ27fpNtI#ti|kj5{U=y2=B|Lf2?UvB_s$l^H*6{^;7x$ehNYJh|Ro)-{Krlp&8H
zm7$nHhe3hCfWZPtrU3a04EYSn3?)F>B!(g|A0lc5RAazk4wN@!Fk-M`FkvueV3>T@
G-5mgr9vf@`

diff --git a/Source/Modulos/Parametros/Cliente/Parametros.dpk b/Source/Modulos/Parametros/Cliente/Parametros.dpk
index dc156f8..fd386ed 100644
--- a/Source/Modulos/Parametros/Cliente/Parametros.dpk
+++ b/Source/Modulos/Parametros/Cliente/Parametros.dpk
@@ -46,13 +46,16 @@ requires
   JvStdCtrlsD10R,
   JvSystemD10R,
   tbx_D10,
-  tb2k_D10;
+  tb2k_D10,
+  DataAbstract_Core_D10,
+  RemObjects_Core_D10;
 
 contains
   uDataModuleParametros in 'uDataModuleParametros.pas' {dmParametros: TDAClientDataModule},
   schParametrosClient_Intf in '..\Reglas\schParametrosClient_Intf.pas',
   uBizParametros in '..\Reglas\uBizParametros.pas',
   uViewParametrosCentro in 'uViewParametrosCentro.pas' {frViewParametrosCentro: TCustomView},
-  uViewParametrosColeccion in 'uViewParametrosColeccion.pas' {frViewParametrosColeccion: TCustomView};
+  uViewParametrosColeccion in 'uViewParametrosColeccion.pas' {frViewParametrosColeccion: TCustomView},
+  uViewParametrosFecha in 'uViewParametrosFecha.pas' {frViewParametrosFecha: TCustomView};
 
 end.
diff --git a/Source/Modulos/Parametros/Cliente/Parametros.dproj b/Source/Modulos/Parametros/Cliente/Parametros.dproj
index 3f291b5..3fb15a4 100644
--- a/Source/Modulos/Parametros/Cliente/Parametros.dproj
+++ b/Source/Modulos/Parametros/Cliente/Parametros.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>{6be250c1-7a66-46ce-a9aa-2c4fe6aa768e}</ProjectGuid>
     <MainSource>Parametros.dpk</MainSource>
@@ -53,27 +54,25 @@
     </DelphiCompile>
     <DCCReference Include="..\Reglas\schParametrosClient_Intf.pas" />
     <DCCReference Include="..\Reglas\uBizParametros.pas" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\adortl.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\BaseD10.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\ControlesBaseD10.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\cxLibraryD10.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\dbrtl.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\dsnap.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\dxComnD10.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\dxLayoutControlD10.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\dxThemeD10.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\Jcl.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\JclVcl.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\JvCoreD10R.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\JvStdCtrlsD10R.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\JvSystemD10R.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\rtl.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\tb2k_D10.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\tbx_D10.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\vcl.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\vcldb.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\vcljpg.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\vclx.dcp" />
+    <DCCReference Include="adortl.dcp" />
+    <DCCReference Include="BaseD10.dcp" />
+    <DCCReference Include="ControlesBaseD10.dcp" />
+    <DCCReference Include="cxLibraryD10.dcp" />
+    <DCCReference Include="DataAbstract_Core_D10.dcp" />
+    <DCCReference Include="dbrtl.dcp" />
+    <DCCReference Include="dsnap.dcp" />
+    <DCCReference Include="dxComnD10.dcp" />
+    <DCCReference Include="dxLayoutControlD10.dcp" />
+    <DCCReference Include="dxThemeD10.dcp" />
+    <DCCReference Include="Jcl.dcp" />
+    <DCCReference Include="JclVcl.dcp" />
+    <DCCReference Include="JvCoreD10R.dcp" />
+    <DCCReference Include="JvStdCtrlsD10R.dcp" />
+    <DCCReference Include="JvSystemD10R.dcp" />
+    <DCCReference Include="RemObjects_Core_D10.dcp" />
+    <DCCReference Include="rtl.dcp" />
+    <DCCReference Include="tb2k_D10.dcp" />
+    <DCCReference Include="tbx_D10.dcp" />
     <DCCReference Include="uDataModuleParametros.pas">
       <Form>dmParametros</Form>
     </DCCReference>
@@ -83,6 +82,13 @@
     <DCCReference Include="uViewParametrosColeccion.pas">
       <Form>frViewParametrosColeccion</Form>
     </DCCReference>
+    <DCCReference Include="uViewParametrosFecha.pas">
+      <Form>frViewParametrosColeccion</Form>
+    </DCCReference>
+    <DCCReference Include="vcl.dcp" />
+    <DCCReference Include="vcldb.dcp" />
+    <DCCReference Include="vcljpg.dcp" />
+    <DCCReference Include="vclx.dcp" />
   </ItemGroup>
 </Project>
 <!-- EurekaLog First Line
diff --git a/Source/Modulos/Parametros/Cliente/Parametros.res b/Source/Modulos/Parametros/Cliente/Parametros.res
index 8b251f312bcccec5485024f6fe8d80e1cdf25746..1641339fcc482e7e3492d1b45813a86619622c33 100644
GIT binary patch
literal 4748
zcmbW5&ub)A5XUPdpe&2#;C*uNAUVhgd+&(4um@dnom`vXF9g}ZuHJ;se=<3UNdFJg
zbCw+UD9j$byGIXV`~6hC>h4S?F|k9X-j90q{Z_qtZ<;nUJCO8!h?<w4U-ol;S2jC7
zx4(byej2@_#)0HWvg0i^wC4Xli+W*aXJ^(njceK|Kb@c3qFNX>p${kR>3GhM`oH*q
zk=UsjOCIgA_4!`B+Gb&`I84R)bT4dy-BQV<-SyFz?R8ILEQ(+JB$u{sEXE@j@B*7W
zT;iZH#|OJ<&DO$RCkM6VbK3(B(k{nbdv1lpc;E$xz9as|v3uE1V{hw2w~g3eD0an7
z{BT%G%irdMe*|oDJmgvJ<ltI;x5J<Oc>aA2`9B<Z5Toyra?r{a4$fnJHGXo6Pmcq8
z{JGCD500t1h4|yI?-f&xoj9;YT&Ch&JLO*X#NC3sCI0Xmc<f_vh`jn-1E!?th$%QM
znzGM|)$vl3f7;nE+9qR}|A?C$H3K&BFdq9?uxrIqHIne#5?8G@da2ybWLGKA686M2
z*LJMMMk4<U`dzFC9}HrSxLfOGll{P#??xir)$c2}C;ql+y-&Wa(LP{PgPk1E1@{uR
zIMCNz;u9;r(axhQvEx%?i#p<Vn=Z!SK%f10?4_`0@RY8lXRM3(t(nFSzJ$4kJr6&x
ze)~B%biu*TY$HDstHD=|UGxJceYiUQQa0Gu(p3og@%ZJ><6Xi*?M~Q;)@Sbfwf3uf
zVaWkbU<NjR3%=~AdoZbkXp`f@b0%GBT^$^V5e(n|#O(?P)hBbF)4n%2cw6U#adPM!
zz(!`V|Bfl{aH0)Y&w;SK7R4<z{p;Gwz1D%l86L3ZFZQ&=pB$<&esXT|OZ?=AGaWoe
z{>jU=;sL{BlYemIZXv%qZ{SZw{-TCU+;!nH6KDDIJumU+9{E0zXW4>7T)y|>$DQlv
zRJe?TjSp{c!DqeayAnSMTtZZT;>LN7J0Rls+5m@q)MbyB*eL%Eu@(+$Cw}Pd@q7N|
z%Q0*AHpCP^b9v`@jx-l_FD>khpW2W8(OU2&V5TrnoAY-m_hlcV?zq3;7{2gF{J#Hc
z6R+o~mVenX?>@W0@_DVzyOFs(5464CY{!q9ChoF#_*eXi@4gFuV8?vhl=_w5$iKL0
zEV0nMBcN08xtRmsgJrqjh@s#|{?*ssnsG)mH*wa6{efF0JFWHok@kA5%b661{B38=
zCcgJ|*ZFTpV$8<-&+AWpa)Q8*`wL&hMeNQ^v6I7$HSdLZhZ^&+6<@Uw_Zsml9^v3W
zVvPDBKHh;i=RU4J_ta3E;)M<P+=2X7;VbzliQZ=IHV#+fr#{!(ukt%UJMS8=332qg
z7jD)rSbpCW+^j*cd6LUEe8#9n&v!NEJM(@?SHvB$=h@|)fjw|&qD?NQ5A&R>n>Y+L
zKLZ0UQ+*km9FO-b?U4gmn-62iwzH6&*duKGo~aUV)bYDla8wWZ9+^7p-F<8lP@i!m
z@vhbD_${F}h>^T;C(?(b*OJDk?{dEXB?nuehoON3HAb!7Mr7-ls!84-5V-jJu<OVP
zzHjp+hnwo*3NQE$JTA(agu~silV5T`du+GJgWGi_7mAy`Nk8fLt~%GF$;XXcE-ri?
zyIglyyzA`K-);4Eem2MZm07RBza@W3UP)d`Rz=RFk-I);`s{$L%yyBNX0OTjo5Gk0
zs}g44uXg*l%xo^{`#0=kd*2?}Cz22Bv2;Gu?;3o~(D#gk1OKYQSCAb$(&vu@_pvWO
z>gbu<_$}mU=Yd9!?TOX;|B-#B)+0x#9q*yqJiqS!`49d=7ztk$O+9=1i;?K_|J<8T
z?0b7=-`Z3A#vV$4XJ5(lQ~TOZHUFdA%oWvK5zg&_IKXIbughQBA8XAsd#=@|TFLXC
zy(^m((;DnQmDQ<zX+PK(Lfu@ox#mOnbZjSDl}IBqv$qwK+2@))5$ba>Katmw!@c`|
G?EMQ&4NnpP

delta 11
ScmeBCZD5|Duvteife`=|>;pCc

diff --git a/Source/Modulos/Parametros/Cliente/uViewParametrosFecha.dfm b/Source/Modulos/Parametros/Cliente/uViewParametrosFecha.dfm
new file mode 100644
index 0000000..d4a32bb
--- /dev/null
+++ b/Source/Modulos/Parametros/Cliente/uViewParametrosFecha.dfm
@@ -0,0 +1,32 @@
+inherited frViewParametrosFecha: TfrViewParametrosFecha
+  Width = 293
+  Height = 44
+  ExplicitWidth = 293
+  ExplicitHeight = 44
+  object dxLayoutControl1: TdxLayoutControl
+    Left = 0
+    Top = 0
+    Width = 293
+    Height = 44
+    Align = alClient
+    ParentBackground = True
+    TabOrder = 0
+    AutoContentSizes = [acsWidth, acsHeight]
+    object eFecha: TcxDateEdit
+      Left = 111
+      Top = 10
+      TabOrder = 0
+      Width = 121
+    end
+    object dxLayoutControl1Group_Root: TdxLayoutGroup
+      ShowCaption = False
+      Hidden = True
+      ShowBorder = False
+      object dxLayoutControl1Item1: TdxLayoutItem
+        Caption = 'A partir de la fecha:'
+        Control = eFecha
+        ControlOptions.ShowBorder = False
+      end
+    end
+  end
+end
diff --git a/Source/Modulos/Parametros/Cliente/uViewParametrosFecha.pas b/Source/Modulos/Parametros/Cliente/uViewParametrosFecha.pas
new file mode 100644
index 0000000..34ad488
--- /dev/null
+++ b/Source/Modulos/Parametros/Cliente/uViewParametrosFecha.pas
@@ -0,0 +1,63 @@
+unit uViewParametrosFecha;
+
+interface
+
+uses
+  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
+  Dialogs, dxLayoutControl, StdCtrls, Mask, JvExMask, JvToolEdit,
+  JvCombobox, cxControls, uViewParametrosControlGrid, TBXDkPanels,
+  uBizParametros, cxContainer, cxEdit, cxTextEdit, cxMaskEdit, cxDropDownEdit,
+  cxCalendar;
+
+type
+  IViewParametrosFecha = interface(IViewParametrosControlGrid)
+  ['{450D10BE-740E-466D-BA12-3E0A9206B697}']
+    function GetFecha: Variant;
+    property Fecha : Variant read GetFecha;
+  end;
+
+  TfrViewParametrosFecha = class(TfrViewParametrosControlGrid, IViewParametrosFecha)
+    dxLayoutControl1Group_Root: TdxLayoutGroup;
+    dxLayoutControl1: TdxLayoutControl;
+    eFecha: TcxDateEdit;
+    dxLayoutControl1Item1: TdxLayoutItem;
+  private
+    function GetFecha: Variant;
+  public
+    procedure Execute; override;
+    procedure Refresh; override;
+    property Fecha : Variant read GetFecha;
+    procedure LimpiarFecha;
+  end;
+
+implementation
+
+uses
+  uDataModuleParametros, uDADataTable;
+
+{$R *.dfm}
+
+{ TfrViewParametrosCentro }
+
+procedure TfrViewParametrosFecha.Execute;
+begin
+  // inherited; <- no descomentar
+end;
+
+function TfrViewParametrosFecha.GetFecha: Variant;
+begin
+  Result := eFecha.EditValue;
+end;
+
+procedure TfrViewParametrosFecha.LimpiarFecha;
+begin
+  eFecha.Clear;
+end;
+
+procedure TfrViewParametrosFecha.Refresh;
+begin
+  // inherited; <- no descomentar
+  LimpiarFecha;
+end;
+
+end.
diff --git a/Source/Modulos/Stock/Cliente/uEditorControlStockEDI.dfm b/Source/Modulos/Stock/Cliente/uEditorControlStockEDI.dfm
index 3b24867..ab47a2f 100644
--- a/Source/Modulos/Stock/Cliente/uEditorControlStockEDI.dfm
+++ b/Source/Modulos/Stock/Cliente/uEditorControlStockEDI.dfm
@@ -5,7 +5,7 @@ inherited fEditorControlStockEDI: TfEditorControlStockEDI
   ClientHeight = 573
   ClientWidth = 864
   ExplicitWidth = 872
-  ExplicitHeight = 607
+  ExplicitHeight = 600
   PixelsPerInch = 96
   TextHeight = 13
   inherited JvNavPanelHeader: TJvNavPanelHeader
@@ -261,9 +261,17 @@ inherited fEditorControlStockEDI: TfEditorControlStockEDI
         end
         inherited TBXDockablePanel1: TTBXDockablePanel
           ExplicitWidth = 846
+          inherited frViewParametrosColeccion1: TfrViewParametrosColeccion
+            inherited dxLayoutControl1: TdxLayoutControl
+              inherited ccbColeccion: TJvCheckedComboBox
+                Width = 512
+                ExplicitWidth = 512
+              end
+            end
+          end
           inherited pnlAgrupaciones: TTBXAlignmentPanel
-            Width = 525
-            ExplicitWidth = 525
+            Width = 346
+            ExplicitWidth = 346
             inherited TBXButton3: TTBXButton
               Action = actRefrescar
             end
@@ -272,6 +280,14 @@ inherited fEditorControlStockEDI: TfEditorControlStockEDI
             Width = 846
             ExplicitWidth = 846
           end
+          inherited frViewParametrosFecha1: TfrViewParametrosFecha
+            inherited dxLayoutControl1: TdxLayoutControl
+              inherited eFecha: TcxDateEdit
+                ExplicitWidth = 231
+                Width = 231
+              end
+            end
+          end
         end
         inherited dsDataSource: TDADataSource
           Left = 16
@@ -553,8 +569,24 @@ inherited fEditorControlStockEDI: TfEditorControlStockEDI
         end
         inherited TBXDockablePanel1: TTBXDockablePanel
           ExplicitWidth = 846
+          inherited frViewParametrosColeccion1: TfrViewParametrosColeccion
+            inherited dxLayoutControl1: TdxLayoutControl
+              inherited ccbColeccion: TJvCheckedComboBox
+                Width = 512
+                ExplicitWidth = 512
+              end
+            end
+          end
+          inherited frViewParametrosCentro1: TfrViewParametrosCentro
+            inherited dxLayoutControl1: TdxLayoutControl
+              inherited ccbCentro: TJvCheckedComboBox
+                Width = 392
+                ExplicitWidth = 392
+              end
+            end
+          end
           inherited TBXAlignmentPanel1: TTBXAlignmentPanel
-            Width = 125
+            Width = 16
             ExplicitWidth = 125
             inherited TBXButton1: TTBXButton
               Action = actRefrescar
@@ -564,6 +596,14 @@ inherited fEditorControlStockEDI: TfEditorControlStockEDI
             Width = 846
             ExplicitWidth = 846
           end
+          inherited frViewParametrosFecha1: TfrViewParametrosFecha
+            inherited dxLayoutControl1: TdxLayoutControl
+              inherited eFecha: TcxDateEdit
+                ExplicitWidth = 231
+                Width = 231
+              end
+            end
+          end
         end
         inherited dxComponentPrinter: TdxComponentPrinter
           inherited dxComponentPrinterLink1: TdxGridReportLink
@@ -839,8 +879,24 @@ inherited fEditorControlStockEDI: TfEditorControlStockEDI
         end
         inherited TBXDockablePanel1: TTBXDockablePanel
           ExplicitWidth = 846
+          inherited frViewParametrosColeccion1: TfrViewParametrosColeccion
+            inherited dxLayoutControl1: TdxLayoutControl
+              inherited ccbColeccion: TJvCheckedComboBox
+                Width = 512
+                ExplicitWidth = 512
+              end
+            end
+          end
+          inherited frViewParametrosCentro1: TfrViewParametrosCentro
+            inherited dxLayoutControl1: TdxLayoutControl
+              inherited ccbCentro: TJvCheckedComboBox
+                Width = 392
+                ExplicitWidth = 392
+              end
+            end
+          end
           inherited pnlAgrupaciones: TTBXAlignmentPanel
-            Width = 125
+            Width = 16
             ExplicitWidth = 125
             inherited TBXButton3: TTBXButton
               Action = actRefrescar
@@ -850,6 +906,14 @@ inherited fEditorControlStockEDI: TfEditorControlStockEDI
             Width = 846
             ExplicitWidth = 846
           end
+          inherited frViewParametrosFecha1: TfrViewParametrosFecha
+            inherited dxLayoutControl1: TdxLayoutControl
+              inherited eFecha: TcxDateEdit
+                ExplicitWidth = 122
+                Width = 122
+              end
+            end
+          end
         end
         inherited dxComponentPrinter: TdxComponentPrinter
           inherited dxComponentPrinterLink1: TdxGridReportLink
diff --git a/Source/Modulos/Stock/Cliente/uViewControGridStockEDI.dfm b/Source/Modulos/Stock/Cliente/uViewControGridStockEDI.dfm
index 2edfe08..5466396 100644
--- a/Source/Modulos/Stock/Cliente/uViewControGridStockEDI.dfm
+++ b/Source/Modulos/Stock/Cliente/uViewControGridStockEDI.dfm
@@ -1,14 +1,14 @@
 inherited frViewControlGridStockEDI: TfrViewControlGridStockEDI
-  Width = 553
+  Width = 972
   Height = 477
-  ExplicitWidth = 553
+  ExplicitWidth = 972
   ExplicitHeight = 477
   inherited cxGrid: TcxGrid
     Top = 60
-    Width = 553
+    Width = 972
     Height = 417
     ExplicitTop = 60
-    ExplicitWidth = 553
+    ExplicitWidth = 972
     ExplicitHeight = 417
     inherited cxGridView: TcxGridDBTableView
       FilterBox.Visible = fvNever
@@ -478,18 +478,17 @@ inherited frViewControlGridStockEDI: TfrViewControlGridStockEDI
     inline frViewParametrosColeccion1: TfrViewParametrosColeccion
       Left = 0
       Top = 19
-      Width = 321
+      Width = 250
       Height = 41
       Align = alLeft
-      AutoSize = True
       TabOrder = 0
       ReadOnly = False
       ExplicitTop = 19
-      ExplicitWidth = 321
+      ExplicitWidth = 250
       ExplicitHeight = 41
       inherited dxLayoutControl1: TdxLayoutControl
-        Width = 321
-        ExplicitWidth = 321
+        Width = 250
+        ExplicitWidth = 250
         inherited ccbColeccion: TJvCheckedComboBox
           Width = 512
           ExplicitWidth = 512
@@ -497,21 +496,20 @@ inherited frViewControlGridStockEDI: TfrViewControlGridStockEDI
       end
     end
     inline frViewParametrosCentro1: TfrViewParametrosCentro
-      Left = 321
+      Left = 250
       Top = 19
-      Width = 400
+      Width = 300
       Height = 41
       Align = alLeft
-      AutoSize = True
       TabOrder = 1
       ReadOnly = False
-      ExplicitLeft = 321
+      ExplicitLeft = 250
       ExplicitTop = 19
-      ExplicitWidth = 400
+      ExplicitWidth = 300
       ExplicitHeight = 41
       inherited dxLayoutControl1: TdxLayoutControl
-        Width = 400
-        ExplicitWidth = 400
+        Width = 300
+        ExplicitWidth = 300
         inherited ccbCentro: TJvCheckedComboBox
           Width = 392
           ExplicitWidth = 392
@@ -519,13 +517,15 @@ inherited frViewControlGridStockEDI: TfrViewControlGridStockEDI
       end
     end
     object TBXAlignmentPanel1: TTBXAlignmentPanel
-      Left = 721
+      Left = 770
       Top = 19
-      Width = 350
+      Width = 202
       Height = 41
       Align = alClient
       AutoSize = True
       TabOrder = 2
+      ExplicitLeft = 730
+      ExplicitWidth = 200
       object TBXButton1: TTBXButton
         Tag = 3
         Left = 8
@@ -542,7 +542,7 @@ inherited frViewControlGridStockEDI: TfrViewControlGridStockEDI
     object TBXLabel2: TTBXLabel
       Left = 0
       Top = 0
-      Width = 553
+      Width = 972
       Height = 19
       Margins.Left = 5
       Margins.Top = 5
@@ -557,6 +557,31 @@ inherited frViewControlGridStockEDI: TfrViewControlGridStockEDI
       ParentFont = False
       Underline = True
     end
+    inline frViewParametrosFecha1: TfrViewParametrosFecha
+      Left = 550
+      Top = 19
+      Width = 220
+      Height = 41
+      Align = alLeft
+      TabOrder = 4
+      ReadOnly = False
+      ExplicitLeft = 550
+      ExplicitTop = 19
+      ExplicitWidth = 220
+      ExplicitHeight = 41
+      inherited dxLayoutControl1: TdxLayoutControl
+        Width = 220
+        Height = 41
+        ExplicitLeft = 6
+        ExplicitTop = -6
+        ExplicitWidth = 180
+        ExplicitHeight = 41
+        inherited eFecha: TcxDateEdit
+          ExplicitWidth = 231
+          Width = 231
+        end
+      end
+    end
   end
   inherited dsDataSource: TDADataSource
     Left = 72
@@ -583,7 +608,7 @@ inherited frViewControlGridStockEDI: TfrViewControlGridStockEDI
       PrinterPage._dxMeasurementUnits_ = 0
       PrinterPage._dxLastMU_ = 2
       ReportDocument.Caption = 'Venta mensual'
-      ReportDocument.CreationDate = 39361.439008969910000000
+      ReportDocument.CreationDate = 39478.750675266200000000
       ReportTitle.Text = 'Venta mensual'
       Font.Charset = DEFAULT_CHARSET
       Font.Color = clBlack
diff --git a/Source/Modulos/Stock/Cliente/uViewControGridStockEDI.pas b/Source/Modulos/Stock/Cliente/uViewControGridStockEDI.pas
index 3cdbade..2ae7cfd 100644
--- a/Source/Modulos/Stock/Cliente/uViewControGridStockEDI.pas
+++ b/Source/Modulos/Stock/Cliente/uViewControGridStockEDI.pas
@@ -14,7 +14,7 @@ uses
   cxDropDownEdit, StdCtrls, cxSpinEdit, uViewGrid, cxMemo,
   cxEditRepositoryItems, uDataModuleStock, uDAInterfaces, TBXDkPanels,
   uViewParametrosCentro, uCustomView, uViewBase, uViewParametrosControlGrid,
-  uViewParametrosColeccion, TB2Dock, uBizStock;
+  uViewParametrosColeccion, TB2Dock, uBizStock, uViewParametrosFecha;
 
 type
   IViewControlGridStockEDI = interface(IViewGrid)
@@ -73,6 +73,7 @@ type
     TBXAlignmentPanel1: TTBXAlignmentPanel;
     TBXButton1: TTBXButton;
     TBXLabel2: TTBXLabel;
+    frViewParametrosFecha1: TfrViewParametrosFecha;
     procedure cxGridViewKTCustomDrawCell(Sender: TcxCustomGridTableView;
       ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo;
       var ADone: Boolean);
@@ -182,10 +183,12 @@ end;
 
 procedure TfrViewControlGridStockEDI.Refresh;
 var
+  AFecha : Variant;
   AColeccionesList : TStringList;
   ACentrosList : TStringList;
   AWhereColeccion : String;
   AWhereCentro : String;
+  AWhereFecha : String;
   AWhere : String;
   i : integer;
 begin
@@ -196,7 +199,8 @@ begin
      Items.DataTable.Active := False;
   AColeccionesList := frViewParametrosColeccion1.ColeccionesSeleccionadas;
   ACentrosList := frViewParametrosCentro1.CodigoCentrosSeleccionados;
-
+  AFecha := frViewParametrosFecha1.Fecha;
+  
   ShowHourglassCursor;
   try
     if Assigned(AColeccionesList) then
@@ -239,6 +243,10 @@ begin
         end;
     end;
 
+    AWhereFecha := '';
+    if not VarIsNull(AFecha) then
+       AWhereFecha := '(FECHA >= ''' + VarToStr(AFecha) + ''')';
+
     AWhere := '';
     if AWhereColeccion <> '' then
        AWhere := AWhere + AWhereColeccion;
@@ -250,6 +258,13 @@ begin
        AWhere := AWhere + AWhereCentro;
     end;
 
+    if AWhereFecha <> '' then
+    begin
+       if AWhere <> '' then
+          AWhere := AWhere + ' AND ';
+       AWhere := AWhere + AWhereFecha;
+    end;
+
     Items.DataTable.Where.Clear;
     Items.DataTable.Where.AddText(AWhere, False);
     Items.DataTable.Active := True;
diff --git a/Source/Modulos/Stock/Cliente/uViewControGridStockEDIInventario.dfm b/Source/Modulos/Stock/Cliente/uViewControGridStockEDIInventario.dfm
index 459541b..2a571f7 100644
--- a/Source/Modulos/Stock/Cliente/uViewControGridStockEDIInventario.dfm
+++ b/Source/Modulos/Stock/Cliente/uViewControGridStockEDIInventario.dfm
@@ -1,15 +1,15 @@
 inherited frViewControlGridStockEDIInventario: TfrViewControlGridStockEDIInventario
-  Width = 553
-  Height = 477
-  ExplicitWidth = 553
-  ExplicitHeight = 477
+  Width = 1067
+  Height = 537
+  ExplicitWidth = 1067
+  ExplicitHeight = 537
   inherited cxGrid: TcxGrid
     Top = 60
-    Width = 553
-    Height = 417
+    Width = 1067
+    Height = 477
     ExplicitTop = 60
-    ExplicitWidth = 553
-    ExplicitHeight = 417
+    ExplicitWidth = 1067
+    ExplicitHeight = 477
     inherited cxGridView: TcxGridDBTableView
       FilterBox.Visible = fvNever
       DataController.Summary.DefaultGroupSummaryItems = <
@@ -478,18 +478,17 @@ inherited frViewControlGridStockEDIInventario: TfrViewControlGridStockEDIInventa
     inline frViewParametrosColeccion1: TfrViewParametrosColeccion
       Left = 0
       Top = 19
-      Width = 321
+      Width = 250
       Height = 41
       Align = alLeft
-      AutoSize = True
       TabOrder = 0
       ReadOnly = False
       ExplicitTop = 19
-      ExplicitWidth = 321
+      ExplicitWidth = 250
       ExplicitHeight = 41
       inherited dxLayoutControl1: TdxLayoutControl
-        Width = 321
-        ExplicitWidth = 321
+        Width = 250
+        ExplicitWidth = 300
         inherited ccbColeccion: TJvCheckedComboBox
           Width = 512
           ExplicitWidth = 512
@@ -497,21 +496,20 @@ inherited frViewControlGridStockEDIInventario: TfrViewControlGridStockEDIInventa
       end
     end
     inline frViewParametrosCentro1: TfrViewParametrosCentro
-      Left = 321
+      Left = 250
       Top = 19
-      Width = 400
+      Width = 300
       Height = 41
       Align = alLeft
-      AutoSize = True
       TabOrder = 1
       ReadOnly = False
-      ExplicitLeft = 321
+      ExplicitLeft = 250
       ExplicitTop = 19
-      ExplicitWidth = 400
+      ExplicitWidth = 300
       ExplicitHeight = 41
       inherited dxLayoutControl1: TdxLayoutControl
-        Width = 400
-        ExplicitWidth = 400
+        Width = 300
+        ExplicitWidth = 350
         inherited ccbCentro: TJvCheckedComboBox
           Width = 392
           ExplicitWidth = 392
@@ -519,13 +517,15 @@ inherited frViewControlGridStockEDIInventario: TfrViewControlGridStockEDIInventa
       end
     end
     object pnlAgrupaciones: TTBXAlignmentPanel
-      Left = 721
+      Left = 770
       Top = 19
-      Width = 350
+      Width = 297
       Height = 41
       Align = alClient
       AutoSize = True
       TabOrder = 2
+      ExplicitLeft = 830
+      ExplicitWidth = 237
       object TBXButton3: TTBXButton
         Tag = 3
         Left = 8
@@ -542,7 +542,7 @@ inherited frViewControlGridStockEDIInventario: TfrViewControlGridStockEDIInventa
     object TBXLabel1: TTBXLabel
       Left = 0
       Top = 0
-      Width = 553
+      Width = 1067
       Height = 19
       Margins.Left = 5
       Margins.Top = 5
@@ -557,6 +557,29 @@ inherited frViewControlGridStockEDIInventario: TfrViewControlGridStockEDIInventa
       ParentFont = False
       Underline = True
     end
+    inline frViewParametrosFecha1: TfrViewParametrosFecha
+      Left = 550
+      Top = 19
+      Width = 220
+      Height = 41
+      Align = alLeft
+      TabOrder = 4
+      ReadOnly = False
+      ExplicitLeft = 550
+      ExplicitTop = 19
+      ExplicitWidth = 220
+      ExplicitHeight = 41
+      inherited dxLayoutControl1: TdxLayoutControl
+        Width = 220
+        Height = 41
+        ExplicitWidth = 180
+        ExplicitHeight = 41
+        inherited eFecha: TcxDateEdit
+          ExplicitWidth = 122
+          Width = 122
+        end
+      end
+    end
   end
   inherited dsDataSource: TDADataSource
     Left = 72
@@ -583,7 +606,7 @@ inherited frViewControlGridStockEDIInventario: TfrViewControlGridStockEDIInventa
       PrinterPage._dxMeasurementUnits_ = 0
       PrinterPage._dxLastMU_ = 2
       ReportDocument.Caption = 'Venta mensual'
-      ReportDocument.CreationDate = 39361.438243449080000000
+      ReportDocument.CreationDate = 39478.742396006940000000
       ReportTitle.Text = 'Venta mensual'
       Font.Charset = DEFAULT_CHARSET
       Font.Color = clBlack
diff --git a/Source/Modulos/Stock/Cliente/uViewControGridStockEDIInventario.pas b/Source/Modulos/Stock/Cliente/uViewControGridStockEDIInventario.pas
index 7ed488e..e054430 100644
--- a/Source/Modulos/Stock/Cliente/uViewControGridStockEDIInventario.pas
+++ b/Source/Modulos/Stock/Cliente/uViewControGridStockEDIInventario.pas
@@ -14,7 +14,7 @@ uses
   cxDropDownEdit, StdCtrls, cxSpinEdit, uViewGrid, cxMemo,
   cxEditRepositoryItems, uDataModuleStock, uDAInterfaces, TBXDkPanels,
   uViewParametrosCentro, uCustomView, uViewBase, uViewParametrosControlGrid,
-  uViewParametrosColeccion, TB2Dock, uBizStock;
+  uViewParametrosColeccion, TB2Dock, uBizStock, uViewParametrosFecha;
 
 type
   IViewControlGridStockEDIInventario = interface(IViewGrid)
@@ -73,6 +73,7 @@ type
     pnlAgrupaciones: TTBXAlignmentPanel;
     TBXButton3: TTBXButton;
     TBXLabel1: TTBXLabel;
+    frViewParametrosFecha1: TfrViewParametrosFecha;
     procedure cxGridViewDTCustomDrawCell(Sender: TcxCustomGridTableView;
       ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo;
       var ADone: Boolean);
@@ -184,8 +185,10 @@ procedure TfrViewControlGridStockEDIInventario.Refresh;
 var
   AColeccionesList : TStringList;
   ACentrosList : TStringList;
+  AFecha : Variant;
   AWhereColeccion : String;
   AWhereCentro : String;
+  AWhereFecha : String;
   AWhere : String;
   i : integer;
 begin
@@ -196,6 +199,7 @@ begin
      Items.DataTable.Active := False;
   AColeccionesList := frViewParametrosColeccion1.ColeccionesSeleccionadas;
   ACentrosList := frViewParametrosCentro1.CodigoCentrosSeleccionados;
+  AFecha := frViewParametrosFecha1.Fecha;
 
   ShowHourglassCursor;
   try
@@ -239,6 +243,10 @@ begin
         end;
     end;
 
+    AWhereFecha := '';
+    if not VarIsNull(AFecha) then
+       AWhereFecha := '(FECHA >= ''' + VarToStr(AFecha) + ''')';
+
     AWhere := '';
     if AWhereColeccion <> '' then
        AWhere := AWhere + AWhereColeccion;
@@ -250,6 +258,12 @@ begin
        AWhere := AWhere + AWhereCentro;
     end;
 
+    if AWhereFecha <> '' then
+    begin
+       if AWhere <> '' then
+          AWhere := AWhere + ' AND ';
+       AWhere := AWhere + AWhereFecha;
+    end;
 
     Items.DataTable.Where.Clear;
     Items.DataTable.Where.AddText(AWhere, False);
diff --git a/Source/Modulos/Stock/Cliente/uViewControGridStockPrendasCentros.dfm b/Source/Modulos/Stock/Cliente/uViewControGridStockPrendasCentros.dfm
index 06277a7..9ba7fce 100644
--- a/Source/Modulos/Stock/Cliente/uViewControGridStockPrendasCentros.dfm
+++ b/Source/Modulos/Stock/Cliente/uViewControGridStockPrendasCentros.dfm
@@ -214,18 +214,17 @@ inherited frViewControlGridStockPrendasCentros: TfrViewControlGridStockPrendasCe
     inline frViewParametrosColeccion1: TfrViewParametrosColeccion
       Left = 0
       Top = 19
-      Width = 321
+      Width = 250
       Height = 41
       Align = alLeft
-      AutoSize = True
       TabOrder = 0
       ReadOnly = False
       ExplicitTop = 19
-      ExplicitWidth = 321
+      ExplicitWidth = 250
       ExplicitHeight = 41
       inherited dxLayoutControl1: TdxLayoutControl
-        Width = 321
-        ExplicitWidth = 321
+        Width = 250
+        ExplicitWidth = 300
         inherited ccbColeccion: TJvCheckedComboBox
           Width = 512
           ExplicitWidth = 512
@@ -233,13 +232,15 @@ inherited frViewControlGridStockPrendasCentros: TfrViewControlGridStockPrendasCe
       end
     end
     object pnlAgrupaciones: TTBXAlignmentPanel
-      Left = 321
+      Left = 470
       Top = 19
-      Width = 300
+      Width = 151
       Height = 41
       Align = alClient
       AutoSize = True
       TabOrder = 1
+      ExplicitLeft = 500
+      ExplicitWidth = 121
       object TBXButton3: TTBXButton
         Tag = 3
         Left = 8
@@ -271,6 +272,29 @@ inherited frViewControlGridStockPrendasCentros: TfrViewControlGridStockPrendasCe
       ParentFont = False
       Underline = True
     end
+    inline frViewParametrosFecha1: TfrViewParametrosFecha
+      Left = 250
+      Top = 19
+      Width = 220
+      Height = 41
+      Align = alLeft
+      TabOrder = 3
+      ReadOnly = False
+      ExplicitLeft = 250
+      ExplicitTop = 19
+      ExplicitWidth = 220
+      ExplicitHeight = 41
+      inherited dxLayoutControl1: TdxLayoutControl
+        Width = 220
+        Height = 41
+        ExplicitWidth = 200
+        ExplicitHeight = 41
+        inherited eFecha: TcxDateEdit
+          ExplicitWidth = 231
+          Width = 231
+        end
+      end
+    end
   end
   inherited dsDataSource: TDADataSource
     Left = 24
@@ -299,7 +323,7 @@ inherited frViewControlGridStockPrendasCentros: TfrViewControlGridStockPrendasCe
       PrinterPage.PageSize.Y = 297000
       PrinterPage._dxMeasurementUnits_ = 0
       PrinterPage._dxLastMU_ = 2
-      ReportDocument.CreationDate = 39361.401792893520000000
+      ReportDocument.CreationDate = 39478.749355277770000000
       ReportDocument.IsCaptionAssigned = True
       ReportTitle.AdjustOnReportScale = True
       ReportTitle.Text = 'Venta mensual'
diff --git a/Source/Modulos/Stock/Cliente/uViewControGridStockPrendasCentros.pas b/Source/Modulos/Stock/Cliente/uViewControGridStockPrendasCentros.pas
index a5b131f..4961da3 100644
--- a/Source/Modulos/Stock/Cliente/uViewControGridStockPrendasCentros.pas
+++ b/Source/Modulos/Stock/Cliente/uViewControGridStockPrendasCentros.pas
@@ -14,7 +14,8 @@ uses
   cxDropDownEdit, StdCtrls, cxSpinEdit, uViewGrid, cxMemo,
   cxEditRepositoryItems, uDataModuleStock, uCustomView, uViewBase,
   uViewParametrosControlGrid, Grids, DBGrids, uDAInterfaces, TBXDkPanels,
-  uViewParametrosCentro, uViewParametrosColeccion, TB2Dock, uBizStock;
+  uViewParametrosCentro, uViewParametrosColeccion, TB2Dock, uBizStock,
+  uViewParametrosFecha;
 
 type
   IViewControlGridStockPrendasCentros = interface(IViewGrid)
@@ -53,6 +54,7 @@ type
     pnlAgrupaciones: TTBXAlignmentPanel;
     TBXButton3: TTBXButton;
     TBXLabel1: TTBXLabel;
+    frViewParametrosFecha1: TfrViewParametrosFecha;
     procedure cxGridViewKTCustomDrawCell(Sender: TcxCustomGridTableView;
       ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo;
       var ADone: Boolean);
@@ -146,10 +148,12 @@ end;
 
 procedure TfrViewControlGridStockPrendasCentros.Refresh;
 var
+  AFecha : Variant;
   AColeccionesList : TStringList;
   ACentrosList : TStringList;
   AWhereColeccion : String;
   AWhereCentro : String;
+  AWhereFecha : String;
   AWhere : String;
   i : integer;
 begin
@@ -158,6 +162,7 @@ begin
   if Assigned(FItems) then
      Items.DataTable.Active := False;
   AColeccionesList := frViewParametrosColeccion1.ColeccionesSeleccionadas;
+  AFecha := frViewParametrosFecha1.Fecha;
 
   ShowHourglassCursor;
   try
@@ -181,10 +186,21 @@ begin
         end;
     end;
 
+    AWhereFecha := '';
+    if not VarIsNull(AFecha) then
+       AWhereFecha := '(FECHA >= ''' + VarToStr(AFecha) + ''')';
+
     AWhere := '';
     if AWhereColeccion <> '' then
        AWhere := AWhere + AWhereColeccion;
 
+    if AWhereFecha <> '' then
+    begin
+       if AWhere <> '' then
+          AWhere := AWhere + ' AND ';
+       AWhere := AWhere + AWhereFecha;
+    end;
+
     Items.DataTable.Where.Clear;
     Items.DataTable.Where.AddText(AWhere, False);
     Items.DataTable.Active := True;
diff --git a/Source/Modulos/Stock/Cliente/uViewControGridStockVARELA.dfm b/Source/Modulos/Stock/Cliente/uViewControGridStockVARELA.dfm
index 8057572..493c2e7 100644
--- a/Source/Modulos/Stock/Cliente/uViewControGridStockVARELA.dfm
+++ b/Source/Modulos/Stock/Cliente/uViewControGridStockVARELA.dfm
@@ -312,7 +312,7 @@ inherited frViewControlGridStockVARELA: TfrViewControlGridStockVARELA
       PrinterPage.PageSize.Y = 297000
       PrinterPage._dxMeasurementUnits_ = 0
       PrinterPage._dxLastMU_ = 2
-      ReportDocument.CreationDate = 39361.401457418980000000
+      ReportDocument.CreationDate = 39478.735610347220000000
       ReportDocument.IsCaptionAssigned = True
       ReportTitle.AdjustOnReportScale = True
       ReportTitle.Text = 'Venta mensual'
diff --git a/Source/Modulos/Stock/Cliente/uViewControGridStockVARELA.pas b/Source/Modulos/Stock/Cliente/uViewControGridStockVARELA.pas
index 2f30a49..c097f6b 100644
--- a/Source/Modulos/Stock/Cliente/uViewControGridStockVARELA.pas
+++ b/Source/Modulos/Stock/Cliente/uViewControGridStockVARELA.pas
@@ -175,7 +175,7 @@ procedure TfrViewControlGridStockVARELA.cxGridViewK38GetDataText(
   var AText: String);
 begin
   inherited;
-  ShowMessage(AText);
+//  ShowMessage(AText);
   if AText = '0' then
     AText := '';
 end;
diff --git a/Source/Modulos/Stock/Reglas/schStockClient_Intf.pas b/Source/Modulos/Stock/Reglas/schStockClient_Intf.pas
index c5b3a6a..5d14e7b 100644
--- a/Source/Modulos/Stock/Reglas/schStockClient_Intf.pas
+++ b/Source/Modulos/Stock/Reglas/schStockClient_Intf.pas
@@ -9,15 +9,17 @@ 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_StockPrendasCentros = '{A8012514-80BD-45B0-9270-F3C4AE5877F8}';
-  RID_StockEDI = '{4E97650E-1103-4506-97A1-FDD43A81590A}';
-  RID_StockVARELA = '{756C613D-6C51-4E60-B82C-5363636B0DAB}';
-  RID_StockEDIInventario = '{E6A81993-C6F8-456A-B88E-08481D29019E}';
+  RID_StockPrendasCentros = '{AC275474-9AA5-46D5-B8D3-5D0719258497}';
+  RID_StockEDI = '{498DD174-600D-4194-A047-37C3BF100026}';
+  RID_StockVARELA = '{A7FD0B6B-F0B2-44A5-882B-F389142522F2}';
+  RID_StockEDIInventario2 = '{E8AB97C9-0832-4A24-835D-842CFF3D15B0}';
+  RID_StockEDIInventario = '{8185079C-74C2-4F26-8934-A7CBB1823BE8}';
 
   { Data table names }
   nme_StockPrendasCentros = 'StockPrendasCentros';
   nme_StockEDI = 'StockEDI';
   nme_StockVARELA = 'StockVARELA';
+  nme_StockEDIInventario2 = 'StockEDIInventario2';
   nme_StockEDIInventario = 'StockEDIInventario';
 
   { StockPrendasCentros fields }
@@ -144,6 +146,68 @@ const
   idx_StockVARELAK48 = 12;
   idx_StockVARELAKT = 13;
 
+  { StockEDIInventario2 fields }
+  fld_StockEDIInventario2CENTRO = 'CENTRO';
+  fld_StockEDIInventario2FILIAL = 'FILIAL';
+  fld_StockEDIInventario2CODIGO = 'CODIGO';
+  fld_StockEDIInventario2PRODUCTO = 'PRODUCTO';
+  fld_StockEDIInventario2COLOR = 'COLOR';
+  fld_StockEDIInventario2TIPO_PRODUCTO = 'TIPO_PRODUCTO';
+  fld_StockEDIInventario2GRUPO_PRODUCTO = 'GRUPO_PRODUCTO';
+  fld_StockEDIInventario2COLECCION = 'COLECCION';
+  fld_StockEDIInventario2I38 = 'I38';
+  fld_StockEDIInventario2I40 = 'I40';
+  fld_StockEDIInventario2I42 = 'I42';
+  fld_StockEDIInventario2I44 = 'I44';
+  fld_StockEDIInventario2I46 = 'I46';
+  fld_StockEDIInventario2I48 = 'I48';
+  fld_StockEDIInventario2TI = 'TI';
+  fld_StockEDIInventario2K38 = 'K38';
+  fld_StockEDIInventario2K40 = 'K40';
+  fld_StockEDIInventario2K42 = 'K42';
+  fld_StockEDIInventario2K44 = 'K44';
+  fld_StockEDIInventario2K46 = 'K46';
+  fld_StockEDIInventario2K48 = 'K48';
+  fld_StockEDIInventario2TK = 'TK';
+  fld_StockEDIInventario2D38 = 'D38';
+  fld_StockEDIInventario2D40 = 'D40';
+  fld_StockEDIInventario2D42 = 'D42';
+  fld_StockEDIInventario2D44 = 'D44';
+  fld_StockEDIInventario2D46 = 'D46';
+  fld_StockEDIInventario2D48 = 'D48';
+  fld_StockEDIInventario2DT = 'DT';
+
+  { StockEDIInventario2 field indexes }
+  idx_StockEDIInventario2CENTRO = 0;
+  idx_StockEDIInventario2FILIAL = 1;
+  idx_StockEDIInventario2CODIGO = 2;
+  idx_StockEDIInventario2PRODUCTO = 3;
+  idx_StockEDIInventario2COLOR = 4;
+  idx_StockEDIInventario2TIPO_PRODUCTO = 5;
+  idx_StockEDIInventario2GRUPO_PRODUCTO = 6;
+  idx_StockEDIInventario2COLECCION = 7;
+  idx_StockEDIInventario2I38 = 8;
+  idx_StockEDIInventario2I40 = 9;
+  idx_StockEDIInventario2I42 = 10;
+  idx_StockEDIInventario2I44 = 11;
+  idx_StockEDIInventario2I46 = 12;
+  idx_StockEDIInventario2I48 = 13;
+  idx_StockEDIInventario2TI = 14;
+  idx_StockEDIInventario2K38 = 15;
+  idx_StockEDIInventario2K40 = 16;
+  idx_StockEDIInventario2K42 = 17;
+  idx_StockEDIInventario2K44 = 18;
+  idx_StockEDIInventario2K46 = 19;
+  idx_StockEDIInventario2K48 = 20;
+  idx_StockEDIInventario2TK = 21;
+  idx_StockEDIInventario2D38 = 22;
+  idx_StockEDIInventario2D40 = 23;
+  idx_StockEDIInventario2D42 = 24;
+  idx_StockEDIInventario2D44 = 25;
+  idx_StockEDIInventario2D46 = 26;
+  idx_StockEDIInventario2D48 = 27;
+  idx_StockEDIInventario2DT = 28;
+
   { StockEDIInventario fields }
   fld_StockEDIInventarioCENTRO = 'CENTRO';
   fld_StockEDIInventarioFILIAL = 'FILIAL';
@@ -209,7 +273,7 @@ const
 type
   { IStockPrendasCentros }
   IStockPrendasCentros = interface(IDAStronglyTypedDataTable)
-  ['{A49DB067-BF73-4963-B765-92DA5C47C377}']
+  ['{0F612A65-D7C3-42A4-812D-2FA68E15899F}']
     { Property getters and setters }
     function GetCODIGOValue: String;
     procedure SetCODIGOValue(const aValue: String);
@@ -388,7 +452,7 @@ type
 
   { IStockEDI }
   IStockEDI = interface(IDAStronglyTypedDataTable)
-  ['{BDE048F6-D199-4C45-BEA4-E85EBA47C934}']
+  ['{A4F75839-7277-4E39-BEDE-7E72004A3893}']
     { Property getters and setters }
     function GetCENTROValue: String;
     procedure SetCENTROValue(const aValue: String);
@@ -759,7 +823,7 @@ type
 
   { IStockVARELA }
   IStockVARELA = interface(IDAStronglyTypedDataTable)
-  ['{FA5D0F0E-C711-4EB6-BB53-A0CF15BC31D5}']
+  ['{15D2CFCC-CE21-4FC4-8175-80D4CFA1173C}']
     { Property getters and setters }
     function GetFILIALValue: String;
     procedure SetFILIALValue(const aValue: String);
@@ -948,9 +1012,380 @@ type
 
   end;
 
+  { IStockEDIInventario2 }
+  IStockEDIInventario2 = interface(IDAStronglyTypedDataTable)
+  ['{6339E37E-A9C4-4F5F-9AB7-AFCF35C8B9B6}']
+    { Property getters and setters }
+    function GetCENTROValue: String;
+    procedure SetCENTROValue(const aValue: String);
+    function GetCENTROIsNull: Boolean;
+    procedure SetCENTROIsNull(const aValue: Boolean);
+    function GetFILIALValue: String;
+    procedure SetFILIALValue(const aValue: String);
+    function GetFILIALIsNull: Boolean;
+    procedure SetFILIALIsNull(const aValue: Boolean);
+    function GetCODIGOValue: String;
+    procedure SetCODIGOValue(const aValue: String);
+    function GetCODIGOIsNull: Boolean;
+    procedure SetCODIGOIsNull(const aValue: Boolean);
+    function GetPRODUCTOValue: String;
+    procedure SetPRODUCTOValue(const aValue: String);
+    function GetPRODUCTOIsNull: Boolean;
+    procedure SetPRODUCTOIsNull(const aValue: Boolean);
+    function GetCOLORValue: String;
+    procedure SetCOLORValue(const aValue: String);
+    function GetCOLORIsNull: Boolean;
+    procedure SetCOLORIsNull(const aValue: Boolean);
+    function GetTIPO_PRODUCTOValue: String;
+    procedure SetTIPO_PRODUCTOValue(const aValue: String);
+    function GetTIPO_PRODUCTOIsNull: Boolean;
+    procedure SetTIPO_PRODUCTOIsNull(const aValue: Boolean);
+    function GetGRUPO_PRODUCTOValue: String;
+    procedure SetGRUPO_PRODUCTOValue(const aValue: String);
+    function GetGRUPO_PRODUCTOIsNull: Boolean;
+    procedure SetGRUPO_PRODUCTOIsNull(const aValue: Boolean);
+    function GetCOLECCIONValue: String;
+    procedure SetCOLECCIONValue(const aValue: String);
+    function GetCOLECCIONIsNull: Boolean;
+    procedure SetCOLECCIONIsNull(const aValue: Boolean);
+    function GetI38Value: Float;
+    procedure SetI38Value(const aValue: Float);
+    function GetI38IsNull: Boolean;
+    procedure SetI38IsNull(const aValue: Boolean);
+    function GetI40Value: Float;
+    procedure SetI40Value(const aValue: Float);
+    function GetI40IsNull: Boolean;
+    procedure SetI40IsNull(const aValue: Boolean);
+    function GetI42Value: Float;
+    procedure SetI42Value(const aValue: Float);
+    function GetI42IsNull: Boolean;
+    procedure SetI42IsNull(const aValue: Boolean);
+    function GetI44Value: Float;
+    procedure SetI44Value(const aValue: Float);
+    function GetI44IsNull: Boolean;
+    procedure SetI44IsNull(const aValue: Boolean);
+    function GetI46Value: Float;
+    procedure SetI46Value(const aValue: Float);
+    function GetI46IsNull: Boolean;
+    procedure SetI46IsNull(const aValue: Boolean);
+    function GetI48Value: Float;
+    procedure SetI48Value(const aValue: Float);
+    function GetI48IsNull: Boolean;
+    procedure SetI48IsNull(const aValue: Boolean);
+    function GetTIValue: Float;
+    procedure SetTIValue(const aValue: Float);
+    function GetTIIsNull: Boolean;
+    procedure SetTIIsNull(const aValue: Boolean);
+    function GetK38Value: Float;
+    procedure SetK38Value(const aValue: Float);
+    function GetK38IsNull: Boolean;
+    procedure SetK38IsNull(const aValue: Boolean);
+    function GetK40Value: Float;
+    procedure SetK40Value(const aValue: Float);
+    function GetK40IsNull: Boolean;
+    procedure SetK40IsNull(const aValue: Boolean);
+    function GetK42Value: Float;
+    procedure SetK42Value(const aValue: Float);
+    function GetK42IsNull: Boolean;
+    procedure SetK42IsNull(const aValue: Boolean);
+    function GetK44Value: Float;
+    procedure SetK44Value(const aValue: Float);
+    function GetK44IsNull: Boolean;
+    procedure SetK44IsNull(const aValue: Boolean);
+    function GetK46Value: Float;
+    procedure SetK46Value(const aValue: Float);
+    function GetK46IsNull: Boolean;
+    procedure SetK46IsNull(const aValue: Boolean);
+    function GetK48Value: Float;
+    procedure SetK48Value(const aValue: Float);
+    function GetK48IsNull: Boolean;
+    procedure SetK48IsNull(const aValue: Boolean);
+    function GetTKValue: Float;
+    procedure SetTKValue(const aValue: Float);
+    function GetTKIsNull: Boolean;
+    procedure SetTKIsNull(const aValue: Boolean);
+    function GetD38Value: Float;
+    procedure SetD38Value(const aValue: Float);
+    function GetD38IsNull: Boolean;
+    procedure SetD38IsNull(const aValue: Boolean);
+    function GetD40Value: Float;
+    procedure SetD40Value(const aValue: Float);
+    function GetD40IsNull: Boolean;
+    procedure SetD40IsNull(const aValue: Boolean);
+    function GetD42Value: Float;
+    procedure SetD42Value(const aValue: Float);
+    function GetD42IsNull: Boolean;
+    procedure SetD42IsNull(const aValue: Boolean);
+    function GetD44Value: Float;
+    procedure SetD44Value(const aValue: Float);
+    function GetD44IsNull: Boolean;
+    procedure SetD44IsNull(const aValue: Boolean);
+    function GetD46Value: Float;
+    procedure SetD46Value(const aValue: Float);
+    function GetD46IsNull: Boolean;
+    procedure SetD46IsNull(const aValue: Boolean);
+    function GetD48Value: Float;
+    procedure SetD48Value(const aValue: Float);
+    function GetD48IsNull: Boolean;
+    procedure SetD48IsNull(const aValue: Boolean);
+    function GetDTValue: Float;
+    procedure SetDTValue(const aValue: Float);
+    function GetDTIsNull: Boolean;
+    procedure SetDTIsNull(const aValue: Boolean);
+
+
+    { Properties }
+    property CENTRO: String read GetCENTROValue write SetCENTROValue;
+    property CENTROIsNull: Boolean read GetCENTROIsNull write SetCENTROIsNull;
+    property FILIAL: String read GetFILIALValue write SetFILIALValue;
+    property FILIALIsNull: Boolean read GetFILIALIsNull write SetFILIALIsNull;
+    property CODIGO: String read GetCODIGOValue write SetCODIGOValue;
+    property CODIGOIsNull: Boolean read GetCODIGOIsNull write SetCODIGOIsNull;
+    property PRODUCTO: String read GetPRODUCTOValue write SetPRODUCTOValue;
+    property PRODUCTOIsNull: Boolean read GetPRODUCTOIsNull write SetPRODUCTOIsNull;
+    property COLOR: String read GetCOLORValue write SetCOLORValue;
+    property COLORIsNull: Boolean read GetCOLORIsNull write SetCOLORIsNull;
+    property TIPO_PRODUCTO: String read GetTIPO_PRODUCTOValue write SetTIPO_PRODUCTOValue;
+    property TIPO_PRODUCTOIsNull: Boolean read GetTIPO_PRODUCTOIsNull write SetTIPO_PRODUCTOIsNull;
+    property GRUPO_PRODUCTO: String read GetGRUPO_PRODUCTOValue write SetGRUPO_PRODUCTOValue;
+    property GRUPO_PRODUCTOIsNull: Boolean read GetGRUPO_PRODUCTOIsNull write SetGRUPO_PRODUCTOIsNull;
+    property COLECCION: String read GetCOLECCIONValue write SetCOLECCIONValue;
+    property COLECCIONIsNull: Boolean read GetCOLECCIONIsNull write SetCOLECCIONIsNull;
+    property I38: Float read GetI38Value write SetI38Value;
+    property I38IsNull: Boolean read GetI38IsNull write SetI38IsNull;
+    property I40: Float read GetI40Value write SetI40Value;
+    property I40IsNull: Boolean read GetI40IsNull write SetI40IsNull;
+    property I42: Float read GetI42Value write SetI42Value;
+    property I42IsNull: Boolean read GetI42IsNull write SetI42IsNull;
+    property I44: Float read GetI44Value write SetI44Value;
+    property I44IsNull: Boolean read GetI44IsNull write SetI44IsNull;
+    property I46: Float read GetI46Value write SetI46Value;
+    property I46IsNull: Boolean read GetI46IsNull write SetI46IsNull;
+    property I48: Float read GetI48Value write SetI48Value;
+    property I48IsNull: Boolean read GetI48IsNull write SetI48IsNull;
+    property TI: Float read GetTIValue write SetTIValue;
+    property TIIsNull: Boolean read GetTIIsNull write SetTIIsNull;
+    property K38: Float read GetK38Value write SetK38Value;
+    property K38IsNull: Boolean read GetK38IsNull write SetK38IsNull;
+    property K40: Float read GetK40Value write SetK40Value;
+    property K40IsNull: Boolean read GetK40IsNull write SetK40IsNull;
+    property K42: Float read GetK42Value write SetK42Value;
+    property K42IsNull: Boolean read GetK42IsNull write SetK42IsNull;
+    property K44: Float read GetK44Value write SetK44Value;
+    property K44IsNull: Boolean read GetK44IsNull write SetK44IsNull;
+    property K46: Float read GetK46Value write SetK46Value;
+    property K46IsNull: Boolean read GetK46IsNull write SetK46IsNull;
+    property K48: Float read GetK48Value write SetK48Value;
+    property K48IsNull: Boolean read GetK48IsNull write SetK48IsNull;
+    property TK: Float read GetTKValue write SetTKValue;
+    property TKIsNull: Boolean read GetTKIsNull write SetTKIsNull;
+    property D38: Float read GetD38Value write SetD38Value;
+    property D38IsNull: Boolean read GetD38IsNull write SetD38IsNull;
+    property D40: Float read GetD40Value write SetD40Value;
+    property D40IsNull: Boolean read GetD40IsNull write SetD40IsNull;
+    property D42: Float read GetD42Value write SetD42Value;
+    property D42IsNull: Boolean read GetD42IsNull write SetD42IsNull;
+    property D44: Float read GetD44Value write SetD44Value;
+    property D44IsNull: Boolean read GetD44IsNull write SetD44IsNull;
+    property D46: Float read GetD46Value write SetD46Value;
+    property D46IsNull: Boolean read GetD46IsNull write SetD46IsNull;
+    property D48: Float read GetD48Value write SetD48Value;
+    property D48IsNull: Boolean read GetD48IsNull write SetD48IsNull;
+    property DT: Float read GetDTValue write SetDTValue;
+    property DTIsNull: Boolean read GetDTIsNull write SetDTIsNull;
+  end;
+
+  { TStockEDIInventario2DataTableRules }
+  TStockEDIInventario2DataTableRules = class(TDADataTableRules, IStockEDIInventario2)
+  private
+  protected
+    { Property getters and setters }
+    function GetCENTROValue: String; virtual;
+    procedure SetCENTROValue(const aValue: String); virtual;
+    function GetCENTROIsNull: Boolean; virtual;
+    procedure SetCENTROIsNull(const aValue: Boolean); virtual;
+    function GetFILIALValue: String; virtual;
+    procedure SetFILIALValue(const aValue: String); virtual;
+    function GetFILIALIsNull: Boolean; virtual;
+    procedure SetFILIALIsNull(const aValue: Boolean); virtual;
+    function GetCODIGOValue: String; virtual;
+    procedure SetCODIGOValue(const aValue: String); virtual;
+    function GetCODIGOIsNull: Boolean; virtual;
+    procedure SetCODIGOIsNull(const aValue: Boolean); virtual;
+    function GetPRODUCTOValue: String; virtual;
+    procedure SetPRODUCTOValue(const aValue: String); virtual;
+    function GetPRODUCTOIsNull: Boolean; virtual;
+    procedure SetPRODUCTOIsNull(const aValue: Boolean); virtual;
+    function GetCOLORValue: String; virtual;
+    procedure SetCOLORValue(const aValue: String); virtual;
+    function GetCOLORIsNull: Boolean; virtual;
+    procedure SetCOLORIsNull(const aValue: Boolean); virtual;
+    function GetTIPO_PRODUCTOValue: String; virtual;
+    procedure SetTIPO_PRODUCTOValue(const aValue: String); virtual;
+    function GetTIPO_PRODUCTOIsNull: Boolean; virtual;
+    procedure SetTIPO_PRODUCTOIsNull(const aValue: Boolean); virtual;
+    function GetGRUPO_PRODUCTOValue: String; virtual;
+    procedure SetGRUPO_PRODUCTOValue(const aValue: String); virtual;
+    function GetGRUPO_PRODUCTOIsNull: Boolean; virtual;
+    procedure SetGRUPO_PRODUCTOIsNull(const aValue: Boolean); virtual;
+    function GetCOLECCIONValue: String; virtual;
+    procedure SetCOLECCIONValue(const aValue: String); virtual;
+    function GetCOLECCIONIsNull: Boolean; virtual;
+    procedure SetCOLECCIONIsNull(const aValue: Boolean); virtual;
+    function GetI38Value: Float; virtual;
+    procedure SetI38Value(const aValue: Float); virtual;
+    function GetI38IsNull: Boolean; virtual;
+    procedure SetI38IsNull(const aValue: Boolean); virtual;
+    function GetI40Value: Float; virtual;
+    procedure SetI40Value(const aValue: Float); virtual;
+    function GetI40IsNull: Boolean; virtual;
+    procedure SetI40IsNull(const aValue: Boolean); virtual;
+    function GetI42Value: Float; virtual;
+    procedure SetI42Value(const aValue: Float); virtual;
+    function GetI42IsNull: Boolean; virtual;
+    procedure SetI42IsNull(const aValue: Boolean); virtual;
+    function GetI44Value: Float; virtual;
+    procedure SetI44Value(const aValue: Float); virtual;
+    function GetI44IsNull: Boolean; virtual;
+    procedure SetI44IsNull(const aValue: Boolean); virtual;
+    function GetI46Value: Float; virtual;
+    procedure SetI46Value(const aValue: Float); virtual;
+    function GetI46IsNull: Boolean; virtual;
+    procedure SetI46IsNull(const aValue: Boolean); virtual;
+    function GetI48Value: Float; virtual;
+    procedure SetI48Value(const aValue: Float); virtual;
+    function GetI48IsNull: Boolean; virtual;
+    procedure SetI48IsNull(const aValue: Boolean); virtual;
+    function GetTIValue: Float; virtual;
+    procedure SetTIValue(const aValue: Float); virtual;
+    function GetTIIsNull: Boolean; virtual;
+    procedure SetTIIsNull(const aValue: Boolean); virtual;
+    function GetK38Value: Float; virtual;
+    procedure SetK38Value(const aValue: Float); virtual;
+    function GetK38IsNull: Boolean; virtual;
+    procedure SetK38IsNull(const aValue: Boolean); virtual;
+    function GetK40Value: Float; virtual;
+    procedure SetK40Value(const aValue: Float); virtual;
+    function GetK40IsNull: Boolean; virtual;
+    procedure SetK40IsNull(const aValue: Boolean); virtual;
+    function GetK42Value: Float; virtual;
+    procedure SetK42Value(const aValue: Float); virtual;
+    function GetK42IsNull: Boolean; virtual;
+    procedure SetK42IsNull(const aValue: Boolean); virtual;
+    function GetK44Value: Float; virtual;
+    procedure SetK44Value(const aValue: Float); virtual;
+    function GetK44IsNull: Boolean; virtual;
+    procedure SetK44IsNull(const aValue: Boolean); virtual;
+    function GetK46Value: Float; virtual;
+    procedure SetK46Value(const aValue: Float); virtual;
+    function GetK46IsNull: Boolean; virtual;
+    procedure SetK46IsNull(const aValue: Boolean); virtual;
+    function GetK48Value: Float; virtual;
+    procedure SetK48Value(const aValue: Float); virtual;
+    function GetK48IsNull: Boolean; virtual;
+    procedure SetK48IsNull(const aValue: Boolean); virtual;
+    function GetTKValue: Float; virtual;
+    procedure SetTKValue(const aValue: Float); virtual;
+    function GetTKIsNull: Boolean; virtual;
+    procedure SetTKIsNull(const aValue: Boolean); virtual;
+    function GetD38Value: Float; virtual;
+    procedure SetD38Value(const aValue: Float); virtual;
+    function GetD38IsNull: Boolean; virtual;
+    procedure SetD38IsNull(const aValue: Boolean); virtual;
+    function GetD40Value: Float; virtual;
+    procedure SetD40Value(const aValue: Float); virtual;
+    function GetD40IsNull: Boolean; virtual;
+    procedure SetD40IsNull(const aValue: Boolean); virtual;
+    function GetD42Value: Float; virtual;
+    procedure SetD42Value(const aValue: Float); virtual;
+    function GetD42IsNull: Boolean; virtual;
+    procedure SetD42IsNull(const aValue: Boolean); virtual;
+    function GetD44Value: Float; virtual;
+    procedure SetD44Value(const aValue: Float); virtual;
+    function GetD44IsNull: Boolean; virtual;
+    procedure SetD44IsNull(const aValue: Boolean); virtual;
+    function GetD46Value: Float; virtual;
+    procedure SetD46Value(const aValue: Float); virtual;
+    function GetD46IsNull: Boolean; virtual;
+    procedure SetD46IsNull(const aValue: Boolean); virtual;
+    function GetD48Value: Float; virtual;
+    procedure SetD48Value(const aValue: Float); virtual;
+    function GetD48IsNull: Boolean; virtual;
+    procedure SetD48IsNull(const aValue: Boolean); virtual;
+    function GetDTValue: Float; virtual;
+    procedure SetDTValue(const aValue: Float); virtual;
+    function GetDTIsNull: Boolean; virtual;
+    procedure SetDTIsNull(const aValue: Boolean); virtual;
+
+    { Properties }
+    property CENTRO: String read GetCENTROValue write SetCENTROValue;
+    property CENTROIsNull: Boolean read GetCENTROIsNull write SetCENTROIsNull;
+    property FILIAL: String read GetFILIALValue write SetFILIALValue;
+    property FILIALIsNull: Boolean read GetFILIALIsNull write SetFILIALIsNull;
+    property CODIGO: String read GetCODIGOValue write SetCODIGOValue;
+    property CODIGOIsNull: Boolean read GetCODIGOIsNull write SetCODIGOIsNull;
+    property PRODUCTO: String read GetPRODUCTOValue write SetPRODUCTOValue;
+    property PRODUCTOIsNull: Boolean read GetPRODUCTOIsNull write SetPRODUCTOIsNull;
+    property COLOR: String read GetCOLORValue write SetCOLORValue;
+    property COLORIsNull: Boolean read GetCOLORIsNull write SetCOLORIsNull;
+    property TIPO_PRODUCTO: String read GetTIPO_PRODUCTOValue write SetTIPO_PRODUCTOValue;
+    property TIPO_PRODUCTOIsNull: Boolean read GetTIPO_PRODUCTOIsNull write SetTIPO_PRODUCTOIsNull;
+    property GRUPO_PRODUCTO: String read GetGRUPO_PRODUCTOValue write SetGRUPO_PRODUCTOValue;
+    property GRUPO_PRODUCTOIsNull: Boolean read GetGRUPO_PRODUCTOIsNull write SetGRUPO_PRODUCTOIsNull;
+    property COLECCION: String read GetCOLECCIONValue write SetCOLECCIONValue;
+    property COLECCIONIsNull: Boolean read GetCOLECCIONIsNull write SetCOLECCIONIsNull;
+    property I38: Float read GetI38Value write SetI38Value;
+    property I38IsNull: Boolean read GetI38IsNull write SetI38IsNull;
+    property I40: Float read GetI40Value write SetI40Value;
+    property I40IsNull: Boolean read GetI40IsNull write SetI40IsNull;
+    property I42: Float read GetI42Value write SetI42Value;
+    property I42IsNull: Boolean read GetI42IsNull write SetI42IsNull;
+    property I44: Float read GetI44Value write SetI44Value;
+    property I44IsNull: Boolean read GetI44IsNull write SetI44IsNull;
+    property I46: Float read GetI46Value write SetI46Value;
+    property I46IsNull: Boolean read GetI46IsNull write SetI46IsNull;
+    property I48: Float read GetI48Value write SetI48Value;
+    property I48IsNull: Boolean read GetI48IsNull write SetI48IsNull;
+    property TI: Float read GetTIValue write SetTIValue;
+    property TIIsNull: Boolean read GetTIIsNull write SetTIIsNull;
+    property K38: Float read GetK38Value write SetK38Value;
+    property K38IsNull: Boolean read GetK38IsNull write SetK38IsNull;
+    property K40: Float read GetK40Value write SetK40Value;
+    property K40IsNull: Boolean read GetK40IsNull write SetK40IsNull;
+    property K42: Float read GetK42Value write SetK42Value;
+    property K42IsNull: Boolean read GetK42IsNull write SetK42IsNull;
+    property K44: Float read GetK44Value write SetK44Value;
+    property K44IsNull: Boolean read GetK44IsNull write SetK44IsNull;
+    property K46: Float read GetK46Value write SetK46Value;
+    property K46IsNull: Boolean read GetK46IsNull write SetK46IsNull;
+    property K48: Float read GetK48Value write SetK48Value;
+    property K48IsNull: Boolean read GetK48IsNull write SetK48IsNull;
+    property TK: Float read GetTKValue write SetTKValue;
+    property TKIsNull: Boolean read GetTKIsNull write SetTKIsNull;
+    property D38: Float read GetD38Value write SetD38Value;
+    property D38IsNull: Boolean read GetD38IsNull write SetD38IsNull;
+    property D40: Float read GetD40Value write SetD40Value;
+    property D40IsNull: Boolean read GetD40IsNull write SetD40IsNull;
+    property D42: Float read GetD42Value write SetD42Value;
+    property D42IsNull: Boolean read GetD42IsNull write SetD42IsNull;
+    property D44: Float read GetD44Value write SetD44Value;
+    property D44IsNull: Boolean read GetD44IsNull write SetD44IsNull;
+    property D46: Float read GetD46Value write SetD46Value;
+    property D46IsNull: Boolean read GetD46IsNull write SetD46IsNull;
+    property D48: Float read GetD48Value write SetD48Value;
+    property D48IsNull: Boolean read GetD48IsNull write SetD48IsNull;
+    property DT: Float read GetDTValue write SetDTValue;
+    property DTIsNull: Boolean read GetDTIsNull write SetDTIsNull;
+
+  public
+    constructor Create(aDataTable: TDADataTable); override;
+    destructor Destroy; override;
+
+  end;
+
   { IStockEDIInventario }
   IStockEDIInventario = interface(IDAStronglyTypedDataTable)
-  ['{82E00C37-44A9-4184-9514-510BDA32EAC6}']
+  ['{C36A0A74-F861-424B-842B-C5B736A879E3}']
     { Property getters and setters }
     function GetCENTROValue: String;
     procedure SetCENTROValue(const aValue: String);
@@ -2535,6 +2970,627 @@ begin
 end;
 
 
+{ TStockEDIInventario2DataTableRules }
+constructor TStockEDIInventario2DataTableRules.Create(aDataTable: TDADataTable);
+begin
+  inherited;
+end;
+
+destructor TStockEDIInventario2DataTableRules.Destroy;
+begin
+  inherited;
+end;
+
+function TStockEDIInventario2DataTableRules.GetCENTROValue: String;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2CENTRO].AsString;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetCENTROValue(const aValue: String);
+begin
+  DataTable.Fields[idx_StockEDIInventario2CENTRO].AsString := aValue;
+end;
+
+function TStockEDIInventario2DataTableRules.GetCENTROIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2CENTRO].IsNull;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetCENTROIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_StockEDIInventario2CENTRO].AsVariant := Null;
+end;
+
+function TStockEDIInventario2DataTableRules.GetFILIALValue: String;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2FILIAL].AsString;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetFILIALValue(const aValue: String);
+begin
+  DataTable.Fields[idx_StockEDIInventario2FILIAL].AsString := aValue;
+end;
+
+function TStockEDIInventario2DataTableRules.GetFILIALIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2FILIAL].IsNull;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetFILIALIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_StockEDIInventario2FILIAL].AsVariant := Null;
+end;
+
+function TStockEDIInventario2DataTableRules.GetCODIGOValue: String;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2CODIGO].AsString;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetCODIGOValue(const aValue: String);
+begin
+  DataTable.Fields[idx_StockEDIInventario2CODIGO].AsString := aValue;
+end;
+
+function TStockEDIInventario2DataTableRules.GetCODIGOIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2CODIGO].IsNull;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetCODIGOIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_StockEDIInventario2CODIGO].AsVariant := Null;
+end;
+
+function TStockEDIInventario2DataTableRules.GetPRODUCTOValue: String;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2PRODUCTO].AsString;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetPRODUCTOValue(const aValue: String);
+begin
+  DataTable.Fields[idx_StockEDIInventario2PRODUCTO].AsString := aValue;
+end;
+
+function TStockEDIInventario2DataTableRules.GetPRODUCTOIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2PRODUCTO].IsNull;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetPRODUCTOIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_StockEDIInventario2PRODUCTO].AsVariant := Null;
+end;
+
+function TStockEDIInventario2DataTableRules.GetCOLORValue: String;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2COLOR].AsString;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetCOLORValue(const aValue: String);
+begin
+  DataTable.Fields[idx_StockEDIInventario2COLOR].AsString := aValue;
+end;
+
+function TStockEDIInventario2DataTableRules.GetCOLORIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2COLOR].IsNull;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetCOLORIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_StockEDIInventario2COLOR].AsVariant := Null;
+end;
+
+function TStockEDIInventario2DataTableRules.GetTIPO_PRODUCTOValue: String;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2TIPO_PRODUCTO].AsString;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetTIPO_PRODUCTOValue(const aValue: String);
+begin
+  DataTable.Fields[idx_StockEDIInventario2TIPO_PRODUCTO].AsString := aValue;
+end;
+
+function TStockEDIInventario2DataTableRules.GetTIPO_PRODUCTOIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2TIPO_PRODUCTO].IsNull;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetTIPO_PRODUCTOIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_StockEDIInventario2TIPO_PRODUCTO].AsVariant := Null;
+end;
+
+function TStockEDIInventario2DataTableRules.GetGRUPO_PRODUCTOValue: String;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2GRUPO_PRODUCTO].AsString;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetGRUPO_PRODUCTOValue(const aValue: String);
+begin
+  DataTable.Fields[idx_StockEDIInventario2GRUPO_PRODUCTO].AsString := aValue;
+end;
+
+function TStockEDIInventario2DataTableRules.GetGRUPO_PRODUCTOIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2GRUPO_PRODUCTO].IsNull;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetGRUPO_PRODUCTOIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_StockEDIInventario2GRUPO_PRODUCTO].AsVariant := Null;
+end;
+
+function TStockEDIInventario2DataTableRules.GetCOLECCIONValue: String;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2COLECCION].AsString;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetCOLECCIONValue(const aValue: String);
+begin
+  DataTable.Fields[idx_StockEDIInventario2COLECCION].AsString := aValue;
+end;
+
+function TStockEDIInventario2DataTableRules.GetCOLECCIONIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2COLECCION].IsNull;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetCOLECCIONIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_StockEDIInventario2COLECCION].AsVariant := Null;
+end;
+
+function TStockEDIInventario2DataTableRules.GetI38Value: Float;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2I38].AsFloat;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetI38Value(const aValue: Float);
+begin
+  DataTable.Fields[idx_StockEDIInventario2I38].AsFloat := aValue;
+end;
+
+function TStockEDIInventario2DataTableRules.GetI38IsNull: boolean;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2I38].IsNull;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetI38IsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_StockEDIInventario2I38].AsVariant := Null;
+end;
+
+function TStockEDIInventario2DataTableRules.GetI40Value: Float;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2I40].AsFloat;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetI40Value(const aValue: Float);
+begin
+  DataTable.Fields[idx_StockEDIInventario2I40].AsFloat := aValue;
+end;
+
+function TStockEDIInventario2DataTableRules.GetI40IsNull: boolean;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2I40].IsNull;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetI40IsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_StockEDIInventario2I40].AsVariant := Null;
+end;
+
+function TStockEDIInventario2DataTableRules.GetI42Value: Float;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2I42].AsFloat;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetI42Value(const aValue: Float);
+begin
+  DataTable.Fields[idx_StockEDIInventario2I42].AsFloat := aValue;
+end;
+
+function TStockEDIInventario2DataTableRules.GetI42IsNull: boolean;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2I42].IsNull;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetI42IsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_StockEDIInventario2I42].AsVariant := Null;
+end;
+
+function TStockEDIInventario2DataTableRules.GetI44Value: Float;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2I44].AsFloat;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetI44Value(const aValue: Float);
+begin
+  DataTable.Fields[idx_StockEDIInventario2I44].AsFloat := aValue;
+end;
+
+function TStockEDIInventario2DataTableRules.GetI44IsNull: boolean;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2I44].IsNull;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetI44IsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_StockEDIInventario2I44].AsVariant := Null;
+end;
+
+function TStockEDIInventario2DataTableRules.GetI46Value: Float;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2I46].AsFloat;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetI46Value(const aValue: Float);
+begin
+  DataTable.Fields[idx_StockEDIInventario2I46].AsFloat := aValue;
+end;
+
+function TStockEDIInventario2DataTableRules.GetI46IsNull: boolean;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2I46].IsNull;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetI46IsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_StockEDIInventario2I46].AsVariant := Null;
+end;
+
+function TStockEDIInventario2DataTableRules.GetI48Value: Float;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2I48].AsFloat;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetI48Value(const aValue: Float);
+begin
+  DataTable.Fields[idx_StockEDIInventario2I48].AsFloat := aValue;
+end;
+
+function TStockEDIInventario2DataTableRules.GetI48IsNull: boolean;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2I48].IsNull;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetI48IsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_StockEDIInventario2I48].AsVariant := Null;
+end;
+
+function TStockEDIInventario2DataTableRules.GetTIValue: Float;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2TI].AsFloat;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetTIValue(const aValue: Float);
+begin
+  DataTable.Fields[idx_StockEDIInventario2TI].AsFloat := aValue;
+end;
+
+function TStockEDIInventario2DataTableRules.GetTIIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2TI].IsNull;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetTIIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_StockEDIInventario2TI].AsVariant := Null;
+end;
+
+function TStockEDIInventario2DataTableRules.GetK38Value: Float;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2K38].AsFloat;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetK38Value(const aValue: Float);
+begin
+  DataTable.Fields[idx_StockEDIInventario2K38].AsFloat := aValue;
+end;
+
+function TStockEDIInventario2DataTableRules.GetK38IsNull: boolean;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2K38].IsNull;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetK38IsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_StockEDIInventario2K38].AsVariant := Null;
+end;
+
+function TStockEDIInventario2DataTableRules.GetK40Value: Float;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2K40].AsFloat;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetK40Value(const aValue: Float);
+begin
+  DataTable.Fields[idx_StockEDIInventario2K40].AsFloat := aValue;
+end;
+
+function TStockEDIInventario2DataTableRules.GetK40IsNull: boolean;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2K40].IsNull;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetK40IsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_StockEDIInventario2K40].AsVariant := Null;
+end;
+
+function TStockEDIInventario2DataTableRules.GetK42Value: Float;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2K42].AsFloat;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetK42Value(const aValue: Float);
+begin
+  DataTable.Fields[idx_StockEDIInventario2K42].AsFloat := aValue;
+end;
+
+function TStockEDIInventario2DataTableRules.GetK42IsNull: boolean;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2K42].IsNull;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetK42IsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_StockEDIInventario2K42].AsVariant := Null;
+end;
+
+function TStockEDIInventario2DataTableRules.GetK44Value: Float;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2K44].AsFloat;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetK44Value(const aValue: Float);
+begin
+  DataTable.Fields[idx_StockEDIInventario2K44].AsFloat := aValue;
+end;
+
+function TStockEDIInventario2DataTableRules.GetK44IsNull: boolean;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2K44].IsNull;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetK44IsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_StockEDIInventario2K44].AsVariant := Null;
+end;
+
+function TStockEDIInventario2DataTableRules.GetK46Value: Float;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2K46].AsFloat;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetK46Value(const aValue: Float);
+begin
+  DataTable.Fields[idx_StockEDIInventario2K46].AsFloat := aValue;
+end;
+
+function TStockEDIInventario2DataTableRules.GetK46IsNull: boolean;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2K46].IsNull;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetK46IsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_StockEDIInventario2K46].AsVariant := Null;
+end;
+
+function TStockEDIInventario2DataTableRules.GetK48Value: Float;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2K48].AsFloat;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetK48Value(const aValue: Float);
+begin
+  DataTable.Fields[idx_StockEDIInventario2K48].AsFloat := aValue;
+end;
+
+function TStockEDIInventario2DataTableRules.GetK48IsNull: boolean;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2K48].IsNull;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetK48IsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_StockEDIInventario2K48].AsVariant := Null;
+end;
+
+function TStockEDIInventario2DataTableRules.GetTKValue: Float;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2TK].AsFloat;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetTKValue(const aValue: Float);
+begin
+  DataTable.Fields[idx_StockEDIInventario2TK].AsFloat := aValue;
+end;
+
+function TStockEDIInventario2DataTableRules.GetTKIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2TK].IsNull;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetTKIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_StockEDIInventario2TK].AsVariant := Null;
+end;
+
+function TStockEDIInventario2DataTableRules.GetD38Value: Float;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2D38].AsFloat;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetD38Value(const aValue: Float);
+begin
+  DataTable.Fields[idx_StockEDIInventario2D38].AsFloat := aValue;
+end;
+
+function TStockEDIInventario2DataTableRules.GetD38IsNull: boolean;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2D38].IsNull;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetD38IsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_StockEDIInventario2D38].AsVariant := Null;
+end;
+
+function TStockEDIInventario2DataTableRules.GetD40Value: Float;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2D40].AsFloat;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetD40Value(const aValue: Float);
+begin
+  DataTable.Fields[idx_StockEDIInventario2D40].AsFloat := aValue;
+end;
+
+function TStockEDIInventario2DataTableRules.GetD40IsNull: boolean;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2D40].IsNull;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetD40IsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_StockEDIInventario2D40].AsVariant := Null;
+end;
+
+function TStockEDIInventario2DataTableRules.GetD42Value: Float;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2D42].AsFloat;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetD42Value(const aValue: Float);
+begin
+  DataTable.Fields[idx_StockEDIInventario2D42].AsFloat := aValue;
+end;
+
+function TStockEDIInventario2DataTableRules.GetD42IsNull: boolean;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2D42].IsNull;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetD42IsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_StockEDIInventario2D42].AsVariant := Null;
+end;
+
+function TStockEDIInventario2DataTableRules.GetD44Value: Float;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2D44].AsFloat;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetD44Value(const aValue: Float);
+begin
+  DataTable.Fields[idx_StockEDIInventario2D44].AsFloat := aValue;
+end;
+
+function TStockEDIInventario2DataTableRules.GetD44IsNull: boolean;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2D44].IsNull;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetD44IsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_StockEDIInventario2D44].AsVariant := Null;
+end;
+
+function TStockEDIInventario2DataTableRules.GetD46Value: Float;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2D46].AsFloat;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetD46Value(const aValue: Float);
+begin
+  DataTable.Fields[idx_StockEDIInventario2D46].AsFloat := aValue;
+end;
+
+function TStockEDIInventario2DataTableRules.GetD46IsNull: boolean;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2D46].IsNull;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetD46IsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_StockEDIInventario2D46].AsVariant := Null;
+end;
+
+function TStockEDIInventario2DataTableRules.GetD48Value: Float;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2D48].AsFloat;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetD48Value(const aValue: Float);
+begin
+  DataTable.Fields[idx_StockEDIInventario2D48].AsFloat := aValue;
+end;
+
+function TStockEDIInventario2DataTableRules.GetD48IsNull: boolean;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2D48].IsNull;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetD48IsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_StockEDIInventario2D48].AsVariant := Null;
+end;
+
+function TStockEDIInventario2DataTableRules.GetDTValue: Float;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2DT].AsFloat;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetDTValue(const aValue: Float);
+begin
+  DataTable.Fields[idx_StockEDIInventario2DT].AsFloat := aValue;
+end;
+
+function TStockEDIInventario2DataTableRules.GetDTIsNull: boolean;
+begin
+  result := DataTable.Fields[idx_StockEDIInventario2DT].IsNull;
+end;
+
+procedure TStockEDIInventario2DataTableRules.SetDTIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    DataTable.Fields[idx_StockEDIInventario2DT].AsVariant := Null;
+end;
+
+
 { TStockEDIInventarioDataTableRules }
 constructor TStockEDIInventarioDataTableRules.Create(aDataTable: TDADataTable);
 begin
@@ -3160,6 +4216,7 @@ initialization
   RegisterDataTableRules(RID_StockPrendasCentros, TStockPrendasCentrosDataTableRules);
   RegisterDataTableRules(RID_StockEDI, TStockEDIDataTableRules);
   RegisterDataTableRules(RID_StockVARELA, TStockVARELADataTableRules);
+  RegisterDataTableRules(RID_StockEDIInventario2, TStockEDIInventario2DataTableRules);
   RegisterDataTableRules(RID_StockEDIInventario, TStockEDIInventarioDataTableRules);
 
 end.
diff --git a/Source/Modulos/Stock/Reglas/schStockServer_Intf.pas b/Source/Modulos/Stock/Reglas/schStockServer_Intf.pas
index 80589f2..3c59933 100644
--- a/Source/Modulos/Stock/Reglas/schStockServer_Intf.pas
+++ b/Source/Modulos/Stock/Reglas/schStockServer_Intf.pas
@@ -9,15 +9,16 @@ 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_StockPrendasCentrosDelta = '{94925BB7-FFD2-475A-A052-E01FC8FC1395}';
-  RID_StockEDIDelta = '{DDCD4C21-842E-4BDF-8C1A-02A88AFC71A0}';
-  RID_StockVARELADelta = '{4450D642-A9B5-48E4-8D11-D7950511CBA8}';
-  RID_StockEDIInventarioDelta = '{4800774F-6C4A-4699-94ED-9BCAA7E34704}';
+  RID_StockPrendasCentrosDelta = '{2476F86D-B208-4B1A-AA95-6030CAE36358}';
+  RID_StockEDIDelta = '{BED82601-A705-4D03-B69F-5FD5869D53C3}';
+  RID_StockVARELADelta = '{BD23D312-D161-4618-B40A-D04C1B3BA517}';
+  RID_StockEDIInventario2Delta = '{A5CF6999-D054-4BE3-B0E9-9BD78F6E8366}';
+  RID_StockEDIInventarioDelta = '{FE54E63F-0508-4E10-95DF-76550B8A5B50}';
 
 type
   { IStockPrendasCentrosDelta }
   IStockPrendasCentrosDelta = interface(IStockPrendasCentros)
-  ['{94925BB7-FFD2-475A-A052-E01FC8FC1395}']
+  ['{2476F86D-B208-4B1A-AA95-6030CAE36358}']
     { Property getters and setters }
     function GetOldCODIGOValue : String;
     function GetOldPRODUCTOValue : String;
@@ -195,7 +196,7 @@ type
 
   { IStockEDIDelta }
   IStockEDIDelta = interface(IStockEDI)
-  ['{DDCD4C21-842E-4BDF-8C1A-02A88AFC71A0}']
+  ['{BED82601-A705-4D03-B69F-5FD5869D53C3}']
     { Property getters and setters }
     function GetOldCENTROValue : String;
     function GetOldFILIALValue : String;
@@ -565,7 +566,7 @@ type
 
   { IStockVARELADelta }
   IStockVARELADelta = interface(IStockVARELA)
-  ['{4450D642-A9B5-48E4-8D11-D7950511CBA8}']
+  ['{BD23D312-D161-4618-B40A-D04C1B3BA517}']
     { Property getters and setters }
     function GetOldFILIALValue : String;
     function GetOldCODIGOValue : String;
@@ -753,9 +754,379 @@ type
 
   end;
 
+  { IStockEDIInventario2Delta }
+  IStockEDIInventario2Delta = interface(IStockEDIInventario2)
+  ['{A5CF6999-D054-4BE3-B0E9-9BD78F6E8366}']
+    { Property getters and setters }
+    function GetOldCENTROValue : String;
+    function GetOldFILIALValue : String;
+    function GetOldCODIGOValue : String;
+    function GetOldPRODUCTOValue : String;
+    function GetOldCOLORValue : String;
+    function GetOldTIPO_PRODUCTOValue : String;
+    function GetOldGRUPO_PRODUCTOValue : String;
+    function GetOldCOLECCIONValue : String;
+    function GetOldI38Value : Float;
+    function GetOldI40Value : Float;
+    function GetOldI42Value : Float;
+    function GetOldI44Value : Float;
+    function GetOldI46Value : Float;
+    function GetOldI48Value : Float;
+    function GetOldTIValue : Float;
+    function GetOldK38Value : Float;
+    function GetOldK40Value : Float;
+    function GetOldK42Value : Float;
+    function GetOldK44Value : Float;
+    function GetOldK46Value : Float;
+    function GetOldK48Value : Float;
+    function GetOldTKValue : Float;
+    function GetOldD38Value : Float;
+    function GetOldD40Value : Float;
+    function GetOldD42Value : Float;
+    function GetOldD44Value : Float;
+    function GetOldD46Value : Float;
+    function GetOldD48Value : Float;
+    function GetOldDTValue : Float;
+
+    { Properties }
+    property OldCENTRO : String read GetOldCENTROValue;
+    property OldFILIAL : String read GetOldFILIALValue;
+    property OldCODIGO : String read GetOldCODIGOValue;
+    property OldPRODUCTO : String read GetOldPRODUCTOValue;
+    property OldCOLOR : String read GetOldCOLORValue;
+    property OldTIPO_PRODUCTO : String read GetOldTIPO_PRODUCTOValue;
+    property OldGRUPO_PRODUCTO : String read GetOldGRUPO_PRODUCTOValue;
+    property OldCOLECCION : String read GetOldCOLECCIONValue;
+    property OldI38 : Float read GetOldI38Value;
+    property OldI40 : Float read GetOldI40Value;
+    property OldI42 : Float read GetOldI42Value;
+    property OldI44 : Float read GetOldI44Value;
+    property OldI46 : Float read GetOldI46Value;
+    property OldI48 : Float read GetOldI48Value;
+    property OldTI : Float read GetOldTIValue;
+    property OldK38 : Float read GetOldK38Value;
+    property OldK40 : Float read GetOldK40Value;
+    property OldK42 : Float read GetOldK42Value;
+    property OldK44 : Float read GetOldK44Value;
+    property OldK46 : Float read GetOldK46Value;
+    property OldK48 : Float read GetOldK48Value;
+    property OldTK : Float read GetOldTKValue;
+    property OldD38 : Float read GetOldD38Value;
+    property OldD40 : Float read GetOldD40Value;
+    property OldD42 : Float read GetOldD42Value;
+    property OldD44 : Float read GetOldD44Value;
+    property OldD46 : Float read GetOldD46Value;
+    property OldD48 : Float read GetOldD48Value;
+    property OldDT : Float read GetOldDTValue;
+  end;
+
+  { TStockEDIInventario2BusinessProcessorRules }
+  TStockEDIInventario2BusinessProcessorRules = class(TDABusinessProcessorRules, IStockEDIInventario2, IStockEDIInventario2Delta)
+  private
+  protected
+    { Property getters and setters }
+    function GetCENTROValue: String; virtual;
+    function GetCENTROIsNull: Boolean; virtual;
+    function GetOldCENTROValue: String; virtual;
+    function GetOldCENTROIsNull: Boolean; virtual;
+    procedure SetCENTROValue(const aValue: String); virtual;
+    procedure SetCENTROIsNull(const aValue: Boolean); virtual;
+    function GetFILIALValue: String; virtual;
+    function GetFILIALIsNull: Boolean; virtual;
+    function GetOldFILIALValue: String; virtual;
+    function GetOldFILIALIsNull: Boolean; virtual;
+    procedure SetFILIALValue(const aValue: String); virtual;
+    procedure SetFILIALIsNull(const aValue: Boolean); virtual;
+    function GetCODIGOValue: String; virtual;
+    function GetCODIGOIsNull: Boolean; virtual;
+    function GetOldCODIGOValue: String; virtual;
+    function GetOldCODIGOIsNull: Boolean; virtual;
+    procedure SetCODIGOValue(const aValue: String); virtual;
+    procedure SetCODIGOIsNull(const aValue: Boolean); virtual;
+    function GetPRODUCTOValue: String; virtual;
+    function GetPRODUCTOIsNull: Boolean; virtual;
+    function GetOldPRODUCTOValue: String; virtual;
+    function GetOldPRODUCTOIsNull: Boolean; virtual;
+    procedure SetPRODUCTOValue(const aValue: String); virtual;
+    procedure SetPRODUCTOIsNull(const aValue: Boolean); virtual;
+    function GetCOLORValue: String; virtual;
+    function GetCOLORIsNull: Boolean; virtual;
+    function GetOldCOLORValue: String; virtual;
+    function GetOldCOLORIsNull: Boolean; virtual;
+    procedure SetCOLORValue(const aValue: String); virtual;
+    procedure SetCOLORIsNull(const aValue: Boolean); virtual;
+    function GetTIPO_PRODUCTOValue: String; virtual;
+    function GetTIPO_PRODUCTOIsNull: Boolean; virtual;
+    function GetOldTIPO_PRODUCTOValue: String; virtual;
+    function GetOldTIPO_PRODUCTOIsNull: Boolean; virtual;
+    procedure SetTIPO_PRODUCTOValue(const aValue: String); virtual;
+    procedure SetTIPO_PRODUCTOIsNull(const aValue: Boolean); virtual;
+    function GetGRUPO_PRODUCTOValue: String; virtual;
+    function GetGRUPO_PRODUCTOIsNull: Boolean; virtual;
+    function GetOldGRUPO_PRODUCTOValue: String; virtual;
+    function GetOldGRUPO_PRODUCTOIsNull: Boolean; virtual;
+    procedure SetGRUPO_PRODUCTOValue(const aValue: String); virtual;
+    procedure SetGRUPO_PRODUCTOIsNull(const aValue: Boolean); virtual;
+    function GetCOLECCIONValue: String; virtual;
+    function GetCOLECCIONIsNull: Boolean; virtual;
+    function GetOldCOLECCIONValue: String; virtual;
+    function GetOldCOLECCIONIsNull: Boolean; virtual;
+    procedure SetCOLECCIONValue(const aValue: String); virtual;
+    procedure SetCOLECCIONIsNull(const aValue: Boolean); virtual;
+    function GetI38Value: Float; virtual;
+    function GetI38IsNull: Boolean; virtual;
+    function GetOldI38Value: Float; virtual;
+    function GetOldI38IsNull: Boolean; virtual;
+    procedure SetI38Value(const aValue: Float); virtual;
+    procedure SetI38IsNull(const aValue: Boolean); virtual;
+    function GetI40Value: Float; virtual;
+    function GetI40IsNull: Boolean; virtual;
+    function GetOldI40Value: Float; virtual;
+    function GetOldI40IsNull: Boolean; virtual;
+    procedure SetI40Value(const aValue: Float); virtual;
+    procedure SetI40IsNull(const aValue: Boolean); virtual;
+    function GetI42Value: Float; virtual;
+    function GetI42IsNull: Boolean; virtual;
+    function GetOldI42Value: Float; virtual;
+    function GetOldI42IsNull: Boolean; virtual;
+    procedure SetI42Value(const aValue: Float); virtual;
+    procedure SetI42IsNull(const aValue: Boolean); virtual;
+    function GetI44Value: Float; virtual;
+    function GetI44IsNull: Boolean; virtual;
+    function GetOldI44Value: Float; virtual;
+    function GetOldI44IsNull: Boolean; virtual;
+    procedure SetI44Value(const aValue: Float); virtual;
+    procedure SetI44IsNull(const aValue: Boolean); virtual;
+    function GetI46Value: Float; virtual;
+    function GetI46IsNull: Boolean; virtual;
+    function GetOldI46Value: Float; virtual;
+    function GetOldI46IsNull: Boolean; virtual;
+    procedure SetI46Value(const aValue: Float); virtual;
+    procedure SetI46IsNull(const aValue: Boolean); virtual;
+    function GetI48Value: Float; virtual;
+    function GetI48IsNull: Boolean; virtual;
+    function GetOldI48Value: Float; virtual;
+    function GetOldI48IsNull: Boolean; virtual;
+    procedure SetI48Value(const aValue: Float); virtual;
+    procedure SetI48IsNull(const aValue: Boolean); virtual;
+    function GetTIValue: Float; virtual;
+    function GetTIIsNull: Boolean; virtual;
+    function GetOldTIValue: Float; virtual;
+    function GetOldTIIsNull: Boolean; virtual;
+    procedure SetTIValue(const aValue: Float); virtual;
+    procedure SetTIIsNull(const aValue: Boolean); virtual;
+    function GetK38Value: Float; virtual;
+    function GetK38IsNull: Boolean; virtual;
+    function GetOldK38Value: Float; virtual;
+    function GetOldK38IsNull: Boolean; virtual;
+    procedure SetK38Value(const aValue: Float); virtual;
+    procedure SetK38IsNull(const aValue: Boolean); virtual;
+    function GetK40Value: Float; virtual;
+    function GetK40IsNull: Boolean; virtual;
+    function GetOldK40Value: Float; virtual;
+    function GetOldK40IsNull: Boolean; virtual;
+    procedure SetK40Value(const aValue: Float); virtual;
+    procedure SetK40IsNull(const aValue: Boolean); virtual;
+    function GetK42Value: Float; virtual;
+    function GetK42IsNull: Boolean; virtual;
+    function GetOldK42Value: Float; virtual;
+    function GetOldK42IsNull: Boolean; virtual;
+    procedure SetK42Value(const aValue: Float); virtual;
+    procedure SetK42IsNull(const aValue: Boolean); virtual;
+    function GetK44Value: Float; virtual;
+    function GetK44IsNull: Boolean; virtual;
+    function GetOldK44Value: Float; virtual;
+    function GetOldK44IsNull: Boolean; virtual;
+    procedure SetK44Value(const aValue: Float); virtual;
+    procedure SetK44IsNull(const aValue: Boolean); virtual;
+    function GetK46Value: Float; virtual;
+    function GetK46IsNull: Boolean; virtual;
+    function GetOldK46Value: Float; virtual;
+    function GetOldK46IsNull: Boolean; virtual;
+    procedure SetK46Value(const aValue: Float); virtual;
+    procedure SetK46IsNull(const aValue: Boolean); virtual;
+    function GetK48Value: Float; virtual;
+    function GetK48IsNull: Boolean; virtual;
+    function GetOldK48Value: Float; virtual;
+    function GetOldK48IsNull: Boolean; virtual;
+    procedure SetK48Value(const aValue: Float); virtual;
+    procedure SetK48IsNull(const aValue: Boolean); virtual;
+    function GetTKValue: Float; virtual;
+    function GetTKIsNull: Boolean; virtual;
+    function GetOldTKValue: Float; virtual;
+    function GetOldTKIsNull: Boolean; virtual;
+    procedure SetTKValue(const aValue: Float); virtual;
+    procedure SetTKIsNull(const aValue: Boolean); virtual;
+    function GetD38Value: Float; virtual;
+    function GetD38IsNull: Boolean; virtual;
+    function GetOldD38Value: Float; virtual;
+    function GetOldD38IsNull: Boolean; virtual;
+    procedure SetD38Value(const aValue: Float); virtual;
+    procedure SetD38IsNull(const aValue: Boolean); virtual;
+    function GetD40Value: Float; virtual;
+    function GetD40IsNull: Boolean; virtual;
+    function GetOldD40Value: Float; virtual;
+    function GetOldD40IsNull: Boolean; virtual;
+    procedure SetD40Value(const aValue: Float); virtual;
+    procedure SetD40IsNull(const aValue: Boolean); virtual;
+    function GetD42Value: Float; virtual;
+    function GetD42IsNull: Boolean; virtual;
+    function GetOldD42Value: Float; virtual;
+    function GetOldD42IsNull: Boolean; virtual;
+    procedure SetD42Value(const aValue: Float); virtual;
+    procedure SetD42IsNull(const aValue: Boolean); virtual;
+    function GetD44Value: Float; virtual;
+    function GetD44IsNull: Boolean; virtual;
+    function GetOldD44Value: Float; virtual;
+    function GetOldD44IsNull: Boolean; virtual;
+    procedure SetD44Value(const aValue: Float); virtual;
+    procedure SetD44IsNull(const aValue: Boolean); virtual;
+    function GetD46Value: Float; virtual;
+    function GetD46IsNull: Boolean; virtual;
+    function GetOldD46Value: Float; virtual;
+    function GetOldD46IsNull: Boolean; virtual;
+    procedure SetD46Value(const aValue: Float); virtual;
+    procedure SetD46IsNull(const aValue: Boolean); virtual;
+    function GetD48Value: Float; virtual;
+    function GetD48IsNull: Boolean; virtual;
+    function GetOldD48Value: Float; virtual;
+    function GetOldD48IsNull: Boolean; virtual;
+    procedure SetD48Value(const aValue: Float); virtual;
+    procedure SetD48IsNull(const aValue: Boolean); virtual;
+    function GetDTValue: Float; virtual;
+    function GetDTIsNull: Boolean; virtual;
+    function GetOldDTValue: Float; virtual;
+    function GetOldDTIsNull: Boolean; virtual;
+    procedure SetDTValue(const aValue: Float); virtual;
+    procedure SetDTIsNull(const aValue: Boolean); virtual;
+
+    { Properties }
+    property CENTRO : String read GetCENTROValue write SetCENTROValue;
+    property CENTROIsNull : Boolean read GetCENTROIsNull write SetCENTROIsNull;
+    property OldCENTRO : String read GetOldCENTROValue;
+    property OldCENTROIsNull : Boolean read GetOldCENTROIsNull;
+    property FILIAL : String read GetFILIALValue write SetFILIALValue;
+    property FILIALIsNull : Boolean read GetFILIALIsNull write SetFILIALIsNull;
+    property OldFILIAL : String read GetOldFILIALValue;
+    property OldFILIALIsNull : Boolean read GetOldFILIALIsNull;
+    property CODIGO : String read GetCODIGOValue write SetCODIGOValue;
+    property CODIGOIsNull : Boolean read GetCODIGOIsNull write SetCODIGOIsNull;
+    property OldCODIGO : String read GetOldCODIGOValue;
+    property OldCODIGOIsNull : Boolean read GetOldCODIGOIsNull;
+    property PRODUCTO : String read GetPRODUCTOValue write SetPRODUCTOValue;
+    property PRODUCTOIsNull : Boolean read GetPRODUCTOIsNull write SetPRODUCTOIsNull;
+    property OldPRODUCTO : String read GetOldPRODUCTOValue;
+    property OldPRODUCTOIsNull : Boolean read GetOldPRODUCTOIsNull;
+    property COLOR : String read GetCOLORValue write SetCOLORValue;
+    property COLORIsNull : Boolean read GetCOLORIsNull write SetCOLORIsNull;
+    property OldCOLOR : String read GetOldCOLORValue;
+    property OldCOLORIsNull : Boolean read GetOldCOLORIsNull;
+    property TIPO_PRODUCTO : String read GetTIPO_PRODUCTOValue write SetTIPO_PRODUCTOValue;
+    property TIPO_PRODUCTOIsNull : Boolean read GetTIPO_PRODUCTOIsNull write SetTIPO_PRODUCTOIsNull;
+    property OldTIPO_PRODUCTO : String read GetOldTIPO_PRODUCTOValue;
+    property OldTIPO_PRODUCTOIsNull : Boolean read GetOldTIPO_PRODUCTOIsNull;
+    property GRUPO_PRODUCTO : String read GetGRUPO_PRODUCTOValue write SetGRUPO_PRODUCTOValue;
+    property GRUPO_PRODUCTOIsNull : Boolean read GetGRUPO_PRODUCTOIsNull write SetGRUPO_PRODUCTOIsNull;
+    property OldGRUPO_PRODUCTO : String read GetOldGRUPO_PRODUCTOValue;
+    property OldGRUPO_PRODUCTOIsNull : Boolean read GetOldGRUPO_PRODUCTOIsNull;
+    property COLECCION : String read GetCOLECCIONValue write SetCOLECCIONValue;
+    property COLECCIONIsNull : Boolean read GetCOLECCIONIsNull write SetCOLECCIONIsNull;
+    property OldCOLECCION : String read GetOldCOLECCIONValue;
+    property OldCOLECCIONIsNull : Boolean read GetOldCOLECCIONIsNull;
+    property I38 : Float read GetI38Value write SetI38Value;
+    property I38IsNull : Boolean read GetI38IsNull write SetI38IsNull;
+    property OldI38 : Float read GetOldI38Value;
+    property OldI38IsNull : Boolean read GetOldI38IsNull;
+    property I40 : Float read GetI40Value write SetI40Value;
+    property I40IsNull : Boolean read GetI40IsNull write SetI40IsNull;
+    property OldI40 : Float read GetOldI40Value;
+    property OldI40IsNull : Boolean read GetOldI40IsNull;
+    property I42 : Float read GetI42Value write SetI42Value;
+    property I42IsNull : Boolean read GetI42IsNull write SetI42IsNull;
+    property OldI42 : Float read GetOldI42Value;
+    property OldI42IsNull : Boolean read GetOldI42IsNull;
+    property I44 : Float read GetI44Value write SetI44Value;
+    property I44IsNull : Boolean read GetI44IsNull write SetI44IsNull;
+    property OldI44 : Float read GetOldI44Value;
+    property OldI44IsNull : Boolean read GetOldI44IsNull;
+    property I46 : Float read GetI46Value write SetI46Value;
+    property I46IsNull : Boolean read GetI46IsNull write SetI46IsNull;
+    property OldI46 : Float read GetOldI46Value;
+    property OldI46IsNull : Boolean read GetOldI46IsNull;
+    property I48 : Float read GetI48Value write SetI48Value;
+    property I48IsNull : Boolean read GetI48IsNull write SetI48IsNull;
+    property OldI48 : Float read GetOldI48Value;
+    property OldI48IsNull : Boolean read GetOldI48IsNull;
+    property TI : Float read GetTIValue write SetTIValue;
+    property TIIsNull : Boolean read GetTIIsNull write SetTIIsNull;
+    property OldTI : Float read GetOldTIValue;
+    property OldTIIsNull : Boolean read GetOldTIIsNull;
+    property K38 : Float read GetK38Value write SetK38Value;
+    property K38IsNull : Boolean read GetK38IsNull write SetK38IsNull;
+    property OldK38 : Float read GetOldK38Value;
+    property OldK38IsNull : Boolean read GetOldK38IsNull;
+    property K40 : Float read GetK40Value write SetK40Value;
+    property K40IsNull : Boolean read GetK40IsNull write SetK40IsNull;
+    property OldK40 : Float read GetOldK40Value;
+    property OldK40IsNull : Boolean read GetOldK40IsNull;
+    property K42 : Float read GetK42Value write SetK42Value;
+    property K42IsNull : Boolean read GetK42IsNull write SetK42IsNull;
+    property OldK42 : Float read GetOldK42Value;
+    property OldK42IsNull : Boolean read GetOldK42IsNull;
+    property K44 : Float read GetK44Value write SetK44Value;
+    property K44IsNull : Boolean read GetK44IsNull write SetK44IsNull;
+    property OldK44 : Float read GetOldK44Value;
+    property OldK44IsNull : Boolean read GetOldK44IsNull;
+    property K46 : Float read GetK46Value write SetK46Value;
+    property K46IsNull : Boolean read GetK46IsNull write SetK46IsNull;
+    property OldK46 : Float read GetOldK46Value;
+    property OldK46IsNull : Boolean read GetOldK46IsNull;
+    property K48 : Float read GetK48Value write SetK48Value;
+    property K48IsNull : Boolean read GetK48IsNull write SetK48IsNull;
+    property OldK48 : Float read GetOldK48Value;
+    property OldK48IsNull : Boolean read GetOldK48IsNull;
+    property TK : Float read GetTKValue write SetTKValue;
+    property TKIsNull : Boolean read GetTKIsNull write SetTKIsNull;
+    property OldTK : Float read GetOldTKValue;
+    property OldTKIsNull : Boolean read GetOldTKIsNull;
+    property D38 : Float read GetD38Value write SetD38Value;
+    property D38IsNull : Boolean read GetD38IsNull write SetD38IsNull;
+    property OldD38 : Float read GetOldD38Value;
+    property OldD38IsNull : Boolean read GetOldD38IsNull;
+    property D40 : Float read GetD40Value write SetD40Value;
+    property D40IsNull : Boolean read GetD40IsNull write SetD40IsNull;
+    property OldD40 : Float read GetOldD40Value;
+    property OldD40IsNull : Boolean read GetOldD40IsNull;
+    property D42 : Float read GetD42Value write SetD42Value;
+    property D42IsNull : Boolean read GetD42IsNull write SetD42IsNull;
+    property OldD42 : Float read GetOldD42Value;
+    property OldD42IsNull : Boolean read GetOldD42IsNull;
+    property D44 : Float read GetD44Value write SetD44Value;
+    property D44IsNull : Boolean read GetD44IsNull write SetD44IsNull;
+    property OldD44 : Float read GetOldD44Value;
+    property OldD44IsNull : Boolean read GetOldD44IsNull;
+    property D46 : Float read GetD46Value write SetD46Value;
+    property D46IsNull : Boolean read GetD46IsNull write SetD46IsNull;
+    property OldD46 : Float read GetOldD46Value;
+    property OldD46IsNull : Boolean read GetOldD46IsNull;
+    property D48 : Float read GetD48Value write SetD48Value;
+    property D48IsNull : Boolean read GetD48IsNull write SetD48IsNull;
+    property OldD48 : Float read GetOldD48Value;
+    property OldD48IsNull : Boolean read GetOldD48IsNull;
+    property DT : Float read GetDTValue write SetDTValue;
+    property DTIsNull : Boolean read GetDTIsNull write SetDTIsNull;
+    property OldDT : Float read GetOldDTValue;
+    property OldDTIsNull : Boolean read GetOldDTIsNull;
+
+  public
+    constructor Create(aBusinessProcessor: TDABusinessProcessor); override;
+    destructor Destroy; override;
+
+  end;
+
   { IStockEDIInventarioDelta }
   IStockEDIInventarioDelta = interface(IStockEDIInventario)
-  ['{4800774F-6C4A-4699-94ED-9BCAA7E34704}']
+  ['{FE54E63F-0508-4E10-95DF-76550B8A5B50}']
     { Property getters and setters }
     function GetOldCENTROValue : String;
     function GetOldFILIALValue : String;
@@ -2900,6 +3271,917 @@ begin
 end;
 
 
+{ TStockEDIInventario2BusinessProcessorRules }
+constructor TStockEDIInventario2BusinessProcessorRules.Create(aBusinessProcessor: TDABusinessProcessor);
+begin
+  inherited;
+end;
+
+destructor TStockEDIInventario2BusinessProcessorRules.Destroy;
+begin
+  inherited;
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetCENTROValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2CENTRO];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetCENTROIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2CENTRO]);
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldCENTROValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2CENTRO];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldCENTROIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2CENTRO]);
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetCENTROValue(const aValue: String);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2CENTRO] := aValue;
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetCENTROIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2CENTRO] := Null;
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetFILIALValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2FILIAL];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetFILIALIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2FILIAL]);
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldFILIALValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2FILIAL];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldFILIALIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2FILIAL]);
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetFILIALValue(const aValue: String);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2FILIAL] := aValue;
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetFILIALIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2FILIAL] := Null;
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetCODIGOValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2CODIGO];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetCODIGOIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2CODIGO]);
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldCODIGOValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2CODIGO];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldCODIGOIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2CODIGO]);
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetCODIGOValue(const aValue: String);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2CODIGO] := aValue;
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetCODIGOIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2CODIGO] := Null;
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetPRODUCTOValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2PRODUCTO];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetPRODUCTOIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2PRODUCTO]);
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldPRODUCTOValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2PRODUCTO];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldPRODUCTOIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2PRODUCTO]);
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetPRODUCTOValue(const aValue: String);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2PRODUCTO] := aValue;
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetPRODUCTOIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2PRODUCTO] := Null;
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetCOLORValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2COLOR];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetCOLORIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2COLOR]);
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldCOLORValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2COLOR];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldCOLORIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2COLOR]);
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetCOLORValue(const aValue: String);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2COLOR] := aValue;
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetCOLORIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2COLOR] := Null;
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetTIPO_PRODUCTOValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2TIPO_PRODUCTO];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetTIPO_PRODUCTOIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2TIPO_PRODUCTO]);
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldTIPO_PRODUCTOValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2TIPO_PRODUCTO];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldTIPO_PRODUCTOIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2TIPO_PRODUCTO]);
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetTIPO_PRODUCTOValue(const aValue: String);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2TIPO_PRODUCTO] := aValue;
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetTIPO_PRODUCTOIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2TIPO_PRODUCTO] := Null;
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetGRUPO_PRODUCTOValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2GRUPO_PRODUCTO];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetGRUPO_PRODUCTOIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2GRUPO_PRODUCTO]);
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldGRUPO_PRODUCTOValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2GRUPO_PRODUCTO];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldGRUPO_PRODUCTOIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2GRUPO_PRODUCTO]);
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetGRUPO_PRODUCTOValue(const aValue: String);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2GRUPO_PRODUCTO] := aValue;
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetGRUPO_PRODUCTOIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2GRUPO_PRODUCTO] := Null;
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetCOLECCIONValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2COLECCION];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetCOLECCIONIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2COLECCION]);
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldCOLECCIONValue: String;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2COLECCION];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldCOLECCIONIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2COLECCION]);
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetCOLECCIONValue(const aValue: String);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2COLECCION] := aValue;
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetCOLECCIONIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2COLECCION] := Null;
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetI38Value: Float;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I38];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetI38IsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I38]);
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldI38Value: Float;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2I38];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldI38IsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2I38]);
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetI38Value(const aValue: Float);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I38] := aValue;
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetI38IsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I38] := Null;
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetI40Value: Float;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I40];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetI40IsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I40]);
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldI40Value: Float;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2I40];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldI40IsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2I40]);
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetI40Value(const aValue: Float);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I40] := aValue;
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetI40IsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I40] := Null;
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetI42Value: Float;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I42];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetI42IsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I42]);
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldI42Value: Float;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2I42];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldI42IsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2I42]);
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetI42Value(const aValue: Float);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I42] := aValue;
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetI42IsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I42] := Null;
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetI44Value: Float;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I44];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetI44IsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I44]);
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldI44Value: Float;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2I44];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldI44IsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2I44]);
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetI44Value(const aValue: Float);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I44] := aValue;
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetI44IsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I44] := Null;
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetI46Value: Float;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I46];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetI46IsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I46]);
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldI46Value: Float;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2I46];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldI46IsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2I46]);
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetI46Value(const aValue: Float);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I46] := aValue;
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetI46IsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I46] := Null;
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetI48Value: Float;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I48];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetI48IsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I48]);
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldI48Value: Float;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2I48];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldI48IsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2I48]);
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetI48Value(const aValue: Float);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I48] := aValue;
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetI48IsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2I48] := Null;
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetTIValue: Float;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2TI];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetTIIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2TI]);
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldTIValue: Float;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2TI];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldTIIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2TI]);
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetTIValue(const aValue: Float);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2TI] := aValue;
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetTIIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2TI] := Null;
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetK38Value: Float;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K38];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetK38IsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K38]);
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldK38Value: Float;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2K38];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldK38IsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2K38]);
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetK38Value(const aValue: Float);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K38] := aValue;
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetK38IsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K38] := Null;
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetK40Value: Float;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K40];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetK40IsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K40]);
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldK40Value: Float;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2K40];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldK40IsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2K40]);
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetK40Value(const aValue: Float);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K40] := aValue;
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetK40IsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K40] := Null;
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetK42Value: Float;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K42];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetK42IsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K42]);
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldK42Value: Float;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2K42];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldK42IsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2K42]);
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetK42Value(const aValue: Float);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K42] := aValue;
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetK42IsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K42] := Null;
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetK44Value: Float;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K44];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetK44IsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K44]);
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldK44Value: Float;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2K44];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldK44IsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2K44]);
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetK44Value(const aValue: Float);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K44] := aValue;
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetK44IsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K44] := Null;
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetK46Value: Float;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K46];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetK46IsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K46]);
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldK46Value: Float;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2K46];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldK46IsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2K46]);
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetK46Value(const aValue: Float);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K46] := aValue;
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetK46IsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K46] := Null;
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetK48Value: Float;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K48];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetK48IsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K48]);
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldK48Value: Float;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2K48];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldK48IsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2K48]);
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetK48Value(const aValue: Float);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K48] := aValue;
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetK48IsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2K48] := Null;
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetTKValue: Float;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2TK];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetTKIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2TK]);
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldTKValue: Float;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2TK];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldTKIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2TK]);
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetTKValue(const aValue: Float);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2TK] := aValue;
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetTKIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2TK] := Null;
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetD38Value: Float;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D38];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetD38IsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D38]);
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldD38Value: Float;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2D38];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldD38IsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2D38]);
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetD38Value(const aValue: Float);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D38] := aValue;
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetD38IsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D38] := Null;
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetD40Value: Float;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D40];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetD40IsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D40]);
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldD40Value: Float;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2D40];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldD40IsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2D40]);
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetD40Value(const aValue: Float);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D40] := aValue;
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetD40IsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D40] := Null;
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetD42Value: Float;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D42];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetD42IsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D42]);
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldD42Value: Float;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2D42];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldD42IsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2D42]);
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetD42Value(const aValue: Float);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D42] := aValue;
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetD42IsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D42] := Null;
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetD44Value: Float;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D44];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetD44IsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D44]);
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldD44Value: Float;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2D44];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldD44IsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2D44]);
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetD44Value(const aValue: Float);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D44] := aValue;
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetD44IsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D44] := Null;
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetD46Value: Float;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D46];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetD46IsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D46]);
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldD46Value: Float;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2D46];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldD46IsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2D46]);
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetD46Value(const aValue: Float);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D46] := aValue;
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetD46IsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D46] := Null;
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetD48Value: Float;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D48];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetD48IsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D48]);
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldD48Value: Float;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2D48];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldD48IsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2D48]);
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetD48Value(const aValue: Float);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D48] := aValue;
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetD48IsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2D48] := Null;
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetDTValue: Float;
+begin
+  result := BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2DT];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetDTIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2DT]);
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldDTValue: Float;
+begin
+  result := BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2DT];
+end;
+
+function TStockEDIInventario2BusinessProcessorRules.GetOldDTIsNull: Boolean;
+begin
+  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_StockEDIInventario2DT]);
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetDTValue(const aValue: Float);
+begin
+  BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2DT] := aValue;
+end;
+
+procedure TStockEDIInventario2BusinessProcessorRules.SetDTIsNull(const aValue: Boolean);
+begin
+  if aValue then
+    BusinessProcessor.CurrentChange.NewValueByName[fld_StockEDIInventario2DT] := Null;
+end;
+
+
 { TStockEDIInventarioBusinessProcessorRules }
 constructor TStockEDIInventarioBusinessProcessorRules.Create(aBusinessProcessor: TDABusinessProcessor);
 begin
@@ -3815,6 +5097,7 @@ initialization
   RegisterBusinessProcessorRules(RID_StockPrendasCentrosDelta, TStockPrendasCentrosBusinessProcessorRules);
   RegisterBusinessProcessorRules(RID_StockEDIDelta, TStockEDIBusinessProcessorRules);
   RegisterBusinessProcessorRules(RID_StockVARELADelta, TStockVARELABusinessProcessorRules);
+  RegisterBusinessProcessorRules(RID_StockEDIInventario2Delta, TStockEDIInventario2BusinessProcessorRules);
   RegisterBusinessProcessorRules(RID_StockEDIInventarioDelta, TStockEDIInventarioBusinessProcessorRules);
 
 end.
diff --git a/Source/Modulos/Stock/Servidor/srvStock_Impl.dfm b/Source/Modulos/Stock/Servidor/srvStock_Impl.dfm
index 33988c2..f5d44ba 100644
--- a/Source/Modulos/Stock/Servidor/srvStock_Impl.dfm
+++ b/Source/Modulos/Stock/Servidor/srvStock_Impl.dfm
@@ -175,10 +175,22 @@ object srvStock: TsrvStock
           item
             Connection = 'GFT_VARELA'
             SQL = 
-              'SELECT CENTRO, FILIAL, CODIGO, PRODUCTO, TIPO_PRODUCTO, GRUPO_PR' +
-              'ODUCTO, COLECCION, COLOR,'#10'      E38, E40, E42, E44, E46, E48, TE' +
-              ','#10'      S38, S40, S42, S44, S46, S48, TS,'#10'      K38, K40, K42, K' +
-              '44, K46, K48, KT'#10'      '#10'FROM RDX_V_STOCK_CALCULADO'#10
+              'SELECT'#10#10'    CENTRO, FILIAL, CODIGO, PRODUCTO, TIPO_PRODUCTO, GRU' +
+              'PO_PRODUCTO, COLECCION, COLOR,'#10#10'    SUM(E38) as E38,'#10'    SUM(E40' +
+              ') as E40,'#10'    SUM(E42) as E42,'#10'    SUM(E44) as E44,'#10'    SUM(E46)' +
+              ' as E46,'#10'    SUM(E48) as E48,'#10'    (SUM(E38) + SUM(E40) + SUM(E42' +
+              ') + SUM(E44) + SUM(E46) + SUM(E48)) as TE,'#10'    SUM(S38) as S38,'#10 +
+              '    SUM(S40) as S40,'#10'    SUM(S42) as S42,'#10'    SUM(S44) as S44,'#10' ' +
+              '   SUM(S46) as S46,'#10'    SUM(S48) as S48,'#10'    (SUM(S38) + SUM(S40' +
+              ') + SUM(S42) + SUM(S44) + SUM(S46) + SUM(S48)) as TS,'#10#10'    (SUM(' +
+              'E38) - SUM(S38)) as K38,'#10'    (SUM(E40) - SUM(S40)) as K40,'#10'    (' +
+              'SUM(E42) - SUM(S42)) as K42,'#10'    (SUM(E44) - SUM(S44)) as K44,'#10' ' +
+              '   (SUM(E46) - SUM(S46)) as K46,'#10'    (SUM(E48) - SUM(S48)) as K4' +
+              '8,'#10#10'    ((SUM(E38) - SUM(S38)) + (SUM(E40) - SUM(S40)) + (SUM(E4' +
+              '2) - SUM(S42)) + (SUM(E44) - SUM(S44)) + (SUM(E46) - SUM(S46)) +' +
+              ' (SUM(E48) - SUM(S48))) as KT'#10#10'  FROM'#10'    RDX_V_STOCK_CALCULADO'#10 +
+              #10#10'GROUP BY CENTRO, FILIAL, CODIGO, PRODUCTO, TIPO_PRODUCTO, GRUP' +
+              'O_PRODUCTO, COLECCION, COLOR'#10
             StatementType = stSQL
             ColumnMappings = <
               item
@@ -717,6 +729,278 @@ object srvStock: TsrvStock
                 TableField = 'DT'
               end>
           end>
+        Name = 'StockEDIInventario2'
+        Fields = <
+          item
+            Name = 'CENTRO'
+            DataType = datString
+            Size = 17
+          end
+          item
+            Name = 'FILIAL'
+            DataType = datString
+            Size = 25
+          end
+          item
+            Name = 'CODIGO'
+            DataType = datString
+            Size = 12
+          end
+          item
+            Name = 'PRODUCTO'
+            DataType = datString
+            Size = 40
+          end
+          item
+            Name = 'COLOR'
+            DataType = datString
+            Size = 10
+          end
+          item
+            Name = 'TIPO_PRODUCTO'
+            DataType = datString
+            Size = 25
+          end
+          item
+            Name = 'GRUPO_PRODUCTO'
+            DataType = datString
+            Size = 25
+          end
+          item
+            Name = 'COLECCION'
+            DataType = datString
+            Size = 6
+          end
+          item
+            Name = 'I38'
+            DataType = datFloat
+          end
+          item
+            Name = 'I40'
+            DataType = datFloat
+          end
+          item
+            Name = 'I42'
+            DataType = datFloat
+          end
+          item
+            Name = 'I44'
+            DataType = datFloat
+          end
+          item
+            Name = 'I46'
+            DataType = datFloat
+          end
+          item
+            Name = 'I48'
+            DataType = datFloat
+          end
+          item
+            Name = 'TI'
+            DataType = datFloat
+          end
+          item
+            Name = 'K38'
+            DataType = datFloat
+          end
+          item
+            Name = 'K40'
+            DataType = datFloat
+          end
+          item
+            Name = 'K42'
+            DataType = datFloat
+          end
+          item
+            Name = 'K44'
+            DataType = datFloat
+          end
+          item
+            Name = 'K46'
+            DataType = datFloat
+          end
+          item
+            Name = 'K48'
+            DataType = datFloat
+          end
+          item
+            Name = 'TK'
+            DataType = datFloat
+          end
+          item
+            Name = 'D38'
+            DataType = datFloat
+          end
+          item
+            Name = 'D40'
+            DataType = datFloat
+          end
+          item
+            Name = 'D42'
+            DataType = datFloat
+          end
+          item
+            Name = 'D44'
+            DataType = datFloat
+          end
+          item
+            Name = 'D46'
+            DataType = datFloat
+          end
+          item
+            Name = 'D48'
+            DataType = datFloat
+          end
+          item
+            Name = 'DT'
+            DataType = datFloat
+          end>
+      end
+      item
+        Params = <>
+        Statements = <
+          item
+            Connection = 'GFT_VARELA'
+            TargetTable = 'RDX_V_CONTROL_INVENTARIO'
+            SQL = 
+              'SELECT'#10'    CENTRO, FILIAL, CODIGO, PRODUCTO, COLOR, TIPO_PRODUCT' +
+              'O, GRUPO_PRODUCTO, COLECCION,'#10#10'    SUM(I38) as I38,'#10'    SUM(I40)' +
+              ' as I40,'#10'    SUM(I42) as I42,'#10'    SUM(I44) as I44,'#10'    SUM(I46) ' +
+              'as I46,'#10'    SUM(I48) as I48,'#10'    (SUM(I38) + SUM(I40) + SUM(I42)' +
+              ' + SUM(I44) + SUM(I46) + SUM(I48)) as TI,'#10'    SUM(K38) as K38,'#10' ' +
+              '   SUM(K40) as K40,'#10'    SUM(K42) as K42,'#10'    SUM(K44) as K44,'#10'  ' +
+              '  SUM(K46) as K46,'#10'    SUM(K48) as K48,'#10'    (SUM(K38) + SUM(K40)' +
+              ' + SUM(K42) + SUM(K44) + SUM(K46) + SUM(K48)) as TK,'#10#10'    (SUM(I' +
+              '38) - SUM(K38)) as D38,'#10'    (SUM(I40) - SUM(K40)) as D40,'#10'    (S' +
+              'UM(I42) - SUM(K42)) as D42,'#10'    (SUM(I44) - SUM(K44)) as D44,'#10'  ' +
+              '  (SUM(I46) - SUM(K46)) as D46,'#10'    (SUM(I48) - SUM(K48)) as D48' +
+              ','#10#10'    ((SUM(I38) - SUM(K38)) + (SUM(I40) - SUM(K40)) + (SUM(I42' +
+              ') - SUM(K42)) + (SUM(I44) - SUM(K44)) + (SUM(I46) - SUM(K46)) + ' +
+              '(SUM(I48) - SUM(K48))) as DT'#10#10'  FROM'#10'    RDX_V_CONTROL_INVENTARI' +
+              'O'#10#10'GROUP BY CENTRO, FILIAL, CODIGO, PRODUCTO, COLOR, TIPO_PRODUC' +
+              'TO, GRUPO_PRODUCTO, COLECCION'#10#10'having ((SUM(I38) - SUM(K38)) + (' +
+              'SUM(I40) - SUM(K40)) +'#10'       (SUM(I42) - SUM(K42)) + (SUM(I44) ' +
+              '- SUM(K44)) +'#10'       (SUM(I46) - SUM(K46)) + (SUM(I48) - SUM(K48' +
+              ')) <> 0)'#10
+            StatementType = stSQL
+            ColumnMappings = <
+              item
+                DatasetField = 'CENTRO'
+                TableField = 'CENTRO'
+              end
+              item
+                DatasetField = 'FILIAL'
+                TableField = 'FILIAL'
+              end
+              item
+                DatasetField = 'CODIGO'
+                TableField = 'CODIGO'
+              end
+              item
+                DatasetField = 'PRODUCTO'
+                TableField = 'PRODUCTO'
+              end
+              item
+                DatasetField = 'COLOR'
+                TableField = 'COLOR'
+              end
+              item
+                DatasetField = 'TIPO_PRODUCTO'
+                TableField = 'TIPO_PRODUCTO'
+              end
+              item
+                DatasetField = 'GRUPO_PRODUCTO'
+                TableField = 'GRUPO_PRODUCTO'
+              end
+              item
+                DatasetField = 'COLECCION'
+                TableField = 'COLECCION'
+              end
+              item
+                DatasetField = 'I38'
+                TableField = 'I38'
+              end
+              item
+                DatasetField = 'I40'
+                TableField = 'I40'
+              end
+              item
+                DatasetField = 'I42'
+                TableField = 'I42'
+              end
+              item
+                DatasetField = 'I44'
+                TableField = 'I44'
+              end
+              item
+                DatasetField = 'I46'
+                TableField = 'I46'
+              end
+              item
+                DatasetField = 'I48'
+                TableField = 'I48'
+              end
+              item
+                DatasetField = 'TI'
+                TableField = 'TI'
+              end
+              item
+                DatasetField = 'K38'
+                TableField = 'K38'
+              end
+              item
+                DatasetField = 'K40'
+                TableField = 'K40'
+              end
+              item
+                DatasetField = 'K42'
+                TableField = 'K42'
+              end
+              item
+                DatasetField = 'K44'
+                TableField = 'K44'
+              end
+              item
+                DatasetField = 'K46'
+                TableField = 'K46'
+              end
+              item
+                DatasetField = 'K48'
+                TableField = 'K48'
+              end
+              item
+                DatasetField = 'TK'
+                TableField = 'TK'
+              end
+              item
+                DatasetField = 'D38'
+                TableField = 'D38'
+              end
+              item
+                DatasetField = 'D40'
+                TableField = 'D40'
+              end
+              item
+                DatasetField = 'D42'
+                TableField = 'D42'
+              end
+              item
+                DatasetField = 'D44'
+                TableField = 'D44'
+              end
+              item
+                DatasetField = 'D46'
+                TableField = 'D46'
+              end
+              item
+                DatasetField = 'D48'
+                TableField = 'D48'
+              end
+              item
+                DatasetField = 'DT'
+                TableField = 'DT'
+              end>
+          end>
         Name = 'StockEDIInventario'
         Fields = <
           item
diff --git a/Source/Servidor/AdminPV_Server.dproj b/Source/Servidor/AdminPV_Server.dproj
index bc246ca..4547883 100644
--- a/Source/Servidor/AdminPV_Server.dproj
+++ b/Source/Servidor/AdminPV_Server.dproj
@@ -45,6 +45,13 @@
     <Borland.ProjectType>VCLApplication</Borland.ProjectType>
     <BorlandProject>
 <BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Language><Language Name="RootDir">C:\Archivos de programa\Borland\Delphi7\Bin\</Language></Language><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">2</VersionInfo><VersionInfo Name="MinorVer">1</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">Rodax Software S.L.</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">2.1.0.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">AdminPV_Server</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">2.0.0.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys><VersionInfoKeys Name="CompileDate">viernes, 05 de octubre de 2007 17:13</VersionInfoKeys></VersionInfoKeys><Source><Source Name="MainSource">AdminPV_Server.dpr</Source></Source><Excluded_Packages>
+      
+      
+      
+      
+      
+      
+      
       <Excluded_Packages Name="C:\Varela_D2007\Lib\DevExpressVCL\dxPSCoreD10.bpl">ExpressPrinting System by Developer Express Inc.</Excluded_Packages>
       <Excluded_Packages Name="$(BDS)\bin\dclwebsnap100.bpl">CodeGear WebSnap Components</Excluded_Packages>
       <Excluded_Packages Name="$(BDS)\bin\dclsoap100.bpl">CodeGear SOAP Components</Excluded_Packages>
diff --git a/Source/Servidor/AdminPV_Server.rc b/Source/Servidor/AdminPV_Server.rc
index 1b4e972..7183ee5 100644
--- a/Source/Servidor/AdminPV_Server.rc
+++ b/Source/Servidor/AdminPV_Server.rc
@@ -16,7 +16,7 @@ BEGIN
               VALUE "FileVersion", "2.1.0.0\0"
               VALUE "ProductName", "AdminPV_Server\0"
               VALUE "ProductVersion", "2.1.0.0\0"
-              VALUE "CompileDate", "lunes, 08 de octubre de 2007 12:43\0"
+              VALUE "CompileDate", "jueves, 24 de enero de 2008 19:05\0"
          END
     END
     BLOCK "VarFileInfo"
diff --git a/Source/Servidor/AdminPV_Server.res b/Source/Servidor/AdminPV_Server.res
index 06ecac294f1ce8c399ce0bfadc75865b3d65b311..15785d723b878b8abc1c7a288f928b3e7b1467f9 100644
GIT binary patch
delta 136
zcmZ3pjd8^`#tnBO7<DG!jgSYDe<Pw9dnQLlDl=wmu8m}7OiW==Vqj!&X2@sAWhh|C
zWXNGiWpH6gWGDgBAdtmS3S^Z5aWR7qg93vQg9(sK0rC}qI1h-6fO=sfMhpf(XaVFK
QGFUQL0okULpGLU@0D%P^zyJUM

delta 140
zcmZ3njd9I3#tnBO7!4-hjgSYDe<Pw9`zA+5Dl=wnu8m}7Oig1@W?*D+X2@sAWhh|C
zWXNGiWpH6gWGDgBAdtgQ%8&<S7c=NEC@>f>SOCcsAYTEfBN?cwlp%?s2+W6w8UfW9
YFqi}74H=9WtQbrfj2RdvKa6q*0RHwKI{*Lx