Se arreglan informes y vistas de presupuestos y contratos que no ordenaban bien

git-svn-id: https://192.168.0.254/svn/Proyectos.Acana_FactuGES2/trunk@436 f4e31baf-9722-1c47-927c-6f952f962d4b
This commit is contained in:
roberto 2009-09-22 15:21:38 +00:00
parent 53bc10cca6
commit 9853364ba6
13 changed files with 48 additions and 67 deletions

Binary file not shown.

BIN
Resources/logo-compas.jpg Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 6.7 KiB

BIN
Resources/logo.jpg Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 5.5 KiB

BIN
Resources/marca-compas.jpg Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 4.9 KiB

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

View File

@ -25,4 +25,4 @@ END
/* C:\Codigo Acana\Source\Modulos\Contratos de cliente\Views\uEditorElegirArticulosContratoCliente.dfm */
/* C:\Codigo Acana\Source\Modulos\Contratos de cliente\Views\uEditorContratosClienteReport.dfm */
/* C:\Codigo Acana\Source\Modulos\Contratos de cliente\Views\ContratosCliente_view.res */
/* C:\DOCUME~1\Usuario\CONFIG~1\Temp\dtf8B8.tmp */
/* C:\Codigo Acana\Source\Modulos\Contratos de cliente\Views\ContratosCliente_view.drf */

View File

@ -12,7 +12,7 @@ inherited frViewContratosCliente: TfrViewContratosCliente
ExplicitHeight = 397
inherited cxGridView: TcxGridDBTableView
DataController.KeyFieldNames = 'ID'
DataController.Options = [dcoAnsiSort, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoSortByDisplayText, dcoGroupsAlwaysExpanded]
DataController.Options = [dcoAnsiSort, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoGroupsAlwaysExpanded]
DataController.Summary.DefaultGroupSummaryItems = <
item
Format = ',0.00 '#8364';-,0.00 '#8364
@ -31,9 +31,6 @@ inherited frViewContratosCliente: TfrViewContratosCliente
Kind = skSum
Column = cxGridViewIMPORTE_TOTAL
end>
DataController.OnCompare = cxGridViewDataControllerCompare
OptionsCustomize.ColumnHidingOnGrouping = False
OptionsView.GroupFooters = gfAlwaysVisible
object cxGridViewINCIDENCIASACTIVAS: TcxGridDBColumn
Caption = 'Incidencias'
DataBinding.FieldName = 'INCIDENCIAS_ACTIVAS'
@ -118,12 +115,6 @@ inherited frViewContratosCliente: TfrViewContratosCliente
Width = 25
end
end
object cxGridDBTableView1: TcxGridDBTableView [1]
NavigatorButtons.ConfirmDelete = False
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <>
DataController.Summary.SummaryGroups = <>
end
inherited cxGridLevel: TcxGridLevel
Caption = 'Todos'
end

View File

@ -14,7 +14,7 @@ inherited frViewPresupuestosCliente: TfrViewPresupuestosCliente
ExplicitHeight = 397
inherited cxGridView: TcxGridDBTableView
DataController.KeyFieldNames = 'ID'
DataController.Options = [dcoAnsiSort, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoSortByDisplayText, dcoGroupsAlwaysExpanded]
DataController.Options = [dcoAnsiSort, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoGroupsAlwaysExpanded]
DataController.Summary.DefaultGroupSummaryItems = <
item
Format = ',0.00 '#8364';-,0.00 '#8364
@ -33,7 +33,6 @@ inherited frViewPresupuestosCliente: TfrViewPresupuestosCliente
Kind = skSum
Column = cxGridViewIMPORTE_TOTAL
end>
DataController.OnCompare = cxGridViewDataControllerCompare
OptionsCustomize.ColumnHidingOnGrouping = False
OptionsView.GroupFooters = gfAlwaysVisible
object cxGridViewINCIDENCIASACTIVAS: TcxGridDBColumn
@ -69,8 +68,6 @@ inherited frViewPresupuestosCliente: TfrViewPresupuestosCliente
object cxGridViewREFERENCIA: TcxGridDBColumn
DataBinding.FieldName = 'REFERENCIA'
BestFitMaxWidth = 25
SortIndex = 0
SortOrder = soDescending
Width = 58
end
object cxGridViewSITUACION: TcxGridDBColumn
@ -119,12 +116,6 @@ inherited frViewPresupuestosCliente: TfrViewPresupuestosCliente
Width = 25
end
end
object cxGridDBTableView1: TcxGridDBTableView [1]
NavigatorButtons.ConfirmDelete = False
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <>
DataController.Summary.SummaryGroups = <>
end
inherited cxGridLevel: TcxGridLevel
Caption = 'Todos'
end
@ -233,7 +224,7 @@ inherited frViewPresupuestosCliente: TfrViewPresupuestosCliente
end
inherited ActionList1: TActionList
Left = 200
Top = 448
Top = 408
object actCliente: TAction
Caption = 'Cliente'
OnExecute = actClienteExecute

View File

@ -12,7 +12,7 @@ uses
uDADataTable, cxGridLevel, cxClasses, cxControls, cxGridCustomView, Classes,
cxGrid, uBizPresupuestosCliente, cxCurrencyEdit, Forms, uViewFiltroBase, ActnList, TB2Item,
TBX, TB2Toolbar, TBXDkPanels, TB2Dock, dxPgsDlg, uDAInterfaces, Windows,
uCustomView, uViewBase;
uCustomView, uViewBase, cxTextEdit, cxCalendar;
type
IViewPresupuestosCliente = interface(IViewGrid)
@ -23,7 +23,6 @@ type
end;
TfrViewPresupuestosCliente = class(TfrViewGrid, IViewPresupuestosCliente)
cxGridDBTableView1: TcxGridDBTableView;
cxGridViewREFERENCIA: TcxGridDBColumn;
cxGridViewINCIDENCIASACTIVAS: TcxGridDBColumn;
cxGridViewNOMBRE: TcxGridDBColumn;