inherited frmAtendimentoCliente: TfrmAtendimentoCliente
  Left = 184
  Top = 257
  Caption = 'Atendimento Cliente'
  ClientHeight = 392
  ClientWidth = 615
  OldCreateOrder = True
  ExplicitWidth = 621
  ExplicitHeight = 421
  PixelsPerInch = 96
  TextHeight = 16
  object edtDescricao: TIB_Memo [0]
    Left = 9
    Top = 232
    Width = 592
    Height = 95
    Hint = 'Descri'#231#227'o do atendimento'
    AutoLabel.Kind = albTop
    AutoLabel.Margin = 0
    DataField = 'ATENDIMENTO_CLIENTE.DESCRICAO'
    DataSource = frmCadCliente.dsrAtendimentoCliente
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Verdana'
    Font.Style = []
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    ParentBackground = False
    TabOrder = 4
    OnKeyPress = edtDescricaoKeyPress
    AutoSize = False
  end
  object edtTipoAtendimento: TIB_LookupCombo [1]
    Tag = 1
    Left = 58
    Top = 191
    Width = 240
    Height = 24
    Hint = 'Tipo de atendimento'
    AutoLabel.Caption = 'Tipo Atendimento'
    AutoLabel.Kind = albTop
    AutoLabel.Margin = 0
    DataSource = dsrTipoAtendimento
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Verdana'
    Font.Style = []
    ParentFont = False
    ParentShowHint = False
    PopupMenu = popTipoAtendimento
    ShowHint = True
    ParentBackground = False
    PreventSearching = True
    TabOrder = 1
    OnKeyDown = edtCodTipoAtendimentoKeyDown
    DisplayField = 'DESCRICAO'
    DropDownWidth = 292
    IndicateTitles = True
    OnChange = edtTipoAtendimentoChange
    ShowButton = True
  end
  object edtCodSetor: TEdit [2]
    Tag = 1
    Left = 312
    Top = 192
    Width = 49
    Height = 24
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Verdana'
    Font.Style = []
    ParentFont = False
    PopupMenu = popSetor
    TabOrder = 2
    OnExit = edtCodSetorExit
    OnKeyDown = edtCodSetorKeyDown
  end
  object Panel4: TPanel [3]
    Left = 0
    Top = 25
    Width = 615
    Height = 136
    Align = alTop
    Color = 16770222
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Verdana'
    Font.Style = []
    ParentFont = False
    TabOrder = 8
    object Label3: TLabel
      Left = 341
      Top = 59
      Width = 31
      Height = 16
      Caption = 'Data'
      ParentShowHint = False
      ShowHint = True
    end
    object Label4: TLabel
      Left = 444
      Top = 59
      Width = 30
      Height = 16
      Caption = 'Hora'
      ParentShowHint = False
      ShowHint = True
    end
    object IB_Text1: TIB_Text
      Left = 168
      Top = 115
      Width = 325
      Height = 15
      DataField = 'RAZAOSOCIAL'
      DataSource = frmCadCliente.DsPrincipal
    end
    object IB_Text2: TIB_Text
      Left = 9
      Top = 73
      Width = 160
      Height = 15
      DataField = 'NOME'
      DataSource = dsrUsuario
    end
    object IB_Text3: TIB_Text
      Left = 9
      Top = 115
      Width = 96
      Height = 15
      DataField = 'COD_CLIENTE'
      DataSource = frmCadCliente.DsPrincipal
    end
    object Label1: TLabel
      Left = 9
      Top = 59
      Width = 48
      Height = 16
      Caption = 'Usu'#225'rio'
      ParentShowHint = False
      ShowHint = True
    end
    object IB_Text4: TIB_Text
      Left = 444
      Top = 73
      Width = 58
      Height = 16
      AutoSize = True
      DataField = 'ATENDIMENTO_CLIENTE.HORA'
      DataSource = frmCadCliente.dsrAtendimentoCliente
    end
    object IB_Text5: TIB_Text
      Left = 341
      Top = 73
      Width = 58
      Height = 16
      AutoSize = True
      DataField = 'ATENDIMENTO_CLIENTE.DATA'
      DataSource = frmCadCliente.dsrAtendimentoCliente
    end
    object Label5: TLabel
      Left = 9
      Top = 100
      Width = 44
      Height = 16
      Caption = 'C'#243'digo'
    end
    object Label6: TLabel
      Left = 168
      Top = 100
      Width = 45
      Height = 16
      Caption = 'Cliente'
    end
    object IB_Text6: TIB_Text
      Left = 8
      Top = 20
      Width = 90
      Height = 25
      AutoSize = True
      DataField = 'ATENDIMENTO_CLIENTE.COD_ATEND_CLIENTE'
      DataSource = frmCadCliente.dsrAtendimentoCliente
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -20
      Font.Name = 'Verdana'
      Font.Style = []
      ParentFont = False
    end
    object Label8: TLabel
      Left = 8
      Top = 6
      Width = 104
      Height = 16
      Caption = 'N'#186' Atendimento'
      ParentShowHint = False
      ShowHint = True
    end
  end
  object edtSetor: TIB_LookupCombo [4]
    Tag = 1
    Left = 363
    Top = 191
    Width = 242
    Height = 24
    Hint = 'Tipo de atendimento'
    AutoLabel.Caption = 'Setor'
    AutoLabel.Kind = albTop
    AutoLabel.Margin = 0
    DataSource = dsrSetor
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Verdana'
    Font.Style = []
    ParentFont = False
    ParentShowHint = False
    PopupMenu = popSetor
    ShowHint = True
    ParentBackground = False
    PreventSearching = True
    TabOrder = 3
    OnKeyDown = edtCodSetorKeyDown
    DisplayField = 'DESCRICAO'
    DropDownWidth = 292
    IndicateTitles = True
    OnChange = edtSetorChange
    ShowButton = True
  end
  object edtCodTipoAtendimento: TEdit [5]
    Tag = 1
    Left = 8
    Top = 192
    Width = 49
    Height = 24
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Verdana'
    Font.Style = []
    ParentFont = False
    PopupMenu = popTipoAtendimento
    TabOrder = 0
    OnExit = edtCodTipoAtendimentoExit
    OnKeyDown = edtCodTipoAtendimentoKeyDown
  end
  object IB_CheckBox1: TIB_CheckBox [6]
    Left = 259
    Top = 336
    Width = 96
    Height = 17
    DataField = 'ATENDIMENTO_CLIENTE.AVISAR'
    DataSource = frmCadCliente.dsrAtendimentoCliente
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -19
    Font.Name = 'Verdana'
    Font.Style = []
    ParentFont = False
    BorderStyle = bsNone
    ParentBackground = False
    TabOrder = 5
    Caption = 'Avisar'
  end
  inherited Panel3: TPanel
    Top = 357
    Width = 615
    TabOrder = 6
    ExplicitTop = 357
    ExplicitWidth = 615
    inherited Linhabotao: TShape
      Width = 615
      ExplicitWidth = 615
    end
    inherited Panel2: TPanel
      Left = 316
      Width = 299
      ExplicitLeft = 316
      ExplicitWidth = 299
      inherited BtGravar: TBitBtn
        Left = 14
        OnClick = BtGravarClick
        ExplicitLeft = 14
      end
      inherited BtCancelar: TBitBtn
        Left = 108
        Width = 98
        ExplicitLeft = 108
        ExplicitWidth = 98
      end
      object BitBtn1: TBitBtn
        Left = 205
        Top = 2
        Width = 95
        Height = 30
        Hint = 'Excluir o atendimento'
        Caption = 'Excluir'
        Glyph.Data = {
          76060000424D7606000000000000360400002800000018000000180000000100
          08000000000040020000220B0000220B000000010000000100000031DE00FF00
          FF000031FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00010101010101
          0101010101010101010101010101010101010101010101010101010101010101
          0101010101010100000101010101010101010101010101010101010101010000
          0001010100000001010101010101010101010101010000000101010100000000
          0101010101010101010101000000000101010101000000000001010101010101
          0101000000000101010101010100000000000101010101010100000000010101
          0101010101010200000000010101010100000000010101010101010101010101
          0000000001010000000000010101010101010101010101010100000000000000
          0000010101010101010101010101010101010000020002000001010101010101
          0101010101010101010101000000020001010101010101010101010101010101
          0101000002000002020101010101010101010101010101010100000200020202
          0002010101010101010101010101010102020200020101020202020101010101
          0101010101010102020002020101010102020202010101010101010101010202
          0202020101010101010102020201010101010101010202020202010101010101
          0101010202020101010101010202020202010101010101010101010101020101
          0101010202020202010101010101010101010101010101010101010202020201
          0101010101010101010101010101010101010102020201010101010101010101
          0101010101010101010101010101010101010101010101010101010101010101
          0101010101010101010101010101010101010101010101010101}
        TabOrder = 2
        OnClick = BitBtn1Click
      end
    end
  end
  inherited Panel1: TPanel
    Width = 615
    TabOrder = 7
    ExplicitWidth = 615
    inherited lblTitulo: TLabel
      Width = 224
      Caption = 'Atendimento ao Cliente'
      ExplicitWidth = 224
    end
    inherited Shape1: TShape
      Width = 615
      ExplicitWidth = 615
    end
  end
  inherited ImagensPadrao: TImageList
    Bitmap = {
      [encoded data, 8768 characters]
      000000000000}
  end
  object dsrSetor: TIB_DataSource
    Dataset = qrSetor
    Left = 377
  end
  object popTipoAtendimento: TPopupMenu
    Left = 424
    Top = 1
    object CadastrarTiposdeAtendimentos1: TMenuItem
      Tag = 1
      Caption = 'Cadastrar Tipos de Atendimentos'
      ImageIndex = 1
      OnClick = CadastrarTiposdeAtendimentos1Click
    end
    object PesquisarTiposdeAtendimentos1: TMenuItem
      Caption = 'Pesquisar Tipos de Atendimentos'
      ImageIndex = 0
      OnClick = PesquisarTiposdeAtendimentos1Click
    end
  end
  object popSetor: TPopupMenu
    Left = 456
    Top = 1
    object CadastrarSetor1: TMenuItem
      Caption = 'Cadastrar Setores'
      ImageIndex = 1
      OnClick = CadastrarSetor1Click
    end
    object PsquisarSetores1: TMenuItem
      Caption = 'Pesquisar Setores'
      ImageIndex = 0
      OnClick = PsquisarSetores1Click
    end
  end
  object qrTipoAtendimento: TIB_Query
    FieldsCharCase.Strings = (
      'COD_TIPO_ATENDIMENTO=UPPER'
      'DESCRICAO=UPPER'
      'AVISAR=UPPER')
    FieldsDisplayLabel.Strings = (
      'COD_TIPO_ATENDIMENTO=C'#243'digo Tipo'
      'DESCRICAO=Tipo Atendimento'
      'AVISAR=Avisar')
    FieldsVisible.Strings = (
      'COD_TIPO_ATENDIMENTO=TRUE'
      'DESCRICAO=TRUE'
      'AVISAR=FALSE')
    IB_Connection = Dados.IB_Conexao
    SQL.Strings = (
      'SELECT TIPO_ATENDIMENTO.*'
      'FROM TIPO_ATENDIMENTO')
    DeleteSQL.Strings = (
      'DELETE FROM TIPO_ATENDIMENTO'
      'WHERE'
      '   COD_TIPO_ATENDIMENTO = :OLD_COD_TIPO_ATENDIMENTO')
    EditSQL.Strings = (
      'UPDATE TIPO_ATENDIMENTO SET'
      '   COD_TIPO_ATENDIMENTO = :COD_TIPO_ATENDIMENTO, /*PK*/'
      '   DESCRICAO = :DESCRICAO,'
      '   AVISAR = :AVISAR'
      'WHERE'
      '   COD_TIPO_ATENDIMENTO = :OLD_COD_TIPO_ATENDIMENTO')
    InsertSQL.Strings = (
      'INSERT INTO TIPO_ATENDIMENTO('
      '   COD_TIPO_ATENDIMENTO, /*PK*/'
      '   DESCRICAO,'
      '   AVISAR)'
      'VALUES ('
      '   :COD_TIPO_ATENDIMENTO,'
      '   :DESCRICAO,'
      '   :AVISAR)')
    OrderingItemNo = 2
    OrderingItems.Strings = (
      
        'COD_TIPO_ATENDIMENTO=COD_TIPO_ATENDIMENTO;COD_TIPO_ATENDIMENTO D' +
        'ESC'
      'DESCRICAO=DESCRICAO;DESCRICAO DESC'
      'AVISAR=AVISAR;AVISAR DESC')
    OrderingLinks.Strings = (
      'COD_TIPO_ATENDIMENTO=1'
      'DESCRICAO=2'
      'AVISAR=3')
    SearchingLinks.Strings = (
      'COD_TIPO_ATENDIMENTO=COD_TIPO_ATENDIMENTO'
      'DESCRICAO=DESCRICAO'
      'AVISAR=AVISAR')
    Left = 268
  end
  object dsrTipoAtendimento: TIB_DataSource
    Dataset = qrTipoAtendimento
    Left = 297
  end
  object qrSetor: TIB_Query
    FieldsCharCase.Strings = (
      'COD_SETOR=UPPER'
      'COD_FILIAL=UPPER'
      'DESCRICAO=UPPER'
      'EXPORTADO=UPPER')
    FieldsDisplayLabel.Strings = (
      'COD_SETOR=C'#243'digo'
      'DESCRICAO=Descri'#231#227'o')
    FieldsDisplayWidth.Strings = (
      'COD_SETOR=55'
      'DESCRICAO=226')
    FieldsVisible.Strings = (
      'COD_FILIAL=FALSE'
      'DESCRICAO=TRUE'
      'EXPORTADO=FALSE')
    IB_Connection = Dados.IB_Conexao
    SQL.Strings = (
      'SELECT SETOR.*'
      'FROM SETOR')
    KeyLinks.Strings = (
      'SETOR.COD_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 = 348
  end
  object qrUsuario: TIB_Query
    IB_Connection = Dados.IB_Conexao
    SQL.Strings = (
      'SELECT USUARIO.*'
      'FROM USUARIO')
    Left = 528
    Top = 1
  end
  object dsrUsuario: TIB_DataSource
    Dataset = qrUsuario
    Left = 528
    Top = 30
  end
end
