Produced by Araxis Merge on 5/15/2018 2:43:28 PM 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 | CPRS_V32_COMBINED_BUILD_V45.zip\OR_30_405V45_src\Cover Sheet | oCoverSheetParam_CPRS_Reminders.pas | Thu Mar 29 21:15:52 2018 UTC |
| 2 | CPRS_V32_COMBINED_BUILD_V45.zip\OR_30_405V45_src\Cover Sheet | oCoverSheetParam_CPRS_Reminders.pas | Thu May 10 20:23:57 2018 UTC |
| Description | Between Files 1 and 2 |
|
|---|---|---|
| Text Blocks | Lines | |
| Unchanged | 2 | 112 |
| 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 | unit oCove rSheetPara m_CPRS_Rem inders; | |
| 2 | ||
| 3 | { | |
| 4 | ======== ========== ========== ========== ========== ========== ========== ========== == | |
| 5 | * | |
| 6 | * Applicatio n: CPRS - CoverShee t | |
| 7 | * Developer: PII | |
| 8 | * Site: Salt L ake City I SC | |
| 9 | * Date: 2015-1 2-04 | |
| 10 | * | |
| 11 | * Descriptio n: Inheri ted from T CoverSheet Param_CPRS . Special functions | |
| 12 | * for th e CLinical Reminders display | |
| 13 | * | |
| 14 | * Notes: | |
| 15 | * | |
| 16 | ======== ========== ========== ========== ========== ========== ========== ========== == | |
| 17 | } | |
| 18 | interface | |
| 19 | ||
| 20 | uses | |
| 21 | System.C lasses, | |
| 22 | Vcl.Cont rols, | |
| 23 | oCoverSh eetParam_C PRS, | |
| 24 | iCoverSh eetIntf; | |
| 25 | ||
| 26 | type | |
| 27 | TCoverSh eetParam_C PRS_Remind ers = clas s(TCoverSh eetParam_C PRS, ICove rSheetPara m) | |
| 28 | protecte d | |
| 29 | functi on getDeta ilRPC: str ing; overr ide; | |
| 30 | ||
| 31 | functi on NewCove rSheetCont rol(aOwner : TCompone nt): TCont rol; overr ide; | |
| 32 | public | |
| 33 | { Publ ic declara tions } | |
| 34 | end; | |
| 35 | ||
| 36 | implementa tion | |
| 37 | ||
| 38 | uses | |
| 39 | mCoverSh eetDisplay Panel_CPRS _Reminders ; | |
| 40 | ||
| 41 | { TCoverSh eetParam_C PRS_Remind ers } | |
| 42 | ||
| 43 | function T CoverSheet Param_CPRS _Reminders .getDetail RPC: strin g; | |
| 44 | begin | |
| 45 | { TODO 3 -oDanP -c Things Yet Undone : Something about inte ractive re minders } | |
| 46 | // if In teractiveR eminders t hen | |
| 47 | // Resul t := 'ORQQ PXRM REMIN DER DETAIL ' | |
| 48 | // else | |
| 49 | Result : = 'ORQQPX REMINDER D ETAIL'; | |
| 50 | end; | |
| 51 | ||
| 52 | function T CoverSheet Param_CPRS _Reminders .NewCoverS heetContro l(aOwner: TComponent ): TContro l; | |
| 53 | begin | |
| 54 | Result : = TfraCove rSheetDisp layPanel_C PRS_Remind ers.Create (aOwner); | |
| 55 | end; | |
| 56 | ||
| 57 | end. |
Araxis Merge (but not the data content of this report) is Copyright © 1993-2016 Araxis Ltd (www.araxis.com). All rights reserved.