diff --git a/Source/Modulos/Facturas de cliente/Views/uViewFacturaCliente.dfm b/Source/Modulos/Facturas de cliente/Views/uViewFacturaCliente.dfm index 68d7ba15..8fb5907e 100644 --- a/Source/Modulos/Facturas de cliente/Views/uViewFacturaCliente.dfm +++ b/Source/Modulos/Facturas de cliente/Views/uViewFacturaCliente.dfm @@ -1,6 +1,6 @@ inherited frViewFacturaCliente: TfrViewFacturaCliente - Width = 896 - Height = 553 + Width = 451 + Height = 304 Align = alClient OnCreate = CustomViewCreate OnDestroy = CustomViewDestroy @@ -9,21 +9,19 @@ inherited frViewFacturaCliente: TfrViewFacturaCliente object dxLayoutControl1: TdxLayoutControl Left = 0 Top = 0 - Width = 896 - Height = 553 + Width = 451 + Height = 304 Align = alClient ParentBackground = True TabOrder = 0 TabStop = False AutoContentSizes = [acsWidth, acsHeight] LookAndFeel = dxLayoutOfficeLookAndFeel1 - ExplicitWidth = 451 - ExplicitHeight = 304 DesignSize = ( - 896 - 553) + 451 + 304) object Label1: TLabel - Left = 488 + Left = 354 Top = 193 Width = 311 Height = 26 @@ -142,7 +140,7 @@ inherited frViewFacturaCliente: TfrViewFacturaCliente Width = 269 end object bFormasPago: TButton - Left = 306 + Left = 172 Top = 130 Width = 132 Height = 23 @@ -173,7 +171,7 @@ inherited frViewFacturaCliente: TfrViewFacturaCliente Width = 165 end object cbClienteFinal: TcxDBTextEdit - Left = 488 + Left = 354 Top = 227 Anchors = [akLeft, akTop, akRight] DataBinding.DataField = 'CLIENTE_FINAL' @@ -201,7 +199,7 @@ inherited frViewFacturaCliente: TfrViewFacturaCliente Width = 339 end object bElegirClienteFinal: TButton - Left = 840 + Left = 410 Top = 225 Width = 23 Height = 25 @@ -209,7 +207,7 @@ inherited frViewFacturaCliente: TfrViewFacturaCliente TabOrder = 10 end inline frViewDatosYSeleccionClienteFacturaCliente1: TfrViewDatosYSeleccionClienteFacturaCliente - Left = 477 + Left = 343 Top = 30 Width = 505 Height = 138 @@ -221,7 +219,7 @@ inherited frViewFacturaCliente: TfrViewFacturaCliente ParentFont = False TabOrder = 8 ReadOnly = False - ExplicitLeft = 477 + ExplicitLeft = 343 ExplicitTop = 30 inherited dxLayoutControl1: TdxLayoutControl inherited edtlNombre: TcxDBTextEdit @@ -229,32 +227,28 @@ inherited frViewFacturaCliente: TfrViewFacturaCliente StyleDisabled.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = '' - ExplicitWidth = 224 - Width = 224 end inherited edtNIFCIF: TcxDBTextEdit - Left = 284 + Left = 171 Style.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = '' - ExplicitLeft = 284 + ExplicitLeft = 171 end inherited Button3: TBitBtn - Left = 195 - ExplicitLeft = 195 + Left = 82 + ExplicitLeft = 82 end inherited edtDireccion: TcxTextEdit Style.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = '' - ExplicitWidth = 121 - Width = 121 end inherited Button4: TButton - Left = 364 - ExplicitLeft = 364 + Left = 251 + ExplicitLeft = 251 end end inherited ActionList1: TActionList diff --git a/Source/Modulos/Facturas de cliente/Views/uViewFacturaCliente.pas b/Source/Modulos/Facturas de cliente/Views/uViewFacturaCliente.pas index b7824cf7..3a7e4c60 100644 --- a/Source/Modulos/Facturas de cliente/Views/uViewFacturaCliente.pas +++ b/Source/Modulos/Facturas de cliente/Views/uViewFacturaCliente.pas @@ -214,14 +214,14 @@ begin if AListaIBAN.Count > 0 then begin - Add('--------------'); + Add('Cuentas de ' + AppFactuGES.EmpresaActiva.NOMBRE + '-----------------'); for i := 0 to AListaIBAN.Count - 1 do Add(AListaIBAN.Names[i]); end; if AListaCliente.Count > 0 then begin - Add('--------------'); + Add('Cuentas del Cliente -----------------'); for i := 0 to AListaCliente.Count - 1 do Add(AListaCliente.Names[i]); end; diff --git a/Source/Modulos/Facturas de proveedor/Views/uEditorFacturaProveedor.dfm b/Source/Modulos/Facturas de proveedor/Views/uEditorFacturaProveedor.dfm index 117abdc6..28aff1d3 100644 --- a/Source/Modulos/Facturas de proveedor/Views/uEditorFacturaProveedor.dfm +++ b/Source/Modulos/Facturas de proveedor/Views/uEditorFacturaProveedor.dfm @@ -2,20 +2,20 @@ inherited fEditorFacturaProveedor: TfEditorFacturaProveedor Left = 454 Top = 208 Caption = 'Nueva factura de proveedor' - ClientHeight = 633 - ClientWidth = 819 + ClientHeight = 811 + ClientWidth = 922 Position = poScreenCenter OnClose = CustomEditorClose - ExplicitWidth = 827 - ExplicitHeight = 667 + ExplicitWidth = 930 + ExplicitHeight = 845 PixelsPerInch = 96 TextHeight = 13 inherited JvNavPanelHeader: TJvNavPanelHeader - Width = 819 + Width = 922 Caption = 'Nueva factura de proveedor' ExplicitWidth = 819 inherited Image1: TImage - Left = 686 + Left = 789 Picture.Data = { 0A54504E474F626A65637489504E470D0A1A0A0000000D494844520000001800 0000180806000000E0773DF80000000970485973000017120000171201679FD2 @@ -38,14 +38,14 @@ inherited fEditorFacturaProveedor: TfEditorFacturaProveedor ExplicitLeft = 742 end inherited lblDesbloquear: TcxLabel - Left = 721 + Left = 824 ExplicitLeft = 721 - AnchorX = 766 + AnchorX = 869 AnchorY = 14 end end inherited TBXDock: TTBXDock - Width = 819 + Width = 922 ExplicitWidth = 819 inherited tbxMain: TTBXToolbar ExplicitWidth = 330 @@ -60,7 +60,7 @@ inherited fEditorFacturaProveedor: TfEditorFacturaProveedor end end inherited tbxMenu: TTBXToolbar - ExplicitWidth = 819 + ExplicitWidth = 922 inherited TBXSubmenuItem4: TTBXSubmenuItem inherited TBXItem8: TTBXItem Visible = False @@ -75,9 +75,8 @@ inherited fEditorFacturaProveedor: TfEditorFacturaProveedor end end inherited pgPaginas: TPageControl - Width = 813 - Height = 278 - ActivePage = pagContenido + Width = 916 + Height = 456 OnChanging = pgPaginasChanging ExplicitWidth = 813 ExplicitHeight = 278 @@ -90,8 +89,8 @@ inherited fEditorFacturaProveedor: TfEditorFacturaProveedor inline frViewFacturaProveedor1: TfrViewFacturaProveedor Left = 0 Top = 0 - Width = 805 - Height = 250 + Width = 908 + Height = 428 Align = alClient Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText @@ -104,8 +103,8 @@ inherited fEditorFacturaProveedor: TfEditorFacturaProveedor ExplicitWidth = 805 ExplicitHeight = 250 inherited dxLayoutControl1: TdxLayoutControl - Width = 805 - Height = 250 + Width = 908 + Height = 428 ExplicitWidth = 805 ExplicitHeight = 250 inherited eReferencia: TcxDBTextEdit @@ -144,8 +143,8 @@ inherited fEditorFacturaProveedor: TfEditorFacturaProveedor Width = 104 end inherited bFormasPago: TButton - Left = 242 - ExplicitLeft = 242 + Left = 301 + ExplicitLeft = 301 end inherited eReferenciaProveedor: TcxDBTextEdit Style.LookAndFeel.SkinName = '' @@ -156,9 +155,9 @@ inherited fEditorFacturaProveedor: TfEditorFacturaProveedor Width = 242 end inherited frViewProveedorFactura: TfrViewDatosYSeleccionProveedor - Left = 402 + Left = 461 Width = 377 - ExplicitLeft = 402 + ExplicitLeft = 461 ExplicitWidth = 377 inherited dxLayoutControl1: TdxLayoutControl Width = 377 @@ -209,17 +208,17 @@ inherited fEditorFacturaProveedor: TfEditorFacturaProveedor Width = 303 end inherited edtCodigoPostal: TcxDBTextEdit - Left = 272 + Left = 333 DataBinding.DataSource = frViewFacturaProveedor1.DADataSource Style.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = '' - ExplicitLeft = 272 + ExplicitLeft = 333 end inherited Button3: TBitBtn - Left = 156 - ExplicitLeft = 156 + Left = 217 + ExplicitLeft = 217 end end end @@ -245,6 +244,10 @@ inherited fEditorFacturaProveedor: TfEditorFacturaProveedor StyleFocused.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = '' end + inherited eFacturaWeb: TcxDBCheckBox + ExplicitWidth = 312 + Width = 312 + end end end end @@ -252,11 +255,13 @@ inherited fEditorFacturaProveedor: TfEditorFacturaProveedor Caption = 'Contenido' ImageIndex = 1 OnShow = pagContenidoShow + ExplicitWidth = 805 + ExplicitHeight = 250 inline frViewDetallesFacturaProveedor1: TfrViewDetallesFacturaProveedor Left = 0 Top = 0 - Width = 805 - Height = 250 + Width = 908 + Height = 428 Align = alClient BiDiMode = bdLeftToRight Font.Charset = DEFAULT_CHARSET @@ -271,8 +276,8 @@ inherited fEditorFacturaProveedor: TfEditorFacturaProveedor ExplicitWidth = 805 ExplicitHeight = 250 inherited ToolBar1: TToolBar - Width = 805 - Height = 73 + Width = 908 + Height = 51 ExplicitWidth = 805 ExplicitHeight = 73 inherited ToolButton3: TToolButton @@ -290,87 +295,88 @@ inherited fEditorFacturaProveedor: TfEditorFacturaProveedor ExplicitLeft = 334 ExplicitTop = 0 end - inherited FontName: TJvFontComboBox - Top = 22 - ExplicitTop = 22 + inherited FontName: TJvFontComboBox [5] + Left = 399 + Top = 0 + ExplicitLeft = 399 + ExplicitTop = 0 end - inherited FontSize: TEdit - Top = 22 - Width = 344 - ExplicitTop = 22 - ExplicitWidth = 344 + inherited FontSize: TEdit [6] + Left = 544 + Top = 0 + Width = 360 + ExplicitLeft = 544 + ExplicitTop = 0 + ExplicitWidth = 360 end inherited ToolButton13: TToolButton [7] - Left = 0 - Top = 22 - Wrap = True - ExplicitLeft = 0 - ExplicitTop = 22 - ExplicitHeight = 27 + Top = 0 + ExplicitTop = 0 end inherited UpDown1: TUpDown [8] Left = 0 - Top = 49 + Top = 27 ExplicitLeft = 0 - ExplicitTop = 49 + ExplicitTop = 27 end inherited ToolButton6: TToolButton Left = 17 - Top = 49 + Top = 27 ExplicitLeft = 17 - ExplicitTop = 49 + ExplicitTop = 27 end - inherited ToolButton7: TToolButton + inherited ToolButton7: TToolButton [10] Left = 83 - Top = 49 + Top = 27 ExplicitLeft = 83 - ExplicitTop = 49 + ExplicitTop = 27 end - inherited ToolButton8: TToolButton + inherited ToolButton8: TToolButton [11] Left = 150 - Top = 49 + Top = 27 ExplicitLeft = 150 - ExplicitTop = 49 + ExplicitTop = 27 end - inherited ToolButton12: TToolButton + inherited ToolButton12: TToolButton [12] Left = 233 - Top = 49 + Top = 27 ExplicitLeft = 233 - ExplicitTop = 49 + ExplicitTop = 27 + ExplicitHeight = 22 end - inherited ToolButton9: TToolButton + inherited ToolButton9: TToolButton [13] Left = 241 - Top = 49 + Top = 27 ExplicitLeft = 241 - ExplicitTop = 49 + ExplicitTop = 27 end inherited ToolButton10: TToolButton Left = 386 - Top = 49 + Top = 27 ExplicitLeft = 386 - ExplicitTop = 49 + ExplicitTop = 27 end - inherited ToolButton11: TToolButton + inherited ToolButton11: TToolButton [15] Left = 511 - Top = 49 + Top = 27 ExplicitLeft = 511 - ExplicitTop = 49 + ExplicitTop = 27 end end inherited cxGrid: TcxGrid - Top = 99 - Width = 805 - Height = 151 + Top = 77 + Width = 908 + Height = 351 ExplicitWidth = 805 ExplicitHeight = 151 end inherited TBXDock1: TTBXDock - Top = 73 - Width = 805 + Top = 51 + Width = 908 ExplicitTop = 73 ExplicitWidth = 805 inherited TBXToolbar1: TTBXToolbar - ExplicitWidth = 805 + ExplicitWidth = 838 end end inherited cxGridPopupMenu: TcxGridPopupMenu @@ -391,11 +397,13 @@ inherited fEditorFacturaProveedor: TfEditorFacturaProveedor Caption = 'Pedidos' ImageIndex = 2 TabVisible = False + ExplicitWidth = 805 + ExplicitHeight = 250 inline frViewPedidosFacturaProveedor1: TfrViewPedidosFacturaProveedor Left = 0 Top = 0 - Width = 805 - Height = 250 + Width = 908 + Height = 428 Align = alClient Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText @@ -408,13 +416,13 @@ inherited fEditorFacturaProveedor: TfEditorFacturaProveedor ExplicitWidth = 805 ExplicitHeight = 250 inherited cxGrid: TcxGrid - Width = 805 - Height = 225 + Width = 908 + Height = 403 ExplicitWidth = 805 ExplicitHeight = 225 end inherited ToolBar1: TToolBar - Width = 805 + Width = 908 ExplicitWidth = 805 inherited ToolButton1: TToolButton ExplicitWidth = 113 @@ -433,8 +441,8 @@ inherited fEditorFacturaProveedor: TfEditorFacturaProveedor end end inherited StatusBar: TJvStatusBar - Top = 614 - Width = 819 + Top = 792 + Width = 922 Panels = < item Width = 200 @@ -444,8 +452,8 @@ inherited fEditorFacturaProveedor: TfEditorFacturaProveedor end inline frViewTotales1: TfrViewTotalesVariosIVA [4] Left = 0 - Top = 360 - Width = 819 + Top = 538 + Width = 922 Height = 254 Align = alBottom Font.Charset = DEFAULT_CHARSET @@ -460,26 +468,24 @@ inherited fEditorFacturaProveedor: TfEditorFacturaProveedor ExplicitWidth = 819 ExplicitHeight = 254 inherited dxLayoutControl1: TdxLayoutControl - Width = 819 + Width = 922 Height = 254 ExplicitWidth = 819 ExplicitHeight = 254 inherited Bevel3: TBevel - Left = 392 - Height = 100 - ExplicitLeft = 392 - ExplicitHeight = 100 + Left = 440 + ExplicitLeft = 440 end inherited Bevel1: TBevel - Left = 504 + Left = 552 Width = 368 - ExplicitLeft = 504 + ExplicitLeft = 552 ExplicitWidth = 368 end inherited Bevel2: TBevel - Left = 504 + Left = 552 Width = 368 - ExplicitLeft = 504 + ExplicitLeft = 552 ExplicitWidth = 368 end inherited Bevel4: TBevel @@ -487,13 +493,13 @@ inherited fEditorFacturaProveedor: TfEditorFacturaProveedor ExplicitWidth = 388 end inherited ImporteDto: TcxDBCurrencyEdit - Left = 575 + Left = 623 Style.LookAndFeel.SkinName = '' Style.IsFontAssigned = True StyleDisabled.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = '' - ExplicitLeft = 575 + ExplicitLeft = 623 ExplicitWidth = 290 Width = 290 end @@ -507,60 +513,60 @@ inherited fEditorFacturaProveedor: TfEditorFacturaProveedor Width = 234 end inherited ImporteTotal: TcxDBCurrencyEdit - Left = 505 + Left = 553 Style.LookAndFeel.SkinName = '' Style.IsFontAssigned = True StyleDisabled.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = '' - ExplicitLeft = 505 + ExplicitLeft = 553 end inherited edtDescuento: TcxDBSpinEdit - Left = 504 + Left = 552 Style.LookAndFeel.SkinName = '' Style.IsFontAssigned = True StyleDisabled.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = '' - ExplicitLeft = 504 + ExplicitLeft = 552 end inherited ImporteBase: TcxDBCurrencyEdit - Left = 504 + Left = 552 Style.LookAndFeel.SkinName = '' Style.IsFontAssigned = True StyleDisabled.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = '' - ExplicitLeft = 504 + ExplicitLeft = 552 ExplicitWidth = 284 Width = 284 end inherited edtRE: TcxDBSpinEdit - Left = 504 + Left = 552 Style.LookAndFeel.SkinName = '' Style.IsFontAssigned = True StyleDisabled.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = '' - ExplicitLeft = 504 + ExplicitLeft = 552 end inherited ImporteRE: TcxDBCurrencyEdit - Left = 575 + Left = 623 Style.LookAndFeel.SkinName = '' Style.IsFontAssigned = True StyleDisabled.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = '' - ExplicitLeft = 575 + ExplicitLeft = 623 end inherited eImporteNeto: TcxDBCurrencyEdit - Left = 504 + Left = 552 Style.LookAndFeel.SkinName = '' Style.IsFontAssigned = True StyleDisabled.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = '' - ExplicitLeft = 504 + ExplicitLeft = 552 ExplicitWidth = 297 Width = 297 end @@ -629,22 +635,22 @@ inherited fEditorFacturaProveedor: TfEditorFacturaProveedor Width = 358 end inherited edtRetencion: TcxDBSpinEdit - Left = 504 + Left = 552 Style.LookAndFeel.SkinName = '' Style.IsFontAssigned = True StyleDisabled.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = '' - ExplicitLeft = 504 + ExplicitLeft = 552 end inherited ImporteRetencion: TcxDBCurrencyEdit - Left = 575 + Left = 623 Style.LookAndFeel.SkinName = '' Style.IsFontAssigned = True StyleDisabled.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = '' - ExplicitLeft = 575 + ExplicitLeft = 623 ExplicitWidth = 345 Width = 345 end diff --git a/Source/Modulos/Facturas de proveedor/Views/uViewFacturaProveedor.dfm b/Source/Modulos/Facturas de proveedor/Views/uViewFacturaProveedor.dfm index 6246db3a..937a5a22 100644 --- a/Source/Modulos/Facturas de proveedor/Views/uViewFacturaProveedor.dfm +++ b/Source/Modulos/Facturas de proveedor/Views/uViewFacturaProveedor.dfm @@ -1,6 +1,6 @@ inherited frViewFacturaProveedor: TfrViewFacturaProveedor - Width = 910 - Height = 484 + Width = 451 + Height = 304 Align = alClient OnCreate = CustomViewCreate OnDestroy = CustomViewDestroy @@ -9,19 +9,17 @@ inherited frViewFacturaProveedor: TfrViewFacturaProveedor object dxLayoutControl1: TdxLayoutControl Left = 0 Top = 0 - Width = 910 - Height = 484 + Width = 451 + Height = 304 Align = alClient ParentBackground = True TabOrder = 0 TabStop = False AutoContentSizes = [acsWidth, acsHeight] LookAndFeel = dxLayoutOfficeLookAndFeel1 - ExplicitWidth = 451 - ExplicitHeight = 304 DesignSize = ( - 910 - 484) + 451 + 304) object eReferencia: TcxDBTextEdit Left = 136 Top = 30 @@ -131,7 +129,7 @@ inherited frViewFacturaProveedor: TfrViewFacturaProveedor Width = 78 end object bFormasPago: TButton - Left = 318 + Left = 162 Top = 189 Width = 132 Height = 23 @@ -164,7 +162,7 @@ inherited frViewFacturaProveedor: TfrViewFacturaProveedor Width = 158 end inline frViewProveedorFactura: TfrViewDatosYSeleccionProveedor - Left = 478 + Left = 322 Top = 30 Width = 350 Height = 202 @@ -176,7 +174,7 @@ inherited frViewFacturaProveedor: TfrViewFacturaProveedor ParentFont = False TabOrder = 10 ReadOnly = False - ExplicitLeft = 478 + ExplicitLeft = 322 ExplicitTop = 30 inherited dxLayoutControl1: TdxLayoutControl inherited edtlNombre: TcxDBTextEdit @@ -218,16 +216,16 @@ inherited frViewFacturaProveedor: TfrViewFacturaProveedor Width = 327 end inherited edtCodigoPostal: TcxDBTextEdit - Left = 318 + Left = 203 Style.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = '' - ExplicitLeft = 318 + ExplicitLeft = 203 end inherited Button3: TBitBtn - Left = 202 - ExplicitLeft = 202 + Left = 87 + ExplicitLeft = 87 end end end diff --git a/Source/Modulos/Facturas de proveedor/Views/uViewFacturaProveedor.pas b/Source/Modulos/Facturas de proveedor/Views/uViewFacturaProveedor.pas index af93e902..ef117841 100644 --- a/Source/Modulos/Facturas de proveedor/Views/uViewFacturaProveedor.pas +++ b/Source/Modulos/Facturas de proveedor/Views/uViewFacturaProveedor.pas @@ -185,13 +185,14 @@ begin if AListaIBAN.Count > 0 then begin + Add('Cuentas de ' + AppFactuGES.EmpresaActiva.NOMBRE + '-----------------'); for i := 0 to AListaIBAN.Count - 1 do Add(AListaIBAN.Names[i]); end; if AListaProveedor.Count > 0 then begin - Add('--------------'); + Add('Cuentas del Proveedor ------------------- '); for i := 0 to AListaProveedor.Count - 1 do Add(AListaProveedor.Names[i]); end; diff --git a/Source/Modulos/Recibos de proveedor/Views/uViewReciboProveedor.pas b/Source/Modulos/Recibos de proveedor/Views/uViewReciboProveedor.pas index fd021b06..64710ed7 100644 --- a/Source/Modulos/Recibos de proveedor/Views/uViewReciboProveedor.pas +++ b/Source/Modulos/Recibos de proveedor/Views/uViewReciboProveedor.pas @@ -128,13 +128,14 @@ begin if AListaIBAN.Count > 0 then begin + Add('Cuentas de ' + AppFactuGES.EmpresaActiva.NOMBRE + '-----------------'); for i := 0 to AListaIBAN.Count - 1 do Add(AListaIBAN.Names[i]); end; if AListaProveedor.Count > 0 then begin - Add('--------------'); + Add('Cuentas del Proveedor -----------------'); for i := 0 to AListaProveedor.Count - 1 do Add(AListaProveedor.Names[i]); end; diff --git a/Source/Servidor/FactuGES_Server.RES b/Source/Servidor/FactuGES_Server.RES index 79b6ed48..b7e60a68 100644 Binary files a/Source/Servidor/FactuGES_Server.RES and b/Source/Servidor/FactuGES_Server.RES differ diff --git a/Source/Servidor/FactuGES_Server.rc b/Source/Servidor/FactuGES_Server.rc index 99ec6f0b..9f627219 100644 --- a/Source/Servidor/FactuGES_Server.rc +++ b/Source/Servidor/FactuGES_Server.rc @@ -16,7 +16,7 @@ BEGIN VALUE "FileVersion", "2.1.1.0\0" VALUE "ProductName", "FactuGES Servidor\0" VALUE "ProductVersion", "2.1.1.0\0" - VALUE "CompileDate", "jueves, 29 de octubre de 2015 12:49\0" + VALUE "CompileDate", "jueves, 11 de febrero de 2016 11:43\0" END END BLOCK "VarFileInfo"