Context Navigation

fOptionsPatientSelection.dfm@ 1332

Last change on this file since 1332 was 829, checked in by Kevin Toppenberg, 14 years ago
Upgrade to version 27
File size: 15.4 KB

Line
1	inherited 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	HelpFile = 'CPRSWT.HLP'
11	Position = poScreenCenter
12	OnCreate = FormCreate
13	OnShow = FormShow
14	PixelsPerInch = 96
15	TextHeight = 13
16	object lblClinicDays: TLabel [0]
17	Left = 179
18	Top = 162
19	Width = 101
20	Height = 13
21	Caption = 'Clinic for day of week'
22	end
23	object lblMonday: TLabel [1]
24	Left = 179
25	Top = 184
26	Width = 41
27	Height = 13
28	Caption = 'Monday:'
29	end
30	object lblTuesday: TLabel [2]
31	Left = 179
32	Top = 213
33	Width = 44
34	Height = 13
35	Caption = 'Tuesday:'
36	end
37	object lblWednesday: TLabel [3]
38	Left = 179
39	Top = 241
40	Width = 60
41	Height = 13
42	Caption = 'Wednesday:'
43	end
44	object lblThursday: TLabel [4]
45	Left = 179
46	Top = 270
47	Width = 47
48	Height = 13
49	Caption = 'Thursday:'
50	end
51	object lblFriday: TLabel [5]
52	Left = 179
53	Top = 298
54	Width = 31
55	Height = 13
56	Caption = 'Friday:'
57	end
58	object lblSaturday: TLabel [6]
59	Left = 179
60	Top = 327
61	Width = 45
62	Height = 13
63	Caption = 'Saturday:'
64	end
65	object lblSunday: TLabel [7]
66	Left = 179
67	Top = 355
68	Width = 39
69	Height = 13
70	Caption = 'Sunday:'
71	end
72	object lblVisitStart: TLabel [8]
73	Left = 20
74	Top = 321
75	Width = 25
76	Height = 13
77	Alignment = taRightJustify
78	Caption = 'Start:'
79	end
80	object lblVisitStop: TLabel [9]
81	Left = 20
82	Top = 352
83	Width = 25
84	Height = 13
85	Alignment = taRightJustify
86	Caption = 'Stop:'
87	end
88	object lbWard: TLabel [10]
89	Left = 179
90	Top = 136
91	Width = 29
92	Height = 13
93	Caption = 'Ward:'
94	end
95	object lblTeam: TLabel [11]
96	Left = 179
97	Top = 107
98	Width = 51
99	Height = 13
100	Caption = 'Team/List:'
101	end
102	object lblTreating: TLabel [12]
103	Left = 179
104	Top = 77
105	Width = 88
106	Height = 13
107	Caption = 'Treating Specialty:'
108	end
109	object lblProvider: TLabel [13]
110	Left = 179
111	Top = 50
112	Width = 79
113	Height = 13
114	Caption = 'Primary Provider:'
115	end
116	object lblVisitDateRange: TMemo [14]
117	Left = 20
118	Top = 255
119	Width = 133
120	Height = 61
121	TabStop = False
122	BorderStyle = bsNone
123	Color = clBtnFace
124	Lines.Strings = (
125	'Display patients that have '
126	'clinic appointments within '
127	'this date range.')
128	ReadOnly = True
129	TabOrder = 18
130	end
131	object lblInfo: TMemo [15]
132	Left = 8
133	Top = 6
134	Width = 393
135	Height = 27
136	TabStop = False
137	BorderStyle = bsNone
138	Color = clBtnFace
139	Font.Charset = DEFAULT_CHARSET
140	Font.Color = clWindowText
141	Font.Height = -11
142	Font.Name = 'MS Sans Serif'
143	Font.Style = []
144	Lines.Strings = (
145
146	'The values on the right will be defaults for selecting patients ' +
147	'depending on the list '
148
149	'source selected. Combination uses the criteria defined using Sou' +
150	'rce Combinations.')
151	ParentFont = False
152	ReadOnly = True
153	TabOrder = 19
154	end
155	object pnlBottom: TPanel [16]
156	Left = 0
157	Top = 380
158	Width = 414
159	Height = 33
160	HelpContext = 9060
161	Align = alBottom
162	BevelOuter = bvNone
163	ParentColor = True
164	TabOrder = 17
165	object bvlBottom: TBevel
166	Left = 0
167	Top = 0
168	Width = 414
169	Height = 2
170	Align = alTop
171	end
172	object btnOK: TButton
173	Left = 251
174	Top = 8
175	Width = 75
176	Height = 22
177	HelpContext = 9996
178	Caption = 'OK'
179	ModalResult = 1
180	TabOrder = 0
181	OnClick = btnOKClick
182	end
183	object btnCancel: TButton
184	Left = 331
185	Top = 8
186	Width = 75
187	Height = 22
188	HelpContext = 9997
189	Cancel = True
190	Caption = 'Cancel'
191	ModalResult = 2
192	TabOrder = 1
193	end
194	end
195	object cboProvider: TORComboBox [17]
196	Left = 285
197	Top = 48
198	Width = 121
199	Height = 21
200	HelpContext = 9063
201	Style = orcsDropDown
202	AutoSelect = True
203	Caption = 'Primary Provider'
204	Color = clWindow
205	DropDownCount = 8
206	ItemHeight = 13
207	ItemTipColor = clWindow
208	ItemTipEnable = True
209	ListItemsOnly = True
210	LongList = True
211	LookupPiece = 2
212	MaxLength = 0
213	Pieces = '2,3'
214	Sorted = True
215	SynonymChars = '<>'
216	TabOrder = 6
217	OnExit = cboProviderExit
218	OnKeyUp = cboProviderKeyUp
219	OnNeedData = cboProviderNeedData
220	CharsNeedMatch = 1
221	end
222	object cboTreating: TORComboBox [18]
223	Left = 285
224	Top = 75
225	Width = 121
226	Height = 21
227	HelpContext = 9064
228	Style = orcsDropDown
229	AutoSelect = True
230	Caption = 'Treating Specialty'
231	Color = clWindow
232	DropDownCount = 8
233	ItemHeight = 13
234	ItemTipColor = clWindow
235	ItemTipEnable = True
236	ListItemsOnly = False
237	LongList = False
238	LookupPiece = 0
239	MaxLength = 0
240	Pieces = '2'
241	Sorted = True
242	SynonymChars = '<>'
243	TabOrder = 7
244	OnExit = cboProviderExit
245	OnKeyUp = cboProviderKeyUp
246	CharsNeedMatch = 1
247	end
248	object cboTeam: TORComboBox [19]
249	Left = 285
250	Top = 104
251	Width = 121
252	Height = 21
253	HelpContext = 9065
254	Style = orcsDropDown
255	AutoSelect = True
256	Caption = 'Team/List'
257	Color = clWindow
258	DropDownCount = 8
259	ItemHeight = 13
260	ItemTipColor = clWindow
261	ItemTipEnable = True
262	ListItemsOnly = False
263	LongList = False
264	LookupPiece = 0
265	MaxLength = 0
266	Pieces = '2'
267	Sorted = True
268	SynonymChars = '<>'
269	TabOrder = 8
270	OnExit = cboProviderExit
271	OnKeyUp = cboProviderKeyUp
272	CharsNeedMatch = 1
273	end
274	object cboWard: TORComboBox [20]
275	Left = 285
276	Top = 132
277	Width = 121
278	Height = 21
279	HelpContext = 9066
280	Style = orcsDropDown
281	AutoSelect = True
282	Caption = 'Ward'
283	Color = clWindow
284	DropDownCount = 8
285	ItemHeight = 13
286	ItemTipColor = clWindow
287	ItemTipEnable = True
288	ListItemsOnly = False
289	LongList = False
290	LookupPiece = 0
291	MaxLength = 0
292	Pieces = '2'
293	Sorted = True
294	SynonymChars = '<>'
295	TabOrder = 9
296	OnExit = cboProviderExit
297	OnKeyUp = cboProviderKeyUp
298	CharsNeedMatch = 1
299	end
300	object cboMonday: TORComboBox [21]
301	Left = 285
302	Top = 181
303	Width = 121
304	Height = 21
305	HelpContext = 9067
306	Style = orcsDropDown
307	AutoSelect = True
308	Caption = 'Monday'
309	Color = clWindow
310	DropDownCount = 8
311	ItemHeight = 13
312	ItemTipColor = clWindow
313	ItemTipEnable = True
314	ListItemsOnly = True
315	LongList = True
316	LookupPiece = 0
317	MaxLength = 0
318	Pieces = '2'
319	Sorted = True
320	SynonymChars = '<>'
321	TabOrder = 10
322	OnExit = cboProviderExit
323	OnKeyUp = cboProviderKeyUp
324	OnNeedData = cboMondayNeedData
325	CharsNeedMatch = 1
326	end
327	object cboTuesday: TORComboBox [22]
328	Left = 285
329	Top = 210
330	Width = 121
331	Height = 21
332	HelpContext = 9067
333	Style = orcsDropDown
334	AutoSelect = True
335	Caption = 'Tuesday'
336	Color = clWindow
337	DropDownCount = 8
338	ItemHeight = 13
339	ItemTipColor = clWindow
340	ItemTipEnable = True
341	ListItemsOnly = True
342	LongList = True
343	LookupPiece = 0
344	MaxLength = 0
345	Pieces = '2'
346	Sorted = True
347	SynonymChars = '<>'
348	TabOrder = 11
349	OnExit = cboProviderExit
350	OnKeyUp = cboProviderKeyUp
351	OnNeedData = cboTuesdayNeedData
352	CharsNeedMatch = 1
353	end
354	object cboWednesday: TORComboBox [23]
355	Left = 285
356	Top = 238
357	Width = 121
358	Height = 21
359	HelpContext = 9067
360	Style = orcsDropDown
361	AutoSelect = True
362	Caption = 'Wednesday'
363	Color = clWindow
364	DropDownCount = 8
365	ItemHeight = 13
366	ItemTipColor = clWindow
367	ItemTipEnable = True
368	ListItemsOnly = True
369	LongList = True
370	LookupPiece = 0
371	MaxLength = 0
372	Pieces = '2'
373	Sorted = True
374	SynonymChars = '<>'
375	TabOrder = 12
376	OnExit = cboProviderExit
377	OnKeyUp = cboProviderKeyUp
378	OnNeedData = cboWednesdayNeedData
379	CharsNeedMatch = 1
380	end
381	object cboThursday: TORComboBox [24]
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	CharsNeedMatch = 1
407	end
408	object cboFriday: TORComboBox [25]
409	Left = 285
410	Top = 295
411	Width = 121
412	Height = 21
413	HelpContext = 9067
414	Style = orcsDropDown
415	AutoSelect = True
416	Caption = 'Friday'
417	Color = clWindow
418	DropDownCount = 8
419	ItemHeight = 13
420	ItemTipColor = clWindow
421	ItemTipEnable = True
422	ListItemsOnly = True
423	LongList = True
424	LookupPiece = 0
425	MaxLength = 0
426	Pieces = '2'
427	Sorted = True
428	SynonymChars = '<>'
429	TabOrder = 14
430	OnExit = cboProviderExit
431	OnKeyUp = cboProviderKeyUp
432	OnNeedData = cboFridayNeedData
433	CharsNeedMatch = 1
434	end
435	object cboSaturday: TORComboBox [26]
436	Left = 285
437	Top = 324
438	Width = 121
439	Height = 21
440	HelpContext = 9067
441	Style = orcsDropDown
442	AutoSelect = True
443	Caption = 'Saturday'
444	Color = clWindow
445	DropDownCount = 8
446	ItemHeight = 13
447	ItemTipColor = clWindow
448	ItemTipEnable = True
449	ListItemsOnly = True
450	LongList = True
451	LookupPiece = 0
452	MaxLength = 0
453	Pieces = '2'
454	Sorted = True
455	SynonymChars = '<>'
456	TabOrder = 15
457	OnExit = cboProviderExit
458	OnKeyUp = cboProviderKeyUp
459	OnNeedData = cboSaturdayNeedData
460	CharsNeedMatch = 1
461	end
462	object cboSunday: TORComboBox [27]
463	Left = 285
464	Top = 352
465	Width = 121
466	Height = 21
467	HelpContext = 9067
468	Style = orcsDropDown
469	AutoSelect = True
470	Caption = 'Sunday'
471	Color = clWindow
472	DropDownCount = 8
473	ItemHeight = 13
474	ItemTipColor = clWindow
475	ItemTipEnable = True
476	ListItemsOnly = True
477	LongList = True
478	LookupPiece = 0
479	MaxLength = 0
480	Pieces = '2'
481	Sorted = True
482	SynonymChars = '<>'
483	TabOrder = 16
484	OnExit = cboProviderExit
485	OnKeyUp = cboProviderKeyUp
486	OnNeedData = cboSundayNeedData
487	CharsNeedMatch = 1
488	end
489	object txtVisitStart: TCaptionEdit [28]
490	Tag = -180
491	Left = 49
492	Top = 319
493	Width = 79
494	Height = 21
495	HelpContext = 9068
496	TabOrder = 2
497	Text = '0'
498	OnExit = txtVisitStartExit
499	OnKeyPress = txtVisitStartKeyPress
500	OnKeyUp = txtVisitStartKeyUp
501	Caption = 'Start'
502	end
503	object txtVisitStop: TCaptionEdit [29]
504	Tag = 30
505	Left = 48
506	Top = 348
507	Width = 79
508	Height = 21
509	HelpContext = 9069
510	TabOrder = 4
511	Text = '0'
512	OnExit = txtVisitStopExit
513	OnKeyPress = txtVisitStopKeyPress
514	OnKeyUp = txtVisitStopKeyUp
515	Caption = 'Stop'
516	end
517	object spnVisitStart: TUpDown [30]
518	Tag = -180
519	Left = 128
520	Top = 319
521	Width = 16
522	Height = 21
523	HelpContext = 9068
524	Associate = txtVisitStart
525	Min = -999
526	Max = 999
527	TabOrder = 3
528	Thousands = False
529	OnClick = spnVisitStartClick
530	end
531	object spnVisitStop: TUpDown [31]
532	Tag = 30
533	Left = 127
534	Top = 348
535	Width = 16
536	Height = 21
537	HelpContext = 9069
538	Associate = txtVisitStop
539	Min = -999
540	Max = 999
541	TabOrder = 5
542	Thousands = False
543	OnClick = spnVisitStopClick
544	end
545	object radListSource: TRadioGroup [32]
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 [33]
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
617	inherited amgrMain: TVA508AccessibilityManager
618	Data = (
619	(
620	'Component = lblVisitDateRange'
621	'Status = stsDefault')
622	(
623	'Component = lblInfo'
624	'Status = stsDefault')
625	(
626	'Component = pnlBottom'
627	'Status = stsDefault')
628	(
629	'Component = btnOK'
630	'Status = stsDefault')
631	(
632	'Component = btnCancel'
633	'Status = stsDefault')
634	(
635	'Component = cboProvider'
636	'Status = stsDefault')
637	(
638	'Component = cboTreating'
639	'Status = stsDefault')
640	(
641	'Component = cboTeam'
642	'Status = stsDefault')
643	(
644	'Component = cboWard'
645	'Status = stsDefault')
646	(
647	'Component = cboMonday'
648	'Status = stsDefault')
649	(
650	'Component = cboTuesday'
651	'Status = stsDefault')
652	(
653	'Component = cboWednesday'
654	'Status = stsDefault')
655	(
656	'Component = cboThursday'
657	'Status = stsDefault')
658	(
659	'Component = cboFriday'
660	'Status = stsDefault')
661	(
662	'Component = cboSaturday'
663	'Status = stsDefault')
664	(
665	'Component = cboSunday'
666	'Status = stsDefault')
667	(
668	'Component = txtVisitStart'
669	'Status = stsDefault')
670	(
671	'Component = txtVisitStop'
672	'Status = stsDefault')
673	(
674	'Component = spnVisitStart'
675	'Status = stsDefault')
676	(
677	'Component = spnVisitStop'
678	'Status = stsDefault')
679	(
680	'Component = radListSource'
681	'Status = stsDefault')
682	(
683	'Component = grpSortOrder'
684	'Status = stsDefault')
685	(
686	'Component = radAlphabetical'
687	'Status = stsDefault')
688	(
689	'Component = radRoomBed'
690	'Status = stsDefault')
691	(
692	'Component = radAppointmentDate'
693	'Status = stsDefault')
694	(
695	'Component = radTerminalDigit'
696	'Status = stsDefault')
697	(
698	'Component = radSource'
699	'Status = stsDefault')
700	(
701	'Component = frmOptionsPatientSelection'
702	'Status = stsDefault'))
703	end
704	end

Note: See TracBrowser for help on using the repository browser.

Download in other formats:

Original Format