diff --git a/Build/Build.fbl6 b/Build/Build.fbl6
index f49cd11..a0cf8f0 100644
Binary files a/Build/Build.fbl6 and b/Build/Build.fbl6 differ
diff --git a/Source/Cliente/FactuGES.dproj b/Source/Cliente/FactuGES.dproj
index 1ca3716..c1f658d 100644
--- a/Source/Cliente/FactuGES.dproj
+++ b/Source/Cliente/FactuGES.dproj
@@ -53,7 +53,7 @@
Delphi.Personality
VCLApplication
-FalseTrueFalseC:\Archivos de programa\Borland\Delphi7\Bin\TrueFalse4320FalseFalseFalseFalseFalse30821252Rodax Software S.L.4.3.2.0FactuGESFactuGES4.3.2.0FactuGES.dprFalse
+FalseTrueFalseC:\Archivos de programa\Borland\Delphi7\Bin\TrueFalse4330FalseFalseFalseFalseFalse30821252Rodax Software S.L.4.3.3.0FactuGESFactuGES4.3.3.0FactuGES.dprFalse
diff --git a/Source/Cliente/FactuGES.rc b/Source/Cliente/FactuGES.rc
index c74a51b..9949318 100644
--- a/Source/Cliente/FactuGES.rc
+++ b/Source/Cliente/FactuGES.rc
@@ -1,7 +1,7 @@
MAINICON ICON "C:\Codigo\Resources\Iconos\Factuges.ico"
1 VERSIONINFO
-FILEVERSION 4,3,2,0
-PRODUCTVERSION 4,3,2,0
+FILEVERSION 4,3,3,0
+PRODUCTVERSION 4,3,3,0
FILEFLAGSMASK 0x3FL
FILEFLAGS 0x00L
FILEOS 0x40004L
@@ -13,10 +13,10 @@ BEGIN
BLOCK "0C0A04E4"
BEGIN
VALUE "CompanyName", "Rodax Software S.L.\0"
- VALUE "FileVersion", "4.3.2.0\0"
+ VALUE "FileVersion", "4.3.3.0\0"
VALUE "InternalName", "FactuGES\0"
VALUE "ProductName", "FactuGES\0"
- VALUE "ProductVersion", "4.3.2.0\0"
+ VALUE "ProductVersion", "4.3.3.0\0"
END
END
BLOCK "VarFileInfo"
diff --git a/Source/Cliente/FactuGES.res b/Source/Cliente/FactuGES.res
index cab4175..3559276 100644
Binary files a/Source/Cliente/FactuGES.res and b/Source/Cliente/FactuGES.res differ
diff --git a/Source/Cliente/uPantallaPrincipal.pas b/Source/Cliente/uPantallaPrincipal.pas
index d954164..91926be 100644
--- a/Source/Cliente/uPantallaPrincipal.pas
+++ b/Source/Cliente/uPantallaPrincipal.pas
@@ -192,6 +192,11 @@ end;
procedure TfPantallaPrincipal.FormShow(Sender: TObject);
begin
InicializarUI;
+
+ //Solo verá Luis los informes
+ if (AppFactuGES.UsuarioActivo.ID <> 1)
+ and (AppFactuGES.UsuarioActivo.ID <> 3) then
+ actMenuInformes.Visible := False;
end;
procedure TfPantallaPrincipal.RefrescarUI;
diff --git a/Source/Informes/1/InfPedidoCliente.fr3 b/Source/Informes/1/InfPedidoCliente.fr3
index 6372203..dcd5fce 100644
--- a/Source/Informes/1/InfPedidoCliente.fr3
+++ b/Source/Informes/1/InfPedidoCliente.fr3
@@ -1,9 +1,9 @@
-
+
-
+
@@ -11,6 +11,8 @@
+
+
diff --git a/Source/Informes/2/InfPedidoCliente.fr3 b/Source/Informes/2/InfPedidoCliente.fr3
index c02053d..afc60f3 100644
--- a/Source/Informes/2/InfPedidoCliente.fr3
+++ b/Source/Informes/2/InfPedidoCliente.fr3
@@ -1,9 +1,9 @@
-
+
-
+
@@ -11,6 +11,8 @@
+
+
diff --git a/Source/Informes/4/InfPedidoCliente.fr3 b/Source/Informes/4/InfPedidoCliente.fr3
index 4934fd0..bcd6269 100644
--- a/Source/Informes/4/InfPedidoCliente.fr3
+++ b/Source/Informes/4/InfPedidoCliente.fr3
@@ -1,9 +1,9 @@
-
+
-
+
@@ -11,6 +11,8 @@
+
+
diff --git a/Source/Informes/5/InfPedidoCliente.fr3 b/Source/Informes/5/InfPedidoCliente.fr3
index 8fbe0f8..5dbcc2f 100644
--- a/Source/Informes/5/InfPedidoCliente.fr3
+++ b/Source/Informes/5/InfPedidoCliente.fr3
@@ -1,9 +1,9 @@
-
+
-
+
@@ -11,6 +11,8 @@
+
+
@@ -42,6 +44,7 @@
+
diff --git a/Source/Informes/6/InfPedidoCliente.fr3 b/Source/Informes/6/InfPedidoCliente.fr3
index 8db9804..90f1a0a 100644
--- a/Source/Informes/6/InfPedidoCliente.fr3
+++ b/Source/Informes/6/InfPedidoCliente.fr3
@@ -1,9 +1,9 @@
-
+
-
+
@@ -11,6 +11,8 @@
+
+
@@ -42,6 +44,7 @@
+
diff --git a/Source/Modulos/Facturas de cliente/Model/schFacturasClienteClient_Intf.pas b/Source/Modulos/Facturas de cliente/Model/schFacturasClienteClient_Intf.pas
index 2e04f11..aff302e 100644
--- a/Source/Modulos/Facturas de cliente/Model/schFacturasClienteClient_Intf.pas
+++ b/Source/Modulos/Facturas de cliente/Model/schFacturasClienteClient_Intf.pas
@@ -3,7 +3,7 @@ unit schFacturasClienteClient_Intf;
interface
uses
- Classes, DB, SysUtils, uROClasses, uDAInterfaces, uDADataTable, FmtBCD, uROXMLIntf;
+ Classes, DB, schBase_Intf, SysUtils, uROClasses, uDAInterfaces, uDADataTable, FmtBCD, uROXMLIntf;
const
{ Data table rules ids
@@ -261,7 +261,7 @@ type
end;
{ TListaAnosFacturasDataTableRules }
- TListaAnosFacturasDataTableRules = class(TDADataTableRules, IListaAnosFacturas)
+ TListaAnosFacturasDataTableRules = class(TIntfObjectDADataTableRules, IListaAnosFacturas)
private
protected
{ Property getters and setters }
@@ -553,7 +553,7 @@ type
end;
{ TFacturasClienteDataTableRules }
- TFacturasClienteDataTableRules = class(TDADataTableRules, IFacturasCliente)
+ TFacturasClienteDataTableRules = class(TIntfObjectDADataTableRules, IFacturasCliente)
private
f_OBSERVACIONES: IROStrings;
procedure OBSERVACIONES_OnChange(Sender: TObject);
@@ -931,7 +931,7 @@ type
end;
{ TFacturasCliente_DetallesDataTableRules }
- TFacturasCliente_DetallesDataTableRules = class(TDADataTableRules, IFacturasCliente_Detalles)
+ TFacturasCliente_DetallesDataTableRules = class(TIntfObjectDADataTableRules, IFacturasCliente_Detalles)
private
protected
{ Property getters and setters }
@@ -1307,7 +1307,7 @@ type
end;
{ TFacturasClienteDeAlbaranDataTableRules }
- TFacturasClienteDeAlbaranDataTableRules = class(TDADataTableRules, IFacturasClienteDeAlbaran)
+ TFacturasClienteDeAlbaranDataTableRules = class(TIntfObjectDADataTableRules, IFacturasClienteDeAlbaran)
private
f_OBSERVACIONES: IROStrings;
procedure OBSERVACIONES_OnChange(Sender: TObject);
diff --git a/Source/Modulos/Informe margen por articulo/Data/InfMargenArticulo_data.drc b/Source/Modulos/Informe margen por articulo/Data/InfMargenArticulo_data.drc
index dac4730..9809427 100644
--- a/Source/Modulos/Informe margen por articulo/Data/InfMargenArticulo_data.drc
+++ b/Source/Modulos/Informe margen por articulo/Data/InfMargenArticulo_data.drc
@@ -14,4 +14,4 @@ END
/* C:\Codigo\Source\Modulos\Informe margen por articulo\Data\uDataModuleInfMargenArticulo.dfm */
/* C:\Codigo\Source\Modulos\Informe margen por articulo\Data\InfMargenArticulo_data.res */
-/* c:\temp\dtfC3E.tmp */
+/* c:\temp\dtfD88.tmp */
diff --git a/Source/Modulos/Informe margen por articulo/Model/InfMargenArticulo_model.drc b/Source/Modulos/Informe margen por articulo/Model/InfMargenArticulo_model.drc
index 8d6a0d8..10d7429 100644
--- a/Source/Modulos/Informe margen por articulo/Model/InfMargenArticulo_model.drc
+++ b/Source/Modulos/Informe margen por articulo/Model/InfMargenArticulo_model.drc
@@ -13,4 +13,4 @@ BEGIN
END
/* C:\Codigo\Source\Modulos\Informe margen por articulo\Model\InfMargenArticulo_model.res */
-/* c:\temp\dtfC3C.tmp */
+/* c:\temp\dtfD86.tmp */
diff --git a/Source/Modulos/Informe margen por articulo/Views/InfMargenArticulo_view.drc b/Source/Modulos/Informe margen por articulo/Views/InfMargenArticulo_view.drc
index 20c566f..15a8c69 100644
--- a/Source/Modulos/Informe margen por articulo/Views/InfMargenArticulo_view.drc
+++ b/Source/Modulos/Informe margen por articulo/Views/InfMargenArticulo_view.drc
@@ -16,4 +16,4 @@ END
/* C:\Codigo\Source\Modulos\Informe margen por articulo\Views\uViewInfMargenArticulo.dfm */
/* C:\Codigo\Source\Modulos\Informe margen por articulo\Views\uEditorInfMargenArticulo.dfm */
/* C:\Codigo\Source\Modulos\Informe margen por articulo\Views\InfMargenArticulo_view.res */
-/* c:\temp\dtfC42.tmp */
+/* c:\temp\dtfD8C.tmp */
diff --git a/Source/Modulos/Informe ventas por articulo/Data/InfVentasArticulo_data.drc b/Source/Modulos/Informe ventas por articulo/Data/InfVentasArticulo_data.drc
index 8fca4f7..e1837c4 100644
--- a/Source/Modulos/Informe ventas por articulo/Data/InfVentasArticulo_data.drc
+++ b/Source/Modulos/Informe ventas por articulo/Data/InfVentasArticulo_data.drc
@@ -14,4 +14,4 @@ END
/* C:\Codigo\Source\Modulos\Informe ventas por articulo\Data\uDataModuleInfVentasArticulo.dfm */
/* C:\Codigo\Source\Modulos\Informe ventas por articulo\Data\InfVentasArticulo_data.res */
-/* c:\temp\dtfC34.tmp */
+/* c:\temp\dtfD7E.tmp */
diff --git a/Source/Modulos/Informe ventas por articulo/Model/InfVentasArticulo_model.drc b/Source/Modulos/Informe ventas por articulo/Model/InfVentasArticulo_model.drc
index d828882..206928f 100644
--- a/Source/Modulos/Informe ventas por articulo/Model/InfVentasArticulo_model.drc
+++ b/Source/Modulos/Informe ventas por articulo/Model/InfVentasArticulo_model.drc
@@ -13,4 +13,4 @@ BEGIN
END
/* C:\Codigo\Source\Modulos\Informe ventas por articulo\Model\InfVentasArticulo_model.res */
-/* c:\temp\dtfC32.tmp */
+/* c:\temp\dtfD7C.tmp */
diff --git a/Source/Modulos/Informe ventas por articulo/Views/InfVentasArticulo_view.drc b/Source/Modulos/Informe ventas por articulo/Views/InfVentasArticulo_view.drc
index 5db51fb..18fce1b 100644
--- a/Source/Modulos/Informe ventas por articulo/Views/InfVentasArticulo_view.drc
+++ b/Source/Modulos/Informe ventas por articulo/Views/InfVentasArticulo_view.drc
@@ -19,4 +19,4 @@ END
/* C:\Codigo\Source\Modulos\Informe ventas por articulo\Views\uViewInfVentasAlbArticulo.dfm */
/* C:\Codigo\Source\Modulos\Informe ventas por articulo\Views\uEditorInfVentasAlbArticulo.dfm */
/* C:\Codigo\Source\Modulos\Informe ventas por articulo\Views\InfVentasArticulo_view.res */
-/* c:\temp\dtfC38.tmp */
+/* c:\temp\dtfD82.tmp */
diff --git a/Source/Modulos/Informes base/Controller/InformesBase_controller.drc b/Source/Modulos/Informes base/Controller/InformesBase_controller.drc
index 130e825..21de86d 100644
--- a/Source/Modulos/Informes base/Controller/InformesBase_controller.drc
+++ b/Source/Modulos/Informes base/Controller/InformesBase_controller.drc
@@ -13,4 +13,4 @@ BEGIN
END
/* C:\Codigo\Source\Modulos\Informes base\Controller\InformesBase_controller.res */
-/* c:\temp\dtfC28.tmp */
+/* c:\temp\dtfD72.tmp */
diff --git a/Source/Modulos/Informes base/Data/Informes_data.drc b/Source/Modulos/Informes base/Data/Informes_data.drc
index 642d7f8..d4326aa 100644
--- a/Source/Modulos/Informes base/Data/Informes_data.drc
+++ b/Source/Modulos/Informes base/Data/Informes_data.drc
@@ -14,4 +14,4 @@ END
/* C:\Codigo\Source\Modulos\Informes base\Data\uDataModuleInformes.dfm */
/* C:\Codigo\Source\Modulos\Informes base\Data\Informes_data.res */
-/* c:\temp\dtfC24.tmp */
+/* c:\temp\dtfD6E.tmp */
diff --git a/Source/Modulos/Informes base/Model/Informes_model.drc b/Source/Modulos/Informes base/Model/Informes_model.drc
index 9278ea7..c651a25 100644
--- a/Source/Modulos/Informes base/Model/Informes_model.drc
+++ b/Source/Modulos/Informes base/Model/Informes_model.drc
@@ -13,4 +13,4 @@ BEGIN
END
/* C:\Codigo\Source\Modulos\Informes base\Model\Informes_model.res */
-/* c:\temp\dtfC22.tmp */
+/* c:\temp\dtfD6C.tmp */
diff --git a/Source/Modulos/Informes base/Views/Informes_view.drc b/Source/Modulos/Informes base/Views/Informes_view.drc
index 3aa7876..5278c49 100644
--- a/Source/Modulos/Informes base/Views/Informes_view.drc
+++ b/Source/Modulos/Informes base/Views/Informes_view.drc
@@ -15,4 +15,4 @@ END
/* C:\Codigo\Source\Modulos\Informes base\Views\uViewInformes.dfm */
/* C:\Codigo\Source\Modulos\Informes base\Views\uEditorInformes.dfm */
/* C:\Codigo\Source\Modulos\Informes base\Views\Informes_view.res */
-/* c:\temp\dtfC2C.tmp */
+/* c:\temp\dtfD76.tmp */
diff --git a/Source/Modulos/Pedidos de cliente/Controller/PedidosCliente_controller.drc b/Source/Modulos/Pedidos de cliente/Controller/PedidosCliente_controller.drc
index d290489..cf0574f 100644
--- a/Source/Modulos/Pedidos de cliente/Controller/PedidosCliente_controller.drc
+++ b/Source/Modulos/Pedidos de cliente/Controller/PedidosCliente_controller.drc
@@ -13,4 +13,4 @@ BEGIN
END
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Controller\PedidosCliente_controller.RES */
-/* c:\temp\dtfCB6.tmp */
+/* c:\temp\dtfE00.tmp */
diff --git a/Source/Modulos/Pedidos de cliente/Data/PedidosCliente_data.drc b/Source/Modulos/Pedidos de cliente/Data/PedidosCliente_data.drc
index 349b510..1ffd1a8 100644
--- a/Source/Modulos/Pedidos de cliente/Data/PedidosCliente_data.drc
+++ b/Source/Modulos/Pedidos de cliente/Data/PedidosCliente_data.drc
@@ -14,4 +14,4 @@ END
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Data\uDataModulePedidosCliente.dfm */
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Data\PedidosCliente_data.RES */
-/* c:\temp\dtfC66.tmp */
+/* c:\temp\dtfDB0.tmp */
diff --git a/Source/Modulos/Pedidos de cliente/Model/PedidosCliente_model.drc b/Source/Modulos/Pedidos de cliente/Model/PedidosCliente_model.drc
index 6b7d947..dc8a932 100644
--- a/Source/Modulos/Pedidos de cliente/Model/PedidosCliente_model.drc
+++ b/Source/Modulos/Pedidos de cliente/Model/PedidosCliente_model.drc
@@ -13,4 +13,4 @@ BEGIN
END
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Model\PedidosCliente_model.RES */
-/* c:\temp\dtfC64.tmp */
+/* c:\temp\dtfDAE.tmp */
diff --git a/Source/Modulos/Pedidos de cliente/Plugin/PedidosCliente_plugin.drc b/Source/Modulos/Pedidos de cliente/Plugin/PedidosCliente_plugin.drc
index b86f47e..6a321f7 100644
--- a/Source/Modulos/Pedidos de cliente/Plugin/PedidosCliente_plugin.drc
+++ b/Source/Modulos/Pedidos de cliente/Plugin/PedidosCliente_plugin.drc
@@ -14,4 +14,4 @@ END
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Plugin\uPluginPedidosCliente.dfm */
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Plugin\PedidosCliente_plugin.RES */
-/* c:\temp\dtfCD0.tmp */
+/* c:\temp\dtfE1A.tmp */
diff --git a/Source/Modulos/Pedidos de cliente/Views/PedidosCliente_view.drc b/Source/Modulos/Pedidos de cliente/Views/PedidosCliente_view.drc
index 82ef509..5c8ddc9 100644
--- a/Source/Modulos/Pedidos de cliente/Views/PedidosCliente_view.drc
+++ b/Source/Modulos/Pedidos de cliente/Views/PedidosCliente_view.drc
@@ -26,4 +26,4 @@ END
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Views\uEditorElegirArticulosPedidoCliente.dfm */
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Views\uEditorDireccionEntregaPedidoCliente.dfm */
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Views\PedidosCliente_view.RES */
-/* c:\temp\dtfCCE.tmp */
+/* c:\temp\dtfE18.tmp */
diff --git a/Source/Modulos/ProcesoPresupuestoCliente/Controller/ProcesoPresupuestosCliente_controller.drc b/Source/Modulos/ProcesoPresupuestoCliente/Controller/ProcesoPresupuestosCliente_controller.drc
index 46dbf3f..aa38ef4 100644
--- a/Source/Modulos/ProcesoPresupuestoCliente/Controller/ProcesoPresupuestosCliente_controller.drc
+++ b/Source/Modulos/ProcesoPresupuestoCliente/Controller/ProcesoPresupuestosCliente_controller.drc
@@ -13,4 +13,4 @@ BEGIN
END
/* C:\Codigo\Source\Modulos\ProcesoPresupuestoCliente\Controller\ProcesoPresupuestosCliente_controller.res */
-/* c:\temp\dtfD00.tmp */
+/* c:\temp\dtfE4A.tmp */
diff --git a/Source/Modulos/ProcesoPresupuestoCliente/Plugin/ProcesoPresupuestosCliente_plugin.drc b/Source/Modulos/ProcesoPresupuestoCliente/Plugin/ProcesoPresupuestosCliente_plugin.drc
index ba5ab22..2299ca7 100644
--- a/Source/Modulos/ProcesoPresupuestoCliente/Plugin/ProcesoPresupuestosCliente_plugin.drc
+++ b/Source/Modulos/ProcesoPresupuestoCliente/Plugin/ProcesoPresupuestosCliente_plugin.drc
@@ -14,4 +14,4 @@ END
/* C:\Codigo\Source\Modulos\ProcesoPresupuestoCliente\Plugin\uPluginProcesoPresupuestosCliente.dfm */
/* C:\Codigo\Source\Modulos\ProcesoPresupuestoCliente\Plugin\ProcesoPresupuestosCliente_plugin.res */
-/* c:\temp\dtfD04.tmp */
+/* c:\temp\dtfE4E.tmp */
diff --git a/Source/Modulos/ProcesoPresupuestoCliente/Views/ProcesoPresupuestosCliente_view.dproj b/Source/Modulos/ProcesoPresupuestoCliente/Views/ProcesoPresupuestosCliente_view.dproj
index 646e2a7..85adc0f 100644
--- a/Source/Modulos/ProcesoPresupuestoCliente/Views/ProcesoPresupuestosCliente_view.dproj
+++ b/Source/Modulos/ProcesoPresupuestoCliente/Views/ProcesoPresupuestosCliente_view.dproj
@@ -49,14 +49,14 @@
MainSource
-
-
-
-
-
-
-
-
+
+
+
+
+
+
+
+
TfEditorPedidosProveedor
diff --git a/Source/Modulos/ProcesoPresupuestoCliente/Views/ProcesoPresupuestosCliente_view.drc b/Source/Modulos/ProcesoPresupuestoCliente/Views/ProcesoPresupuestosCliente_view.drc
index 302c683..1ffc13b 100644
--- a/Source/Modulos/ProcesoPresupuestoCliente/Views/ProcesoPresupuestosCliente_view.drc
+++ b/Source/Modulos/ProcesoPresupuestoCliente/Views/ProcesoPresupuestosCliente_view.drc
@@ -15,4 +15,4 @@ END
/* C:\Codigo\Source\Modulos\ProcesoPresupuestoCliente\Views\uViewProcesoPresupuestosCliente.dfm */
/* C:\Codigo\Source\Modulos\ProcesoPresupuestoCliente\Views\uEditorProcesoPresupuestosCliente.dfm */
/* C:\Codigo\Source\Modulos\ProcesoPresupuestoCliente\Views\ProcesoPresupuestosCliente_view.res */
-/* C:\Codigo\Source\Modulos\ProcesoPresupuestoCliente\Views\ProcesoPresupuestosCliente_view.drf */
+/* c:\temp\dtfE4C.tmp */
diff --git a/Source/Modulos/ProcesoPresupuestoCliente/Views/uEditorProcesoPresupuestosCliente.dfm b/Source/Modulos/ProcesoPresupuestoCliente/Views/uEditorProcesoPresupuestosCliente.dfm
index 7e78a1b..28a7234 100644
--- a/Source/Modulos/ProcesoPresupuestoCliente/Views/uEditorProcesoPresupuestosCliente.dfm
+++ b/Source/Modulos/ProcesoPresupuestoCliente/Views/uEditorProcesoPresupuestosCliente.dfm
@@ -7,7 +7,14 @@ inherited fEditorProcesoPresupuestosCliente: TfEditorProcesoPresupuestosCliente
end
inherited TBXDock: TTBXDock
inherited tbxMain: TTBXToolbar
- ExplicitWidth = 358
+ ExplicitWidth = 463
+ end
+ inherited tbxFiltro: TTBXToolbar
+ ExplicitWidth = 269
+ end
+ inherited TBXTMain2: TTBXToolbar
+ Left = 318
+ ExplicitLeft = 318
end
end
inline frViewProcesoPresupuestosCliente1: TfrViewProcesoPresupuestosCliente [3]
@@ -143,6 +150,15 @@ inherited fEditorProcesoPresupuestosCliente: TfEditorProcesoPresupuestosCliente
Enabled = False
Visible = False
end
+ inherited actFiltrar: TAction
+ Visible = False
+ end
+ inherited actExpandir: TAction
+ Visible = True
+ end
+ inherited actContraer: TAction
+ Visible = True
+ end
end
inherited SmallImages: TPngImageList [5]
end
diff --git a/Source/Modulos/ProcesoPresupuestoCliente/Views/uEditorProcesoPresupuestosCliente.pas b/Source/Modulos/ProcesoPresupuestoCliente/Views/uEditorProcesoPresupuestosCliente.pas
index 7d06c05..2a5e9bc 100644
--- a/Source/Modulos/ProcesoPresupuestoCliente/Views/uEditorProcesoPresupuestosCliente.pas
+++ b/Source/Modulos/ProcesoPresupuestoCliente/Views/uEditorProcesoPresupuestosCliente.pas
@@ -107,6 +107,7 @@ begin
FacturasCliente.DataTable.Active := True;
ViewGrid.GotoFirst;
+ ViewGrid.ContraerTodo;
end;
function TfEditorProcesoPresupuestosCliente.GetAlbaranesCliente: IBizAlbaranCliente;
diff --git a/Source/Modulos/ProcesoPresupuestoCliente/Views/uViewProcesoPresupuestosCliente.dfm b/Source/Modulos/ProcesoPresupuestoCliente/Views/uViewProcesoPresupuestosCliente.dfm
index 0fcf323..6877d7d 100644
--- a/Source/Modulos/ProcesoPresupuestoCliente/Views/uViewProcesoPresupuestosCliente.dfm
+++ b/Source/Modulos/ProcesoPresupuestoCliente/Views/uViewProcesoPresupuestosCliente.dfm
@@ -10,7 +10,7 @@ inherited frViewProcesoPresupuestosCliente: TfrViewProcesoPresupuestosCliente
VisibleForCustomization = False
end
object cxGridViewREFERENCIA: TcxGridDBColumn
- Caption = 'Ref. Ped. Cliente'
+ Caption = 'Ref. Pedido de cliente'
DataBinding.FieldName = 'REFERENCIA'
end
object cxGridViewREFERENCIA_CLIENTE: TcxGridDBColumn
@@ -26,7 +26,7 @@ inherited frViewProcesoPresupuestosCliente: TfrViewProcesoPresupuestosCliente
DataBinding.FieldName = 'SITUACION'
end
object cxGridViewFECHA_PEDIDO: TcxGridDBColumn
- Caption = 'Fecha'
+ Caption = 'Fecha del pedido'
DataBinding.FieldName = 'FECHA_PEDIDO'
end
end
@@ -58,7 +58,7 @@ inherited frViewProcesoPresupuestosCliente: TfrViewProcesoPresupuestosCliente
OptionsView.GroupRowStyle = grsOffice11
OptionsView.HeaderEndEllipsis = True
object cxGridViewPedidosProveedorREFERENCIA: TcxGridDBColumn
- Caption = 'Ref. Ped. Proveedor'
+ Caption = 'Ref. Pedido de proveedor'
DataBinding.FieldName = 'REFERENCIA'
end
object cxGridViewPedidosProveedorNOMBRE: TcxGridDBColumn
@@ -66,10 +66,11 @@ inherited frViewProcesoPresupuestosCliente: TfrViewProcesoPresupuestosCliente
DataBinding.FieldName = 'NOMBRE'
end
object cxGridViewPedidosProveedorSITUACION: TcxGridDBColumn
+ Caption = 'Stuaci'#243'n'
DataBinding.FieldName = 'SITUACION'
end
object cxGridViewPedidosProveedorFECHA_PEDIDO: TcxGridDBColumn
- Caption = 'Fecha'
+ Caption = 'Fecha del pedido'
DataBinding.FieldName = 'FECHA_PEDIDO'
end
end
@@ -101,13 +102,15 @@ inherited frViewProcesoPresupuestosCliente: TfrViewProcesoPresupuestosCliente
OptionsView.GroupRowStyle = grsOffice11
OptionsView.HeaderEndEllipsis = True
object cxGridViewAlbaranesProveedorREFERENCIA: TcxGridDBColumn
- Caption = 'Ref. Alb. Proveedor'
+ Caption = 'Ref. Albar'#225'n de proveedor'
DataBinding.FieldName = 'REFERENCIA'
end
object cxGridViewAlbaranesProveedorSITUACION: TcxGridDBColumn
+ Caption = 'Situaci'#243'n'
DataBinding.FieldName = 'SITUACION'
end
object cxGridViewAlbaranesProveedorFECHA_ALBARAN: TcxGridDBColumn
+ Caption = 'Fecha de albar'#225'n'
DataBinding.FieldName = 'FECHA_ALBARAN'
end
end
@@ -139,16 +142,19 @@ inherited frViewProcesoPresupuestosCliente: TfrViewProcesoPresupuestosCliente
OptionsView.GroupRowStyle = grsOffice11
OptionsView.HeaderEndEllipsis = True
object cxGridViewFacturasProveedorREFERENCIA: TcxGridDBColumn
- Caption = 'Ref. Fac. Proveedor'
+ Caption = 'Ref. Factura de proveedor'
DataBinding.FieldName = 'REFERENCIA'
end
object cxGridViewFacturasProveedorREFERENCIA_PROVEEDOR: TcxGridDBColumn
+ Caption = 'Ref. del proveedor'
DataBinding.FieldName = 'REFERENCIA_PROVEEDOR'
end
object cxGridViewFacturasProveedorSITUACION: TcxGridDBColumn
+ Caption = 'Situaci'#243'n'
DataBinding.FieldName = 'SITUACION'
end
object cxGridViewFacturasProveedorFECHA_FACTURA: TcxGridDBColumn
+ Caption = 'Fecha factura'
DataBinding.FieldName = 'FECHA_FACTURA'
end
end
@@ -180,9 +186,17 @@ inherited frViewProcesoPresupuestosCliente: TfrViewProcesoPresupuestosCliente
OptionsView.GroupRowStyle = grsOffice11
OptionsView.HeaderEndEllipsis = True
object cxGridViewAlbaranesClienteREFERENCIA: TcxGridDBColumn
- Caption = 'Ref. Alb. Cliente'
+ Caption = 'Ref. Albar'#225'n de cliente'
DataBinding.FieldName = 'REFERENCIA'
end
+ object cxGridViewAlbaranesClienteSITUACION: TcxGridDBColumn
+ Caption = 'Situaci'#243'n'
+ DataBinding.FieldName = 'SITUACION'
+ end
+ object cxGridViewAlbaranesClienteFECHA_ALBARAN: TcxGridDBColumn
+ Caption = 'Fecha albar'#225'n'
+ DataBinding.FieldName = 'FECHA_ALBARAN'
+ end
end
object cxGridViewFacturasCliente: TcxGridDBTableView [5]
NavigatorButtons.ConfirmDelete = False
@@ -212,11 +226,20 @@ inherited frViewProcesoPresupuestosCliente: TfrViewProcesoPresupuestosCliente
OptionsView.GroupRowStyle = grsOffice11
OptionsView.HeaderEndEllipsis = True
object cxGridViewFacturasClienteREFERENCIA: TcxGridDBColumn
- Caption = 'Ref. fac. Cliente'
+ Caption = 'Ref. factura de cliente'
DataBinding.FieldName = 'REFERENCIA'
end
+ object cxGridViewFacturasClienteSITUACION: TcxGridDBColumn
+ Caption = 'Situaci'#243'n'
+ DataBinding.FieldName = 'SITUACION'
+ end
+ object cxGridViewFacturasClienteFECHA_FACTURA: TcxGridDBColumn
+ Caption = 'Fecha'
+ DataBinding.FieldName = 'FECHA_FACTURA'
+ end
end
inherited cxGridLevel: TcxGridLevel
+ Options.DetailFrameColor = cl3DLight
Options.DetailTabsPosition = dtpTop
object cxGridLevelPedidosProveedor: TcxGridLevel
Caption = 'Documentos de Proveedor'
diff --git a/Source/Modulos/ProcesoPresupuestoCliente/Views/uViewProcesoPresupuestosCliente.pas b/Source/Modulos/ProcesoPresupuestoCliente/Views/uViewProcesoPresupuestosCliente.pas
index 8823104..f759e98 100644
--- a/Source/Modulos/ProcesoPresupuestoCliente/Views/uViewProcesoPresupuestosCliente.pas
+++ b/Source/Modulos/ProcesoPresupuestoCliente/Views/uViewProcesoPresupuestosCliente.pas
@@ -77,6 +77,10 @@ type
cxGridViewAlbaranesClienteREFERENCIA: TcxGridDBColumn;
dsAlbaranesCliente: TDADataSource;
dsFacturasCliente: TDADataSource;
+ cxGridViewAlbaranesClienteSITUACION: TcxGridDBColumn;
+ cxGridViewAlbaranesClienteFECHA_ALBARAN: TcxGridDBColumn;
+ cxGridViewFacturasClienteSITUACION: TcxGridDBColumn;
+ cxGridViewFacturasClienteFECHA_FACTURA: TcxGridDBColumn;
procedure CustomViewShow(Sender: TObject);
protected
@@ -126,6 +130,8 @@ begin
inherited;
if Assigned(FPedidosCliente) then
FPedidosCliente.Active := True;
+
+// cxGridView.
end;
destructor TfrViewProcesoPresupuestosCliente.Destroy;
diff --git a/Source/Modulos/Tienda web/Data/TiendaWeb_data.drc b/Source/Modulos/Tienda web/Data/TiendaWeb_data.drc
index 08d6106..b26e645 100644
--- a/Source/Modulos/Tienda web/Data/TiendaWeb_data.drc
+++ b/Source/Modulos/Tienda web/Data/TiendaWeb_data.drc
@@ -14,4 +14,4 @@ END
/* C:\Codigo\Source\Modulos\Tienda web\Data\uDataModuleTiendaWeb.dfm */
/* C:\Codigo\Source\Modulos\Tienda web\Data\TiendaWeb_data.res */
-/* c:\temp\dtfC7C.tmp */
+/* c:\temp\dtfDC6.tmp */
diff --git a/Source/Servidor/FactuGES_Server.RES b/Source/Servidor/FactuGES_Server.RES
index d601e69..f9c046a 100644
Binary files a/Source/Servidor/FactuGES_Server.RES and b/Source/Servidor/FactuGES_Server.RES differ
diff --git a/Source/Servidor/FactuGES_Server.dproj b/Source/Servidor/FactuGES_Server.dproj
index 5bab92f..c9f3497 100644
--- a/Source/Servidor/FactuGES_Server.dproj
+++ b/Source/Servidor/FactuGES_Server.dproj
@@ -1,407 +1,407 @@
-
+
-
- {ebdcd25d-40d7-4146-91ec-a0ea4aa1dcd1}
- FactuGES_Server.dpr
- Debug
- AnyCPU
- DCC32
- ..\..\Output\Debug\Servidor\FactuGES_Server.exe
- vcl;rtl;vclx;vclactnband;dbrtl;vcldb;vcldbx;bdertl;dsnap;dsnapcon;teeUI;teedb;tee;adortl;vclib;ibxpress;dbxcds;dbexpress;DbxCommonDriver;IndyCore;IndySystem;IndyProtocols;VclSmp;vclie;webdsnap;xmlrtl;inet;inetdbbde;inetdbxpress;RemObjects_BPDX_D11;RemObjects_RODX_D11;RemObjects_Indy_D11;RemObjects_Synapse_D11;RemObjects_WebBroker_D11;DataAbstract_Core_D11;DataAbstract_DBXDriver_D11;DataAbstract_IDE_D11;DataAbstract_Scripting_D11;DataAbstract_SDACDriver_D11;sdac105;dac105;DataAbstract_SQLiteDriver_D11;cxEditorsD10;cxLibraryD10;dxThemeD10;cxDataD10;cxExtEditorsD10;cxGridD10;cxPageControlD10;cxSchedulerD10;cxTreeListD10;cxVerticalGridD10;dxBarD10;dxComnD10;dxBarDBNavD10;dxBarExtDBItemsD10;dxBarExtItemsD10;dxDockingD10;dxLayoutControlD10;dxNavBarD10;dxPSCoreD10;dxsbD10;dxPScxCommonD10;dxPSLnksD10;vclshlctrls;dxPScxExtCommonD10;dxPScxGridLnkD10;dxPScxPCProdD10;dxPScxScheduler2LnkD10;dxPScxTLLnkD10;dxPSdxLCLnkD10;dxPsPrVwAdvD10;pckMD5;pckUCDataConnector;pckUserControl_RT;PluginSDK_D10R;PNG_D10;PngComponentsD10;tb2k_d10;tbx_d10;JclVcl;Jcl;JvXPCtrlsD11R;JvCoreD11R;JvSystemD11R;JvStdCtrlsD11R;JvAppFrmD11R;JvBandsD11R;JvDBD11R;JvDlgsD11R;JvBDED11R;JvCmpD11R;JvCryptD11R;JvCtrlsD11R;JvCustomD11R;JvDockingD11R;JvDotNetCtrlsD11R;JvEDID11R;JvGlobusD11R;JvHMID11R;JvInterpreterD11R;JvJansD11R;JvManagedThreadsD11R;JvMMD11R;JvNetD11R;JvPageCompsD11R;JvPluginD11R;JvPrintPreviewD11R;JvRuntimeDesignD11R;JvTimeFrameworkD11R;JvUIBD11R;JvValidatorsD11R;JvWizardD11R;pckUCADOConn;pckUCBDEConn;pckUCIBXConn;pckUCMidasConn;cxIntlPrintSys3D10;cxExportD10;cxIntl5D10;GUISDK_D11R;ccpackD11;JSDialog100;fsTee11;fs11;frx11;frxADO11;frxBDE11;frxDB11;frxDBX11;frxe11;frxIBX11;frxTee11;fsADO11;fsBDE11;fsDB11;fsIBX11;websnap;soaprtl;IntrawebDB_90_100;Intraweb_90_100
-
-
- 7.0
- False
- False
- 0
- 3
- ..\..\Output\Release\Servidor
- RELEASE
-
-
- 7.0
- 3
- ..\..\Output\Debug\Servidor
- DEBUG;
- True
- True
- True
- C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10
- C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10
- C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10
- C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10
-
-
- Delphi.Personality
-
-
-FalseTrueFalse/standaloneTrueFalse4320FalseFalseFalseFalseFalse308212524.3.2.04.3.2.0viernes, 19 de julio de 2013 13:48
- ExpressPrinting System by Developer Express Inc.
- FactuGES_Server.dprFalse
-
-
-
-
- MainSource
-
-
-
-
-
-
- TDARemoteService
-
-
-
- TDataModule
-
-
-
-
-
- TDataAbstractService
-
-
-
-
-
-
-
-
-
- TDataModule
-
-
- TDataModule
-
-
-
-
- TDataAbstractService
-
-
-
-
-
-
- TDataModule
-
-
- TDataModule
-
-
-
-
- TDataAbstractService
-
-
-
-
-
- TDARemoteService
-
-
-
-
-
-
- TDARemoteService
-
-
-
-
-
-
- TDataModule
-
-
-
- TDataAbstractService
-
-
-
-
-
-
-
-
-
-
- TDataModule
-
-
-
- TDataModule
-
-
-
- TDARemoteService
-
-
-
-
-
- TDataAbstractService
-
-
-
-
-
-
- TDataModule
-
-
- TDataModule
-
-
-
-
- TDataAbstractService
-
-
-
-
-
-
- TDataModule
-
-
-
- TDataAbstractService
-
-
-
-
-
- TDataAbstractService
-
-
-
-
-
- TDataAbstractService
-
-
-
- TDataAbstractService
-
-
-
- TDataAbstractService
-
-
-
-
-
- TDataAbstractService
-
-
-
-
-
- TDARemoteService
-
-
-
- TDARemoteService
-
-
-
-
-
- TDataAbstractService
-
-
-
-
-
- TDataAbstractService
-
-
-
-
-
- TDataAbstractService
-
-
-
-
-
-
- TDataAbstractService
-
-
-
-
-
-
- TDataModule
-
-
- TDataModule
-
-
-
-
- TDataAbstractService
-
-
-
-
-
-
- TDataModule
-
-
-
- TDataAbstractService
-
-
-
-
-
-
- TDataModule
-
-
- TDataModule
-
-
-
- TDataModule
-
-
-
-
- TDataAbstractService
-
-
-
-
-
- TDataModule
-
-
-
- TDataAbstractService
-
-
-
-
-
- TDataModule
-
-
-
- TDataAbstractService
-
-
-
-
-
- TDataAbstractService
-
-
-
- TDataAbstractService
-
-
-
-
-
-
- TDataModule
-
-
-
- TDataAbstractService
-
-
-
-
-
-
- TDataModule
-
-
-
- TDataAbstractService
-
-
-
-
-
-
-
-
-
-
-
- TDataAbstractService
-
-
-
-
-
- TDataAbstractService
-
-
-
-
-
- TDataAbstractService
-
-
-
-
-
- TDataAbstractService
-
-
-
- TFrame
-
-
-
- TFrame
-
-
-
- TFrame
-
-
-
- TForm
-
-
-
- TFrame
-
-
-
- TDARemoteService
-
-
-
-
-
-
- TDataModule
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
+
+ {ebdcd25d-40d7-4146-91ec-a0ea4aa1dcd1}
+ FactuGES_Server.dpr
+ Debug
+ AnyCPU
+ DCC32
+ ..\..\Output\Debug\Servidor\FactuGES_Server.exe
+ vcl;rtl;vclx;vclactnband;dbrtl;vcldb;vcldbx;bdertl;dsnap;dsnapcon;teeUI;teedb;tee;adortl;vclib;ibxpress;dbxcds;dbexpress;DbxCommonDriver;IndyCore;IndySystem;IndyProtocols;VclSmp;vclie;webdsnap;xmlrtl;inet;inetdbbde;inetdbxpress;RemObjects_BPDX_D11;RemObjects_RODX_D11;RemObjects_Indy_D11;RemObjects_Synapse_D11;RemObjects_WebBroker_D11;DataAbstract_Core_D11;DataAbstract_DBXDriver_D11;DataAbstract_IDE_D11;DataAbstract_Scripting_D11;DataAbstract_SDACDriver_D11;sdac105;dac105;DataAbstract_SQLiteDriver_D11;cxEditorsD10;cxLibraryD10;dxThemeD10;cxDataD10;cxExtEditorsD10;cxGridD10;cxPageControlD10;cxSchedulerD10;cxTreeListD10;cxVerticalGridD10;dxBarD10;dxComnD10;dxBarDBNavD10;dxBarExtDBItemsD10;dxBarExtItemsD10;dxDockingD10;dxLayoutControlD10;dxNavBarD10;dxPSCoreD10;dxsbD10;dxPScxCommonD10;dxPSLnksD10;vclshlctrls;dxPScxExtCommonD10;dxPScxGridLnkD10;dxPScxPCProdD10;dxPScxScheduler2LnkD10;dxPScxTLLnkD10;dxPSdxLCLnkD10;dxPsPrVwAdvD10;pckMD5;pckUCDataConnector;pckUserControl_RT;PluginSDK_D10R;PNG_D10;PngComponentsD10;tb2k_d10;tbx_d10;JclVcl;Jcl;JvXPCtrlsD11R;JvCoreD11R;JvSystemD11R;JvStdCtrlsD11R;JvAppFrmD11R;JvBandsD11R;JvDBD11R;JvDlgsD11R;JvBDED11R;JvCmpD11R;JvCryptD11R;JvCtrlsD11R;JvCustomD11R;JvDockingD11R;JvDotNetCtrlsD11R;JvEDID11R;JvGlobusD11R;JvHMID11R;JvInterpreterD11R;JvJansD11R;JvManagedThreadsD11R;JvMMD11R;JvNetD11R;JvPageCompsD11R;JvPluginD11R;JvPrintPreviewD11R;JvRuntimeDesignD11R;JvTimeFrameworkD11R;JvUIBD11R;JvValidatorsD11R;JvWizardD11R;pckUCADOConn;pckUCBDEConn;pckUCIBXConn;pckUCMidasConn;cxIntlPrintSys3D10;cxExportD10;cxIntl5D10;GUISDK_D11R;ccpackD11;JSDialog100;fsTee11;fs11;frx11;frxADO11;frxBDE11;frxDB11;frxDBX11;frxe11;frxIBX11;frxTee11;fsADO11;fsBDE11;fsDB11;fsIBX11;websnap;soaprtl;IntrawebDB_90_100;Intraweb_90_100
+
+
+ 7.0
+ False
+ False
+ 0
+ 3
+ ..\..\Output\Release\Servidor
+ RELEASE
+
+
+ 7.0
+ 3
+ ..\..\Output\Debug\Servidor
+ DEBUG;
+ True
+ True
+ True
+ C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10
+ C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10
+ C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10
+ C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10
+
+
+ Delphi.Personality
+
+
+ FalseTrueFalse/standaloneTrueFalse4330FalseFalseFalseFalseFalse308212524.3.3.04.3.3.0jueves, 05 de septiembre de 2013 18:20
+ ExpressPrinting System by Developer Express Inc.
+ FactuGES_Server.dprFalse
+
+
+
+
+ MainSource
+
+
+
+
+
+
+ TDARemoteService
+
+
+
+ TDataModule
+
+
+
+
+
+ TDataAbstractService
+
+
+
+
+
+
+
+
+
+ TDataModule
+
+
+ TDataModule
+
+
+
+
+ TDataAbstractService
+
+
+
+
+
+
+ TDataModule
+
+
+ TDataModule
+
+
+
+
+ TDataAbstractService
+
+
+
+
+
+ TDARemoteService
+
+
+
+
+
+
+ TDARemoteService
+
+
+
+
+
+
+ TDataModule
+
+
+
+ TDataAbstractService
+
+
+
+
+
+
+
+
+
+
+ TDataModule
+
+
+
+ TDataModule
+
+
+
+ TDARemoteService
+
+
+
+
+
+ TDataAbstractService
+
+
+
+
+
+
+ TDataModule
+
+
+ TDataModule
+
+
+
+
+ TDataAbstractService
+
+
+
+
+
+
+ TDataModule
+
+
+
+ TDataAbstractService
+
+
+
+
+
+ TDataAbstractService
+
+
+
+
+
+ TDataAbstractService
+
+
+
+ TDataAbstractService
+
+
+
+ TDataAbstractService
+
+
+
+
+
+ TDataAbstractService
+
+
+
+
+
+ TDARemoteService
+
+
+
+ TDARemoteService
+
+
+
+
+
+ TDataAbstractService
+
+
+
+
+
+ TDataAbstractService
+
+
+
+
+
+ TDataAbstractService
+
+
+
+
+
+
+ TDataAbstractService
+
+
+
+
+
+
+ TDataModule
+
+
+ TDataModule
+
+
+
+
+ TDataAbstractService
+
+
+
+
+
+
+ TDataModule
+
+
+
+ TDataAbstractService
+
+
+
+
+
+
+ TDataModule
+
+
+ TDataModule
+
+
+
+ TDataModule
+
+
+
+
+ TDataAbstractService
+
+
+
+
+
+ TDataModule
+
+
+
+ TDataAbstractService
+
+
+
+
+
+ TDataModule
+
+
+
+ TDataAbstractService
+
+
+
+
+
+ TDataAbstractService
+
+
+
+ TDataAbstractService
+
+
+
+
+
+
+ TDataModule
+
+
+
+ TDataAbstractService
+
+
+
+
+
+
+ TDataModule
+
+
+
+ TDataAbstractService
+
+
+
+
+
+
+
+
+
+
+
+ TDataAbstractService
+
+
+
+
+
+ TDataAbstractService
+
+
+
+
+
+ TDataAbstractService
+
+
+
+
+
+ TDataAbstractService
+
+
+
+ TFrame
+
+
+
+ TFrame
+
+
+
+ TFrame
+
+
+
+ TForm
+
+
+
+ TFrame
+
+
+
+ TDARemoteService
+
+
+
+
+
+
+ TDataModule
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+