Uecko/AbetoDesign_FactuGES2
2
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Version multitienda

Browse Source 
git-svn-id: https://192.168.0.254/svn/Proyectos.AbetoDesign_FactuGES/trunk@162 93f398dd-4eb6-7a46-baf6-13f46f578da2
This commit is contained in:
roberto 2022-05-18 13:31:12 +00:00
parent cad325713c
commit dfd6dd7b22
5 changed files with 57 additions and 59 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

104
Source/ApplicationBase/Empresas/Views/uEditorEmpresa.dfm
View File

@ -88,6 +88,7 @@ inherited fEditorEmpresa: TfEditorEmpresa
inherited pgPaginas: TPageControl inherited pgPaginas: TPageControl
Width = 668 Width = 668
Height = 420 Height = 420
ActivePage = pagTiendas
ExplicitTop = 112 ExplicitTop = 112
ExplicitWidth = 668 ExplicitWidth = 668
ExplicitHeight = 420 ExplicitHeight = 420
@ -120,246 +121,233 @@ inherited fEditorEmpresa: TfEditorEmpresa
ExplicitHeight = 392 ExplicitHeight = 392
inherited PngSpeedButton1: TPngSpeedButton inherited PngSpeedButton1: TPngSpeedButton
Left = 596 Left = 596
Top = 295 Top = 276
ExplicitLeft = 596 ExplicitLeft = 596
ExplicitTop = 295 ExplicitTop = 276
end end
inherited PngSpeedButton2: TPngSpeedButton inherited PngSpeedButton2: TPngSpeedButton
Left = 596 Left = 596
Top = 267 Top = 248
ExplicitLeft = 596 ExplicitLeft = 596
ExplicitTop = 267 ExplicitTop = 248
end end
inherited eCalle: TcxDBTextEdit inherited eCalle: TcxDBTextEdit
Top = 270 Top = 251
Style.LookAndFeel.SkinName = '' Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = ''
ExplicitTop = 270 ExplicitTop = 251
ExplicitWidth = 84 ExplicitWidth = 84
Width = 84 Width = 84
end end
inherited cbProvincia: TcxDBComboBox inherited cbProvincia: TcxDBComboBox
Top = 297 Top = 278
Style.LookAndFeel.SkinName = '' Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = ''
ExplicitTop = 297 ExplicitTop = 278
ExplicitWidth = 106 ExplicitWidth = 106
Width = 106 Width = 106
end end
inherited cbPoblacion: TcxDBComboBox inherited cbPoblacion: TcxDBComboBox
Top = 324 Top = 305
Style.LookAndFeel.SkinName = '' Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = ''
ExplicitTop = 324 ExplicitTop = 305
ExplicitWidth = 100 ExplicitWidth = 100
Width = 100 Width = 100
end end
inherited eCodigoPostal: TcxDBTextEdit inherited eCodigoPostal: TcxDBTextEdit
Left = 341 Left = 341
Top = 297 Top = 278
Style.LookAndFeel.SkinName = '' Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 341 ExplicitLeft = 341
ExplicitTop = 297 ExplicitTop = 278
end end
inherited ePaginaWeb: TcxDBTextEdit inherited ePaginaWeb: TcxDBTextEdit
Left = 529 Left = 529
Top = 216 Top = 197
Style.LookAndFeel.SkinName = '' Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 529 ExplicitLeft = 529
ExplicitTop = 216 ExplicitTop = 197
ExplicitWidth = 165 ExplicitWidth = 165
Width = 165 Width = 165
end end
inherited eMailParticular: TcxDBTextEdit inherited eMailParticular: TcxDBTextEdit
Left = 529 Left = 529
Top = 189 Top = 170
Style.LookAndFeel.SkinName = '' Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 529 ExplicitLeft = 529
ExplicitTop = 189 ExplicitTop = 170
ExplicitWidth = 165 ExplicitWidth = 165
Width = 165 Width = 165
end end
inherited eMailTrabajo: TcxDBTextEdit inherited eMailTrabajo: TcxDBTextEdit
Left = 529 Left = 529
Top = 162 Top = 143
Style.LookAndFeel.SkinName = '' Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 529 ExplicitLeft = 529
ExplicitTop = 162 ExplicitTop = 143
ExplicitWidth = 129 ExplicitWidth = 129
Width = 129 Width = 129
end end
inherited eTlfParticular: TcxDBTextEdit inherited eTlfParticular: TcxDBTextEdit
Left = 529 Left = 529
Top = 57 Top = 38
Style.LookAndFeel.SkinName = '' Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 529 ExplicitLeft = 529
ExplicitTop = 57 ExplicitTop = 38
ExplicitWidth = 91 ExplicitWidth = 91
Width = 91 Width = 91
end end
inherited eTlfTrabajo: TcxDBTextEdit inherited eTlfTrabajo: TcxDBTextEdit
Left = 529 Left = 529
Top = 30 Top = 11
Style.LookAndFeel.SkinName = '' Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 529 ExplicitLeft = 529
ExplicitTop = 30 ExplicitTop = 11
ExplicitWidth = 127 ExplicitWidth = 127
Width = 127 Width = 127
end end
inherited eTlfMovil: TcxDBTextEdit inherited eTlfMovil: TcxDBTextEdit
Left = 529 Left = 529
Top = 84 Top = 65
Style.LookAndFeel.SkinName = '' Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 529 ExplicitLeft = 529
ExplicitTop = 84 ExplicitTop = 65
ExplicitWidth = 155 ExplicitWidth = 155
Width = 155 Width = 155
end end
inherited eFax: TcxDBTextEdit inherited eFax: TcxDBTextEdit
Left = 529 Left = 529
Top = 111 Top = 92
Style.LookAndFeel.SkinName = '' Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 529 ExplicitLeft = 529
ExplicitTop = 111 ExplicitTop = 92
ExplicitWidth = 121 ExplicitWidth = 121
Width = 121 Width = 121
end end
inherited eNombre: TcxDBTextEdit inherited eNombre: TcxDBTextEdit
Top = 30 Top = 11
Style.LookAndFeel.SkinName = '' Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = ''
ExplicitTop = 30 ExplicitTop = 11
ExplicitWidth = 108 ExplicitWidth = 108
Width = 108 Width = 108
end end
inherited eNIFCIF: TcxDBTextEdit inherited eNIFCIF: TcxDBTextEdit
Top = 57 Top = 38
Style.LookAndFeel.SkinName = '' Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = ''
ExplicitTop = 57 ExplicitTop = 38
ExplicitWidth = 108 ExplicitWidth = 108
Width = 108 Width = 108
end end
inherited memRegistroMercantil: TcxDBMemo inherited memRegistroMercantil: TcxDBMemo
Top = 84 Top = 65
Style.LookAndFeel.SkinName = '' Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = ''
ExplicitTop = 84 ExplicitTop = 65
ExplicitWidth = 76 ExplicitWidth = 76
Width = 76 Width = 76
end end
inherited cxDBImage1: TcxDBImage inherited cxDBImage1: TcxDBImage
Left = 434 Left = 434
Top = 267 Top = 248
Style.LookAndFeel.SkinName = '' Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 434 ExplicitLeft = 434
ExplicitTop = 267 ExplicitTop = 248
ExplicitWidth = 140 ExplicitWidth = 140
ExplicitHeight = 100 ExplicitHeight = 100
Height = 100 Height = 100
Width = 140 Width = 140
end end
inherited cbFormaPago: TcxComboBox inherited cbFormaPago: TcxComboBox
Top = 165 Top = 146
Enabled = True
Style.LookAndFeel.SkinName = '' Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = ''
ExplicitTop = 165 ExplicitTop = 146
ExplicitWidth = 359 ExplicitWidth = 359
Width = 359 Width = 359
end end
inherited cbTipoIVA: TcxComboBox inherited cbTipoIVA: TcxComboBox
Top = 138 Top = 119
Style.LookAndFeel.SkinName = '' Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = ''
ExplicitTop = 138 ExplicitTop = 119
ExplicitWidth = 202 ExplicitWidth = 202
Width = 202 Width = 202
end end
inherited frViewObservaciones1: TfrViewObservaciones inherited frViewObservaciones1: TfrViewObservaciones
Top = 375 Top = 356
Width = 521 Width = 521
Height = 150 Height = 150
ExplicitTop = 375 ExplicitTop = 356
ExplicitWidth = 521 ExplicitWidth = 521
ExplicitHeight = 150 ExplicitHeight = 150
inherited memObservaciones: TcxDBMemo inherited memObservaciones: TcxDBMemo
DataBinding.DataSource = frViewEmpresa1.DADataSource DataBinding.DataSource = frViewEmpresa1.DADataSource
ExplicitWidth = 384
ExplicitHeight = 20
Height = 150 Height = 150
Width = 521 Width = 521
end end
end end
inherited eValidez: TcxDBSpinEdit inherited eValidez: TcxDBSpinEdit
Top = 192 Top = 173
Style.LookAndFeel.SkinName = '' Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = ''
ExplicitTop = 192 ExplicitTop = 173
ExplicitWidth = 121 ExplicitWidth = 121
Width = 121 Width = 121
end end
inherited ePrecioPunto: TcxDBCurrencyEdit inherited ePrecioPunto: TcxDBCurrencyEdit
Top = 219 Top = 200
ExplicitTop = 219 ExplicitTop = 200
ExplicitWidth = 121 ExplicitWidth = 121
Width = 121 Width = 121
end end
inherited dxLayoutControl1Group_Root: TdxLayoutGroup
inherited dxLayoutControl1Group4: TdxLayoutGroup
inherited dxLayoutControl1Group1: TdxLayoutGroup
inherited dxLayoutControl1Item18: TdxLayoutItem
Enabled = True
Visible = True
end
end
end
end
end end
end end
end end
@ -396,9 +384,7 @@ inherited fEditorEmpresa: TfEditorEmpresa
end end
object pagTiendas: TTabSheet object pagTiendas: TTabSheet
Caption = 'Tiendas' Caption = 'Tiendas'
Enabled = False
ImageIndex = 2 ImageIndex = 2
TabVisible = False
inline frViewTiendas1: TfrViewTiendas inline frViewTiendas1: TfrViewTiendas
Left = 0 Left = 0
Top = 0 Top = 0

1
Source/ApplicationBase/Empresas/Views/uEditorTiendaEmpresa.dfm
View File

@ -146,6 +146,7 @@ object fEditorTiendaEmpresa: TfEditorTiendaEmpresa
Height = 58 Height = 58
Anchors = [akLeft, akTop, akRight] Anchors = [akLeft, akTop, akRight]
Shape = bsFrame Shape = bsFrame
Visible = False
ExplicitWidth = 328 ExplicitWidth = 328
end end
object Label10: TLabel object Label10: TLabel

5
Source/ApplicationBase/Empresas/Views/uEditorTiendaEmpresa.pas
View File

@ -179,6 +179,11 @@ begin
Label10.Visible := False; Label10.Visible := False;
eCodigoContable.Visible := False; eCodigoContable.Visible := False;
{$ENDIF} {$ENDIF}
//Lo desactivamos porque a ellos no les interesa
Bevel2.Visible := False;
Label10.Visible := False;
eCodigoContable.Visible := False;
end; end;
destructor TfEditorTiendaEmpresa.Destroy; destructor TfEditorTiendaEmpresa.Destroy;

2
Source/ApplicationBase/Empresas/Views/uViewTiendas.dfm
View File

@ -78,6 +78,8 @@ inherited frViewTiendas: TfrViewTiendas
object cxGridViewCODIGO_CONTABLE: TcxGridDBColumn object cxGridViewCODIGO_CONTABLE: TcxGridDBColumn
Caption = 'C'#243'd.Contable' Caption = 'C'#243'd.Contable'
DataBinding.FieldName = 'CODIGO_CONTABLE' DataBinding.FieldName = 'CODIGO_CONTABLE'
Visible = False
VisibleForCustomization = False
end end
end end
end end

4
Source/ApplicationBase/Empresas/Views/uViewTiendas.pas
View File

@ -74,6 +74,10 @@ begin
cxGridViewCODIGO_CONTABLE.VisibleForCustomization := false; cxGridViewCODIGO_CONTABLE.VisibleForCustomization := false;
cxGridViewCODIGO_CONTABLE.Visible := false; cxGridViewCODIGO_CONTABLE.Visible := false;
{$ENDIF} {$ENDIF}
//Lo desactivamos porque a ellos no les interesa
cxGridViewCODIGO_CONTABLE.VisibleForCustomization := false;
cxGridViewCODIGO_CONTABLE.Visible := false;
end; end;
procedure TfrViewTiendas.cxGridViewDblClick(Sender: TObject); procedure TfrViewTiendas.cxGridViewDblClick(Sender: TObject);