inherited frmARTAllergy: TfrmARTAllergy
  Tag = 1105
  Left = 339
  Top = 266
  Width = 561
  Height = 465
  Caption = 'Enter Allergy or Adverse Reaction'
  Position = poScreenCenter
  OnClose = FormClose
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object pnlBase: TORAutoPanel [0]
    Left = 0
    Top = 0
    Width = 553
    Height = 431
    Align = alClient
    BevelOuter = bvNone
    TabOrder = 0
    object lblAllergyType: TOROffsetLabel
      Left = 38
      Top = 403
      Width = 63
      Height = 15
      Caption = 'Allergy Type:'
      HorzOffset = 2
      Transparent = False
      VertOffset = 2
      Visible = False
      WordWrap = False
    end
    object cmdOK: TButton
      Left = 380
      Top = 403
      Width = 72
      Height = 21
      Caption = 'OK'
      TabOrder = 1
      OnClick = cmdOKClick
    end
    object cmdCancel: TButton
      Left = 459
      Top = 403
      Width = 72
      Height = 21
      Cancel = True
      Caption = 'Cancel'
      TabOrder = 2
      OnClick = cmdCancelClick
    end
    object pgAllergy: TPageControl
      Left = 4
      Top = 17
      Width = 529
      Height = 371
      ActivePage = tabGeneral
      MultiLine = True
      TabOrder = 0
      object tabGeneral: TTabSheet
        Caption = '&General'
        object lblAgent: TOROffsetLabel
          Left = 7
          Top = 44
          Width = 82
          Height = 15
          Caption = 'Causative agent:'
          HorzOffset = 2
          Transparent = False
          VertOffset = 2
          WordWrap = False
        end
        object btnAgent: TSpeedButton
          Left = 175
          Top = 62
          Width = 19
          Height = 19
          Caption = '...'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
          OnClick = btnAgentClick
        end
        object lblOriginator: TOROffsetLabel
          Left = 202
          Top = 1
          Width = 50
          Height = 15
          Caption = 'Originator:'
          HorzOffset = 2
          Transparent = False
          VertOffset = 2
          WordWrap = False
        end
        object lblOriginateDate: TOROffsetLabel
          Left = 202
          Top = 44
          Width = 81
          Height = 15
          Caption = 'Origination Date:'
          HorzOffset = 2
          Transparent = False
          VertOffset = 2
          WordWrap = False
        end
        object Bevel1: TBevel
          Left = 7
          Top = 299
          Width = 502
          Height = 36
        end
        object lblSymptoms: TOROffsetLabel
          Left = 7
          Top = 127
          Width = 84
          Height = 15
          Caption = 'Signs/Symptoms:'
          HorzOffset = 2
          Transparent = False
          VertOffset = 2
          WordWrap = False
        end
        object lblSelectedSymptoms: TOROffsetLabel
          Left = 147
          Top = 127
          Width = 98
          Height = 15
          Caption = 'Selected Symptoms:'
          HorzOffset = 2
          Transparent = False
          VertOffset = 2
          WordWrap = False
        end
        object lblSeverity: TOROffsetLabel
          Left = 362
          Top = 81
          Width = 43
          Height = 15
          Caption = 'Severity:'
          HorzOffset = 2
          Transparent = False
          VertOffset = 2
          WordWrap = False
        end
        object lblObservedDate: TOROffsetLabel
          Left = 362
          Top = 44
          Width = 102
          Height = 15
          Caption = 'Reaction Date/Time:'
          HorzOffset = 2
          Transparent = False
          VertOffset = 2
          WordWrap = False
        end
        object lblComments: TOROffsetLabel
          Left = 295
          Top = 127
          Width = 54
          Height = 15
          Caption = 'Comments:'
          HorzOffset = 2
          Transparent = False
          VertOffset = 2
          WordWrap = False
        end
        object lblNatureOfReaction: TOROffsetLabel
          Left = 7
          Top = 82
          Width = 95
          Height = 15
          Caption = 'Nature of Reaction:'
          HorzOffset = 2
          Transparent = False
          VertOffset = 2
          WordWrap = False
        end
        object ckNoKnownAllergies: TCheckBox
          Left = 7
          Top = 3
          Width = 119
          Height = 17
          Caption = 'No Known Allergies'
          TabOrder = 0
          OnClick = ckNoKnownAllergiesClick
        end
        object btnCurrent: TButton
          Left = 7
          Top = 24
          Width = 114
          Height = 21
          Caption = 'Active Allergies'
          TabOrder = 1
          OnClick = btnCurrentClick
        end
        object lstAllergy: TORListBox
          Left = 7
          Top = 61
          Width = 166
          Height = 21
          Color = clBtnFace
          ExtendedSelect = False
          ItemHeight = 13
          ParentShowHint = False
          ShowHint = True
          TabOrder = 2
          OnClick = lstAllergyClick
          ItemTipColor = clWindow
          LongList = False
          Pieces = '2'
          OnChange = ControlChange
        end
        object cboOriginator: TORComboBox
          Left = 202
          Top = 16
          Width = 139
          Height = 21
          Style = orcsDropDown
          AutoSelect = True
          Color = clWindow
          DropDownCount = 8
          ItemHeight = 13
          ItemTipColor = clWindow
          ItemTipEnable = True
          ListItemsOnly = True
          LongList = True
          LookupPiece = 2
          MaxLength = 0
          ParentShowHint = False
          Pieces = '2,3'
          ShowHint = False
          Sorted = False
          SynonymChars = '<>'
          TabOrder = 4
          OnChange = ControlChange
          OnNeedData = cboOriginatorNeedData
          CharsNeedMatch = 1
        end
        object calOriginated: TORDateBox
          Left = 202
          Top = 61
          Width = 140
          Height = 21
          Color = clBtnFace
          Enabled = False
          TabOrder = 5
          OnChange = ControlChange
          DateOnly = False
          RequireTime = False
        end
        object ckChartMarked: TCheckBox
          Left = 294
          Top = 307
          Width = 113
          Height = 17
          Caption = 'Marked On Chart'
          Checked = True
          State = cbChecked
          TabOrder = 18
          Visible = False
          OnClick = ControlChange
        end
        object ckIDBand: TCheckBox
          Left = 122
          Top = 307
          Width = 97
          Height = 17
          Caption = 'ID Band Marked'
          TabOrder = 17
          OnClick = ControlChange
        end
        object cboSymptoms: TORComboBox
          Left = 7
          Top = 141
          Width = 135
          Height = 152
          Style = orcsSimple
          AutoSelect = True
          Color = clWindow
          DropDownCount = 8
          ItemHeight = 13
          ItemTipColor = clWindow
          ItemTipEnable = True
          ListItemsOnly = True
          LongList = True
          LookupPiece = 0
          MaxLength = 0
          Pieces = '2'
          Sorted = False
          SynonymChars = '<>'
          TabOrder = 11
          OnKeyDown = cboSymptomsKeyDown
          OnMouseClick = cboSymptomsMouseClick
          OnNeedData = cboSymptomsNeedData
          CharsNeedMatch = 1
        end
        object lstSelectedSymptoms: TORListBox
          Left = 147
          Top = 141
          Width = 136
          Height = 122
          ExtendedSelect = False
          ItemHeight = 13
          ParentShowHint = False
          ShowHint = True
          TabOrder = 12
          ItemTipColor = clWindow
          LongList = False
          Pieces = '2,4'
          OnChange = lstSelectedSymptomsChange
        end
        object btnDateTime: TButton
          Left = 154
          Top = 270
          Width = 62
          Height = 21
          Caption = 'Date/Time'
          TabOrder = 13
          OnClick = btnDateTimeClick
        end
        object btnRemove: TButton
          Left = 223
          Top = 270
          Width = 57
          Height = 21
          Caption = 'Remove'
          TabOrder = 14
          OnClick = btnRemoveClick
        end
        object grpObsHist: TRadioGroup
          Left = 362
          Top = 2
          Width = 147
          Height = 38
          Columns = 2
          Ctl3D = True
          Items.Strings = (
            'Observed'
            'Historical')
          ParentCtl3D = False
          ParentShowHint = False
          ShowHint = True
          TabOrder = 7
          OnClick = grpObsHistClick
        end
        object cboSeverity: TORComboBox
          Left = 362
          Top = 96
          Width = 127
          Height = 21
          Style = orcsDropDown
          AutoSelect = True
          Color = clWindow
          DropDownCount = 8
          ItemHeight = 13
          ItemTipColor = clWindow
          ItemTipEnable = True
          ListItemsOnly = True
          LongList = False
          LookupPiece = 0
          MaxLength = 0
          Pieces = '2'
          Sorted = False
          SynonymChars = '<>'
          TabOrder = 9
          OnChange = ControlChange
          OnExit = ControlChange
          CharsNeedMatch = 1
        end
        object calObservedDate: TORDateBox
          Left = 362
          Top = 61
          Width = 145
          Height = 21
          TabOrder = 8
          OnChange = ControlChange
          DateOnly = False
          RequireTime = False
        end
        object cmdPrevObs: TButton
          Left = 202
          Top = 96
          Width = 140
          Height = 21
          Caption = 'View Previous Observations'
          TabOrder = 6
          OnClick = cmdPrevObsClick
        end
        object memComments: TRichEdit
          Left = 294
          Top = 141
          Width = 213
          Height = 112
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Courier New'
          Font.Style = []
          ParentFont = False
          ScrollBars = ssVertical
          TabOrder = 15
          OnExit = memCommentsExit
        end
        object cmdPrevCmts: TButton
          Left = 322
          Top = 270
          Width = 157
          Height = 21
          Caption = 'View Previous Comments'
          TabOrder = 16
          OnClick = cmdPrevCmtsClick
        end
        object cboNatureOfReaction: TORComboBox
          Left = 7
          Top = 96
          Width = 190
          Height = 21
          Style = orcsDropDown
          AutoSelect = True
          Color = clWindow
          DropDownCount = 8
          ItemHeight = 13
          ItemTipColor = clWindow
          ItemTipEnable = True
          ListItemsOnly = True
          LongList = False
          LookupPiece = 0
          MaxLength = 0
          Pieces = '2'
          Sorted = False
          SynonymChars = '<>'
          TabOrder = 3
          OnChange = ControlChange
          CharsNeedMatch = 1
        end
        object btnSevHelp: TORAlignButton
          Left = 489
          Top = 96
          Width = 21
          Height = 21
          Caption = '?'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
          TabOrder = 10
          OnClick = btnSevHelpClick
        end
      end
      object tabVerify: TTabSheet
        Caption = '&Verify'
        ImageIndex = 3
        object lblVerifier: TOROffsetLabel
          Left = 99
          Top = 51
          Width = 55
          Height = 15
          Caption = 'Verified By:'
          HorzOffset = 2
          Transparent = False
          VertOffset = 2
          WordWrap = False
        end
        object lblVerifyDate: TOROffsetLabel
          Left = 99
          Top = 108
          Width = 66
          Height = 15
          Caption = 'Date Verified:'
          HorzOffset = 2
          Transparent = False
          VertOffset = 2
          WordWrap = False
        end
        object ckVerified: TCheckBox
          Left = 99
          Top = 18
          Width = 69
          Height = 17
          Caption = 'Verified'
          TabOrder = 0
          OnClick = ControlChange
        end
        object cboVerifier: TORComboBox
          Left = 99
          Top = 65
          Width = 138
          Height = 21
          Style = orcsDropDown
          AutoSelect = True
          Color = clWindow
          DropDownCount = 8
          ItemHeight = 13
          ItemTipColor = clWindow
          ItemTipEnable = True
          ListItemsOnly = True
          LongList = True
          LookupPiece = 2
          MaxLength = 0
          Pieces = '2,3'
          Sorted = False
          SynonymChars = '<>'
          TabOrder = 1
          OnChange = ControlChange
          OnNeedData = cboVerifierNeedData
          CharsNeedMatch = 1
        end
        object calVerifyDate: TORDateBox
          Left = 99
          Top = 124
          Width = 137
          Height = 21
          TabOrder = 2
          OnChange = ControlChange
          DateOnly = False
          RequireTime = False
        end
      end
      object tabEnteredInError: TTabSheet
        Caption = 'Entered In Error'
        ImageIndex = 2
        object lblErrCmts: TLabel
          Left = 7
          Top = 12
          Width = 98
          Height = 13
          Caption = 'Comments (optional):'
        end
        object lblEnteredInError: TLabel
          Left = 0
          Top = 330
          Width = 521
          Height = 13
          Align = alBottom
          Alignment = taCenter
          Caption = 'EnteredInError'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object ckEnteredInError: TCheckBox
          Left = 286
          Top = 5
          Width = 203
          Height = 17
          Caption = 'Mark this allergy as "Entered In Error"'
          TabOrder = 0
          Visible = False
          OnClick = ControlChange
        end
        object memErrCmts: TRichEdit
          Left = 6
          Top = 27
          Width = 506
          Height = 263
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Courier New'
          Font.Style = []
          ParentFont = False
          ScrollBars = ssVertical
          TabOrder = 1
          OnExit = memCommentsExit
        end
      end
    end
    object cboAllergyType: TORComboBox
      Left = 38
      Top = 418
      Width = 190
      Height = 21
      Style = orcsDropDown
      AutoSelect = True
      Color = clBtnFace
      DropDownCount = 8
      Enabled = False
      ItemHeight = 13
      ItemTipColor = clWindow
      ItemTipEnable = True
      ListItemsOnly = True
      LongList = False
      LookupPiece = 0
      MaxLength = 0
      Pieces = '2'
      Sorted = False
      SynonymChars = '<>'
      TabOrder = 3
      Visible = False
      OnChange = ControlChange
      CharsNeedMatch = 1
    end
  end
  inherited DKLanguageController1: TDKLanguageController
    LangData = {
      0D0066726D415254416C6C65726779010100000001000000070043617074696F
      6E01310000000700706E6C4261736500000E006C626C416C6C65726779547970
      65010100000002000000070043617074696F6E000500636D644F4B0101000000
      03000000070043617074696F6E000900636D6443616E63656C01010000000400
      0000070043617074696F6E0009007067416C6C6572677900000A007461624765
      6E6572616C010100000005000000070043617074696F6E0008006C626C416765
      6E74010100000006000000070043617074696F6E00080062746E4167656E7400
      000D006C626C4F726967696E61746F7201010000000700000007004361707469
      6F6E0010006C626C4F726967696E617465446174650101000000080000000700
      43617074696F6E000600426576656C3100000B006C626C53796D70746F6D7301
      0100000009000000070043617074696F6E0013006C626C53656C656374656453
      796D70746F6D7301010000000A000000070043617074696F6E000B006C626C53
      6576657269747901010000000B000000070043617074696F6E000F006C626C4F
      627365727665644461746501010000000C000000070043617074696F6E000B00
      6C626C436F6D6D656E747301010000000D000000070043617074696F6E001300
      6C626C4E61747572654F665265616374696F6E01010000000E00000007004361
      7074696F6E001200636B4E6F4B6E6F776E416C6C65726769657301010000000F
      000000070043617074696F6E000A0062746E43757272656E7401010000001000
      0000070043617074696F6E000A006C7374416C6C6572677900000D0063626F4F
      726967696E61746F7200000D0063616C4F726967696E6174656400000D00636B
      43686172744D61726B6564010100000011000000070043617074696F6E000800
      636B494442616E64010100000012000000070043617074696F6E000B0063626F
      53796D70746F6D73000013006C737453656C656374656453796D70746F6D7300
      000B0062746E4461746554696D65010100000013000000070043617074696F6E
      00090062746E52656D6F7665010100000014000000070043617074696F6E000A
      006772704F62734869737401010000001500000005004974656D73000B006362
      6F536576657269747900000F0063616C4F627365727665644461746500000A00
      636D64507265764F6273010100000016000000070043617074696F6E000B006D
      656D436F6D6D656E747300000B00636D6450726576436D747301010000001700
      0000070043617074696F6E00130063626F4E61747572654F665265616374696F
      6E00000A0062746E53657648656C700000090074616256657269667901010000
      0018000000070043617074696F6E000B006C626C566572696669657201010000
      0019000000070043617074696F6E000D006C626C566572696679446174650101
      0000001A000000070043617074696F6E000A00636B5665726966696564010100
      00001B000000070043617074696F6E000B0063626F566572696669657200000D
      0063616C5665726966794461746500001100746162456E7465726564496E4572
      726F7201010000001C000000070043617074696F6E000A006C626C457272436D
      747301010000001D000000070043617074696F6E0011006C626C456E74657265
      64496E4572726F7201010000001E000000070043617074696F6E001000636B45
      6E7465726564496E4572726F7201010000001F000000070043617074696F6E00
      0A006D656D457272436D747300000E0063626F416C6C65726779547970650000
      1300646C675265616374696F6E4461746554696D650000}
  end
  object dlgReactionDateTime: TORDateTimeDlg
    FMDateTime = 2981202.000000000000000000
    DateOnly = False
    RequireTime = False
    Left = 5
    Top = 400
  end
end