inherited frmDCSumm: TfrmDCSumm
  Left = 222
  Top = 126
  Width = 687
  Height = 409
  HelpContext = 7000
  Caption = 'Discharge Summary Page'
  HelpFile = 'overvw'
  Menu = mnuSumms
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  inherited shpPageBottom: TShape
    Top = 350
    Width = 679
  end
  inherited sptHorz: TSplitter
    Left = 64
    Width = 3
    Height = 350
    OnCanResize = sptHorzCanResize
  end
  inherited pnlLeft: TPanel
    Width = 64
    Height = 350
    object lblSumms: TOROffsetLabel
      Left = 0
      Top = 0
      Width = 64
      Height = 19
      Align = alTop
      Caption = 'Last 100 Summaries'
      HorzOffset = 2
      ParentShowHint = False
      ShowHint = True
      Transparent = True
      VertOffset = 6
      WordWrap = False
    end
    object lblSpace1: TLabel
      Left = 0
      Top = 326
      Width = 64
      Height = 3
      Align = alBottom
      AutoSize = False
      Caption = ' '
    end
    object cmdNewSumm: TORAlignButton
      Left = 0
      Top = 305
      Width = 64
      Height = 21
      Caption = 'New Summary'
      TabOrder = 1
      OnClick = cmdNewSummClick
      Align = alBottom
    end
    object cmdPCE: TORAlignButton
      Left = 0
      Top = 329
      Width = 64
      Height = 21
      Caption = 'Encounter'
      TabOrder = 2
      Visible = False
      OnClick = cmdPCEClick
      Align = alBottom
    end
    object pnlDrawers: TPanel
      Left = 0
      Top = 19
      Width = 64
      Height = 286
      Align = alClient
      BevelOuter = bvNone
      TabOrder = 0
      object splDrawers: TSplitter
        Left = 0
        Top = 283
        Width = 64
        Height = 3
        Cursor = crVSplit
        Align = alBottom
      end
      object lstSumms: TORListBox
        Left = 0
        Top = 0
        Width = 64
        Height = 33
        TabStop = False
        Ctl3D = True
        ItemHeight = 13
        ParentCtl3D = False
        ParentShowHint = False
        PopupMenu = popSummList
        ShowHint = True
        TabOrder = 0
        Visible = False
        OnClick = lstSummsClick
        ItemTipColor = clWindow
        LongList = False
        Pieces = '2,3'
        TabPositions = '10,20'
      end
      object tvSumms: TORTreeView
        Left = 0
        Top = 0
        Width = 64
        Height = 283
        Align = alClient
        Constraints.MinWidth = 30
        HideSelection = False
        Indent = 19
        PopupMenu = popSummList
        ReadOnly = True
        TabOrder = 1
        OnAddition = tvSummsAddition
        OnChange = tvSummsChange
        OnClick = tvSummsClick
        OnCollapsed = tvSummsCollapsed
        OnDeletion = tvSummsDeletion
        OnDragDrop = tvSummsDragDrop
        OnDragOver = tvSummsDragOver
        OnExpanded = tvSummsExpanded
        OnStartDrag = tvSummsStartDrag
        Caption = 'Last 100 Summaries'
        NodePiece = 0
        ShortNodeCaptions = True
      end
    end
  end
  inherited pnlRight: TPanel
    Left = 67
    Width = 612
    Height = 350
    object sptVert: TSplitter
      Left = 0
      Top = 301
      Width = 612
      Height = 4
      Cursor = crVSplit
      Align = alBottom
    end
    object memPCEShow: TRichEdit
      Left = 0
      Top = 305
      Width = 612
      Height = 45
      Align = alBottom
      Color = clCream
      Lines.Strings = (
        '<No encounter information entered>')
      PlainText = True
      ReadOnly = True
      ScrollBars = ssVertical
      TabOrder = 2
      WantReturns = False
      WordWrap = False
    end
    object pnlWrite: TPanel
      Left = 0
      Top = 0
      Width = 612
      Height = 301
      Align = alClient
      BevelOuter = bvNone
      TabOrder = 1
      Visible = False
      OnResize = pnlWriteResize
      object memNewSumm: TRichEdit
        Left = 0
        Top = 52
        Width = 612
        Height = 249
        Align = alClient
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Courier New'
        Font.Style = []
        ParentFont = False
        PlainText = True
        PopupMenu = popSummMemo
        ScrollBars = ssVertical
        TabOrder = 1
        WantTabs = True
        OnChange = memNewSummChange
        OnKeyUp = memNewSummKeyUp
      end
      object pnlFields: TORAutoPanel
        Left = 0
        Top = 0
        Width = 612
        Height = 52
        Align = alTop
        BevelOuter = bvNone
        TabOrder = 0
        DesignSize = (
          612
          52)
        object bvlNewTitle: TBevel
          Left = 5
          Top = 5
          Width = 102
          Height = 15
        end
        object lblNewTitle: TStaticText
          Left = 6
          Top = 6
          Width = 104
          Height = 17
          Hint = 'Press "Change..." to select a different title.'
          Caption = ' Discharge Summary '
          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
          TabOrder = 1
        end
        object lblVisit: TStaticText
          Left = 6
          Top = 21
          Width = 123
          Height = 17
          Caption = 'Adm: 10/20/99   2BMED'
          ShowAccelChar = False
          TabOrder = 2
        end
        object lblRefDate: TStaticText
          Left = 237
          Top = 6
          Width = 101
          Height = 17
          Hint = 'Press "Change..." to change date/time of summary.'
          Alignment = taCenter
          Caption = 'Oct 20,1999@15:30'
          ParentShowHint = False
          ShowAccelChar = False
          ShowHint = True
          TabOrder = 3
        end
        object lblCosigner: TStaticText
          Left = 307
          Top = 21
          Width = 199
          Height = 13
          Hint = 'Press "Change..." to select a different attending.'
          Alignment = taRightJustify
          Anchors = [akTop, akRight]
          AutoSize = False
          Caption = 'Attending: Winchester,Charles Emerson III'
          ParentShowHint = False
          ShowAccelChar = False
          ShowHint = True
          TabOrder = 4
        end
        object lblDictator: TStaticText
          Left = 402
          Top = 6
          Width = 152
          Height = 17
          Hint = 'Press "Change..." to select a different author.'
          Alignment = taRightJustify
          Anchors = [akTop, akRight]
          Caption = 'Winchester,Charles Emerson III'
          ParentShowHint = False
          ShowAccelChar = False
          ShowHint = True
          TabOrder = 5
        end
        object lblDischarge: TStaticText
          Left = 6
          Top = 34
          Width = 71
          Height = 17
          Caption = 'Dis: 03/20/00'
          ShowAccelChar = False
          TabOrder = 6
        end
        object cmdChange: TButton
          Left = 554
          Top = 10
          Width = 58
          Height = 21
          Anchors = [akTop, akRight]
          Caption = 'Change...'
          TabOrder = 0
          OnClick = cmdChangeClick
        end
      end
    end
    object pnlRead: TPanel
      Left = 0
      Top = 0
      Width = 612
      Height = 301
      Align = alClient
      BevelOuter = bvNone
      TabOrder = 0
      object lblTitle: TOROffsetLabel
        Left = 0
        Top = 0
        Width = 612
        Height = 19
        Hint = 'No Discharge Summaries Found'
        Align = alTop
        Caption = 'No Discharge Summaries 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 sptList: TSplitter
        Left = 0
        Top = 113
        Width = 612
        Height = 3
        Cursor = crVSplit
        Align = alTop
      end
      object memSumm: TRichEdit
        Left = 0
        Top = 116
        Width = 612
        Height = 185
        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 = popSummMemo
        ReadOnly = True
        ScrollBars = ssBoth
        TabOrder = 0
        WantReturns = False
        WordWrap = False
      end
      object lvSumms: TCaptionListView
        Left = 0
        Top = 19
        Width = 612
        Height = 94
        Align = alTop
        Columns = <
          item
            Caption = 'Date'
            Width = 100
          end
          item
            AutoSize = True
            Caption = 'Title'
          end
          item
            AutoSize = True
            Caption = 'Subject'
          end
          item
            AutoSize = True
            Caption = 'Author'
          end
          item
            AutoSize = True
            Caption = 'Location'
          end
          item
            Caption = 'fmdate'
            Width = 0
          end
          item
            Caption = 'TIUDA'
            Width = 0
          end>
        Constraints.MinHeight = 50
        HideSelection = False
        ReadOnly = True
        RowSelect = True
        TabOrder = 1
        ViewStyle = vsReport
        Visible = False
        OnColumnClick = lvSummsColumnClick
        OnCompare = lvSummsCompare
        OnResize = lvSummsResize
        OnSelectItem = lvSummsSelectItem
        Caption = 'No Discharge Summaries Found'
      end
    end
  end
  inherited DKLanguageController1: TDKLanguageController
    LangData = {
      090066726D444353756D6D010200000001000000070043617074696F6E020000
      00080048656C7046696C6501890000000D0073687050616765426F74746F6D00
      000700737074486F727A00000700706E6C4C65667400000800706E6C52696768
      74000008006C626C53756D6D73010100000003000000070043617074696F6E00
      09006C626C53706163653100000A00636D644E657753756D6D01010000000400
      0000070043617074696F6E000600636D64504345010100000005000000070043
      617074696F6E000A00706E6C4472617765727300000A0073706C447261776572
      73000008006C737453756D6D7300000700747653756D6D730101000000060000
      00070043617074696F6E0007007370745665727400000A006D656D5043455368
      6F7701010000000700000005004C696E6573000800706E6C577269746500000A
      006D656D4E657753756D6D00000900706E6C4669656C647300000B0062766C4E
      65775469746C6500000B006C626C4E65775469746C6501020000000900000007
      0043617074696F6E08000000040048696E740008006C626C5669736974010100
      00000A000000070043617074696F6E000A006C626C5265664461746501020000
      000C000000070043617074696F6E0B000000040048696E74000B006C626C436F
      7369676E657201020000000E000000070043617074696F6E0D00000004004869
      6E74000B006C626C4469637461746F7201020000001000000007004361707469
      6F6E0F000000040048696E74000C006C626C4469736368617267650101000000
      11000000070043617074696F6E000900636D644368616E676501010000001200
      0000070043617074696F6E000700706E6C52656164000008006C626C5469746C
      65010200000014000000070043617074696F6E13000000040048696E74000700
      7370744C697374000007006D656D53756D6D01010000001500000005004C696E
      65730007006C7653756D6D7301080000001D000000070043617074696F6E1600
      00001200436F6C756D6E735B305D2E43617074696F6E170000001200436F6C75
      6D6E735B315D2E43617074696F6E180000001200436F6C756D6E735B325D2E43
      617074696F6E190000001200436F6C756D6E735B335D2E43617074696F6E1A00
      00001200436F6C756D6E735B345D2E43617074696F6E1B0000001200436F6C75
      6D6E735B355D2E43617074696F6E1C0000001200436F6C756D6E735B365D2E43
      617074696F6E0008006D6E7553756D6D73000007006D6E755669657701010000
      001E000000070043617074696F6E000C006D6E75566965774368617274010100
      00001F000000070043617074696F6E000D006D6E754368617274436F76657201
      0100000020000000070043617074696F6E000D006D6E75436861727450726F62
      73010100000021000000070043617074696F6E000C006D6E7543686172744D65
      6473010100000022000000070043617074696F6E000E006D6E7543686172744F
      7264657273010100000023000000070043617074696F6E000D006D6E75436861
      727453756D6D73010100000024000000070043617074696F6E000D006D6E7543
      6861727443736C7473010100000025000000070043617074696F6E000F006D6E
      75436861727453757267657279010100000026000000070043617074696F6E00
      0E006D6E754368617274444353756D6D01010000002700000007004361707469
      6F6E000C006D6E7543686172744C616273010100000028000000070043617074
      696F6E000F006D6E7543686172745265706F7274730101000000290000000700
      43617074696F6E0012006D6E7556696577496E666F726D6174696F6E01010000
      002A000000070043617074696F6E000B006D6E755669657744656D6F01010000
      002B000000070043617074696F6E000D006D6E75566965775669736974730101
      0000002C000000070043617074696F6E0012006D6E75566965775072696D6172
      794361726501010000002D000000070043617074696F6E0013006D6E75566965
      774D794865616C74686556657401010000002E000000070043617074696F6E00
      0C006D6E75496E737572616E636501010000002F000000070043617074696F6E
      000C006D6E7556696577466C616773010100000030000000070043617074696F
      6E0011006D6E755669657752656D6F7465446174610101000000310000000700
      43617074696F6E0010006D6E755669657752656D696E64657273010100000032
      000000070043617074696F6E000F006D6E7556696577506F7374696E67730101
      00000033000000070043617074696F6E0002005A3300000A006D6E7556696577
      416C6C010100000034000000070043617074696F6E000F006D6E755669657742
      79417574686F72010100000035000000070043617074696F6E000D006D6E7556
      696577427944617465010100000036000000070043617074696F6E0011006D6E
      7556696577556E636F7369676E6564010100000037000000070043617074696F
      6E000F006D6E7556696577556E7369676E656401010000003800000007004361
      7074696F6E000D006D6E7556696577437573746F6D0101000000390000000700
      43617074696F6E0002004E31000014006D6E7556696577536176654173446566
      61756C7401010000003A000000070043617074696F6E0016006D6E7556696577
      52657475726E546F44656661756C7401010000003B000000070043617074696F
      6E0002005A3100000D006D6E755669657744657461696C01010000003C000000
      070043617074696F6E0002004E3700000D006D6E7549636F6E4C6567656E6401
      010000003D000000070043617074696F6E0006006D6E7541637401010000003E
      000000070043617074696F6E0009006D6E754163744E657701020000003F0000
      00070043617074696F6E40000000040048696E74000C006D6E75416374416464
      656E64010200000041000000070043617074696F6E42000000040048696E7400
      10006D6E754163744164644944456E7472790101000000430000000700436170
      74696F6E0016006D6E75416374417474616368746F4944506172656E74010100
      000044000000070043617074696F6E0018006D6E754163744465746163684672
      6F6D4944506172656E74010100000045000000070043617074696F6E0002005A
      3200000C006D6E754163744368616E6765010100000046000000070043617074
      696F6E0010006D6E754163744C6F6164426F696C657201010000004700000007
      0043617074696F6E0002005A3400000E006D6E754163745369676E4C69737401
      0200000048000000070043617074696F6E49000000040048696E74000C006D6E
      7541637444656C65746501010000004A000000070043617074696F6E000A006D
      6E754163744564697401010000004B000000070043617074696F6E000A006D6E
      754163745361766501020000004C000000070043617074696F6E4D0000000400
      48696E74000A006D6E754163745369676E01010000004E000000070043617074
      696F6E0019006D6E754163744964656E746966794164646C5369676E65727301
      010000004F000000070043617074696F6E000A006D6E754F7074696F6E730101
      00000050000000070043617074696F6E0010006D6E754564697454656D706C61
      746573010100000051000000070043617074696F6E000E006D6E754E65775465
      6D706C617465010100000052000000070043617074696F6E0002004E33000016
      006D6E754564697453686172656454656D706C61746573010100000053000000
      070043617074696F6E0014006D6E754E657753686172656454656D706C617465
      010100000054000000070043617074696F6E0002004E34000012006D6E754564
      69744469616C674669656C6473010100000055000000070043617074696F6E00
      0B00706F7053756D6D4D656D6F00000E00706F7053756D6D4D656D6F43757401
      0100000056000000070043617074696F6E000F00706F7053756D6D4D656D6F43
      6F7079010100000057000000070043617074696F6E001000706F7053756D6D4D
      656D6F5061737465010100000058000000070043617074696F6E001100706F70
      53756D6D4D656D6F506173746532010100000059000000070043617074696F6E
      001300706F7053756D6D4D656D6F5265666F726D617401010000005A00000007
      0043617074696F6E001700706F7053756D6D4D656D6F53617665436F6E74696E
      756501010000005B000000070043617074696F6E0003005A313100000F00706F
      7053756D6D4D656D6F46696E6401010000005C000000070043617074696F6E00
      1200706F7053756D6D4D656D6F5265706C61636501010000005D000000070043
      617074696F6E0002004E3800001200706F7053756D6D4D656D6F4772616D6D61
      7201010000005E000000070043617074696F6E001000706F7053756D6D4D656D
      6F5370656C6C01010000005F000000070043617074696F6E0002004E32000013
      00706F7053756D6D4D656D6F54656D706C617465010100000060000000070043
      617074696F6E0003005A313000001300706F7053756D6D4D656D6F5369676E4C
      697374010100000061000000070043617074696F6E001100706F7053756D6D4D
      656D6F44656C657465010100000062000000070043617074696F6E000F00706F
      7053756D6D4D656D6F45646974010100000063000000070043617074696F6E00
      1100706F7053756D6D4D656D6F416464656E6401010000006400000007004361
      7074696F6E000F00706F7053756D6D4D656D6F53617665010100000065000000
      070043617074696F6E000F00706F7053756D6D4D656D6F5369676E0101000000
      66000000070043617074696F6E001300706F7053756D6D4D656D6F4164646C53
      69676E010100000067000000070043617074696F6E0002004E3900001200706F
      7053756D6D4D656D6F5072657669657701010000006800000007004361707469
      6F6E001600706F7053756D6D4D656D6F496E7354656D706C6174650101000000
      69000000070043617074696F6E001400706F7053756D6D4D656D6F456E636F75
      6E74657201010000006A000000070043617074696F6E000B00706F7053756D6D
      4C69737400000E00706F7053756D6D4C697374416C6C01010000006B00000007
      0043617074696F6E001300706F7053756D6D4C6973744279417574686F720101
      0000006C000000070043617074696F6E001100706F7053756D6D4C6973744279
      4461746501010000006D000000070043617074696F6E001500706F7053756D6D
      4C697374556E636F7369676E656401010000006E000000070043617074696F6E
      001300706F7053756D6D4C697374556E7369676E656401010000006F00000007
      0043617074696F6E001100706F7053756D6D4C697374437573746F6D01010000
      0070000000070043617074696F6E0002004E3500001900706F7053756D6D4C69
      7374457870616E6453656C656374656401010000007100000007004361707469
      6F6E001400706F7053756D6D4C697374457870616E64416C6C01010000007200
      0000070043617074696F6E001B00706F7053756D6D4C697374436F6C6C617073
      6553656C6563746564010100000073000000070043617074696F6E001600706F
      7053756D6D4C697374436F6C6C61707365416C6C010100000074000000070043
      617074696F6E0002004E3600001500706F7053756D6D4C697374416464494445
      6E747279010100000075000000070043617074696F6E001B00706F7053756D6D
      4C697374417474616368746F4944506172656E74010100000076000000070043
      617074696F6E001D00706F7053756D6D4C69737444657461636846726F6D4944
      506172656E74010100000077000000070043617074696F6E000B0074696D4175
      746F5361766500000B00646C6746696E645465787400000E00646C675265706C
      616365546578740000}
  end
  object mnuSumms: TMainMenu
    Left = 596
    Top = 305
    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 mnuChartSumms: 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 = '&Signed Summaries (All)'
        OnClick = mnuViewClick
      end
      object mnuViewByAuthor: TMenuItem
        Tag = 4
        Caption = 'Signed Summaries by &Author'
        OnClick = mnuViewClick
      end
      object mnuViewByDate: TMenuItem
        Tag = 5
        Caption = 'Signed Summaries by Date &Range'
        OnClick = mnuViewClick
      end
      object mnuViewUncosigned: TMenuItem
        Tag = 3
        Caption = 'Un&cosigned Summaries'
        OnClick = mnuViewClick
      end
      object mnuViewUnsigned: TMenuItem
        Tag = 2
        Caption = '&Unsigned Summaries'
        OnClick = mnuViewClick
      end
      object mnuViewCustom: TMenuItem
        Tag = 6
        Caption = 'Custo&m View'
        OnClick = mnuViewClick
      end
      object N1: TMenuItem
        Caption = '-'
      end
      object mnuViewSaveAsDefault: TMenuItem
        Caption = 'Sa&ve as Default View'
        OnClick = mnuViewSaveAsDefaultClick
      end
      object mnuViewReturnToDefault: TMenuItem
        Caption = 'Return to De&fault View'
        OnClick = mnuViewReturntoDefaultClick
      end
      object Z1: TMenuItem
        Caption = '-'
      end
      object mnuViewDetail: TMenuItem
        Caption = '&Details'
        OnClick = mnuViewDetailClick
      end
      object N7: TMenuItem
        Caption = '-'
      end
      object mnuIconLegend: TMenuItem
        Caption = 'Icon Legend'
        OnClick = mnuIconLegendClick
      end
    end
    object mnuAct: TMenuItem
      Caption = '&Action'
      GroupIndex = 4
      object mnuActNew: TMenuItem
        Caption = '&New Discharge Summary...'
        Hint = 'Creates a new Discharge Summary'
        ShortCut = 24654
        OnClick = mnuActNewClick
      end
      object mnuActAddend: TMenuItem
        Caption = '&Make Addendum...'
        Hint = 'Makes an addendum for the currently selected Discharge Summary'
        ShortCut = 24653
        OnClick = mnuActAddendClick
      end
      object mnuActAddIDEntry: TMenuItem
        Caption = 'Add Ne&w Entry to Interdisciplinary Note'
        OnClick = mnuActAddIDEntryClick
      end
      object mnuActAttachtoIDParent: TMenuItem
        Caption = 'A&ttach to Interdisciplinary Note'
        OnClick = mnuActAttachtoIDParentClick
      end
      object mnuActDetachFromIDParent: TMenuItem
        Caption = 'Detac&h from Interdisciplinary Note'
        OnClick = mnuActDetachFromIDParentClick
      end
      object Z2: TMenuItem
        Caption = '-'
      end
      object mnuActChange: TMenuItem
        Caption = '&Change Title...'
        ShortCut = 24643
        OnClick = mnuActChangeClick
      end
      object mnuActLoadBoiler: TMenuItem
        Caption = 'Reload &Boilerplate Text'
        OnClick = mnuActLoadBoilerClick
      end
      object Z4: TMenuItem
        Caption = '-'
      end
      object mnuActSignList: TMenuItem
        Caption = 'Add to Signature &List'
        Hint = 
          'Adds the currently displayed Discharge Summary to list of things' +
          ' to be signed'
        OnClick = mnuActSignListClick
      end
      object mnuActDelete: TMenuItem
        Caption = '&Delete Discharge Summary...'
        ShortCut = 24644
        OnClick = mnuActDeleteClick
      end
      object mnuActEdit: TMenuItem
        Caption = '&Edit Discharge Summary...'
        ShortCut = 24645
        OnClick = mnuActEditClick
      end
      object mnuActSave: TMenuItem
        Caption = 'S&ave without Signature'
        Hint = 'Saves the Discharge Summary that is being edited'
        ShortCut = 24641
        OnClick = mnuActSaveClick
      end
      object mnuActSign: TMenuItem
        Caption = 'Si&gn Discharge Summary 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...'
        OnClick = mnuEditTemplatesClick
      end
      object mnuNewTemplate: TMenuItem
        Caption = 'Create &New Template...'
        OnClick = mnuNewTemplateClick
      end
      object N3: TMenuItem
        Caption = '-'
      end
      object mnuEditSharedTemplates: TMenuItem
        Caption = 'Edit &Shared Templates...'
        OnClick = mnuEditSharedTemplatesClick
      end
      object mnuNewSharedTemplate: TMenuItem
        Caption = '&Create New Shared Template...'
        OnClick = mnuNewSharedTemplateClick
      end
      object N4: TMenuItem
        Caption = '-'
      end
      object mnuEditDialgFields: TMenuItem
        Caption = 'Edit Template &Fields'
        OnClick = mnuEditDialgFieldsClick
      end
    end
  end
  object popSummMemo: TPopupMenu
    OnPopup = popSummMemoPopup
    Left = 539
    Top = 304
    object popSummMemoCut: TMenuItem
      Caption = 'Cu&t'
      ShortCut = 16472
      OnClick = popSummMemoCutClick
    end
    object popSummMemoCopy: TMenuItem
      Caption = '&Copy'
      ShortCut = 16451
      OnClick = popSummMemoCopyClick
    end
    object popSummMemoPaste: TMenuItem
      Caption = '&Paste'
      ShortCut = 16470
      OnClick = popSummMemoPasteClick
    end
    object popSummMemoPaste2: TMenuItem
      Caption = 'Paste2'
      ShortCut = 8237
      Visible = False
      OnClick = popSummMemoPasteClick
    end
    object popSummMemoReformat: TMenuItem
      Caption = 'Re&format Paragraph'
      ShortCut = 24658
      OnClick = popSummMemoReformatClick
    end
    object popSummMemoSaveContinue: TMenuItem
      Caption = 'Save && Continue Editing'
      ShortCut = 24659
      Visible = False
      OnClick = popSummMemoSaveContinueClick
    end
    object Z11: TMenuItem
      Caption = '-'
    end
    object popSummMemoFind: TMenuItem
      Caption = '&Find in Selected Summary'
      OnClick = popSummMemoFindClick
    end
    object popSummMemoReplace: TMenuItem
      Caption = '&Replace Text'
      OnClick = popSummMemoReplaceClick
    end
    object N8: TMenuItem
      Caption = '-'
    end
    object popSummMemoGrammar: TMenuItem
      Caption = 'Check &Grammar'
      OnClick = popSummMemoGrammarClick
    end
    object popSummMemoSpell: TMenuItem
      Caption = 'C&heck Spelling'
      OnClick = popSummMemoSpellClick
    end
    object N2: TMenuItem
      Caption = '-'
    end
    object popSummMemoTemplate: TMenuItem
      Caption = 'Copy Into New &Template'
      OnClick = popSummMemoTemplateClick
    end
    object Z10: TMenuItem
      Caption = '-'
    end
    object popSummMemoSignList: TMenuItem
      Caption = 'Add to Signature &List'
      OnClick = mnuActSignListClick
    end
    object popSummMemoDelete: TMenuItem
      Caption = '&Delete Discharge Summary...'
      OnClick = mnuActDeleteClick
    end
    object popSummMemoEdit: TMenuItem
      Caption = '&Edit Discharge Summary...'
      OnClick = mnuActEditClick
    end
    object popSummMemoAddend: TMenuItem
      Caption = '&Make Addendum...'
      OnClick = mnuActAddendClick
    end
    object popSummMemoSave: TMenuItem
      Caption = 'S&ave without Signature'
      OnClick = mnuActSaveClick
    end
    object popSummMemoSign: TMenuItem
      Caption = '&Sign Discharge Summary Now...'
      OnClick = mnuActSignClick
    end
    object popSummMemoAddlSign: TMenuItem
      Caption = '&Identify Additional Signers'
      OnClick = popSummMemoAddlSignClick
    end
    object N9: TMenuItem
      Caption = '-'
    end
    object popSummMemoPreview: TMenuItem
      Caption = 'Previe&w/Print Current Template'
      ShortCut = 16471
      OnClick = popSummMemoPreviewClick
    end
    object popSummMemoInsTemplate: TMenuItem
      Caption = 'Insert Current Template'
      ShortCut = 16429
      OnClick = popSummMemoInsTemplateClick
    end
    object popSummMemoEncounter: TMenuItem
      Caption = 'Edit Encounter Information'
      ShortCut = 16453
      OnClick = cmdPCEClick
    end
  end
  object popSummList: TPopupMenu
    OnPopup = popSummListPopup
    Left = 500
    Top = 304
    object popSummListAll: TMenuItem
      Tag = 1
      Caption = '&Signed Discharge Summaries (All)'
      OnClick = mnuViewClick
    end
    object popSummListByAuthor: TMenuItem
      Tag = 4
      Caption = 'Signed Discharge Summaries by &Author'
      OnClick = mnuViewClick
    end
    object popSummListByDate: TMenuItem
      Tag = 5
      Caption = 'Signed Discharge Summaries by Date &Range'
      OnClick = mnuViewClick
    end
    object popSummListUncosigned: TMenuItem
      Tag = 3
      Caption = 'Un&cosigned Discharge Summaries'
      OnClick = mnuViewClick
    end
    object popSummListUnsigned: TMenuItem
      Tag = 2
      Caption = '&Unsigned Discharge Summaries'
      OnClick = mnuViewClick
    end
    object popSummListCustom: TMenuItem
      Tag = 6
      Caption = 'Cus&tom View'
      OnClick = mnuViewClick
    end
    object N5: TMenuItem
      Caption = '-'
    end
    object popSummListExpandSelected: TMenuItem
      Caption = '&Expand Selected'
      OnClick = popSummListExpandSelectedClick
    end
    object popSummListExpandAll: TMenuItem
      Caption = 'E&xpand All'
      OnClick = popSummListExpandAllClick
    end
    object popSummListCollapseSelected: TMenuItem
      Caption = 'C&ollapse Selected'
      OnClick = popSummListCollapseSelectedClick
    end
    object popSummListCollapseAll: TMenuItem
      Caption = 'Co&llapse All'
      OnClick = popSummListCollapseAllClick
    end
    object N6: TMenuItem
      Caption = '-'
    end
    object popSummListAddIDEntry: TMenuItem
      Caption = 'Add Ne&w Entry to Interdisciplinary Note'
      OnClick = mnuActAddIDEntryClick
    end
    object popSummListAttachtoIDParent: TMenuItem
      Caption = 'A&ttach to Interdisciplinary Note'
      OnClick = mnuActAttachtoIDParentClick
    end
    object popSummListDetachFromIDParent: TMenuItem
      Caption = 'Detac&h from Interdisciplinary Note'
      OnClick = mnuActDetachFromIDParentClick
    end
  end
  object timAutoSave: TTimer
    Enabled = False
    Interval = 300000
    OnTimer = timAutoSaveTimer
    Left = 560
    Top = 61
  end
  object dlgFindText: TFindDialog
    Options = [frDown, frHideUpDown]
    OnFind = dlgFindTextFind
    Left = 452
    Top = 312
  end
  object dlgReplaceText: TReplaceDialog
    OnFind = dlgReplaceTextFind
    OnReplace = dlgReplaceTextReplace
    Left = 409
    Top = 313
  end
end