2008-07-06 17:36:37 -04:00
|
|
|
inherited frmODMedIn: TfrmODMedIn
|
|
|
|
Left = 220
|
|
|
|
Top = 416
|
|
|
|
Caption = 'Inpatient Medication Order'
|
|
|
|
PixelsPerInch = 96
|
|
|
|
TextHeight = 13
|
|
|
|
object lblMedication: TLabel [0]
|
|
|
|
Left = 6
|
|
|
|
Top = 4
|
|
|
|
Width = 52
|
|
|
|
Height = 13
|
|
|
|
Caption = 'Medication'
|
|
|
|
end
|
|
|
|
object lblDosage: TLabel [1]
|
|
|
|
Left = 224
|
|
|
|
Top = 4
|
|
|
|
Width = 37
|
|
|
|
Height = 13
|
|
|
|
Caption = 'Dosage'
|
|
|
|
end
|
|
|
|
object lblRoute: TLabel [2]
|
|
|
|
Left = 364
|
|
|
|
Top = 4
|
|
|
|
Width = 29
|
|
|
|
Height = 13
|
|
|
|
Caption = 'Route'
|
|
|
|
end
|
|
|
|
object lblSchedule: TLabel [3]
|
|
|
|
Left = 442
|
|
|
|
Top = 4
|
|
|
|
Width = 45
|
|
|
|
Height = 13
|
|
|
|
Caption = 'Schedule'
|
|
|
|
end
|
|
|
|
object Label5: TLabel [4]
|
|
|
|
Left = 6
|
|
|
|
Top = 45
|
|
|
|
Width = 70
|
|
|
|
Height = 13
|
|
|
|
Caption = 'Dispense Drug'
|
|
|
|
end
|
|
|
|
object lblComments: TLabel [5]
|
|
|
|
Left = 223
|
|
|
|
Top = 114
|
|
|
|
Width = 49
|
|
|
|
Height = 13
|
|
|
|
Caption = 'Comments'
|
|
|
|
end
|
|
|
|
object lblPriority: TLabel [6]
|
|
|
|
Left = 442
|
|
|
|
Top = 114
|
|
|
|
Width = 31
|
|
|
|
Height = 13
|
|
|
|
Caption = 'Priority'
|
|
|
|
end
|
|
|
|
object Bevel1: TBevel [7]
|
|
|
|
Left = 214
|
|
|
|
Top = 0
|
|
|
|
Width = 4
|
|
|
|
Height = 186
|
|
|
|
end
|
|
|
|
object cboDispense: TORComboBox [8]
|
|
|
|
Left = 6
|
|
|
|
Top = 59
|
|
|
|
Width = 202
|
|
|
|
Height = 127
|
|
|
|
Style = orcsSimple
|
|
|
|
AutoSelect = True
|
|
|
|
Color = clWindow
|
|
|
|
DropDownCount = 8
|
|
|
|
ItemHeight = 13
|
|
|
|
ItemTipColor = clWindow
|
|
|
|
ItemTipEnable = True
|
|
|
|
ListItemsOnly = False
|
|
|
|
LongList = False
|
2010-07-07 16:31:10 -04:00
|
|
|
LookupPiece = 0
|
2008-07-06 17:36:37 -04:00
|
|
|
MaxLength = 0
|
|
|
|
ParentShowHint = False
|
|
|
|
Pieces = '2,4,3'
|
|
|
|
ShowHint = True
|
|
|
|
Sorted = False
|
|
|
|
SynonymChars = '<>'
|
|
|
|
TabPositions = '30,33'
|
|
|
|
TabOrder = 2
|
|
|
|
OnChange = ControlChange
|
|
|
|
OnExit = cboDispenseExit
|
|
|
|
OnMouseClick = cboDispenseMouseClick
|
2010-07-07 16:31:10 -04:00
|
|
|
CharsNeedMatch = 1
|
2008-07-06 17:36:37 -04:00
|
|
|
end
|
|
|
|
object cboMedication: TORComboBox [9]
|
|
|
|
Left = 6
|
|
|
|
Top = 18
|
|
|
|
Width = 202
|
|
|
|
Height = 167
|
|
|
|
Style = orcsSimple
|
|
|
|
AutoSelect = True
|
|
|
|
Color = clWindow
|
|
|
|
DropDownCount = 11
|
|
|
|
ItemHeight = 13
|
|
|
|
ItemTipColor = clWindow
|
|
|
|
ItemTipEnable = True
|
|
|
|
ListItemsOnly = False
|
|
|
|
LongList = True
|
2010-07-07 16:31:10 -04:00
|
|
|
LookupPiece = 0
|
2008-07-06 17:36:37 -04:00
|
|
|
MaxLength = 0
|
|
|
|
Pieces = '2'
|
|
|
|
Sorted = False
|
|
|
|
SynonymChars = '<>'
|
|
|
|
TabOrder = 1
|
|
|
|
OnChange = ControlChange
|
|
|
|
OnExit = cboMedicationSelect
|
|
|
|
OnMouseClick = cboMedicationSelect
|
|
|
|
OnNeedData = cboMedicationNeedData
|
2010-07-07 16:31:10 -04:00
|
|
|
CharsNeedMatch = 1
|
2008-07-06 17:36:37 -04:00
|
|
|
end
|
2010-07-07 16:31:10 -04:00
|
|
|
inherited memOrder: TCaptionMemo
|
2008-07-06 17:36:37 -04:00
|
|
|
TabOrder = 10
|
|
|
|
end
|
|
|
|
inherited cmdAccept: TButton
|
|
|
|
TabOrder = 8
|
|
|
|
end
|
2010-07-07 16:31:10 -04:00
|
|
|
object cboRoute: TORComboBox [12]
|
2008-07-06 17:36:37 -04:00
|
|
|
Left = 364
|
|
|
|
Top = 18
|
|
|
|
Width = 72
|
|
|
|
Height = 90
|
|
|
|
Style = orcsSimple
|
|
|
|
AutoSelect = True
|
|
|
|
Color = clWindow
|
|
|
|
DropDownCount = 8
|
|
|
|
ItemHeight = 13
|
|
|
|
ItemTipColor = clWindow
|
|
|
|
ItemTipEnable = True
|
|
|
|
ListItemsOnly = False
|
|
|
|
LongList = False
|
2010-07-07 16:31:10 -04:00
|
|
|
LookupPiece = 0
|
2008-07-06 17:36:37 -04:00
|
|
|
MaxLength = 0
|
|
|
|
Pieces = '2'
|
|
|
|
Sorted = False
|
|
|
|
SynonymChars = '<>'
|
|
|
|
TabOrder = 4
|
|
|
|
OnChange = ControlChange
|
2010-07-07 16:31:10 -04:00
|
|
|
CharsNeedMatch = 1
|
2008-07-06 17:36:37 -04:00
|
|
|
end
|
2010-07-07 16:31:10 -04:00
|
|
|
object cboSchedule: TORComboBox [13]
|
2008-07-06 17:36:37 -04:00
|
|
|
Left = 442
|
|
|
|
Top = 18
|
|
|
|
Width = 72
|
|
|
|
Height = 90
|
|
|
|
Style = orcsSimple
|
|
|
|
AutoSelect = True
|
|
|
|
Color = clWindow
|
|
|
|
DropDownCount = 8
|
|
|
|
ItemHeight = 13
|
|
|
|
ItemTipColor = clWindow
|
|
|
|
ItemTipEnable = True
|
|
|
|
ListItemsOnly = False
|
|
|
|
LongList = False
|
2010-07-07 16:31:10 -04:00
|
|
|
LookupPiece = 0
|
2008-07-06 17:36:37 -04:00
|
|
|
MaxLength = 0
|
|
|
|
Sorted = False
|
|
|
|
SynonymChars = '<>'
|
|
|
|
TabOrder = 5
|
|
|
|
OnChange = ControlChange
|
2010-07-07 16:31:10 -04:00
|
|
|
CharsNeedMatch = 1
|
2008-07-06 17:36:37 -04:00
|
|
|
end
|
2010-07-07 16:31:10 -04:00
|
|
|
object memComments: TMemo [14]
|
2008-07-06 17:36:37 -04:00
|
|
|
Left = 223
|
|
|
|
Top = 128
|
|
|
|
Width = 212
|
|
|
|
Height = 58
|
|
|
|
ScrollBars = ssVertical
|
|
|
|
TabOrder = 6
|
|
|
|
OnChange = ControlChange
|
|
|
|
end
|
2010-07-07 16:31:10 -04:00
|
|
|
object cboPriority: TORComboBox [15]
|
2008-07-06 17:36:37 -04:00
|
|
|
Left = 442
|
|
|
|
Top = 128
|
|
|
|
Width = 72
|
|
|
|
Height = 58
|
|
|
|
Style = orcsSimple
|
|
|
|
AutoSelect = True
|
|
|
|
Color = clWindow
|
|
|
|
DropDownCount = 8
|
|
|
|
ItemHeight = 13
|
|
|
|
ItemTipColor = clWindow
|
|
|
|
ItemTipEnable = True
|
|
|
|
ListItemsOnly = False
|
|
|
|
LongList = False
|
2010-07-07 16:31:10 -04:00
|
|
|
LookupPiece = 0
|
2008-07-06 17:36:37 -04:00
|
|
|
MaxLength = 0
|
|
|
|
Pieces = '2'
|
|
|
|
Sorted = False
|
|
|
|
SynonymChars = '<>'
|
|
|
|
TabOrder = 7
|
|
|
|
OnChange = ControlChange
|
2010-07-07 16:31:10 -04:00
|
|
|
CharsNeedMatch = 1
|
2008-07-06 17:36:37 -04:00
|
|
|
end
|
2010-07-07 16:31:10 -04:00
|
|
|
object txtDosage: TCaptionEdit [16]
|
2008-07-06 17:36:37 -04:00
|
|
|
Left = 224
|
|
|
|
Top = 18
|
|
|
|
Width = 134
|
|
|
|
Height = 21
|
|
|
|
MaxLength = 20
|
|
|
|
TabOrder = 3
|
|
|
|
OnChange = ControlChange
|
|
|
|
Caption = 'Dosage'
|
|
|
|
end
|
2010-07-07 16:31:10 -04:00
|
|
|
inherited cmdQuit: TButton
|
|
|
|
TabOrder = 9
|
|
|
|
end
|
2008-07-06 17:36:37 -04:00
|
|
|
inherited pnlMessage: TPanel
|
|
|
|
TabOrder = 11
|
|
|
|
end
|
2010-07-07 16:31:10 -04:00
|
|
|
object cboMedAlt: TORComboBox [19]
|
2008-07-06 17:36:37 -04:00
|
|
|
Left = 6
|
|
|
|
Top = 18
|
|
|
|
Width = 202
|
|
|
|
Height = 21
|
|
|
|
Style = orcsDropDown
|
|
|
|
AutoSelect = True
|
|
|
|
Color = clWindow
|
|
|
|
DropDownCount = 11
|
|
|
|
ItemHeight = 13
|
|
|
|
ItemTipColor = clWindow
|
|
|
|
ItemTipEnable = True
|
|
|
|
ListItemsOnly = False
|
|
|
|
LongList = True
|
2010-07-07 16:31:10 -04:00
|
|
|
LookupPiece = 0
|
2008-07-06 17:36:37 -04:00
|
|
|
MaxLength = 0
|
|
|
|
Pieces = '2'
|
|
|
|
Sorted = False
|
|
|
|
SynonymChars = '<>'
|
|
|
|
TabOrder = 0
|
|
|
|
Visible = False
|
|
|
|
OnChange = ControlChange
|
|
|
|
OnExit = cboMedicationSelect
|
|
|
|
OnMouseClick = cboMedicationSelect
|
|
|
|
OnNeedData = cboMedicationNeedData
|
2010-07-07 16:31:10 -04:00
|
|
|
CharsNeedMatch = 1
|
|
|
|
end
|
|
|
|
inherited amgrMain: TVA508AccessibilityManager
|
|
|
|
Data = (
|
|
|
|
(
|
|
|
|
'Component = cboDispense'
|
|
|
|
'Status = stsDefault')
|
|
|
|
(
|
|
|
|
'Component = cboMedication'
|
|
|
|
'Status = stsDefault')
|
|
|
|
(
|
|
|
|
'Component = cboRoute'
|
|
|
|
'Status = stsDefault')
|
|
|
|
(
|
|
|
|
'Component = cboSchedule'
|
|
|
|
'Status = stsDefault')
|
|
|
|
(
|
|
|
|
'Component = memComments'
|
|
|
|
'Status = stsDefault')
|
|
|
|
(
|
|
|
|
'Component = cboPriority'
|
|
|
|
'Status = stsDefault')
|
|
|
|
(
|
|
|
|
'Component = txtDosage'
|
|
|
|
'Status = stsDefault')
|
|
|
|
(
|
|
|
|
'Component = cboMedAlt'
|
|
|
|
'Status = stsDefault')
|
|
|
|
(
|
|
|
|
'Component = memOrder'
|
|
|
|
'Status = stsDefault')
|
|
|
|
(
|
|
|
|
'Component = cmdAccept'
|
|
|
|
'Status = stsDefault')
|
|
|
|
(
|
|
|
|
'Component = cmdQuit'
|
|
|
|
'Status = stsDefault')
|
|
|
|
(
|
|
|
|
'Component = pnlMessage'
|
|
|
|
'Status = stsDefault')
|
|
|
|
(
|
|
|
|
'Component = memMessage'
|
|
|
|
'Status = stsDefault')
|
|
|
|
(
|
|
|
|
'Component = frmODMedIn'
|
|
|
|
'Status = stsDefault'))
|
2008-07-06 17:36:37 -04:00
|
|
|
end
|
|
|
|
end
|