Archivado/Varela_PuntosVenta
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Cambios de etiquetas para que contemple S,M,L,XL

Browse Source 
git-svn-id: https://192.168.0.254/svn/Proyectos.Varela_PuntosVenta/trunk@88 1c943782-d109-9647-9548-93b3ac332352
This commit is contained in:
David Arranz 2007-10-06 11:40:55 +00:00
parent b32185c030
commit d7633b3ea8
17 changed files with 262 additions and 942 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

27
Source/Modulos/Devoluciones/Cliente/uEditorAjustarDevoluciones.dfm
View File

@ -110,7 +110,7 @@ object fEditorAjustarDevoluciones: TfEditorAjustarDevoluciones
Caption = 'Cantidad:' Caption = 'Cantidad:'
end end
object edtEnv40: TcxDBMaskEdit object edtEnv40: TcxDBMaskEdit
Left = 223 Left = 218
Top = 256 Top = 256
DataBinding.DataField = 'S40' DataBinding.DataField = 'S40'
DataBinding.DataSource = dsDataSource DataBinding.DataSource = dsDataSource
@ -150,7 +150,7 @@ object fEditorAjustarDevoluciones: TfEditorAjustarDevoluciones
Width = 25 Width = 25
end end
object edtEnv42: TcxDBMaskEdit object edtEnv42: TcxDBMaskEdit
Left = 326 Left = 323
Top = 256 Top = 256
DataBinding.DataField = 'S42' DataBinding.DataField = 'S42'
DataBinding.DataSource = dsDataSource DataBinding.DataSource = dsDataSource
@ -170,7 +170,7 @@ object fEditorAjustarDevoluciones: TfEditorAjustarDevoluciones
Width = 25 Width = 25
end end
object edtEnv44: TcxDBMaskEdit object edtEnv44: TcxDBMaskEdit
Left = 429 Left = 421
Top = 256 Top = 256
DataBinding.DataField = 'S44' DataBinding.DataField = 'S44'
DataBinding.DataSource = dsDataSource DataBinding.DataSource = dsDataSource
@ -190,7 +190,7 @@ object fEditorAjustarDevoluciones: TfEditorAjustarDevoluciones
Width = 25 Width = 25
end end
object edtEnv46: TcxDBMaskEdit object edtEnv46: TcxDBMaskEdit
Left = 532 Left = 541
Top = 256 Top = 256
DataBinding.DataField = 'S46' DataBinding.DataField = 'S46'
DataBinding.DataSource = dsDataSource DataBinding.DataSource = dsDataSource
@ -210,7 +210,7 @@ object fEditorAjustarDevoluciones: TfEditorAjustarDevoluciones
Width = 25 Width = 25
end end
object edtEnv48: TcxDBMaskEdit object edtEnv48: TcxDBMaskEdit
Left = 635 Left = 639
Top = 256 Top = 256
DataBinding.DataField = 'S48' DataBinding.DataField = 'S48'
DataBinding.DataSource = dsDataSource DataBinding.DataSource = dsDataSource
@ -733,7 +733,7 @@ object fEditorAjustarDevoluciones: TfEditorAjustarDevoluciones
object dxLayoutControl1Item11: TdxLayoutItem object dxLayoutControl1Item11: TdxLayoutItem
AutoAligns = [aaVertical] AutoAligns = [aaVertical]
AlignHorz = ahClient AlignHorz = ahClient
Caption = '38' Caption = '38/S'
CaptionOptions.AlignHorz = taCenter CaptionOptions.AlignHorz = taCenter
CaptionOptions.Layout = clTop CaptionOptions.Layout = clTop
Control = edtEnv38 Control = edtEnv38
@ -742,7 +742,7 @@ object fEditorAjustarDevoluciones: TfEditorAjustarDevoluciones
object dxLayoutControl1Item10: TdxLayoutItem object dxLayoutControl1Item10: TdxLayoutItem
AutoAligns = [aaVertical] AutoAligns = [aaVertical]
AlignHorz = ahClient AlignHorz = ahClient
Caption = '40' Caption = '40/M'
CaptionOptions.AlignHorz = taCenter CaptionOptions.AlignHorz = taCenter
CaptionOptions.Layout = clTop CaptionOptions.Layout = clTop
Control = edtEnv40 Control = edtEnv40
@ -751,7 +751,7 @@ object fEditorAjustarDevoluciones: TfEditorAjustarDevoluciones
object dxLayoutControl1Item12: TdxLayoutItem object dxLayoutControl1Item12: TdxLayoutItem
AutoAligns = [aaVertical] AutoAligns = [aaVertical]
AlignHorz = ahClient AlignHorz = ahClient
Caption = '42' Caption = '42/L'
CaptionOptions.AlignHorz = taCenter CaptionOptions.AlignHorz = taCenter
CaptionOptions.Layout = clTop CaptionOptions.Layout = clTop
Control = edtEnv42 Control = edtEnv42
@ -760,7 +760,7 @@ object fEditorAjustarDevoluciones: TfEditorAjustarDevoluciones
object dxLayoutControl1Item13: TdxLayoutItem object dxLayoutControl1Item13: TdxLayoutItem
AutoAligns = [aaVertical] AutoAligns = [aaVertical]
AlignHorz = ahClient AlignHorz = ahClient
Caption = '44' Caption = '44/XL'
CaptionOptions.AlignHorz = taCenter CaptionOptions.AlignHorz = taCenter
CaptionOptions.Layout = clTop CaptionOptions.Layout = clTop
Control = edtEnv44 Control = edtEnv44
@ -820,7 +820,7 @@ object fEditorAjustarDevoluciones: TfEditorAjustarDevoluciones
object dxLayoutControl1Item2: TdxLayoutItem object dxLayoutControl1Item2: TdxLayoutItem
AutoAligns = [aaVertical] AutoAligns = [aaVertical]
AlignHorz = ahClient AlignHorz = ahClient
Caption = '38' Caption = '38/S'
CaptionOptions.AlignHorz = taCenter CaptionOptions.AlignHorz = taCenter
CaptionOptions.Layout = clTop CaptionOptions.Layout = clTop
Control = edtRec38 Control = edtRec38
@ -840,7 +840,7 @@ object fEditorAjustarDevoluciones: TfEditorAjustarDevoluciones
object dxLayoutControl1Item3: TdxLayoutItem object dxLayoutControl1Item3: TdxLayoutItem
AutoAligns = [aaVertical] AutoAligns = [aaVertical]
AlignHorz = ahClient AlignHorz = ahClient
Caption = '40' Caption = '40/M'
CaptionOptions.AlignHorz = taCenter CaptionOptions.AlignHorz = taCenter
CaptionOptions.Layout = clTop CaptionOptions.Layout = clTop
Control = edtRec40 Control = edtRec40
@ -860,7 +860,7 @@ object fEditorAjustarDevoluciones: TfEditorAjustarDevoluciones
object dxLayoutControl1Item4: TdxLayoutItem object dxLayoutControl1Item4: TdxLayoutItem
AutoAligns = [aaVertical] AutoAligns = [aaVertical]
AlignHorz = ahClient AlignHorz = ahClient
Caption = '42' Caption = '42/L'
CaptionOptions.AlignHorz = taCenter CaptionOptions.AlignHorz = taCenter
CaptionOptions.Layout = clTop CaptionOptions.Layout = clTop
Control = edtRec42 Control = edtRec42
@ -880,7 +880,7 @@ object fEditorAjustarDevoluciones: TfEditorAjustarDevoluciones
object dxLayoutControl1Item20: TdxLayoutItem object dxLayoutControl1Item20: TdxLayoutItem
AutoAligns = [aaVertical] AutoAligns = [aaVertical]
AlignHorz = ahClient AlignHorz = ahClient
Caption = '44' Caption = '44/XL'
CaptionOptions.AlignHorz = taCenter CaptionOptions.AlignHorz = taCenter
CaptionOptions.Layout = clTop CaptionOptions.Layout = clTop
Control = edtRec44 Control = edtRec44
@ -937,6 +937,7 @@ object fEditorAjustarDevoluciones: TfEditorAjustarDevoluciones
end end
end end
object dsDataSource: TDADataSource object dsDataSource: TDADataSource
DataSet = tbl_Devoluciones.Dataset
DataTable = dmDevoluciones.tbl_Devoluciones DataTable = dmDevoluciones.tbl_Devoluciones
Left = 200 Left = 200
Top = 496 Top = 496

5
Source/Modulos/Devoluciones/Cliente/uEditorAjustarDevoluciones.pas
View File

@ -19,7 +19,7 @@ uses
cxGridTableView, cxGridBandedTableView, cxGridDBBandedTableView, cxGridTableView, cxGridBandedTableView, cxGridDBBandedTableView,
cxClasses, cxControls, cxGridCustomView, cxGrid, dxLayoutControl, cxClasses, cxControls, cxGridCustomView, cxGrid, dxLayoutControl,
cxContainer, cxTextEdit, cxDBEdit, cxMemo, cxMaskEdit, cxDropDownEdit, cxContainer, cxTextEdit, cxDBEdit, cxMemo, cxMaskEdit, cxDropDownEdit,
cxCheckBox, cxCalendar, cxLabel, cxDBLabel; cxCheckBox, cxCalendar, cxLabel, cxDBLabel, uDAInterfaces;
type type
IEditorAjustarDevoluciones = interface IEditorAjustarDevoluciones = interface
@ -136,8 +136,7 @@ type
implementation implementation
uses uses
uEditorUtils, uDataModuleDevoluciones, uEditorUtils, uDataModuleDevoluciones;
uDAInterfaces;
{$R *.dfm} {$R *.dfm}

25
Source/Modulos/Devoluciones/Cliente/uViewListaDevoluciones.dfm
View File

@ -7,8 +7,9 @@ inherited frViewListaDevoluciones: TfrViewListaDevoluciones
Top = 60 Top = 60
Width = 466 Width = 466
Height = 417 Height = 417
ExplicitTop = 60
ExplicitWidth = 466 ExplicitWidth = 466
ExplicitHeight = 477 ExplicitHeight = 417
inherited cxGridView: TcxGridDBTableView inherited cxGridView: TcxGridDBTableView
OnMouseDown = cxGridViewMouseDown OnMouseDown = cxGridViewMouseDown
FilterBox.Visible = fvNever FilterBox.Visible = fvNever
@ -112,6 +113,7 @@ inherited frViewListaDevoluciones: TfrViewListaDevoluciones
PropertiesClassName = 'TcxMemoProperties' PropertiesClassName = 'TcxMemoProperties'
end end
object cxGridViewS38: TcxGridDBColumn object cxGridViewS38: TcxGridDBColumn
Caption = 'S38/S'
DataBinding.FieldName = 'S38' DataBinding.FieldName = 'S38'
PropertiesClassName = 'TcxTextEditProperties' PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter Properties.Alignment.Horz = taCenter
@ -121,6 +123,7 @@ inherited frViewListaDevoluciones: TfrViewListaDevoluciones
Width = 42 Width = 42
end end
object cxGridViewS40: TcxGridDBColumn object cxGridViewS40: TcxGridDBColumn
Caption = 'S40/M'
DataBinding.FieldName = 'S40' DataBinding.FieldName = 'S40'
PropertiesClassName = 'TcxTextEditProperties' PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter Properties.Alignment.Horz = taCenter
@ -130,6 +133,7 @@ inherited frViewListaDevoluciones: TfrViewListaDevoluciones
Width = 42 Width = 42
end end
object cxGridViewS42: TcxGridDBColumn object cxGridViewS42: TcxGridDBColumn
Caption = 'S42/L'
DataBinding.FieldName = 'S42' DataBinding.FieldName = 'S42'
PropertiesClassName = 'TcxTextEditProperties' PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter Properties.Alignment.Horz = taCenter
@ -139,6 +143,7 @@ inherited frViewListaDevoluciones: TfrViewListaDevoluciones
Width = 42 Width = 42
end end
object cxGridViewS44: TcxGridDBColumn object cxGridViewS44: TcxGridDBColumn
Caption = 'S44/XL'
DataBinding.FieldName = 'S44' DataBinding.FieldName = 'S44'
PropertiesClassName = 'TcxTextEditProperties' PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter Properties.Alignment.Horz = taCenter
@ -175,24 +180,28 @@ inherited frViewListaDevoluciones: TfrViewListaDevoluciones
Width = 43 Width = 43
end end
object cxGridViewE38: TcxGridDBColumn object cxGridViewE38: TcxGridDBColumn
Caption = 'E38/S'
DataBinding.FieldName = 'E38' DataBinding.FieldName = 'E38'
PropertiesClassName = 'TcxTextEditProperties' PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter Properties.Alignment.Horz = taCenter
Visible = False Visible = False
end end
object cxGridViewE40: TcxGridDBColumn object cxGridViewE40: TcxGridDBColumn
Caption = 'E40/M'
DataBinding.FieldName = 'E40' DataBinding.FieldName = 'E40'
PropertiesClassName = 'TcxTextEditProperties' PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter Properties.Alignment.Horz = taCenter
Visible = False Visible = False
end end
object cxGridViewE42: TcxGridDBColumn object cxGridViewE42: TcxGridDBColumn
Caption = 'E42/L'
DataBinding.FieldName = 'E42' DataBinding.FieldName = 'E42'
PropertiesClassName = 'TcxTextEditProperties' PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter Properties.Alignment.Horz = taCenter
Visible = False Visible = False
end end
object cxGridViewE44: TcxGridDBColumn object cxGridViewE44: TcxGridDBColumn
Caption = 'E44/XL'
DataBinding.FieldName = 'E44' DataBinding.FieldName = 'E44'
PropertiesClassName = 'TcxTextEditProperties' PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter Properties.Alignment.Horz = taCenter
@ -217,7 +226,7 @@ inherited frViewListaDevoluciones: TfrViewListaDevoluciones
Visible = False Visible = False
end end
object cxGridViewER38: TcxGridDBColumn object cxGridViewER38: TcxGridDBColumn
Caption = 'E38' Caption = 'E38/S'
DataBinding.FieldName = 'ER38' DataBinding.FieldName = 'ER38'
PropertiesClassName = 'TcxTextEditProperties' PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter Properties.Alignment.Horz = taCenter
@ -227,7 +236,7 @@ inherited frViewListaDevoluciones: TfrViewListaDevoluciones
Width = 41 Width = 41
end end
object cxGridViewER40: TcxGridDBColumn object cxGridViewER40: TcxGridDBColumn
Caption = 'E40' Caption = 'E40/M'
DataBinding.FieldName = 'ER40' DataBinding.FieldName = 'ER40'
PropertiesClassName = 'TcxTextEditProperties' PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter Properties.Alignment.Horz = taCenter
@ -237,7 +246,7 @@ inherited frViewListaDevoluciones: TfrViewListaDevoluciones
Width = 41 Width = 41
end end
object cxGridViewER42: TcxGridDBColumn object cxGridViewER42: TcxGridDBColumn
Caption = 'E42' Caption = 'E42/L'
DataBinding.FieldName = 'ER42' DataBinding.FieldName = 'ER42'
PropertiesClassName = 'TcxTextEditProperties' PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter Properties.Alignment.Horz = taCenter
@ -247,7 +256,7 @@ inherited frViewListaDevoluciones: TfrViewListaDevoluciones
Width = 41 Width = 41
end end
object cxGridViewER44: TcxGridDBColumn object cxGridViewER44: TcxGridDBColumn
Caption = 'E44' Caption = 'E44/XL'
DataBinding.FieldName = 'ER44' DataBinding.FieldName = 'ER44'
PropertiesClassName = 'TcxTextEditProperties' PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter Properties.Alignment.Horz = taCenter
@ -318,7 +327,7 @@ inherited frViewListaDevoluciones: TfrViewListaDevoluciones
ReadOnly = False ReadOnly = False
ExplicitTop = 19 ExplicitTop = 19
ExplicitWidth = 425 ExplicitWidth = 425
ExplicitHeight = 109 ExplicitHeight = 41
inherited dxLayoutControl1: TdxLayoutControl inherited dxLayoutControl1: TdxLayoutControl
Width = 425 Width = 425
ExplicitWidth = 425 ExplicitWidth = 425
@ -345,8 +354,6 @@ inherited frViewListaDevoluciones: TfrViewListaDevoluciones
ParentColor = True ParentColor = True
ParentFont = False ParentFont = False
Underline = True Underline = True
ExplicitWidth = 128
ExplicitHeight = 32
end end
object pnlAgrupaciones: TTBXAlignmentPanel object pnlAgrupaciones: TTBXAlignmentPanel
Left = 425 Left = 425
@ -356,8 +363,6 @@ inherited frViewListaDevoluciones: TfrViewListaDevoluciones
Align = alClient Align = alClient
AutoSize = True AutoSize = True
TabOrder = 2 TabOrder = 2
ExplicitWidth = 476
ExplicitHeight = 109
object TBXButton3: TTBXButton object TBXButton3: TTBXButton
Tag = 3 Tag = 3
Left = 8 Left = 8

947
Source/Modulos/Recepciones/Cliente/uDataModuleRecepciones.dfm
View File

File diff suppressed because it is too large Load Diff

26
Source/Modulos/Recepciones/Cliente/uEditorAjustarRecepciones.dfm
View File

@ -110,7 +110,7 @@ object fEditorAjustarRecepciones: TfEditorAjustarRecepciones
Caption = 'Cantidad:' Caption = 'Cantidad:'
end end
object edtEnv40: TcxDBMaskEdit object edtEnv40: TcxDBMaskEdit
Left = 218 Left = 213
Top = 258 Top = 258
DataBinding.DataField = 'E40' DataBinding.DataField = 'E40'
DataBinding.DataSource = dsDataSource DataBinding.DataSource = dsDataSource
@ -148,7 +148,7 @@ object fEditorAjustarRecepciones: TfEditorAjustarRecepciones
Width = 25 Width = 25
end end
object edtEnv42: TcxDBMaskEdit object edtEnv42: TcxDBMaskEdit
Left = 322 Left = 319
Top = 258 Top = 258
DataBinding.DataField = 'E42' DataBinding.DataField = 'E42'
DataBinding.DataSource = dsDataSource DataBinding.DataSource = dsDataSource
@ -167,7 +167,7 @@ object fEditorAjustarRecepciones: TfEditorAjustarRecepciones
Width = 25 Width = 25
end end
object edtEnv44: TcxDBMaskEdit object edtEnv44: TcxDBMaskEdit
Left = 426 Left = 418
Top = 258 Top = 258
DataBinding.DataField = 'E44' DataBinding.DataField = 'E44'
DataBinding.DataSource = dsDataSource DataBinding.DataSource = dsDataSource
@ -186,7 +186,7 @@ object fEditorAjustarRecepciones: TfEditorAjustarRecepciones
Width = 25 Width = 25
end end
object edtEnv46: TcxDBMaskEdit object edtEnv46: TcxDBMaskEdit
Left = 530 Left = 539
Top = 258 Top = 258
DataBinding.DataField = 'E46' DataBinding.DataField = 'E46'
DataBinding.DataSource = dsDataSource DataBinding.DataSource = dsDataSource
@ -205,7 +205,7 @@ object fEditorAjustarRecepciones: TfEditorAjustarRecepciones
Width = 25 Width = 25
end end
object edtEnv48: TcxDBMaskEdit object edtEnv48: TcxDBMaskEdit
Left = 634 Left = 638
Top = 258 Top = 258
DataBinding.DataField = 'E48' DataBinding.DataField = 'E48'
DataBinding.DataSource = dsDataSource DataBinding.DataSource = dsDataSource
@ -697,7 +697,7 @@ object fEditorAjustarRecepciones: TfEditorAjustarRecepciones
object dxLayoutControl1Item11: TdxLayoutItem object dxLayoutControl1Item11: TdxLayoutItem
AutoAligns = [aaVertical] AutoAligns = [aaVertical]
AlignHorz = ahClient AlignHorz = ahClient
Caption = '38' Caption = '38/S'
CaptionOptions.AlignHorz = taCenter CaptionOptions.AlignHorz = taCenter
CaptionOptions.Layout = clTop CaptionOptions.Layout = clTop
Control = edtEnv38 Control = edtEnv38
@ -706,7 +706,7 @@ object fEditorAjustarRecepciones: TfEditorAjustarRecepciones
object dxLayoutControl1Item10: TdxLayoutItem object dxLayoutControl1Item10: TdxLayoutItem
AutoAligns = [aaVertical] AutoAligns = [aaVertical]
AlignHorz = ahClient AlignHorz = ahClient
Caption = '40' Caption = '40/M'
CaptionOptions.AlignHorz = taCenter CaptionOptions.AlignHorz = taCenter
CaptionOptions.Layout = clTop CaptionOptions.Layout = clTop
Control = edtEnv40 Control = edtEnv40
@ -715,7 +715,7 @@ object fEditorAjustarRecepciones: TfEditorAjustarRecepciones
object dxLayoutControl1Item12: TdxLayoutItem object dxLayoutControl1Item12: TdxLayoutItem
AutoAligns = [aaVertical] AutoAligns = [aaVertical]
AlignHorz = ahClient AlignHorz = ahClient
Caption = '42' Caption = '42/L'
CaptionOptions.AlignHorz = taCenter CaptionOptions.AlignHorz = taCenter
CaptionOptions.Layout = clTop CaptionOptions.Layout = clTop
Control = edtEnv42 Control = edtEnv42
@ -724,7 +724,7 @@ object fEditorAjustarRecepciones: TfEditorAjustarRecepciones
object dxLayoutControl1Item13: TdxLayoutItem object dxLayoutControl1Item13: TdxLayoutItem
AutoAligns = [aaVertical] AutoAligns = [aaVertical]
AlignHorz = ahClient AlignHorz = ahClient
Caption = '44' Caption = '44/XL'
CaptionOptions.AlignHorz = taCenter CaptionOptions.AlignHorz = taCenter
CaptionOptions.Layout = clTop CaptionOptions.Layout = clTop
Control = edtEnv44 Control = edtEnv44
@ -784,7 +784,7 @@ object fEditorAjustarRecepciones: TfEditorAjustarRecepciones
object dxLayoutControl1Item2: TdxLayoutItem object dxLayoutControl1Item2: TdxLayoutItem
AutoAligns = [aaVertical] AutoAligns = [aaVertical]
AlignHorz = ahClient AlignHorz = ahClient
Caption = '38' Caption = '38/S'
CaptionOptions.AlignHorz = taCenter CaptionOptions.AlignHorz = taCenter
CaptionOptions.Layout = clTop CaptionOptions.Layout = clTop
Control = edtRec38 Control = edtRec38
@ -804,7 +804,7 @@ object fEditorAjustarRecepciones: TfEditorAjustarRecepciones
object dxLayoutControl1Item3: TdxLayoutItem object dxLayoutControl1Item3: TdxLayoutItem
AutoAligns = [aaVertical] AutoAligns = [aaVertical]
AlignHorz = ahClient AlignHorz = ahClient
Caption = '40' Caption = '40/M'
CaptionOptions.AlignHorz = taCenter CaptionOptions.AlignHorz = taCenter
CaptionOptions.Layout = clTop CaptionOptions.Layout = clTop
Control = edtRec40 Control = edtRec40
@ -824,7 +824,7 @@ object fEditorAjustarRecepciones: TfEditorAjustarRecepciones
object dxLayoutControl1Item4: TdxLayoutItem object dxLayoutControl1Item4: TdxLayoutItem
AutoAligns = [aaVertical] AutoAligns = [aaVertical]
AlignHorz = ahClient AlignHorz = ahClient
Caption = '42' Caption = '42/L'
CaptionOptions.AlignHorz = taCenter CaptionOptions.AlignHorz = taCenter
CaptionOptions.Layout = clTop CaptionOptions.Layout = clTop
Control = edtRec42 Control = edtRec42
@ -844,7 +844,7 @@ object fEditorAjustarRecepciones: TfEditorAjustarRecepciones
object dxLayoutControl1Item20: TdxLayoutItem object dxLayoutControl1Item20: TdxLayoutItem
AutoAligns = [aaVertical] AutoAligns = [aaVertical]
AlignHorz = ahClient AlignHorz = ahClient
Caption = '44' Caption = '44/XL'
CaptionOptions.AlignHorz = taCenter CaptionOptions.AlignHorz = taCenter
CaptionOptions.Layout = clTop CaptionOptions.Layout = clTop
Control = edtRec44 Control = edtRec44

11
Source/Modulos/Recepciones/Cliente/uEditorListaRecepciones.dfm
View File

@ -5,7 +5,7 @@ inherited fEditorListaRecepciones: TfEditorListaRecepciones
ClientHeight = 664 ClientHeight = 664
ClientWidth = 816 ClientWidth = 816
ExplicitWidth = 824 ExplicitWidth = 824
ExplicitHeight = 698 ExplicitHeight = 691
PixelsPerInch = 96 PixelsPerInch = 96
TextHeight = 13 TextHeight = 13
inherited JvNavPanelHeader: TJvNavPanelHeader inherited JvNavPanelHeader: TJvNavPanelHeader
@ -21,7 +21,7 @@ inherited fEditorListaRecepciones: TfEditorListaRecepciones
Width = 816 Width = 816
ExplicitWidth = 816 ExplicitWidth = 816
inherited tbxMain: TTBXToolbar inherited tbxMain: TTBXToolbar
ExplicitWidth = 578 ExplicitWidth = 576
object TBXSubmenuItem2: TTBXSubmenuItem [5] object TBXSubmenuItem2: TTBXSubmenuItem [5]
Caption = 'Cambiar el estado' Caption = 'Cambiar el estado'
DropdownCombo = True DropdownCombo = True
@ -49,8 +49,8 @@ inherited fEditorListaRecepciones: TfEditorListaRecepciones
ExplicitWidth = 816 ExplicitWidth = 816
end end
inherited tbxFiltro: TTBXToolbar inherited tbxFiltro: TTBXToolbar
Left = 578 Left = 576
ExplicitLeft = 578 ExplicitLeft = 576
end end
end end
inherited StatusBar: TStatusBar inherited StatusBar: TStatusBar
@ -82,7 +82,6 @@ inherited fEditorListaRecepciones: TfEditorListaRecepciones
Caption = 'Todos' Caption = 'Todos'
end> end>
OnTabSelected = JvTabBar1TabSelected OnTabSelected = JvTabBar1TabSelected
ExplicitTop = 70
end end
inline frViewListaRecepciones1: TfrViewListaRecepciones [4] inline frViewListaRecepciones1: TfrViewListaRecepciones [4]
Left = 0 Left = 0
@ -146,11 +145,11 @@ inherited fEditorListaRecepciones: TfEditorListaRecepciones
inherited TBXLabel1: TTBXLabel inherited TBXLabel1: TTBXLabel
Width = 816 Width = 816
ExplicitWidth = 816 ExplicitWidth = 816
ExplicitHeight = 19
end end
inherited pnlAgrupaciones: TTBXAlignmentPanel inherited pnlAgrupaciones: TTBXAlignmentPanel
Width = 391 Width = 391
Height = 41 Height = 41
ExplicitWidth = 391
ExplicitHeight = 41 ExplicitHeight = 41
inherited TBXButton3: TTBXButton inherited TBXButton3: TTBXButton
Action = actRefrescar Action = actRefrescar

10
Source/Modulos/Recepciones/Cliente/uViewListaRecepciones.dfm
View File

@ -246,7 +246,7 @@ inherited frViewListaRecepciones: TfrViewListaRecepciones
Width = 25 Width = 25
end end
object cxGridBandedViewRR38: TcxGridDBColumn object cxGridBandedViewRR38: TcxGridDBColumn
Caption = 'R38/S' Caption = 'RR38/S'
DataBinding.FieldName = 'RR38' DataBinding.FieldName = 'RR38'
PropertiesClassName = 'TcxTextEditProperties' PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter Properties.Alignment.Horz = taCenter
@ -257,7 +257,7 @@ inherited frViewListaRecepciones: TfrViewListaRecepciones
Width = 34 Width = 34
end end
object cxGridBandedViewRR40: TcxGridDBColumn object cxGridBandedViewRR40: TcxGridDBColumn
Caption = 'R40/M' Caption = 'RR40/M'
DataBinding.FieldName = 'RR40' DataBinding.FieldName = 'RR40'
PropertiesClassName = 'TcxTextEditProperties' PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter Properties.Alignment.Horz = taCenter
@ -268,7 +268,7 @@ inherited frViewListaRecepciones: TfrViewListaRecepciones
Width = 35 Width = 35
end end
object cxGridBandedViewRR42: TcxGridDBColumn object cxGridBandedViewRR42: TcxGridDBColumn
Caption = 'R42/L' Caption = 'RR42/L'
DataBinding.FieldName = 'RR42' DataBinding.FieldName = 'RR42'
PropertiesClassName = 'TcxTextEditProperties' PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter Properties.Alignment.Horz = taCenter
@ -279,7 +279,7 @@ inherited frViewListaRecepciones: TfrViewListaRecepciones
Width = 35 Width = 35
end end
object cxGridBandedViewRR44: TcxGridDBColumn object cxGridBandedViewRR44: TcxGridDBColumn
Caption = 'R44/XL' Caption = 'RR44/XL'
DataBinding.FieldName = 'RR44' DataBinding.FieldName = 'RR44'
PropertiesClassName = 'TcxTextEditProperties' PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter Properties.Alignment.Horz = taCenter
@ -290,7 +290,6 @@ inherited frViewListaRecepciones: TfrViewListaRecepciones
Width = 35 Width = 35
end end
object cxGridBandedViewRR46: TcxGridDBColumn object cxGridBandedViewRR46: TcxGridDBColumn
Caption = 'R46'
DataBinding.FieldName = 'RR46' DataBinding.FieldName = 'RR46'
PropertiesClassName = 'TcxTextEditProperties' PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter Properties.Alignment.Horz = taCenter
@ -301,7 +300,6 @@ inherited frViewListaRecepciones: TfrViewListaRecepciones
Width = 35 Width = 35
end end
object cxGridBandedViewRR48: TcxGridDBColumn object cxGridBandedViewRR48: TcxGridDBColumn
Caption = 'R48'
DataBinding.FieldName = 'RR48' DataBinding.FieldName = 'RR48'
PropertiesClassName = 'TcxTextEditProperties' PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter Properties.Alignment.Horz = taCenter

30
Source/Modulos/Recepciones/Servidor/srvRecepciones_Impl.dfm
View File

@ -86,16 +86,19 @@ object srvRecepciones: TsrvRecepciones
Name = 'ALBARAN' Name = 'ALBARAN'
DataType = datString DataType = datString
Size = 7 Size = 7
DictionaryEntry = 'Recepciones_ALBARAN'
end end
item item
Name = 'ESTADOALBARAN' Name = 'ESTADOALBARAN'
DataType = datString DataType = datString
Size = 1 Size = 15
DictionaryEntry = 'Recepciones_ESTADO_ALBARAN'
end end
item item
Name = 'FILIAL' Name = 'FILIAL'
DataType = datString DataType = datString
Size = 25 Size = 25
DictionaryEntry = 'Recepciones_FILIAL'
end end
item item
Name = 'ESTADOPRODUCTO' Name = 'ESTADOPRODUCTO'
@ -106,40 +109,49 @@ object srvRecepciones: TsrvRecepciones
Name = 'CODIGO' Name = 'CODIGO'
DataType = datString DataType = datString
Size = 12 Size = 12
DictionaryEntry = 'Recepciones_CODIGO'
end end
item item
Name = 'PRODUCTO' Name = 'PRODUCTO'
DataType = datString DataType = datString
Size = 40 Size = 40
DictionaryEntry = 'Recepciones_PRODUCTO'
end end
item item
Name = 'COLOR' Name = 'COLOR'
DataType = datString DataType = datString
Size = 10 Size = 10
DictionaryEntry = 'Recepciones_COLOR'
end end
item item
Name = 'E38' Name = 'E38'
DataType = datInteger DataType = datInteger
DictionaryEntry = 'Recepciones_E38'
end end
item item
Name = 'E40' Name = 'E40'
DataType = datInteger DataType = datInteger
DictionaryEntry = 'Recepciones_E40'
end end
item item
Name = 'E42' Name = 'E42'
DataType = datInteger DataType = datInteger
DictionaryEntry = 'Recepciones_E42'
end end
item item
Name = 'E44' Name = 'E44'
DataType = datInteger DataType = datInteger
DictionaryEntry = 'Recepciones_E44'
end end
item item
Name = 'E46' Name = 'E46'
DataType = datInteger DataType = datInteger
DictionaryEntry = 'Recepciones_E46'
end end
item item
Name = 'E48' Name = 'E48'
DataType = datInteger DataType = datInteger
DictionaryEntry = 'Recepciones_E48'
end> end>
end end
item item
@ -1552,7 +1564,7 @@ object srvRecepciones: TsrvRecepciones
Name = 'Recepciones_R38' Name = 'Recepciones_R38'
DataType = datFloat DataType = datFloat
LogChanges = False LogChanges = False
DisplayLabel = 'R38' DisplayLabel = 'R38/S'
ReadOnly = True ReadOnly = True
Alignment = taRightJustify Alignment = taRightJustify
end end
@ -1560,7 +1572,7 @@ object srvRecepciones: TsrvRecepciones
Name = 'Recepciones_R40' Name = 'Recepciones_R40'
DataType = datFloat DataType = datFloat
LogChanges = False LogChanges = False
DisplayLabel = 'R40' DisplayLabel = 'R40/M'
ReadOnly = True ReadOnly = True
Alignment = taRightJustify Alignment = taRightJustify
end end
@ -1568,7 +1580,7 @@ object srvRecepciones: TsrvRecepciones
Name = 'Recepciones_R42' Name = 'Recepciones_R42'
DataType = datFloat DataType = datFloat
LogChanges = False LogChanges = False
DisplayLabel = 'R42' DisplayLabel = 'R42/L'
ReadOnly = True ReadOnly = True
Alignment = taRightJustify Alignment = taRightJustify
end end
@ -1576,7 +1588,7 @@ object srvRecepciones: TsrvRecepciones
Name = 'Recepciones_R44' Name = 'Recepciones_R44'
DataType = datFloat DataType = datFloat
LogChanges = False LogChanges = False
DisplayLabel = 'R44' DisplayLabel = 'R44/XL'
ReadOnly = True ReadOnly = True
Alignment = taRightJustify Alignment = taRightJustify
end end
@ -1607,25 +1619,25 @@ object srvRecepciones: TsrvRecepciones
item item
Name = 'Recepciones_RR38' Name = 'Recepciones_RR38'
DataType = datFloat DataType = datFloat
DisplayLabel = 'RR38' DisplayLabel = 'RR38/S'
Alignment = taRightJustify Alignment = taRightJustify
end end
item item
Name = 'Recepciones_RR40' Name = 'Recepciones_RR40'
DataType = datFloat DataType = datFloat
DisplayLabel = 'RR40' DisplayLabel = 'RR40/M'
Alignment = taRightJustify Alignment = taRightJustify
end end
item item
Name = 'Recepciones_RR42' Name = 'Recepciones_RR42'
DataType = datFloat DataType = datFloat
DisplayLabel = 'RR42' DisplayLabel = 'RR42/L'
Alignment = taRightJustify Alignment = taRightJustify
end end
item item
Name = 'Recepciones_RR44' Name = 'Recepciones_RR44'
DataType = datFloat DataType = datFloat
DisplayLabel = 'RR44' DisplayLabel = 'RR44/XL'
Alignment = taRightJustify Alignment = taRightJustify
end end
item item

22
Source/Modulos/Stock/Cliente/uViewControGridStockEDI.dfm
View File

@ -290,6 +290,7 @@ inherited frViewControlGridStockEDI: TfrViewControlGridStockEDI
DataBinding.FieldName = 'COLOR' DataBinding.FieldName = 'COLOR'
end end
object cxGridViewE38: TcxGridDBColumn object cxGridViewE38: TcxGridDBColumn
Caption = 'E38/S'
DataBinding.FieldName = 'E38' DataBinding.FieldName = 'E38'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxSpinEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify
@ -298,6 +299,7 @@ inherited frViewControlGridStockEDI: TfrViewControlGridStockEDI
Styles.Content = cxStyleEntrada Styles.Content = cxStyleEntrada
end end
object cxGridViewE40: TcxGridDBColumn object cxGridViewE40: TcxGridDBColumn
Caption = 'E40/M'
DataBinding.FieldName = 'E40' DataBinding.FieldName = 'E40'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxSpinEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify
@ -306,6 +308,7 @@ inherited frViewControlGridStockEDI: TfrViewControlGridStockEDI
Styles.Content = cxStyleEntrada Styles.Content = cxStyleEntrada
end end
object cxGridViewE42: TcxGridDBColumn object cxGridViewE42: TcxGridDBColumn
Caption = 'E42/L'
DataBinding.FieldName = 'E42' DataBinding.FieldName = 'E42'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxSpinEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify
@ -314,6 +317,7 @@ inherited frViewControlGridStockEDI: TfrViewControlGridStockEDI
Styles.Content = cxStyleEntrada Styles.Content = cxStyleEntrada
end end
object cxGridViewE44: TcxGridDBColumn object cxGridViewE44: TcxGridDBColumn
Caption = 'E44/XL'
DataBinding.FieldName = 'E44' DataBinding.FieldName = 'E44'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxSpinEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify
@ -346,6 +350,7 @@ inherited frViewControlGridStockEDI: TfrViewControlGridStockEDI
Styles.OnGetContentStyle = cxGridViewTEStylesGetContentStyle Styles.OnGetContentStyle = cxGridViewTEStylesGetContentStyle
end end
object cxGridViewS38: TcxGridDBColumn object cxGridViewS38: TcxGridDBColumn
Caption = 'S38/S'
DataBinding.FieldName = 'S38' DataBinding.FieldName = 'S38'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxSpinEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify
@ -354,6 +359,7 @@ inherited frViewControlGridStockEDI: TfrViewControlGridStockEDI
Styles.Content = cxStyleSalida Styles.Content = cxStyleSalida
end end
object cxGridViewS40: TcxGridDBColumn object cxGridViewS40: TcxGridDBColumn
Caption = 'S40/M'
DataBinding.FieldName = 'S40' DataBinding.FieldName = 'S40'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxSpinEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify
@ -362,6 +368,7 @@ inherited frViewControlGridStockEDI: TfrViewControlGridStockEDI
Styles.Content = cxStyleSalida Styles.Content = cxStyleSalida
end end
object cxGridViewS42: TcxGridDBColumn object cxGridViewS42: TcxGridDBColumn
Caption = 'S42/L'
DataBinding.FieldName = 'S42' DataBinding.FieldName = 'S42'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxSpinEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify
@ -370,6 +377,7 @@ inherited frViewControlGridStockEDI: TfrViewControlGridStockEDI
Styles.Content = cxStyleSalida Styles.Content = cxStyleSalida
end end
object cxGridViewS44: TcxGridDBColumn object cxGridViewS44: TcxGridDBColumn
Caption = 'S44/XL'
DataBinding.FieldName = 'S44' DataBinding.FieldName = 'S44'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxSpinEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify
@ -401,6 +409,7 @@ inherited frViewControlGridStockEDI: TfrViewControlGridStockEDI
HeaderAlignmentHorz = taRightJustify HeaderAlignmentHorz = taRightJustify
end end
object cxGridViewK38: TcxGridDBColumn object cxGridViewK38: TcxGridDBColumn
Caption = 'K38/S'
DataBinding.FieldName = 'K38' DataBinding.FieldName = 'K38'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxSpinEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify
@ -408,6 +417,7 @@ inherited frViewControlGridStockEDI: TfrViewControlGridStockEDI
HeaderAlignmentHorz = taRightJustify HeaderAlignmentHorz = taRightJustify
end end
object cxGridViewK40: TcxGridDBColumn object cxGridViewK40: TcxGridDBColumn
Caption = 'K40/M'
DataBinding.FieldName = 'K40' DataBinding.FieldName = 'K40'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxSpinEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify
@ -415,6 +425,7 @@ inherited frViewControlGridStockEDI: TfrViewControlGridStockEDI
HeaderAlignmentHorz = taRightJustify HeaderAlignmentHorz = taRightJustify
end end
object cxGridViewK42: TcxGridDBColumn object cxGridViewK42: TcxGridDBColumn
Caption = 'K42/L'
DataBinding.FieldName = 'K42' DataBinding.FieldName = 'K42'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxSpinEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify
@ -422,6 +433,7 @@ inherited frViewControlGridStockEDI: TfrViewControlGridStockEDI
HeaderAlignmentHorz = taRightJustify HeaderAlignmentHorz = taRightJustify
end end
object cxGridViewK44: TcxGridDBColumn object cxGridViewK44: TcxGridDBColumn
Caption = 'K44/XL'
DataBinding.FieldName = 'K44' DataBinding.FieldName = 'K44'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxSpinEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify
@ -478,6 +490,10 @@ inherited frViewControlGridStockEDI: TfrViewControlGridStockEDI
inherited dxLayoutControl1: TdxLayoutControl inherited dxLayoutControl1: TdxLayoutControl
Width = 321 Width = 321
ExplicitWidth = 321 ExplicitWidth = 321
inherited ccbColeccion: TJvCheckedComboBox
Width = 512
ExplicitWidth = 512
end
end end
end end
inline frViewParametrosCentro1: TfrViewParametrosCentro inline frViewParametrosCentro1: TfrViewParametrosCentro
@ -496,6 +512,10 @@ inherited frViewControlGridStockEDI: TfrViewControlGridStockEDI
inherited dxLayoutControl1: TdxLayoutControl inherited dxLayoutControl1: TdxLayoutControl
Width = 400 Width = 400
ExplicitWidth = 400 ExplicitWidth = 400
inherited ccbCentro: TJvCheckedComboBox
Width = 392
ExplicitWidth = 392
end
end end
end end
object TBXAlignmentPanel1: TTBXAlignmentPanel object TBXAlignmentPanel1: TTBXAlignmentPanel
@ -563,7 +583,7 @@ inherited frViewControlGridStockEDI: TfrViewControlGridStockEDI
PrinterPage._dxMeasurementUnits_ = 0 PrinterPage._dxMeasurementUnits_ = 0
PrinterPage._dxLastMU_ = 2 PrinterPage._dxLastMU_ = 2
ReportDocument.Caption = 'Venta mensual' ReportDocument.Caption = 'Venta mensual'
ReportDocument.CreationDate = 39346.803634976850000000 ReportDocument.CreationDate = 39361.439008969910000000
ReportTitle.Text = 'Venta mensual' ReportTitle.Text = 'Venta mensual'
Font.Charset = DEFAULT_CHARSET Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack Font.Color = clBlack

14
Source/Modulos/Stock/Cliente/uViewControGridStockEDIInventario.dfm
View File

@ -290,6 +290,7 @@ inherited frViewControlGridStockEDIInventario: TfrViewControlGridStockEDIInventa
DataBinding.FieldName = 'COLOR' DataBinding.FieldName = 'COLOR'
end end
object cxGridViewI38: TcxGridDBColumn object cxGridViewI38: TcxGridDBColumn
Caption = 'I38/S'
DataBinding.FieldName = 'I38' DataBinding.FieldName = 'I38'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxSpinEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify
@ -298,6 +299,7 @@ inherited frViewControlGridStockEDIInventario: TfrViewControlGridStockEDIInventa
Styles.Content = cxStyleEntrada Styles.Content = cxStyleEntrada
end end
object cxGridViewI40: TcxGridDBColumn object cxGridViewI40: TcxGridDBColumn
Caption = 'I40/M'
DataBinding.FieldName = 'I40' DataBinding.FieldName = 'I40'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxSpinEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify
@ -306,6 +308,7 @@ inherited frViewControlGridStockEDIInventario: TfrViewControlGridStockEDIInventa
Styles.Content = cxStyleEntrada Styles.Content = cxStyleEntrada
end end
object cxGridViewI42: TcxGridDBColumn object cxGridViewI42: TcxGridDBColumn
Caption = 'I42/L'
DataBinding.FieldName = 'I42' DataBinding.FieldName = 'I42'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxSpinEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify
@ -314,6 +317,7 @@ inherited frViewControlGridStockEDIInventario: TfrViewControlGridStockEDIInventa
Styles.Content = cxStyleEntrada Styles.Content = cxStyleEntrada
end end
object cxGridViewI44: TcxGridDBColumn object cxGridViewI44: TcxGridDBColumn
Caption = 'I44/XL'
DataBinding.FieldName = 'I44' DataBinding.FieldName = 'I44'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxSpinEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify
@ -346,6 +350,7 @@ inherited frViewControlGridStockEDIInventario: TfrViewControlGridStockEDIInventa
Styles.OnGetContentStyle = cxGridViewTEStylesGetContentStyle Styles.OnGetContentStyle = cxGridViewTEStylesGetContentStyle
end end
object cxGridViewK38: TcxGridDBColumn object cxGridViewK38: TcxGridDBColumn
Caption = 'K38/S'
DataBinding.FieldName = 'K38' DataBinding.FieldName = 'K38'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxSpinEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify
@ -354,6 +359,7 @@ inherited frViewControlGridStockEDIInventario: TfrViewControlGridStockEDIInventa
Styles.Content = cxStyleSalida Styles.Content = cxStyleSalida
end end
object cxGridViewK40: TcxGridDBColumn object cxGridViewK40: TcxGridDBColumn
Caption = 'K40/M'
DataBinding.FieldName = 'K40' DataBinding.FieldName = 'K40'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxSpinEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify
@ -362,6 +368,7 @@ inherited frViewControlGridStockEDIInventario: TfrViewControlGridStockEDIInventa
Styles.Content = cxStyleSalida Styles.Content = cxStyleSalida
end end
object cxGridViewK42: TcxGridDBColumn object cxGridViewK42: TcxGridDBColumn
Caption = 'K42/L'
DataBinding.FieldName = 'K42' DataBinding.FieldName = 'K42'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxSpinEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify
@ -370,6 +377,7 @@ inherited frViewControlGridStockEDIInventario: TfrViewControlGridStockEDIInventa
Styles.Content = cxStyleSalida Styles.Content = cxStyleSalida
end end
object cxGridViewK44: TcxGridDBColumn object cxGridViewK44: TcxGridDBColumn
Caption = 'K44/XL'
DataBinding.FieldName = 'K44' DataBinding.FieldName = 'K44'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxSpinEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify
@ -401,6 +409,7 @@ inherited frViewControlGridStockEDIInventario: TfrViewControlGridStockEDIInventa
HeaderAlignmentHorz = taRightJustify HeaderAlignmentHorz = taRightJustify
end end
object cxGridViewD38: TcxGridDBColumn object cxGridViewD38: TcxGridDBColumn
Caption = 'D38/S'
DataBinding.FieldName = 'D38' DataBinding.FieldName = 'D38'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxSpinEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify
@ -408,6 +417,7 @@ inherited frViewControlGridStockEDIInventario: TfrViewControlGridStockEDIInventa
HeaderAlignmentHorz = taRightJustify HeaderAlignmentHorz = taRightJustify
end end
object cxGridViewD40: TcxGridDBColumn object cxGridViewD40: TcxGridDBColumn
Caption = 'D40/M'
DataBinding.FieldName = 'D40' DataBinding.FieldName = 'D40'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxSpinEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify
@ -415,6 +425,7 @@ inherited frViewControlGridStockEDIInventario: TfrViewControlGridStockEDIInventa
HeaderAlignmentHorz = taRightJustify HeaderAlignmentHorz = taRightJustify
end end
object cxGridViewD42: TcxGridDBColumn object cxGridViewD42: TcxGridDBColumn
Caption = 'D42/L'
DataBinding.FieldName = 'D42' DataBinding.FieldName = 'D42'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxSpinEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify
@ -422,6 +433,7 @@ inherited frViewControlGridStockEDIInventario: TfrViewControlGridStockEDIInventa
HeaderAlignmentHorz = taRightJustify HeaderAlignmentHorz = taRightJustify
end end
object cxGridViewD44: TcxGridDBColumn object cxGridViewD44: TcxGridDBColumn
Caption = 'D44/XL'
DataBinding.FieldName = 'D44' DataBinding.FieldName = 'D44'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxSpinEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify
@ -571,7 +583,7 @@ inherited frViewControlGridStockEDIInventario: TfrViewControlGridStockEDIInventa
PrinterPage._dxMeasurementUnits_ = 0 PrinterPage._dxMeasurementUnits_ = 0
PrinterPage._dxLastMU_ = 2 PrinterPage._dxLastMU_ = 2
ReportDocument.Caption = 'Venta mensual' ReportDocument.Caption = 'Venta mensual'
ReportDocument.CreationDate = 39349.452629837960000000 ReportDocument.CreationDate = 39361.438243449080000000
ReportTitle.Text = 'Venta mensual' ReportTitle.Text = 'Venta mensual'
Font.Charset = DEFAULT_CHARSET Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack Font.Color = clBlack

6
Source/Modulos/Stock/Cliente/uViewControGridStockPrendasCentros.dfm
View File

@ -124,6 +124,7 @@ inherited frViewControlGridStockPrendasCentros: TfrViewControlGridStockPrendasCe
DataBinding.FieldName = 'COLOR' DataBinding.FieldName = 'COLOR'
end end
object cxGridView38: TcxGridDBColumn object cxGridView38: TcxGridDBColumn
Caption = 'T38/S'
DataBinding.FieldName = 'T38' DataBinding.FieldName = 'T38'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxSpinEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify
@ -134,6 +135,7 @@ inherited frViewControlGridStockPrendasCentros: TfrViewControlGridStockPrendasCe
HeaderAlignmentHorz = taRightJustify HeaderAlignmentHorz = taRightJustify
end end
object cxGridView40: TcxGridDBColumn object cxGridView40: TcxGridDBColumn
Caption = 'T40/M'
DataBinding.FieldName = 'T40' DataBinding.FieldName = 'T40'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxSpinEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify
@ -144,6 +146,7 @@ inherited frViewControlGridStockPrendasCentros: TfrViewControlGridStockPrendasCe
HeaderAlignmentHorz = taRightJustify HeaderAlignmentHorz = taRightJustify
end end
object cxGridView42: TcxGridDBColumn object cxGridView42: TcxGridDBColumn
Caption = 'T42/L'
DataBinding.FieldName = 'T42' DataBinding.FieldName = 'T42'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxSpinEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify
@ -154,6 +157,7 @@ inherited frViewControlGridStockPrendasCentros: TfrViewControlGridStockPrendasCe
HeaderAlignmentHorz = taRightJustify HeaderAlignmentHorz = taRightJustify
end end
object cxGridView44: TcxGridDBColumn object cxGridView44: TcxGridDBColumn
Caption = 'T44/XL'
DataBinding.FieldName = 'T44' DataBinding.FieldName = 'T44'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxSpinEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify
@ -295,7 +299,7 @@ inherited frViewControlGridStockPrendasCentros: TfrViewControlGridStockPrendasCe
PrinterPage.PageSize.Y = 297000 PrinterPage.PageSize.Y = 297000
PrinterPage._dxMeasurementUnits_ = 0 PrinterPage._dxMeasurementUnits_ = 0
PrinterPage._dxLastMU_ = 2 PrinterPage._dxLastMU_ = 2
ReportDocument.CreationDate = 39349.452622245370000000 ReportDocument.CreationDate = 39361.401792893520000000
ReportDocument.IsCaptionAssigned = True ReportDocument.IsCaptionAssigned = True
ReportTitle.AdjustOnReportScale = True ReportTitle.AdjustOnReportScale = True
ReportTitle.Text = 'Venta mensual' ReportTitle.Text = 'Venta mensual'

6
Source/Modulos/Stock/Cliente/uViewControGridStockVARELA.dfm
View File

@ -145,6 +145,7 @@ inherited frViewControlGridStockVARELA: TfrViewControlGridStockVARELA
GroupIndex = 0 GroupIndex = 0
end end
object cxGridViewK38: TcxGridDBColumn object cxGridViewK38: TcxGridDBColumn
Caption = 'K38/S'
DataBinding.FieldName = 'K38' DataBinding.FieldName = 'K38'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxSpinEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify
@ -154,6 +155,7 @@ inherited frViewControlGridStockVARELA: TfrViewControlGridStockVARELA
HeaderAlignmentHorz = taRightJustify HeaderAlignmentHorz = taRightJustify
end end
object cxGridViewK40: TcxGridDBColumn object cxGridViewK40: TcxGridDBColumn
Caption = 'K40/M'
DataBinding.FieldName = 'K40' DataBinding.FieldName = 'K40'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxSpinEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify
@ -163,6 +165,7 @@ inherited frViewControlGridStockVARELA: TfrViewControlGridStockVARELA
HeaderAlignmentHorz = taRightJustify HeaderAlignmentHorz = taRightJustify
end end
object cxGridViewK42: TcxGridDBColumn object cxGridViewK42: TcxGridDBColumn
Caption = 'K42/L'
DataBinding.FieldName = 'K42' DataBinding.FieldName = 'K42'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxSpinEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify
@ -172,6 +175,7 @@ inherited frViewControlGridStockVARELA: TfrViewControlGridStockVARELA
HeaderAlignmentHorz = taRightJustify HeaderAlignmentHorz = taRightJustify
end end
object cxGridViewK44: TcxGridDBColumn object cxGridViewK44: TcxGridDBColumn
Caption = 'K44/XL'
DataBinding.FieldName = 'K44' DataBinding.FieldName = 'K44'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxSpinEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify
@ -308,7 +312,7 @@ inherited frViewControlGridStockVARELA: TfrViewControlGridStockVARELA
PrinterPage.PageSize.Y = 297000 PrinterPage.PageSize.Y = 297000
PrinterPage._dxMeasurementUnits_ = 0 PrinterPage._dxMeasurementUnits_ = 0
PrinterPage._dxLastMU_ = 2 PrinterPage._dxLastMU_ = 2
ReportDocument.CreationDate = 39349.529536493060000000 ReportDocument.CreationDate = 39361.401457418980000000
ReportDocument.IsCaptionAssigned = True ReportDocument.IsCaptionAssigned = True
ReportTitle.AdjustOnReportScale = True ReportTitle.AdjustOnReportScale = True
ReportTitle.Text = 'Venta mensual' ReportTitle.Text = 'Venta mensual'

9
Source/Modulos/Traspasos/Cliente/uEditorAjustarTraspasos.dfm
View File

@ -601,7 +601,7 @@ object fEditorAjustarTraspasos: TfEditorAjustarTraspasos
object dxLayoutControl1Item2: TdxLayoutItem object dxLayoutControl1Item2: TdxLayoutItem
AutoAligns = [aaVertical] AutoAligns = [aaVertical]
AlignHorz = ahClient AlignHorz = ahClient
Caption = '38' Caption = '38/S'
CaptionOptions.AlignHorz = taCenter CaptionOptions.AlignHorz = taCenter
CaptionOptions.Layout = clTop CaptionOptions.Layout = clTop
Control = edtRec38 Control = edtRec38
@ -621,7 +621,7 @@ object fEditorAjustarTraspasos: TfEditorAjustarTraspasos
object dxLayoutControl1Item3: TdxLayoutItem object dxLayoutControl1Item3: TdxLayoutItem
AutoAligns = [aaVertical] AutoAligns = [aaVertical]
AlignHorz = ahClient AlignHorz = ahClient
Caption = '40' Caption = '40/M'
CaptionOptions.AlignHorz = taCenter CaptionOptions.AlignHorz = taCenter
CaptionOptions.Layout = clTop CaptionOptions.Layout = clTop
Control = edtRec40 Control = edtRec40
@ -641,7 +641,7 @@ object fEditorAjustarTraspasos: TfEditorAjustarTraspasos
object dxLayoutControl1Item4: TdxLayoutItem object dxLayoutControl1Item4: TdxLayoutItem
AutoAligns = [aaVertical] AutoAligns = [aaVertical]
AlignHorz = ahClient AlignHorz = ahClient
Caption = '42' Caption = '42/L'
CaptionOptions.AlignHorz = taCenter CaptionOptions.AlignHorz = taCenter
CaptionOptions.Layout = clTop CaptionOptions.Layout = clTop
Control = edtRec42 Control = edtRec42
@ -661,7 +661,7 @@ object fEditorAjustarTraspasos: TfEditorAjustarTraspasos
object dxLayoutControl1Item20: TdxLayoutItem object dxLayoutControl1Item20: TdxLayoutItem
AutoAligns = [aaVertical] AutoAligns = [aaVertical]
AlignHorz = ahClient AlignHorz = ahClient
Caption = '44' Caption = '44/XL'
CaptionOptions.AlignHorz = taCenter CaptionOptions.AlignHorz = taCenter
CaptionOptions.Layout = clTop CaptionOptions.Layout = clTop
Control = edtRec44 Control = edtRec44
@ -718,6 +718,7 @@ object fEditorAjustarTraspasos: TfEditorAjustarTraspasos
end end
end end
object dsDataSource: TDADataSource object dsDataSource: TDADataSource
DataSet = tbl_Traspasos.Dataset
DataTable = dmTraspasos.tbl_Traspasos DataTable = dmTraspasos.tbl_Traspasos
Left = 200 Left = 200
Top = 496 Top = 496

2
Source/Modulos/Traspasos/Cliente/uEditorAjustarTraspasos.pas
View File

@ -19,7 +19,7 @@ uses
cxGridTableView, cxGridBandedTableView, cxGridDBBandedTableView, cxGridTableView, cxGridBandedTableView, cxGridDBBandedTableView,
cxClasses, cxControls, cxGridCustomView, cxGrid, dxLayoutControl, cxClasses, cxControls, cxGridCustomView, cxGrid, dxLayoutControl,
cxContainer, cxTextEdit, cxDBEdit, cxMemo, cxMaskEdit, cxDropDownEdit, cxContainer, cxTextEdit, cxDBEdit, cxMemo, cxMaskEdit, cxDropDownEdit,
cxCheckBox, cxCalendar, cxLabel, cxDBLabel; cxCheckBox, cxCalendar, cxLabel, cxDBLabel, uDAInterfaces;
type type
IEditorAjustarTraspasos = interface IEditorAjustarTraspasos = interface

21
Source/Modulos/Traspasos/Cliente/uViewListaTraspasos.dfm
View File

@ -7,8 +7,9 @@ inherited frViewListaTraspasos: TfrViewListaTraspasos
Top = 60 Top = 60
Width = 676 Width = 676
Height = 426 Height = 426
ExplicitTop = 60
ExplicitWidth = 676 ExplicitWidth = 676
ExplicitHeight = 486 ExplicitHeight = 426
inherited cxGridView: TcxGridDBTableView inherited cxGridView: TcxGridDBTableView
OnMouseDown = cxGridViewMouseDown OnMouseDown = cxGridViewMouseDown
FilterBox.Visible = fvNever FilterBox.Visible = fvNever
@ -122,18 +123,22 @@ inherited frViewListaTraspasos: TfrViewListaTraspasos
Visible = False Visible = False
end end
object cxGridViewT38: TcxGridDBColumn object cxGridViewT38: TcxGridDBColumn
Caption = 'T38/S'
DataBinding.FieldName = 'T38' DataBinding.FieldName = 'T38'
Visible = False Visible = False
end end
object cxGridViewT40: TcxGridDBColumn object cxGridViewT40: TcxGridDBColumn
Caption = 'T40/M'
DataBinding.FieldName = 'T40' DataBinding.FieldName = 'T40'
Visible = False Visible = False
end end
object cxGridViewT42: TcxGridDBColumn object cxGridViewT42: TcxGridDBColumn
Caption = 'T42/L'
DataBinding.FieldName = 'T42' DataBinding.FieldName = 'T42'
Visible = False Visible = False
end end
object cxGridViewT44: TcxGridDBColumn object cxGridViewT44: TcxGridDBColumn
Caption = 'T44/XL'
DataBinding.FieldName = 'T44' DataBinding.FieldName = 'T44'
Visible = False Visible = False
end end
@ -150,28 +155,28 @@ inherited frViewListaTraspasos: TfrViewListaTraspasos
Visible = False Visible = False
end end
object cxGridViewTR38: TcxGridDBColumn object cxGridViewTR38: TcxGridDBColumn
Caption = '38' Caption = '38/S'
DataBinding.FieldName = 'TR38' DataBinding.FieldName = 'TR38'
OnGetDisplayText = cxGridViewTR38GetDisplayText OnGetDisplayText = cxGridViewTR38GetDisplayText
Styles.OnGetContentStyle = cxGridViewFECHAStylesGetContentStyle Styles.OnGetContentStyle = cxGridViewFECHAStylesGetContentStyle
Width = 59 Width = 59
end end
object cxGridViewTR40: TcxGridDBColumn object cxGridViewTR40: TcxGridDBColumn
Caption = '40' Caption = '40/M'
DataBinding.FieldName = 'TR40' DataBinding.FieldName = 'TR40'
OnGetDisplayText = cxGridViewTR40GetDisplayText OnGetDisplayText = cxGridViewTR40GetDisplayText
Styles.OnGetContentStyle = cxGridViewFECHAStylesGetContentStyle Styles.OnGetContentStyle = cxGridViewFECHAStylesGetContentStyle
Width = 57 Width = 57
end end
object cxGridViewTR42: TcxGridDBColumn object cxGridViewTR42: TcxGridDBColumn
Caption = '42' Caption = '42/L'
DataBinding.FieldName = 'TR42' DataBinding.FieldName = 'TR42'
OnGetDisplayText = cxGridViewTR42GetDisplayText OnGetDisplayText = cxGridViewTR42GetDisplayText
Styles.OnGetContentStyle = cxGridViewFECHAStylesGetContentStyle Styles.OnGetContentStyle = cxGridViewFECHAStylesGetContentStyle
Width = 59 Width = 59
end end
object cxGridViewTR44: TcxGridDBColumn object cxGridViewTR44: TcxGridDBColumn
Caption = '44' Caption = '44/XL'
DataBinding.FieldName = 'TR44' DataBinding.FieldName = 'TR44'
OnGetDisplayText = cxGridViewTR44GetDisplayText OnGetDisplayText = cxGridViewTR44GetDisplayText
Styles.OnGetContentStyle = cxGridViewFECHAStylesGetContentStyle Styles.OnGetContentStyle = cxGridViewFECHAStylesGetContentStyle
@ -216,9 +221,6 @@ inherited frViewListaTraspasos: TfrViewListaTraspasos
FloatingHeight = 60 FloatingHeight = 60
SupportedDocks = [dkStandardDock, dkMultiDock] SupportedDocks = [dkStandardDock, dkMultiDock]
TabOrder = 1 TabOrder = 1
ExplicitLeft = 8
ExplicitTop = 8
ExplicitWidth = 128
inline frViewParametrosCentro1: TfrViewParametrosCentro inline frViewParametrosCentro1: TfrViewParametrosCentro
Left = 0 Left = 0
Top = 19 Top = 19
@ -256,8 +258,6 @@ inherited frViewListaTraspasos: TfrViewListaTraspasos
ParentColor = True ParentColor = True
ParentFont = False ParentFont = False
Underline = True Underline = True
ExplicitWidth = 128
ExplicitHeight = 32
end end
object pnlAgrupaciones: TTBXAlignmentPanel object pnlAgrupaciones: TTBXAlignmentPanel
Left = 425 Left = 425
@ -267,7 +267,6 @@ inherited frViewListaTraspasos: TfrViewListaTraspasos
Align = alClient Align = alClient
AutoSize = True AutoSize = True
TabOrder = 2 TabOrder = 2
ExplicitWidth = 41
object TBXButton3: TTBXButton object TBXButton3: TTBXButton
Tag = 3 Tag = 3
Left = 8 Left = 8

10
Source/Modulos/VentasTerminadas/Cliente/uViewControGridlVentasTerminadas.dfm
View File

@ -1,6 +1,8 @@
inherited frViewControlGridVentasTerminadas: TfrViewControlGridVentasTerminadas inherited frViewControlGridVentasTerminadas: TfrViewControlGridVentasTerminadas
Width = 733 Width = 733
Height = 572 Height = 572
ExplicitWidth = 733
ExplicitHeight = 572
object cxGrid: TcxGrid [0] object cxGrid: TcxGrid [0]
Left = 0 Left = 0
Top = 0 Top = 0
@ -127,28 +129,28 @@ inherited frViewControlGridVentasTerminadas: TfrViewControlGridVentasTerminadas
HeaderAlignmentHorz = taRightJustify HeaderAlignmentHorz = taRightJustify
end end
object cxGridViewTALLA38: TcxGridDBColumn object cxGridViewTALLA38: TcxGridDBColumn
Caption = '38' Caption = '38/S'
DataBinding.FieldName = 'TALLA38' DataBinding.FieldName = 'TALLA38'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxSpinEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify
HeaderAlignmentHorz = taRightJustify HeaderAlignmentHorz = taRightJustify
end end
object cxGridViewTALLA40: TcxGridDBColumn object cxGridViewTALLA40: TcxGridDBColumn
Caption = '40' Caption = '40/M'
DataBinding.FieldName = 'TALLA40' DataBinding.FieldName = 'TALLA40'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxSpinEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify
HeaderAlignmentHorz = taRightJustify HeaderAlignmentHorz = taRightJustify
end end
object cxGridViewTALLA42: TcxGridDBColumn object cxGridViewTALLA42: TcxGridDBColumn
Caption = '42' Caption = '42/L'
DataBinding.FieldName = 'TALLA42' DataBinding.FieldName = 'TALLA42'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxSpinEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify
HeaderAlignmentHorz = taRightJustify HeaderAlignmentHorz = taRightJustify
end end
object cxGridViewTALLA44: TcxGridDBColumn object cxGridViewTALLA44: TcxGridDBColumn
Caption = '44' Caption = '44/XL'
DataBinding.FieldName = 'TALLA44' DataBinding.FieldName = 'TALLA44'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxSpinEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify

33
Source/Modulos/VentasTerminadas/Cliente/uViewControlVentasTerminadas.dfm
View File

@ -42,13 +42,17 @@ inherited frViewControlVentasTerminadas: TfrViewControlVentasTerminadas
Width = 228 Width = 228
ExplicitTop = 68 ExplicitTop = 68
ExplicitWidth = 228 ExplicitWidth = 228
ExplicitHeight = 171
inherited TabSheet5: TTabSheet inherited TabSheet5: TTabSheet
ExplicitLeft = 4
ExplicitTop = 6
ExplicitWidth = 220 ExplicitWidth = 220
ExplicitHeight = 161
inline frViewPeriodoFechas1: TfrViewPeriodoFechas inline frViewPeriodoFechas1: TfrViewPeriodoFechas
Left = 0 Left = 0
Top = 0 Top = 0
Width = 220 Width = 220
Height = 159 Height = 161
Align = alClient Align = alClient
Font.Charset = DEFAULT_CHARSET Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText Font.Color = clWindowText
@ -59,7 +63,7 @@ inherited frViewControlVentasTerminadas: TfrViewControlVentasTerminadas
TabOrder = 0 TabOrder = 0
ReadOnly = False ReadOnly = False
ExplicitWidth = 220 ExplicitWidth = 220
ExplicitHeight = 159 ExplicitHeight = 161
inherited TBXLabel1: TTBXLabel inherited TBXLabel1: TTBXLabel
Width = 220 Width = 220
ExplicitWidth = 220 ExplicitWidth = 220
@ -88,12 +92,15 @@ inherited frViewControlVentasTerminadas: TfrViewControlVentasTerminadas
end end
inherited tsColumnas: TTabSheet inherited tsColumnas: TTabSheet
ExplicitWidth = 220 ExplicitWidth = 220
ExplicitHeight = 161
inherited frViewColumnas1: TfrViewColumnas inherited frViewColumnas1: TfrViewColumnas
Width = 220 Width = 220
ExplicitWidth = 220 ExplicitWidth = 220
ExplicitHeight = 161
inherited lbColumnas: TcxCheckListBox inherited lbColumnas: TcxCheckListBox
Width = 220 Width = 220
ExplicitWidth = 220 ExplicitWidth = 220
ExplicitHeight = 132
end end
inherited TBXLabel1: TTBXLabel inherited TBXLabel1: TTBXLabel
Width = 220 Width = 220
@ -121,9 +128,9 @@ inherited frViewControlVentasTerminadas: TfrViewControlVentasTerminadas
end end
end end
inherited TBXAlignmentPanel3: TTBXAlignmentPanel inherited TBXAlignmentPanel3: TTBXAlignmentPanel
Top = 237 Top = 239
Width = 228 Width = 228
ExplicitTop = 237 ExplicitTop = 239
ExplicitWidth = 228 ExplicitWidth = 228
end end
end end
@ -137,6 +144,7 @@ inherited frViewControlVentasTerminadas: TfrViewControlVentasTerminadas
inherited TBXPageScroller1: TTBXPageScroller inherited TBXPageScroller1: TTBXPageScroller
Width = 228 Width = 228
ExplicitWidth = 228 ExplicitWidth = 228
ExplicitHeight = 283
inherited TBXAlignmentPanel1: TTBXAlignmentPanel inherited TBXAlignmentPanel1: TTBXAlignmentPanel
Width = 228 Width = 228
ExplicitWidth = 228 ExplicitWidth = 228
@ -152,6 +160,7 @@ inherited frViewControlVentasTerminadas: TfrViewControlVentasTerminadas
inherited pcTareas: TPageControl inherited pcTareas: TPageControl
Width = 228 Width = 228
ExplicitWidth = 228 ExplicitWidth = 228
ExplicitHeight = 235
inherited tsSumarios: TTabSheet inherited tsSumarios: TTabSheet
ExplicitWidth = 220 ExplicitWidth = 220
inherited frViewSumarios1: TfrViewSumarios inherited frViewSumarios1: TfrViewSumarios
@ -179,9 +188,11 @@ inherited frViewControlVentasTerminadas: TfrViewControlVentasTerminadas
inherited cxFilterControl1: TcxFilterControl inherited cxFilterControl1: TcxFilterControl
Width = 220 Width = 220
ExplicitWidth = 220 ExplicitWidth = 220
ExplicitHeight = 166
end end
inherited TBXAlignmentPanel3: TTBXAlignmentPanel inherited TBXAlignmentPanel3: TTBXAlignmentPanel
Width = 220 Width = 220
ExplicitTop = 195
ExplicitWidth = 220 ExplicitWidth = 220
end end
inherited cxStyleRepository1: TcxStyleRepository inherited cxStyleRepository1: TcxStyleRepository
@ -216,6 +227,20 @@ inherited frViewControlVentasTerminadas: TfrViewControlVentasTerminadas
Height = 608 Height = 608
ExplicitWidth = 467 ExplicitWidth = 467
ExplicitHeight = 608 ExplicitHeight = 608
inherited cxGridView: TcxGridDBTableView
inherited cxGridViewTALLA38: TcxGridDBColumn
Caption = '38/S'
end
inherited cxGridViewTALLA40: TcxGridDBColumn
Caption = '40/M'
end
inherited cxGridViewTALLA42: TcxGridDBColumn
Caption = '42/L'
end
inherited cxGridViewTALLA44: TcxGridDBColumn
Caption = '44/XL'
end
end
end end
inherited dxPrintStyleManager1: TdxPrintStyleManager inherited dxPrintStyleManager1: TdxPrintStyleManager
inherited dxPrintStyleManager1Style1: TdxPSPrintStyle inherited dxPrintStyleManager1Style1: TdxPSPrintStyle