source: cprs/branches/tmg-cprs/CPRS-Chart/fReview.dfm@ 729

Last change on this file since 729 was 729, checked in by Kevin Toppenberg, 14 years ago

Added functions to Templates, and Images tab

File size: 11.8 KB
Line 
1object frmReview: TfrmReview
2 Left = -681
3 Top = 207
4 AutoScroll = False
5 BorderIcons = [biMaximize]
6 Caption = 'Review / Sign Changes'
7 ClientHeight = 497
8 ClientWidth = 602
9 Color = clBtnFace
10 Font.Charset = DEFAULT_CHARSET
11 Font.Color = clWindowText
12 Font.Height = -11
13 Font.Name = 'MS Sans Serif'
14 Font.Style = []
15 KeyPreview = True
16 OldCreateOrder = True
17 Position = poScreenCenter
18 OnClose = FormClose
19 OnCreate = FormCreate
20 OnDestroy = FormDestroy
21 OnKeyDown = FormKeyDown
22 OnKeyUp = FormKeyUp
23 OnMouseDown = FormMouseDown
24 OnMouseMove = FormMouseMove
25 OnShow = FormShow
26 DesignSize = (
27 602
28 497)
29 PixelsPerInch = 96
30 TextHeight = 13
31 object laDiagnosis: TLabel
32 Left = 256
33 Top = 135
34 Width = 46
35 Height = 13
36 Caption = 'Diagnosis'
37 Visible = False
38 end
39 object pnlSignature: TPanel
40 Left = 8
41 Top = 423
42 Width = 373
43 Height = 65
44 Anchors = [akLeft, akBottom]
45 BevelOuter = bvNone
46 TabOrder = 0
47 object lblESCode: TLabel
48 Left = 0
49 Top = 0
50 Width = 123
51 Height = 13
52 Caption = 'Electronic Signature Code'
53 end
54 object txtESCode: TCaptionEdit
55 Left = 0
56 Top = 14
57 Width = 137
58 Height = 21
59 PasswordChar = '*'
60 TabOrder = 0
61 OnChange = txtESCodeChange
62 Caption = 'Electronic Signature Code'
63 end
64 end
65 object pnlOrderAction: TPanel
66 Left = 8
67 Top = 423
68 Width = 373
69 Height = 65
70 Anchors = [akLeft, akBottom]
71 BevelOuter = bvNone
72 TabOrder = 1
73 Visible = False
74 object Label1: TStaticText
75 Left = 0
76 Top = 0
77 Width = 111
78 Height = 17
79 Caption = 'For orders, select from:'
80 TabOrder = 4
81 end
82 object radSignChart: TRadioButton
83 Left = 0
84 Top = 16
85 Width = 101
86 Height = 17
87 Caption = '&Signed on Chart'
88 TabOrder = 0
89 OnClick = radReleaseClick
90 end
91 object radHoldSign: TRadioButton
92 Left = 0
93 Top = 36
94 Width = 101
95 Height = 17
96 Caption = '&Hold until Signed'
97 Checked = True
98 TabOrder = 1
99 TabStop = True
100 OnClick = radReleaseClick
101 end
102 object grpRelease: TGroupBox
103 Left = 120
104 Top = 16
105 Width = 241
106 Height = 42
107 TabOrder = 3
108 Visible = False
109 object radVerbal: TRadioButton
110 Left = 8
111 Top = 19
112 Width = 53
113 Height = 17
114 Caption = '&Verbal'
115 Enabled = False
116 TabOrder = 0
117 end
118 object radPhone: TRadioButton
119 Left = 80
120 Top = 19
121 Width = 77
122 Height = 17
123 Caption = '&Telephone'
124 Enabled = False
125 TabOrder = 1
126 end
127 object radPolicy: TRadioButton
128 Left = 168
129 Top = 19
130 Width = 49
131 Height = 17
132 Caption = '&Policy'
133 Enabled = False
134 TabOrder = 2
135 end
136 end
137 object radRelease: TRadioButton
138 Left = 128
139 Top = 16
140 Width = 113
141 Height = 17
142 Caption = '&Release to Service'
143 TabOrder = 2
144 Visible = False
145 OnClick = radReleaseClick
146 end
147 end
148 object cmdOK: TButton
149 Left = 442
150 Top = 471
151 Width = 72
152 Height = 21
153 Anchors = [akRight, akBottom]
154 Caption = 'OK'
155 Default = True
156 TabOrder = 2
157 OnClick = cmdOKClick
158 end
159 object cmdCancel: TButton
160 Left = 522
161 Top = 471
162 Width = 72
163 Height = 21
164 Anchors = [akRight, akBottom]
165 Cancel = True
166 Caption = 'Cancel'
167 TabOrder = 3
168 OnClick = cmdCancelClick
169 end
170 object lstReview: TCaptionCheckListBox
171 Left = 8
172 Top = 154
173 Width = 587
174 Height = 264
175 OnClickCheck = lstReviewClickCheck
176 Anchors = [akLeft, akTop, akRight, akBottom]
177 ItemHeight = 15
178 ParentShowHint = False
179 PopupMenu = poBACopyPaste
180 ShowHint = True
181 Style = lbOwnerDrawVariable
182 TabOrder = 6
183 OnClick = lstReviewClick
184 OnDrawItem = lstReviewDrawItem
185 OnKeyUp = lstReviewKeyUp
186 OnMeasureItem = lstReviewMeasureItem
187 OnMouseDown = lstReviewMouseDown
188 OnMouseMove = lstReviewMouseMove
189 Caption = 'Signature will be Applied to Checked Items'
190 end
191 inline fraCoPay: TfraCoPayDesc
192 Left = 0
193 Top = 0
194 Width = 602
195 Height = 129
196 Align = alTop
197 AutoScroll = False
198 AutoSize = True
199 ParentShowHint = False
200 ShowHint = True
201 TabOrder = 4
202 Visible = False
203 inherited pnlRight: TPanel
204 Left = 392
205 Height = 129
206 inherited lblCaption: TStaticText
207 Caption = 'Patient Orders Related To:'
208 end
209 inherited pnlMain: TPanel
210 Height = 112
211 inherited Panel7: TPanel
212 inherited lblHNC2: TORStaticText
213 OnEnter = fraCoPayLabel23Enter
214 OnExit = fraCoPayLabel23Exit
215 end
216 inherited lblHNC: TORStaticText
217 OnEnter = fraCoPayLabel23Enter
218 OnExit = fraCoPayLabel23Exit
219 end
220 end
221 inherited Panel8: TPanel
222 inherited Label12: TORStaticText
223 OnEnter = fraCoPayLabel23Enter
224 OnExit = fraCoPayLabel23Exit
225 end
226 inherited Label11: TORStaticText
227 OnEnter = fraCoPayLabel23Enter
228 OnExit = fraCoPayLabel23Exit
229 end
230 end
231 inherited Panel9: TPanel
232 inherited Label14: TORStaticText
233 OnEnter = fraCoPayLabel23Enter
234 OnExit = fraCoPayLabel23Exit
235 end
236 inherited Label13: TORStaticText
237 OnEnter = fraCoPayLabel23Enter
238 OnExit = fraCoPayLabel23Exit
239 end
240 end
241 inherited Panel10: TPanel
242 inherited Label16: TORStaticText
243 OnEnter = fraCoPayLabel23Enter
244 OnExit = fraCoPayLabel23Exit
245 end
246 inherited Label15: TORStaticText
247 OnEnter = fraCoPayLabel23Enter
248 OnExit = fraCoPayLabel23Exit
249 end
250 end
251 inherited Panel11: TPanel
252 inherited Label18: TORStaticText
253 OnEnter = fraCoPayLabel23Enter
254 OnExit = fraCoPayLabel23Exit
255 end
256 inherited Label17: TORStaticText
257 OnEnter = fraCoPayLabel23Enter
258 OnExit = fraCoPayLabel23Exit
259 end
260 end
261 inherited Panel12: TPanel
262 inherited Label24: TORStaticText
263 OnEnter = fraCoPayLabel23Enter
264 OnExit = fraCoPayLabel23Exit
265 end
266 inherited Label23: TORStaticText
267 OnEnter = fraCoPayLabel23Enter
268 OnExit = fraCoPayLabel23Exit
269 end
270 end
271 inherited Panel1: TPanel
272 inherited StaticText4: TORStaticText
273 OnEnter = fraCoPayLabel23Enter
274 OnExit = fraCoPayLabel23Exit
275 end
276 inherited StaticText1: TORStaticText
277 OnEnter = fraCoPayLabel23Enter
278 OnExit = fraCoPayLabel23Exit
279 end
280 end
281 end
282 end
283 inherited pnlSC: TPanel
284 Width = 392
285 Height = 129
286 inherited lblSCDisplay: TLabel
287 Width = 392
288 end
289 inherited memSCDisplay: TCaptionMemo
290 Width = 392
291 Height = 112
292 end
293 end
294 end
295 object lblSig: TStaticText
296 Left = 8
297 Top = 136
298 Width = 205
299 Height = 17
300 Caption = 'Signature will be Applied to Checked Items'
301 TabOrder = 5
302 TabStop = True
303 end
304 object gbxDxLookup: TGroupBox
305 Left = 8
306 Top = 136
307 Width = 101
308 Height = 48
309 Caption = 'Lookup Diagnosis'
310 TabOrder = 8
311 TabStop = True
312 Visible = False
313 object buDiagnosis: TButton
314 Left = 7
315 Top = 21
316 Width = 88
317 Height = 21
318 Caption = '&Diagnosis'
319 Enabled = False
320 TabOrder = 0
321 OnClick = buDiagnosisClick
322 end
323 end
324 object TMGAutoPrintCKBox: TCheckBox
325 Left = 443
326 Top = 435
327 Width = 142
328 Height = 17
329 Anchors = [akRight, akBottom]
330 Caption = 'Print note(s) after signing'
331 Checked = True
332 State = cbChecked
333 TabOrder = 9
334 end
335 object poBACopyPaste: TPopupMenu
336 Left = 384
337 Top = 280
338 object Copy1: TMenuItem
339 Caption = '&Copy'
340 ShortCut = 16451
341 OnClick = Copy1Click
342 end
343 object Paste1: TMenuItem
344 Caption = '&Paste'
345 Enabled = False
346 ShortCut = 16470
347 OnClick = Paste1Click
348 end
349 object Diagnosis1: TMenuItem
350 Caption = '&Diagnosis...'
351 ShortCut = 32836
352 OnClick = buDiagnosisClick
353 end
354 object Exit1: TMenuItem
355 Caption = '&Exit'
356 ShortCut = 16453
357 OnClick = Exit1Click
358 end
359 end
360 object DKLanguageController1: TDKLanguageController
361 Left = 288
362 Top = 248
363 LangData = {
364 090066726D526576696577010100000001000000070043617074696F6E011A00
365 00000B006C61446961676E6F736973010100000002000000070043617074696F
366 6E000C00706E6C5369676E6174757265000009006C626C4553436F6465010100
367 000003000000070043617074696F6E0009007478744553436F64650101000000
368 04000000070043617074696F6E000E00706E6C4F72646572416374696F6E0000
369 06004C6162656C31010100000005000000070043617074696F6E000C00726164
370 5369676E4368617274010100000006000000070043617074696F6E000B007261
371 64486F6C645369676E010100000007000000070043617074696F6E000A006772
372 7052656C656173650000090072616456657262616C0101000000080000000700
373 43617074696F6E00080072616450686F6E650101000000090000000700436170
374 74696F6E000900726164506F6C69637901010000000A00000007004361707469
375 6F6E000A0072616452656C6561736501010000000B000000070043617074696F
376 6E000500636D644F4B01010000000C000000070043617074696F6E000900636D
377 6443616E63656C01010000000D000000070043617074696F6E0009006C737452
378 657669657701010000000E000000070043617074696F6E000800667261436F50
379 617900011D0000000800706E6C5269676874000007005370616365723200000A
380 006C626C43617074696F6E01010000000F000000070043617074696F6E000700
381 706E6C4D61696E00000700737061636572310000060050616E656C3700000700
382 6C626C484E4332010100000010000000070043617074696F6E0006006C626C48
383 4E43010100000011000000070043617074696F6E00060050616E656C38000007
384 004C6162656C3132010100000012000000070043617074696F6E0007004C6162
385 656C3131010100000013000000070043617074696F6E00060050616E656C3900
386 0007004C6162656C3134010100000014000000070043617074696F6E0007004C
387 6162656C3133010100000015000000070043617074696F6E00070050616E656C
388 3130000007004C6162656C3136010100000016000000070043617074696F6E00
389 07004C6162656C3135010100000017000000070043617074696F6E0007005061
390 6E656C3131000007004C6162656C313801010000001800000007004361707469
391 6F6E0007004C6162656C3137010100000019000000070043617074696F6E0007
392 0050616E656C3132000007004C6162656C323401010000001A00000007004361
393 7074696F6E0007004C6162656C323301010000001B000000070043617074696F
394 6E00060050616E656C3100000B00537461746963546578743401010000001C00
395 0000070043617074696F6E000B00537461746963546578743101010000001D00
396 0000070043617074696F6E000500706E6C534300000C006C626C534344697370
397 6C617901010000001E000000070043617074696F6E000C006D656D5343446973
398 706C617901010000001F000000070043617074696F6E0006006C626C53696701
399 0100000020000000070043617074696F6E000B0067627844784C6F6F6B757001
400 0100000021000000070043617074696F6E000B006275446961676E6F73697301
401 0100000022000000070043617074696F6E000D00706F4241436F707950617374
402 6500000500436F707931010100000023000000070043617074696F6E00060050
403 6173746531010100000024000000070043617074696F6E000A00446961676E6F
404 73697331010100000025000000070043617074696F6E00050045786974310101
405 00000026000000070043617074696F6E001100544D474175746F5072696E7443
406 4B426F78010100000027000000070043617074696F6E00}
407 end
408end
Note: See TracBrowser for help on using the repository browser.