Tecsitel_FactuGES2/Source/GUIBase/uViewTotales.dfm

inherited frViewTotales: TfrViewTotales
  Width = 880
  Height = 316
  Align = alBottom
  ExplicitWidth = 880
  ExplicitHeight = 316
  object dxLayoutControl1: TdxLayoutControl
    AlignWithMargins = True
    Left = 0
    Top = 0
    Width = 880
    Height = 217
    Margins.Left = 0
    Margins.Top = 0
    Margins.Right = 0
    Margins.Bottom = 0
    Align = alTop
    ParentBackground = True
    TabOrder = 0
    AutoContentSizes = [acsWidth, acsHeight]
    ExplicitWidth = 451
    object Bevel1: TBevel
      Left = 104
      Top = 109
      Width = 73
      Height = 9
      Shape = bsBottomLine
    end
    object Bevel3: TBevel
      Left = 434
      Top = 28
      Width = 3
      Height = 122
      Shape = bsRightLine
    end
    object Bevel4: TBevel
      Left = 546
      Top = 109
      Width = 192
      Height = 9
      Shape = bsBottomLine
    end
    object ImporteDto: TcxDBCurrencyEdit
      Left = 175
      Top = 129
      AutoSize = False
      DataBinding.DataField = 'IMPORTE_DESCUENTO'
      DataBinding.DataSource = DADataSource
      Enabled = False
      ParentFont = False
      Properties.Alignment.Horz = taRightJustify
      Properties.ReadOnly = True
      Properties.UseLeftAlignmentOnEditing = False
      Properties.UseThousandSeparator = True
      Style.BorderColor = clWindowFrame
      Style.BorderStyle = ebs3D
      Style.Font.Charset = DEFAULT_CHARSET
      Style.Font.Color = clWindowText
      Style.Font.Height = -11
      Style.Font.Name = 'Tahoma'
      Style.Font.Style = []
      Style.HotTrack = False
      Style.LookAndFeel.NativeStyle = True
      Style.TextColor = clWindowText
      Style.IsFontAssigned = True
      StyleDisabled.LookAndFeel.NativeStyle = True
      StyleDisabled.TextColor = clWindowText
      StyleFocused.LookAndFeel.NativeStyle = True
      StyleHot.LookAndFeel.NativeStyle = True
      TabOrder = 5
      Height = 21
      Width = 93
    end
    object ImporteIVA: TcxDBCurrencyEdit
      Left = 617
      Top = 55
      AutoSize = False
      DataBinding.DataField = 'IMPORTE_IVA'
      DataBinding.DataSource = DADataSource
      Enabled = False
      ParentFont = False
      Properties.Alignment.Horz = taRightJustify
      Properties.ReadOnly = True
      Properties.UseLeftAlignmentOnEditing = False
      Properties.UseThousandSeparator = True
      Style.BorderColor = clWindowFrame
      Style.BorderStyle = ebs3D
      Style.Font.Charset = DEFAULT_CHARSET
      Style.Font.Color = clWindowText
      Style.Font.Height = -11
      Style.Font.Name = 'Tahoma'
      Style.Font.Style = []
      Style.HotTrack = False
      Style.LookAndFeel.NativeStyle = True
      Style.TextColor = clWindowText
      Style.IsFontAssigned = True
      StyleDisabled.LookAndFeel.NativeStyle = True
      StyleDisabled.TextColor = clWindowText
      StyleFocused.LookAndFeel.NativeStyle = True
      StyleHot.LookAndFeel.NativeStyle = True
      TabOrder = 9
      Height = 21
      Width = 137
    end
    object ImporteTotal: TcxDBCurrencyEdit
      Left = 547
      Top = 129
      AutoSize = False
      DataBinding.DataField = 'IMPORTE_TOTAL'
      DataBinding.DataSource = DADataSource
      Enabled = False
      ParentFont = False
      Properties.Alignment.Horz = taRightJustify
      Properties.ReadOnly = True
      Properties.UseLeftAlignmentOnEditing = False
      Properties.UseThousandSeparator = True
      Style.BorderColor = clWindowFrame
      Style.BorderStyle = ebs3D
      Style.Font.Charset = DEFAULT_CHARSET
      Style.Font.Color = clWindowText
      Style.Font.Height = -12
      Style.Font.Name = 'Tahoma'
      Style.Font.Style = []
      Style.HotTrack = False
      Style.LookAndFeel.NativeStyle = True
      Style.TextColor = clActiveCaption
      Style.TextStyle = [fsBold]
      Style.IsFontAssigned = True
      StyleDisabled.LookAndFeel.NativeStyle = True
      StyleDisabled.TextColor = clWindowText
      StyleFocused.LookAndFeel.NativeStyle = True
      StyleHot.LookAndFeel.NativeStyle = True
      TabOrder = 12
      Height = 21
      Width = 137
    end
    object edtDescuento: TcxDBSpinEdit
      Left = 104
      Top = 129
      AutoSize = False
      DataBinding.DataField = 'DESCUENTO'
      DataBinding.DataSource = DADataSource
      ParentFont = False
      Properties.Alignment.Horz = taRightJustify
      Properties.DisplayFormat = ',0.00 %;-,0.00 %'
      Properties.ImmediatePost = True
      Properties.MaxValue = 100.000000000000000000
      Style.BorderColor = clWindowFrame
      Style.BorderStyle = ebs3D
      Style.Font.Charset = DEFAULT_CHARSET
      Style.Font.Color = clWindowText
      Style.Font.Height = -11
      Style.Font.Name = 'Tahoma'
      Style.Font.Style = []
      Style.HotTrack = False
      Style.LookAndFeel.NativeStyle = True
      Style.TextColor = clWindowText
      Style.ButtonStyle = bts3D
      Style.IsFontAssigned = True
      StyleDisabled.LookAndFeel.NativeStyle = True
      StyleFocused.LookAndFeel.NativeStyle = True
      StyleHot.LookAndFeel.NativeStyle = True
      TabOrder = 4
      Height = 21
      Width = 65
    end
    object edtIVA: TcxDBSpinEdit
      Left = 546
      Top = 55
      AutoSize = False
      DataBinding.DataField = 'IVA'
      DataBinding.DataSource = DADataSource
      Enabled = False
      ParentFont = False
      Properties.Alignment.Horz = taRightJustify
      Properties.AssignedValues.MinValue = True
      Properties.DisplayFormat = ',0.00 %;-,0.00 %'
      Properties.ImmediatePost = True
      Properties.MaxValue = 100.000000000000000000
      Style.BorderColor = clWindowFrame
      Style.BorderStyle = ebs3D
      Style.Font.Charset = DEFAULT_CHARSET
      Style.Font.Color = clWindowText
      Style.Font.Height = -11
      Style.Font.Name = 'Tahoma'
      Style.Font.Style = []
      Style.HotTrack = False
      Style.LookAndFeel.Kind = lfStandard
      Style.LookAndFeel.NativeStyle = True
      Style.TextColor = clWindowText
      Style.ButtonStyle = bts3D
      Style.IsFontAssigned = True
      StyleDisabled.LookAndFeel.Kind = lfStandard
      StyleDisabled.LookAndFeel.NativeStyle = True
      StyleDisabled.TextColor = clWindowText
      StyleFocused.LookAndFeel.Kind = lfStandard
      StyleFocused.LookAndFeel.NativeStyle = True
      StyleHot.LookAndFeel.Kind = lfStandard
      StyleHot.LookAndFeel.NativeStyle = True
      TabOrder = 8
      Height = 21
      Width = 65
    end
    object ImporteBase: TcxDBCurrencyEdit
      Left = 546
      Top = 28
      AutoSize = False
      DataBinding.DataField = 'BASE_IMPONIBLE'
      DataBinding.DataSource = DADataSource
      Enabled = False
      ParentFont = False
      Properties.Alignment.Horz = taRightJustify
      Properties.ReadOnly = True
      Properties.UseLeftAlignmentOnEditing = False
      Properties.UseThousandSeparator = True
      Style.BorderColor = clWindowFrame
      Style.BorderStyle = ebs3D
      Style.Font.Charset = DEFAULT_CHARSET
      Style.Font.Color = clWindowText
      Style.Font.Height = -11
      Style.Font.Name = 'Tahoma'
      Style.Font.Style = [fsBold]
      Style.HotTrack = False
      Style.LookAndFeel.NativeStyle = True
      Style.TextColor = clWindowText
      Style.IsFontAssigned = True
      StyleDisabled.LookAndFeel.NativeStyle = True
      StyleDisabled.TextColor = clWindowText
      StyleFocused.LookAndFeel.NativeStyle = True
      StyleHot.LookAndFeel.NativeStyle = True
      TabOrder = 7
      Height = 21
      Width = 92
    end
    object edtRE: TcxDBSpinEdit
      Left = 546
      Top = 82
      AutoSize = False
      DataBinding.DataField = 'RE'
      DataBinding.DataSource = DADataSource
      Enabled = False
      ParentFont = False
      Properties.Alignment.Horz = taRightJustify
      Properties.AssignedValues.EditFormat = True
      Properties.DisplayFormat = ',0.00 %;-,0.00 %'
      Properties.ImmediatePost = True
      Properties.MaxValue = 100.000000000000000000
      Style.BorderColor = clWindowFrame
      Style.BorderStyle = ebs3D
      Style.Font.Charset = DEFAULT_CHARSET
      Style.Font.Color = clWindowText
      Style.Font.Height = -11
      Style.Font.Name = 'Tahoma'
      Style.Font.Style = []
      Style.HotTrack = False
      Style.LookAndFeel.Kind = lfStandard
      Style.LookAndFeel.NativeStyle = True
      Style.TextColor = clWindowText
      Style.ButtonStyle = bts3D
      Style.IsFontAssigned = True
      StyleDisabled.LookAndFeel.Kind = lfStandard
      StyleDisabled.LookAndFeel.NativeStyle = True
      StyleDisabled.TextColor = clWindowText
      StyleFocused.LookAndFeel.Kind = lfStandard
      StyleFocused.LookAndFeel.NativeStyle = True
      StyleHot.LookAndFeel.Kind = lfStandard
      StyleHot.LookAndFeel.NativeStyle = True
      TabOrder = 10
      Height = 21
      Width = 65
    end
    object ImporteRE: TcxDBCurrencyEdit
      Left = 617
      Top = 82
      AutoSize = False
      DataBinding.DataField = 'IMPORTE_RE'
      DataBinding.DataSource = DADataSource
      Enabled = False
      ParentFont = False
      Properties.Alignment.Horz = taRightJustify
      Properties.ReadOnly = True
      Properties.UseLeftAlignmentOnEditing = False
      Properties.UseThousandSeparator = True
      Style.BorderColor = clWindowFrame
      Style.BorderStyle = ebs3D
      Style.Font.Charset = DEFAULT_CHARSET
      Style.Font.Color = clWindowText
      Style.Font.Height = -11
      Style.Font.Name = 'Tahoma'
      Style.Font.Style = []
      Style.HotTrack = False
      Style.LookAndFeel.NativeStyle = True
      Style.TextColor = clWindowText
      Style.IsFontAssigned = True
      StyleDisabled.LookAndFeel.NativeStyle = True
      StyleDisabled.TextColor = clWindowText
      StyleFocused.LookAndFeel.NativeStyle = True
      StyleHot.LookAndFeel.NativeStyle = True
      TabOrder = 11
      Height = 21
      Width = 56
    end
    object eImporteNeto: TcxDBCurrencyEdit
      Left = 104
      Top = 28
      AutoSize = False
      DataBinding.DataField = 'IMPORTE_NETO'
      DataBinding.DataSource = DADataSource
      Enabled = False
      ParentFont = False
      Properties.Alignment.Horz = taRightJustify
      Properties.ReadOnly = True
      Properties.UseLeftAlignmentOnEditing = False
      Properties.UseThousandSeparator = True
      Style.BorderColor = clWindowFrame
      Style.BorderStyle = ebs3D
      Style.Font.Charset = DEFAULT_CHARSET
      Style.Font.Color = clWindowText
      Style.Font.Height = -11
      Style.Font.Name = 'Tahoma'
      Style.Font.Style = [fsBold]
      Style.HotTrack = False
      Style.LookAndFeel.NativeStyle = True
      Style.TextColor = clWindowText
      Style.IsFontAssigned = True
      StyleDisabled.LookAndFeel.NativeStyle = True
      StyleDisabled.TextColor = clWindowText
      StyleFocused.LookAndFeel.NativeStyle = True
      StyleHot.LookAndFeel.NativeStyle = True
      TabOrder = 0
      Height = 21
      Width = 147
    end
    object ePorte: TcxDBCurrencyEdit
      Left = 104
      Top = 156
      AutoSize = False
      DataBinding.DataField = 'IMPORTE_PORTE'
      DataBinding.DataSource = DADataSource
      ParentFont = False
      Properties.Alignment.Horz = taRightJustify
      Properties.ReadOnly = False
      Properties.UseLeftAlignmentOnEditing = False
      Properties.UseThousandSeparator = True
      Style.BorderColor = clWindowFrame
      Style.BorderStyle = ebs3D
      Style.Font.Charset = DEFAULT_CHARSET
      Style.Font.Color = clWindowText
      Style.Font.Height = -11
      Style.Font.Name = 'Tahoma'
      Style.Font.Style = []
      Style.HotTrack = False
      Style.LookAndFeel.NativeStyle = True
      Style.TextColor = clWindowText
      Style.IsFontAssigned = True
      StyleDisabled.LookAndFeel.NativeStyle = True
      StyleDisabled.TextColor = clWindowText
      StyleFocused.LookAndFeel.NativeStyle = True
      StyleHot.LookAndFeel.NativeStyle = True
      TabOrder = 6
      Height = 21
      Width = 147
    end
    object eIVA: TcxDBLookupComboBox
      Left = 104
      Top = 55
      DataBinding.DataField = 'ID_TIPO_IVA'
      DataBinding.DataSource = DADataSource
      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.BorderColor = clWindowFrame
      Style.BorderStyle = ebs3D
      Style.HotTrack = False
      Style.LookAndFeel.Kind = lfStandard
      Style.LookAndFeel.NativeStyle = True
      Style.ButtonStyle = bts3D
      Style.PopupBorderStyle = epbsFrame3D
      StyleDisabled.LookAndFeel.Kind = lfStandard
      StyleDisabled.LookAndFeel.NativeStyle = True
      StyleFocused.LookAndFeel.Kind = lfStandard
      StyleFocused.LookAndFeel.NativeStyle = True
      StyleHot.LookAndFeel.Kind = lfStandard
      StyleHot.LookAndFeel.NativeStyle = True
      TabOrder = 1
      Width = 81
    end
    object bTiposIVA: TButton
      Left = 286
      Top = 55
      Width = 132
      Height = 21
      Caption = 'Ver los tipos de IVA...'
      TabOrder = 2
    end
    object cbRecargoEquivalencia: TcxDBCheckBox
      Left = 104
      Top = 82
      Caption = 'Aplicar recargo de equivalencia'
      DataBinding.DataField = 'RECARGO_EQUIVALENCIA'
      DataBinding.DataSource = DADataSource
      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
      StyleDisabled.LookAndFeel.Kind = lfStandard
      StyleDisabled.LookAndFeel.NativeStyle = True
      StyleFocused.LookAndFeel.Kind = lfStandard
      StyleFocused.LookAndFeel.NativeStyle = True
      StyleHot.LookAndFeel.Kind = lfStandard
      StyleHot.LookAndFeel.NativeStyle = True
      TabOrder = 3
      Width = 219
    end
    object dxLayoutControl1Group_Root: TdxLayoutGroup
      ShowCaption = False
      Hidden = True
      ShowBorder = False
      object dxLayoutControl1Group1: TdxLayoutGroup
        Caption = 'Importes totales'
        LayoutDirection = ldHorizontal
        object dxLayoutControl1Group2: TdxLayoutGroup
          AutoAligns = [aaVertical]
          AlignHorz = ahClient
          ShowCaption = False
          Hidden = True
          ShowBorder = False
          object dxLayoutControl1Item8: TdxLayoutItem
            AutoAligns = [aaVertical]
            AlignHorz = ahClient
            Caption = 'Importe neto:'
            Control = eImporteNeto
            ControlOptions.ShowBorder = False
          end
          object dxLayoutControl1Group6: TdxLayoutGroup
            ShowCaption = False
            Hidden = True
            LayoutDirection = ldHorizontal
            ShowBorder = False
            object dxLayoutControl1Item11: TdxLayoutItem
              AutoAligns = [aaVertical]
              AlignHorz = ahClient
              Caption = 'Tipo de IVA:'
              Control = eIVA
              ControlOptions.ShowBorder = False
            end
            object dxLayoutControl1Item15: TdxLayoutItem
              AutoAligns = [aaVertical]
              AlignHorz = ahRight
              ShowCaption = False
              Control = bTiposIVA
              ControlOptions.ShowBorder = False
            end
          end
          object dxLayoutControl1Item16: TdxLayoutItem
            Caption = ' '
            Control = cbRecargoEquivalencia
            ControlOptions.ShowBorder = False
          end
          object dxLayoutControl1Item10: TdxLayoutItem
            Caption = ' '
            Control = Bevel1
            ControlOptions.ShowBorder = False
          end
          object dxLayoutControl1Group7: TdxLayoutGroup
            ShowCaption = False
            Hidden = True
            LayoutDirection = ldHorizontal
            ShowBorder = False
            object dxLayoutControl1Item4: TdxLayoutItem
              AutoAligns = [aaVertical]
              Caption = 'Descuento (%):'
              Control = edtDescuento
              ControlOptions.ShowBorder = False
            end
            object dxLayoutControl1Item1: TdxLayoutItem
              AutoAligns = [aaVertical]
              AlignHorz = ahClient
              Caption = 'Importe de dto:'
              ShowCaption = False
              Control = ImporteDto
              ControlOptions.ShowBorder = False
            end
          end
          object dxLayoutControl1Item9: TdxLayoutItem
            AutoAligns = [aaVertical]
            AlignHorz = ahClient
            Caption = 'Porte:'
            Control = ePorte
            ControlOptions.ShowBorder = False
          end
        end
        object dxLayoutControl1Group5: TdxLayoutGroup
          AutoAligns = [aaVertical]
          AlignHorz = ahClient
          ShowCaption = False
          Hidden = True
          LayoutDirection = ldHorizontal
          ShowBorder = False
          object dxLayoutControl1Item13: TdxLayoutItem
            AutoAligns = [aaHorizontal]
            AlignVert = avClient
            Caption = ' '
            Offsets.Left = 10
            Offsets.Right = 10
            ShowCaption = False
            Control = Bevel3
            ControlOptions.ShowBorder = False
          end
          object dxLayoutControl1Group3: TdxLayoutGroup
            AutoAligns = [aaVertical]
            AlignHorz = ahClient
            ShowCaption = False
            Hidden = True
            ShowBorder = False
            object dxLayoutControl1Item12: TdxLayoutItem
              AutoAligns = [aaVertical]
              AlignHorz = ahClient
              Caption = 'Base imponible:'
              Control = ImporteBase
              ControlOptions.ShowBorder = False
            end
            object dxLayoutControl1Group9: TdxLayoutGroup
              ShowCaption = False
              Hidden = True
              LayoutDirection = ldHorizontal
              ShowBorder = False
              object dxLayoutControl1Item5: TdxLayoutItem
                AutoAligns = [aaVertical]
                Caption = 'IVA (%):'
                CaptionOptions.AlignHorz = taRightJustify
                Control = edtIVA
                ControlOptions.ShowBorder = False
              end
              object dxLayoutControl1Item2: TdxLayoutItem
                AutoAligns = [aaVertical]
                AlignHorz = ahClient
                Caption = 'Importe de IVA:'
                ShowCaption = False
                Control = ImporteIVA
                ControlOptions.ShowBorder = False
              end
            end
            object dxLayoutControl1Group8: TdxLayoutGroup
              ShowCaption = False
              Hidden = True
              LayoutDirection = ldHorizontal
              ShowBorder = False
              object dxLayoutControl1Item6: TdxLayoutItem
                AutoAligns = [aaVertical]
                Caption = 'RE. (%):'
                CaptionOptions.AlignHorz = taRightJustify
                Control = edtRE
                ControlOptions.ShowBorder = False
              end
              object dxLayoutControl1Item7: TdxLayoutItem
                AutoAligns = [aaVertical]
                AlignHorz = ahClient
                Caption = 'Importe de RE:'
                ShowCaption = False
                Visible = False
                Control = ImporteRE
                ControlOptions.ShowBorder = False
              end
            end
            object dxLayoutControl1Item14: TdxLayoutItem
              AutoAligns = [aaVertical]
              AlignHorz = ahClient
              Caption = ' '
              Control = Bevel4
              ControlOptions.ShowBorder = False
            end
            object dxLayoutControl1Item3: TdxLayoutItem
              AutoAligns = [aaVertical]
              AlignHorz = ahClient
              Caption = 'Importe total:'
              LookAndFeel = LookAndFeelIMPORTE_TOTAL
              Control = ImporteTotal
              ControlOptions.ShowBorder = False
            end
          end
        end
      end
    end
    object dxLayoutControl1Group4: TdxLayoutGroup
    end
  end
  object DADataSource: TDADataSource
    Left = 8
    Top = 8
  end
  object dxLayoutLookAndFeelList1: TdxLayoutLookAndFeelList
    Left = 40
    Top = 8
    object LookAndFeelIMPORTE_TOTAL: TdxLayoutStandardLookAndFeel
      ItemOptions.CaptionOptions.Font.Charset = DEFAULT_CHARSET
      ItemOptions.CaptionOptions.Font.Color = clWindowText
      ItemOptions.CaptionOptions.Font.Height = -12
      ItemOptions.CaptionOptions.Font.Name = 'Tahoma'
      ItemOptions.CaptionOptions.Font.Style = [fsBold]
      ItemOptions.CaptionOptions.UseDefaultFont = False
    end
  end
  object dsTiposIVA: TDADataSource
    Left = 8
    Top = 40
  end
end