source: cprs/trunk/CPRS-Chart/Options/fOptionsPatientSelection.dfm@ 808

Last change on this file since 808 was 456, checked in by Kevin Toppenberg, 16 years ago

Initial Upload of Official WV CPRS 1.0.26.76
File size: 13.1 KB
RevLine 
[456]1object frmOptionsPatientSelection: TfrmOptionsPatientSelection
2 Left = 345
3 Top = 133
4 HelpContext = 9060
5 BorderIcons = [biSystemMenu, biHelp]
6 BorderStyle = bsDialog
7 Caption = 'Patient Selection Defaults'
8 ClientHeight = 413
9 ClientWidth = 414
10 Color = clBtnFace
11 Font.Charset = DEFAULT_CHARSET
12 Font.Color = clWindowText
13 Font.Height = -11
14 Font.Name = 'MS Sans Serif'
15 Font.Style = []
16 HelpFile = 'CPRSWT.HLP'
17 OldCreateOrder = False
18 Position = poScreenCenter
19 OnCreate = FormCreate
20 OnShow = FormShow
21 PixelsPerInch = 96
22 TextHeight = 13
23 object lblClinicDays: TLabel
24 Left = 179
25 Top = 162
26 Width = 101
27 Height = 13
28 Caption = 'Clinic for day of week'
29 end
30 object lblMonday: TLabel
31 Left = 179
32 Top = 184
33 Width = 41
34 Height = 13
35 Caption = 'Monday:'
36 end
37 object lblTuesday: TLabel
38 Left = 179
39 Top = 213
40 Width = 44
41 Height = 13
42 Caption = 'Tuesday:'
43 end
44 object lblWednesday: TLabel
45 Left = 179
46 Top = 241
47 Width = 60
48 Height = 13
49 Caption = 'Wednesday:'
50 end
51 object lblThursday: TLabel
52 Left = 179
53 Top = 270
54 Width = 47
55 Height = 13
56 Caption = 'Thursday:'
57 end
58 object lblFriday: TLabel
59 Left = 179
60 Top = 298
61 Width = 31
62 Height = 13
63 Caption = 'Friday:'
64 end
65 object lblSaturday: TLabel
66 Left = 179
67 Top = 327
68 Width = 45
69 Height = 13
70 Caption = 'Saturday:'
71 end
72 object lblSunday: TLabel
73 Left = 179
74 Top = 355
75 Width = 39
76 Height = 13
77 Caption = 'Sunday:'
78 end
79 object lblVisitStart: TLabel
80 Left = 20
81 Top = 321
82 Width = 25
83 Height = 13
84 Alignment = taRightJustify
85 Caption = 'Start:'
86 end
87 object lblVisitStop: TLabel
88 Left = 20
89 Top = 352
90 Width = 25
91 Height = 13
92 Alignment = taRightJustify
93 Caption = 'Stop:'
94 end
95 object lbWard: TLabel
96 Left = 179
97 Top = 136
98 Width = 29
99 Height = 13
100 Caption = 'Ward:'
101 end
102 object lblTeam: TLabel
103 Left = 179
104 Top = 107
105 Width = 51
106 Height = 13
107 Caption = 'Team/List:'
108 end
109 object lblTreating: TLabel
110 Left = 179
111 Top = 77
112 Width = 88
113 Height = 13
114 Caption = 'Treating Specialty:'
115 end
116 object lblProvider: TLabel
117 Left = 179
118 Top = 50
119 Width = 79
120 Height = 13
121 Caption = 'Primary Provider:'
122 end
123 object lblVisitDateRange: TMemo
124 Left = 20
125 Top = 255
126 Width = 133
127 Height = 61
128 TabStop = False
129 BorderStyle = bsNone
130 Color = clBtnFace
131 Lines.Strings = (
132 'Display patients that have '
133 'clinic appointments within '
134 'this date range.')
135 ReadOnly = True
136 TabOrder = 18
137 end
138 object lblInfo: TMemo
139 Left = 8
140 Top = 6
141 Width = 393
142 Height = 27
143 TabStop = False
144 BorderStyle = bsNone
145 Color = clBtnFace
146 Font.Charset = DEFAULT_CHARSET
147 Font.Color = clWindowText
148 Font.Height = -11
149 Font.Name = 'MS Sans Serif'
150 Font.Style = []
151 Lines.Strings = (
152
153 'The values on the right will be defaults for selecting patients ' +
154 'depending on the list '
155
156 'source selected. Combination uses the criteria defined using Sou' +
157 'rce Combinations.')
158 ParentFont = False
159 ReadOnly = True
160 TabOrder = 19
161 end
162 object pnlBottom: TPanel
163 Left = 0
164 Top = 380
165 Width = 414
166 Height = 33
167 HelpContext = 9060
168 Align = alBottom
169 BevelOuter = bvNone
170 ParentColor = True
171 TabOrder = 17
172 object bvlBottom: TBevel
173 Left = 0
174 Top = 0
175 Width = 414
176 Height = 2
177 Align = alTop
178 end
179 object btnOK: TButton
180 Left = 251
181 Top = 8
182 Width = 75
183 Height = 22
184 HelpContext = 9996
185 Caption = 'OK'
186 ModalResult = 1
187 TabOrder = 0
188 OnClick = btnOKClick
189 end
190 object btnCancel: TButton
191 Left = 331
192 Top = 8
193 Width = 75
194 Height = 22
195 HelpContext = 9997
196 Cancel = True
197 Caption = 'Cancel'
198 ModalResult = 2
199 TabOrder = 1
200 end
201 end
202 object cboProvider: TORComboBox
203 Left = 285
204 Top = 48
205 Width = 121
206 Height = 21
207 HelpContext = 9063
208 Style = orcsDropDown
209 AutoSelect = True
210 Caption = 'Primary Provider'
211 Color = clWindow
212 DropDownCount = 8
213 ItemHeight = 13
214 ItemTipColor = clWindow
215 ItemTipEnable = True
216 ListItemsOnly = True
217 LongList = True
218 LookupPiece = 2
219 MaxLength = 0
220 Pieces = '2,3'
221 Sorted = True
222 SynonymChars = '<>'
223 TabOrder = 6
224 OnExit = cboProviderExit
225 OnKeyUp = cboProviderKeyUp
226 OnNeedData = cboProviderNeedData
227 end
228 object cboTreating: TORComboBox
229 Left = 285
230 Top = 75
231 Width = 121
232 Height = 21
233 HelpContext = 9064
234 Style = orcsDropDown
235 AutoSelect = True
236 Caption = 'Treating Specialty'
237 Color = clWindow
238 DropDownCount = 8
239 ItemHeight = 13
240 ItemTipColor = clWindow
241 ItemTipEnable = True
242 ListItemsOnly = False
243 LongList = False
244 LookupPiece = 0
245 MaxLength = 0
246 Pieces = '2'
247 Sorted = True
248 SynonymChars = '<>'
249 TabOrder = 7
250 OnExit = cboProviderExit
251 OnKeyUp = cboProviderKeyUp
252 end
253 object cboTeam: TORComboBox
254 Left = 285
255 Top = 104
256 Width = 121
257 Height = 21
258 HelpContext = 9065
259 Style = orcsDropDown
260 AutoSelect = True
261 Caption = 'Team/List'
262 Color = clWindow
263 DropDownCount = 8
264 ItemHeight = 13
265 ItemTipColor = clWindow
266 ItemTipEnable = True
267 ListItemsOnly = False
268 LongList = False
269 LookupPiece = 0
270 MaxLength = 0
271 Pieces = '2'
272 Sorted = True
273 SynonymChars = '<>'
274 TabOrder = 8
275 OnExit = cboProviderExit
276 OnKeyUp = cboProviderKeyUp
277 end
278 object cboWard: TORComboBox
279 Left = 285
280 Top = 132
281 Width = 121
282 Height = 21
283 HelpContext = 9066
284 Style = orcsDropDown
285 AutoSelect = True
286 Caption = 'Ward'
287 Color = clWindow
288 DropDownCount = 8
289 ItemHeight = 13
290 ItemTipColor = clWindow
291 ItemTipEnable = True
292 ListItemsOnly = False
293 LongList = False
294 LookupPiece = 0
295 MaxLength = 0
296 Pieces = '2'
297 Sorted = True
298 SynonymChars = '<>'
299 TabOrder = 9
300 OnExit = cboProviderExit
301 OnKeyUp = cboProviderKeyUp
302 end
303 object cboMonday: TORComboBox
304 Left = 285
305 Top = 181
306 Width = 121
307 Height = 21
308 HelpContext = 9067
309 Style = orcsDropDown
310 AutoSelect = True
311 Caption = 'Monday'
312 Color = clWindow
313 DropDownCount = 8
314 ItemHeight = 13
315 ItemTipColor = clWindow
316 ItemTipEnable = True
317 ListItemsOnly = True
318 LongList = True
319 LookupPiece = 0
320 MaxLength = 0
321 Pieces = '2'
322 Sorted = True
323 SynonymChars = '<>'
324 TabOrder = 10
325 OnExit = cboProviderExit
326 OnKeyUp = cboProviderKeyUp
327 OnNeedData = cboMondayNeedData
328 end
329 object cboTuesday: TORComboBox
330 Left = 285
331 Top = 210
332 Width = 121
333 Height = 21
334 HelpContext = 9067
335 Style = orcsDropDown
336 AutoSelect = True
337 Caption = 'Tuesday'
338 Color = clWindow
339 DropDownCount = 8
340 ItemHeight = 13
341 ItemTipColor = clWindow
342 ItemTipEnable = True
343 ListItemsOnly = True
344 LongList = True
345 LookupPiece = 0
346 MaxLength = 0
347 Pieces = '2'
348 Sorted = True
349 SynonymChars = '<>'
350 TabOrder = 11
351 OnExit = cboProviderExit
352 OnKeyUp = cboProviderKeyUp
353 OnNeedData = cboTuesdayNeedData
354 end
355 object cboWednesday: TORComboBox
356 Left = 285
357 Top = 238
358 Width = 121
359 Height = 21
360 HelpContext = 9067
361 Style = orcsDropDown
362 AutoSelect = True
363 Caption = 'Wednesday'
364 Color = clWindow
365 DropDownCount = 8
366 ItemHeight = 13
367 ItemTipColor = clWindow
368 ItemTipEnable = True
369 ListItemsOnly = True
370 LongList = True
371 LookupPiece = 0
372 MaxLength = 0
373 Pieces = '2'
374 Sorted = True
375 SynonymChars = '<>'
376 TabOrder = 12
377 OnExit = cboProviderExit
378 OnKeyUp = cboProviderKeyUp
379 OnNeedData = cboWednesdayNeedData
380 end
381 object cboThursday: TORComboBox
382 Left = 285
383 Top = 267
384 Width = 121
385 Height = 21
386 HelpContext = 9067
387 Style = orcsDropDown
388 AutoSelect = True
389 Caption = 'Thursday'
390 Color = clWindow
391 DropDownCount = 8
392 ItemHeight = 13
393 ItemTipColor = clWindow
394 ItemTipEnable = True
395 ListItemsOnly = True
396 LongList = True
397 LookupPiece = 0
398 MaxLength = 0
399 Pieces = '2'
400 Sorted = True
401 SynonymChars = '<>'
402 TabOrder = 13
403 OnExit = cboProviderExit
404 OnKeyUp = cboProviderKeyUp
405 OnNeedData = cboThursdayNeedData
406 end
407 object cboFriday: TORComboBox
408 Left = 285
409 Top = 295
410 Width = 121
411 Height = 21
412 HelpContext = 9067
413 Style = orcsDropDown
414 AutoSelect = True
415 Caption = 'Friday'
416 Color = clWindow
417 DropDownCount = 8
418 ItemHeight = 13
419 ItemTipColor = clWindow
420 ItemTipEnable = True
421 ListItemsOnly = True
422 LongList = True
423 LookupPiece = 0
424 MaxLength = 0
425 Pieces = '2'
426 Sorted = True
427 SynonymChars = '<>'
428 TabOrder = 14
429 OnExit = cboProviderExit
430 OnKeyUp = cboProviderKeyUp
431 OnNeedData = cboFridayNeedData
432 end
433 object cboSaturday: TORComboBox
434 Left = 285
435 Top = 324
436 Width = 121
437 Height = 21
438 HelpContext = 9067
439 Style = orcsDropDown
440 AutoSelect = True
441 Caption = 'Saturday'
442 Color = clWindow
443 DropDownCount = 8
444 ItemHeight = 13
445 ItemTipColor = clWindow
446 ItemTipEnable = True
447 ListItemsOnly = True
448 LongList = True
449 LookupPiece = 0
450 MaxLength = 0
451 Pieces = '2'
452 Sorted = True
453 SynonymChars = '<>'
454 TabOrder = 15
455 OnExit = cboProviderExit
456 OnKeyUp = cboProviderKeyUp
457 OnNeedData = cboSaturdayNeedData
458 end
459 object cboSunday: TORComboBox
460 Left = 285
461 Top = 352
462 Width = 121
463 Height = 21
464 HelpContext = 9067
465 Style = orcsDropDown
466 AutoSelect = True
467 Caption = 'Sunday'
468 Color = clWindow
469 DropDownCount = 8
470 ItemHeight = 13
471 ItemTipColor = clWindow
472 ItemTipEnable = True
473 ListItemsOnly = True
474 LongList = True
475 LookupPiece = 0
476 MaxLength = 0
477 Pieces = '2'
478 Sorted = True
479 SynonymChars = '<>'
480 TabOrder = 16
481 OnExit = cboProviderExit
482 OnKeyUp = cboProviderKeyUp
483 OnNeedData = cboSundayNeedData
484 end
485 object txtVisitStart: TCaptionEdit
486 Tag = -180
487 Left = 49
488 Top = 319
489 Width = 79
490 Height = 21
491 HelpContext = 9068
492 TabOrder = 2
493 Text = '0'
494 OnExit = txtVisitStartExit
495 OnKeyPress = txtVisitStartKeyPress
496 OnKeyUp = txtVisitStartKeyUp
497 Caption = 'Start'
498 end
499 object txtVisitStop: TCaptionEdit
500 Tag = 30
501 Left = 48
502 Top = 348
503 Width = 79
504 Height = 21
505 HelpContext = 9069
506 TabOrder = 4
507 Text = '0'
508 OnExit = txtVisitStopExit
509 OnKeyPress = txtVisitStopKeyPress
510 OnKeyUp = txtVisitStopKeyUp
511 Caption = 'Stop'
512 end
513 object spnVisitStart: TUpDown
514 Tag = -180
515 Left = 128
516 Top = 319
517 Width = 16
518 Height = 21
519 HelpContext = 9068
520 Associate = txtVisitStart
521 Min = -999
522 Max = 999
523 Position = 0
524 TabOrder = 3
525 Thousands = False
526 Wrap = False
527 OnClick = spnVisitStartClick
528 end
529 object spnVisitStop: TUpDown
530 Tag = 30
531 Left = 127
532 Top = 348
533 Width = 16
534 Height = 21
535 HelpContext = 9069
536 Associate = txtVisitStop
537 Min = -999
538 Max = 999
539 Position = 0
540 TabOrder = 5
541 Thousands = False
542 Wrap = False
543 OnClick = spnVisitStopClick
544 end
545 object radListSource: TRadioGroup
546 Left = 16
547 Top = 38
548 Width = 145
549 Height = 105
550 HelpContext = 9061
551 Caption = 'List Source '
552 ItemIndex = 0
553 Items.Strings = (
554 'Primary &Provider'
555 'Treating &Specialty'
556 'Team/&List'
557 '&Ward'
558 '&Clinic'
559 'C&ombination')
560 TabOrder = 0
561 OnClick = radListSourceClick
562 end
563 object grpSortOrder: TGroupBox
564 Left = 16
565 Top = 152
566 Width = 145
567 Height = 94
568 HelpContext = 9062
569 Caption = 'Sort Order '
570 TabOrder = 1
571 object radAlphabetical: TRadioButton
572 Left = 8
573 Top = 16
574 Width = 113
575 Height = 17
576 HelpContext = 9062
577 Caption = '&Alphabetical'
578 TabOrder = 0
579 end
580 object radRoomBed: TRadioButton
581 Left = 8
582 Top = 31
583 Width = 113
584 Height = 17
585 HelpContext = 9062
586 Caption = '&Room/Bed'
587 TabOrder = 1
588 end
589 object radAppointmentDate: TRadioButton
590 Left = 8
591 Top = 46
592 Width = 113
593 Height = 17
594 HelpContext = 9062
595 Caption = 'Appointment &Date'
596 TabOrder = 2
597 end
598 object radTerminalDigit: TRadioButton
599 Left = 8
600 Top = 60
601 Width = 113
602 Height = 17
603 HelpContext = 9062
604 Caption = '&Terminal Digit'
605 TabOrder = 3
606 end
607 object radSource: TRadioButton
608 Left = 8
609 Top = 75
610 Width = 113
611 Height = 17
612 HelpContext = 9062
613 Caption = 'So&urce'
614 TabOrder = 4
615 end
616 end
617end
Note: See TracBrowser for help on using the repository browser.