object frmConsultsView: TfrmConsultsView
  Left = 320
  Top = 172
  Width = 414
  Height = 400
  BorderIcons = []
  Caption = 'List Selected Consults'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = True
  Position = poScreenCenter
  PixelsPerInch = 96
  TextHeight = 13
  object pnlBase: TORAutoPanel
    Left = 0
    Top = 0
    Width = 406
    Height = 366
    Align = alClient
    BevelOuter = bvNone
    TabOrder = 0
    object lblBeginDate: TLabel
      Left = 239
      Top = 128
      Width = 73
      Height = 13
      Caption = 'Beginning Date'
    end
    object lblEndDate: TLabel
      Left = 239
      Top = 173
      Width = 59
      Height = 13
      Caption = 'Ending Date'
    end
    object lblService: TLabel
      Left = 8
      Top = 9
      Width = 36
      Height = 13
      Caption = 'Service'
    end
    object lblStatus: TLabel
      Left = 239
      Top = 10
      Width = 30
      Height = 13
      Caption = 'Status'
    end
    object Label1: TLabel
      Left = 239
      Top = 217
      Width = 44
      Height = 13
      Caption = 'Group By'
    end
    object calBeginDate: TORDateBox
      Left = 239
      Top = 142
      Width = 155
      Height = 21
      TabOrder = 3
      DateOnly = False
      RequireTime = False
      Caption = 'Beginning Date'
    end
    object calEndDate: TORDateBox
      Left = 239
      Top = 187
      Width = 155
      Height = 21
      TabOrder = 4
      DateOnly = False
      RequireTime = False
      Caption = 'Ending Date'
    end
    object lstStatus: TORListBox
      Left = 239
      Top = 24
      Width = 156
      Height = 96
      ItemHeight = 13
      MultiSelect = True
      ParentShowHint = False
      PopupMenu = popStatus
      ShowHint = True
      TabOrder = 2
      Caption = 'Status'
      ItemTipColor = clWindow
      LongList = False
      Pieces = '2'
    end
    object radSort: TRadioGroup
      Left = 239
      Top = 266
      Width = 155
      Height = 64
      Caption = 'Sort Order'
      Items.Strings = (
        '&Ascending (oldest first)'
        '&Descending (newest first)')
      TabOrder = 6
    end
    object cmdOK: TButton
      Left = 239
      Top = 340
      Width = 72
      Height = 21
      Caption = 'OK'
      Default = True
      TabOrder = 7
      OnClick = cmdOKClick
    end
    object cmdCancel: TButton
      Left = 324
      Top = 340
      Width = 72
      Height = 21
      Cancel = True
      Caption = 'Cancel'
      TabOrder = 8
      OnClick = cmdCancelClick
    end
    object treService: TORTreeView
      Left = 8
      Top = 57
      Width = 214
      Height = 304
      HideSelection = False
      Indent = 19
      ReadOnly = True
      TabOrder = 1
      OnChange = treServiceChange
      Caption = 'Service'
      NodePiece = 0
    end
    object cboService: TORComboBox
      Left = 8
      Top = 27
      Width = 214
      Height = 21
      Style = orcsDropDown
      AutoSelect = True
      Caption = 'Service'
      Color = clWindow
      DropDownCount = 8
      ItemHeight = 13
      ItemTipColor = clWindow
      ItemTipEnable = True
      ListItemsOnly = True
      LongList = False
      LookupPiece = 0
      MaxLength = 0
      Pieces = '2'
      Sorted = True
      SynonymChars = '<>'
      TabOrder = 0
      OnKeyPause = cboServiceSelect
      OnMouseClick = cboServiceSelect
      CharsNeedMatch = 1
    end
    object cboGroupBy: TORComboBox
      Left = 239
      Top = 230
      Width = 155
      Height = 21
      Style = orcsDropDown
      AutoSelect = True
      Caption = 'Group By'
      Color = clWindow
      DropDownCount = 8
      Items.Strings = (
        '^(none)'
        'T^Consults/Procedures'
        'V^Service'
        'S^Status')
      ItemHeight = 13
      ItemTipColor = clWindow
      ItemTipEnable = True
      ListItemsOnly = False
      LongList = False
      LookupPiece = 0
      MaxLength = 0
      Pieces = '2'
      Sorted = False
      SynonymChars = '<>'
      TabOrder = 5
      CharsNeedMatch = 1
    end
  end
  object popStatus: TPopupMenu
    Left = 284
    Top = 51
    object popStatusSelectNone: TMenuItem
      Caption = 'Select None'
      OnClick = popStatusSelectNoneClick
    end
  end
  object DKLanguageController1: TDKLanguageController
    Left = 216
    Top = 16
    LangData = {
      0F0066726D436F6E73756C747356696577010100000001000000070043617074
      696F6E01110000000700706E6C4261736500000C006C626C426567696E446174
      65010100000002000000070043617074696F6E000A006C626C456E6444617465
      010100000003000000070043617074696F6E000A006C626C5365727669636501
      0100000004000000070043617074696F6E0009006C626C537461747573010100
      000005000000070043617074696F6E0006004C6162656C310101000000060000
      00070043617074696F6E000C0063616C426567696E4461746501010000000700
      0000070043617074696F6E000A0063616C456E64446174650101000000080000
      00070043617074696F6E0009006C737453746174757301010000000900000007
      0043617074696F6E000700726164536F727401020000000A0000000700436170
      74696F6E0B00000005004974656D73000500636D644F4B01010000000C000000
      070043617074696F6E000900636D6443616E63656C01010000000D0000000700
      43617074696F6E000A007472655365727669636501010000000E000000070043
      617074696F6E000A0063626F5365727669636501010000000F00000007004361
      7074696F6E000A0063626F47726F757042790102000000100000000700436170
      74696F6E1100000005004974656D73000900706F705374617475730000130070
      6F7053746174757353656C6563744E6F6E650101000000120000000700436170
      74696F6E00}
  end
end