inherited frmCadUsuario: TfrmCadUsuario
  Left = 248
  Top = 31
  Caption = 'frmCadUsuario'
  ClientHeight = 587
  OldCreateOrder = True
  ExplicitTop = -158
  ExplicitHeight = 616
  PixelsPerInch = 96
  TextHeight = 16
  inherited Paginas: TPageControl
    Height = 549
    ExplicitHeight = 549
    inherited Acesso: TTabSheet
      ExplicitLeft = 4
      ExplicitTop = 6
      ExplicitWidth = 622
      ExplicitHeight = 539
      inherited Panel2: TPanel
        Height = 502
        ExplicitHeight = 502
      end
      inherited Panel3: TPanel
        Top = 502
        ExplicitTop = 502
      end
      inherited pnGrade: TPanel
        Height = 502
        ExplicitHeight = 502
        inherited grdPesquisa: TIB_Grid
          Height = 486
          ExplicitHeight = 486
        end
      end
    end
    inherited Manutencao: TTabSheet
      ExplicitLeft = 4
      ExplicitTop = 6
      ExplicitWidth = 622
      ExplicitHeight = 539
      object Label4: TLabel [0]
        Left = 431
        Top = 1
        Width = 56
        Height = 16
        Alignment = taRightJustify
        Caption = 'Status :'
        Layout = tlCenter
      end
      inherited Panel6: TPanel
        Top = 503
        TabOrder = 10
        ExplicitTop = 503
        object btnAcesso: TBitBtn [2]
          Left = 306
          Top = 3
          Width = 88
          Height = 30
          Cursor = crHandPoint
          Caption = '&Acessos'
          Glyph.Data = {
            36060000424D3606000000000000360000002800000020000000100000000100
            18000000000000060000120B0000120B00000000000000000000FF00FFFF00FF
            FF00FFFF00FFFF00FFFF00FFC2652BA53C00A53C00A53C00A53C00A53C00A53C
            00A53C00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF89898969
            69696969696969696969696969696A6A6A696969FF00FFFF00FFFF00FFFF00FF
            A22E08A22E08A22E08A22E08C2652BFFD4A5FFD4A5FFD4A5FFCD97FFC07DFFAD
            55A53C00FF00FFFF00FFFF00FFFF00FF606060606060606060606060898989DC
            DCDCDCDCDCDCDCDCD7D7D7CCCCCCBEBEBE6A6A6AFF00FFFF00FFFF00FFFF00FF
            A22E08FF00FFFF00FFFF00FFC2652BC2652BC2652BC2652BC2652BC2652BC265
            2BC2652BFF00FFFF00FFFF00FFFF00FF606060FF00FFFF00FFFF00FF89898989
            8989898989898989898989898989898989898989FF00FFFF00FFFF00FFFF00FF
            A22E08FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
            FFFF00FFFF00FFFF00FFFF00FFFF00FF606060FF00FFFF00FFFF00FFFF00FFFF
            00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
            A22E08FF00FFFF00FFFF00FF1C1C1C986060986060A53C00A53C00A53C00A53C
            00A53C00FF00FFFF00FFFF00FFFF00FF616161FF00FFFF00FFFF00FF41414188
            8888888888696969696969696969696969696969FF00FFFF00FFFF00FFFF00FF
            A22E08A22E08A22E08A22E08C89898FCFAF80098C81C1C1CFFCD97FFC07DFFAD
            55A53C00FF00FFFF00FFFF00FFFF00FF606060606060606060606060B5B5B5FC
            FCFCB9B9B9414141D7D7D7CCCCCCBEBEBE696969FF00FFFF00FFFF00FFFF00FF
            A22E08FF00FFFF00FFFF00FFC898980098C84ABEDF0098C81C1C1CC2652BC265
            2BC2652BFF00FFFF00FFFF00FFFF00FF606060FF00FFFF00FFFF00FFB5B5B5B9
            B9B9D3D3D3B9B9B9414141898989898989898989FF00FFFF00FFFF00FFFF00FF
            A22E08FF00FFFF00FFFF00FFFF00FF0098C894E4F64ABEDF0098C81C1C1CFF00
            FFFF00FFFF00FFFF00FFFF00FFFF00FF606060FF00FFFF00FFFF00FFFF00FFB9
            B9B9EDEDEDD3D3D3B9B9B9414141FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
            A22E08FF00FFFF00FFFF00FFC2652BA53C000098C894E4F64ABEDF0098C81C1C
            1CA53C00FF00FFFF00FFFF00FFFF00FF606060FF00FFFF00FFFF00FF89898969
            6969B9B9B9EDEDEDD3D3D3B9B9B94040406A6A6AFF00FFFF00FFFF00FFFF00FF
            A22E08A22E08A22E08A22E08C2652BFFD4A5FFD4A50098C894E4F64ABEDF0098
            C81C1C1CFF00FFFF00FFFF00FFFF00FF606060606060606060606060898989DC
            DCDCDCDCDCB9B9B9EDEDEDD3D3D3BABABA414141FF00FFFF00FFFF00FFFF00FF
            A22E08FF00FFFF00FFFF00FFC2652BC2652BC2652BC2652B0098C894E4F64ABE
            DF80808000009AFF00FFFF00FFFF00FF606060FF00FFFF00FFFF00FF89898989
            8989898989898989BABABAEDEDEDD3D3D3A0A0A0727272FF00FFFF00FFFF00FF
            A22E08FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF0098C8D2BA
            AC778C9800009A00009AFF00FFFF00FF606060FF00FFFF00FFFF00FFFF00FFFF
            00FFFF00FFFF00FFFF00FFB9B9B9CCCCCCABABAB727272727272C2652BA22E08
            A22E08A22E08A22E08A22E08A22E08A22E16FF00FFFF00FFFF00FFFF00FF0030
            F86D8AFD0030F800009A89898960606060606060606060606060606060606061
            6161FF00FFFF00FFFF00FFFF00FFA2A2A2C2C2C2A3A3A3727272C2652BFFD4A5
            FFD4A5FFD4A5FFCD97FFC07DFFAD55A22E08FF00FFFF00FFFF00FFFF00FFFF00
            FF0030F80030F8FF00FF898989DCDCDCDCDCDCDCDCDCD7D7D7CCCCCCBEBEBE60
            6060FF00FFFF00FFFF00FFFF00FFFF00FFA2A2A2A3A3A3FF00FFC2652BC2652B
            C2652BC2652BC2652BC2652BC2652BC2652BFF00FFFF00FFFF00FFFF00FFFF00
            FFFF00FFFF00FFFF00FF89898989898989898989898989898989898989898989
            8989FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
            FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
            FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
            00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
          NumGlyphs = 2
          TabOrder = 4
          OnClick = btnAcessoClick
        end
        inherited btnBtInserir2: TBitBtn
          TabOrder = 5
        end
      end
      object edtSkype: TIB_Edit
        Left = 335
        Top = 104
        Width = 273
        Height = 24
        Hint = 'Skype'
        AutoLabel.Caption = 'Skype'
        AutoLabel.Kind = albTop
        AutoLabel.Margin = 0
        DataField = 'SKYPE'
        DataSource = DsPrincipal
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        ParentBackground = False
        TabOrder = 2
      end
      object edtDataCad: TIB_Edit
        Left = 122
        Top = 15
        Width = 119
        Height = 24
        Hint = 'Data de cadastro '
        TabStop = False
        AutoLabel.Caption = 'Data Cadastro'
        AutoLabel.Kind = albTop
        AutoLabel.Margin = 0
        DataField = 'DATA_CADASTRO'
        DataSource = DsPrincipal
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        ParentBackground = False
        ReadOnly = True
        TabOrder = 8
      end
      object edtNome: TIB_Edit
        Left = 4
        Top = 63
        Width = 605
        Height = 24
        Hint = 'Nome do usu'#225'rio'
        AutoLabel.Caption = 'Nome'
        AutoLabel.Kind = albTop
        AutoLabel.Margin = 0
        DataField = 'NOME'
        DataSource = DsPrincipal
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        ParentBackground = False
        TabOrder = 0
      end
      object edtEmail: TIB_Edit
        Left = 4
        Top = 104
        Width = 320
        Height = 24
        Hint = 'E-Mail'
        AutoLabel.Caption = 'E-mail'
        AutoLabel.Kind = albTop
        AutoLabel.Margin = 0
        DataField = 'EMAIL'
        DataSource = DsPrincipal
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        ParentBackground = False
        TabOrder = 1
      end
      object edtSetor: TIB_LookupCombo
        Tag = 1
        Left = 4
        Top = 145
        Width = 320
        Height = 24
        Hint = 'Setor de atua'#231#227'o'
        AutoLabel.Caption = 'Setor'
        AutoLabel.Kind = albTop
        AutoLabel.Margin = 0
        DataSource = dstSetor
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
        PopupMenu = popSetor
        ParentBackground = False
        TabOrder = 3
        OnExit = edtSetorExit
        OnKeyDown = edtSetorKeyDown
        DisplayField = 'DESCRICAO'
        DropDownWidth = 305
        IndicateTitles = True
        ShowButton = True
      end
      object edtDataSaida: TIB_Date
        Left = 247
        Top = 15
        Width = 129
        Height = 24
        TabStop = False
        AutoLabel.Caption = 'Data Sa'#237'da'
        AutoLabel.Kind = albTop
        AutoLabel.Margin = 0
        DataField = 'DATA_SAIDA'
        DataSource = DsPrincipal
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
        ParentBackground = False
        TabOrder = 9
        IncCellHeight = 1
        IncCellWidth = 2
        DrawYearArrow = False
      end
      object GroupBox1: TGroupBox
        Left = 4
        Top = 232
        Width = 614
        Height = 161
        Caption = 'Endere'#231'o'
        Color = 15066597
        ParentColor = False
        TabOrder = 6
        object edtCep: TIB_Edit
          Tag = 1
          Left = 5
          Top = 32
          Width = 89
          Height = 24
          Hint = 'Cep'
          AutoLabel.Caption = 'Cep'
          AutoLabel.Kind = albTop
          AutoLabel.Margin = 0
          DataField = 'CEP'
          DataSource = DsPrincipal
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Verdana'
          Font.Style = []
          ParentFont = False
          ParentShowHint = False
          PopupMenu = popPesquisaCep
          ShowHint = True
          ParentBackground = False
          TabOrder = 0
          OnExit = edtCepExit
          OnKeyDown = edtCepKeyDown
        end
        object edtComplemento: TIB_Edit
          Left = 5
          Top = 76
          Width = 202
          Height = 24
          Hint = 'Complemento'
          AutoLabel.Caption = 'Complemento'
          AutoLabel.Kind = albTop
          AutoLabel.Margin = 0
          DataField = 'COMPLEMENTO'
          DataSource = DsPrincipal
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Verdana'
          Font.Style = []
          ParentFont = False
          ParentShowHint = False
          ShowHint = True
          ParentBackground = False
          TabOrder = 3
        end
        object edtCidade: TIB_Edit
          Left = 5
          Top = 121
          Width = 500
          Height = 24
          Hint = 'Cidade'
          AutoLabel.Caption = 'Cidade'
          AutoLabel.Kind = albTop
          AutoLabel.Margin = 0
          DataField = 'CIDADE'
          DataSource = DsPrincipal
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Verdana'
          Font.Style = []
          ParentFont = False
          ParentShowHint = False
          ShowHint = True
          ParentBackground = False
          TabOrder = 5
        end
        object edtBairro: TIB_Edit
          Left = 215
          Top = 76
          Width = 374
          Height = 24
          Hint = 'Bairro'
          AutoLabel.Caption = 'Bairro'
          AutoLabel.Kind = albTop
          AutoLabel.Margin = 0
          DataField = 'BAIRRO'
          DataSource = DsPrincipal
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Verdana'
          Font.Style = []
          ParentFont = False
          ParentShowHint = False
          ShowHint = True
          ParentBackground = False
          TabOrder = 4
        end
        object edtEndereco: TIB_Edit
          Left = 103
          Top = 33
          Width = 391
          Height = 24
          Hint = 'Endere'#231'o'
          AutoLabel.Caption = 'Endere'#231'o'
          AutoLabel.Kind = albTop
          AutoLabel.Margin = 0
          DataField = 'LOGRADOURO'
          DataSource = DsPrincipal
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Verdana'
          Font.Style = []
          ParentFont = False
          ParentShowHint = False
          ShowHint = True
          ParentBackground = False
          TabOrder = 1
        end
        object edtNumero: TIB_Edit
          Left = 501
          Top = 33
          Width = 91
          Height = 24
          Hint = 'N'#250'mero'
          AutoLabel.Caption = 'N'#250'mero'
          AutoLabel.Kind = albTop
          AutoLabel.Margin = 0
          DataField = 'NUMERO'
          DataSource = DsPrincipal
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Verdana'
          Font.Style = []
          ParentFont = False
          ParentShowHint = False
          ShowHint = True
          ParentBackground = False
          TabOrder = 2
        end
        object edtUF: TIB_LookupCombo
          Left = 512
          Top = 122
          Width = 64
          Height = 21
          AutoLabel.Caption = 'UF'
          AutoLabel.Kind = albTop
          DataSource = dsrUF
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Verdana'
          Font.Style = []
          ParentFont = False
          ParentBackground = False
          TabOrder = 6
          DisplayField = 'DESCRICAO'
          ShowButton = True
        end
      end
      object GroupBox2: TGroupBox
        Left = 4
        Top = 3
        Width = 112
        Height = 41
        Caption = 'C'#211'DIGO'
        TabOrder = 11
        object dbCodigo: TIB_Text
          Left = 4
          Top = 16
          Width = 85
          Height = 16
          DataField = 'COD_USUARIO'
          DataSource = DsPrincipal
          BiDiMode = bdLeftToRight
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Verdana'
          Font.Style = []
          ParentBiDiMode = False
          ParentFont = False
        end
      end
      object ComboStatus: TComboBox
        Left = 382
        Top = 16
        Width = 112
        Height = 24
        Style = csDropDownList
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
        TabOrder = 12
        Items.Strings = (
          'Ativo'
          'Inativo')
      end
      object GroupBox3: TGroupBox
        Left = 4
        Top = 396
        Width = 614
        Height = 107
        Color = 16705487
        ParentColor = False
        TabOrder = 7
        object Label3: TLabel
          Left = 448
          Top = 10
          Width = 109
          Height = 16
          Caption = 'Confime Senha'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Verdana'
          Font.Style = [fsBold]
          ParentFont = False
          ParentShowHint = False
          ShowHint = True
        end
        object edtApelido: TIB_Edit
          Left = 9
          Top = 26
          Width = 273
          Height = 24
          Hint = 'Nome usado para entrar no sistema'
          AutoLabel.Caption = 'Login'
          AutoLabel.Kind = albTop
          AutoLabel.Margin = 0
          DataField = 'LOGIN'
          DataSource = DsPrincipal
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Verdana'
          Font.Style = []
          ParentFont = False
          ParentShowHint = False
          ShowHint = True
          ParentBackground = False
          TabOrder = 0
        end
        object edtSenha: TIB_Edit
          Left = 295
          Top = 26
          Width = 139
          Height = 24
          Hint = 'Senha de acesso ao sistema'
          AutoLabel.Caption = 'Senha'
          AutoLabel.Kind = albTop
          AutoLabel.Margin = 0
          DataField = 'SENHA'
          DataSource = DsPrincipal
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Verdana'
          Font.Style = []
          ParentFont = False
          ParentShowHint = False
          ShowHint = True
          ParentBackground = False
          TabOrder = 1
          PasswordChar = '*'
        end
        object edtConfirmeSenha: TEdit
          Left = 448
          Top = 26
          Width = 139
          Height = 24
          Hint = 'Confirma'#231#227'o da senha de acesso ao sistema'
          CharCase = ecUpperCase
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Verdana'
          Font.Style = []
          ParentFont = False
          ParentShowHint = False
          PasswordChar = '*'
          ShowHint = True
          TabOrder = 2
        end
        object edtPerfil: TIB_LookupCombo
          Left = 9
          Top = 71
          Width = 334
          Height = 23
          AutoLabel.Caption = 'Perfil de acesso'
          AutoLabel.Kind = albTop
          AutoLabel.Margin = 0
          DataSource = dsrPerfil
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Verdana'
          Font.Style = []
          ParentFont = False
          ParentBackground = False
          TabOrder = 3
          DisplayField = 'NOME'
          ShowButton = True
        end
        object btnPsquisaClienteOrigem: TBitBtn
          Tag = 2
          Left = 351
          Top = 72
          Width = 23
          Height = 22
          Hint = 'Pesquisar Cliente'
          Glyph.Data = {
            36050000424D3605000000000000360400002800000010000000100000000100
            08000000000000010000320B0000320B000000010000000100005A6B7300AD7B
            73004A637B00EFBD8400B58C8C00A5948C00C6948C00B59C8C00BD9C8C00F7BD
            8C00BD949400C6949400CE949400C69C9400CEAD9400F7CE9400C6A59C00CEA5
            9C00D6A59C00C6AD9C00CEAD9C00D6AD9C00F7CE9C00F7D69C004A7BA500CEAD
            A500D6B5A500DEBDA500F7D6A500DEBDAD00DEC6AD00E7C6AD00FFDEAD00FFE7
            AD00CEB5B500F7DEB500F7E7B500FFE7B500FFEFB500D6BDBD00DED6BD00E7DE
            BD00FFE7BD006B9CC600EFDEC600FFEFC600FFF7C600F7E7CE00FFF7CE00F7EF
            D600F7F7D600FFF7D600FFFFD6002184DE00F7F7DE00FFFFDE001884E700188C
            E700FFFFE700188CEF00218CEF00B5D6EF00F7F7EF00FFF7EF00FFFFEF00FFFF
            F700FF00FF004AB5FF0052B5FF0052BDFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0042020A424242
            424242424242424242422B39180B42424242424242424242424243443C180B42
            4242424242424242424242444438180B42424242424242424242424244433918
            0A424242424242424242424242444335004201101A114242424242424242453D
            05072F343434291942424242424242221A2D34343437403E0442424242424206
            231C303437404146284242424242421B210F30373A414140310D42424242421F
            20032434373A3A37321342424242421D25030F2D37373737311042424242420D
            2D2D1C162430333429424242424242421E463F0F0316252E0842424242424242
            4227312D21252314424242424242424242420E141B1B42424242}
          ParentShowHint = False
          ShowHint = True
          TabOrder = 4
          TabStop = False
          OnClick = btnPsquisaClienteOrigemClick
        end
        object ckUserExpired: TCheckBox
          Left = 386
          Top = 61
          Width = 176
          Height = 17
          Caption = 'A senha expira em '
          Checked = True
          State = cbChecked
          TabOrder = 5
          Visible = False
        end
        object SpinExpira: TSpinEdit
          Left = 548
          Top = 58
          Width = 44
          Height = 22
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'Verdana'
          Font.Style = [fsBold]
          MaxValue = 100
          MinValue = 1
          ParentFont = False
          TabOrder = 6
          Value = 10
          Visible = False
        end
        object ckPrivilegiado: TCheckBox
          Left = 385
          Top = 79
          Width = 174
          Height = 17
          Caption = 'Usu'#225'rio privilegiado'
          TabOrder = 7
          Visible = False
        end
      end
      object BitBtn1: TBitBtn
        Tag = 2
        Left = 327
        Top = 147
        Width = 23
        Height = 22
        Hint = 'Pesquisar Cliente'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Verdana'
        Font.Style = []
        Glyph.Data = {
          36050000424D3605000000000000360400002800000010000000100000000100
          08000000000000010000320B0000320B000000010000000100005A6B7300AD7B
          73004A637B00EFBD8400B58C8C00A5948C00C6948C00B59C8C00BD9C8C00F7BD
          8C00BD949400C6949400CE949400C69C9400CEAD9400F7CE9400C6A59C00CEA5
          9C00D6A59C00C6AD9C00CEAD9C00D6AD9C00F7CE9C00F7D69C004A7BA500CEAD
          A500D6B5A500DEBDA500F7D6A500DEBDAD00DEC6AD00E7C6AD00FFDEAD00FFE7
          AD00CEB5B500F7DEB500F7E7B500FFE7B500FFEFB500D6BDBD00DED6BD00E7DE
          BD00FFE7BD006B9CC600EFDEC600FFEFC600FFF7C600F7E7CE00FFF7CE00F7EF
          D600F7F7D600FFF7D600FFFFD6002184DE00F7F7DE00FFFFDE001884E700188C
          E700FFFFE700188CEF00218CEF00B5D6EF00F7F7EF00FFF7EF00FFFFEF00FFFF
          F700FF00FF004AB5FF0052B5FF0052BDFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0042020A424242
          424242424242424242422B39180B42424242424242424242424243443C180B42
          4242424242424242424242444438180B42424242424242424242424244433918
          0A424242424242424242424242444335004201101A114242424242424242453D
          05072F343434291942424242424242221A2D34343437403E0442424242424206
          231C303437404146284242424242421B210F30373A414140310D42424242421F
          20032434373A3A37321342424242421D25030F2D37373737311042424242420D
          2D2D1C162430333429424242424242421E463F0F0316252E0842424242424242
          4227312D21252314424242424242424242420E141B1B42424242}
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 13
        TabStop = False
        OnClick = BitBtn1Click
      end
      object edtcpf: TIB_Edit
        Left = 5
        Top = 187
        Width = 149
        Height = 24
        AutoLabel.Caption = 'CPF'
        AutoLabel.Kind = albTop
        DataField = 'CPF'
        DataSource = DsPrincipal
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
        ParentBackground = False
        TabOrder = 4
      end
      object IB_Edit4: TIB_Edit
        Left = 164
        Top = 187
        Width = 149
        Height = 24
        AutoLabel.Caption = 'RG'
        AutoLabel.Kind = albTop
        DataField = 'RG'
        DataSource = DsPrincipal
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
        ParentBackground = False
        TabOrder = 5
      end
      object dbAcesso: TIB_ComboBox
        Left = 500
        Top = 15
        Width = 96
        Height = 22
        AutoLabel.Caption = 'Acesso'
        AutoLabel.Kind = albTop
        DataField = 'ACESSO'
        DataSource = DsPrincipal
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
        ParentBackground = False
        TabOrder = 14
        TabStop = False
        Style = csOwnerDrawFixed
        Items.Strings = (
          '0'
          '1'
          '2'
          '3'
          '4'
          '5'
          '6'
          '7'
          '8'
          '9')
      end
    end
  end
  inherited Panel1: TPanel
    inherited Label2: TLabel
      Width = 83
      Caption = 'Usu'#225'rios'
      ExplicitWidth = 83
    end
  end
  inherited TbPrincipal: TIB_Query
    FieldsCharCase.Strings = (
      'EMAIL=LOWER'
      'SKYPE=LOWER'
      'COD_USUARIO=UPPER'
      'COD_SETOR=UPPER'
      'COD_FILIAL=UPPER'
      'DATA_CADASTRO=UPPER'
      'DATA_SAIDA=UPPER'
      'NOME=UPPER'
      'ENDERECO_TIPO=UPPER'
      'NUMERO=UPPER'
      'BAIRRO=UPPER'
      'CEP=UPPER'
      'CIDADE=UPPER'
      'UF=UPPER'
      'LOGRADOURO=UPPER'
      'COMPLEMENTO=UPPER'
      'APELIDO=UPPER'
      'LOGIN=UPPER'
      'SENHA=UPPER')
    FieldsDisplayLabel.Strings = (
      'COD_USUARIO=C'#243'digo'
      'APELIDO=Apelido'
      'UF=UF'
      'CIDADE=Cidade'
      'NOME=Nome'
      'DATA_SAIDA=Sa'#237'da')
    FieldsDisplayWidth.Strings = (
      'UF=42'
      'COD_USUARIO=50'
      'DATA_SAIDA=73'
      'CIDADE=144'
      'NOME=225')
    FieldsEditMask.Strings = (
      'DATA_CADASTRO=99/99/9999'
      'DATA_SAIDA=99/99/9999'
      'CEP=99999\-999;0'
      'FONE1=(99)9999-9999;0'
      'FONE2=(99)9999-9999;0')
    FieldsIndex.Strings = (
      'COD_USUARIO'
      'COD_SETOR'
      'COD_FILIAL'
      'SENHA'
      'DATA_CADASTRO'
      'NOME'
      'APELIDO'
      'DATA_SAIDA'
      'EMAIL'
      'SKYPE'
      'ENDERECO_TIPO'
      'NUMERO'
      'BAIRRO'
      'CEP'
      'CIDADE'
      'UF'
      'LOGRADOURO'
      'COMPLEMENTO')
    FieldsVisible.Strings = (
      'COD_USUARIO=TRUE'
      'COD_SETOR=FALSE'
      'COD_FILIAL=FALSE'
      'SENHA=FALSE'
      'DATA_CADASTRO=FALSE'
      'DATA_SAIDA=FALSE'
      'NOME=TRUE'
      'EMAIL=FALSE'
      'SKYPE=FALSE'
      'ENDERECO_TIPO=FALSE'
      'NUMERO=FALSE'
      'BAIRRO=FALSE'
      'UF=FALSE'
      'LOGRADOURO=FALSE'
      'COMPLEMENTO=FALSE'
      'CIDADE=TRUE'
      'CEP=FALSE'
      'COD_PERFIL_ACESSO=FALSE'
      'EXPORTADO=FALSE'
      'LOGIN=FALSE'
      'EXPIRA_EM=FALSE'
      'SENHA_EXPIRA=FALSE'
      'DIAS_PARA_EXPIRAR=FALSE'
      'UCPRIVILEGED=FALSE'
      'UCTYPEREC=FALSE'
      'UCPROFILE=FALSE'
      'UCKEY=FALSE'
      'UCINATIVE=FALSE'
      'COD_UF=FALSE'
      'FONE1=FALSE'
      'FONE2=FALSE'
      'RG=FALSE'
      'CPF=FALSE'
      'ACESSO=FALSE')
    SQL.Strings = (
      'SELECT USUARIO.*'
      'FROM USUARIO'
      'where UCTYPEREC = '#39'U'#39)
    DeleteSQL.Strings = (
      'DELETE FROM USUARIO USUARIO'
      'WHERE'
      '   COD_USUARIO = :OLD_COD_USUARIO')
    EditSQL.Strings = (
      'UPDATE USUARIO USUARIO SET'
      '   USUARIO.COD_USUARIO = :COD_USUARIO, /*PK*/'
      '   USUARIO.COD_SETOR = :COD_SETOR,'
      '   USUARIO.COD_FILIAL = :COD_FILIAL,'
      '   USUARIO.SENHA = :SENHA,'
      '   USUARIO.DATA_CADASTRO = :DATA_CADASTRO,'
      '   USUARIO.NOME = :NOME,'
      '   USUARIO.DATA_SAIDA = :DATA_SAIDA,'
      '   USUARIO.EMAIL = :EMAIL,'
      '   USUARIO.SKYPE = :SKYPE,'
      '   USUARIO.NUMERO = :NUMERO,'
      '   USUARIO.BAIRRO = :BAIRRO,'
      '   USUARIO.CEP = :CEP,'
      '   USUARIO.CIDADE = :CIDADE,'
      '   USUARIO.LOGRADOURO = :LOGRADOURO,'
      '   USUARIO.COMPLEMENTO = :COMPLEMENTO,'
      '   USUARIO.ACESSO = :ACESSO,'
      '   USUARIO.LOGIN = :LOGIN,'
      '   USUARIO.EXPIRA_EM = :EXPIRA_EM,'
      '   USUARIO.SENHA_EXPIRA = :SENHA_EXPIRA,'
      '   USUARIO.DIAS_PARA_EXPIRAR = :DIAS_PARA_EXPIRAR,'
      '   USUARIO.UCPRIVILEGED = :UCPRIVILEGED,'
      '   USUARIO.UCTYPEREC = :UCTYPEREC,'
      '   USUARIO.UCPROFILE = :UCPROFILE,'
      '   USUARIO.UCKEY = :UCKEY,'
      '   USUARIO.UCINATIVE = :UCINATIVE,'
      '   USUARIO.COD_UF = :COD_UF,'
      '   USUARIO.FONE1 = :FONE1,'
      '   USUARIO.FONE2 = :FONE2,'
      '   USUARIO.RG = :RG,'
      '   USUARIO.CPF = :CPF'
      'WHERE'
      '   COD_USUARIO = :OLD_COD_USUARIO')
    InsertSQL.Strings = (
      'INSERT INTO USUARIO('
      '   COD_USUARIO, /*PK*/'
      '   COD_SETOR,'
      '   COD_FILIAL,'
      '   SENHA,'
      '   DATA_CADASTRO,'
      '   NOME,'
      '   DATA_SAIDA,'
      '   EMAIL,'
      '   SKYPE,'
      '   NUMERO,'
      '   BAIRRO,'
      '   CEP,'
      '   CIDADE,'
      '   LOGRADOURO,'
      '   COMPLEMENTO,'
      '   ACESSO,'
      '   LOGIN,'
      '   EXPIRA_EM,'
      '   SENHA_EXPIRA,'
      '   DIAS_PARA_EXPIRAR,'
      '   UCPRIVILEGED,'
      '   UCTYPEREC,'
      '   UCPROFILE,'
      '   UCKEY,'
      '   UCINATIVE,'
      '   COD_UF,'
      '   FONE1,'
      '   FONE2,'
      '   RG,'
      '   CPF)'
      'VALUES ('
      '   :COD_USUARIO,'
      '   :COD_SETOR,'
      '   :COD_FILIAL,'
      '   :SENHA,'
      '   :DATA_CADASTRO,'
      '   :NOME,'
      '   :DATA_SAIDA,'
      '   :EMAIL,'
      '   :SKYPE,'
      '   :NUMERO,'
      '   :BAIRRO,'
      '   :CEP,'
      '   :CIDADE,'
      '   :LOGRADOURO,'
      '   :COMPLEMENTO,'
      '   :ACESSO,'
      '   :LOGIN,'
      '   :EXPIRA_EM,'
      '   :SENHA_EXPIRA,'
      '   :DIAS_PARA_EXPIRAR,'
      '   :UCPRIVILEGED,'
      '   :UCTYPEREC,'
      '   :UCPROFILE,'
      '   :UCKEY,'
      '   :UCINATIVE,'
      '   :COD_UF,'
      '   :FONE1,'
      '   :FONE2,'
      '   :RG,'
      '   :CPF)')
    KeyLinks.Strings = (
      'USUARIO.COD_USUARIO')
    OrderingItemNo = 2
    OrderingItems.Strings = (
      'COD_USUARIO=COD_USUARIO;COD_USUARIO DESC'
      'NOME=NOME;NOME DESC'
      'CIDADE=CIDADE;CIDADE DESC')
    OrderingLinks.Strings = (
      'COD_USUARIO=1'
      'NOME=2'
      'CIDADE=3')
    SearchingLinks.Strings = (
      'COD_USUARIO=COD_USUARIO'
      'NOME=NOME'
      'CIDADE=CIDADE')
  end
  inherited ImagensPadrao: TImageList
    Bitmap = {
      [encoded data, 8768 characters]
      000000000000}
  end
  inherited uc_Controle_Acesso: TUCControls
    GroupName = 'Cadastro de Usu'#225'rios'
  end
  object qrSetor: TIB_Query
    FieldsCharCase.Strings = (
      'DESCRICAO=UPPER'
      'EXPORTADO=UPPER')
    FieldsDisplayLabel.Strings = (
      'DESCRICAO=Descri'#231#227'o'
      'COD_SETOR=Setor'
      'COD_FILIAL=Filial'
      'EXPORTADO=Exportado')
    FieldsVisible.Strings = (
      'COD_SETOR=TRUE'
      'DESCRICAO=TRUE'
      'COD_FILIAL=FALSE'
      'EXPORTADO=FALSE')
    IB_Connection = Dados.IB_Conexao
    SQL.Strings = (
      'SELECT SETOR.*'
      'FROM SETOR')
    OrderingItemNo = 2
    OrderingItems.Strings = (
      'COD_SETOR=COD_SETOR;COD_SETOR DESC'
      'DESCRICAO=DESCRICAO;DESCRICAO DESC')
    OrderingLinks.Strings = (
      'COD_SETOR=1'
      'DESCRICAO=2')
    SearchingLinks.Strings = (
      'COD_SETOR=COD_SETOR'
      'DESCRICAO=DESCRICAO')
    Left = 313
  end
  object dstSetor: TIB_DataSource
    Dataset = qrSetor
    Left = 313
    Top = 28
  end
  object popSetor: TPopupMenu
    Images = ImagensPadrao
    Left = 440
    Top = 8
    object CadastrarSetor1: TMenuItem
      Caption = 'Cadastrar Setor'
      ImageIndex = 1
      OnClick = CadastrarSetor1Click
    end
    object PesquisarSetor1: TMenuItem
      Caption = 'Pesquisar Setor'
      ImageIndex = 0
      OnClick = PesquisarSetor1Click
    end
  end
  object popPesquisaCep: TPopupMenu
    Images = ImagensPadrao
    Left = 470
    Top = 9
    object PesquisaCEP1: TMenuItem
      Caption = 'Pesquisar Cep'
      ImageIndex = 2
    end
  end
  object qrPerfil: TIB_Query
    FieldsCharCase.Strings = (
      'COD_USUARIO=UPPER'
      'NOME=UPPER'
      'LOGIN=UPPER'
      'SENHA=UPPER'
      'EXPIRA_EM=UPPER'
      'SENHA_EXPIRA=UPPER'
      'DIAS_PARA_EXPIRAR=UPPER'
      'EMAIL=UPPER'
      'UCPRIVILEGED=UPPER'
      'UCTYPEREC=UPPER'
      'UCPROFILE=UPPER'
      'UCKEY=UPPER'
      'UCINATIVE=UPPER'
      'COD_SETOR=UPPER'
      'DATA_CADASTRO=UPPER'
      'DATA_SAIDA=UPPER'
      'SKYPE=UPPER'
      'NUMERO=UPPER'
      'BAIRRO=UPPER'
      'CEP=UPPER'
      'CIDADE=UPPER'
      'UF=UPPER'
      'LOGRADOURO=UPPER'
      'COMPLEMENTO=UPPER'
      'FONE1=UPPER'
      'FONE2=UPPER'
      'VER_TODOS_PROJETOS=UPPER')
    FieldsDisplayLabel.Strings = (
      'COD_USUARIO=Codigo'
      'NOME=Descri'#231#227'o')
    FieldsVisible.Strings = (
      'COD_USUARIO=TRUE'
      'NOME=TRUE'
      'LOGIN=FALSE'
      'SENHA=FALSE'
      'EXPIRA_EM=FALSE'
      'SENHA_EXPIRA=FALSE'
      'DIAS_PARA_EXPIRAR=FALSE'
      'EMAIL=FALSE'
      'UCPRIVILEGED=FALSE'
      'UCTYPEREC=FALSE'
      'UCPROFILE=FALSE'
      'UCKEY=FALSE'
      'UCINATIVE=FALSE'
      'COD_SETOR=FALSE'
      'DATA_CADASTRO=FALSE'
      'DATA_SAIDA=FALSE'
      'SKYPE=FALSE'
      'NUMERO=FALSE'
      'BAIRRO=FALSE'
      'CEP=FALSE'
      'CIDADE=FALSE'
      'UF=FALSE'
      'LOGRADOURO=FALSE'
      'COMPLEMENTO=FALSE'
      'FONE1=FALSE'
      'FONE2=FALSE'
      'VER_TODOS_PROJETOS=FALSE'
      'COD_FILIAL=FALSE'
      'ENDERECO_TIPO=FALSE'
      'COD_UF=FALSE')
    IB_Connection = Dados.IB_Conexao
    IB_Transaction = Dados.transacao
    SQL.Strings = (
      'SELECT USUARIO.*'
      'FROM USUARIO'
      'where UCTYPEREC = '#39'P'#39)
    KeyLinks.Strings = (
      'USUARIO.COD_USUARIO')
    OrderingItemNo = 2
    OrderingItems.Strings = (
      'COD_USUARIO=COD_USUARIO;COD_USUARIO DESC'
      'NOME=NOME;NOME DESC')
    OrderingLinks.Strings = (
      'COD_USUARIO=1'
      'NOME=2')
    SearchingLinks.Strings = (
      'COD_USUARIO=COD_USUARIO'
      'NOME=NOME')
    CommitAction = caInvalidateCursor
    Left = 365
    Top = 65533
  end
  object dsrPerfil: TIB_DataSource
    Dataset = qrPerfil
    Left = 364
    Top = 28
  end
  object qrUF: TIB_Query
    FieldsCharCase.Strings = (
      'COD_UF=UPPER'
      'DESCRICAO=UPPER')
    FieldsDisplayLabel.Strings = (
      'DESCRICAO=UF')
    FieldsVisible.Strings = (
      'COD_UF=FALSE'
      'DESCRICAO=TRUE')
    IB_Connection = Dados.IB_Conexao
    SQL.Strings = (
      'SELECT UF.*'
      'FROM UF')
    OrderingItemNo = 1
    OrderingItems.Strings = (
      'DESCRICAO=DESCRICAO;DESCRICAO DESC')
    OrderingLinks.Strings = (
      'DESCRICAO=1')
    SearchingLinks.Strings = (
      'DESCRICAO=DESCRICAO')
    Left = 403
    Top = 3
  end
  object dsrUF: TIB_DataSource
    Dataset = qrUF
    Left = 402
    Top = 31
  end
end
