inherited frmCadTipoDocumento: TfrmCadTipoDocumento
  Left = 184
  Top = 190
  Caption = 'frmCadTipoDocumento'
  ClientHeight = 224
  ClientWidth = 633
  OldCreateOrder = True
  ExplicitWidth = 639
  ExplicitHeight = 253
  PixelsPerInch = 96
  TextHeight = 16
  inherited Paginas: TPageControl
    Width = 633
    Height = 186
    ExplicitWidth = 633
    ExplicitHeight = 186
    inherited Acesso: TTabSheet
      ExplicitLeft = 4
      ExplicitTop = 6
      ExplicitWidth = 625
      ExplicitHeight = 176
      inherited Panel2: TPanel
        Left = 534
        Height = 139
        ExplicitLeft = 534
        ExplicitHeight = 139
      end
      inherited Panel3: TPanel
        Top = 139
        Width = 625
        ExplicitTop = 139
        ExplicitWidth = 625
      end
      inherited pnGrade: TPanel
        Width = 534
        Height = 139
        ExplicitWidth = 534
        ExplicitHeight = 139
        inherited grdPesquisa: TIB_Grid
          Width = 534
          Height = 123
          ExplicitWidth = 534
          ExplicitHeight = 123
        end
        inherited pnlOpcoesPesquisa: TPanel
          Width = 534
          ExplicitWidth = 534
        end
      end
    end
    inherited Manutencao: TTabSheet
      ExplicitLeft = 4
      ExplicitTop = 6
      ExplicitWidth = 625
      ExplicitHeight = 176
      inherited Panel6: TPanel
        Top = 140
        Width = 625
        TabOrder = 1
        ExplicitTop = 140
        ExplicitWidth = 625
        inherited Linhabotao: TShape
          Width = 623
          ExplicitWidth = 623
        end
        inherited Panel7: TPanel
          Left = 297
          ExplicitLeft = 297
        end
      end
      object GroupBox1: 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_DOCUMENTO'
          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 edtDescricao: TIB_Edit
        Left = 10
        Top = 79
        Width = 415
        Height = 24
        Hint = 'Descri'#231#227'o '
        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
    end
  end
  inherited Panel1: TPanel
    Width = 633
    ExplicitWidth = 633
    inherited Label2: TLabel
      Width = 206
      Caption = 'Tipos de Documentos'
      FocusControl = Acesso
      ExplicitWidth = 206
    end
    inherited Shape1: TShape
      Width = 633
      ExplicitWidth = 633
    end
    inherited imgAcao: TImage
      Left = 273
      ExplicitLeft = 273
    end
  end
  inherited TbPrincipal: TIB_Query
    FieldsCharCase.Strings = (
      'COD_TIPO_DOCUMENTO=UPPER'
      'DESCRICAO=UPPER')
    FieldsDisplayLabel.Strings = (
      'COD_TIPO_DOCUMENTO=C'#243'digo'
      'DESCRICAO=Descri'#231#227'o'
      'ABREVIATURA=Abreviatura')
    SQL.Strings = (
      'SELECT TIPO_DE_DOCUMENTOS.*'
      'FROM TIPO_DE_DOCUMENTOS')
    DeleteSQL.Strings = (
      'DELETE FROM TIPO_DE_DOCUMENTOS'
      'WHERE'
      '   COD_TIPO_DOCUMENTO = :OLD_COD_TIPO_DOCUMENTO')
    EditSQL.Strings = (
      'UPDATE TIPO_DE_DOCUMENTOS SET'
      '   COD_TIPO_DOCUMENTO = :COD_TIPO_DOCUMENTO, /*PK*/'
      '   DESCRICAO = :DESCRICAO'
      'WHERE'
      '   COD_TIPO_DOCUMENTO = :OLD_COD_TIPO_DOCUMENTO')
    InsertSQL.Strings = (
      'INSERT INTO TIPO_DE_DOCUMENTOS('
      '   COD_TIPO_DOCUMENTO, /*PK*/'
      '   DESCRICAO)'
      'VALUES ('
      '   :COD_TIPO_DOCUMENTO,'
      '   :DESCRICAO)')
    OrderingItemNo = 2
    OrderingItems.Strings = (
      'COD_TIPO_DOCUMENTO=COD_TIPO_DOCUMENTO;COD_TIPO_DOCUMENTO DESC'
      'DESCRICAO=DESCRICAO;DESCRICAO DESC')
    OrderingLinks.Strings = (
      'COD_TIPO_DOCUMENTO=1'
      'DESCRICAO=2')
    SearchingLinks.Strings = (
      'COD_TIPO_DOCUMENTO=COD_TIPO_DOCUMENTO'
      'DESCRICAO=DESCRICAO')
    Top = 65535
  end
  inherited ImagensPadrao: TImageList
    Bitmap = {
      [encoded data, 8768 characters]
      000000000000}
  end
  inherited uc_Controle_Acesso: TUCControls
    GroupName = 'Cadastro de Tipos de Documentos'
    Left = 6
  end
end
