Archivado/LuisLeon_FactuGES
Archived
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Informe margen por artículo - En el grid se han quitado los sumatorios que estaban metidos a capón.

Browse Source 
git-svn-id: https://192.168.0.254/svn/Proyectos.LuisLeon_FactuGES/trunk@305 c93665c3-c93d-084d-9b98-7d5f4a9c3376
This commit is contained in:
David Arranz 2008-12-31 09:12:59 +00:00
parent ab106540f3
commit 0bd6255af8
4 changed files with 12 additions and 332 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

106
Source/Modulos/Informe margen por articulo/Views/uEditorInfMargenArticulo.dfm
View File

@ -302,112 +302,6 @@ inherited fEditorInfMargenArticulo: TfEditorInfMargenArticulo
ExplicitWidth = 457 ExplicitWidth = 457
ExplicitHeight = 347 ExplicitHeight = 347
inherited cxGridView: TcxGridDBTableView inherited cxGridView: TcxGridDBTableView
DataController.Summary.DefaultGroupSummaryItems = <
item
Format = ',0.00 %;-,0.00 %'
Position = spFooter
Column = frViewInfMargenArticulo1.frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_PRO_VENT_PRO_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Column = frViewInfMargenArticulo1.frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_PRO_VENT_PRO_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Position = spFooter
Column = frViewInfMargenArticulo1.frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_ULT_VENT_COMPRA
end
item
Format = ',0.00 %;-,0.00 %'
Position = spFooter
Column = frViewInfMargenArticulo1.frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_ULT_VENT_ULT_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Position = spFooter
Column = frViewInfMargenArticulo1.frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_ULT_VENT_PRO_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Position = spFooter
Column = frViewInfMargenArticulo1.frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_PRO_VENT_COMPRA
end
item
Format = ',0.00 %;-,0.00 %'
Position = spFooter
Column = frViewInfMargenArticulo1.frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_PRO_VENT_ULT_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Column = frViewInfMargenArticulo1.frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_ULT_VENT_COMPRA
end
item
Format = ',0.00 %;-,0.00 %'
Column = frViewInfMargenArticulo1.frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_ULT_VENT_ULT_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Column = frViewInfMargenArticulo1.frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_ULT_VENT_PRO_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Column = frViewInfMargenArticulo1.frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_PRO_VENT_COMPRA
end
item
Format = ',0.00 %;-,0.00 %'
Column = frViewInfMargenArticulo1.frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_PRO_VENT_ULT_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Position = spFooter
Column = frViewInfMargenArticulo1.frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_PRO_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Column = frViewInfMargenArticulo1.frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_PRO_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Column = frViewInfMargenArticulo1.frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_ULT_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Position = spFooter
Column = frViewInfMargenArticulo1.frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_ULT_COMP
end>
DataController.Summary.FooterSummaryItems = <
item
Format = ',0.00 %;-,0.00 %'
Column = frViewInfMargenArticulo1.frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_PRO_VENT_PRO_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Column = frViewInfMargenArticulo1.frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_ULT_VENT_COMPRA
end
item
Format = ',0.00 %;-,0.00 %'
Column = frViewInfMargenArticulo1.frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_ULT_VENT_ULT_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Column = frViewInfMargenArticulo1.frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_ULT_VENT_PRO_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Column = frViewInfMargenArticulo1.frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_PRO_VENT_COMPRA
end
item
Format = ',0.00 %;-,0.00 %'
Column = frViewInfMargenArticulo1.frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_PRO_VENT_ULT_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Column = frViewInfMargenArticulo1.frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_PRO_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Column = frViewInfMargenArticulo1.frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_ULT_COMP
end>
inherited cxGridViewREFERENCIA: TcxGridDBColumn [9] inherited cxGridViewREFERENCIA: TcxGridDBColumn [9]
end end
inherited cxGridViewFAMILIA: TcxGridDBColumn [10] inherited cxGridViewFAMILIA: TcxGridDBColumn [10]

106
Source/Modulos/Informe margen por articulo/Views/uViewInfMargenArticulo.dfm
View File

@ -165,112 +165,6 @@ inherited frViewInfMargenArticulo: TfrViewInfMargenArticulo
ExplicitWidth = 578 ExplicitWidth = 578
ExplicitHeight = 462 ExplicitHeight = 462
inherited cxGridView: TcxGridDBTableView inherited cxGridView: TcxGridDBTableView
DataController.Summary.DefaultGroupSummaryItems = <
item
Format = ',0.00 %;-,0.00 %'
Position = spFooter
Column = frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_PRO_VENT_PRO_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Column = frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_PRO_VENT_PRO_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Position = spFooter
Column = frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_ULT_VENT_COMPRA
end
item
Format = ',0.00 %;-,0.00 %'
Position = spFooter
Column = frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_ULT_VENT_ULT_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Position = spFooter
Column = frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_ULT_VENT_PRO_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Position = spFooter
Column = frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_PRO_VENT_COMPRA
end
item
Format = ',0.00 %;-,0.00 %'
Position = spFooter
Column = frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_PRO_VENT_ULT_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Column = frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_ULT_VENT_COMPRA
end
item
Format = ',0.00 %;-,0.00 %'
Column = frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_ULT_VENT_ULT_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Column = frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_ULT_VENT_PRO_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Column = frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_PRO_VENT_COMPRA
end
item
Format = ',0.00 %;-,0.00 %'
Column = frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_PRO_VENT_ULT_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Position = spFooter
Column = frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_ULT_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Column = frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_ULT_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Position = spFooter
Column = frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_PRO_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Column = frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_PRO_COMP
end>
DataController.Summary.FooterSummaryItems = <
item
Format = ',0.00 %;-,0.00 %'
Column = frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_PRO_VENT_PRO_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Column = frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_ULT_VENT_COMPRA
end
item
Format = ',0.00 %;-,0.00 %'
Column = frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_ULT_VENT_ULT_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Column = frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_ULT_VENT_PRO_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Column = frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_PRO_VENT_COMPRA
end
item
Format = ',0.00 %;-,0.00 %'
Column = frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_PRO_VENT_ULT_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Column = frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_ULT_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Column = frViewInfMargenArticuloGrid1.cxGridViewPOR_MARGEN_PRO_COMP
end>
inherited cxGridViewID_EMPRESA: TcxGridDBColumn inherited cxGridViewID_EMPRESA: TcxGridDBColumn
Width = 20 Width = 20
end end

130
Source/Modulos/Informe margen por articulo/Views/uViewInfMargenArticuloGrid.dfm
View File

@ -1,19 +1,17 @@
inherited frViewInfMargenArticuloGrid: TfrViewInfMargenArticuloGrid inherited frViewInfMargenArticuloGrid: TfrViewInfMargenArticuloGrid
Width = 774 Width = 794
Height = 480 Height = 508
ExplicitWidth = 774 ExplicitWidth = 794
ExplicitHeight = 480 ExplicitHeight = 508
object cxGrid: TcxGrid [0] object cxGrid: TcxGrid [0]
Left = 0 Left = 0
Top = 0 Top = 0
Width = 774 Width = 794
Height = 480 Height = 508
Align = alClient Align = alClient
TabOrder = 0 TabOrder = 0
LookAndFeel.Kind = lfStandard LookAndFeel.Kind = lfStandard
LookAndFeel.NativeStyle = True LookAndFeel.NativeStyle = True
ExplicitWidth = 583
ExplicitHeight = 378
object cxGridView: TcxGridDBTableView object cxGridView: TcxGridDBTableView
NavigatorButtons.ConfirmDelete = False NavigatorButtons.ConfirmDelete = False
FilterBox.CustomizeDialog = False FilterBox.CustomizeDialog = False
@ -23,113 +21,9 @@ inherited frViewInfMargenArticuloGrid: TfrViewInfMargenArticuloGrid
DataController.KeyFieldNames = 'RecID' DataController.KeyFieldNames = 'RecID'
DataController.Options = [dcoAnsiSort, dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoSortByDisplayText] DataController.Options = [dcoAnsiSort, dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoSortByDisplayText]
DataController.Summary.DefaultGroupSummaryItems.OnSummary = cxGridViewDataControllerSummaryDefaultGroupSummaryItemsSummary DataController.Summary.DefaultGroupSummaryItems.OnSummary = cxGridViewDataControllerSummaryDefaultGroupSummaryItemsSummary
DataController.Summary.DefaultGroupSummaryItems = < DataController.Summary.DefaultGroupSummaryItems = <>
item
Format = ',0.00 %;-,0.00 %'
Position = spFooter
Column = cxGridViewPOR_MARGEN_PRO_VENT_PRO_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Column = cxGridViewPOR_MARGEN_PRO_VENT_PRO_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Position = spFooter
Column = cxGridViewPOR_MARGEN_ULT_VENT_COMPRA
end
item
Format = ',0.00 %;-,0.00 %'
Position = spFooter
Column = cxGridViewPOR_MARGEN_ULT_VENT_ULT_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Position = spFooter
Column = cxGridViewPOR_MARGEN_ULT_VENT_PRO_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Position = spFooter
Column = cxGridViewPOR_MARGEN_PRO_VENT_COMPRA
end
item
Format = ',0.00 %;-,0.00 %'
Position = spFooter
Column = cxGridViewPOR_MARGEN_PRO_VENT_ULT_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Column = cxGridViewPOR_MARGEN_ULT_VENT_COMPRA
end
item
Format = ',0.00 %;-,0.00 %'
Column = cxGridViewPOR_MARGEN_ULT_VENT_ULT_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Column = cxGridViewPOR_MARGEN_ULT_VENT_PRO_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Column = cxGridViewPOR_MARGEN_PRO_VENT_COMPRA
end
item
Format = ',0.00 %;-,0.00 %'
Column = cxGridViewPOR_MARGEN_PRO_VENT_ULT_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Position = spFooter
Column = cxGridViewPOR_MARGEN_ULT_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Column = cxGridViewPOR_MARGEN_ULT_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Column = cxGridViewPOR_MARGEN_PRO_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Position = spFooter
Column = cxGridViewPOR_MARGEN_PRO_COMP
end>
DataController.Summary.FooterSummaryItems.OnSummary = cxGridViewDataControllerSummaryFooterSummaryItemsSummary DataController.Summary.FooterSummaryItems.OnSummary = cxGridViewDataControllerSummaryFooterSummaryItemsSummary
DataController.Summary.FooterSummaryItems = < DataController.Summary.FooterSummaryItems = <>
item
Format = ',0.00 %;-,0.00 %'
Column = cxGridViewPOR_MARGEN_PRO_VENT_PRO_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Column = cxGridViewPOR_MARGEN_ULT_VENT_COMPRA
end
item
Format = ',0.00 %;-,0.00 %'
Column = cxGridViewPOR_MARGEN_ULT_VENT_ULT_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Column = cxGridViewPOR_MARGEN_ULT_VENT_PRO_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Column = cxGridViewPOR_MARGEN_PRO_VENT_COMPRA
end
item
Format = ',0.00 %;-,0.00 %'
Column = cxGridViewPOR_MARGEN_PRO_VENT_ULT_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Column = cxGridViewPOR_MARGEN_ULT_COMP
end
item
Format = ',0.00 %;-,0.00 %'
Column = cxGridViewPOR_MARGEN_PRO_COMP
end>
DataController.Summary.SummaryGroups = <> DataController.Summary.SummaryGroups = <>
DataController.Summary.OnAfterSummary = cxGridViewDataControllerSummaryAfterSummary DataController.Summary.OnAfterSummary = cxGridViewDataControllerSummaryAfterSummary
DataController.OnGroupingChanged = cxGridViewDataControllerGroupingChanged DataController.OnGroupingChanged = cxGridViewDataControllerGroupingChanged
@ -477,9 +371,8 @@ inherited frViewInfMargenArticuloGrid: TfrViewInfMargenArticuloGrid
object cxGridViewPOR_MARGEN_ULT_COMP: TcxGridDBColumn object cxGridViewPOR_MARGEN_ULT_COMP: TcxGridDBColumn
Caption = '% margen venta - ult. compra' Caption = '% margen venta - ult. compra'
DataBinding.FieldName = 'POR_MARGEN_ULT_COMP' DataBinding.FieldName = 'POR_MARGEN_ULT_COMP'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxCalcEditProperties'
Properties.DisplayFormat = ',0.00 %;-,0.00 %' Properties.DisplayFormat = ',0.00 %;-,0.00 %'
Properties.EditFormat = ',0.00 %;-,0.00 %'
FooterAlignmentHorz = taRightJustify FooterAlignmentHorz = taRightJustify
HeaderAlignmentHorz = taRightJustify HeaderAlignmentHorz = taRightJustify
end end
@ -494,14 +387,13 @@ inherited frViewInfMargenArticuloGrid: TfrViewInfMargenArticuloGrid
object cxGridViewPOR_MARGEN_PRO_COMP: TcxGridDBColumn object cxGridViewPOR_MARGEN_PRO_COMP: TcxGridDBColumn
Caption = '% margen venta - compra pro.' Caption = '% margen venta - compra pro.'
DataBinding.FieldName = 'POR_MARGEN_PRO_COMP' DataBinding.FieldName = 'POR_MARGEN_PRO_COMP'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxCurrencyEditProperties'
Properties.DisplayFormat = ',0.00 %;-,0.00 %'
Properties.EditFormat = ',0.00 %;-,0.00 %'
FooterAlignmentHorz = taRightJustify FooterAlignmentHorz = taRightJustify
HeaderAlignmentHorz = taRightJustify HeaderAlignmentHorz = taRightJustify
end end
object cxGridViewID_DETALLE: TcxGridDBColumn object cxGridViewID_DETALLE: TcxGridDBColumn
DataBinding.FieldName = 'ID_DETALLE' DataBinding.FieldName = 'ID_DETALLE'
PropertiesClassName = 'TcxMaskEditProperties'
VisibleForCustomization = False VisibleForCustomization = False
end end
object cxGridViewIMP_UNIDAD: TcxGridDBColumn object cxGridViewIMP_UNIDAD: TcxGridDBColumn

2
Source/Modulos/Informe margen por articulo/Views/uViewInfMargenArticuloGrid.pas
View File

@ -11,7 +11,7 @@ uses
cxCurrencyEdit, cxCalendar, dxPSGlbl, dxPSUtl, dxPrnPg, dxBkgnd, dxWrap, cxCurrencyEdit, cxCalendar, dxPSGlbl, dxPSUtl, dxPrnPg, dxBkgnd, dxWrap,
dxPrnDev, dxPSEngn, dxPSCompsProvider, dxPSFillPatterns, dxPrnDev, dxPSEngn, dxPSCompsProvider, dxPSFillPatterns,
dxPSEdgePatterns, dxPSCore, dxPScxCommon, dxPScxGrid6Lnk, dxPgsDlg, dxPSEdgePatterns, dxPSCore, dxPScxCommon, dxPScxGrid6Lnk, dxPgsDlg,
cxDropDownEdit, StdCtrls, cxSpinEdit; cxDropDownEdit, StdCtrls, cxSpinEdit, cxMaskEdit, cxCalc;
type type
IViewInfMargenArticuloGrid = interface(IViewInformeBaseGrid) IViewInfMargenArticuloGrid = interface(IViewInformeBaseGrid)