inherited frmCadTipoAtendimento: TfrmCadTipoAtendimento
  Left = 204
  Top = 226
  Caption = 'frmCadTipoAtendimento'
  ClientHeight = 309
  ClientWidth = 623
  OldCreateOrder = True
  ExplicitWidth = 629
  ExplicitHeight = 338
  PixelsPerInch = 96
  TextHeight = 16
  inherited Paginas: TPageControl
    Width = 623
    Height = 271
    ExplicitWidth = 623
    ExplicitHeight = 271
    inherited Acesso: TTabSheet
      ExplicitLeft = 4
      ExplicitTop = 6
      ExplicitWidth = 615
      ExplicitHeight = 261
      inherited Panel2: TPanel
        Left = 524
        Height = 224
        ExplicitLeft = 524
        ExplicitHeight = 224
      end
      inherited Panel3: TPanel
        Top = 224
        Width = 615
        ExplicitTop = 224
        ExplicitWidth = 615
      end
      inherited pnGrade: TPanel
        Width = 524
        Height = 224
        ExplicitWidth = 524
        ExplicitHeight = 224
        inherited grdPesquisa: TIB_Grid
          Width = 524
          Height = 208
          ExplicitWidth = 524
          ExplicitHeight = 208
        end
        inherited pnlOpcoesPesquisa: TPanel
          Width = 524
          ExplicitWidth = 524
        end
      end
    end
    inherited Manutencao: TTabSheet
      ExplicitLeft = 4
      ExplicitTop = 6
      ExplicitWidth = 615
      ExplicitHeight = 261
      inherited Panel6: TPanel
        Top = 225
        Width = 615
        TabOrder = 1
        ExplicitTop = 225
        ExplicitWidth = 615
        inherited Linhabotao: TShape
          Width = 613
        end
        inherited Panel7: TPanel
          Left = 287
          ExplicitLeft = 287
        end
      end
      object edtDescricao: TIB_Edit
        Left = 10
        Top = 79
        Width = 415
        Height = 24
        Hint = 'Descri'#231#227'o do tipo de atendimento'
        AutoLabel.Caption = 'Descri'#231#227'o'
        AutoLabel.Kind = albTop
        AutoLabel.Margin = 0
        DataField = 'DESCRICAO'
        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 GroupBox2: TGroupBox
        Left = 8
        Top = 3
        Width = 97
        Height = 41
        Caption = 'C'#211'DIGO'
        TabOrder = 2
        object dbCodigo: TIB_Text
          Left = 4
          Top = 16
          Width = 85
          Height = 16
          DataField = 'COD_TIPO_ATENDIMENTO'
          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 btnAvisar: TIB_CheckBox
        Left = 323
        Top = 27
        Width = 72
        Height = 17
        Hint = 'Exibe uma mensagem toda vez que entrar no cliente'
        DataField = 'AVISAR'
        DataSource = DsPrincipal
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
        BorderStyle = bsNone
        ParentBackground = False
        TabOrder = 3
        Caption = 'Avisar'
      end
    end
  end
  inherited Panel1: TPanel
    Width = 623
    ExplicitWidth = 623
    inherited Label2: TLabel
      Width = 198
      Caption = 'Tipo de atendimento'
      ExplicitWidth = 198
    end
    inherited Shape1: TShape
      Width = 623
      ExplicitWidth = 623
    end
    inherited imgAcao: TImage
      Left = 263
      ExplicitLeft = 263
    end
  end
  inherited TbPrincipal: TIB_Query
    ColumnAttributes.Strings = (
      'AVISAR=BOOLEAN=T,F')
    FieldsCharCase.Strings = (
      'CODIGO_TIPO_ATEND=UPPER'
      'DESCRICAO=UPPER'
      'RELACAO_EMPRESA=UPPER'
      'RELACAO_CONTADOR=UPPER'
      'RELACAO_ASSOCIADO=UPPER'
      'RELACAO_CONVENIO=UPPER'
      'AVISAR=UPPER')
    FieldsDisplayLabel.Strings = (
      'CODIGO_TIPO_ATEND=C'#243'd'
      'DESCRICAO=Descri'#231#227'o'
      'AVISAR=Avisar'
      'COD_TIPO_ATENDIMENTO=C'#243'digo')
    FieldsDisplayWidth.Strings = (
      'DESCRICAO=365'
      'AVISAR=82'
      'CODIGO_TIPO_ATEND=37')
    FieldsVisible.Strings = (
      'CODIGO_TIPO_ATEND=TRUE'
      'DESCRICAO=TRUE'
      'RELACAO_EMPRESA=FALSE'
      'RELACAO_CONTADOR=FALSE'
      'RELACAO_ASSOCIADO=FALSE'
      'RELACAO_CONVENIO=FALSE'
      'AVISAR=TRUE'
      'EXPORTADO=FALSE'
      'COD_FILIAL=FALSE'
      'COD_TIPO_ATENDIMENTO=TRUE')
    SQL.Strings = (
      'SELECT *'
      '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)')
    KeyLinks.Strings = (
      'TIPO_ATENDIMENTO.COD_TIPO_ATENDIMENTO')
    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')
  end
  inherited ImagensPadrao: TImageList
    Bitmap = {
      [encoded data, 8768 characters]
      000000000000}
  end
  inherited uc_Controle_Acesso: TUCControls
    GroupName = 'Cadastro de Tipo de Atendimentos'
  end
end
