source: cprs/branches/foia-cprs/CPRS-Chart/fReview.dfm@ 459

Last change on this file since 459 was 459, checked in by Kevin Toppenberg, 17 years ago

Adding foia-cprs branch
File size: 8.4 KB
Line 
1object frmReview: TfrmReview
2 Left = 212
3 Top = 139
4 AutoScroll = False
5 BorderIcons = [biMaximize]
6 Caption = 'Review / Sign Changes'
7 ClientHeight = 501
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 501)
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 lblSig: TStaticText
40 Left = 8
41 Top = 136
42 Width = 205
43 Height = 17
44 Caption = 'Signature will be Applied to Checked Items'
45 TabOrder = 5
46 TabStop = True
47 end
48 object pnlSignature: TPanel
49 Left = 8
50 Top = 427
51 Width = 373
52 Height = 65
53 Anchors = [akLeft, akBottom]
54 BevelOuter = bvNone
55 TabOrder = 0
56 object lblESCode: TLabel
57 Left = 0
58 Top = 0
59 Width = 123
60 Height = 13
61 Caption = 'Electronic Signature Code'
62 end
63 object txtESCode: TCaptionEdit
64 Left = 0
65 Top = 14
66 Width = 137
67 Height = 21
68 PasswordChar = '*'
69 TabOrder = 0
70 OnChange = txtESCodeChange
71 Caption = 'Electronic Signature Code'
72 end
73 end
74 object pnlOrderAction: TPanel
75 Left = 8
76 Top = 427
77 Width = 373
78 Height = 65
79 Anchors = [akLeft, akBottom]
80 BevelOuter = bvNone
81 TabOrder = 1
82 Visible = False
83 object Label1: TStaticText
84 Left = 0
85 Top = 0
86 Width = 111
87 Height = 17
88 Caption = 'For orders, select from:'
89 TabOrder = 4
90 end
91 object radSignChart: TRadioButton
92 Left = 0
93 Top = 16
94 Width = 101
95 Height = 17
96 Caption = '&Signed on Chart'
97 TabOrder = 0
98 OnClick = radReleaseClick
99 end
100 object radHoldSign: TRadioButton
101 Left = 0
102 Top = 36
103 Width = 101
104 Height = 17
105 Caption = '&Hold until Signed'
106 Checked = True
107 TabOrder = 1
108 TabStop = True
109 OnClick = radReleaseClick
110 end
111 object grpRelease: TGroupBox
112 Left = 120
113 Top = 16
114 Width = 241
115 Height = 42
116 TabOrder = 3
117 Visible = False
118 object radVerbal: TRadioButton
119 Left = 8
120 Top = 19
121 Width = 53
122 Height = 17
123 Caption = '&Verbal'
124 Enabled = False
125 TabOrder = 0
126 end
127 object radPhone: TRadioButton
128 Left = 80
129 Top = 19
130 Width = 77
131 Height = 17
132 Caption = '&Telephone'
133 Enabled = False
134 TabOrder = 1
135 end
136 object radPolicy: TRadioButton
137 Left = 168
138 Top = 19
139 Width = 49
140 Height = 17
141 Caption = '&Policy'
142 Enabled = False
143 TabOrder = 2
144 end
145 end
146 object radRelease: TRadioButton
147 Left = 128
148 Top = 16
149 Width = 113
150 Height = 17
151 Caption = '&Release to Service'
152 TabOrder = 2
153 Visible = False
154 OnClick = radReleaseClick
155 end
156 end
157 object cmdOK: TButton
158 Left = 442
159 Top = 475
160 Width = 72
161 Height = 21
162 Anchors = [akRight, akBottom]
163 Caption = 'OK'
164 Default = True
165 TabOrder = 2
166 OnClick = cmdOKClick
167 end
168 object cmdCancel: TButton
169 Left = 522
170 Top = 475
171 Width = 72
172 Height = 21
173 Anchors = [akRight, akBottom]
174 Cancel = True
175 Caption = 'Cancel'
176 TabOrder = 3
177 OnClick = cmdCancelClick
178 end
179 object lstReview: TCaptionCheckListBox
180 Left = 8
181 Top = 154
182 Width = 587
183 Height = 268
184 OnClickCheck = lstReviewClickCheck
185 Anchors = [akLeft, akTop, akRight, akBottom]
186 ItemHeight = 15
187 ParentShowHint = False
188 PopupMenu = poBACopyPaste
189 ShowHint = True
190 Style = lbOwnerDrawVariable
191 TabOrder = 6
192 OnClick = lstReviewClick
193 OnDrawItem = lstReviewDrawItem
194 OnKeyUp = lstReviewKeyUp
195 OnMeasureItem = lstReviewMeasureItem
196 OnMouseDown = lstReviewMouseDown
197 OnMouseMove = lstReviewMouseMove
198 Caption = 'Signature will be Applied to Checked Items'
199 end
200 inline fraCoPay: TfraCoPayDesc
201 Left = 0
202 Top = 0
203 Width = 602
204 Height = 129
205 Align = alTop
206 ParentShowHint = False
207 ShowHint = True
208 TabOrder = 4
209 Visible = False
210 inherited pnlRight: TPanel
211 Left = 353
212 Height = 129
213 inherited lblCaption: TStaticText
214 Caption = 'Patient Orders Related To:'
215 end
216 inherited pnlMain: TPanel
217 Height = 112
218 inherited Panel7: TPanel
219 inherited lblHNC2: TORStaticText
220 OnEnter = fraCoPayLabel23Enter
221 OnExit = fraCoPayLabel23Exit
222 end
223 inherited lblHNC: TORStaticText
224 OnEnter = fraCoPayLabel23Enter
225 OnExit = fraCoPayLabel23Exit
226 end
227 end
228 inherited Panel8: TPanel
229 inherited Label12: TORStaticText
230 OnEnter = fraCoPayLabel23Enter
231 OnExit = fraCoPayLabel23Exit
232 end
233 inherited Label11: TORStaticText
234 OnEnter = fraCoPayLabel23Enter
235 OnExit = fraCoPayLabel23Exit
236 end
237 end
238 inherited Panel9: TPanel
239 inherited Label14: TORStaticText
240 OnEnter = fraCoPayLabel23Enter
241 OnExit = fraCoPayLabel23Exit
242 end
243 inherited Label13: TORStaticText
244 OnEnter = fraCoPayLabel23Enter
245 OnExit = fraCoPayLabel23Exit
246 end
247 end
248 inherited Panel10: TPanel
249 inherited Label16: TORStaticText
250 OnEnter = fraCoPayLabel23Enter
251 OnExit = fraCoPayLabel23Exit
252 end
253 inherited Label15: TORStaticText
254 OnEnter = fraCoPayLabel23Enter
255 OnExit = fraCoPayLabel23Exit
256 end
257 end
258 inherited Panel11: TPanel
259 inherited Label18: TORStaticText
260 OnEnter = fraCoPayLabel23Enter
261 OnExit = fraCoPayLabel23Exit
262 end
263 inherited Label17: TORStaticText
264 OnEnter = fraCoPayLabel23Enter
265 OnExit = fraCoPayLabel23Exit
266 end
267 end
268 inherited Panel12: TPanel
269 inherited Label24: TORStaticText
270 OnEnter = fraCoPayLabel23Enter
271 OnExit = fraCoPayLabel23Exit
272 end
273 inherited Label23: TORStaticText
274 OnEnter = fraCoPayLabel23Enter
275 OnExit = fraCoPayLabel23Exit
276 end
277 end
278 inherited Panel1: TPanel
279 inherited StaticText4: TORStaticText
280 OnEnter = fraCoPayLabel23Enter
281 OnExit = fraCoPayLabel23Exit
282 end
283 inherited StaticText1: TORStaticText
284 OnEnter = fraCoPayLabel23Enter
285 OnExit = fraCoPayLabel23Exit
286 end
287 end
288 end
289 end
290 inherited pnlSC: TPanel
291 Width = 353
292 Height = 129
293 inherited lblSCDisplay: TLabel
294 Width = 353
295 end
296 inherited memSCDisplay: TCaptionMemo
297 Width = 353
298 Height = 112
299 end
300 end
301 end
302 object gbxDxLookup: TGroupBox
303 Left = 8
304 Top = 136
305 Width = 101
306 Height = 48
307 Caption = 'Lookup Diagnosis'
308 TabOrder = 8
309 TabStop = True
310 Visible = False
311 object buDiagnosis: TButton
312 Left = 7
313 Top = 21
314 Width = 88
315 Height = 21
316 Caption = '&Diagnosis'
317 Enabled = False
318 TabOrder = 0
319 OnClick = buDiagnosisClick
320 end
321 end
322 object poBACopyPaste: TPopupMenu
323 Left = 384
324 Top = 280
325 object Copy1: TMenuItem
326 Caption = '&Copy'
327 Enabled = False
328 ShortCut = 16451
329 OnClick = Copy1Click
330 end
331 object Paste1: TMenuItem
332 Caption = '&Paste'
333 Enabled = False
334 ShortCut = 16470
335 OnClick = Paste1Click
336 end
337 object Diagnosis1: TMenuItem
338 Caption = '&Diagnosis...'
339 Enabled = False
340 ShortCut = 32836
341 OnClick = buDiagnosisClick
342 end
343 object Exit1: TMenuItem
344 Caption = '&Exit'
345 ShortCut = 16453
346 OnClick = Exit1Click
347 end
348 end
349end
Note: See TracBrowser for help on using the repository browser.