Arreglo de los dblookupcombox para que sea autosync, y sin gridmode, asi se refresca automaticamente. Además se ha quietado la parte de codigo comentada en albaranes de cliente

git-svn-id: https://192.168.0.254/svn/Proyectos.Acana_FactuGES2/trunk@92 f4e31baf-9722-1c47-927c-6f952f962d4b

Source/ApplicationBase/Ejercicios/Data/uDataModuleEjercicios.pas

@@ -31,7 +31,7 @@ uses
   FactuGES_Intf, uDataModuleConexion, uDataTableUtils, cxControls,
   schEjerciciosClient_Intf;
 
-{ TdmAlmacens }
+{ TdmEjercicios }
 
 procedure TDataModuleEjercicios.DAClientDataModuleCreate(Sender: TObject);
 begin

Source/Cliente/uBootStrap.pas

@@ -11,6 +11,7 @@ procedure Run;
 procedure Terminate;
 
 implementation
+{$INCLUDE ..\FactuGES.inc}
 
 uses
   uDMBase, uDataModuleConexion, uDataModuleConfiguracion,
@@ -24,10 +25,13 @@ begin
     LoadModule('TiposIVA_plugin.bpl');
     LoadModule('Familias_plugin.bpl');
     LoadModule('UnidadesMedida_plugin.bpl');
-    
+
     LoadModule('Contactos_plugin.bpl');
 
+    {$IFDEF ALMACEN}
     LoadModule('Almacenes_plugin.bpl');
+    {$ENDIF}
+
     LoadModule('Articulos_plugin.bpl');
 
     LoadModule('PresupuestosCliente_plugin.bpl');

Source/GUIBase/uViewTotales.dfm

@@ -1,14 +1,14 @@
 inherited frViewTotales: TfrViewTotales
-  Width = 451
+  Width = 751
-  Height = 350
+  Height = 227
   Align = alBottom
-  ExplicitWidth = 451
+  ExplicitWidth = 751
-  ExplicitHeight = 350
+  ExplicitHeight = 227
   object dxLayoutControl1: TdxLayoutControl
     AlignWithMargins = True
     Left = 0
     Top = 0
-    Width = 451
+    Width = 751
     Height = 217
     Margins.Left = 0
     Margins.Top = 0
@@ -18,6 +18,7 @@ inherited frViewTotales: TfrViewTotales
     ParentBackground = True
     TabOrder = 0
     AutoContentSizes = [acsWidth, acsHeight]
+    ExplicitWidth = 451
     object Bevel1: TBevel
       Left = 104
       Top = 109
@@ -26,14 +27,14 @@ inherited frViewTotales: TfrViewTotales
       Shape = bsBottomLine
     end
     object Bevel3: TBevel
-      Left = 278
+      Left = 372
       Top = 28
       Width = 3
       Height = 122
       Shape = bsRightLine
     end
     object Bevel4: TBevel
-      Left = 390
+      Left = 484
       Top = 109
       Width = 192
       Height = 9
@@ -71,7 +72,7 @@ inherited frViewTotales: TfrViewTotales
       Width = 93
     end
     object ImporteIVA: TcxDBCurrencyEdit
-      Left = 461
+      Left = 555
       Top = 55
       AutoSize = False
       DataBinding.DataField = 'IMPORTE_IVA'
@@ -102,7 +103,7 @@ inherited frViewTotales: TfrViewTotales
       Width = 137
     end
     object ImporteTotal: TcxDBCurrencyEdit
-      Left = 391
+      Left = 485
       Top = 129
       AutoSize = False
       DataBinding.DataField = 'IMPORTE_TOTAL'
@@ -164,7 +165,7 @@ inherited frViewTotales: TfrViewTotales
       Width = 65
     end
     object edtIVA: TcxDBSpinEdit
-      Left = 390
+      Left = 484
       Top = 55
       AutoSize = False
       DataBinding.DataField = 'IVA'
@@ -201,7 +202,7 @@ inherited frViewTotales: TfrViewTotales
       Width = 65
     end
     object ImporteBase: TcxDBCurrencyEdit
-      Left = 390
+      Left = 484
       Top = 28
       AutoSize = False
       DataBinding.DataField = 'BASE_IMPONIBLE'
@@ -232,7 +233,7 @@ inherited frViewTotales: TfrViewTotales
       Width = 92
     end
     object edtRE: TcxDBSpinEdit
-      Left = 390
+      Left = 484
       Top = 82
       AutoSize = False
       DataBinding.DataField = 'RE'
@@ -269,7 +270,7 @@ inherited frViewTotales: TfrViewTotales
       Width = 65
     end
     object ImporteRE: TcxDBCurrencyEdit
-      Left = 461
+      Left = 555
       Top = 82
       AutoSize = False
       DataBinding.DataField = 'IMPORTE_RE'
@@ -365,7 +366,6 @@ inherited frViewTotales: TfrViewTotales
       Top = 55
       DataBinding.DataField = 'ID_TIPO_IVA'
       DataBinding.DataSource = DADataSource
-      Properties.GridMode = True
       Properties.ImmediatePost = True
       Properties.KeyFieldNames = 'ID'
       Properties.ListColumns = <
@@ -374,6 +374,7 @@ inherited frViewTotales: TfrViewTotales
         end>
       Properties.ListOptions.GridLines = glNone
       Properties.ListOptions.ShowHeader = False
+      Properties.ListOptions.SyncMode = True
       Properties.ListSource = dsTiposIVA
       Style.BorderColor = clWindowFrame
       Style.BorderStyle = ebs3D
@@ -392,7 +393,7 @@ inherited frViewTotales: TfrViewTotales
       Width = 81
     end
     object bTiposIVA: TButton
-      Left = 130
+      Left = 224
       Top = 55
       Width = 132
       Height = 21

Source/Modulos/Albaranes de cliente/Controller/uAlbaranesClienteController.pas

@@ -139,6 +139,7 @@ type
   end;
 
 implementation
+{$INCLUDE ..\..\FactuGES.inc}
 
 uses
   uROTypes, Controls, cxControls, DB, uEditorRegistryUtils, uEditorPreview, DateUtils,
@@ -469,9 +470,12 @@ begin
     if (AAlbaran.IMPORTE_TOTAL >= 0) then
       raise Exception.Create('Una orden de devolución no puede tener un importe total positivo');
 
+
+    {$IFDEF ALMACEN}
     //Una orden de devolución debe tener relleno el almacén de entrada de material
     if (AAlbaran.ID_ALMACEN < 0) or (AAlbaran.ID_ALMACEN = 0) then
       raise Exception.Create('Debe indicar el almacén de entrada de esta orden de devolución');
+    {$ENDIF}
 
     //Ponemos la fecha del albaran de devolución como fecha de envio para que se contabilice según dicha fecha
     AAlbaran.Edit;

Source/Modulos/Albaranes de cliente/Model/uBizAlbaranesCliente.pas

@@ -191,7 +191,7 @@ begin
   REFERENCIA := '';
   TIPO := CTE_TIPO_ALBARAN;
   // ALMACÉN PUESTO A CAPÓN Y PROVISIONAL
-  ID_ALMACEN := 2;
+  ID_ALMACEN := 1;
 end;
 
 procedure TBizAlbaranCliente.IVAOnChange(Sender: TDACustomField);

Source/Modulos/Albaranes de cliente/Views/uViewAlbaranCliente.dfm

@@ -329,6 +329,7 @@ inherited frViewAlbaranCliente: TfrViewAlbaranCliente
         end>
       Properties.ListOptions.GridLines = glNone
       Properties.ListOptions.ShowHeader = False
+      Properties.ListOptions.SyncMode = True
       Properties.ListSource = dsFormaPago
       Style.BorderColor = clWindowFrame
       Style.BorderStyle = ebs3D
@@ -401,6 +402,7 @@ inherited frViewAlbaranCliente: TfrViewAlbaranCliente
         end>
       Properties.ListOptions.GridLines = glNone
       Properties.ListOptions.ShowHeader = False
+      Properties.ListOptions.SyncMode = True
       Properties.ListSource = dsAlmacenes
       Style.BorderColor = clWindowFrame
       Style.BorderStyle = ebs3D

Source/Modulos/Albaranes de cliente/Views/uViewAlbaranesCliente.dfm

@@ -110,6 +110,8 @@ inherited frViewAlbaranesCliente: TfrViewAlbaranesCliente
       end
       object cxGridViewNOMBRE_ALMACEN: TcxGridDBColumn
         DataBinding.FieldName = 'NOMBRE_ALMACEN'
+        Visible = False
+        VisibleForCustomization = False
         Width = 63
       end
       object cxGridViewCALLE: TcxGridDBColumn
@@ -172,6 +174,14 @@ inherited frViewAlbaranesCliente: TfrViewAlbaranesCliente
       inherited dxLayoutControl1: TdxLayoutControl
         Width = 596
         ExplicitWidth = 596
+        inherited txtFiltroTodo: TcxTextEdit
+          ExplicitWidth = 273
+          Width = 273
+        end
+        inherited edtFechaIniFiltro: TcxDateEdit
+          ExplicitWidth = 121
+          Width = 121
+        end
         inherited edtFechaFinFiltro: TcxDateEdit
           Left = 251
           ExplicitLeft = 251
@@ -260,6 +270,8 @@ inherited frViewAlbaranesCliente: TfrViewAlbaranesCliente
     end
     object actAlmacenes: TAction
       Caption = 'Almacenes'
+      Enabled = False
+      Visible = False
       OnExecute = actAlmacenesExecute
       OnUpdate = actAlmacenesUpdate
     end

Source/Modulos/Albaranes de cliente/Views/uViewAlbaranesCliente.pas

@@ -12,7 +12,8 @@ uses
   uDADataTable, cxGridLevel, cxClasses, cxControls, cxGridCustomView, Classes,
   cxGrid,
   uBizAlbaranesCliente, cxCurrencyEdit, Forms, uViewFiltroBase, ComCtrls, Tabs,
-  cxPC, ActnList, TB2Item, TBX, TB2Dock, TB2Toolbar, TBXDkPanels, dxPgsDlg;
+  cxPC, ActnList, TB2Item, TBX, TB2Dock, TB2Toolbar, TBXDkPanels, dxPgsDlg,
+  uDAInterfaces;
 
 type
   IViewAlbaranesCliente = interface(IViewGrid)

Source/Modulos/Albaranes de proveedor/Views/uViewAlbaranProveedor.dfm

@@ -203,6 +203,7 @@ inherited frViewAlbaranProveedor: TfrViewAlbaranProveedor
         end>
       Properties.ListOptions.GridLines = glNone
       Properties.ListOptions.ShowHeader = False
+      Properties.ListOptions.SyncMode = True      
       Properties.ListSource = dsFormaPago
       Style.BorderColor = clWindowFrame
       Style.BorderStyle = ebs3D

Source/Modulos/Almacenes/Views/uEditorListaAlmacenes.dfm

@@ -54,6 +54,7 @@ object fEditorListaAlmacenes: TfEditorListaAlmacenes
     Properties.ListOptions.AnsiSort = True
     Properties.ListOptions.GridLines = glNone
     Properties.ListOptions.ShowHeader = False
+    Properties.ListOptions.SyncMode = True    
     Properties.ListSource = DADataSource
     Style.LookAndFeel.NativeStyle = True
     StyleDisabled.LookAndFeel.NativeStyle = True

Source/Modulos/Almacenes/Views/uListaAlmacenes.dfm

@@ -53,6 +53,7 @@ object fListaAlmacenes: TfListaAlmacenes
     Properties.ListOptions.AnsiSort = True
     Properties.ListOptions.GridLines = glNone
     Properties.ListOptions.ShowHeader = False
+    Properties.ListOptions.SyncMode = True    
     Properties.ListSource = DADataSource
     Style.LookAndFeel.NativeStyle = True
     StyleDisabled.LookAndFeel.NativeStyle = True

Source/Modulos/Comisiones/Views/uViewComision.dfm

@@ -90,7 +90,6 @@ inherited frViewComision: TfrViewComision
       Top = 57
       DataBinding.DataField = 'ID_AGENTE'
       DataBinding.DataSource = dsDataTable
-      Properties.GridMode = True
       Properties.ImmediatePost = True
       Properties.KeyFieldNames = 'ID'
       Properties.ListColumns = <
@@ -99,6 +98,7 @@ inherited frViewComision: TfrViewComision
         end>
       Properties.ListOptions.GridLines = glNone
       Properties.ListOptions.ShowHeader = False
+      Properties.ListOptions.SyncMode = True      
       Properties.ListSource = dsAgentes
       Style.BorderColor = clWindowFrame
       Style.BorderStyle = ebs3D

Source/Modulos/Contactos/Views/uViewClienteDatosComerciales.dfm

@@ -109,6 +109,7 @@ inherited frViewClienteDatosComerciales: TfrViewClienteDatosComerciales
         end>
       Properties.ListOptions.GridLines = glNone
       Properties.ListOptions.ShowHeader = False
+      Properties.ListOptions.SyncMode = True      
       Properties.ListSource = dsFormaPago
       Style.BorderColor = clWindowFrame
       Style.BorderStyle = ebs3D
@@ -148,6 +149,7 @@ inherited frViewClienteDatosComerciales: TfrViewClienteDatosComerciales
         end>
       Properties.ListOptions.GridLines = glNone
       Properties.ListOptions.ShowHeader = False
+      Properties.ListOptions.SyncMode = True      
       Properties.ListSource = dsTiposIVA
       Style.BorderColor = clWindowFrame
       Style.BorderStyle = ebs3D

Source/Modulos/Contactos/Views/uViewClienteDescuentos.dfm

@@ -22,6 +22,7 @@ inherited frViewClienteDescuentos: TfrViewClienteDescuentos
           end>
         Properties.ListOptions.GridLines = glNone
         Properties.ListOptions.ShowHeader = False
+        Properties.ListOptions.SyncMode = True        
         Properties.ListSource = dsProveedores
       end
       object cxGridViewDESCUENTO: TcxGridDBColumn

Source/Modulos/Contactos/Views/uViewProveedorDatosComerciales.dfm

@@ -62,6 +62,7 @@ inherited frViewProveedorDatosComerciales: TfrViewProveedorDatosComerciales
         end>
       Properties.ListOptions.GridLines = glNone
       Properties.ListOptions.ShowHeader = False
+      Properties.ListOptions.SyncMode = True
       Properties.ListSource = dsFormaPago
       Style.BorderColor = clWindowFrame
       Style.BorderStyle = ebs3D
@@ -100,6 +101,7 @@ inherited frViewProveedorDatosComerciales: TfrViewProveedorDatosComerciales
         end>
       Properties.ListOptions.GridLines = glNone
       Properties.ListOptions.ShowHeader = False
+      Properties.ListOptions.SyncMode = True      
       Properties.ListSource = dsTiposIVA
       Style.BorderColor = clWindowFrame
       Style.BorderStyle = ebs3D

Source/Modulos/Facturas de cliente/Views/uEditorFacturaCliente.dfm

@@ -71,7 +71,6 @@ inherited fEditorFacturaCliente: TfEditorFacturaCliente
   inherited pgPaginas: TPageControl
     Width = 782
     Height = 311
-    ActivePage = pagContabilidad
     OnChanging = pgPaginasChanging
     ExplicitLeft = 3
     ExplicitTop = 79

Source/Modulos/Facturas de cliente/Views/uViewFacturaCliente.dfm

@@ -1,6 +1,6 @@
 inherited frViewFacturaCliente: TfrViewFacturaCliente
-  Width = 451
+  Width = 914
-  Height = 304
+  Height = 445
   Align = alClient
   OnCreate = CustomViewCreate
   OnDestroy = CustomViewDestroy
@@ -9,16 +9,18 @@ inherited frViewFacturaCliente: TfrViewFacturaCliente
   object dxLayoutControl1: TdxLayoutControl
     Left = 0
     Top = 0
-    Width = 451
+    Width = 914
-    Height = 304
+    Height = 445
     Align = alClient
     ParentBackground = True
     TabOrder = 0
     AutoContentSizes = [acsWidth, acsHeight]
     LookAndFeel = dxLayoutOfficeLookAndFeel1
+    ExplicitWidth = 451
+    ExplicitHeight = 304
     DesignSize = (
-      451
+      914
-      304)
+      445)
     object eReferencia: TcxDBTextEdit
       Left = 124
       Top = 30
@@ -79,7 +81,7 @@ inherited frViewFacturaCliente: TfrViewFacturaCliente
       Width = 301
     end
     inline frViewClienteFactura: TfrViewDatosYSeleccionCliente
-      Left = 310
+      Left = 474
       Top = 30
       Width = 314
       Height = 215
@@ -91,14 +93,14 @@ inherited frViewFacturaCliente: TfrViewFacturaCliente
       ParentFont = False
       TabOrder = 5
       ReadOnly = False
-      ExplicitLeft = 310
+      ExplicitLeft = 474
       ExplicitTop = 30
       ExplicitWidth = 314
       ExplicitHeight = 215
       inherited dxLayoutControl1: TdxLayoutControl
         Width = 314
         Height = 215
-        ExplicitWidth = 314
+        ExplicitWidth = 119
         ExplicitHeight = 215
         inherited edtlNombre: TcxDBTextEdit
           DataBinding.DataSource = DADataSource
@@ -126,13 +128,13 @@ inherited frViewFacturaCliente: TfrViewFacturaCliente
           Width = 327
         end
         inherited edtCodigoPostal: TcxDBTextEdit
-          Left = 192
+          Left = 326
           DataBinding.DataSource = DADataSource
-          ExplicitLeft = 192
+          ExplicitLeft = 326
         end
         inherited Button3: TBitBtn
-          Left = 82
+          Left = 216
-          ExplicitLeft = 82
+          ExplicitLeft = 216
         end
       end
     end
@@ -141,7 +143,6 @@ inherited frViewFacturaCliente: TfrViewFacturaCliente
       Top = 84
       DataBinding.DataField = 'ID_FORMA_PAGO'
       DataBinding.DataSource = DADataSource
-      Properties.GridMode = True
       Properties.ImmediatePost = True
       Properties.KeyFieldNames = 'ID'
       Properties.ListColumns = <
@@ -150,6 +151,7 @@ inherited frViewFacturaCliente: TfrViewFacturaCliente
         end>
       Properties.ListOptions.GridLines = glNone
       Properties.ListOptions.ShowHeader = False
+      Properties.ListOptions.SyncMode = True
       Properties.ListSource = dsFormaPago
       Style.BorderColor = clWindowFrame
       Style.BorderStyle = ebs3D
@@ -168,7 +170,7 @@ inherited frViewFacturaCliente: TfrViewFacturaCliente
       Width = 78
     end
     object bFormasPago: TButton
-      Left = 150
+      Left = 314
       Top = 84
       Width = 132
       Height = 23

Source/Modulos/Facturas de proveedor/Model/schFacturasProveedorClient_Intf.pas

@@ -3,7 +3,7 @@ unit schFacturasProveedorClient_Intf;
 interface
 
 uses
-  Classes, DB, SysUtils, uROClasses, uDADataTable, FmtBCD, uROXMLIntf;
+  Classes, DB, schBase_Intf, SysUtils, uROClasses, uDADataTable, FmtBCD, uROXMLIntf;
 
 const
   { Data table rules ids
@@ -318,7 +318,7 @@ type
   end;
 
   { TFacturasProveedorDataTableRules }
-  TFacturasProveedorDataTableRules = class(TDADataTableRules, IFacturasProveedor)
+  TFacturasProveedorDataTableRules = class(TIntfObjectDADataTableRules, IFacturasProveedor)
   private
     f_OBSERVACIONES: IROStrings;
     procedure OBSERVACIONES_OnChange(Sender: TObject);
@@ -618,7 +618,7 @@ type
   end;
 
   { TFacturasProveedor_DetallesDataTableRules }
-  TFacturasProveedor_DetallesDataTableRules = class(TDADataTableRules, IFacturasProveedor_Detalles)
+  TFacturasProveedor_DetallesDataTableRules = class(TIntfObjectDADataTableRules, IFacturasProveedor_Detalles)
   private
   protected
     { Property getters and setters }

Source/Modulos/Facturas de proveedor/Views/uViewFacturaProveedor.dfm

@@ -86,7 +86,6 @@ inherited frViewFacturaProveedor: TfrViewFacturaProveedor
       Top = 111
       DataBinding.DataField = 'ID_FORMA_PAGO'
       DataBinding.DataSource = DADataSource
-      Properties.GridMode = True
       Properties.ImmediatePost = True
       Properties.KeyFieldNames = 'ID'
       Properties.ListColumns = <
@@ -95,6 +94,7 @@ inherited frViewFacturaProveedor: TfrViewFacturaProveedor
         end>
       Properties.ListOptions.GridLines = glNone
       Properties.ListOptions.ShowHeader = False
+      Properties.ListOptions.SyncMode = True
       Properties.ListSource = dsFormaPago
       Style.BorderColor = clWindowFrame
       Style.BorderStyle = ebs3D

Source/Modulos/Pedidos a proveedor/Views/uViewDireccionEntregaPedidoProv.dfm

@@ -39,7 +39,6 @@ inherited frViewDireccionEntregaPedidoProv: TfrViewDireccionEntregaPedidoProv
       DataBinding.DataField = 'ID_ALMACEN'
       DataBinding.DataSource = dsPedido
       Properties.DropDownListStyle = lsFixedList
-      Properties.GridMode = True
       Properties.ImmediatePost = True
       Properties.KeyFieldNames = 'ID'
       Properties.ListColumns = <
@@ -48,6 +47,7 @@ inherited frViewDireccionEntregaPedidoProv: TfrViewDireccionEntregaPedidoProv
         end>
       Properties.ListOptions.AnsiSort = True
       Properties.ListOptions.GridLines = glNone
+      Properties.ListOptions.SyncMode = True
       Properties.ListOptions.ShowHeader = False
       Properties.ListSource = dsAlmacenes
       Properties.PostPopupValueOnTab = True

Source/Modulos/Pedidos a proveedor/Views/uViewPedidoProveedor.dfm

@@ -236,6 +236,7 @@ inherited frViewPedidoProveedor: TfrViewPedidoProveedor
         end>
       Properties.ListOptions.GridLines = glNone
       Properties.ListOptions.ShowHeader = False
+      Properties.ListOptions.SyncMode = True      
       Properties.ListSource = dsFormaPago
       Style.BorderColor = clWindowFrame
       Style.BorderStyle = ebs3D

Source/Modulos/Presupuestos de cliente/Views/uViewPresupuestoCliente.dfm

@@ -153,6 +153,7 @@ inherited frViewPresupuestoCliente: TfrViewPresupuestoCliente
         end>
       Properties.ListOptions.GridLines = glNone
       Properties.ListOptions.ShowHeader = False
+      Properties.ListOptions.SyncMode = True      
       Properties.ListSource = dsFormaPago
       Style.BorderColor = clWindowFrame
       Style.BorderStyle = ebs3D

Source/Modulos/Recibos de proveedor/Model/schRecibosProveedorClient_Intf.pas

@@ -3,7 +3,7 @@ unit schRecibosProveedorClient_Intf;
 interface
 
 uses
-  Classes, DB, SysUtils, uROClasses, uDADataTable, FmtBCD, uROXMLIntf;
+  Classes, DB, schBase_Intf, SysUtils, uROClasses, uDADataTable, FmtBCD, uROXMLIntf;
 
 const
   { Data table rules ids
@@ -377,7 +377,7 @@ type
   end;
 
   { TRecibosCompensadosProvDataTableRules }
-  TRecibosCompensadosProvDataTableRules = class(TDADataTableRules, IRecibosCompensadosProv)
+  TRecibosCompensadosProvDataTableRules = class(TIntfObjectDADataTableRules, IRecibosCompensadosProv)
   private
   protected
     { Property getters and setters }
@@ -772,7 +772,7 @@ type
   end;
 
   { TRecibosProveedorDataTableRules }
-  TRecibosProveedorDataTableRules = class(TDADataTableRules, IRecibosProveedor)
+  TRecibosProveedorDataTableRules = class(TIntfObjectDADataTableRules, IRecibosProveedor)
   private
   protected
     { Property getters and setters }
@@ -1059,7 +1059,7 @@ type
   end;
 
   { TPagosProveedorDataTableRules }
-  TPagosProveedorDataTableRules = class(TDADataTableRules, IPagosProveedor)
+  TPagosProveedorDataTableRules = class(TIntfObjectDADataTableRules, IPagosProveedor)
   private
   protected
     { Property getters and setters }

Source/Modulos/Remesas de cliente/Views/uViewRemesaCliente.dfm

@@ -88,7 +88,6 @@ inherited frViewRemesaCliente: TfrViewRemesaCliente
       Top = 57
       DataBinding.DataField = 'ID_DATOS_BANCO'
       DataBinding.DataSource = dsDataTable
-      Properties.GridMode = True
       Properties.ImmediatePost = True
       Properties.KeyFieldNames = 'ID'
       Properties.ListColumns = <
@@ -97,6 +96,7 @@ inherited frViewRemesaCliente: TfrViewRemesaCliente
         end>
       Properties.ListOptions.GridLines = glNone
       Properties.ListOptions.ShowHeader = False
+      Properties.ListOptions.SyncMode = True
       Properties.ListSource = dsDatosBanco
       Style.BorderColor = clWindowFrame
       Style.BorderStyle = ebs3D

Source/Modulos/Remesas de proveedor/Views/uViewRemesaProveedor.dfm

@@ -88,7 +88,6 @@ inherited frViewRemesaProveedor: TfrViewRemesaProveedor
       Top = 57
       DataBinding.DataField = 'ID_DATOS_BANCO'
       DataBinding.DataSource = dsDataTable
-      Properties.GridMode = True
       Properties.ImmediatePost = True
       Properties.KeyFieldNames = 'ID'
       Properties.ListColumns = <
@@ -97,6 +96,7 @@ inherited frViewRemesaProveedor: TfrViewRemesaProveedor
         end>
       Properties.ListOptions.GridLines = glNone
       Properties.ListOptions.ShowHeader = False
+      Properties.ListOptions.SyncMode = True
       Properties.ListSource = dsDatosBanco
       Style.BorderColor = clWindowFrame
       Style.BorderStyle = ebs3D

Source/Servidor/FactuGES_Server.dproj

@@ -1,238 +1,233 @@
-<?xml version="1.0" encoding="utf-8"?>
+<?xml version="1.0" encoding="utf-8"?>
 <Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
-  <PropertyGroup>
+	<PropertyGroup>
-    <ProjectGuid>{ebdcd25d-40d7-4146-91ec-a0ea4aa1dcd1}</ProjectGuid>
+		<ProjectGuid>{ebdcd25d-40d7-4146-91ec-a0ea4aa1dcd1}</ProjectGuid>
-    <MainSource>FactuGES_Server.dpr</MainSource>
+		<MainSource>FactuGES_Server.dpr</MainSource>
-    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+		<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
-    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+		<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
-    <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+		<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
-    <DCC_DependencyCheckOutputName>..\..\Output\Debug\Servidor\FactuGES_Server.exe</DCC_DependencyCheckOutputName>
+		<DCC_DependencyCheckOutputName>..\..\Output\Debug\Servidor\FactuGES_Server.exe</DCC_DependencyCheckOutputName>
-  </PropertyGroup>
+	</PropertyGroup>
-  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+	<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
-    <Version>7.0</Version>
+		<Version>7.0</Version>
-    <DCC_DebugInformation>False</DCC_DebugInformation>
+		<DCC_DebugInformation>False</DCC_DebugInformation>
-    <DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+		<DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
-    <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+		<DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
-    <DCC_MapFile>3</DCC_MapFile>
+		<DCC_MapFile>3</DCC_MapFile>
-    <DCC_ExeOutput>..\..\Output\Release\Servidor</DCC_ExeOutput>
+		<DCC_ExeOutput>..\..\Output\Release\Servidor</DCC_ExeOutput>
-    <DCC_Define>RELEASE</DCC_Define>
+		<DCC_Define>RELEASE</DCC_Define>
-  </PropertyGroup>
+	</PropertyGroup>
-  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+	<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
-    <Version>7.0</Version>
+		<Version>7.0</Version>
-    <DCC_MapFile>3</DCC_MapFile>
+		<DCC_MapFile>3</DCC_MapFile>
-    <DCC_ExeOutput>..\..\Output\Debug\Servidor</DCC_ExeOutput>
+		<DCC_ExeOutput>..\..\Output\Debug\Servidor</DCC_ExeOutput>
-    <DCC_Define>DEBUG;</DCC_Define>
+		<DCC_Define>DEBUG;</DCC_Define>
-    <DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
+		<DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
-  </PropertyGroup>
+	</PropertyGroup>
-  <ProjectExtensions>
+	<ProjectExtensions>
-    <Borland.Personality>Delphi.Personality</Borland.Personality>
+		<Borland.Personality>Delphi.Personality</Borland.Personality>
-    <Borland.ProjectType />
+		<Borland.ProjectType/>
-    <BorlandProject>
+		<BorlandProject>
-<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName"></VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName"></VersionInfoKeys><VersionInfoKeys Name="ProductVersion">3.0.0.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys><VersionInfoKeys Name="CompileDate">lunes, 19 de noviembre de 2007 18:58</VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
+			<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName"></VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName"></VersionInfoKeys><VersionInfoKeys Name="ProductVersion">3.0.0.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys><VersionInfoKeys Name="CompileDate">lunes, 19 de noviembre de 2007 18:58</VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
-      
+						<Excluded_Packages Name="C:\Archivos de programa\RemObjects Software\Pascal Script\Dcu\D10\PascalScript_RO_D10.bpl">RemObjects Pascal Script - RemObjects SDK 3.0 Integration</Excluded_Packages>
-      
+					</Excluded_Packages><Source><Source Name="MainSource">FactuGES_Server.dpr</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
-      
+	</ProjectExtensions>
-      
+	<Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets"/>
-      
+	<ItemGroup>
-      <Excluded_Packages Name="C:\Archivos de programa\RemObjects Software\Pascal Script\Dcu\D10\PascalScript_RO_D10.bpl">RemObjects Pascal Script - RemObjects SDK 3.0 Integration</Excluded_Packages>
+		<DelphiCompile Include="FactuGES_Server.dpr">
-    </Excluded_Packages><Source><Source Name="MainSource">FactuGES_Server.dpr</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
+			<MainSource>MainSource</MainSource>
-  </ProjectExtensions>
+		</DelphiCompile>
-  <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
+		<DCCReference Include="..\ApplicationBase\Ejercicios\Model\schEjerciciosClient_Intf.pas"/>
-  <ItemGroup>
+		<DCCReference Include="..\ApplicationBase\Ejercicios\Model\schEjerciciosServer_Intf.pas"/>
-    <DelphiCompile Include="FactuGES_Server.dpr">
+		<DCCReference Include="..\ApplicationBase\Ejercicios\Model\uBizEjerciciosServer.pas"/>
-      <MainSource>MainSource</MainSource>
+		<DCCReference Include="..\ApplicationBase\Ejercicios\Servidor\srvEjercicios_Impl.pas">
-    </DelphiCompile>
+			<Form>srvEjercicios</Form>
-    <DCCReference Include="..\ApplicationBase\Ejercicios\Model\schEjerciciosClient_Intf.pas" />
+			<DesignClass>TDataAbstractService</DesignClass>
-    <DCCReference Include="..\ApplicationBase\Ejercicios\Model\schEjerciciosServer_Intf.pas" />
+		</DCCReference>
-    <DCCReference Include="..\ApplicationBase\Ejercicios\Model\uBizEjerciciosServer.pas" />
+		<DCCReference Include="..\ApplicationBase\Empresas\Model\schEmpresasClient_Intf.pas"/>
-    <DCCReference Include="..\ApplicationBase\Ejercicios\Servidor\srvEjercicios_Impl.pas">
+		<DCCReference Include="..\ApplicationBase\Empresas\Model\schEmpresasServer_Intf.pas"/>
-      <Form>srvEjercicios</Form>
+		<DCCReference Include="..\ApplicationBase\Empresas\Servidor\srvEmpresas_Impl.pas">
-      <DesignClass>TDataAbstractService</DesignClass>
+			<Form>srvEmpresas</Form>
-    </DCCReference>
+			<DesignClass>TDARemoteService</DesignClass>
-    <DCCReference Include="..\ApplicationBase\Empresas\Model\schEmpresasClient_Intf.pas" />
+		</DCCReference>
-    <DCCReference Include="..\ApplicationBase\Empresas\Model\schEmpresasServer_Intf.pas" />
+		<DCCReference Include="..\ApplicationBase\Usuarios\Model\schUsuariosClient_Intf.pas"/>
-    <DCCReference Include="..\ApplicationBase\Empresas\Servidor\srvEmpresas_Impl.pas">
+		<DCCReference Include="..\ApplicationBase\Usuarios\Model\schUsuariosServer_Intf.pas"/>
-      <Form>srvEmpresas</Form>
+		<DCCReference Include="..\ApplicationBase\Usuarios\Servidor\srvUsuarios_Impl.pas"/>
-      <DesignClass>TDARemoteService</DesignClass>
+		<DCCReference Include="..\Base\schBase_Intf.pas"/>
-    </DCCReference>
+		<DCCReference Include="..\Modulos\Albaranes de cliente\Model\schAlbaranesClienteClient_Intf.pas"/>
-    <DCCReference Include="..\ApplicationBase\Usuarios\Model\schUsuariosClient_Intf.pas" />
+		<DCCReference Include="..\Modulos\Albaranes de cliente\Model\schAlbaranesClienteServer_Intf.pas"/>
-    <DCCReference Include="..\ApplicationBase\Usuarios\Model\schUsuariosServer_Intf.pas" />
+		<DCCReference Include="..\Modulos\Albaranes de cliente\Model\uBizAlbaranClienteServer.pas"/>
-    <DCCReference Include="..\ApplicationBase\Usuarios\Servidor\srvUsuarios_Impl.pas" />
+		<DCCReference Include="..\Modulos\Albaranes de cliente\Servidor\srvAlbaranesCliente_Impl.pas">
-    <DCCReference Include="..\Base\schBase_Intf.pas" />
+			<Form>srvAlbaranesCliente</Form>
-    <DCCReference Include="..\Modulos\Albaranes de cliente\Model\schAlbaranesClienteClient_Intf.pas" />
+			<DesignClass>TDataAbstractService</DesignClass>
-    <DCCReference Include="..\Modulos\Albaranes de cliente\Model\schAlbaranesClienteServer_Intf.pas" />
+		</DCCReference>
-    <DCCReference Include="..\Modulos\Albaranes de cliente\Model\uBizAlbaranClienteServer.pas" />
+		<DCCReference Include="..\Modulos\Albaranes de proveedor\Model\schAlbaranesProveedorClient_Intf.pas"/>
-    <DCCReference Include="..\Modulos\Albaranes de cliente\Servidor\srvAlbaranesCliente_Impl.pas">
+		<DCCReference Include="..\Modulos\Albaranes de proveedor\Model\schAlbaranesProveedorServer_Intf.pas"/>
-      <Form>srvAlbaranesCliente</Form>
+		<DCCReference Include="..\Modulos\Albaranes de proveedor\Model\uBizAlbaranProveedorServer.PAS"/>
-      <DesignClass>TDataAbstractService</DesignClass>
+		<DCCReference Include="..\Modulos\Albaranes de proveedor\Servidor\srvAlbaranesProveedor_Impl.pas">
-    </DCCReference>
+			<Form>srvAlbaranesProveedor</Form>
-    <DCCReference Include="..\Modulos\Albaranes de proveedor\Model\schAlbaranesProveedorClient_Intf.pas" />
+			<DesignClass>TDataAbstractService</DesignClass>
-    <DCCReference Include="..\Modulos\Albaranes de proveedor\Model\schAlbaranesProveedorServer_Intf.pas" />
+		</DCCReference>
-    <DCCReference Include="..\Modulos\Albaranes de proveedor\Model\uBizAlbaranProveedorServer.PAS" />
+		<DCCReference Include="..\Modulos\Almacenes\Model\schAlmacenesClient_Intf.pas"/>
-    <DCCReference Include="..\Modulos\Albaranes de proveedor\Servidor\srvAlbaranesProveedor_Impl.pas">
+		<DCCReference Include="..\Modulos\Almacenes\Model\schAlmacenesServer_Intf.pas"/>
-      <Form>srvAlbaranesProveedor</Form>
+		<DCCReference Include="..\Modulos\Almacenes\Servidor\srvAlmacenes_Impl.pas">
-      <DesignClass>TDataAbstractService</DesignClass>
+			<Form>srvAlmacenes</Form>
-    </DCCReference>
+			<DesignClass>TDARemoteService</DesignClass>
-    <DCCReference Include="..\Modulos\Almacenes\Model\schAlmacenesClient_Intf.pas" />
+		</DCCReference>
-    <DCCReference Include="..\Modulos\Almacenes\Model\schAlmacenesServer_Intf.pas" />
+		<DCCReference Include="..\Modulos\Articulos\Model\schArticulosClient_Intf.pas"/>
-    <DCCReference Include="..\Modulos\Almacenes\Servidor\srvAlmacenes_Impl.pas">
+		<DCCReference Include="..\Modulos\Articulos\Model\schArticulosServer_Intf.pas"/>
-      <Form>srvAlmacenes</Form>
+		<DCCReference Include="..\Modulos\Articulos\Servidor\srvArticulos_Impl.pas"/>
-      <DesignClass>TDARemoteService</DesignClass>
+		<DCCReference Include="..\Modulos\Contabilidad\Model\schContabilidadClient_Intf.pas"/>
-    </DCCReference>
+		<DCCReference Include="..\Modulos\Contabilidad\Model\schContabilidadServer_Intf.pas"/>
-    <DCCReference Include="..\Modulos\Articulos\Model\schArticulosClient_Intf.pas" />
+		<DCCReference Include="..\Modulos\Contabilidad\Servidor\srvContabilidad_Impl.pas">
-    <DCCReference Include="..\Modulos\Articulos\Model\schArticulosServer_Intf.pas" />
+			<Form>srvContabilidad</Form>
-    <DCCReference Include="..\Modulos\Articulos\Servidor\srvArticulos_Impl.pas" />
+			<DesignClass>TDataAbstractService</DesignClass>
-    <DCCReference Include="..\Modulos\Contabilidad\Model\schContabilidadClient_Intf.pas" />
+		</DCCReference>
-    <DCCReference Include="..\Modulos\Contabilidad\Model\schContabilidadServer_Intf.pas" />
+		<DCCReference Include="..\Modulos\Contactos\Model\schContactosClient_Intf.pas"/>
-    <DCCReference Include="..\Modulos\Contabilidad\Servidor\srvContabilidad_Impl.pas">
+		<DCCReference Include="..\Modulos\Contactos\Model\schContactosServer_Intf.pas"/>
-      <Form>srvContabilidad</Form>
+		<DCCReference Include="..\Modulos\Contactos\Model\uBizClientesServer.pas"/>
-      <DesignClass>TDataAbstractService</DesignClass>
+		<DCCReference Include="..\Modulos\Contactos\Model\uBizContactosServer.pas"/>
-    </DCCReference>
+		<DCCReference Include="..\Modulos\Contactos\Model\uBizEmpleadosServer.pas"/>
-    <DCCReference Include="..\Modulos\Contactos\Model\schContactosClient_Intf.pas" />
+		<DCCReference Include="..\Modulos\Contactos\Model\uBizProveedoresServer.pas"/>
-    <DCCReference Include="..\Modulos\Contactos\Model\schContactosServer_Intf.pas" />
+		<DCCReference Include="..\Modulos\Contactos\Servidor\srvContactos_Impl.pas">
-    <DCCReference Include="..\Modulos\Contactos\Model\uBizClientesServer.pas" />
+			<Form>srvContactos</Form>
-    <DCCReference Include="..\Modulos\Contactos\Model\uBizContactosServer.pas" />
+			<DesignClass>TDARemoteService</DesignClass>
-    <DCCReference Include="..\Modulos\Contactos\Model\uBizEmpleadosServer.pas" />
+		</DCCReference>
-    <DCCReference Include="..\Modulos\Contactos\Model\uBizProveedoresServer.pas" />
+		<DCCReference Include="..\Modulos\Facturas de cliente\Model\schFacturasClienteClient_Intf.pas"/>
-    <DCCReference Include="..\Modulos\Contactos\Servidor\srvContactos_Impl.pas">
+		<DCCReference Include="..\Modulos\Facturas de cliente\Model\schFacturasClienteServer_Intf.pas"/>
-      <Form>srvContactos</Form>
+		<DCCReference Include="..\Modulos\Facturas de cliente\Model\uBizFacturasClienteServer.pas"/>
-      <DesignClass>TDARemoteService</DesignClass>
+		<DCCReference Include="..\Modulos\Facturas de cliente\Servidor\srvFacturasCliente_Impl.pas">
-    </DCCReference>
+			<Form>srvFacturasCliente</Form>
-    <DCCReference Include="..\Modulos\Facturas de cliente\Model\schFacturasClienteClient_Intf.pas" />
+			<DesignClass>TDataAbstractService</DesignClass>
-    <DCCReference Include="..\Modulos\Facturas de cliente\Model\schFacturasClienteServer_Intf.pas" />
+		</DCCReference>
-    <DCCReference Include="..\Modulos\Facturas de cliente\Model\uBizFacturasClienteServer.pas" />
+		<DCCReference Include="..\Modulos\Facturas de proveedor\Model\schFacturasProveedorClient_Intf.pas"/>
-    <DCCReference Include="..\Modulos\Facturas de cliente\Servidor\srvFacturasCliente_Impl.pas">
+		<DCCReference Include="..\Modulos\Facturas de proveedor\Model\schFacturasProveedorServer_Intf.pas"/>
-      <Form>srvFacturasCliente</Form>
+		<DCCReference Include="..\Modulos\Facturas de proveedor\Model\uBizFacturasProveedorServer.pas"/>
-      <DesignClass>TDataAbstractService</DesignClass>
+		<DCCReference Include="..\Modulos\Facturas de proveedor\Servidor\srvFacturasProveedor_Impl.pas">
-    </DCCReference>
+			<Form>srvFacturasProveedor</Form>
-    <DCCReference Include="..\Modulos\Facturas de proveedor\Model\schFacturasProveedorClient_Intf.pas" />
+			<DesignClass>TDataAbstractService</DesignClass>
-    <DCCReference Include="..\Modulos\Facturas de proveedor\Model\schFacturasProveedorServer_Intf.pas" />
+		</DCCReference>
-    <DCCReference Include="..\Modulos\Facturas de proveedor\Model\uBizFacturasProveedorServer.pas" />
+		<DCCReference Include="..\Modulos\Familias\Model\schFamiliasClient_Intf.pas"/>
-    <DCCReference Include="..\Modulos\Facturas de proveedor\Servidor\srvFacturasProveedor_Impl.pas">
+		<DCCReference Include="..\Modulos\Familias\Model\schFamiliasServer_Intf.pas"/>
-      <Form>srvFacturasProveedor</Form>
+		<DCCReference Include="..\Modulos\Familias\Servidor\srvFamilias_Impl.pas"/>
-      <DesignClass>TDataAbstractService</DesignClass>
+		<DCCReference Include="..\Modulos\Formas de pago\Model\schFormasPagoClient_Intf.pas"/>
-    </DCCReference>
+		<DCCReference Include="..\Modulos\Formas de pago\Model\schFormasPagoServer_Intf.pas"/>
-    <DCCReference Include="..\Modulos\Familias\Model\schFamiliasClient_Intf.pas" />
+		<DCCReference Include="..\Modulos\Formas de pago\Servidor\srvFormasPago_Impl.pas"/>
-    <DCCReference Include="..\Modulos\Familias\Model\schFamiliasServer_Intf.pas" />
+		<DCCReference Include="..\Modulos\Historico de movimientos\Model\schHistoricoMovimientosClient_Intf.pas"/>
-    <DCCReference Include="..\Modulos\Familias\Servidor\srvFamilias_Impl.pas" />
+		<DCCReference Include="..\Modulos\Historico de movimientos\Model\schHistoricoMovimientosServer_Intf.pas"/>
-    <DCCReference Include="..\Modulos\Formas de pago\Model\schFormasPagoClient_Intf.pas" />
+		<DCCReference Include="..\Modulos\Historico de movimientos\Servidor\srvHistoricoMovimientos_Impl.pas">
-    <DCCReference Include="..\Modulos\Formas de pago\Model\schFormasPagoServer_Intf.pas" />
+			<Form>srvHistoricoMovimientos</Form>
-    <DCCReference Include="..\Modulos\Formas de pago\Servidor\srvFormasPago_Impl.pas" />
+			<DesignClass>TDataAbstractService</DesignClass>
-    <DCCReference Include="..\Modulos\Historico de movimientos\Model\schHistoricoMovimientosClient_Intf.pas" />
+		</DCCReference>
-    <DCCReference Include="..\Modulos\Historico de movimientos\Model\schHistoricoMovimientosServer_Intf.pas" />
+		<DCCReference Include="..\Modulos\Inventario\Model\schInventarioClient_Intf.pas"/>
-    <DCCReference Include="..\Modulos\Historico de movimientos\Servidor\srvHistoricoMovimientos_Impl.pas">
+		<DCCReference Include="..\Modulos\Inventario\Model\schInventarioServer_Intf.pas"/>
-      <Form>srvHistoricoMovimientos</Form>
+		<DCCReference Include="..\Modulos\Inventario\Servidor\srvInventario_Impl.pas">
-      <DesignClass>TDataAbstractService</DesignClass>
+			<Form>srvInventario</Form>
-    </DCCReference>
+			<DesignClass>TDataAbstractService</DesignClass>
-    <DCCReference Include="..\Modulos\Inventario\Model\schInventarioClient_Intf.pas" />
+		</DCCReference>
-    <DCCReference Include="..\Modulos\Inventario\Model\schInventarioServer_Intf.pas" />
+		<DCCReference Include="..\Modulos\Pedidos a proveedor\Model\schPedidosProveedorClient_Intf.pas"/>
-    <DCCReference Include="..\Modulos\Inventario\Servidor\srvInventario_Impl.pas">
+		<DCCReference Include="..\Modulos\Pedidos a proveedor\Model\schPedidosProveedorServer_Intf.pas"/>
-      <Form>srvInventario</Form>
+		<DCCReference Include="..\Modulos\Pedidos a proveedor\Model\uBizPedidosProveedorServer.pas"/>
-      <DesignClass>TDataAbstractService</DesignClass>
+		<DCCReference Include="..\Modulos\Pedidos a proveedor\Servidor\srvPedidosProveedor_Impl.pas">
-    </DCCReference>
+			<Form>srvPedidosProveedor</Form>
-    <DCCReference Include="..\Modulos\Pedidos a proveedor\Model\schPedidosProveedorClient_Intf.pas" />
+			<DesignClass>TDataAbstractService</DesignClass>
-    <DCCReference Include="..\Modulos\Pedidos a proveedor\Model\schPedidosProveedorServer_Intf.pas" />
+		</DCCReference>
-    <DCCReference Include="..\Modulos\Pedidos a proveedor\Model\uBizPedidosProveedorServer.pas" />
+		<DCCReference Include="..\Modulos\Presupuestos de cliente\Model\schPresupuestosClienteClient_Intf.pas"/>
-    <DCCReference Include="..\Modulos\Pedidos a proveedor\Servidor\srvPedidosProveedor_Impl.pas">
+		<DCCReference Include="..\Modulos\Presupuestos de cliente\Model\schPresupuestosClienteServer_Intf.pas"/>
-      <Form>srvPedidosProveedor</Form>
+		<DCCReference Include="..\Modulos\Presupuestos de cliente\Model\uBizPresupuestosClienteServer.pas"/>
-      <DesignClass>TDataAbstractService</DesignClass>
+		<DCCReference Include="..\Modulos\Presupuestos de cliente\Reports\uRptPresupuestosCliente_Server.pas">
-    </DCCReference>
+			<Form>RptPresupuestosCliente</Form>
-    <DCCReference Include="..\Modulos\Presupuestos de cliente\Model\schPresupuestosClienteClient_Intf.pas" />
+		</DCCReference>
-    <DCCReference Include="..\Modulos\Presupuestos de cliente\Model\schPresupuestosClienteServer_Intf.pas" />
+		<DCCReference Include="..\Modulos\Presupuestos de cliente\Servidor\srvPresupuestosCliente_Impl.pas">
-    <DCCReference Include="..\Modulos\Presupuestos de cliente\Model\uBizPresupuestosClienteServer.pas" />
+			<Form>srvPresupuestosCliente</Form>
-    <DCCReference Include="..\Modulos\Presupuestos de cliente\Reports\uRptPresupuestosCliente_Server.pas">
+			<DesignClass>TDataAbstractService</DesignClass>
-      <Form>RptPresupuestosCliente</Form>
+		</DCCReference>
-    </DCCReference>
+		<DCCReference Include="..\Modulos\Recibos de cliente\Model\schRecibosClienteClient_Intf.pas"/>
-    <DCCReference Include="..\Modulos\Presupuestos de cliente\Servidor\srvPresupuestosCliente_Impl.pas">
+		<DCCReference Include="..\Modulos\Recibos de cliente\Model\schRecibosClienteServer_Intf.pas"/>
-      <Form>srvPresupuestosCliente</Form>
+		<DCCReference Include="..\Modulos\Recibos de cliente\Model\uBizPagosClienteServer.pas"/>
-      <DesignClass>TDataAbstractService</DesignClass>
+		<DCCReference Include="..\Modulos\Recibos de cliente\Servidor\srvRecibosCliente_Impl.pas">
-    </DCCReference>
+			<Form>srvRecibosCliente</Form>
-    <DCCReference Include="..\Modulos\Recibos de cliente\Model\schRecibosClienteClient_Intf.pas" />
+			<DesignClass>TDataAbstractService</DesignClass>
-    <DCCReference Include="..\Modulos\Recibos de cliente\Model\schRecibosClienteServer_Intf.pas" />
+		</DCCReference>
-    <DCCReference Include="..\Modulos\Recibos de cliente\Model\uBizPagosClienteServer.pas" />
+		<DCCReference Include="..\Modulos\Recibos de proveedor\Model\schRecibosProveedorClient_Intf.pas"/>
-    <DCCReference Include="..\Modulos\Recibos de cliente\Servidor\srvRecibosCliente_Impl.pas">
+		<DCCReference Include="..\Modulos\Recibos de proveedor\Model\schRecibosProveedorServer_Intf.pas"/>
-      <Form>srvRecibosCliente</Form>
+		<DCCReference Include="..\Modulos\Recibos de proveedor\Model\uBizPagosProveedorServer.pas"/>
-      <DesignClass>TDataAbstractService</DesignClass>
+		<DCCReference Include="..\Modulos\Recibos de proveedor\Servidor\srvRecibosProveedor_Impl.pas">
-    </DCCReference>
+			<Form>srvRecibosProveedor</Form>
-    <DCCReference Include="..\Modulos\Recibos de proveedor\Model\schRecibosProveedorClient_Intf.pas" />
+			<DesignClass>TDataAbstractService</DesignClass>
-    <DCCReference Include="..\Modulos\Recibos de proveedor\Model\schRecibosProveedorServer_Intf.pas" />
+		</DCCReference>
-    <DCCReference Include="..\Modulos\Recibos de proveedor\Model\uBizPagosProveedorServer.pas" />
+		<DCCReference Include="..\Modulos\Remesas de cliente\Model\schRemesasClienteClient_Intf.pas"/>
-    <DCCReference Include="..\Modulos\Recibos de proveedor\Servidor\srvRecibosProveedor_Impl.pas">
+		<DCCReference Include="..\Modulos\Remesas de cliente\Model\schRemesasClienteServer_Intf.pas"/>
-      <Form>srvRecibosProveedor</Form>
+		<DCCReference Include="..\Modulos\Remesas de cliente\Model\uBizRemesasClienteServer.pas"/>
-      <DesignClass>TDataAbstractService</DesignClass>
+		<DCCReference Include="..\Modulos\Remesas de cliente\Servidor\srvRemesasCliente_Impl.pas">
-    </DCCReference>
+			<Form>srvRemesasCliente</Form>
-    <DCCReference Include="..\Modulos\Remesas de cliente\Model\schRemesasClienteClient_Intf.pas" />
+			<DesignClass>TDataAbstractService</DesignClass>
-    <DCCReference Include="..\Modulos\Remesas de cliente\Model\schRemesasClienteServer_Intf.pas" />
+		</DCCReference>
-    <DCCReference Include="..\Modulos\Remesas de cliente\Model\uBizRemesasClienteServer.pas" />
+		<DCCReference Include="..\Modulos\Remesas de proveedor\Model\schRemesasProveedorClient_Intf.pas"/>
-    <DCCReference Include="..\Modulos\Remesas de cliente\Servidor\srvRemesasCliente_Impl.pas">
+		<DCCReference Include="..\Modulos\Remesas de proveedor\Model\schRemesasProveedorServer_Intf.pas"/>
-      <Form>srvRemesasCliente</Form>
+		<DCCReference Include="..\Modulos\Remesas de proveedor\Model\uBizRemesasProveedorServer.pas"/>
-      <DesignClass>TDataAbstractService</DesignClass>
+		<DCCReference Include="..\Modulos\Remesas de proveedor\Servidor\srvRemesasProveedor_Impl.pas">
-    </DCCReference>
+			<Form>srvRemesasProveedor</Form>
-    <DCCReference Include="..\Modulos\Remesas de proveedor\Model\schRemesasProveedorClient_Intf.pas" />
+			<DesignClass>TDataAbstractService</DesignClass>
-    <DCCReference Include="..\Modulos\Remesas de proveedor\Model\schRemesasProveedorServer_Intf.pas" />
+		</DCCReference>
-    <DCCReference Include="..\Modulos\Remesas de proveedor\Model\uBizRemesasProveedorServer.pas" />
+		<DCCReference Include="..\Modulos\Tipos de IVA\Model\schTiposIVAClient_Intf.pas"/>
-    <DCCReference Include="..\Modulos\Remesas de proveedor\Servidor\srvRemesasProveedor_Impl.pas">
+		<DCCReference Include="..\Modulos\Tipos de IVA\Model\schTiposIVAServer_Intf.pas"/>
-      <Form>srvRemesasProveedor</Form>
+		<DCCReference Include="..\Modulos\Tipos de IVA\Servidor\srvTiposIVA_Impl.pas"/>
-      <DesignClass>TDataAbstractService</DesignClass>
+		<DCCReference Include="..\Modulos\Unidades de medida\Model\schUnidadesMedidaClient_Intf.pas"/>
-    </DCCReference>
+		<DCCReference Include="..\Modulos\Unidades de medida\Model\schUnidadesMedidaServer_Intf.pas"/>
-    <DCCReference Include="..\Modulos\Tipos de IVA\Model\schTiposIVAClient_Intf.pas" />
+		<DCCReference Include="..\Modulos\Unidades de medida\Servidor\srvUnidadesMedida_Impl.pas">
-    <DCCReference Include="..\Modulos\Tipos de IVA\Model\schTiposIVAServer_Intf.pas" />
+			<Form>srvUnidadesMedida</Form>
-    <DCCReference Include="..\Modulos\Tipos de IVA\Servidor\srvTiposIVA_Impl.pas" />
+			<DesignClass>TDataAbstractService</DesignClass>
-    <DCCReference Include="..\Modulos\Unidades de medida\Model\schUnidadesMedidaClient_Intf.pas" />
+		</DCCReference>
-    <DCCReference Include="..\Modulos\Unidades de medida\Model\schUnidadesMedidaServer_Intf.pas" />
+		<DCCReference Include="..\Servicios\FactuGES_Intf.pas"/>
-    <DCCReference Include="..\Modulos\Unidades de medida\Servidor\srvUnidadesMedida_Impl.pas">
+		<DCCReference Include="..\Servicios\FactuGES_Invk.pas"/>
-      <Form>srvUnidadesMedida</Form>
+		<DCCReference Include="Configuracion\srvConfiguracion_Impl.pas">
-      <DesignClass>TDataAbstractService</DesignClass>
+			<Form>srvConfiguracion</Form>
-    </DCCReference>
+			<DesignClass>TDataAbstractService</DesignClass>
-    <DCCReference Include="..\Servicios\FactuGES_Intf.pas" />
+		</DCCReference>
-    <DCCReference Include="..\Servicios\FactuGES_Invk.pas" />
+		<DCCReference Include="Configuracion\uConexionBD.pas">
-    <DCCReference Include="Configuracion\srvConfiguracion_Impl.pas">
+			<Form>frConexionBD</Form>
-      <Form>srvConfiguracion</Form>
+			<DesignClass>TFrame</DesignClass>
-      <DesignClass>TDataAbstractService</DesignClass>
+		</DCCReference>
-    </DCCReference>
+		<DCCReference Include="Configuracion\uConfGeneral.pas">
-    <DCCReference Include="Configuracion\uConexionBD.pas">
+			<Form>frConfGeneral</Form>
-      <Form>frConexionBD</Form>
+			<DesignClass>TFrame</DesignClass>
-      <DesignClass>TFrame</DesignClass>
+		</DCCReference>
-    </DCCReference>
+		<DCCReference Include="Configuracion\uConfiguracion.pas">
-    <DCCReference Include="Configuracion\uConfGeneral.pas">
+			<Form>fConfiguracion</Form>
-      <Form>frConfGeneral</Form>
+			<DesignClass>TForm</DesignClass>
-      <DesignClass>TFrame</DesignClass>
+		</DCCReference>
-    </DCCReference>
+		<DCCReference Include="Configuracion\uFrameConfiguracion.pas">
-    <DCCReference Include="Configuracion\uConfiguracion.pas">
+			<Form>FrameConfiguracion</Form>
-      <Form>fConfiguracion</Form>
+			<DesignClass>TFrame</DesignClass>
-      <DesignClass>TForm</DesignClass>
+		</DCCReference>
-    </DCCReference>
+		<DCCReference Include="srvLogin_Impl.pas">
-    <DCCReference Include="Configuracion\uFrameConfiguracion.pas">
+			<Form>srvLogin</Form>
-      <Form>FrameConfiguracion</Form>
+			<DesignClass>TDARemoteService</DesignClass>
-      <DesignClass>TFrame</DesignClass>
+		</DCCReference>
-    </DCCReference>
+		<DCCReference Include="srvReferencias_Impl.pas">
-    <DCCReference Include="srvLogin_Impl.pas">
+			<Form>srvReferencias</Form>
-      <Form>srvLogin</Form>
+			<DesignClass>TDataAbstractService</DesignClass>
-      <DesignClass>TDARemoteService</DesignClass>
+		</DCCReference>
-    </DCCReference>
+		<DCCReference Include="uAcercaDe.pas">
-    <DCCReference Include="srvReferencias_Impl.pas">
+			<Form>fAcercaDe</Form>
-      <Form>srvReferencias</Form>
+		</DCCReference>
-      <DesignClass>TDataAbstractService</DesignClass>
+		<DCCReference Include="uDataModuleServer.pas">
-    </DCCReference>
+			<Form>dmServer</Form>
-    <DCCReference Include="uAcercaDe.pas">
+			<DesignClass>TDataModule</DesignClass>
-      <Form>fAcercaDe</Form>
+		</DCCReference>
-    </DCCReference>
+		<DCCReference Include="uServerMainForm.pas">
-    <DCCReference Include="uDataModuleServer.pas">
+			<Form>fServerForm</Form>
-      <Form>dmServer</Form>
+		</DCCReference>
-      <DesignClass>TDataModule</DesignClass>
+		<DCCReference Include="Utiles\RegExpr.pas"/>
-    </DCCReference>
+		<DCCReference Include="Utiles\uBusinessUtils.pas"/>
-    <DCCReference Include="uServerMainForm.pas">
+		<DCCReference Include="Utiles\uDatabaseUtils.pas"/>
-      <Form>fServerForm</Form>
+		<DCCReference Include="Utiles\uReferenciasUtils.pas"/>
-    </DCCReference>
+		<DCCReference Include="Utiles\uRestriccionesUsuarioUtils.pas"/>
-    <DCCReference Include="Utiles\RegExpr.pas" />
+		<DCCReference Include="Utiles\uSchemaUtilsServer.pas"/>
-    <DCCReference Include="Utiles\uBusinessUtils.pas" />
+		<DCCReference Include="Utiles\uServerAppUtils.pas"/>
-    <DCCReference Include="Utiles\uDatabaseUtils.pas" />
+		<DCCReference Include="Utiles\uSesionesUtils.pas"/>
-    <DCCReference Include="Utiles\uReferenciasUtils.pas" />
+	</ItemGroup>
-    <DCCReference Include="Utiles\uRestriccionesUsuarioUtils.pas" />
-    <DCCReference Include="Utiles\uSchemaUtilsServer.pas" />
-    <DCCReference Include="Utiles\uServerAppUtils.pas" />
-    <DCCReference Include="Utiles\uSesionesUtils.pas" />
-  </ItemGroup>
 </Project>
 <!-- EurekaLog First Line
 [Exception Log]

Source/Servidor/FactuGES_Server.rc

@@ -14,7 +14,7 @@ BEGIN
          BEGIN
               VALUE "FileVersion", "1.0.0.0\0"
               VALUE "ProductVersion", "1.0.0.0\0"
-              VALUE "CompileDate", "jueves, 03 de enero de 2008 11:47\0"
+              VALUE "CompileDate", "viernes, 04 de enero de 2008 11:17\0"
          END
     END
     BLOCK "VarFileInfo"