diff --git a/Source/Modulos/Facturas de cliente/Views/uEditorFacturaCliente.dfm b/Source/Modulos/Facturas de cliente/Views/uEditorFacturaCliente.dfm index 7221ef68..78901ba6 100644 --- a/Source/Modulos/Facturas de cliente/Views/uEditorFacturaCliente.dfm +++ b/Source/Modulos/Facturas de cliente/Views/uEditorFacturaCliente.dfm @@ -7,7 +7,7 @@ inherited fEditorFacturaCliente: TfEditorFacturaCliente Position = poScreenCenter OnClose = CustomEditorClose ExplicitWidth = 796 - ExplicitHeight = 609 + ExplicitHeight = 602 PixelsPerInch = 96 TextHeight = 13 inherited JvNavPanelHeader: TJvNavPanelHeader diff --git a/Source/Modulos/Facturas de cliente/Views/uEditorFacturaCliente.pas b/Source/Modulos/Facturas de cliente/Views/uEditorFacturaCliente.pas index 4b59d8e2..60332c2f 100644 --- a/Source/Modulos/Facturas de cliente/Views/uEditorFacturaCliente.pas +++ b/Source/Modulos/Facturas de cliente/Views/uEditorFacturaCliente.pas @@ -217,7 +217,7 @@ begin else FFactura.IMPORTE_PORTE := 0; - RecalcularPortePorUnidad; +// RecalcularPortePorUnidad; Aqui no se desglosa a nivel de articulo end; function TfEditorFacturaCliente.GetController: IFacturasClienteController; diff --git a/Source/Modulos/Facturas de cliente/Views/uEditorFacturasCliente.dfm b/Source/Modulos/Facturas de cliente/Views/uEditorFacturasCliente.dfm index 1e6019b6..83689f52 100644 --- a/Source/Modulos/Facturas de cliente/Views/uEditorFacturasCliente.dfm +++ b/Source/Modulos/Facturas de cliente/Views/uEditorFacturasCliente.dfm @@ -1,9 +1,9 @@ inherited fEditorFacturasCliente: TfEditorFacturasCliente Caption = 'Lista de facturas de cliente' - ClientHeight = 666 + ClientHeight = 575 ClientWidth = 640 ExplicitWidth = 648 - ExplicitHeight = 700 + ExplicitHeight = 602 PixelsPerInch = 96 TextHeight = 13 inherited JvNavPanelHeader: TJvNavPanelHeader @@ -62,7 +62,7 @@ inherited fEditorFacturasCliente: TfEditorFacturasCliente end end inherited StatusBar: TJvStatusBar - Top = 647 + Top = 556 Width = 640 ExplicitTop = 647 ExplicitWidth = 640 @@ -71,7 +71,7 @@ inherited fEditorFacturasCliente: TfEditorFacturasCliente Left = 0 Top = 102 Width = 640 - Height = 545 + Height = 454 Align = alClient Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText @@ -86,7 +86,7 @@ inherited fEditorFacturasCliente: TfEditorFacturasCliente ExplicitHeight = 545 inherited cxGrid: TcxGrid Width = 640 - Height = 417 + Height = 326 ExplicitWidth = 640 ExplicitHeight = 417 inherited cxGridView: TcxGridDBTableView @@ -96,6 +96,16 @@ inherited fEditorFacturasCliente: TfEditorFacturasCliente Kind = skSum Position = spFooter Column = frViewFacturasCliente1.cxGridViewBASE_IMPONIBLE + end + item + Format = ',0.00 '#8364';-,0.00 '#8364 + Kind = skSum + Position = spFooter + Column = frViewFacturasCliente1.cxGridViewIMPORTE_TOTAL + end + item + Format = ',0.00 '#8364';-,0.00 '#8364 + Column = frViewFacturasCliente1.cxGridViewIMPORTE_TOTAL end> DataController.Summary.FooterSummaryItems = < item @@ -107,6 +117,11 @@ inherited fEditorFacturasCliente: TfEditorFacturasCliente Format = ',0.00 '#8364';-,0.00 '#8364 Kind = skSum Column = frViewFacturasCliente1.cxGridViewBASE_IMPONIBLE + end + item + Format = ',0.00 '#8364';-,0.00 '#8364 + Kind = skSum + Column = frViewFacturasCliente1.cxGridViewIMPORTE_TOTAL end> inherited cxGridViewBASE_IMPONIBLE: TcxGridDBColumn Visible = True @@ -147,7 +162,7 @@ inherited fEditorFacturasCliente: TfEditorFacturasCliente end end inherited pnlAgrupaciones: TTBXDockablePanel - Top = 519 + Top = 428 ExplicitTop = 519 ExplicitWidth = 640 inherited TBXAlignmentPanel1: TTBXAlignmentPanel