inherited frmSurgery: TfrmSurgery
  Left = 304
  Top = 221
  Width = 720
  Height = 409
  Align = alClient
  Caption = 'Surgery Page'
  HelpFile = 'overvw'
  Menu = mnuNotes
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  inherited shpPageBottom: TShape
    Top = 350
    Width = 712
  end
  inherited sptHorz: TSplitter
    Left = 64
    Height = 350
    AutoSnap = False
    OnCanResize = sptHorzCanResize
  end
  inherited pnlLeft: TPanel
    Width = 64
    Height = 350
    object lblCases: TOROffsetLabel
      Left = 0
      Top = 0
      Width = 64
      Height = 19
      Align = alTop
      Caption = 'Last 100 Surgery Cases'
      HorzOffset = 2
      ParentShowHint = False
      ShowHint = True
      Transparent = True
      VertOffset = 6
      WordWrap = False
    end
    object lblSpace1: TLabel
      Left = 0
      Top = 305
      Width = 64
      Height = 3
      Align = alBottom
      AutoSize = False
      Caption = ' '
    end
    object cmdNewNote: TORAlignButton
      Left = 0
      Top = 308
      Width = 64
      Height = 21
      Caption = 'New Report'
      TabOrder = 0
      Visible = False
      OnClick = cmdNewNoteClick
      Align = alBottom
    end
    object cmdPCE: TORAlignButton
      Left = 0
      Top = 329
      Width = 64
      Height = 21
      Caption = 'Encounter'
      TabOrder = 1
      Visible = False
      OnClick = cmdPCEClick
      Align = alBottom
    end
    object pnlDrawers: TPanel
      Left = 0
      Top = 19
      Width = 64
      Height = 286
      Align = alClient
      BevelOuter = bvNone
      TabOrder = 2
      object splDrawers: TSplitter
        Left = 0
        Top = 283
        Width = 64
        Height = 3
        Cursor = crVSplit
        Align = alBottom
      end
      object lstNotes: TORListBox
        Left = 14
        Top = 289
        Width = 121
        Height = 97
        ItemHeight = 13
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        Visible = False
        OnClick = lstNotesClick
        ItemTipColor = clWindow
        LongList = False
      end
      object tvSurgery: TORTreeView
        Left = 0
        Top = 0
        Width = 64
        Height = 283
        Align = alClient
        Constraints.MinWidth = 30
        DragMode = dmAutomatic
        HideSelection = False
        Indent = 19
        PopupMenu = popNoteList
        ReadOnly = True
        TabOrder = 0
        OnAddition = tvSurgeryAddition
        OnChange = tvSurgeryChange
        OnCollapsed = tvSurgeryCollapsed
        OnDeletion = tvSurgeryDeletion
        OnExpanded = tvSurgeryExpanded
        Caption = 'Last 100 Surgery Cases'
        NodePiece = 0
        ShortNodeCaptions = True
      end
    end
  end
  inherited pnlRight: TPanel
    Left = 68
    Width = 644
    Height = 350
    object sptVert: TSplitter
      Left = 0
      Top = 301
      Width = 644
      Height = 4
      Cursor = crVSplit
      Align = alBottom
    end
    object pnlRead: TPanel
      Left = 0
      Top = 0
      Width = 644
      Height = 301
      Align = alClient
      BevelOuter = bvNone
      TabOrder = 0
      object lblTitle: TOROffsetLabel
        Left = 0
        Top = 0
        Width = 644
        Height = 19
        Align = alTop
        Caption = 'No Surgery Cases Found'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        HorzOffset = 2
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        Transparent = False
        VertOffset = 6
        WordWrap = False
      end
      object memSurgery: TRichEdit
        Left = 0
        Top = 19
        Width = 644
        Height = 282
        Align = alClient
        Color = clCream
        Ctl3D = True
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Courier New'
        Font.Style = []
        Lines.Strings = (
          
            'abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRUSTVWXYZabcdefghijkl' +
            'mnopqrstuvwxyz12')
        ParentCtl3D = False
        ParentFont = False
        PlainText = True
        PopupMenu = popNoteMemo
        ReadOnly = True
        ScrollBars = ssBoth
        TabOrder = 0
        WantReturns = False
        WordWrap = False
      end
    end
    object memPCEShow: TRichEdit
      Left = 0
      Top = 305
      Width = 644
      Height = 45
      Align = alBottom
      Color = clCream
      Lines.Strings = (
        '<No encounter information entered>')
      PlainText = True
      ReadOnly = True
      ScrollBars = ssVertical
      TabOrder = 2
      WantReturns = False
    end
    object pnlWrite: TPanel
      Left = 0
      Top = 0
      Width = 644
      Height = 301
      Align = alClient
      BevelOuter = bvNone
      TabOrder = 1
      Visible = False
      OnResize = pnlWriteResize
      object memNewNote: TRichEdit
        Left = 0
        Top = 67
        Width = 644
        Height = 234
        Align = alClient
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Courier New'
        Font.Style = []
        ParentFont = False
        PlainText = True
        PopupMenu = popNoteMemo
        ScrollBars = ssBoth
        TabOrder = 0
        WantTabs = True
        OnChange = memNewNoteChange
        OnKeyDown = memNewNoteKeyDown
      end
      object pnlFields: TPanel
        Left = 0
        Top = 0
        Width = 644
        Height = 67
        Align = alTop
        BevelOuter = bvNone
        TabOrder = 1
        OnResize = pnlFieldsResize
        DesignSize = (
          644
          67)
        object bvlNewTitle: TBevel
          Left = 5
          Top = 5
          Width = 117
          Height = 15
        end
        object lblRefDate: TLabel
          Left = 237
          Top = 6
          Width = 97
          Height = 13
          Hint = 'Press "Change..." to change date/time of note.'
          Alignment = taCenter
          Caption = 'Oct 20,1999@15:30'
          ParentShowHint = False
          ShowAccelChar = False
          ShowHint = True
        end
        object lblAuthor: TLabel
          Left = 426
          Top = 6
          Width = 148
          Height = 13
          Hint = 'Press "Change..." to select a different author.'
          Alignment = taRightJustify
          Anchors = [akTop, akRight]
          Caption = 'Winchester,Charles Emerson III'
          ParentShowHint = False
          ShowAccelChar = False
          ShowHint = True
        end
        object lblVisit: TLabel
          Left = 6
          Top = 21
          Width = 200
          Height = 13
          Caption = 'Vst: 10/20/99 Pulmonary Clinic, Dr. Welby'
          ShowAccelChar = False
        end
        object lblCosigner: TLabel
          Left = 331
          Top = 21
          Width = 243
          Height = 13
          Hint = 'Press "Change..." to select a different cosigner.'
          Alignment = taRightJustify
          Anchors = [akTop, akRight]
          AutoSize = False
          Caption = 'Expected Cosigner: Winchester,Charles Emerson III'
          ParentShowHint = False
          ShowAccelChar = False
          ShowHint = True
        end
        object lblSubject: TLabel
          Left = 6
          Top = 43
          Width = 39
          Height = 13
          Caption = 'Subject:'
        end
        object lblNewTitle: TLabel
          Left = 6
          Top = 6
          Width = 115
          Height = 13
          Hint = 'Press "Change..." to select a different title.'
          Caption = ' General Medicine Note '
          Color = clCream
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentColor = False
          ParentFont = False
          ParentShowHint = False
          ShowAccelChar = False
          ShowHint = True
        end
        object cmdChange: TButton
          Left = 580
          Top = 6
          Width = 58
          Height = 21
          Anchors = [akTop, akRight]
          Caption = 'Change...'
          TabOrder = 0
          OnClick = cmdChangeClick
        end
        object txtSubject: TCaptionEdit
          Left = 48
          Top = 40
          Width = 590
          Height = 21
          Hint = 'Subject is limited to a maximum of 80 characters.'
          Anchors = [akLeft, akTop, akRight]
          MaxLength = 80
          ParentShowHint = False
          ShowHint = True
          TabOrder = 1
          Text = 'txtSubject'
          Caption = 'Subject'
        end
      end
    end
  end
  inherited DKLanguageController1: TDKLanguageController
    LangData = {
      0A0066726D53757267657279010200000001000000070043617074696F6E0200
      0000080048656C7046696C6501860000000D0073687050616765426F74746F6D
      00000700737074486F727A00000700706E6C4C65667400000800706E6C526967
      6874000008006C626C4361736573010100000003000000070043617074696F6E
      0009006C626C53706163653100000A00636D644E65774E6F7465010100000004
      000000070043617074696F6E000600636D645043450101000000050000000700
      43617074696F6E000A00706E6C4472617765727300000A0073706C4472617765
      7273000008006C73744E6F746573000009007476537572676572790101000000
      06000000070043617074696F6E0007007370745665727400000700706E6C5265
      6164000008006C626C5469746C65010100000007000000070043617074696F6E
      000A006D656D5375726765727901010000000800000005004C696E6573000A00
      6D656D50434553686F7701010000000900000005004C696E6573000800706E6C
      577269746500000A006D656D4E65774E6F746500000900706E6C4669656C6473
      00000B0062766C4E65775469746C6500000A006C626C52656644617465010200
      00000B000000070043617074696F6E0A000000040048696E740009006C626C41
      7574686F7201020000000D000000070043617074696F6E0C000000040048696E
      740008006C626C566973697401010000000E000000070043617074696F6E000B
      006C626C436F7369676E6572010200000010000000070043617074696F6E0F00
      0000040048696E74000A006C626C5375626A6563740101000000110000000700
      43617074696F6E000B006C626C4E65775469746C650102000000130000000700
      43617074696F6E12000000040048696E74000900636D644368616E6765010100
      000014000000070043617074696F6E000A007478745375626A65637401030000
      0017000000070043617074696F6E15000000040048696E741600000004005465
      78740008006D6E754E6F746573000007006D6E75566965770101000000180000
      00070043617074696F6E000C006D6E7556696577436861727401010000001900
      0000070043617074696F6E000D006D6E754368617274436F7665720101000000
      1A000000070043617074696F6E000D006D6E75436861727450726F6273010100
      00001B000000070043617074696F6E000C006D6E7543686172744D6564730101
      0000001C000000070043617074696F6E000E006D6E7543686172744F72646572
      7301010000001D000000070043617074696F6E000D006D6E7543686172744E6F
      74657301010000001E000000070043617074696F6E000D006D6E754368617274
      43736C747301010000001F000000070043617074696F6E000F006D6E75436861
      727453757267657279010100000020000000070043617074696F6E000E006D6E
      754368617274444353756D6D010100000021000000070043617074696F6E000C
      006D6E7543686172744C616273010100000022000000070043617074696F6E00
      0F006D6E7543686172745265706F727473010100000023000000070043617074
      696F6E0012006D6E7556696577496E666F726D6174696F6E0101000000240000
      00070043617074696F6E000B006D6E755669657744656D6F0101000000250000
      00070043617074696F6E000D006D6E7556696577566973697473010100000026
      000000070043617074696F6E0012006D6E75566965775072696D617279436172
      65010100000027000000070043617074696F6E0013006D6E75566965774D7948
      65616C746865566574010100000028000000070043617074696F6E000C006D6E
      75496E737572616E6365010100000029000000070043617074696F6E000C006D
      6E7556696577466C61677301010000002A000000070043617074696F6E001100
      6D6E755669657752656D6F74654461746101010000002B000000070043617074
      696F6E0010006D6E755669657752656D696E6465727301010000002C00000007
      0043617074696F6E000F006D6E7556696577506F7374696E677301010000002D
      000000070043617074696F6E0002005A3300000A006D6E7556696577416C6C01
      010000002E000000070043617074696F6E0010006D6E75566965774279537572
      67656F6E01010000002F000000070043617074696F6E000D006D6E7556696577
      427944617465010100000030000000070043617074696F6E0011006D6E755669
      6577556E636F7369676E6564010100000031000000070043617074696F6E000F
      006D6E7556696577556E7369676E656401010000003200000007004361707469
      6F6E000D006D6E7556696577437573746F6D0101000000330000000700436170
      74696F6E0002004E31000014006D6E755669657753617665417344656661756C
      74010100000034000000070043617074696F6E00100052657475726E746F4465
      6661756C7431010100000035000000070043617074696F6E0002005A3100000D
      006D6E755669657744657461696C010100000036000000070043617074696F6E
      0002004E3600000D006D6E7549636F6E4C6567656E6401010000003700000007
      0043617074696F6E0006006D6E75416374010100000038000000070043617074
      696F6E0009006D6E754163744E6577010200000039000000070043617074696F
      6E3A000000040048696E74000C006D6E75416374416464656E6401020000003B
      000000070043617074696F6E3C000000040048696E740010006D6E7541637441
      64644944456E74727901010000003D000000070043617074696F6E0018006D6E
      7541637444657461636846726F6D4944506172656E7401010000003E00000007
      0043617074696F6E0002005A3400000C006D6E754163744368616E6765010100
      00003F000000070043617074696F6E0010006D6E754163744C6F6164426F696C
      6572010100000040000000070043617074696F6E0002005A3200000E006D6E75
      4163745369676E4C697374010200000041000000070043617074696F6E420000
      00040048696E74000C006D6E7541637444656C65746501010000004300000007
      0043617074696F6E000A006D6E75416374456469740101000000440000000700
      43617074696F6E000A006D6E7541637453617665010200000045000000070043
      617074696F6E46000000040048696E74000A006D6E754163745369676E010100
      000047000000070043617074696F6E0019006D6E754163744964656E74696679
      4164646C5369676E657273010100000048000000070043617074696F6E000A00
      6D6E754F7074696F6E73010100000049000000070043617074696F6E0010006D
      6E754564697454656D706C6174657301010000004A000000070043617074696F
      6E000E006D6E754E657754656D706C61746501010000004B0000000700436170
      74696F6E0002004E32000016006D6E754564697453686172656454656D706C61
      74657301010000004C000000070043617074696F6E0014006D6E754E65775368
      6172656454656D706C61746501010000004D000000070043617074696F6E0002
      004E33000012006D6E75456469744469616C674669656C647301010000004E00
      0000070043617074696F6E000B00706F704E6F74654D656D6F00000E00706F70
      4E6F74654D656D6F43757401010000004F000000070043617074696F6E000F00
      706F704E6F74654D656D6F436F7079010100000050000000070043617074696F
      6E001000706F704E6F74654D656D6F5061737465010100000051000000070043
      617074696F6E001100706F704E6F74654D656D6F506173746532010100000052
      000000070043617074696F6E001300706F704E6F74654D656D6F5265666F726D
      6174010100000053000000070043617074696F6E001700706F704E6F74654D65
      6D6F53617665436F6E74696E7565010100000054000000070043617074696F6E
      0003005A313100000F00706F704E6F74654D656D6F46696E6401010000005500
      0000070043617074696F6E001200706F704E6F74654D656D6F5265706C616365
      010100000056000000070043617074696F6E0002004E3700001200706F704E6F
      74654D656D6F4772616D6D6172010100000057000000070043617074696F6E00
      1000706F704E6F74654D656D6F5370656C6C0101000000580000000700436170
      74696F6E0003005A313200001300706F704E6F74654D656D6F54656D706C6174
      65010100000059000000070043617074696F6E0003005A313000001300706F70
      4E6F74654D656D6F5369676E4C69737401010000005A00000007004361707469
      6F6E001100706F704E6F74654D656D6F44656C65746501010000005B00000007
      0043617074696F6E000F00706F704E6F74654D656D6F4564697401010000005C
      000000070043617074696F6E001100706F704E6F74654D656D6F416464656E64
      01010000005D000000070043617074696F6E000F00706F704E6F74654D656D6F
      5361766501010000005E000000070043617074696F6E000F00706F704E6F7465
      4D656D6F5369676E01010000005F000000070043617074696F6E001300706F70
      4E6F74654D656D6F4164646C5369676E01010000006000000007004361707469
      6F6E0002004E3800001200706F704E6F74654D656D6F50726576696577010100
      000061000000070043617074696F6E001600706F704E6F74654D656D6F496E73
      54656D706C617465010100000062000000070043617074696F6E001400706F70
      4E6F74654D656D6F456E636F756E746572010100000063000000070043617074
      696F6E000B00706F704E6F74654C69737400000E00706F704E6F74654C697374
      416C6C010100000064000000070043617074696F6E001400706F704E6F74654C
      697374427953757267656F6E010100000065000000070043617074696F6E0011
      00706F704E6F74654C6973744279446174650101000000660000000700436170
      74696F6E001500706F704E6F74654C697374556E636F7369676E656401010000
      0067000000070043617074696F6E001300706F704E6F74654C697374556E7369
      676E6564010100000068000000070043617074696F6E001100706F704E6F7465
      4C697374437573746F6D010100000069000000070043617074696F6E0002004E
      3400001900706F704E6F74654C697374457870616E6453656C65637465640101
      0000006A000000070043617074696F6E001400706F704E6F74654C6973744578
      70616E64416C6C01010000006B000000070043617074696F6E001B00706F704E
      6F74654C697374436F6C6C6170736553656C656374656401010000006C000000
      070043617074696F6E001600706F704E6F74654C697374436F6C6C6170736541
      6C6C01010000006D000000070043617074696F6E0002004E3500001500706F70
      4E6F74654C6973744164644944456E74727901010000006E0000000700436170
      74696F6E001D00706F704E6F74654C69737444657461636846726F6D49445061
      72656E7401010000006F000000070043617074696F6E000B0074696D4175746F
      5361766500000B00646C6746696E645465787400000E00646C675265706C6163
      65546578740000}
  end
  object mnuNotes: TMainMenu
    Left = 600
    Top = 304
    object mnuView: TMenuItem
      Caption = '&View'
      GroupIndex = 3
      object mnuViewChart: TMenuItem
        Caption = 'Chart &Tab'
        object mnuChartCover: TMenuItem
          Tag = 1
          Caption = 'Cover &Sheet'
          ShortCut = 16467
          OnClick = mnuChartTabClick
        end
        object mnuChartProbs: TMenuItem
          Tag = 2
          Caption = '&Problem List'
          ShortCut = 16464
          OnClick = mnuChartTabClick
        end
        object mnuChartMeds: TMenuItem
          Tag = 3
          Caption = '&Medications'
          ShortCut = 16461
          OnClick = mnuChartTabClick
        end
        object mnuChartOrders: TMenuItem
          Tag = 4
          Caption = '&Orders'
          ShortCut = 16463
          OnClick = mnuChartTabClick
        end
        object mnuChartNotes: TMenuItem
          Tag = 6
          Caption = 'Progress &Notes'
          ShortCut = 16462
          OnClick = mnuChartTabClick
        end
        object mnuChartCslts: TMenuItem
          Tag = 7
          Caption = 'Consul&ts'
          ShortCut = 16468
          OnClick = mnuChartTabClick
        end
        object mnuChartSurgery: TMenuItem
          Tag = 11
          Caption = 'S&urgery'
          ShortCut = 16469
          OnClick = mnuChartTabClick
        end
        object mnuChartDCSumm: TMenuItem
          Tag = 8
          Caption = '&Discharge Summaries'
          ShortCut = 16452
          OnClick = mnuChartTabClick
        end
        object mnuChartLabs: TMenuItem
          Tag = 9
          Caption = '&Laboratory'
          ShortCut = 16460
          OnClick = mnuChartTabClick
        end
        object mnuChartReports: TMenuItem
          Tag = 10
          Caption = '&Reports'
          ShortCut = 16466
          OnClick = mnuChartTabClick
        end
      end
      object mnuViewInformation: TMenuItem
        Caption = 'Information'
        OnClick = mnuViewInformationClick
        object mnuViewDemo: TMenuItem
          Tag = 1
          Caption = 'De&mographics...'
          OnClick = ViewInfo
        end
        object mnuViewVisits: TMenuItem
          Tag = 2
          Caption = 'Visits/Pr&ovider...'
          OnClick = ViewInfo
        end
        object mnuViewPrimaryCare: TMenuItem
          Tag = 3
          Caption = 'Primary &Care...'
          OnClick = ViewInfo
        end
        object mnuViewMyHealtheVet: TMenuItem
          Tag = 4
          Caption = 'MyHealthe&Vet...'
          OnClick = ViewInfo
        end
        object mnuInsurance: TMenuItem
          Tag = 5
          Caption = '&Insurance...'
          OnClick = ViewInfo
        end
        object mnuViewFlags: TMenuItem
          Tag = 6
          Caption = '&Flags...'
          OnClick = ViewInfo
        end
        object mnuViewRemoteData: TMenuItem
          Tag = 7
          Caption = 'Remote &Data...'
          OnClick = ViewInfo
        end
        object mnuViewReminders: TMenuItem
          Tag = 8
          Caption = '&Reminders...'
          Enabled = False
          OnClick = ViewInfo
        end
        object mnuViewPostings: TMenuItem
          Tag = 9
          Caption = '&Postings...'
          OnClick = ViewInfo
        end
      end
      object Z3: TMenuItem
        Caption = '-'
      end
      object mnuViewAll: TMenuItem
        Tag = 1
        Caption = '&All Cases'
        OnClick = mnuViewClick
      end
      object mnuViewBySurgeon: TMenuItem
        Tag = 4
        Caption = 'Cases by &Surgeon'
        Enabled = False
        Visible = False
        OnClick = mnuViewClick
      end
      object mnuViewByDate: TMenuItem
        Tag = 5
        Caption = 'Cases by Date &Range'
        Enabled = False
        Visible = False
        OnClick = mnuViewClick
      end
      object mnuViewUncosigned: TMenuItem
        Tag = 3
        Caption = 'Un&cosigned Notes'
        Enabled = False
        Visible = False
        OnClick = mnuViewClick
      end
      object mnuViewUnsigned: TMenuItem
        Tag = 2
        Caption = '&Unsigned Notes'
        Enabled = False
        Visible = False
        OnClick = mnuViewClick
      end
      object mnuViewCustom: TMenuItem
        Tag = 6
        Caption = 'Custo&m View'
        OnClick = mnuViewClick
      end
      object N1: TMenuItem
        Caption = '-'
        Enabled = False
      end
      object mnuViewSaveAsDefault: TMenuItem
        Caption = 'Sa&ve as Default View'
        OnClick = mnuViewSaveAsDefaultClick
      end
      object ReturntoDefault1: TMenuItem
        Caption = 'Return to De&fault View'
        OnClick = mnuViewReturntoDefaultClick
      end
      object Z1: TMenuItem
        Caption = '-'
        Enabled = False
      end
      object mnuViewDetail: TMenuItem
        Caption = '&Details'
        OnClick = mnuViewDetailClick
      end
      object N6: TMenuItem
        Caption = '-'
        Enabled = False
      end
      object mnuIconLegend: TMenuItem
        Caption = 'Icon Legend'
        OnClick = mnuIconLegendClick
      end
    end
    object mnuAct: TMenuItem
      Caption = '&Action'
      GroupIndex = 4
      object mnuActNew: TMenuItem
        Caption = '&New Report'
        Hint = 'Creates a new operative summary'
        ShortCut = 24654
        Visible = False
        OnClick = mnuActNewClick
      end
      object mnuActAddend: TMenuItem
        Caption = '&Make Addendum...'
        Hint = 'Makes an addendum for the currently selected report'
        ShortCut = 24653
        OnClick = mnuActAddendClick
      end
      object mnuActAddIDEntry: TMenuItem
        Caption = 'Add Ne&w Entry to Interdisciplinary Note'
        Enabled = False
        Visible = False
      end
      object mnuActDetachFromIDParent: TMenuItem
        Caption = 'Detac&h from Interdisciplinary Note'
        Enabled = False
        Visible = False
      end
      object Z4: TMenuItem
        Caption = '-'
        Enabled = False
      end
      object mnuActChange: TMenuItem
        Caption = '&Change Title...'
        ShortCut = 24643
        OnClick = mnuActChangeClick
      end
      object mnuActLoadBoiler: TMenuItem
        Caption = 'Reload &Boilerplate Text'
        OnClick = mnuActLoadBoilerClick
      end
      object Z2: TMenuItem
        Caption = '-'
        Enabled = False
      end
      object mnuActSignList: TMenuItem
        Caption = 'Add to Signature &List'
        Hint = 
          'Adds the currently displayed report to list of things to be sign' +
          'ed'
        OnClick = mnuActSignListClick
      end
      object mnuActDelete: TMenuItem
        Caption = '&Delete Report'
        ShortCut = 24644
        OnClick = mnuActDeleteClick
      end
      object mnuActEdit: TMenuItem
        Caption = '&Edit Report...'
        ShortCut = 24645
        OnClick = mnuActEditClick
      end
      object mnuActSave: TMenuItem
        Caption = 'S&ave without Signature'
        Hint = 'Saves the report that is being edited'
        ShortCut = 24641
        OnClick = mnuActSaveClick
      end
      object mnuActSign: TMenuItem
        Caption = 'Si&gn Report Now...'
        ShortCut = 24647
        OnClick = mnuActSignClick
      end
      object mnuActIdentifyAddlSigners: TMenuItem
        Caption = '&Identify Additional Signers'
        OnClick = mnuActIdentifyAddlSignersClick
      end
    end
    object mnuOptions: TMenuItem
      Caption = '&Options'
      GroupIndex = 4
      OnClick = mnuOptionsClick
      object mnuEditTemplates: TMenuItem
        Caption = 'Edit &Templates...'
        Enabled = False
        OnClick = mnuEditTemplatesClick
      end
      object mnuNewTemplate: TMenuItem
        Caption = 'Create &New Template...'
        Enabled = False
        OnClick = mnuNewTemplateClick
      end
      object N2: TMenuItem
        Caption = '-'
        Enabled = False
      end
      object mnuEditSharedTemplates: TMenuItem
        Caption = 'Edit &Shared Templates...'
        Enabled = False
        OnClick = mnuEditSharedTemplatesClick
      end
      object mnuNewSharedTemplate: TMenuItem
        Caption = '&Create New Shared Template...'
        Enabled = False
        OnClick = mnuNewSharedTemplateClick
      end
      object N3: TMenuItem
        Caption = '-'
        Enabled = False
        OnClick = cmdChangeClick
      end
      object mnuEditDialgFields: TMenuItem
        Caption = 'Edit Template &Fields'
        Enabled = False
        OnClick = mnuEditDialgFieldsClick
      end
    end
  end
  object popNoteMemo: TPopupMenu
    OnPopup = popNoteMemoPopup
    Left = 540
    Top = 304
    object popNoteMemoCut: TMenuItem
      Caption = 'Cu&t'
      ShortCut = 16472
      OnClick = popNoteMemoCutClick
    end
    object popNoteMemoCopy: TMenuItem
      Caption = '&Copy'
      ShortCut = 16451
      OnClick = popNoteMemoCopyClick
    end
    object popNoteMemoPaste: TMenuItem
      Caption = '&Paste'
      ShortCut = 16470
      OnClick = popNoteMemoPasteClick
    end
    object popNoteMemoPaste2: TMenuItem
      Caption = 'Paste2'
      ShortCut = 8237
      Visible = False
      OnClick = popNoteMemoPasteClick
    end
    object popNoteMemoReformat: TMenuItem
      Caption = 'Reformat Paragraph'
      ShortCut = 24658
      OnClick = popNoteMemoReformatClick
    end
    object popNoteMemoSaveContinue: TMenuItem
      Caption = 'Save && Continue Editing'
      ShortCut = 24659
      Visible = False
      OnClick = popNoteMemoSaveContinueClick
    end
    object Z11: TMenuItem
      Caption = '-'
    end
    object popNoteMemoFind: TMenuItem
      Caption = '&Find in Selected Document'
      OnClick = popNoteMemoFindClick
    end
    object popNoteMemoReplace: TMenuItem
      Caption = '&Replace Text'
      OnClick = popNoteMemoReplaceClick
    end
    object N7: TMenuItem
      Caption = '-'
      OnClick = cmdChangeClick
    end
    object popNoteMemoGrammar: TMenuItem
      Caption = 'Check &Grammar'
      OnClick = popNoteMemoGrammarClick
    end
    object popNoteMemoSpell: TMenuItem
      Caption = 'C&heck Spelling'
      OnClick = popNoteMemoSpellClick
    end
    object Z12: TMenuItem
      Caption = '-'
    end
    object popNoteMemoTemplate: TMenuItem
      Caption = 'Copy into New &Template'
      OnClick = popNoteMemoTemplateClick
    end
    object Z10: TMenuItem
      Caption = '-'
    end
    object popNoteMemoSignList: TMenuItem
      Caption = 'Add to Signature &List'
      OnClick = mnuActSignListClick
    end
    object popNoteMemoDelete: TMenuItem
      Caption = '&Delete Report'
      OnClick = mnuActDeleteClick
    end
    object popNoteMemoEdit: TMenuItem
      Caption = '&Edit Report'
      OnClick = mnuActEditClick
    end
    object popNoteMemoAddend: TMenuItem
      Caption = '&Make Addendum'
      OnClick = mnuActAddendClick
    end
    object popNoteMemoSave: TMenuItem
      Caption = 'S&ave without Signature'
      OnClick = mnuActSaveClick
    end
    object popNoteMemoSign: TMenuItem
      Caption = '&Sign Report Now'
      OnClick = mnuActSignClick
    end
    object popNoteMemoAddlSign: TMenuItem
      Caption = '&Identify Additional Signers'
      OnClick = popNoteMemoAddlSignClick
    end
    object N8: TMenuItem
      Caption = '-'
    end
    object popNoteMemoPreview: TMenuItem
      Caption = 'Previe&w/Print Current Template'
      ShortCut = 16471
      OnClick = popNoteMemoPreviewClick
    end
    object popNoteMemoInsTemplate: TMenuItem
      Caption = 'Insert Current Template'
      ShortCut = 16429
      OnClick = popNoteMemoInsTemplateClick
    end
    object popNoteMemoEncounter: TMenuItem
      Caption = 'Edit Encounter Information'
      ShortCut = 16453
      OnClick = cmdPCEClick
    end
  end
  object popNoteList: TPopupMenu
    OnPopup = popNoteListPopup
    Left = 500
    Top = 305
    object popNoteListAll: TMenuItem
      Tag = 1
      Caption = '&All cases'
      OnClick = mnuViewClick
    end
    object popNoteListBySurgeon: TMenuItem
      Tag = 4
      Caption = 'Cases by &Surgeon'
      Enabled = False
      Visible = False
      OnClick = mnuViewClick
    end
    object popNoteListByDate: TMenuItem
      Tag = 5
      Caption = 'Cases by Date &Range'
      Enabled = False
      OnClick = mnuViewClick
    end
    object popNoteListUncosigned: TMenuItem
      Tag = 3
      Caption = 'Un&cosigned Notes'
      Enabled = False
      Visible = False
      OnClick = mnuViewClick
    end
    object popNoteListUnsigned: TMenuItem
      Tag = 2
      Caption = '&Unsigned Notes'
      Enabled = False
      Visible = False
      OnClick = mnuViewClick
    end
    object popNoteListCustom: TMenuItem
      Tag = 6
      Caption = 'Cus&tom List'
      OnClick = mnuViewClick
    end
    object N4: TMenuItem
      Caption = '-'
    end
    object popNoteListExpandSelected: TMenuItem
      Caption = '&Expand Selected'
      OnClick = popNoteListExpandSelectedClick
    end
    object popNoteListExpandAll: TMenuItem
      Caption = 'E&xpand All'
      OnClick = popNoteListExpandAllClick
    end
    object popNoteListCollapseSelected: TMenuItem
      Caption = 'C&ollapse Selected'
      OnClick = popNoteListCollapseSelectedClick
    end
    object popNoteListCollapseAll: TMenuItem
      Caption = 'Co&llapse All'
      OnClick = popNoteListCollapseAllClick
    end
    object N5: TMenuItem
      Caption = '-'
    end
    object popNoteListAddIDEntry: TMenuItem
      Caption = 'Add Ne&w Entry to ID Note'
      Enabled = False
    end
    object popNoteListDetachFromIDParent: TMenuItem
      Caption = 'Detac&h from ID Note'
      Enabled = False
    end
  end
  object timAutoSave: TTimer
    Enabled = False
    Interval = 300000
    OnTimer = timAutoSaveTimer
    Left = 592
    Top = 11
  end
  object dlgFindText: TFindDialog
    Options = [frDown, frHideUpDown]
    OnFind = dlgFindTextFind
    Left = 452
    Top = 312
  end
  object dlgReplaceText: TReplaceDialog
    OnFind = dlgReplaceTextFind
    OnReplace = dlgReplaceTextReplace
    Left = 413
    Top = 312
  end
end