AbetoDesign_FactuGES2/Source/Modulos/Contactos/Views/uViewClienteDatosComerciales.dfm

inherited frViewClienteDatosComerciales: TfrViewClienteDatosComerciales
  Width = 637
  Height = 284
  OnCreate = CustomViewCreate
  OnDestroy = CustomViewDestroy
  ExplicitWidth = 637
  ExplicitHeight = 284
  object dxLayoutControl1: TdxLayoutControl
    Left = 0
    Top = 0
    Width = 637
    Height = 284
    Align = alClient
    ParentBackground = True
    TabOrder = 0
    TabStop = False
    AutoContentSizes = [acsWidth]
    object Label1: TLabel
      Left = 326
      Top = 28
      Width = 277
      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 Label2: TLabel
      Left = 22
      Top = 171
      Width = 317
      Height = 13
      Caption = 
        'Puede indicar el descuento por defecto acordado con este cliente' +
        '.'
      Transparent = True
      WordWrap = True
    end
    object eDiasVencimiento: TcxDBSpinEdit
      Left = 403
      Top = 60
      DataBinding.DataField = 'VENCIMIENTO_FACTURAS_1'
      DataBinding.DataSource = dsDatosComerciales
      Properties.AssignedValues.MinValue = True
      Properties.ImmediatePost = True
      Style.BorderColor = clWindowFrame
      Style.BorderStyle = ebs3D
      Style.HotTrack = False
      Style.LookAndFeel.Kind = lfStandard
      Style.LookAndFeel.NativeStyle = True
      Style.LookAndFeel.SkinName = ''
      Style.ButtonStyle = bts3D
      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 = 79
    end
    object cbRegimenIVA: TcxDBComboBox
      Left = 123
      Top = 28
      DataBinding.DataField = 'REGIMEN_IVA'
      DataBinding.DataSource = dsDatosComerciales
      Properties.DropDownListStyle = lsFixedList
      Properties.ImmediatePost = True
      Properties.ImmediateUpdateText = True
      Properties.OnInitPopup = cbRegimenIVAPropertiesInitPopup
      Style.BorderColor = clWindowFrame
      Style.BorderStyle = ebs3D
      Style.HotTrack = False
      Style.LookAndFeel.Kind = lfStandard
      Style.LookAndFeel.NativeStyle = True
      Style.LookAndFeel.SkinName = ''
      Style.ButtonStyle = bts3D
      Style.PopupBorderStyle = epbsFrame3D
      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 = 180
    end
    object cbRecargoEquivalencia: TcxDBCheckBox
      Left = 123
      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.BorderColor = clWindowFrame
      Style.BorderStyle = ebs3D
      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 = 180
    end
    object cbFormaPago: TcxDBLookupComboBox
      Left = 123
      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
      Properties.PostPopupValueOnTab = True
      Style.BorderColor = clWindowFrame
      Style.BorderStyle = ebs3D
      Style.HotTrack = False
      Style.LookAndFeel.Kind = lfStandard
      Style.LookAndFeel.NativeStyle = True
      Style.LookAndFeel.SkinName = ''
      Style.ButtonStyle = bts3D
      Style.PopupBorderStyle = epbsFrame3D
      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 = 42
    end
    object bFormasPago: TButton
      Left = 164
      Top = 55
      Width = 132
      Height = 21
      Caption = 'Ver las formas de pago...'
      TabOrder = 2
      OnClick = bFormasPagoClick
    end
    object eIVA: TcxDBLookupComboBox
      Left = 123
      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
      Properties.PostPopupValueOnTab = True
      Style.BorderColor = clWindowFrame
      Style.BorderStyle = ebs3D
      Style.HotTrack = False
      Style.LookAndFeel.Kind = lfStandard
      Style.LookAndFeel.NativeStyle = True
      Style.LookAndFeel.SkinName = ''
      Style.ButtonStyle = bts3D
      Style.PopupBorderStyle = epbsFrame3D
      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 = 42
    end
    object bTiposIVA: TButton
      Left = 164
      Top = 82
      Width = 132
      Height = 21
      Caption = 'Ver los tipos de IVA...'
      TabOrder = 4
      OnClick = bTiposIVAClick
    end
    object cxDBSpinEdit1: TcxDBSpinEdit
      Left = 403
      Top = 87
      DataBinding.DataField = 'VENCIMIENTO_FACTURAS_2'
      DataBinding.DataSource = dsDatosComerciales
      Properties.AssignedValues.MinValue = True
      Properties.ImmediatePost = True
      Style.BorderColor = clWindowFrame
      Style.BorderStyle = ebs3D
      Style.HotTrack = False
      Style.LookAndFeel.Kind = lfStandard
      Style.LookAndFeel.NativeStyle = True
      Style.LookAndFeel.SkinName = ''
      Style.ButtonStyle = bts3D
      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 = 79
    end
    object cxDBSpinEdit2: TcxDBSpinEdit
      Left = 403
      Top = 114
      DataBinding.DataField = 'VENCIMIENTO_FACTURAS_3'
      DataBinding.DataSource = dsDatosComerciales
      Properties.AssignedValues.MinValue = True
      Properties.ImmediatePost = True
      Style.BorderColor = clWindowFrame
      Style.BorderStyle = ebs3D
      Style.HotTrack = False
      Style.LookAndFeel.Kind = lfStandard
      Style.LookAndFeel.NativeStyle = True
      Style.LookAndFeel.SkinName = ''
      Style.ButtonStyle = bts3D
      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 = 79
    end
    object eDescuentoLinea: TcxDBSpinEdit
      Left = 123
      Top = 190
      DataBinding.DataField = 'DESCUENTO_LINEA'
      DataBinding.DataSource = dsDatosComerciales
      Properties.Alignment.Horz = taRightJustify
      Properties.UseLeftAlignmentOnEditing = False
      Style.BorderColor = clWindowFrame
      Style.BorderStyle = ebs3D
      Style.HotTrack = False
      Style.LookAndFeel.Kind = lfStandard
      Style.LookAndFeel.NativeStyle = True
      Style.LookAndFeel.SkinName = ''
      Style.ButtonStyle = bts3D
      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 = 200
    end
    object eDescuento: TcxDBSpinEdit
      Left = 123
      Top = 217
      DataBinding.DataField = 'DESCUENTO'
      DataBinding.DataSource = dsDatosComerciales
      Properties.Alignment.Horz = taRightJustify
      Properties.UseLeftAlignmentOnEditing = False
      Style.BorderColor = clWindowFrame
      Style.BorderStyle = ebs3D
      Style.HotTrack = False
      Style.LookAndFeel.Kind = lfStandard
      Style.LookAndFeel.NativeStyle = True
      Style.LookAndFeel.SkinName = ''
      Style.ButtonStyle = bts3D
      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 = 508
    end
    object ePrecioPunto: TcxDBCurrencyEdit
      Left = 123
      Top = 244
      DataBinding.DataField = 'PRECIO_PUNTO'
      DataBinding.DataSource = dsDatosComerciales
      Properties.Alignment.Horz = taRightJustify
      Properties.UseLeftAlignmentOnEditing = False
      TabOrder = 11
      Width = 239
    end
    object dxLayoutGroup1: TdxLayoutGroup
      ShowCaption = False
      Hidden = True
      ShowBorder = False
      object dxLayoutControl1Group4: TdxLayoutGroup
        ShowCaption = False
        Hidden = True
        LayoutDirection = ldHorizontal
        ShowBorder = False
        object dxLayoutControl1Group3: TdxLayoutGroup
          AutoAligns = [aaVertical]
          AlignHorz = ahClient
          Caption = 'Datos comerciales'
          object dxLayoutControl1Item3: TdxLayoutItem
            AutoAligns = [aaVertical]
            AlignHorz = ahClient
            Caption = 'R'#233'gimen de IVA:'
            Control = cbRegimenIVA
            ControlOptions.ShowBorder = False
          end
          object dxLayoutControl1Group2: TdxLayoutGroup
            ShowCaption = False
            Hidden = True
            LayoutDirection = ldHorizontal
            ShowBorder = False
            object dxLayoutControl1Item5: TdxLayoutItem
              AutoAligns = [aaVertical]
              AlignHorz = ahClient
              Caption = 'Forma de pago:'
              Control = cbFormaPago
              ControlOptions.ShowBorder = False
            end
            object dxLayoutControl1Item7: TdxLayoutItem
              AutoAligns = [aaVertical]
              AlignHorz = ahRight
              Caption = 'Button1'
              ShowCaption = False
              Control = bFormasPago
              ControlOptions.ShowBorder = False
            end
          end
          object dxLayoutControl1Group1: TdxLayoutGroup
            ShowCaption = False
            Hidden = True
            LayoutDirection = ldHorizontal
            ShowBorder = False
            object dxLayoutControl1Item8: TdxLayoutItem
              AutoAligns = [aaVertical]
              AlignHorz = ahClient
              Caption = 'IVA por defecto'
              Control = eIVA
              ControlOptions.ShowBorder = False
            end
            object dxLayoutControl1Item9: TdxLayoutItem
              AutoAligns = [aaVertical]
              AlignHorz = ahRight
              ShowCaption = False
              Control = bTiposIVA
              ControlOptions.ShowBorder = False
            end
          end
          object dxLayoutControl1Item4: TdxLayoutItem
            AutoAligns = [aaVertical]
            AlignHorz = ahClient
            Caption = ' '
            Control = cbRecargoEquivalencia
            ControlOptions.ShowBorder = False
          end
        end
        object dxLayoutControl1Group5: TdxLayoutGroup
          AutoAligns = [aaVertical]
          AlignHorz = ahClient
          Caption = 'Datos para facturaci'#243'n'
          object dxLayoutControl1Item6: TdxLayoutItem
            AutoAligns = [aaVertical]
            AlignHorz = ahClient
            Caption = 'Label1'
            ShowCaption = False
            Control = Label1
            ControlOptions.AutoColor = True
            ControlOptions.ShowBorder = False
          end
          object dxLayoutControl1Item2: TdxLayoutItem
            AutoAligns = [aaVertical]
            Caption = 'D'#237'as del mes 1:'
            Control = eDiasVencimiento
            ControlOptions.ShowBorder = False
          end
          object dxLayoutControl1Item1: TdxLayoutItem
            AutoAligns = [aaVertical]
            Caption = 'D'#237'a del mes 2:'
            Control = cxDBSpinEdit1
            ControlOptions.ShowBorder = False
          end
          object dxLayoutControl1Item10: TdxLayoutItem
            AutoAligns = [aaVertical]
            Caption = 'D'#237'a del mes 3:'
            Control = cxDBSpinEdit2
            ControlOptions.ShowBorder = False
          end
        end
      end
      object dxLayoutControl1Group6: TdxLayoutGroup
        Caption = 'Descuento por defecto'
        object dxLayoutControl1Item12: TdxLayoutItem
          ShowCaption = False
          Control = Label2
          ControlOptions.AutoColor = True
          ControlOptions.ShowBorder = False
        end
        object dxLayoutControl1Item11: TdxLayoutItem
          Caption = 'Dto Comercial:'
          Control = eDescuentoLinea
          ControlOptions.ShowBorder = False
        end
        object dxLayoutControl1Item13: TdxLayoutItem
          Caption = 'Descuento especial:'
          Control = eDescuento
          ControlOptions.ShowBorder = False
        end
        object dxLayoutControl1Item14: TdxLayoutItem
          Caption = 'Precio punto:'
          Control = ePrecioPunto
          ControlOptions.ShowBorder = False
        end
      end
    end
  end
  object dsAgentes: 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