git-svn-id: https://192.168.0.254/svn/Proyectos.Noviseda_FactuGES2/trunk@87 f33bb606-9f5c-448d-9c99-757f00063c96
479 lines
16 KiB
Plaintext
479 lines
16 KiB
Plaintext
inherited frViewClienteDatosComerciales: TfrViewClienteDatosComerciales
|
|
Width = 732
|
|
Height = 253
|
|
OnCreate = CustomViewCreate
|
|
OnDestroy = CustomViewDestroy
|
|
ExplicitWidth = 732
|
|
ExplicitHeight = 253
|
|
object Bevel2: TBevel
|
|
Left = 22
|
|
Top = 136
|
|
Width = 385
|
|
Height = 5
|
|
Shape = bsBottomLine
|
|
end
|
|
object dxLayoutControl1: TdxLayoutControl
|
|
Left = 0
|
|
Top = 0
|
|
Width = 732
|
|
Height = 255
|
|
Align = alTop
|
|
ParentBackground = True
|
|
TabOrder = 0
|
|
TabStop = False
|
|
LayoutLookAndFeel = dmBase.dxLayoutSkinLookAndFeel
|
|
object Label1: TLabel
|
|
Left = 466
|
|
Top = 28
|
|
Width = 227
|
|
Height = 26
|
|
Caption =
|
|
'Puede indicar el d'#237'a del mes en el cual el cliente realiza los p' +
|
|
'agos.'
|
|
Transparent = True
|
|
WordWrap = True
|
|
end
|
|
object Bevel1: TBevel
|
|
Left = 22
|
|
Top = 136
|
|
Width = 263
|
|
Height = 5
|
|
Shape = bsBottomLine
|
|
end
|
|
object Bevel3: TBevel
|
|
Left = 22
|
|
Top = 201
|
|
Width = 385
|
|
Height = 5
|
|
Shape = bsBottomLine
|
|
end
|
|
object eDiasVencimiento1: TcxDBSpinEdit
|
|
Left = 538
|
|
Top = 60
|
|
DataBinding.DataField = 'VENCIMIENTO_FACTURAS_1'
|
|
DataBinding.DataSource = dsDatosComerciales
|
|
Properties.DisplayFormat = '##'
|
|
Properties.ImmediatePost = True
|
|
Properties.SpinButtons.Visible = False
|
|
Properties.UseDisplayFormatWhenEditing = True
|
|
Style.HotTrack = False
|
|
Style.LookAndFeel.Kind = lfStandard
|
|
Style.LookAndFeel.NativeStyle = True
|
|
Style.LookAndFeel.SkinName = ''
|
|
StyleDisabled.LookAndFeel.Kind = lfStandard
|
|
StyleDisabled.LookAndFeel.NativeStyle = True
|
|
StyleDisabled.LookAndFeel.SkinName = ''
|
|
StyleFocused.LookAndFeel.Kind = lfStandard
|
|
StyleFocused.LookAndFeel.NativeStyle = True
|
|
StyleFocused.LookAndFeel.SkinName = ''
|
|
StyleHot.LookAndFeel.Kind = lfStandard
|
|
StyleHot.LookAndFeel.NativeStyle = True
|
|
StyleHot.LookAndFeel.SkinName = ''
|
|
TabOrder = 9
|
|
Width = 79
|
|
end
|
|
object cbRegimenIVA: TcxDBComboBox
|
|
Left = 114
|
|
Top = 28
|
|
DataBinding.DataField = 'REGIMEN_IVA'
|
|
DataBinding.DataSource = dsDatosComerciales
|
|
Enabled = False
|
|
Properties.DropDownListStyle = lsFixedList
|
|
Properties.ImmediatePost = True
|
|
Properties.ImmediateUpdateText = True
|
|
Properties.OnInitPopup = cbRegimenIVAPropertiesInitPopup
|
|
Style.HotTrack = False
|
|
Style.LookAndFeel.Kind = lfStandard
|
|
Style.LookAndFeel.NativeStyle = True
|
|
Style.LookAndFeel.SkinName = ''
|
|
StyleDisabled.LookAndFeel.Kind = lfStandard
|
|
StyleDisabled.LookAndFeel.NativeStyle = True
|
|
StyleDisabled.LookAndFeel.SkinName = ''
|
|
StyleFocused.LookAndFeel.Kind = lfStandard
|
|
StyleFocused.LookAndFeel.NativeStyle = True
|
|
StyleFocused.LookAndFeel.SkinName = ''
|
|
StyleHot.LookAndFeel.Kind = lfStandard
|
|
StyleHot.LookAndFeel.NativeStyle = True
|
|
StyleHot.LookAndFeel.SkinName = ''
|
|
TabOrder = 0
|
|
Width = 121
|
|
end
|
|
object cbRecargoEquivalencia: TcxDBCheckBox
|
|
Left = 114
|
|
Top = 109
|
|
Caption = 'Aplicar recargo de equivalencia'
|
|
DataBinding.DataField = 'RECARGO_EQUIVALENCIA'
|
|
DataBinding.DataSource = dsDatosComerciales
|
|
Properties.ImmediatePost = True
|
|
Properties.NullStyle = nssUnchecked
|
|
Properties.ValueChecked = 1
|
|
Properties.ValueUnchecked = 0
|
|
Style.HotTrack = False
|
|
Style.LookAndFeel.Kind = lfStandard
|
|
Style.LookAndFeel.NativeStyle = True
|
|
Style.LookAndFeel.SkinName = ''
|
|
StyleDisabled.LookAndFeel.Kind = lfStandard
|
|
StyleDisabled.LookAndFeel.NativeStyle = True
|
|
StyleDisabled.LookAndFeel.SkinName = ''
|
|
StyleFocused.LookAndFeel.Kind = lfStandard
|
|
StyleFocused.LookAndFeel.NativeStyle = True
|
|
StyleFocused.LookAndFeel.SkinName = ''
|
|
StyleHot.LookAndFeel.Kind = lfStandard
|
|
StyleHot.LookAndFeel.NativeStyle = True
|
|
StyleHot.LookAndFeel.SkinName = ''
|
|
TabOrder = 5
|
|
Width = 121
|
|
end
|
|
object cbFormaPago: TcxDBLookupComboBox
|
|
Left = 114
|
|
Top = 55
|
|
DataBinding.DataField = 'ID_FORMA_PAGO'
|
|
DataBinding.DataSource = dsDatosComerciales
|
|
Properties.ImmediatePost = True
|
|
Properties.KeyFieldNames = 'ID'
|
|
Properties.ListColumns = <
|
|
item
|
|
FieldName = 'REFERENCIA'
|
|
end>
|
|
Properties.ListOptions.GridLines = glNone
|
|
Properties.ListOptions.ShowHeader = False
|
|
Properties.ListOptions.SyncMode = True
|
|
Properties.ListSource = dsFormaPago
|
|
Style.HotTrack = False
|
|
Style.LookAndFeel.Kind = lfStandard
|
|
Style.LookAndFeel.NativeStyle = True
|
|
Style.LookAndFeel.SkinName = ''
|
|
StyleDisabled.LookAndFeel.Kind = lfStandard
|
|
StyleDisabled.LookAndFeel.NativeStyle = True
|
|
StyleDisabled.LookAndFeel.SkinName = ''
|
|
StyleFocused.LookAndFeel.Kind = lfStandard
|
|
StyleFocused.LookAndFeel.NativeStyle = True
|
|
StyleFocused.LookAndFeel.SkinName = ''
|
|
StyleHot.LookAndFeel.Kind = lfStandard
|
|
StyleHot.LookAndFeel.NativeStyle = True
|
|
StyleHot.LookAndFeel.SkinName = ''
|
|
TabOrder = 1
|
|
Width = 121
|
|
end
|
|
object bFormasPago: TButton
|
|
Left = 304
|
|
Top = 55
|
|
Width = 132
|
|
Height = 21
|
|
Caption = 'Ver las formas de pago...'
|
|
TabOrder = 2
|
|
OnClick = bFormasPagoClick
|
|
end
|
|
object eIVA: TcxDBLookupComboBox
|
|
Left = 114
|
|
Top = 82
|
|
DataBinding.DataField = 'ID_TIPO_IVA'
|
|
DataBinding.DataSource = dsDatosComerciales
|
|
Properties.ImmediatePost = True
|
|
Properties.KeyFieldNames = 'ID'
|
|
Properties.ListColumns = <
|
|
item
|
|
FieldName = 'REFERENCIA'
|
|
end>
|
|
Properties.ListOptions.GridLines = glNone
|
|
Properties.ListOptions.ShowHeader = False
|
|
Properties.ListOptions.SyncMode = True
|
|
Properties.ListSource = dsTiposIVA
|
|
Style.HotTrack = False
|
|
Style.LookAndFeel.Kind = lfStandard
|
|
Style.LookAndFeel.NativeStyle = True
|
|
Style.LookAndFeel.SkinName = ''
|
|
StyleDisabled.LookAndFeel.Kind = lfStandard
|
|
StyleDisabled.LookAndFeel.NativeStyle = True
|
|
StyleDisabled.LookAndFeel.SkinName = ''
|
|
StyleFocused.LookAndFeel.Kind = lfStandard
|
|
StyleFocused.LookAndFeel.NativeStyle = True
|
|
StyleFocused.LookAndFeel.SkinName = ''
|
|
StyleHot.LookAndFeel.Kind = lfStandard
|
|
StyleHot.LookAndFeel.NativeStyle = True
|
|
StyleHot.LookAndFeel.SkinName = ''
|
|
TabOrder = 3
|
|
Width = 121
|
|
end
|
|
object bTiposIVA: TButton
|
|
Left = 304
|
|
Top = 82
|
|
Width = 132
|
|
Height = 21
|
|
Caption = 'Ver los tipos de IVA...'
|
|
TabOrder = 4
|
|
OnClick = bTiposIVAClick
|
|
end
|
|
object eDescuento: TcxDBSpinEdit
|
|
Left = 114
|
|
Top = 147
|
|
DataBinding.DataField = 'DESCUENTO'
|
|
DataBinding.DataSource = dsDatosComerciales
|
|
Properties.AssignedValues.MinValue = True
|
|
Properties.DisplayFormat = ',0.00 %;-,0.00 %'
|
|
Properties.EditFormat = ',0.00 %;-,0.00 %'
|
|
Properties.ImmediatePost = True
|
|
Style.HotTrack = False
|
|
Style.LookAndFeel.Kind = lfStandard
|
|
Style.LookAndFeel.NativeStyle = True
|
|
Style.LookAndFeel.SkinName = ''
|
|
StyleDisabled.LookAndFeel.Kind = lfStandard
|
|
StyleDisabled.LookAndFeel.NativeStyle = True
|
|
StyleDisabled.LookAndFeel.SkinName = ''
|
|
StyleFocused.LookAndFeel.Kind = lfStandard
|
|
StyleFocused.LookAndFeel.NativeStyle = True
|
|
StyleFocused.LookAndFeel.SkinName = ''
|
|
StyleHot.LookAndFeel.Kind = lfStandard
|
|
StyleHot.LookAndFeel.NativeStyle = True
|
|
StyleHot.LookAndFeel.SkinName = ''
|
|
TabOrder = 6
|
|
Width = 190
|
|
end
|
|
object eDiasVencimiento2: TcxDBSpinEdit
|
|
Left = 538
|
|
Top = 87
|
|
DataBinding.DataField = 'VENCIMIENTO_FACTURAS_2'
|
|
DataBinding.DataSource = dsDatosComerciales
|
|
Properties.DisplayFormat = '##'
|
|
Properties.ImmediatePost = True
|
|
Properties.SpinButtons.Visible = False
|
|
Style.HotTrack = False
|
|
Style.LookAndFeel.Kind = lfStandard
|
|
Style.LookAndFeel.NativeStyle = True
|
|
Style.LookAndFeel.SkinName = ''
|
|
StyleDisabled.LookAndFeel.Kind = lfStandard
|
|
StyleDisabled.LookAndFeel.NativeStyle = True
|
|
StyleDisabled.LookAndFeel.SkinName = ''
|
|
StyleFocused.LookAndFeel.Kind = lfStandard
|
|
StyleFocused.LookAndFeel.NativeStyle = True
|
|
StyleFocused.LookAndFeel.SkinName = ''
|
|
StyleHot.LookAndFeel.Kind = lfStandard
|
|
StyleHot.LookAndFeel.NativeStyle = True
|
|
StyleHot.LookAndFeel.SkinName = ''
|
|
TabOrder = 10
|
|
Width = 79
|
|
end
|
|
object eDiasVencimiento3: TcxDBSpinEdit
|
|
Left = 538
|
|
Top = 114
|
|
DataBinding.DataField = 'VENCIMIENTO_FACTURAS_3'
|
|
DataBinding.DataSource = dsDatosComerciales
|
|
Properties.DisplayFormat = '##'
|
|
Properties.ImmediatePost = True
|
|
Properties.SpinButtons.Visible = False
|
|
Style.HotTrack = False
|
|
Style.LookAndFeel.Kind = lfStandard
|
|
Style.LookAndFeel.NativeStyle = True
|
|
Style.LookAndFeel.SkinName = ''
|
|
StyleDisabled.LookAndFeel.Kind = lfStandard
|
|
StyleDisabled.LookAndFeel.NativeStyle = True
|
|
StyleDisabled.LookAndFeel.SkinName = ''
|
|
StyleFocused.LookAndFeel.Kind = lfStandard
|
|
StyleFocused.LookAndFeel.NativeStyle = True
|
|
StyleFocused.LookAndFeel.SkinName = ''
|
|
StyleHot.LookAndFeel.Kind = lfStandard
|
|
StyleHot.LookAndFeel.NativeStyle = True
|
|
StyleHot.LookAndFeel.SkinName = ''
|
|
TabOrder = 11
|
|
Width = 79
|
|
end
|
|
object eDescuento2: TcxDBSpinEdit
|
|
Left = 114
|
|
Top = 174
|
|
DataBinding.DataField = 'DESCUENTO2'
|
|
DataBinding.DataSource = dsDatosComerciales
|
|
Properties.AssignedValues.MinValue = True
|
|
Properties.DisplayFormat = ',0.00 %;-,0.00 %'
|
|
Properties.EditFormat = ',0.00 %;-,0.00 %'
|
|
Properties.ImmediatePost = True
|
|
Style.HotTrack = False
|
|
Style.LookAndFeel.Kind = lfStandard
|
|
Style.LookAndFeel.NativeStyle = True
|
|
Style.LookAndFeel.SkinName = ''
|
|
StyleDisabled.LookAndFeel.Kind = lfStandard
|
|
StyleDisabled.LookAndFeel.NativeStyle = True
|
|
StyleDisabled.LookAndFeel.SkinName = ''
|
|
StyleFocused.LookAndFeel.Kind = lfStandard
|
|
StyleFocused.LookAndFeel.NativeStyle = True
|
|
StyleFocused.LookAndFeel.SkinName = ''
|
|
StyleHot.LookAndFeel.Kind = lfStandard
|
|
StyleHot.LookAndFeel.NativeStyle = True
|
|
StyleHot.LookAndFeel.SkinName = ''
|
|
TabOrder = 7
|
|
Width = 190
|
|
end
|
|
object eVendedor: TcxDBLookupComboBox
|
|
Left = 114
|
|
Top = 212
|
|
DataBinding.DataField = 'ID_AGENTE'
|
|
DataBinding.DataSource = dsDatosComerciales
|
|
Properties.ImmediatePost = True
|
|
Properties.KeyFieldNames = 'ID'
|
|
Properties.ListColumns = <
|
|
item
|
|
FieldName = 'NOMBRE'
|
|
end>
|
|
Properties.ListOptions.GridLines = glNone
|
|
Properties.ListOptions.ShowHeader = False
|
|
Properties.ListOptions.SyncMode = True
|
|
Properties.ListSource = dsVendedores
|
|
Style.HotTrack = False
|
|
Style.LookAndFeel.Kind = lfStandard
|
|
Style.LookAndFeel.NativeStyle = True
|
|
Style.LookAndFeel.SkinName = ''
|
|
StyleDisabled.LookAndFeel.Kind = lfStandard
|
|
StyleDisabled.LookAndFeel.NativeStyle = True
|
|
StyleDisabled.LookAndFeel.SkinName = ''
|
|
StyleFocused.LookAndFeel.Kind = lfStandard
|
|
StyleFocused.LookAndFeel.NativeStyle = True
|
|
StyleFocused.LookAndFeel.SkinName = ''
|
|
StyleHot.LookAndFeel.Kind = lfStandard
|
|
StyleHot.LookAndFeel.NativeStyle = True
|
|
StyleHot.LookAndFeel.SkinName = ''
|
|
TabOrder = 8
|
|
Width = 165
|
|
end
|
|
object dxLayoutGroup1: TdxLayoutGroup
|
|
AlignHorz = ahParentManaged
|
|
AlignVert = avTop
|
|
CaptionOptions.Visible = False
|
|
ButtonOptions.Buttons = <>
|
|
Hidden = True
|
|
LayoutDirection = ldHorizontal
|
|
ShowBorder = False
|
|
object dxLayoutControl1Group3: TdxLayoutGroup
|
|
AlignHorz = ahClient
|
|
CaptionOptions.Text = 'Datos comerciales'
|
|
ButtonOptions.Buttons = <>
|
|
object dxLayoutControl1Item3: TdxLayoutItem
|
|
AlignHorz = ahClient
|
|
CaptionOptions.Text = 'R'#233'gimen de IVA:'
|
|
Enabled = False
|
|
Visible = False
|
|
Control = cbRegimenIVA
|
|
ControlOptions.ShowBorder = False
|
|
end
|
|
object dxLayoutControl1Group2: TdxLayoutGroup
|
|
CaptionOptions.Visible = False
|
|
ButtonOptions.Buttons = <>
|
|
Hidden = True
|
|
LayoutDirection = ldHorizontal
|
|
ShowBorder = False
|
|
object dxLayoutControl1Item5: TdxLayoutItem
|
|
AlignHorz = ahClient
|
|
CaptionOptions.Text = 'Forma de pago:'
|
|
Control = cbFormaPago
|
|
ControlOptions.ShowBorder = False
|
|
end
|
|
object dxLayoutControl1Item7: TdxLayoutItem
|
|
AlignHorz = ahRight
|
|
CaptionOptions.Text = 'Button1'
|
|
CaptionOptions.Visible = False
|
|
Control = bFormasPago
|
|
ControlOptions.ShowBorder = False
|
|
end
|
|
end
|
|
object dxLayoutControl1Group1: TdxLayoutGroup
|
|
CaptionOptions.Visible = False
|
|
ButtonOptions.Buttons = <>
|
|
Hidden = True
|
|
LayoutDirection = ldHorizontal
|
|
ShowBorder = False
|
|
object dxLayoutControl1Item8: TdxLayoutItem
|
|
AlignHorz = ahClient
|
|
CaptionOptions.Text = 'IVA por defecto'
|
|
Control = eIVA
|
|
ControlOptions.ShowBorder = False
|
|
end
|
|
object dxLayoutControl1Item9: TdxLayoutItem
|
|
AlignHorz = ahRight
|
|
CaptionOptions.Visible = False
|
|
Control = bTiposIVA
|
|
ControlOptions.ShowBorder = False
|
|
end
|
|
end
|
|
object dxLayoutControl1Item4: TdxLayoutItem
|
|
AlignHorz = ahClient
|
|
CaptionOptions.Text = ' '
|
|
Control = cbRecargoEquivalencia
|
|
ControlOptions.ShowBorder = False
|
|
end
|
|
object dxLayoutControl1Item10: TdxLayoutItem
|
|
CaptionOptions.Text = 'Bevel1'
|
|
CaptionOptions.Visible = False
|
|
Control = Bevel1
|
|
ControlOptions.ShowBorder = False
|
|
end
|
|
object dxLayoutControl1Item1: TdxLayoutItem
|
|
AlignHorz = ahLeft
|
|
CaptionOptions.Text = 'Dto. cliente:'
|
|
Control = eDescuento
|
|
ControlOptions.ShowBorder = False
|
|
end
|
|
object dxLayoutControl1Item13: TdxLayoutItem
|
|
AlignHorz = ahLeft
|
|
CaptionOptions.Text = 'Dto. pronto pago:'
|
|
Control = eDescuento2
|
|
ControlOptions.ShowBorder = False
|
|
end
|
|
object dxLayoutControl1Item15: TdxLayoutItem
|
|
Control = Bevel3
|
|
ControlOptions.ShowBorder = False
|
|
end
|
|
object dxLayoutControl1Item14: TdxLayoutItem
|
|
CaptionOptions.Text = 'Vendedor:'
|
|
Control = eVendedor
|
|
ControlOptions.ShowBorder = False
|
|
end
|
|
end
|
|
object dxLayoutControl1Group5: TdxLayoutGroup
|
|
AlignHorz = ahClient
|
|
CaptionOptions.Text = 'Datos para facturaci'#243'n'
|
|
ButtonOptions.Buttons = <>
|
|
object dxLayoutControl1Item6: TdxLayoutItem
|
|
AlignHorz = ahClient
|
|
CaptionOptions.Text = 'Label1'
|
|
CaptionOptions.Visible = False
|
|
Control = Label1
|
|
ControlOptions.AutoColor = True
|
|
ControlOptions.ShowBorder = False
|
|
end
|
|
object dxLayoutControl1Item2: TdxLayoutItem
|
|
AlignHorz = ahLeft
|
|
CaptionOptions.Text = 'D'#237'a del mes 1:'
|
|
Control = eDiasVencimiento1
|
|
ControlOptions.ShowBorder = False
|
|
end
|
|
object dxLayoutControl1Item11: TdxLayoutItem
|
|
AlignHorz = ahLeft
|
|
CaptionOptions.Text = 'D'#237'a del mes 2:'
|
|
Control = eDiasVencimiento2
|
|
ControlOptions.ShowBorder = False
|
|
end
|
|
object dxLayoutControl1Item12: TdxLayoutItem
|
|
AlignHorz = ahLeft
|
|
CaptionOptions.Text = 'D'#237'a del mes 3:'
|
|
Control = eDiasVencimiento3
|
|
ControlOptions.ShowBorder = False
|
|
end
|
|
end
|
|
end
|
|
end
|
|
object dsVendedores: TDADataSource
|
|
Left = 40
|
|
Top = 8
|
|
end
|
|
object dsDatosComerciales: TDADataSource
|
|
Left = 8
|
|
Top = 8
|
|
end
|
|
object dsFormaPago: TDADataSource
|
|
Left = 40
|
|
Top = 48
|
|
end
|
|
object dsTiposIVA: TDADataSource
|
|
Left = 8
|
|
Top = 48
|
|
end
|
|
end
|