[453] | 1 | object frmBALocalDiagnoses: TfrmBALocalDiagnoses
|
---|
| 2 | Left = 257
|
---|
| 3 | Top = 104
|
---|
| 4 | Width = 620
|
---|
| 5 | Height = 544
|
---|
| 6 | Caption = 'Assign Diagnoses to Order(s)'
|
---|
| 7 | Color = clBtnFace
|
---|
| 8 | Font.Charset = DEFAULT_CHARSET
|
---|
| 9 | Font.Color = clWindowText
|
---|
| 10 | Font.Height = -11
|
---|
| 11 | Font.Name = 'MS Sans Serif'
|
---|
| 12 | Font.Style = []
|
---|
| 13 | KeyPreview = True
|
---|
| 14 | OldCreateOrder = False
|
---|
| 15 | Position = poScreenCenter
|
---|
| 16 | ShowHint = True
|
---|
| 17 | OnActivate = FormActivate
|
---|
| 18 | OnCreate = FormCreate
|
---|
| 19 | OnDestroy = FormDestroy
|
---|
| 20 | OnShow = FormShow
|
---|
| 21 | PixelsPerInch = 96
|
---|
| 22 | TextHeight = 13
|
---|
| 23 | object pnlTop: TPanel
|
---|
| 24 | Left = 0
|
---|
| 25 | Top = 0
|
---|
| 26 | Width = 612
|
---|
| 27 | Height = 96
|
---|
| 28 | Align = alTop
|
---|
| 29 | Caption = 'pnlTop'
|
---|
| 30 | TabOrder = 0
|
---|
| 31 | DesignSize = (
|
---|
| 32 | 612
|
---|
| 33 | 96)
|
---|
| 34 | object lbOrders: TListBox
|
---|
| 35 | Left = 7
|
---|
| 36 | Top = 25
|
---|
| 37 | Width = 599
|
---|
| 38 | Height = 69
|
---|
| 39 | Anchors = [akLeft, akTop, akRight, akBottom]
|
---|
| 40 | IntegralHeight = True
|
---|
| 41 | ItemHeight = 13
|
---|
| 42 | TabOrder = 2
|
---|
| 43 | OnMouseMove = lbOrdersMouseMove
|
---|
| 44 | end
|
---|
| 45 | object ORStaticText1: TORStaticText
|
---|
| 46 | Left = 216
|
---|
| 47 | Top = 8
|
---|
| 48 | Width = 169
|
---|
| 49 | Height = 14
|
---|
| 50 | AutoSize = False
|
---|
| 51 | Caption = 'Selected Orders'
|
---|
| 52 | TabOrder = 1
|
---|
| 53 | TabStop = True
|
---|
| 54 | OnEnter = ORStaticText1Enter
|
---|
| 55 | OnExit = ORStaticText1Exit
|
---|
| 56 | end
|
---|
| 57 | object lblPatientName: TStaticText
|
---|
| 58 | Left = 11
|
---|
| 59 | Top = 9
|
---|
| 60 | Width = 76
|
---|
| 61 | Height = 17
|
---|
| 62 | Caption = 'PatientName'
|
---|
| 63 | Font.Charset = DEFAULT_CHARSET
|
---|
| 64 | Font.Color = clWindowText
|
---|
| 65 | Font.Height = -11
|
---|
| 66 | Font.Name = 'MS Sans Serif'
|
---|
| 67 | Font.Style = [fsBold]
|
---|
| 68 | ParentFont = False
|
---|
| 69 | TabOrder = 0
|
---|
| 70 | TabStop = True
|
---|
| 71 | end
|
---|
| 72 | end
|
---|
| 73 | object pnlMain: TPanel
|
---|
| 74 | Left = 0
|
---|
| 75 | Top = 96
|
---|
| 76 | Width = 612
|
---|
| 77 | Height = 252
|
---|
| 78 | Align = alClient
|
---|
| 79 | TabOrder = 1
|
---|
| 80 | object lbSections: TORListBox
|
---|
| 81 | Left = 9
|
---|
| 82 | Top = 16
|
---|
| 83 | Width = 238
|
---|
| 84 | Height = 201
|
---|
| 85 | Style = lbOwnerDrawVariable
|
---|
| 86 | IntegralHeight = True
|
---|
| 87 | ItemHeight = 13
|
---|
| 88 | ParentShowHint = False
|
---|
| 89 | ShowHint = True
|
---|
| 90 | TabOrder = 1
|
---|
| 91 | OnClick = lbSectionsClick
|
---|
| 92 | OnDrawItem = lbSectionsDrawItem
|
---|
| 93 | Caption = 'Diagnosis Section'
|
---|
| 94 | ItemTipColor = clWindow
|
---|
| 95 | LongList = False
|
---|
| 96 | Pieces = '3'
|
---|
| 97 | CheckEntireLine = True
|
---|
| 98 | end
|
---|
| 99 | object btnOther: TButton
|
---|
| 100 | Left = 155
|
---|
| 101 | Top = 219
|
---|
| 102 | Width = 92
|
---|
| 103 | Height = 20
|
---|
| 104 | Caption = 'Other &Diagnosis'
|
---|
| 105 | TabOrder = 2
|
---|
| 106 | OnClick = btnOtherClick
|
---|
| 107 | end
|
---|
| 108 | object lbDiagnosis: TORListBox
|
---|
| 109 | Left = 248
|
---|
| 110 | Top = 16
|
---|
| 111 | Width = 353
|
---|
| 112 | Height = 225
|
---|
| 113 | IntegralHeight = True
|
---|
| 114 | ItemHeight = 13
|
---|
| 115 | ParentShowHint = False
|
---|
| 116 | ShowHint = True
|
---|
| 117 | TabOrder = 4
|
---|
| 118 | OnClick = lbDiagnosisClick
|
---|
| 119 | Caption = 'Diagnosis Section'
|
---|
| 120 | ItemTipColor = clWindow
|
---|
| 121 | LongList = False
|
---|
| 122 | Pieces = '1,2,3'
|
---|
| 123 | end
|
---|
| 124 | object ORStaticText2: TORStaticText
|
---|
| 125 | Left = 8
|
---|
| 126 | Top = 1
|
---|
| 127 | Width = 241
|
---|
| 128 | Height = 17
|
---|
| 129 | AutoSize = False
|
---|
| 130 | BevelKind = bkFlat
|
---|
| 131 | Caption = 'Diagnosis Section'
|
---|
| 132 | TabOrder = 0
|
---|
| 133 | TabStop = True
|
---|
| 134 | OnEnter = ORStaticText1Enter
|
---|
| 135 | OnExit = ORStaticText1Exit
|
---|
| 136 | end
|
---|
| 137 | object ORStaticText3: TORStaticText
|
---|
| 138 | Left = 248
|
---|
| 139 | Top = 1
|
---|
| 140 | Width = 353
|
---|
| 141 | Height = 17
|
---|
| 142 | AutoSize = False
|
---|
| 143 | BevelKind = bkFlat
|
---|
| 144 | Caption = 'Diagnosis Codes'
|
---|
| 145 | TabOrder = 3
|
---|
| 146 | TabStop = True
|
---|
| 147 | OnEnter = ORStaticText1Enter
|
---|
| 148 | OnExit = ORStaticText1Exit
|
---|
| 149 | end
|
---|
| 150 | end
|
---|
| 151 | object pnlBottom: TORAutoPanel
|
---|
| 152 | Left = 0
|
---|
| 153 | Top = 348
|
---|
| 154 | Width = 612
|
---|
| 155 | Height = 162
|
---|
| 156 | Align = alBottom
|
---|
| 157 | TabOrder = 2
|
---|
| 158 | DesignSize = (
|
---|
| 159 | 612
|
---|
| 160 | 162)
|
---|
| 161 | object lvDxGrid: TListView
|
---|
| 162 | Left = 12
|
---|
| 163 | Top = 19
|
---|
| 164 | Width = 445
|
---|
| 165 | Height = 85
|
---|
| 166 | Color = clInfoBk
|
---|
| 167 | Columns = <
|
---|
| 168 | item
|
---|
| 169 | Caption = 'Add To PL/PD'
|
---|
| 170 | Width = 85
|
---|
| 171 | end
|
---|
| 172 | item
|
---|
| 173 | Caption = 'Primary'
|
---|
| 174 | MinWidth = 65
|
---|
| 175 | Width = 65
|
---|
| 176 | end
|
---|
| 177 | item
|
---|
| 178 | Caption = 'Diagnosis for Selected Orders'
|
---|
| 179 | MinWidth = 275
|
---|
| 180 | Width = 290
|
---|
| 181 | end>
|
---|
| 182 | Ctl3D = False
|
---|
| 183 | HideSelection = False
|
---|
| 184 | MultiSelect = True
|
---|
| 185 | ReadOnly = True
|
---|
| 186 | RowSelect = True
|
---|
| 187 | TabOrder = 1
|
---|
| 188 | ViewStyle = vsReport
|
---|
| 189 | OnClick = lvDxGridClick
|
---|
| 190 | OnKeyDown = lvDxGridKeyDown
|
---|
| 191 | OnKeyUp = lvDxGridKeyUp
|
---|
| 192 | end
|
---|
| 193 | object cbAddToPDList: TCheckBox
|
---|
| 194 | Left = 459
|
---|
| 195 | Top = 33
|
---|
| 196 | Width = 129
|
---|
| 197 | Height = 17
|
---|
| 198 | Caption = 'Add to Personal Dx List'
|
---|
| 199 | TabOrder = 3
|
---|
| 200 | OnClick = cbAddToPDListClick
|
---|
| 201 | end
|
---|
| 202 | object cbAddToPL: TCheckBox
|
---|
| 203 | Left = 459
|
---|
| 204 | Top = 17
|
---|
| 205 | Width = 149
|
---|
| 206 | Height = 16
|
---|
| 207 | Anchors = [akLeft, akTop, akRight, akBottom]
|
---|
| 208 | Caption = 'Add To Problem List'
|
---|
| 209 | TabOrder = 2
|
---|
| 210 | OnClick = cbAddToPLClick
|
---|
| 211 | end
|
---|
| 212 | object btnPrimary: TButton
|
---|
| 213 | Left = 480
|
---|
| 214 | Top = 57
|
---|
| 215 | Width = 72
|
---|
| 216 | Height = 19
|
---|
| 217 | Caption = '&Primary'
|
---|
| 218 | TabOrder = 4
|
---|
| 219 | OnClick = btnPrimaryClick
|
---|
| 220 | end
|
---|
| 221 | object btnRemove: TButton
|
---|
| 222 | Left = 480
|
---|
| 223 | Top = 81
|
---|
| 224 | Width = 72
|
---|
| 225 | Height = 19
|
---|
| 226 | Caption = '&Remove'
|
---|
| 227 | TabOrder = 5
|
---|
| 228 | OnClick = btnRemoveClick
|
---|
| 229 | end
|
---|
| 230 | object btnSelectAll: TButton
|
---|
| 231 | Left = 385
|
---|
| 232 | Top = 108
|
---|
| 233 | Width = 72
|
---|
| 234 | Height = 18
|
---|
| 235 | Caption = '&Select All'
|
---|
| 236 | TabOrder = 6
|
---|
| 237 | OnClick = btnSelectAllClick
|
---|
| 238 | end
|
---|
| 239 | object buOK: TButton
|
---|
| 240 | Left = 384
|
---|
| 241 | Top = 136
|
---|
| 242 | Width = 72
|
---|
| 243 | Height = 21
|
---|
| 244 | Caption = '&OK'
|
---|
| 245 | TabOrder = 7
|
---|
| 246 | OnClick = buOKClick
|
---|
| 247 | end
|
---|
| 248 | object buCancel: TButton
|
---|
| 249 | Left = 482
|
---|
| 250 | Top = 136
|
---|
| 251 | Width = 72
|
---|
| 252 | Height = 21
|
---|
| 253 | Caption = '&Cancel'
|
---|
| 254 | TabOrder = 8
|
---|
| 255 | OnClick = buCancelClick
|
---|
| 256 | end
|
---|
| 257 | object ORStaticText4: TORStaticText
|
---|
| 258 | Left = 14
|
---|
| 259 | Top = 3
|
---|
| 260 | Width = 219
|
---|
| 261 | Height = 14
|
---|
| 262 | AutoSize = False
|
---|
| 263 | Caption = 'Provisional Diagnosis'
|
---|
| 264 | TabOrder = 0
|
---|
| 265 | TabStop = True
|
---|
| 266 | OnEnter = ORStaticText1Enter
|
---|
| 267 | OnExit = ORStaticText1Exit
|
---|
| 268 | end
|
---|
| 269 | end
|
---|
| 270 | object DKLanguageController1: TDKLanguageController
|
---|
| 271 | Left = 296
|
---|
| 272 | Top = 256
|
---|
| 273 | LangData = {
|
---|
| 274 | 130066726D42414C6F63616C446961676E6F7365730101000000010000000700
|
---|
| 275 | 43617074696F6E01140000000600706E6C546F70010100000002000000070043
|
---|
| 276 | 617074696F6E0008006C624F726465727300000D004F52537461746963546578
|
---|
| 277 | 7431010100000003000000070043617074696F6E000E006C626C50617469656E
|
---|
| 278 | 744E616D65010100000004000000070043617074696F6E000700706E6C4D6169
|
---|
| 279 | 6E00000A006C6253656374696F6E73010100000005000000070043617074696F
|
---|
| 280 | 6E00080062746E4F74686572010100000006000000070043617074696F6E000B
|
---|
| 281 | 006C62446961676E6F736973010100000007000000070043617074696F6E000D
|
---|
| 282 | 004F525374617469635465787432010100000008000000070043617074696F6E
|
---|
| 283 | 000D004F52537461746963546578743301010000000900000007004361707469
|
---|
| 284 | 6F6E000900706E6C426F74746F6D000008006C7644784772696401030000000A
|
---|
| 285 | 0000001200436F6C756D6E735B305D2E43617074696F6E0B0000001200436F6C
|
---|
| 286 | 756D6E735B315D2E43617074696F6E0C0000001200436F6C756D6E735B325D2E
|
---|
| 287 | 43617074696F6E000D006362416464546F50444C69737401010000000D000000
|
---|
| 288 | 070043617074696F6E0009006362416464546F504C01010000000E0000000700
|
---|
| 289 | 43617074696F6E000A0062746E5072696D61727901010000000F000000070043
|
---|
| 290 | 617074696F6E00090062746E52656D6F76650101000000100000000700436170
|
---|
| 291 | 74696F6E000C0062746E53656C656374416C6C01010000001100000007004361
|
---|
| 292 | 7074696F6E00040062754F4B010100000012000000070043617074696F6E0008
|
---|
| 293 | 00627543616E63656C010100000013000000070043617074696F6E000D004F52
|
---|
| 294 | 5374617469635465787434010100000014000000070043617074696F6E00}
|
---|
| 295 | end
|
---|
| 296 | end
|
---|