Produced by Araxis Merge on 11/2/2017 7:18:07 AM Central Daylight Time. See www.araxis.com for information about Merge. This report uses XHTML and CSS2, and is best viewed with a modern standards-compliant browser. For optimum results when printing this report, use landscape orientation and enable printing of background images and colours in your browser.
# | Location | File | Last Modified |
---|---|---|---|
1 | CAPRI_CIF.zip\CAPRI_CIF\Source | demTranMain.dfm | Wed Nov 1 18:09:26 2017 UTC |
2 | CAPRI_CIF.zip\CAPRI_CIF\Source | demTranMain.dfm | Wed Nov 1 19:05:26 2017 UTC |
Description | Between Files 1 and 2 |
|
---|---|---|
Text Blocks | Lines | |
Unchanged | 2 | 1358 |
Changed | 1 | 2 |
Inserted | 0 | 0 |
Removed | 0 | 0 |
Whitespace | |
---|---|
Character case | Differences in character case are significant |
Line endings | Differences in line endings (CR and LF characters) are ignored |
CR/LF characters | Not shown in the comparison detail |
No regular expressions were active.
1 | object frm CntrctdExm Main: Tfrm CntrctdExm Main | |
2 | Left = 0 | |
3 | Top = 0 | |
4 | HelpCont ext = 7000 | |
5 | Caption = 'CAPRI C ontract Re ferral (CC R)' | |
6 | ClientHe ight = 597 | |
7 | ClientWi dth = 619 | |
8 | Color = clBtnFace | |
9 | Font.Cha rset = DEF AULT_CHARS ET | |
10 | Font.Col or = clWin dowText | |
11 | Font.Hei ght = -11 | |
12 | Font.Nam e = 'Tahom a' | |
13 | Font.Sty le = [] | |
14 | Menu = m nuMain | |
15 | OldCreat eOrder = F alse | |
16 | Position = poScree nCenter | |
17 | OnActiva te = FormA ctivate | |
18 | OnClose = FormClos e | |
19 | OnCloseQ uery = For mCloseQuer y | |
20 | OnCreate = FormCre ate | |
21 | OnDestro y = FormDe stroy | |
22 | OnShow = FormShow | |
23 | DesignSi ze = ( | |
24 | 619 | |
25 | 597) | |
26 | PixelsPe rInch = 96 | |
27 | TextHeig ht = 13 | |
28 | object G roupBox1: TGroupBox | |
29 | Left = 8 | |
30 | Top = 8 | |
31 | Width = 606 | |
32 | Height = 93 | |
33 | Anchor s = [akLef t, akTop, akRight] | |
34 | Captio n = '&Pati ent' | |
35 | TabOrd er = 0 | |
36 | TabSto p = True | |
37 | Design Size = ( | |
38 | 606 | |
39 | 93) | |
40 | object btnSlctPt nt: TButto n | |
41 | Left = 499 | |
42 | Top = 23 | |
43 | Widt h = 91 | |
44 | Heig ht = 25 | |
45 | Hint = 'Select a patient ' | |
46 | Anch ors = [akT op, akRigh t] | |
47 | Capt ion = 'Sel ect Patien t' | |
48 | Pare ntShowHint = False | |
49 | Show Hint = Tru e | |
50 | TabO rder = 3 | |
51 | Visi ble = Fals e | |
52 | OnCl ick = btnS lctPtntCli ck | |
53 | end | |
54 | object btnSimula teVLERResu lts: TButt on | |
55 | Left = 381 | |
56 | Top = 26 | |
57 | Widt h = 96 | |
58 | Heig ht = 20 | |
59 | Capt ion = 'btn SimulateVL ERResults' | |
60 | TabO rder = 4 | |
61 | Visi ble = Fals e | |
62 | OnCl ick = btnS imulateVLE RResultsCl ick | |
63 | end | |
64 | object lblPtntNm e: TLabele dEdit | |
65 | Left = 48 | |
66 | Top = 26 | |
67 | Widt h = 186 | |
68 | Heig ht = 20 | |
69 | Bord erStyle = bsNone | |
70 | Edit Label.Widt h = 27 | |
71 | Edit Label.Heig ht = 13 | |
72 | Edit Label.Capt ion = 'Nam e' | |
73 | Font .Charset = DEFAULT_C HARSET | |
74 | Font .Color = c lWindowTex t | |
75 | Font .Height = -13 | |
76 | Font .Name = 'T ahoma' | |
77 | Font .Style = [ fsBold] | |
78 | Pare ntColor = True | |
79 | Pare ntFont = F alse | |
80 | Read Only = Tru e | |
81 | TabO rder = 0 | |
82 | Text = 'Patien tLast, Pat ientFirst MI.' | |
83 | OnEn ter = lblP tntNmeEnte r | |
84 | end | |
85 | object lblSSN: T LabeledEdi t | |
86 | Left = 48 | |
87 | Top = 65 | |
88 | Widt h = 74 | |
89 | Heig ht = 17 | |
90 | Bord erStyle = bsNone | |
91 | Edit Label.Widt h = 19 | |
92 | Edit Label.Heig ht = 13 | |
93 | Edit Label.Capt ion = 'SSN ' | |
94 | Pare ntColor = True | |
95 | Read Only = Tru e | |
96 | TabO rder = 1 | |
97 | Text = '000-00 -0000P' | |
98 | OnEn ter = lblS SNEnter | |
99 | end | |
100 | object lblDOB: T LabeledEdi t | |
101 | Left = 148 | |
102 | Top = 65 | |
103 | Widt h = 125 | |
104 | Heig ht = 17 | |
105 | Bord erStyle = bsNone | |
106 | Edit Label.Widt h = 21 | |
107 | Edit Label.Heig ht = 13 | |
108 | Edit Label.Capt ion = 'DOB ' | |
109 | Pare ntColor = True | |
110 | Read Only = Tru e | |
111 | TabO rder = 2 | |
112 | Text = 'Septem ber 21, 19 40 (70)' | |
113 | OnEn ter = lblD OBEnter | |
114 | end | |
115 | end | |
116 | object P anel1: TPa nel | |
117 | Left = 8 | |
118 | Top = 107 | |
119 | Width = 606 | |
120 | Height = 465 | |
121 | Anchor s = [akLef t, akTop, akRight, a kBottom] | |
122 | TabOrd er = 1 | |
123 | Design Size = ( | |
124 | 606 | |
125 | 465) | |
126 | object GroupBox2 : TGroupBo x | |
127 | Left = 15 | |
128 | Top = 8 | |
129 | Widt h = 575 | |
130 | Heig ht = 407 | |
131 | Anch ors = [akL eft, akTop , akRight, akBottom] | |
132 | Capt ion = 'Con tracted 25 07 Request s and Exam s' | |
133 | TabO rder = 0 | |
134 | Desi gnSize = ( | |
135 | 57 5 | |
136 | 40 7) | |
137 | obje ct trVw250 7Info: TTr eeView | |
138 | Le ft = 3 | |
139 | To p = 17 | |
140 | Wi dth = 569 | |
141 | He ight = 319 | |
142 | Hi nt = | |
143 | 'Display o f Patient' #39's Cont racted 250 7 Requests and assoc iated exa' + | |
144 | 'ms.' | |
145 | An chors = [a kLeft, akT op, akRigh t, akBotto m] | |
146 | Fo nt.Charset = DEFAULT _CHARSET | |
147 | Fo nt.Color = clWindowT ext | |
148 | Fo nt.Height = -11 | |
149 | Fo nt.Name = 'Tahoma' | |
150 | Fo nt.Style = [] | |
151 | In dent = 20 | |
152 | Pa rentFont = False | |
153 | Pa rentShowHi nt = False | |
154 | Re adOnly = T rue | |
155 | Sh owHint = T rue | |
156 | Ta bOrder = 1 | |
157 | end | |
158 | obje ct GroupBo x4: TGroup Box | |
159 | Le ft = 225 | |
160 | To p = 342 | |
161 | Wi dth = 304 | |
162 | He ight = 56 | |
163 | An chors = [a kRight, ak Bottom] | |
164 | Ca ption = 'D &ate Range ' | |
165 | Ta bOrder = 3 | |
166 | ob ject btnDt PckrExamTo : TSpeedBu tton | |
167 | Left = 261 | |
168 | Top = 21 | |
169 | Width = 23 | |
170 | Height = 2 2 | |
171 | Glyph.Data = { | |
172 | 76010000 424D760100 0000000000 7600000028 0000002000 0000100000 000100 | |
173 | 04000000 0000000100 00120B0000 120B000010 0000000000 0000000000 000000 | |
174 | 80000080 0000008080 0080000000 8000800080 8000007F7F 7F00BFBFBF 000000 | |
175 | FF0000FF 000000FFFF 00FF000000 FF00FF00FF FF0000FFFF FF00333333 333333 | |
176 | 33333FFF FFFFFFFFFF FF00000000 0000000077 7777777777 77770FF7FF 7FF7FF | |
177 | 7FF07FF7 FF7FF7F37F 3709F79F79 F7FF7FF077 F77F77F7FF 7FF7077777 777777 | |
178 | 77707777 7777777777 770FF7FF7F F7FF7FF07F F7FF7FF7FF 7FF709F79F 79F79F | |
179 | 79F077F7 7F77F77F77 F707777777 7777777077 7777777777 77770FF7FF 7FF7FF | |
180 | 7FF07FF7 FF7FF7FF7F F709F79F79 F79F79F077 F77F77F77F 77F7077777 777777 | |
181 | 77707777 7777777777 770FFFFF7F F7FF7FF07F 33337FF7FF 7FF70FFFFF 79F79F | |
182 | 79F07FFF FF77F77F77 F700000000 0000000077 7777777777 7777CCCCCC 8888CC | |
183 | CCCC7777 77FFFF7777 77CCCCCCCC CCCCCCCC77 7777777777 7777} | |
184 | NumGlyphs = 2 | |
185 | OnClick = btnDtPckrE xamToClick | |
186 | en d | |
187 | ob ject btnDt PckrExamFr om: TSpeed Button | |
188 | Left = 124 | |
189 | Top = 21 | |
190 | Width = 23 | |
191 | Height = 2 2 | |
192 | Glyph.Data = { | |
193 | 76010000 424D760100 0000000000 7600000028 0000002000 0000100000 000100 | |
194 | 04000000 0000000100 00120B0000 120B000010 0000000000 0000000000 000000 | |
195 | 80000080 0000008080 0080000000 8000800080 8000007F7F 7F00BFBFBF 000000 | |
196 | FF0000FF 000000FFFF 00FF000000 FF00FF00FF FF0000FFFF FF00333333 333333 | |
197 | 33333FFF FFFFFFFFFF FF00000000 0000000077 7777777777 77770FF7FF 7FF7FF | |
198 | 7FF07FF7 FF7FF7F37F 3709F79F79 F7FF7FF077 F77F77F7FF 7FF7077777 777777 | |
199 | 77707777 7777777777 770FF7FF7F F7FF7FF07F F7FF7FF7FF 7FF709F79F 79F79F | |
200 | 79F077F7 7F77F77F77 F707777777 7777777077 7777777777 77770FF7FF 7FF7FF | |
201 | 7FF07FF7 FF7FF7FF7F F709F79F79 F79F79F077 F77F77F77F 77F7077777 777777 | |
202 | 77707777 7777777777 770FFFFF7F F7FF7FF07F 33337FF7FF 7FF70FFFFF 79F79F | |
203 | 79F07FFF FF77F77F77 F700000000 0000000077 7777777777 7777CCCCCC 8888CC | |
204 | CCCC7777 77FFFF7777 77CCCCCCCC CCCCCCCC77 7777777777 7777} | |
205 | NumGlyphs = 2 | |
206 | OnClick = btnDtPckrE xamFromCli ck | |
207 | en d | |
208 | ob ject edtDt PckrExamFr om: TLabel edEdit | |
209 | Left = 47 | |
210 | Top = 23 | |
211 | Width = 74 | |
212 | Height = 2 1 | |
213 | EditLabel. Width = 28 | |
214 | EditLabel. Height = 1 3 | |
215 | EditLabel. Caption = 'From:' | |
216 | LabelPosit ion = lpLe ft | |
217 | TabOrder = 0 | |
218 | OnChange = edtDtPckr ExamFromCh ange | |
219 | OnExit = e dtDtPckrEx amFromExit | |
220 | en d | |
221 | ob ject edtDt PckrExamTo : TLabeled Edit | |
222 | Left = 184 | |
223 | Top = 22 | |
224 | Width = 74 | |
225 | Height = 2 1 | |
226 | EditLabel. Width = 16 | |
227 | EditLabel. Height = 1 3 | |
228 | EditLabel. Caption = 'To:' | |
229 | LabelPosit ion = lpLe ft | |
230 | TabOrder = 1 | |
231 | OnChange = edtDtPckr ExamToChan ge | |
232 | OnExit = e dtDtPckrEx amToExit | |
233 | en d | |
234 | end | |
235 | obje ct GroupBo x3: TGroup Box | |
236 | Le ft = 43 | |
237 | To p = 342 | |
238 | Wi dth = 136 | |
239 | He ight = 56 | |
240 | An chors = [a kLeft, akB ottom] | |
241 | Ca ption = 'R &eferral S tatus' | |
242 | Ta bOrder = 2 | |
243 | De signSize = ( | |
244 | 136 | |
245 | 56) | |
246 | ob ject cmbBx ExamFltr: TComboBox | |
247 | Left = 13 | |
248 | Top = 26 | |
249 | Width = 11 2 | |
250 | Height = 2 1 | |
251 | Hint = 'Ty pe of cont racted 250 7 Exams to display' | |
252 | Style = cs DropDownLi st | |
253 | Anchors = [akLeft, a kBottom] | |
254 | DropDownCo unt = 3 | |
255 | ItemHeight = 13 | |
256 | ParentShow Hint = Fal se | |
257 | ShowHint = True | |
258 | TabOrder = 0 | |
259 | OnChange = cmbBxExam FltrChange | |
260 | Items.Stri ngs = ( | |
261 | 'Cancell ed' | |
262 | 'Complet ed' | |
263 | 'Pending Referrals ') | |
264 | en d | |
265 | end | |
266 | obje ct btnRfrs hExamList: TButton | |
267 | Le ft = 515 | |
268 | To p = 365 | |
269 | Wi dth = 75 | |
270 | He ight = 25 | |
271 | Hi nt = 'Refr esh Contra cted 2507 Exam List' | |
272 | An chors = [a kRight, ak Bottom] | |
273 | Ca ption = 'R efresh' | |
274 | Pa rentShowHi nt = False | |
275 | Sh owHint = T rue | |
276 | Ta bOrder = 0 | |
277 | Vi sible = Fa lse | |
278 | On Click = bt nRfrshExam ListClick | |
279 | end | |
280 | obje ct GenMedN ewExamPane l: TPanel | |
281 | Le ft = 18 | |
282 | To p = 21 | |
283 | Wi dth = 154 | |
284 | He ight = 252 | |
285 | Ca ption = | |
286 | ' '#13#10 ' ' + | |
287 | ' Not visibl e - contro l holder'# 13#10' ' + | |
288 | ' GenM edNewExamP anel' | |
289 | Ta bOrder = 4 | |
290 | Vi sible = Fa lse | |
291 | ob ject FMExa mType: TFM Edit | |
292 | Left = 15 | |
293 | Top = 63 | |
294 | Width = 55 | |
295 | Height = 2 1 | |
296 | TabOrder = 0 | |
297 | Text = 'FM ExamType' | |
298 | Visible = False | |
299 | FMFile = ' 396.4' | |
300 | FMField = '.03' | |
301 | FMFiler = frmMain.FM Filer1 | |
302 | FMValidato r = frmMai n.FMValida tor1 | |
303 | FMCtrlOpti ons = [] | |
304 | en d | |
305 | ob ject FMExa mStatus: T FMEdit | |
306 | Left = 15 | |
307 | Top = 110 | |
308 | Width = 55 | |
309 | Height = 2 1 | |
310 | TabOrder = 1 | |
311 | Text = 'FM ExamStatus ' | |
312 | Visible = False | |
313 | FMFile = ' 396.4' | |
314 | FMField = '.04' | |
315 | FMFiler = frmMain.FM Filer1 | |
316 | FMValidato r = frmMai n.FMValida tor1 | |
317 | FMCtrlOpti ons = [] | |
318 | en d | |
319 | ob ject FMFee Exam: TFME dit | |
320 | Left = 15 | |
321 | Top = 43 | |
322 | Width = 55 | |
323 | Height = 2 1 | |
324 | TabOrder = 2 | |
325 | Text = 'FM FeeExam' | |
326 | Visible = False | |
327 | FMFile = ' 396.4' | |
328 | FMField = '.08' | |
329 | FMFiler = frmMain.FM Filer1 | |
330 | FMValidato r = frmMai n.FMValida tor1 | |
331 | FMCtrlOpti ons = [] | |
332 | en d | |
333 | ob ject fmLas tExamAdded By: TFMEdi t | |
334 | Left = 15 | |
335 | Top = 174 | |
336 | Width = 17 8 | |
337 | Height = 2 1 | |
338 | Enabled = False | |
339 | TabOrder = 3 | |
340 | Text = 'FM Edit5' | |
341 | FMFile = ' 396.3' | |
342 | FMField = '23.4' | |
343 | FMFiler = frmMain.FM Filer1 | |
344 | FMValidato r = frmMai n.FMValida tor1 | |
345 | FMCtrlOpti ons = [] | |
346 | en d | |
347 | ob ject fmLas tExamAddDa te: TFMEdi t | |
348 | Left = 15 | |
349 | Top = 205 | |
350 | Width = 74 | |
351 | Height = 2 1 | |
352 | Enabled = False | |
353 | TabOrder = 4 | |
354 | Text = 'FM Edit5' | |
355 | FMFile = ' 396.3' | |
356 | FMField = '23.3' | |
357 | FMFiler = frmMain.FM Filer1 | |
358 | FMValidato r = frmMai n.FMValida tor1 | |
359 | FMCtrlOpti ons = [] | |
360 | en d | |
361 | ob ject FMExa mRequest: TFMEdit | |
362 | Left = 15 | |
363 | Top = 89 | |
364 | Width = 55 | |
365 | Height = 2 1 | |
366 | TabOrder = 5 | |
367 | Text = 'FM ExamReques t' | |
368 | Visible = False | |
369 | FMFile = ' 396.4' | |
370 | FMField = '.02' | |
371 | FMFiler = frmMain.FM Filer1 | |
372 | FMValidato r = frmMai n.FMValida tor1 | |
373 | FMCtrlOpti ons = [] | |
374 | en d | |
375 | ob ject FMExa mNumber: T FMEdit | |
376 | Left = 15 | |
377 | Top = 19 | |
378 | Width = 55 | |
379 | Height = 2 1 | |
380 | TabOrder = 6 | |
381 | Text = 'FM ExamNumber ' | |
382 | Visible = False | |
383 | FMFile = ' 396.4' | |
384 | FMField = '.01' | |
385 | FMFiler = frmMain.FM Filer1 | |
386 | FMValidato r = frmMai n.FMValida tor1 | |
387 | FMCtrlOpti ons = [] | |
388 | en d | |
389 | ob ject FMExa mContracto r: TFMEdit | |
390 | Left = 19 | |
391 | Top = 171 | |
392 | Width = 73 | |
393 | Height = 2 1 | |
394 | TabOrder = 7 | |
395 | Text = 'FM ExamContra ctor' | |
396 | Visible = False | |
397 | FMFile = ' 396.4' | |
398 | FMField = '100' | |
399 | FMFiler = frmMain.FM Filer1 | |
400 | FMValidato r = frmMai n.FMValida tor1 | |
401 | FMCtrlOpti ons = [] | |
402 | en d | |
403 | ob ject FMExa mDtSent: T FMEdit | |
404 | Left = 19 | |
405 | Top = 198 | |
406 | Width = 73 | |
407 | Height = 2 1 | |
408 | TabOrder = 8 | |
409 | Text = 'FM ExamContra ctor' | |
410 | Visible = False | |
411 | FMFile = ' 396.4' | |
412 | FMField = '101' | |
413 | FMFiler = frmMain.FM Filer1 | |
414 | FMValidato r = frmMai n.FMValida tor1 | |
415 | FMCtrlOpti ons = [] | |
416 | en d | |
417 | end | |
418 | end | |
419 | object btnNewExa m: TButton | |
420 | Left = 58 | |
421 | Top = 433 | |
422 | Widt h = 135 | |
423 | Heig ht = 25 | |
424 | Hint = 'Contra ct a new 2 507 Exam f or patient ' | |
425 | Anch ors = [akB ottom] | |
426 | Capt ion = 'Ref er E&xams' | |
427 | Pare ntShowHint = False | |
428 | Show Hint = Tru e | |
429 | TabO rder = 1 | |
430 | OnCl ick = btnN ewExamClic k | |
431 | end | |
432 | object btnResend Exam: TBut ton | |
433 | Left = 236 | |
434 | Top = 433 | |
435 | Widt h = 135 | |
436 | Heig ht = 25 | |
437 | Hint = 'Resend open sele cted 2507 exam for p atient to the contra ctor' | |
438 | Anch ors = [akB ottom] | |
439 | Capt ion = 'Re& send' | |
440 | Pare ntShowHint = False | |
441 | Show Hint = Tru e | |
442 | TabO rder = 2 | |
443 | OnCl ick = btnR esendExamC lick | |
444 | end | |
445 | object btnCheckI nExam: TBu tton | |
446 | Left = 409 | |
447 | Top = 433 | |
448 | Widt h = 135 | |
449 | Heig ht = 25 | |
450 | Hint = 'Check- In complet ed selecte d contract ed 2507 ex am for pat ient' | |
451 | Anch ors = [akB ottom] | |
452 | Capt ion = '&Do wnload Exa m Results' | |
453 | Pare ntShowHint = False | |
454 | Show Hint = Tru e | |
455 | TabO rder = 3 | |
456 | OnCl ick = btnC heckInExam Click | |
457 | end | |
458 | end | |
459 | object s bMain: TSt atusBar | |
460 | Left = 0 | |
461 | Top = 578 | |
462 | Width = 619 | |
463 | Height = 19 | |
464 | Panels = < | |
465 | item | |
466 | Wi dth = 600 | |
467 | end> | |
468 | end | |
469 | object m nuMain: TM ainMenu | |
470 | Left = 270 | |
471 | Top = 195 | |
472 | object mnuItmFil e: TMenuIt em | |
473 | Capt ion = '&Fi le' | |
474 | obje ct mnuItmS lctPtnt: T MenuItem | |
475 | Ca ption = '& Select Pat ient' | |
476 | Hi nt = 'Sele ct a patie nt' | |
477 | Vi sible = Fa lse | |
478 | On Click = mn uItmSlctPt ntClick | |
479 | end | |
480 | obje ct N3: TMe nuItem | |
481 | Ca ption = '- ' | |
482 | Vi sible = Fa lse | |
483 | end | |
484 | obje ct mnuItmE dtVAMCInfo : TMenuIte m | |
485 | Ca ption = 'E dit &VAMC Informatio n' | |
486 | Hi nt = | |
487 | 'Edit Medi cal Center Informati on that is included in Contrac tor E' + | |
488 | 'mail Mess age.' | |
489 | On Click = mn uItmEdtVAM CInfoClick | |
490 | end | |
491 | obje ct mnuItmE dtFeeInfo: TMenuItem | |
492 | Ca ption = 'E dit &Fee C ontact Inf ormation' | |
493 | Hi nt = | |
494 | 'Edit Fee Contact In formation for CCing on Contrac tor Exam m essag' + | |
495 | 'es.' | |
496 | Vi sible = Fa lse | |
497 | On Click = mn uItmEdtFee InfoClick | |
498 | end | |
499 | obje ct N1: TMe nuItem | |
500 | Ca ption = '- ' | |
501 | end | |
502 | obje ct mnuItmE xit: TMenu Item | |
503 | Ca ption = 'E &xit' | |
504 | Hi nt = 'Clos e the appl ication' | |
505 | On Click = mn uItmExitCl ick | |
506 | end | |
507 | end | |
508 | object mnuItmToo ls: TMenuI tem | |
509 | Capt ion = '&To ols' | |
510 | obje ct mnuItmT oolsMngeCP ExmRqsts: TMenuItem | |
511 | Ca ption = 'M ana&ge Pat ient'#39's C&&P Exam Requests' | |
512 | On Click = mn uItmToolsM ngeCPExmRq stsClick | |
513 | end | |
514 | end | |
515 | object mnuItmRpt s: TMenuIt em | |
516 | Capt ion = '&Re ports' | |
517 | obje ct mnuItmC Rpts: TMen uItem | |
518 | Ca ption = '& Contracted ' | |
519 | ob ject mnuIt mCRptsDtld : TMenuIte m | |
520 | Caption = '&Detailed ' | |
521 | OnClick = mnuItmCRpt sDtldClick | |
522 | en d | |
523 | ob ject mnuIt mCRptsSmmr y: TMenuIt em | |
524 | Caption = '&Summary' | |
525 | OnClick = mnuItmCRpt sSmmryClic k | |
526 | en d | |
527 | ob ject mnuIt mCRptsTmln ss: TMenuI tem | |
528 | Caption = '&Timeline ss' | |
529 | OnClick = mnuItmCRpt sTmlnssCli ck | |
530 | en d | |
531 | end | |
532 | end | |
533 | object mnuItmAdm in: TMenuI tem | |
534 | Capt ion = 'Ad& min Tools' | |
535 | Visi ble = Fals e | |
536 | obje ct mnuItmA dminCntrct rEditor: T MenuItem | |
537 | Ca ption = 'A dd / Edit &Contracto rs' | |
538 | On Click = mn uItmAdminC ntrctrEdit orClick | |
539 | end | |
540 | obje ct mnuItmA dminDelete CO: TMenuI tem | |
541 | Ca ption = '& Delete Exa m Check-Ou t' | |
542 | Hi nt = 'Dele te the che ck-out for exams alr eady contr acted out. ' | |
543 | On Click = mn uItmAdminD eleteCOCli ck | |
544 | end | |
545 | obje ct mnuItmA dminEditCI : TMenuIte m | |
546 | Ca ption = 'E dit Exam C &heck-In' | |
547 | Hi nt = 'Edit the check -in date f or contrac ted exams. ' | |
548 | On Click = mn uItmAdminE ditCIClick | |
549 | end | |
550 | end | |
551 | object mnuItmHel p: TMenuIt em | |
552 | Capt ion = '&He lp' | |
553 | obje ct mnuItmH lpCntnt: T MenuItem | |
554 | Ca ption = '& Content' | |
555 | He lpContext = 7000 | |
556 | On Click = mn uItmHlpCnt ntClick | |
557 | end | |
558 | obje ct N2: TMe nuItem | |
559 | Ca ption = '- ' | |
560 | end | |
561 | obje ct mnuItmH lpAbout: T MenuItem | |
562 | Ca ption = 'A &bout' | |
563 | Vi sible = Fa lse | |
564 | On Click = mn uItmHlpAbo utClick | |
565 | end | |
566 | end | |
567 | end | |
568 | object C COWRPCBrkr Main: TCCO WRPCBroker CAPRI | |
569 | ClearP arameters = True | |
570 | ClearR esults = T rue | |
571 | Connec ted = Fals e | |
572 | ListenerPo rt = PORT | |
573 | RpcVer sion = '0' | |
574 | Server = 'BROKER SERVER' | |
575 | Kernel LogIn = Tr ue | |
576 | LogIn. Mode = lmA VCodes | |
577 | LogIn. PromptDivi sion = Fal se | |
578 | OldCon nectionOnl y = False | |
579 | Left = 358 | |
580 | Top = 199 | |
581 | end | |
582 | object t mrAppShutD wn: TTimer | |
583 | Enable d = False | |
584 | Interv al = 10000 00 | |
585 | OnTime r = tmrApp ShutDwnTim er | |
586 | Left = 454 | |
587 | Top = 259 | |
588 | end | |
589 | object t mrEnsrBrkr Cnntctd: T Timer | |
590 | Enable d = False | |
591 | Interv al = 18000 0 | |
592 | OnTime r = tmrEns rBrkrCnntc tdTimer | |
593 | Left = 361 | |
594 | Top = 259 | |
595 | end | |
596 | object t mrShowForm : TTimer | |
597 | Enable d = False | |
598 | Interv al = 10000 00 | |
599 | OnTime r = tmrSho wFormTimer | |
600 | Left = 268 | |
601 | Top = 259 | |
602 | end | |
603 | object f mLstrReq: TFMLister | |
604 | FieldN umbers.Str ings = ( | |
605 | '.00 1' | |
606 | '.01 ' | |
607 | '1') | |
608 | Displa yFields.St rings = ( | |
609 | '.00 1' | |
610 | '.01 ' | |
611 | '1') | |
612 | Lister Flags = [] | |
613 | Delimi ter = '^' | |
614 | Number = '*' | |
615 | FileNu mber = '39 6.3' | |
616 | Lister Options = [] | |
617 | Left = 272 | |
618 | Top = 311 | |
619 | end | |
620 | object f mLstrCntrc ts: TFMLis ter | |
621 | FieldN umbers.Str ings = ( | |
622 | '3') | |
623 | Displa yFields.St rings = ( | |
624 | '3') | |
625 | Lister Flags = [l fInternal] | |
626 | Delimi ter = '^' | |
627 | Number = '*' | |
628 | Screen = 'I $P(^ (0),U,2)=" A",$P(^(0) ,U,4)]""' | |
629 | FileNu mber = '39 6.45' | |
630 | Lister Options = [loQuickLi st] | |
631 | Left = 452 | |
632 | Top = 311 | |
633 | end | |
634 | object f mLstrExam: TFMLister | |
635 | FieldN umbers.Str ings = ( | |
636 | '.01 ' | |
637 | '.02 ' | |
638 | '.03 ' | |
639 | '.04 ' | |
640 | '90' | |
641 | '100 ' | |
642 | '101 ' | |
643 | '102 ') | |
644 | Displa yFields.St rings = ( | |
645 | '.01 ' | |
646 | '.02 ' | |
647 | '100 ') | |
648 | Lister Flags = [l fInternal] | |
649 | Delimi ter = '^' | |
650 | Number = '*' | |
651 | FMInde x = 'C' | |
652 | FileNu mber = '39 6.4' | |
653 | Lister Options = [] | |
654 | Left = 356 | |
655 | Top = 311 | |
656 | end | |
657 | object F MFiler1: T FMFiler | |
658 | RPCBro ker = frmM ain.RPCBro ker1 | |
659 | FilerF lags = [] | |
660 | FilerO ptions = [ foProcessP roblemList ] | |
661 | Left = 144 | |
662 | Top = 176 | |
663 | end | |
664 | object f mFindOneTe mp: TFMFin dOne | |
665 | RPCBro ker = frmM ain.RPCBro ker1 | |
666 | Finder Flags = [] | |
667 | FindOn eOptions = [] | |
668 | Left = 216 | |
669 | Top = 220 | |
670 | end | |
671 | object f mGetsTemp: TFMGets | |
672 | RPCBro ker = frmM ain.RPCBro ker1 | |
673 | FieldN umbers.Str ings = ( | |
674 | '.01 ') | |
675 | GetsFl ags = [gfE xternal, g fInternal] | |
676 | GetsOp tions = [] | |
677 | Left = 212 | |
678 | Top = 176 | |
679 | end | |
680 | end |
Araxis Merge (but not the data content of this report) is Copyright © 1993-2016 Araxis Ltd (www.araxis.com). All rights reserved.