Versión 4.4.5, cambios en informes Contrato 1040- cambios parte de trabajo

git-svn-id: https://192.168.0.254/svn/Proyectos.AbetoDesign_FactuGES/trunk@182 93f398dd-4eb6-7a46-baf6-13f46f578da2

Source/Cliente/FactuGES.dproj

@@ -52,12 +52,7 @@
     <Borland.Personality>Delphi.Personality</Borland.Personality>
     <Borland.ProjectType>VCLApplication</Borland.ProjectType>
     <BorlandProject>
-<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Language><Language Name="RootDir">C:\Archivos de programa\Borland\Delphi7\Bin\</Language></Language><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">4</VersionInfo><VersionInfo Name="MinorVer">4</VersionInfo><VersionInfo Name="Release">4</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">Rodax Software S.L.</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">4.4.4.0</VersionInfoKeys><VersionInfoKeys Name="InternalName">FactuGES</VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">FactuGES</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">4.4.4.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
+<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Language><Language Name="RootDir">C:\Archivos de programa\Borland\Delphi7\Bin\</Language></Language><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">4</VersionInfo><VersionInfo Name="MinorVer">4</VersionInfo><VersionInfo Name="Release">5</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">Rodax Software S.L.</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">4.4.5.0</VersionInfoKeys><VersionInfoKeys Name="InternalName">FactuGES</VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">FactuGES</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">4.4.5.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
-      
-      
-      
-      
-      
       
       <Excluded_Packages Name="C:\Documents and Settings\All Users\Documentos\RAD Studio\5.0\Bpl\dxPScxScheduler2LnkD11.bpl">File C:\Documents and Settings\All Users\Documentos\RAD Studio\5.0\Bpl\dxPScxScheduler2LnkD11.bpl not found</Excluded_Packages>
     </Excluded_Packages><Source><Source Name="MainSource">FactuGES.dpr</Source></Source></Delphi.Personality><ModelSupport>False</ModelSupport></BorlandProject></BorlandProject>

Source/GUIBase/GUIBase.dproj

@@ -58,34 +58,34 @@
     <DelphiCompile Include="GUIBase.dpk">
       <MainSource>MainSource</MainSource>
     </DelphiCompile>
-    <DCCReference Include="C:\Documents and Settings\Usuario\Base.dcp" />
+    <DCCReference Include="..\Modulos\Facturas de proveedor\Base.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\ccpackD11.dcp" />
+    <DCCReference Include="..\Modulos\Facturas de proveedor\ccpackD11.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\cxDataD11.dcp" />
+    <DCCReference Include="..\Modulos\Facturas de proveedor\cxDataD11.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\cxEditorsD11.dcp" />
+    <DCCReference Include="..\Modulos\Facturas de proveedor\cxEditorsD11.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\cxExportD11.dcp" />
+    <DCCReference Include="..\Modulos\Facturas de proveedor\cxExportD11.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\cxLibraryD11.dcp" />
+    <DCCReference Include="..\Modulos\Facturas de proveedor\cxLibraryD11.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\dbrtl.dcp" />
+    <DCCReference Include="..\Modulos\Facturas de proveedor\dbrtl.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\dxGDIPlusD11.dcp" />
+    <DCCReference Include="..\Modulos\Facturas de proveedor\dxGDIPlusD11.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\dxLayoutControlD11.dcp" />
+    <DCCReference Include="..\Modulos\Facturas de proveedor\dxLayoutControlD11.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\dxPScxCommonD11.dcp" />
+    <DCCReference Include="..\Modulos\Facturas de proveedor\dxPScxCommonD11.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\dxPScxGrid6LnkD11.dcp" />
+    <DCCReference Include="..\Modulos\Facturas de proveedor\dxPScxGrid6LnkD11.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\dxThemeD11.dcp" />
+    <DCCReference Include="..\Modulos\Facturas de proveedor\dxThemeD11.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\frx11.dcp" />
+    <DCCReference Include="..\Modulos\Facturas de proveedor\frx11.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\frxe11.dcp" />
+    <DCCReference Include="..\Modulos\Facturas de proveedor\frxe11.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\fs11.dcp" />
+    <DCCReference Include="..\Modulos\Facturas de proveedor\fs11.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\JvAppFrmD11R.dcp" />
+    <DCCReference Include="..\Modulos\Facturas de proveedor\JvAppFrmD11R.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\JvCtrlsD11R.dcp" />
+    <DCCReference Include="..\Modulos\Facturas de proveedor\JvCtrlsD11R.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\JvGlobusD11R.dcp" />
+    <DCCReference Include="..\Modulos\Facturas de proveedor\JvGlobusD11R.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\PngComponentsD10.dcp" />
+    <DCCReference Include="..\Modulos\Facturas de proveedor\PngComponentsD10.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\PNG_D10.dcp" />
+    <DCCReference Include="..\Modulos\Facturas de proveedor\PNG_D10.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\rtl.dcp" />
+    <DCCReference Include="..\Modulos\Facturas de proveedor\rtl.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\tb2k_d10.dcp" />
+    <DCCReference Include="..\Modulos\Facturas de proveedor\tb2k_d10.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\tbx_d10.dcp" />
+    <DCCReference Include="..\Modulos\Facturas de proveedor\tbx_d10.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\vcl.dcp" />
+    <DCCReference Include="..\Modulos\Facturas de proveedor\vcl.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\vclactnband.dcp" />
+    <DCCReference Include="..\Modulos\Facturas de proveedor\vclactnband.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\vcldb.dcp" />
+    <DCCReference Include="..\Modulos\Facturas de proveedor\vcldb.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\vcljpg.dcp" />
+    <DCCReference Include="..\Modulos\Facturas de proveedor\vcljpg.dcp" />
-    <DCCReference Include="C:\Documents and Settings\Usuario\vclx.dcp" />
+    <DCCReference Include="..\Modulos\Facturas de proveedor\vclx.dcp" />
     <DCCReference Include="uDialogBase.pas">
       <Form>fDialogBase</Form>
     </DCCReference>

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

@@ -4,7 +4,6 @@ inherited frViewDetallesAlbaranCliente: TfrViewDetallesAlbaranCliente
       inherited cxGridViewVISIBLE: TcxGridDBColumn [4]
       end
       inherited cxGridViewVALORADO: TcxGridDBColumn [5]
-        Visible = True
       end
       inherited cxGridViewREFERENCIA: TcxGridDBColumn [6]
       end
@@ -19,13 +18,13 @@ inherited frViewDetallesAlbaranCliente: TfrViewDetallesAlbaranCliente
       end
       inherited cxGridViewDESCUENTO: TcxGridDBColumn [11]
       end
-      inherited cxGridViewIMPORTENETO: TcxGridDBColumn [12]
+      inherited cxGridViewIMP_UNIDAD_DTO: TcxGridDBColumn [12]
-        Visible = False
-        VisibleForCustomization = False
       end
-      inherited cxGridViewIMPORTEPORTE: TcxGridDBColumn [13]
+      inherited cxGridViewIMPORTENETO: TcxGridDBColumn [13]
       end
-      inherited cxGridViewIMPORTETOTAL: TcxGridDBColumn [14]
+      inherited cxGridViewINCREMENTO: TcxGridDBColumn [16]
+      end
+      inherited cxGridViewDECREMENTO: TcxGridDBColumn [17]
       end
     end
   end
@@ -34,6 +33,7 @@ inherited frViewDetallesAlbaranCliente: TfrViewDetallesAlbaranCliente
       DockPos = 0
       object BAnadirCapitulo: TTBXSubmenuItem [0]
         Caption = 'A'#241'adir Cap'#237'tulo'
+        Visible = False
         object TBXItem14: TTBXItem
         end
       end

Source/Modulos/Contabilidad/Views/uEditorExtractoMovimientos.dfm

@@ -2,18 +2,18 @@ inherited fEditorExtractoMovimientos: TfEditorExtractoMovimientos
   Left = 489
   Top = 325
   Caption = 'Cajas / Bancos'
-  ClientHeight = 497
+  ClientHeight = 806
-  ClientWidth = 774
+  ClientWidth = 1073
-  ExplicitWidth = 782
+  ExplicitWidth = 1081
-  ExplicitHeight = 535
+  ExplicitHeight = 844
   PixelsPerInch = 96
   TextHeight = 13
   inherited JvNavPanelHeader: TJvNavPanelHeader
-    Width = 774
+    Width = 1073
     Caption = 'Cajas / Bancos'
-    ExplicitWidth = 774
+    ExplicitWidth = 1073
     inherited Image1: TImage
-      Left = 747
+      Left = 1046
       Picture.Data = {
         0B546478504E47496D61676589504E470D0A1A0A0000000D4948445200000018
         000000180806000000E0773DF8000000017352474200AECE1CE9000000046741
@@ -39,8 +39,8 @@ inherited fEditorExtractoMovimientos: TfEditorExtractoMovimientos
     end
   end
   inherited TBXDock: TTBXDock
-    Width = 774
+    Width = 1073
-    ExplicitWidth = 774
+    ExplicitWidth = 1073
     inherited tbxMain: TTBXToolbar
       ExplicitWidth = 632
     end
@@ -50,7 +50,7 @@ inherited fEditorExtractoMovimientos: TfEditorExtractoMovimientos
       end
     end
     inherited tbxMenu: TTBXToolbar
-      ExplicitWidth = 774
+      ExplicitWidth = 1073
     end
     inherited TBXTMain2: TTBXToolbar
       Left = 287
@@ -77,16 +77,16 @@ inherited fEditorExtractoMovimientos: TfEditorExtractoMovimientos
     end
   end
   inherited StatusBar: TJvStatusBar
-    Top = 478
+    Top = 787
-    Width = 774
+    Width = 1073
-    ExplicitTop = 478
+    ExplicitTop = 787
-    ExplicitWidth = 774
+    ExplicitWidth = 1073
   end
   inline frViewExtractoMovimientos1: TfrViewExtractoMovimientos [3]
     Left = 0
     Top = 106
-    Width = 774
+    Width = 1073
-    Height = 372
+    Height = 681
     Align = alClient
     Font.Charset = DEFAULT_CHARSET
     Font.Color = clWindowText
@@ -97,13 +97,13 @@ inherited fEditorExtractoMovimientos: TfEditorExtractoMovimientos
     TabOrder = 3
     ReadOnly = False
     ExplicitTop = 106
-    ExplicitWidth = 774
+    ExplicitWidth = 1073
-    ExplicitHeight = 372
+    ExplicitHeight = 681
     inherited cxGrid: TcxGrid
-      Width = 774
+      Width = 1073
-      Height = 244
+      Height = 553
-      ExplicitWidth = 774
+      ExplicitWidth = 1073
-      ExplicitHeight = 244
+      ExplicitHeight = 553
       inherited cxGridView: TcxGridDBTableView
         DataController.Summary.DefaultGroupSummaryItems = <
           item
@@ -133,6 +133,7 @@ inherited fEditorExtractoMovimientos: TfEditorExtractoMovimientos
             Kind = skCount
             Column = frViewExtractoMovimientos1.cxGridViewCONCEPTO
           end>
+        OptionsSelection.MultiSelect = True
         inherited cxGridViewPUNTEADO: TcxGridDBColumn
           Visible = False
           VisibleForCustomization = False
@@ -160,19 +161,16 @@ inherited fEditorExtractoMovimientos: TfEditorExtractoMovimientos
           Visible = False
           VisibleForCustomization = False
         end
-        inherited cxGridViewSaldo: TcxGridDBColumn
-          HeaderAlignmentHorz = taRightJustify
-        end
       end
     end
     inherited frViewFiltroBase1: TfrViewFiltroBase
-      Width = 774
+      Width = 1073
-      ExplicitWidth = 774
+      ExplicitWidth = 1073
       inherited TBXDockablePanel1: TTBXDockablePanel
-        ExplicitWidth = 774
+        ExplicitWidth = 1073
         inherited dxLayoutControl1: TdxLayoutControl
-          Width = 774
+          Width = 1073
-          ExplicitWidth = 774
+          ExplicitWidth = 1073
           inherited txtFiltroTodo: TcxTextEdit
             Style.LookAndFeel.SkinName = ''
             StyleDisabled.LookAndFeel.SkinName = ''
@@ -190,46 +188,46 @@ inherited fEditorExtractoMovimientos: TfEditorExtractoMovimientos
             Width = 232
           end
           inherited edtFechaFinFiltro: TcxDateEdit
-            Left = 474
+            Left = 653
             Style.LookAndFeel.SkinName = ''
             StyleDisabled.LookAndFeel.SkinName = ''
             StyleFocused.LookAndFeel.SkinName = ''
             StyleHot.LookAndFeel.SkinName = ''
-            ExplicitLeft = 474
+            ExplicitLeft = 653
             ExplicitWidth = 197
             Width = 197
           end
           inherited txtFiltroTodo2: TcxTextEdit
-            Left = 544
+            Left = 750
             Style.LookAndFeel.SkinName = ''
             StyleDisabled.LookAndFeel.SkinName = ''
             StyleFocused.LookAndFeel.SkinName = ''
             StyleHot.LookAndFeel.SkinName = ''
-            ExplicitLeft = 544
+            ExplicitLeft = 750
             ExplicitWidth = 223
             Width = 223
           end
         end
         inherited TBXAlignmentPanel1: TTBXAlignmentPanel
-          Width = 774
+          Width = 1073
-          ExplicitWidth = 774
+          ExplicitWidth = 1073
           inherited tbxBotones: TTBXToolbar
-            Width = 764
+            Width = 1063
-            ExplicitWidth = 764
+            ExplicitWidth = 1063
           end
         end
       end
     end
     inherited pnlAgrupaciones: TTBXDockablePanel
-      Top = 346
+      Top = 655
-      ExplicitTop = 346
+      ExplicitTop = 655
-      ExplicitWidth = 774
+      ExplicitWidth = 1073
       inherited TBXAlignmentPanel1: TTBXAlignmentPanel
-        Width = 774
+        Width = 1073
-        ExplicitWidth = 774
+        ExplicitWidth = 1073
         inherited TBXToolbar1: TTBXToolbar
-          Width = 764
+          Width = 1063
-          ExplicitWidth = 764
+          ExplicitWidth = 1063
         end
       end
     end

Source/Modulos/Contabilidad/Views/uEditorExtractoMovimientos.pas

@@ -224,9 +224,11 @@ begin
   //No se podrá eliminar un asiento si es automático por factura, si el ejercicio esta cerrado o el asiento esta punteado
   if (Sender as TAction).Enabled then
      if Assigned(Diario) then
-        (Sender as TAction).Enabled := Diario.ID_FACTURAIsNull and Diario.ID_PAGOIsNull
+        (Sender as TAction).Enabled := (ViewGrid._FocusedView.Controller.SelectedRowCount = 1)
+                                       and Diario.ID_FACTURAIsNull
+                                       and Diario.ID_PAGOIsNull
                                        and (Diario.ESTADO = CTE_ABIERTO)
-                                       and (Diario.PUNTEADO = CTE_NO_PUNTEADO);                                       
+                                       and (Diario.PUNTEADO = CTE_NO_PUNTEADO);
 end;
 
 procedure TfEditorExtractoMovimientos.actModificarUpdate(Sender: TObject);
@@ -235,7 +237,9 @@ begin
   //No se podrá modificar un asiento si es automático por factura, si el ejercicio esta cerrado o el asiento esta punteado
   if (Sender as TAction).Enabled then
      if Assigned(Diario) then
-        (Sender as TAction).Enabled := Diario.ID_FACTURAIsNull and Diario.ID_PAGOIsNull
+        (Sender as TAction).Enabled := (ViewGrid._FocusedView.Controller.SelectedRowCount = 1)
+                                       and Diario.ID_FACTURAIsNull
+                                       and Diario.ID_PAGOIsNull
                                        and (Diario.ESTADO = CTE_ABIERTO)
                                        and (Diario.PUNTEADO = CTE_NO_PUNTEADO);
 end;

Source/Modulos/Contratos de cliente/Views/uViewDetallesContratoCliente.dfm

@@ -1,89 +1,5 @@
 inherited frViewDetallesContratoCliente: TfrViewDetallesContratoCliente
-  Width = 1045
-  Height = 532
-  inherited ToolBar1: TToolBar
-    Width = 1045
-    Height = 24
-    inherited ToolButton4: TToolButton
-      Wrap = False
-    end
-    inherited ToolButton14: TToolButton
-      Left = 334
-      Top = 0
-      ExplicitLeft = 334
-      ExplicitTop = 0
-    end
-    inherited FontName: TJvFontComboBox
-      Left = 368
-      Top = 0
-      ExplicitLeft = 368
-      ExplicitTop = 0
-    end
-    inherited FontSize: TEdit
-      Left = 513
-      Top = 0
-      ExplicitLeft = 513
-      ExplicitTop = 0
-    end
-    inherited UpDown1: TUpDown
-      Left = 555
-      Top = 0
-      ExplicitLeft = 555
-      ExplicitTop = 0
-    end
-    inherited ToolButton13: TToolButton
-      Left = 572
-      Top = 0
-      ExplicitLeft = 572
-      ExplicitTop = 0
-    end
-    inherited ToolButton6: TToolButton
-      Left = 580
-      Top = 0
-      ExplicitLeft = 580
-      ExplicitTop = 0
-    end
-    inherited ToolButton7: TToolButton
-      Left = 614
-      Top = 0
-      ExplicitLeft = 614
-      ExplicitTop = 0
-    end
-    inherited ToolButton8: TToolButton
-      Left = 648
-      Top = 0
-      ExplicitLeft = 648
-      ExplicitTop = 0
-    end
-    inherited ToolButton12: TToolButton
-      Left = 682
-      Top = 0
-      ExplicitLeft = 682
-      ExplicitTop = 0
-    end
-    inherited ToolButton9: TToolButton
-      Left = 690
-      Top = 0
-      ExplicitLeft = 690
-      ExplicitTop = 0
-    end
-    inherited ToolButton10: TToolButton
-      Left = 724
-      Top = 0
-      ExplicitLeft = 724
-      ExplicitTop = 0
-    end
-    inherited ToolButton11: TToolButton
-      Left = 758
-      Top = 0
-      ExplicitLeft = 758
-      ExplicitTop = 0
-    end
-  end
   inherited cxGrid: TcxGrid
-    Top = 50
-    Width = 1045
-    Height = 482
     inherited cxGridView: TcxGridDBTableView
       inherited cxGridViewID_ARTICULO: TcxGridDBColumn
         Width = 57
@@ -94,7 +10,6 @@ inherited frViewDetallesContratoCliente: TfrViewDetallesContratoCliente
         VisibleForCustomization = False
       end
       inherited cxGridViewVALORADO: TcxGridDBColumn [5]
-        Visible = True
       end
       inherited cxGridViewVISIBLE: TcxGridDBColumn [6]
         Caption = #191'Importe visible?'
@@ -151,10 +66,7 @@ inherited frViewDetallesContratoCliente: TfrViewDetallesContratoCliente
     end
   end
   inherited TBXDock1: TTBXDock
-    Top = 24
-    Width = 1045
     inherited TBXToolbar1: TTBXToolbar
-      ExplicitWidth = 831
       object TBXSubmenuItem1: TTBXSubmenuItem [0]
         Caption = 'A'#241'adir cap'#237'tulo'
         DisplayMode = nbdmImageAndText

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

@@ -2,7 +2,6 @@ inherited frViewDetallesFacturaCliente: TfrViewDetallesFacturaCliente
   inherited cxGrid: TcxGrid
     inherited cxGridView: TcxGridDBTableView
       inherited cxGridViewVALORADO: TcxGridDBColumn [4]
-        Visible = True
       end
       inherited cxGridViewVISIBLE: TcxGridDBColumn [5]
         Visible = True
@@ -21,13 +20,17 @@ inherited frViewDetallesFacturaCliente: TfrViewDetallesFacturaCliente
       inherited cxGridViewDESCUENTO: TcxGridDBColumn [11]
       end
       inherited cxGridViewIMPORTENETO: TcxGridDBColumn [12]
-        Visible = False
-        VisibleForCustomization = False
       end
       inherited cxGridViewIMPORTEPORTE: TcxGridDBColumn [13]
       end
       inherited cxGridViewIMPORTETOTAL: TcxGridDBColumn [14]
       end
+      inherited cxGridViewINCREMENTO: TcxGridDBColumn [15]
+      end
+      inherited cxGridViewDECREMENTO: TcxGridDBColumn [16]
+      end
+      inherited cxGridViewIMP_UNIDAD_DTO: TcxGridDBColumn [17]
+      end
     end
   end
   inherited TBXDock1: TTBXDock

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

@@ -210,6 +210,10 @@ inherited frViewFacturasCliente: TfrViewFacturasCliente
         FooterAlignmentHorz = taRightJustify
         HeaderAlignmentHorz = taRightJustify
       end
+      object cxGridViewREFERENCIA_CLIENTE: TcxGridDBColumn
+        Caption = 'C'#243'd. cliente'
+        DataBinding.FieldName = 'REFERENCIA_CLIENTE'
+      end
     end
     inherited cxGridLevel: TcxGridLevel
       Caption = 'Todas'

Source/Modulos/Facturas de cliente/Views/uViewFacturasCliente.pas

@@ -82,6 +82,7 @@ type
     actTienda: TAction;
     TBXSeparatorItem6: TTBXSeparatorItem;
     TBXItem7: TTBXItem;
+    cxGridViewREFERENCIA_CLIENTE: TcxGridDBColumn;
     procedure cxGridViewStylesGetContentStyle(Sender: TcxCustomGridTableView;
       ARecord: TcxCustomGridRecord; AItem: TcxCustomGridTableItem;
       out AStyle: TcxStyle);

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

@@ -204,6 +204,11 @@ inherited frViewFacturasProveedor: TfrViewFacturasProveedor
         Caption = 'Tipo operaci'#243'n'
         DataBinding.FieldName = 'TIPO_OPERACION'
       end
+      object cxGridViewREF_PROVEEDOR: TcxGridDBColumn
+        Caption = 'C'#243'd. proveedor'
+        DataBinding.FieldName = 'REF_PROVEEDOR'
+        PropertiesClassName = 'TcxTextEditProperties'
+      end
     end
     inherited cxGridLevel: TcxGridLevel
       Caption = 'Todas'
@@ -259,6 +264,8 @@ inherited frViewFacturasProveedor: TfrViewFacturasProveedor
           StyleFocused.LookAndFeel.SkinName = ''
           StyleHot.LookAndFeel.SkinName = ''
           ExplicitLeft = 361
+          ExplicitWidth = 250
+          Width = 250
         end
       end
       inherited TBXAlignmentPanel1: TTBXAlignmentPanel

Source/Modulos/Facturas de proveedor/Views/uViewFacturasProveedor.pas

@@ -63,6 +63,7 @@ type
     cxGridViewNOMBRE_COMERCIAL_PROVEEDOR: TcxGridDBColumn;
     cxGridViewFECHA_VENCIMIENTO: TcxGridDBColumn;
     cxGridViewTIPO_OPERACION: TcxGridDBColumn;
+    cxGridViewREF_PROVEEDOR: TcxGridDBColumn;
     procedure cxGridViewStylesGetContentStyle(Sender: TcxCustomGridTableView;
       ARecord: TcxCustomGridRecord; AItem: TcxCustomGridTableItem;
       out AStyle: TcxStyle);

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

@@ -1,89 +1,5 @@
 inherited frViewDetallesPresupuestoCliente: TfrViewDetallesPresupuestoCliente
-  Width = 1124
-  Height = 455
-  inherited ToolBar1: TToolBar
-    Width = 1124
-    Height = 24
-    inherited ToolButton4: TToolButton
-      Wrap = False
-    end
-    inherited ToolButton14: TToolButton
-      Left = 334
-      Top = 0
-      ExplicitLeft = 334
-      ExplicitTop = 0
-    end
-    inherited FontName: TJvFontComboBox
-      Left = 368
-      Top = 0
-      ExplicitLeft = 368
-      ExplicitTop = 0
-    end
-    inherited FontSize: TEdit
-      Left = 513
-      Top = 0
-      ExplicitLeft = 513
-      ExplicitTop = 0
-    end
-    inherited UpDown1: TUpDown
-      Left = 555
-      Top = 0
-      ExplicitLeft = 555
-      ExplicitTop = 0
-    end
-    inherited ToolButton13: TToolButton
-      Left = 572
-      Top = 0
-      ExplicitLeft = 572
-      ExplicitTop = 0
-    end
-    inherited ToolButton6: TToolButton
-      Left = 580
-      Top = 0
-      ExplicitLeft = 580
-      ExplicitTop = 0
-    end
-    inherited ToolButton7: TToolButton
-      Left = 614
-      Top = 0
-      ExplicitLeft = 614
-      ExplicitTop = 0
-    end
-    inherited ToolButton8: TToolButton
-      Left = 648
-      Top = 0
-      ExplicitLeft = 648
-      ExplicitTop = 0
-    end
-    inherited ToolButton12: TToolButton
-      Left = 682
-      Top = 0
-      ExplicitLeft = 682
-      ExplicitTop = 0
-    end
-    inherited ToolButton9: TToolButton
-      Left = 690
-      Top = 0
-      ExplicitLeft = 690
-      ExplicitTop = 0
-    end
-    inherited ToolButton10: TToolButton
-      Left = 724
-      Top = 0
-      ExplicitLeft = 724
-      ExplicitTop = 0
-    end
-    inherited ToolButton11: TToolButton
-      Left = 758
-      Top = 0
-      ExplicitLeft = 758
-      ExplicitTop = 0
-    end
-  end
   inherited cxGrid: TcxGrid
-    Top = 50
-    Width = 1124
-    Height = 405
     inherited cxGridView: TcxGridDBTableView
       inherited cxGridViewID: TcxGridDBColumn
         VisibleForCustomization = False
@@ -105,7 +21,6 @@ inherited frViewDetallesPresupuestoCliente: TfrViewDetallesPresupuestoCliente
         VisibleForCustomization = False
       end
       inherited cxGridViewVALORADO: TcxGridDBColumn [5]
-        Visible = True
       end
       inherited cxGridViewVISIBLE: TcxGridDBColumn [6]
         Caption = #191'Importe visible?'
@@ -162,11 +77,8 @@ inherited frViewDetallesPresupuestoCliente: TfrViewDetallesPresupuestoCliente
     end
   end
   inherited TBXDock1: TTBXDock
-    Top = 24
-    Width = 1124
     inherited TBXToolbar1: TTBXToolbar
       DockPos = 0
-      ExplicitWidth = 839
       object TBXSubmenuItem1: TTBXSubmenuItem [0]
         Caption = 'A'#241'adir cap'#237'tulo'
         DisplayMode = nbdmImageAndText

Source/Servidor/FactuGES_Server.dproj

@@ -28,7 +28,7 @@
 		<Borland.Personality>Delphi.Personality</Borland.Personality>
 		<Borland.ProjectType/>
 		<BorlandProject>
-			<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">4</VersionInfo><VersionInfo Name="MinorVer">4</VersionInfo><VersionInfo Name="Release">4</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">Rodax Software S.L.</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">4.4.4.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">FactuGES (Servidor)</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">4.4.4.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys><VersionInfoKeys Name="CompileDate">miércoles, 19 de abril de 2023 17:22</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">4</VersionInfo><VersionInfo Name="MinorVer">4</VersionInfo><VersionInfo Name="Release">5</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">Rodax Software S.L.</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">4.4.5.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">FactuGES (Servidor)</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">4.4.5.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys><VersionInfoKeys Name="CompileDate">miércoles, 17 de mayo de 2023 19:35</VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
 						<Excluded_Packages Name="C:\Documents and Settings\All Users\Documentos\RAD Studio\5.0\Bpl\dxPScxScheduler2LnkD11.bpl">File C:\Documents and Settings\All Users\Documentos\RAD Studio\5.0\Bpl\dxPScxScheduler2LnkD11.bpl not found</Excluded_Packages>
 					</Excluded_Packages><Source><Source Name="MainSource">FactuGES_Server.dpr</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
 	</ProjectExtensions>