object fempresas: Tfempresas
  Left = 0
  Top = 0
  Caption = 'Datos de Empresas'
  ClientHeight = 559
  ClientWidth = 1133
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = False
  Position = poOwnerFormCenter
  OnClose = FormClose
  OnKeyDown = FormKeyDown
  OnKeyPress = FormKeyPress
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Panel7: TPanel
    Left = 0
    Top = 0
    Width = 1133
    Height = 40
    Align = alTop
    TabOrder = 0
    object Label35: TLabel
      Left = 276
      Top = 1
      Width = 804
      Height = 38
      Align = alClient
      Alignment = taCenter
      Caption = 'Centro'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -27
      Font.Name = 'Arial Black'
      Font.Style = [fsBold, fsItalic]
      ParentFont = False
      ExplicitWidth = 99
    end
    object btAcancelar: TButton
      Left = 221
      Top = 1
      Width = 55
      Height = 38
      Align = alLeft
      Caption = 'Cancelar'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ImageAlignment = iaBottom
      ImageIndex = 4
      Images = MENU.ImageList1
      ParentFont = False
      TabOrder = 0
      OnClick = btAcancelarClick
    end
    object btAmodificar: TButton
      Left = 111
      Top = 1
      Width = 55
      Height = 38
      Align = alLeft
      Caption = 'Editar'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ImageAlignment = iaBottom
      ImageIndex = 2
      Images = MENU.ImageList1
      ParentFont = False
      TabOrder = 1
      OnClick = btAmodificarClick
    end
    object btAborrar: TButton
      Left = 56
      Top = 1
      Width = 55
      Height = 38
      Align = alLeft
      Caption = 'Borrar'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ImageAlignment = iaBottom
      ImageIndex = 1
      Images = MENU.ImageList1
      ParentFont = False
      TabOrder = 2
      OnClick = btAborrarClick
    end
    object btAnuevo: TButton
      Left = 1
      Top = 1
      Width = 55
      Height = 38
      Align = alLeft
      Caption = 'Nuevo'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ImageAlignment = iaBottom
      ImageIndex = 0
      Images = MENU.ImageList1
      ParentFont = False
      TabOrder = 3
      OnClick = btAnuevoClick
    end
    object btAguardar: TButton
      Left = 166
      Top = 1
      Width = 55
      Height = 38
      Align = alLeft
      Caption = 'Guardar'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ImageAlignment = iaBottom
      ImageIndex = 3
      Images = MENU.ImageList1
      ParentFont = False
      TabOrder = 4
      OnClick = btAguardarClick
    end
    object btAsalir: TButton
      Left = 1080
      Top = 1
      Width = 52
      Height = 38
      Align = alRight
      Caption = 'Salir'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ImageAlignment = iaBottom
      ImageIndex = 8
      Images = MENU.ImageList1
      ParentFont = False
      TabOrder = 5
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 40
    Width = 221
    Height = 519
    Align = alLeft
    TabOrder = 1
    object DBGrid1: TDBGrid
      Left = 1
      Top = 1
      Width = 219
      Height = 517
      Align = alClient
      DataSource = dsqempresas
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'Tahoma'
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = 'nombre'
          Title.Caption = 'Centro'
          Width = 190
          Visible = True
        end>
    end
  end
  object Panel2: TPanel
    Left = 221
    Top = 40
    Width = 912
    Height = 519
    Align = alClient
    TabOrder = 2
    object Paginas: TPageControl
      Left = 1
      Top = 1
      Width = 910
      Height = 517
      ActivePage = TabSheet18
      Align = alClient
      TabOrder = 0
      object TabSheet18: TTabSheet
        Caption = 'Generales'
        object Panel150: TPanel
          Left = 0
          Top = 0
          Width = 902
          Height = 489
          Align = alClient
          Enabled = False
          TabOrder = 0
          object Label100: TLabel
            Left = 184
            Top = 234
            Width = 28
            Height = 13
            Caption = 'IBAN:'
            FocusControl = DBEdit58
          end
          object Label101: TLabel
            Left = 232
            Top = 235
            Width = 40
            Height = 13
            Caption = 'Entidad:'
            FocusControl = DBEdit59
          end
          object Label102: TLabel
            Left = 286
            Top = 234
            Width = 37
            Height = 13
            Caption = 'Oficina:'
            FocusControl = DBEdit60
          end
          object Label103: TLabel
            Left = 370
            Top = 234
            Width = 22
            Height = 13
            Caption = 'D.C.'
            FocusControl = DBEdit61
          end
          object Label104: TLabel
            Left = 394
            Top = 234
            Width = 35
            Height = 13
            Caption = 'Cuenta'
            FocusControl = DBEdit62
          end
          object Label81: TLabel
            Left = 57
            Top = 6
            Width = 37
            Height = 13
            Caption = 'C'#243'digo:'
            FocusControl = DBEdit40
          end
          object Label82: TLabel
            Left = 61
            Top = 26
            Width = 33
            Height = 13
            Caption = 'C.I.F.:'
            FocusControl = DBEdit41
          end
          object Label83: TLabel
            Left = 53
            Top = 46
            Width = 41
            Height = 13
            Caption = 'Nombre:'
            FocusControl = DBEdit42
          end
          object Label84: TLabel
            Left = 47
            Top = 66
            Width = 47
            Height = 13
            Caption = 'Direcci'#243'n:'
            FocusControl = DBEdit43
          end
          object Label85: TLabel
            Left = 25
            Top = 106
            Width = 69
            Height = 13
            Caption = 'Codigo Postal:'
            FocusControl = DBEdit44
          end
          object Label86: TLabel
            Left = 45
            Top = 85
            Width = 49
            Height = 13
            Caption = 'Poblaci'#243'n:'
            FocusControl = DBEdit45
          end
          object Label87: TLabel
            Left = 47
            Top = 126
            Width = 47
            Height = 13
            Caption = 'Provincia:'
            FocusControl = DBEdit46
          end
          object Label89: TLabel
            Left = 62
            Top = 146
            Width = 32
            Height = 13
            Caption = 'e-mail:'
            FocusControl = DBEdit47
          end
          object Label90: TLabel
            Left = 48
            Top = 166
            Width = 46
            Height = 13
            Caption = 'Tel'#233'fono:'
            FocusControl = DBEdit48
          end
          object Label91: TLabel
            Left = 192
            Top = 166
            Width = 22
            Height = 13
            Caption = 'Fax:'
            FocusControl = DBEdit49
          end
          object Label92: TLabel
            Left = 4
            Top = 186
            Width = 90
            Height = 13
            Caption = 'Persona Contacto:'
            FocusControl = DBEdit50
          end
          object Label178: TLabel
            Left = 6
            Top = 215
            Width = 104
            Height = 13
            Caption = 'CUENTA BANCARIA'
            FocusControl = DBEdit58
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'Tahoma'
            Font.Style = [fsBold, fsUnderline]
            ParentFont = False
          end
          object Label1: TLabel
            Left = 1
            Top = 234
            Width = 40
            Height = 13
            Caption = 'Entidad:'
            FocusControl = DBEdit1
          end
          object imgfotoe: TImage
            Left = 586
            Top = 42
            Width = 205
            Height = 137
            Center = True
            Proportional = True
          end
          object Label325: TLabel
            Left = 588
            Top = 11
            Width = 87
            Height = 13
            Caption = 'Logo del centro'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'Tahoma'
            Font.Style = [fsBold]
            ParentFont = False
          end
          object Label3: TLabel
            Left = 547
            Top = 234
            Width = 17
            Height = 13
            Caption = 'BIC'
            FocusControl = DBEdit62
          end
          object EmpActiva: TDBCheckBox
            Left = 446
            Top = 3
            Width = 48
            Height = 17
            Alignment = taLeftJustify
            Caption = 'Activa'
            DataField = 'activa'
            DataSource = dsqempresas
            TabOrder = 0
            ValueChecked = '1'
            ValueUnchecked = '0'
          end
          object DBEdit40: TDBEdit
            Left = 96
            Top = 3
            Width = 37
            Height = 21
            CharCase = ecUpperCase
            DataField = 'id'
            DataSource = dsqempresas
            Enabled = False
            TabOrder = 1
          end
          object DBEdit41: TDBEdit
            Left = 96
            Top = 23
            Width = 77
            Height = 21
            CharCase = ecUpperCase
            DataField = 'cif'
            DataSource = dsqempresas
            TabOrder = 2
          end
          object DBEdit42: TDBEdit
            Left = 96
            Top = 43
            Width = 400
            Height = 21
            CharCase = ecUpperCase
            DataField = 'nombre'
            DataSource = dsqempresas
            TabOrder = 3
          end
          object DBEdit43: TDBEdit
            Left = 96
            Top = 63
            Width = 400
            Height = 21
            CharCase = ecUpperCase
            DataField = 'direccion'
            DataSource = dsqempresas
            TabOrder = 4
          end
          object DBEdit44: TDBEdit
            Left = 96
            Top = 103
            Width = 134
            Height = 21
            CharCase = ecUpperCase
            DataField = 'codpost'
            DataSource = dsqempresas
            TabOrder = 6
          end
          object DBEdit45: TDBEdit
            Left = 96
            Top = 83
            Width = 400
            Height = 21
            CharCase = ecUpperCase
            DataField = 'poblacion'
            DataSource = dsqempresas
            TabOrder = 5
          end
          object DBEdit46: TDBEdit
            Left = 96
            Top = 123
            Width = 400
            Height = 21
            CharCase = ecUpperCase
            DataField = 'provincia'
            DataSource = dsqempresas
            TabOrder = 7
          end
          object DBEdit47: TDBEdit
            Left = 96
            Top = 143
            Width = 400
            Height = 21
            CharCase = ecUpperCase
            DataField = 'email'
            DataSource = dsqempresas
            TabOrder = 8
          end
          object DBEdit48: TDBEdit
            Left = 96
            Top = 163
            Width = 90
            Height = 21
            CharCase = ecUpperCase
            DataField = 'telefono1'
            DataSource = dsqempresas
            TabOrder = 9
          end
          object DBEdit49: TDBEdit
            Left = 229
            Top = 163
            Width = 123
            Height = 21
            CharCase = ecUpperCase
            DataField = 'telefono2'
            DataSource = dsqempresas
            TabOrder = 10
          end
          object DBEdit50: TDBEdit
            Left = 96
            Top = 183
            Width = 400
            Height = 21
            CharCase = ecUpperCase
            DataField = 'contacto'
            DataSource = dsqempresas
            TabOrder = 11
          end
          object DBEdit58: TDBEdit
            Left = 183
            Top = 251
            Width = 50
            Height = 21
            CharCase = ecUpperCase
            DataField = 'cciban'
            DataSource = dsqempresas
            TabOrder = 13
          end
          object DBEdit59: TDBEdit
            Left = 232
            Top = 251
            Width = 55
            Height = 21
            CharCase = ecUpperCase
            DataField = 'ccentidad'
            DataSource = dsqempresas
            TabOrder = 14
          end
          object DBEdit60: TDBEdit
            Left = 286
            Top = 251
            Width = 85
            Height = 21
            CharCase = ecUpperCase
            DataField = 'ccoficina'
            DataSource = dsqempresas
            TabOrder = 15
          end
          object DBEdit61: TDBEdit
            Left = 370
            Top = 251
            Width = 25
            Height = 21
            CharCase = ecUpperCase
            DataField = 'ccdc'
            DataSource = dsqempresas
            TabOrder = 16
          end
          object DBEdit62: TDBEdit
            Left = 394
            Top = 251
            Width = 150
            Height = 21
            CharCase = ecUpperCase
            DataField = 'cccc'
            DataSource = dsqempresas
            TabOrder = 17
          end
          object DBEdit1: TDBEdit
            Left = 1
            Top = 251
            Width = 183
            Height = 21
            CharCase = ecUpperCase
            DataField = 'banco'
            DataSource = dsqempresas
            TabOrder = 12
          end
          object Button40: TButton
            Left = 721
            Top = 8
            Width = 32
            Height = 28
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'Tahoma'
            Font.Style = [fsBold]
            ImageAlignment = iaCenter
            ImageIndex = 0
            Images = MENU.ImageList1
            ParentFont = False
            TabOrder = 19
            OnClick = Button40Click
          end
          object Button41: TButton
            Left = 759
            Top = 8
            Width = 32
            Height = 28
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'Tahoma'
            Font.Style = [fsBold]
            ImageAlignment = iaCenter
            ImageIndex = 1
            Images = MENU.ImageList1
            ParentFont = False
            TabOrder = 20
          end
          object DBEdit2: TDBEdit
            Left = 543
            Top = 251
            Width = 150
            Height = 21
            CharCase = ecUpperCase
            DataField = 'ccbic'
            DataSource = dsqempresas
            TabOrder = 18
          end
        end
      end
      object TabSheet37: TTabSheet
        Caption = 'Series Num'#233'ricas'
        ImageIndex = 3
        object Panel116: TPanel
          Left = 0
          Top = 40
          Width = 902
          Height = 449
          Align = alClient
          TabOrder = 0
          object DBGrid56: TDBGrid
            Left = 1
            Top = 1
            Width = 900
            Height = 447
            Align = alClient
            DataSource = dsqseries
            TabOrder = 0
            TitleFont.Charset = DEFAULT_CHARSET
            TitleFont.Color = clWindowText
            TitleFont.Height = -11
            TitleFont.Name = 'Tahoma'
            TitleFont.Style = []
            OnCellClick = DBGrid56CellClick
            OnColExit = DBGrid56ColExit
            OnDrawColumnCell = DBGrid56DrawColumnCell
            Columns = <
              item
                Expanded = False
                FieldName = 'id'
                Title.Caption = 'Serie'
                Width = 57
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'descripcion'
                Title.Caption = 'Descripci'#243'n'
                Width = 188
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'fechainicio'
                Title.Caption = 'F.Inicio'
                Width = 52
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'fechafin'
                Title.Caption = 'F. Fin'
                Width = 53
                Visible = True
              end
              item
                Alignment = taCenter
                Expanded = False
                FieldName = 'num_presupuesto'
                Title.Caption = 'Sig. Presup.'
                Visible = True
              end
              item
                Alignment = taCenter
                Expanded = False
                FieldName = 'num_albaran'
                Title.Alignment = taCenter
                Title.Caption = 'Sig. Alba.'
                Width = 52
                Visible = True
              end
              item
                Alignment = taCenter
                Expanded = False
                FieldName = 'num_factura'
                Title.Alignment = taCenter
                Title.Caption = 'Sig. Fact.'
                Width = 54
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'plantillapresupuesto'
                Title.Caption = 'Doc. Presupuesto'
                Width = 94
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'plantillaalbaran'
                Title.Caption = 'Doc.Albaran'
                Width = 79
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'plantillafactura'
                Title.Caption = 'Doc.Factura'
                Width = 89
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'defecto'
                Title.Caption = 'Por defecto'
                Visible = True
              end>
          end
        end
        object Panel171: TPanel
          Left = 0
          Top = 0
          Width = 902
          Height = 40
          Align = alTop
          TabOrder = 1
          object Label195: TLabel
            AlignWithMargins = True
            Left = 279
            Top = 4
            Width = 619
            Height = 32
            Align = alClient
            Alignment = taCenter
            Caption = 'SERIES NUM'#201'RICAS'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -13
            Font.Name = 'Arial Black'
            Font.Style = [fsBold, fsItalic]
            ParentFont = False
            ExplicitWidth = 142
            ExplicitHeight = 18
          end
          object BTSNCANCELAR: TButton
            Left = 221
            Top = 1
            Width = 55
            Height = 38
            Align = alLeft
            Caption = 'Cancelar'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'Tahoma'
            Font.Style = [fsBold]
            ImageAlignment = iaBottom
            ImageIndex = 4
            Images = MENU.ImageList1
            ParentFont = False
            TabOrder = 0
            OnClick = BTSNCANCELARClick
          end
          object BTSNMODIFICAR: TButton
            Left = 111
            Top = 1
            Width = 55
            Height = 38
            Align = alLeft
            Caption = 'Editar'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'Tahoma'
            Font.Style = [fsBold]
            ImageAlignment = iaBottom
            ImageIndex = 2
            Images = MENU.ImageList1
            ParentFont = False
            TabOrder = 2
            OnClick = BTSNMODIFICARClick
          end
          object BTSNBORRAR: TButton
            Left = 56
            Top = 1
            Width = 55
            Height = 38
            Align = alLeft
            Caption = 'Borrar'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'Tahoma'
            Font.Style = [fsBold]
            ImageAlignment = iaBottom
            ImageIndex = 1
            Images = MENU.ImageList1
            ParentFont = False
            TabOrder = 3
            OnClick = BTSNBORRARClick
          end
          object btSNnuevo: TButton
            Left = 1
            Top = 1
            Width = 55
            Height = 38
            Align = alLeft
            Caption = 'Nuevo'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'Tahoma'
            Font.Style = [fsBold]
            ImageAlignment = iaBottom
            ImageIndex = 0
            Images = MENU.ImageList1
            ParentFont = False
            TabOrder = 4
            OnClick = btSNnuevoClick
          end
          object btSNguardar: TButton
            Left = 166
            Top = 1
            Width = 55
            Height = 38
            Align = alLeft
            Caption = 'Guardar'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'Tahoma'
            Font.Style = [fsBold]
            ImageAlignment = iaBottom
            ImageIndex = 3
            Images = MENU.ImageList1
            ParentFont = False
            TabOrder = 1
            OnClick = btSNguardarClick
          end
        end
      end
      object TabSheet1: TTabSheet
        Caption = 'Formas de pago'
        ImageIndex = 2
        object Panel3: TPanel
          Left = 0
          Top = 0
          Width = 902
          Height = 40
          Align = alTop
          TabOrder = 0
          object Label2: TLabel
            AlignWithMargins = True
            Left = 279
            Top = 4
            Width = 619
            Height = 32
            Align = alClient
            Alignment = taCenter
            Caption = 'FORMAS DE PAGO'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -13
            Font.Name = 'Arial Black'
            Font.Style = [fsBold, fsItalic]
            ParentFont = False
            ExplicitWidth = 128
            ExplicitHeight = 18
          end
          object btfpcancelar: TButton
            Left = 221
            Top = 1
            Width = 55
            Height = 38
            Align = alLeft
            Caption = 'Cancelar'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'Tahoma'
            Font.Style = [fsBold]
            ImageAlignment = iaBottom
            ImageIndex = 4
            Images = MENU.ImageList1
            ParentFont = False
            TabOrder = 0
            OnClick = btfpcancelarClick
          end
          object btfpmodificar: TButton
            Left = 111
            Top = 1
            Width = 55
            Height = 38
            Align = alLeft
            Caption = 'Editar'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'Tahoma'
            Font.Style = [fsBold]
            ImageAlignment = iaBottom
            ImageIndex = 2
            Images = MENU.ImageList1
            ParentFont = False
            TabOrder = 2
            OnClick = btfpmodificarClick
          end
          object btfpborrar: TButton
            Left = 56
            Top = 1
            Width = 55
            Height = 38
            Align = alLeft
            Caption = 'Borrar'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'Tahoma'
            Font.Style = [fsBold]
            ImageAlignment = iaBottom
            ImageIndex = 1
            Images = MENU.ImageList1
            ParentFont = False
            TabOrder = 3
            OnClick = btfpborrarClick
          end
          object btfpnuevo: TButton
            Left = 1
            Top = 1
            Width = 55
            Height = 38
            Align = alLeft
            Caption = 'Nuevo'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'Tahoma'
            Font.Style = [fsBold]
            ImageAlignment = iaBottom
            ImageIndex = 0
            Images = MENU.ImageList1
            ParentFont = False
            TabOrder = 4
            OnClick = btfpnuevoClick
          end
          object btfpguardar: TButton
            Left = 166
            Top = 1
            Width = 55
            Height = 38
            Align = alLeft
            Caption = 'Guardar'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'Tahoma'
            Font.Style = [fsBold]
            ImageAlignment = iaBottom
            ImageIndex = 3
            Images = MENU.ImageList1
            ParentFont = False
            TabOrder = 1
            OnClick = btfpguardarClick
          end
        end
        object Panel4: TPanel
          Left = 0
          Top = 40
          Width = 902
          Height = 449
          Align = alClient
          TabOrder = 1
          object DBGrid2: TDBGrid
            Left = 1
            Top = 1
            Width = 900
            Height = 447
            Align = alClient
            DataSource = dsqformaspago
            TabOrder = 0
            TitleFont.Charset = DEFAULT_CHARSET
            TitleFont.Color = clWindowText
            TitleFont.Height = -11
            TitleFont.Name = 'Tahoma'
            TitleFont.Style = []
            OnCellClick = DBGrid2CellClick
            OnDrawColumnCell = DBGrid2DrawColumnCell
            Columns = <
              item
                Expanded = False
                FieldName = 'id'
                Title.Caption = 'Id'
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'ide'
                Title.Caption = 'Centro'
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'ids'
                Title.Caption = 'Serie'
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'descripcion'
                Title.Caption = 'Descripci'#243'n'
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'activo'
                Title.Caption = 'Activo'
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'domiciliado'
                Title.Caption = 'Domiciliaci'#243'n'
                Visible = True
              end>
          end
          object combocentro: TDBLookupComboBox
            Left = 550
            Top = 138
            Width = 267
            Height = 21
            DataField = 'ide'
            DataSource = dsqformaspago
            DropDownRows = 20
            DropDownWidth = 200
            KeyField = 'id'
            ListField = 'id;nombre'
            ListSource = dsqempresas
            TabOrder = 1
            Visible = False
          end
          object comboserie: TDBLookupComboBox
            Left = 550
            Top = 165
            Width = 267
            Height = 21
            DataField = 'ids'
            DataSource = dsqformaspago
            DropDownRows = 20
            DropDownWidth = 200
            KeyField = 'id'
            ListField = 'id;descripcion'
            ListSource = dsqseries
            TabOrder = 2
            Visible = False
          end
        end
      end
    end
  end
  object gcrcheck: TDBCheckBox
    Left = 983
    Top = 8
    Width = 97
    Height = 17
    Caption = 'gcrcheck'
    TabOrder = 3
    Visible = False
  end
  object qempresas: TZQuery
    Connection = DM.dbjolly
    BeforePost = qempresasBeforePost
    BeforeDelete = qempresasBeforeDelete
    SQL.Strings = (
      'select * from empresa order by nombre')
    Params = <>
    Left = 152
    Top = 72
    object qempresasid: TIntegerField
      FieldName = 'id'
      Required = True
    end
    object qempresascif: TWideStringField
      FieldName = 'cif'
      Required = True
      Size = 18
    end
    object qempresasnombre: TWideStringField
      FieldName = 'nombre'
      Required = True
      Size = 120
    end
    object qempresasdireccion: TWideStringField
      FieldName = 'direccion'
      Required = True
      Size = 80
    end
    object qempresascodpost: TWideStringField
      FieldName = 'codpost'
      Required = True
      Size = 10
    end
    object qempresaspoblacion: TWideStringField
      FieldName = 'poblacion'
      Required = True
      Size = 80
    end
    object qempresasprovincia: TWideStringField
      FieldName = 'provincia'
      Required = True
      Size = 80
    end
    object qempresasemail: TWideStringField
      FieldName = 'email'
      Size = 500
    end
    object qempresastelefono1: TWideStringField
      FieldName = 'telefono1'
      Size = 24
    end
    object qempresastelefono2: TWideStringField
      FieldName = 'telefono2'
      Size = 24
    end
    object qempresascontacto: TWideStringField
      FieldName = 'contacto'
      Size = 100
    end
    object qempresasbanco: TWideStringField
      FieldName = 'banco'
      Size = 100
    end
    object qempresasactiva: TIntegerField
      FieldName = 'activa'
      Required = True
    end
    object qempresastipo_iva: TFloatField
      FieldName = 'tipo_iva'
    end
    object qempresaslogo: TBlobField
      FieldName = 'logo'
    end
    object qempresascciban: TWideStringField
      FieldName = 'cciban'
      Size = 8
    end
    object qempresasccentidad: TWideStringField
      FieldName = 'ccentidad'
      Size = 8
    end
    object qempresasccoficina: TWideStringField
      FieldName = 'ccoficina'
      Size = 8
    end
    object qempresasccdc: TWideStringField
      FieldName = 'ccdc'
      Size = 4
    end
    object qempresascccc: TWideStringField
      FieldName = 'cccc'
    end
    object qempresasccbic: TWideStringField
      FieldName = 'ccbic'
      Size = 22
    end
  end
  object dsqempresas: TDataSource
    DataSet = qempresas
    OnStateChange = dsqempresasStateChange
    OnDataChange = dsqempresasDataChange
    Left = 96
    Top = 72
  end
  object dsqseries: TDataSource
    DataSet = qseries
    OnStateChange = dsqseriesStateChange
    Left = 96
    Top = 168
  end
  object qseries: TZQuery
    Connection = DM.dbjolly
    BeforePost = qseriesBeforePost
    AfterPost = qseriesAfterPost
    AfterCancel = qseriesAfterCancel
    BeforeDelete = qseriesBeforeDelete
    SQL.Strings = (
      'select * from series order by descripcion')
    Params = <>
    MasterFields = 'id'
    MasterSource = dsqempresas
    LinkedFields = 'ide'
    Left = 152
    Top = 168
    object qseriesid: TWideStringField
      FieldName = 'id'
      Required = True
    end
    object qserieside: TIntegerField
      FieldName = 'ide'
      Required = True
    end
    object qseriesdescripcion: TWideStringField
      FieldName = 'descripcion'
      Required = True
      Size = 50
    end
    object qseriesnum_presupuesto: TIntegerField
      FieldName = 'num_presupuesto'
      Required = True
    end
    object qseriesnum_albaran: TIntegerField
      FieldName = 'num_albaran'
      Required = True
    end
    object qseriesnum_factura: TIntegerField
      FieldName = 'num_factura'
      Required = True
    end
    object qseriesdefecto: TIntegerField
      FieldName = 'defecto'
      Required = True
    end
    object qseriesfechainicio: TDateField
      FieldName = 'fechainicio'
      Required = True
      DisplayFormat = 'dd/mm/yy'
      EditMask = '!99/99/00;1;_'
    end
    object qseriesfechafin: TDateField
      FieldName = 'fechafin'
      Required = True
      DisplayFormat = 'dd/mm/yy'
      EditMask = '!99/99/00;1;_'
    end
    object qseriesplantillaalbaran: TWideStringField
      FieldName = 'plantillaalbaran'
      Size = 100
    end
    object qseriesplantillapresupuesto: TWideStringField
      FieldName = 'plantillapresupuesto'
      Size = 100
    end
    object qseriesplantillafactura: TWideStringField
      FieldName = 'plantillafactura'
      Size = 100
    end
  end
  object qaux: TZQuery
    Connection = DM.dbjolly
    Params = <>
    Left = 128
    Top = 232
  end
  object dsqformaspago: TDataSource
    DataSet = qformas_pago
    OnStateChange = dsqformaspagoStateChange
    Left = 88
    Top = 296
  end
  object qformas_pago: TZQuery
    Connection = DM.dbjolly
    BeforePost = qformas_pagoBeforePost
    AfterPost = qseriesAfterPost
    AfterCancel = qformas_pagoAfterCancel
    BeforeDelete = qformas_pagoBeforeDelete
    SQL.Strings = (
      'select * from formas_pago order by descripcion')
    Params = <>
    MasterFields = 'id'
    MasterSource = dsqempresas
    LinkedFields = 'ide'
    Left = 144
    Top = 296
    object qformas_pagoid: TIntegerField
      FieldName = 'id'
      Required = True
    end
    object qformas_pagoide: TIntegerField
      FieldName = 'ide'
      Required = True
    end
    object qformas_pagoids: TWideStringField
      FieldName = 'ids'
      Required = True
    end
    object qformas_pagodescripcion: TWideStringField
      FieldName = 'descripcion'
      Required = True
      Size = 50
    end
    object qformas_pagoactivo: TIntegerField
      FieldName = 'activo'
      Required = True
    end
    object qformas_pagodomiciliado: TIntegerField
      FieldName = 'domiciliado'
      Required = True
    end
  end
  object OpenPictureDialog1: TOpenPictureDialog
    Left = 56
    Top = 48
  end
end