| [459] | 1 | program CPRSChart; | 
|---|
|  | 2 |  | 
|---|
|  | 3 | uses | 
|---|
| [460] | 4 | ShareMem, | 
|---|
| [459] | 5 | Forms, | 
|---|
|  | 6 | ORSystem, | 
|---|
|  | 7 | fPage in 'fPage.pas' {frmPage}, | 
|---|
|  | 8 | fHSplit in 'fHSplit.pas' {frmHSplit}, | 
|---|
|  | 9 | fHP in 'fHP.pas' {frmHP}, | 
|---|
|  | 10 | fCover in 'fCover.pas' {frmCover}, | 
|---|
|  | 11 | fMeds in 'fMeds.pas' {frmMeds}, | 
|---|
|  | 12 | fNotes in 'fNotes.pas' {frmNotes}, | 
|---|
|  | 13 | fDCSumm in 'fDCSumm.pas' {frmDCSumm}, | 
|---|
|  | 14 | fLabs in 'fLabs.pas' {frmLabs}, | 
|---|
|  | 15 | fReports in 'fReports.pas' {frmReports}, | 
|---|
|  | 16 | uCore in 'uCore.pas', | 
|---|
|  | 17 | fPtSel in 'fPtSel.pas' {frmPtSel}, | 
|---|
|  | 18 | fPtSens in 'fPtSens.pas' {frmPtSens}, | 
|---|
|  | 19 | rCore in 'rCore.pas', | 
|---|
|  | 20 | fEncnt in 'fEncnt.pas' {frmEncounter}, | 
|---|
|  | 21 | fVisit in 'fVisit.pas' {frmVisit}, | 
|---|
|  | 22 | fPtDemo in 'fPtDemo.pas' {frmPtDemo}, | 
|---|
|  | 23 | rTIU in 'rTIU.pas', | 
|---|
|  | 24 | fxBroker in 'fxBroker.pas' {frmBroker}, | 
|---|
|  | 25 | fNoteBA in 'fNoteBA.pas' {frmNotesByAuthor}, | 
|---|
|  | 26 | fNoteBD in 'fNoteBD.pas' {frmNotesByDate}, | 
|---|
|  | 27 | fLabTest in 'fLabTest.pas' {frmLabTest}, | 
|---|
|  | 28 | fLabTestGroups in 'fLabTestGroups.pas' {frmLabTestGroups}, | 
|---|
|  | 29 | fLabTests in 'fLabTests.pas' {frmLabTests}, | 
|---|
|  | 30 | rLabs in 'rLabs.pas', | 
|---|
|  | 31 | fSignItem in 'fSignItem.pas' {frmSignItem}, | 
|---|
|  | 32 | rCover in 'rCover.pas', | 
|---|
|  | 33 | fRptBox in 'fRptBox.pas' {frmReportBox}, | 
|---|
|  | 34 | rReports in 'rReports.pas', | 
|---|
|  | 35 | fAbout in 'fAbout.pas' {frmAbout}, | 
|---|
|  | 36 | fxLists in 'fxLists.pas' {frmDbgList}, | 
|---|
|  | 37 | fProbs in 'fProbs.pas' {frmProblems}, | 
|---|
|  | 38 | fAutoSz in 'fAutoSz.pas' {frmAutoSz}, | 
|---|
|  | 39 | rMisc in 'rMisc.pas', | 
|---|
|  | 40 | fxServer in 'fxServer.pas' {frmDbgServer}, | 
|---|
|  | 41 | fPtCWAD in 'fPtCWAD.pas' {frmPtCWAD}, | 
|---|
|  | 42 | rMeds in 'rMeds.pas', | 
|---|
|  | 43 | fVitals in 'fVitals.pas' {frmVitals}, | 
|---|
|  | 44 | uProbs in 'uProbs.pas', | 
|---|
|  | 45 | fProbEdt in 'fProbEdt.pas' {frmdlgProb}, | 
|---|
|  | 46 | fProbflt in 'fProbFlt.pas' {frmPlVuFilt}, | 
|---|
|  | 47 | fProbCmt in 'fProbCmt.pas' {frmProbCmt}, | 
|---|
|  | 48 | fNoteCslt in 'fNoteCslt.pas' {frmNoteConsult}, | 
|---|
|  | 49 | fNotePrt in 'fNotePrt.pas' {frmNotePrint}, | 
|---|
|  | 50 | uConst in 'uConst.pas', | 
|---|
|  | 51 | fConsults in 'Consults\fConsults.pas' {frmConsults}, | 
|---|
|  | 52 | fLkUpLocation in 'fLkUpLocation.pas' {frmLkUpLocation}, | 
|---|
|  | 53 | fRename in 'fRename.pas' {frmRename}, | 
|---|
|  | 54 | fDateRange in 'fDateRange.pas' {frmDateRange}, | 
|---|
|  | 55 | fRenewOutMed in 'fRenewOutMed.pas' {frmRenewOutMed}, | 
|---|
|  | 56 | fConsult513Prt in 'Consults\fConsult513Prt.pas' {frm513Print}, | 
|---|
|  | 57 | fConsultAct in 'Consults\fConsultAct.pas' {frmConsultAction}, | 
|---|
|  | 58 | fConsultAlertTo in 'Consults\fConsultAlertTo.pas' {frmConsultAlertsTo}, | 
|---|
|  | 59 | fConsultBD in 'Consults\fConsultBD.pas' {frmConsultsByDate}, | 
|---|
|  | 60 | fConsultBS in 'Consults\fConsultBS.pas' {frmConsultsByService}, | 
|---|
|  | 61 | fConsultBSt in 'Consults\fConsultBSt.pas' {frmConsultsByStatus}, | 
|---|
|  | 62 | fConsultsView in 'Consults\fConsultsView.pas' {frmConsultsView}, | 
|---|
|  | 63 | rConsults in 'Consults\rConsults.pas', | 
|---|
|  | 64 | uConsults in 'Consults\uConsults.pas', | 
|---|
|  | 65 | fTimeout in 'fTimeout.pas' {frmTimeout}, | 
|---|
|  | 66 | fNoteDR in 'fNoteDR.pas' {frmNoteDelReason}, | 
|---|
|  | 67 | rDCSumm in 'rDCSumm.pas', | 
|---|
|  | 68 | fSplash in 'fSplash.pas' {frmSplash}, | 
|---|
|  | 69 | fCsltNote in 'Consults\fCsltNote.pas' {frmCsltNote}, | 
|---|
|  | 70 | rProbs in 'rProbs.pas', | 
|---|
|  | 71 | fEditConsult in 'Consults\fEditConsult.pas' {frmEditCslt}, | 
|---|
|  | 72 | fEditProc in 'Consults\fEditProc.pas' {frmEditProc}, | 
|---|
|  | 73 | fAllgyFind in 'fAllgyFind.pas' {frmAllgyFind}, | 
|---|
|  | 74 | fAddlSigners in 'fAddlSigners.pas' {frmAddlSigners}, | 
|---|
|  | 75 | fLabPrint in 'fLabPrint.pas' {frmLabPrint}, | 
|---|
|  | 76 | fReportsPrint in 'fReportsPrint.pas' {frmReportPrt}, | 
|---|
|  | 77 | fvit in 'fvit.pas' {frmVit}, | 
|---|
|  | 78 | uPCE in 'Encounter\uPCE.pas', | 
|---|
|  | 79 | fEncounterFrame in 'Encounter\fEncounterFrame.pas' {frmEncounterFrame}, | 
|---|
|  | 80 | fPCEBase in 'Encounter\fPCEBase.pas' {frmPCEBase}, | 
|---|
|  | 81 | fPCELex in 'Encounter\fPCELex.pas' {frmPCELex}, | 
|---|
|  | 82 | fPCEOther in 'Encounter\fPCEOther.pas' {frmPCEOther}, | 
|---|
|  | 83 | fProcedure in 'Encounter\fProcedure.pas' {frmProcedures}, | 
|---|
|  | 84 | fSkinTest in 'Encounter\fSkinTest.pas' {frmSkinTests}, | 
|---|
|  | 85 | fVisitType in 'Encounter\fVisitType.pas' {frmVisitType}, | 
|---|
|  | 86 | rPCE in 'Encounter\rPCE.pas', | 
|---|
|  | 87 | fDiagnoses in 'Encounter\fDiagnoses.pas' {frmDiagnoses}, | 
|---|
|  | 88 | fPatientEd in 'Encounter\fPatientEd.pas' {frmPatientEd}, | 
|---|
|  | 89 | fExam in 'Encounter\fExam.pas' {frmExams}, | 
|---|
|  | 90 | fHealthFactor in 'Encounter\fHealthFactor.pas' {frmHealthFactors}, | 
|---|
|  | 91 | fImmunization in 'Encounter\fImmunization.pas' {frmImmunizations}, | 
|---|
|  | 92 | fEncVitals in 'Encounter\fEncVitals.pas' {frmEncVitals}, | 
|---|
|  | 93 | fEffectDate in 'fEffectDate.pas' {frmEffectDate}, | 
|---|
|  | 94 | fPtSelDemog in 'fPtSelDemog.pas' {frmPtSelDemog}, | 
|---|
|  | 95 | fPtSelOptns in 'fPtSelOptns.pas' {frmPtSelOptns}, | 
|---|
|  | 96 | uInit in 'uInit.pas', | 
|---|
|  | 97 | uSpell in 'uSpell.pas', | 
|---|
|  | 98 | dShared in 'dShared.pas' {dmodShared: TDataModule}, | 
|---|
|  | 99 | fDrawers in 'fDrawers.pas' {frmDrawers}, | 
|---|
|  | 100 | fMedCopy in 'fMedCopy.pas' {frmMedCopy}, | 
|---|
|  | 101 | uReminders in 'uReminders.pas', | 
|---|
|  | 102 | rReminders in 'rReminders.pas', | 
|---|
|  | 103 | fReminderTree in 'fReminderTree.pas' {frmReminderTree}, | 
|---|
|  | 104 | fReminderDialog in 'fReminderDialog.pas' {frmRemDlg}, | 
|---|
|  | 105 | fReportsAdhocSubItem1 in 'fReportsAdhocSubItem1.pas' {frmReportsAdhocSubItem1}, | 
|---|
|  | 106 | fReportsAdhocComponent1 in 'fReportsAdhocComponent1.pas' {frmReportsAdhocComponent1}, | 
|---|
|  | 107 | fPtSelMsg in 'fPtSelMsg.pas' {frmPtSelMsg}, | 
|---|
|  | 108 | fMHTest in 'fMHTest.pas' {frmMHTest}, | 
|---|
|  | 109 | fGAF in 'Encounter\fGAF.pas' {frmGAF}, | 
|---|
|  | 110 | fPCEProvider in 'Encounter\fPCEProvider.pas' {frmPCEProvider}, | 
|---|
|  | 111 | fPCEBaseGrid in 'Encounter\fPCEBaseGrid.pas' {frmPCEBaseGrid}, | 
|---|
|  | 112 | fPCEBaseMain in 'Encounter\fPCEBaseMain.pas' {frmPCEBaseMain}, | 
|---|
|  | 113 | fNoteProps in 'fNoteProps.pas' {frmNoteProperties}, | 
|---|
|  | 114 | fNotesBP in 'fNotesBP.pas' {frmNotesBP}, | 
|---|
|  | 115 | fLabInfo in 'fLabInfo.pas' {frmLabInfo}, | 
|---|
|  | 116 | fPreReq in 'Consults\fPreReq.pas' {frmPrerequisites}, | 
|---|
|  | 117 | fDCSummProps in 'fDCSummProps.pas' {frmDCSummProperties}, | 
|---|
|  | 118 | fHFSearch in 'Encounter\fHFSearch.pas' {frmHFSearch}, | 
|---|
|  | 119 | fConsMedRslt in 'Consults\fConsMedRslt.pas' {frmConsMedRslt}, | 
|---|
|  | 120 | mVitMetric in 'Vitals\mVitMetric.pas' {fraVitMetric: TFrame}, | 
|---|
|  | 121 | mVitAll in 'Vitals\mVitAll.pas' {fraVitAll: TFrame}, | 
|---|
|  | 122 | mVitBase in 'Vitals\mVitBase.pas' {fraVitBase: TFrame}, | 
|---|
|  | 123 | uVitals in 'Vitals\uVitals.pas', | 
|---|
|  | 124 | rVitals in 'Vitals\rVitals.pas', | 
|---|
|  | 125 | mVitPulse in 'Vitals\mVitPulse.pas' {fraVitPulse: TFrame}, | 
|---|
|  | 126 | mVitResp in 'Vitals\mVitResp.pas' {fraVitResp: TFrame}, | 
|---|
|  | 127 | mVitBP in 'Vitals\mVitBP.pas' {fraVitPB: TFrame}, | 
|---|
|  | 128 | mVitTemp in 'Vitals\mVitTemp.pas' {fraVitTemp: TFrame}, | 
|---|
|  | 129 | mVitHeight in 'Vitals\mVitHeight.pas' {fraVitHeight: TFrame}, | 
|---|
|  | 130 | mVitWeight in 'Vitals\mVitWeight.pas' {fraVitWeight: TFrame}, | 
|---|
|  | 131 | mVitPain in 'Vitals\mVitPain.pas' {fraVitPain: TFrame}, | 
|---|
|  | 132 | mVitPO2 in 'Vitals\mVitPO2.pas' {fraVitPO2: TFrame}, | 
|---|
|  | 133 | mVitCVP in 'Vitals\mVitCVP.pas' {fraVitCVP: TFrame}, | 
|---|
|  | 134 | mVitCirGirth in 'Vitals\mVitCirGirth.pas' {fraVitCircum: TFrame}, | 
|---|
|  | 135 | uDCSumm in 'uDCSumm.pas', | 
|---|
|  | 136 | uDocTree in 'uDocTree.pas', | 
|---|
|  | 137 | fVitalsDate in 'Vitals\fVitalsDate.pas' {frmVitalsDate}, | 
|---|
|  | 138 | uTemplates in 'Templates\uTemplates.pas', | 
|---|
|  | 139 | fTemplateDialog in 'Templates\fTemplateDialog.pas' {frmTemplateDialog}, | 
|---|
|  | 140 | fTemplateEditor in 'Templates\fTemplateEditor.pas' {frmTemplateEditor}, | 
|---|
|  | 141 | fTemplateFieldEditor in 'Templates\fTemplateFieldEditor.pas' {frmTemplateFieldEditor}, | 
|---|
|  | 142 | fTemplateFields in 'Templates\fTemplateFields.pas' {frmTemplateFields}, | 
|---|
|  | 143 | fTemplateObjects in 'Templates\fTemplateObjects.pas' {frmTemplateObjects}, | 
|---|
|  | 144 | fTemplateView in 'Templates\fTemplateView.pas' {frmTemplateView}, | 
|---|
|  | 145 | mTemplateFieldButton in 'Templates\mTemplateFieldButton.pas' {fraTemplateFieldButton: TFrame}, | 
|---|
|  | 146 | rTemplates in 'Templates\rTemplates.pas', | 
|---|
|  | 147 | uTemplateFields in 'Templates\uTemplateFields.pas', | 
|---|
|  | 148 | fTemplateAutoGen in 'Templates\fTemplateAutoGen.pas' {frmTemplateAutoGen}, | 
|---|
|  | 149 | mVisitRelated in 'Encounter\mVisitRelated.pas' {fraVisitRelated: TFrame}, | 
|---|
|  | 150 | fRemVisitInfo in 'fRemVisitInfo.pas' {frmRemVisitInfo}, | 
|---|
|  | 151 | fIconLegend in 'fIconLegend.pas' {frmIconLegend}, | 
|---|
|  | 152 | mImgText in 'mImgText.pas' {fraImgText: TFrame}, | 
|---|
|  | 153 | fTemplateImport in 'Templates\fTemplateImport.pas' {frmTemplateImport}, | 
|---|
|  | 154 | fRemCoverSheet in 'fRemCoverSheet.pas' {frmRemCoverSheet}, | 
|---|
|  | 155 | uTIU in 'uTIU.pas', | 
|---|
|  | 156 | fRemCoverPreview in 'fRemCoverPreview.pas' {frmRemCoverPreview}, | 
|---|
|  | 157 | fPCEEdit in 'Encounter\fPCEEdit.pas' {frmPCEEdit}, | 
|---|
|  | 158 | uSurgery in 'uSurgery.pas', | 
|---|
|  | 159 | fSurgeryView in 'fSurgeryView.pas' {frmSurgeryView}, | 
|---|
|  | 160 | rSurgery in 'rSurgery.pas', | 
|---|
|  | 161 | uCaseTree in 'uCaseTree.pas', | 
|---|
|  | 162 | fSurgery in 'fSurgery.pas' {frmSurgery}, | 
|---|
|  | 163 | fNoteIDParents in 'fNoteIDParents.pas' {frmNoteIDParents}, | 
|---|
|  | 164 | uReports in 'uReports.pas', | 
|---|
|  | 165 | fNoteCPFields in 'fNoteCPFields.pas' {frmNoteCPFields}, | 
|---|
|  | 166 | CPRSChart_TLB in 'CPRSChart_TLB.pas', | 
|---|
|  | 167 | uEventHooks in 'uEventHooks.pas', | 
|---|
|  | 168 | rEventHooks in 'rEventHooks.pas', | 
|---|
|  | 169 | fPtSelOptSave in 'fPtSelOptSave.pas' {frmPtSelOptSave}, | 
|---|
|  | 170 | uOrders in 'Orders\uOrders.pas', | 
|---|
|  | 171 | fOCSession in 'Orders\fOCSession.pas' {frmOCSession}, | 
|---|
|  | 172 | fODAuto in 'Orders\fODAuto.pas', | 
|---|
|  | 173 | fODBase in 'Orders\fODBase.pas' {frmODBase}, | 
|---|
|  | 174 | fODDiet in 'Orders\fODDiet.pas' {frmODDiet}, | 
|---|
|  | 175 | fODDietLT in 'Orders\fODDietLT.pas' {frmODDietLT}, | 
|---|
|  | 176 | fODGen in 'Orders\fODGen.pas' {frmODGen}, | 
|---|
|  | 177 | fODLab in 'Orders\fODLab.pas' {frmODLab}, | 
|---|
|  | 178 | fODLabImmedColl in 'Orders\fODLabImmedColl.pas' {frmODLabImmedColl}, | 
|---|
|  | 179 | fODLabOthCollSamp in 'Orders\fODLabOthCollSamp.pas' {frmODLabOthCollSamp}, | 
|---|
|  | 180 | fODLabOthSpec in 'Orders\fODLabOthSpec.pas' {frmODLabOthSpec}, | 
|---|
|  | 181 | fODMedComplex in 'Orders\fODMedComplex.pas' {frmODMedComplex}, | 
|---|
|  | 182 | fODMedFA in 'Orders\fODMedFA.pas' {frmODMedFA}, | 
|---|
|  | 183 | fODMedIn in 'Orders\fODMedIn.pas' {frmODMedIn}, | 
|---|
|  | 184 | fODMedIV in 'Orders\fODMedIV.pas' {frmODMedIV}, | 
|---|
|  | 185 | fODMedOIFA in 'Orders\fODMedOIFA.pas' {frmODMedOIFA}, | 
|---|
|  | 186 | fODMedOut in 'Orders\fODMedOut.pas' {frmODMedOut}, | 
|---|
|  | 187 | fODMeds in 'Orders\fODMeds.pas' {frmODMeds}, | 
|---|
|  | 188 | fODMessage in 'Orders\fODMessage.pas' {frmODMessage}, | 
|---|
|  | 189 | fODMisc in 'Orders\fODMisc.pas' {frmODMisc}, | 
|---|
|  | 190 | fODRad in 'Orders\fODRad.pas' {frmODRad}, | 
|---|
|  | 191 | fODRadApproval in 'Orders\fODRadApproval.pas' {frmODRadApproval}, | 
|---|
|  | 192 | fODRadConShRes in 'Orders\fODRadConShRes.pas' {frmODRadConShRes}, | 
|---|
|  | 193 | fODRadImType in 'Orders\fODRadImType.pas' {frmODRadImType}, | 
|---|
|  | 194 | fODSaveQuick in 'Orders\fODSaveQuick.pas' {frmODQuick}, | 
|---|
|  | 195 | fODText in 'Orders\fODText.pas' {frmODText}, | 
|---|
|  | 196 | fODVitals in 'Orders\fODVitals.pas' {frmODVitals}, | 
|---|
|  | 197 | fOMAction in 'Orders\fOMAction.pas' {frmOMAction}, | 
|---|
|  | 198 | fOMHTML in 'Orders\fOMHTML.pas' {frmOMHTML}, | 
|---|
|  | 199 | fOMNavA in 'Orders\fOMNavA.pas' {frmOMNavA}, | 
|---|
|  | 200 | fOMProgress in 'Orders\fOMProgress.pas' {frmOMProgress}, | 
|---|
|  | 201 | fOMSet in 'Orders\fOMSet.pas' {frmOMSet}, | 
|---|
|  | 202 | fOMVerify in 'Orders\fOMVerify.pas' {frmOMVerify}, | 
|---|
|  | 203 | fOrderComment in 'Orders\fOrderComment.pas' {frmWardComments}, | 
|---|
|  | 204 | fOrderFlag in 'Orders\fOrderFlag.pas' {frmFlagOrder}, | 
|---|
|  | 205 | fOrders in 'Orders\fOrders.pas' {frmOrders}, | 
|---|
|  | 206 | fOrdersAlert in 'Orders\fOrdersAlert.pas' {frmAlertOrders}, | 
|---|
|  | 207 | fOrderSaveQuick in 'Orders\fOrderSaveQuick.pas' {frmSaveQuickOrder}, | 
|---|
|  | 208 | fOrdersComplete in 'Orders\fOrdersComplete.pas' {frmCompleteOrders}, | 
|---|
|  | 209 | fOrdersCopy in 'Orders\fOrdersCopy.pas' {frmCopyOrders}, | 
|---|
|  | 210 | fOrdersDC in 'Orders\fOrdersDC.pas' {frmDCOrders}, | 
|---|
|  | 211 | fOrdersHold in 'Orders\fOrdersHold.pas' {frmHoldOrders}, | 
|---|
|  | 212 | fOrdersOnChart in 'Orders\fOrdersOnChart.pas' {frmOnChartOrders}, | 
|---|
|  | 213 | fOrdersPrint in 'Orders\fOrdersPrint.pas' {frmOrdersPrint}, | 
|---|
|  | 214 | fOrdersRefill in 'Orders\fOrdersRefill.pas' {frmRefillOrders}, | 
|---|
|  | 215 | fOrdersRelease in 'Orders\fOrdersRelease.pas' {frmReleaseOrders}, | 
|---|
|  | 216 | fOrdersRenew in 'Orders\fOrdersRenew.pas' {frmRenewOrders}, | 
|---|
|  | 217 | fOrdersSign in 'Orders\fOrdersSign.pas' {frmSignOrders}, | 
|---|
|  | 218 | fOrdersTS in 'Orders\fOrdersTS.pas' {frmOrdersTS}, | 
|---|
|  | 219 | fOrdersUnhold in 'Orders\fOrdersUnhold.pas' {frmUnholdOrders}, | 
|---|
|  | 220 | fOrdersVerify in 'Orders\fOrdersVerify.pas' {frmVerifyOrders}, | 
|---|
|  | 221 | fOrderUnflag in 'Orders\fOrderUnflag.pas' {frmUnflagOrder}, | 
|---|
|  | 222 | fOrderVw in 'Orders\fOrderVw.pas' {frmOrderView}, | 
|---|
|  | 223 | rODAllergy in 'Orders\rODAllergy.pas', | 
|---|
|  | 224 | rODBase in 'Orders\rODBase.pas', | 
|---|
|  | 225 | rODDiet in 'Orders\rODDiet.pas', | 
|---|
|  | 226 | rODLab in 'Orders\rODLab.pas', | 
|---|
|  | 227 | rODMeds in 'Orders\rODMeds.pas', | 
|---|
|  | 228 | rODRad in 'Orders\rODRad.pas', | 
|---|
|  | 229 | rOrders in 'Orders\rOrders.pas', | 
|---|
|  | 230 | uODBase in 'Orders\uODBase.pas', | 
|---|
|  | 231 | fOCAccept in 'Orders\fOCAccept.pas' {frmOCAccept}, | 
|---|
|  | 232 | fODConsult in 'Consults\fODConsult.pas' {frmODCslt}, | 
|---|
|  | 233 | fODProc in 'Consults\fODProc.pas' {frmODProc}, | 
|---|
|  | 234 | uOptions in 'Options\uOptions.pas', | 
|---|
|  | 235 | fOptionsCombinations in 'Options\fOptionsCombinations.pas' {frmOptionsCombinations}, | 
|---|
|  | 236 | fOptionsDays in 'Options\fOptionsDays.pas' {frmOptionsDays}, | 
|---|
|  | 237 | fOptionsLists in 'Options\fOptionsLists.pas' {frmOptionsLists}, | 
|---|
|  | 238 | fOptionsNewList in 'Options\fOptionsNewList.pas' {frmOptionsNewList}, | 
|---|
|  | 239 | fOptionsNotes in 'Options\fOptionsNotes.pas' {frmOptionsNotes}, | 
|---|
|  | 240 | fOptionsOther in 'Options\fOptionsOther.pas' {frmOptionsOther}, | 
|---|
|  | 241 | fOptionsPatientSelection in 'Options\fOptionsPatientSelection.pas' {frmOptionsPatientSelection}, | 
|---|
|  | 242 | fOptionsPrimaryList in 'Options\fOptionsPrimaryList.pas' {frmOptionsPrimaryList}, | 
|---|
|  | 243 | fOptionsReminders in 'Options\fOptionsReminders.pas' {frmOptionsReminders}, | 
|---|
|  | 244 | fOptionsReportsCustom in 'Options\fOptionsReportsCustom.pas' {frmOptionsReportsCustom}, | 
|---|
|  | 245 | fOptionsReportsDefault in 'Options\fOptionsReportsDefault.pas' {frmOptionsReportsDefault}, | 
|---|
|  | 246 | fOptionsSubscribe in 'Options\fOptionsSubscribe.pas' {frmOptionsSubscribe}, | 
|---|
|  | 247 | fOptionsSurrogate in 'Options\fOptionsSurrogate.pas' {frmOptionsSurrogate}, | 
|---|
|  | 248 | fOptionsTeams in 'Options\fOptionsTeams.pas' {frmOptionsTeams}, | 
|---|
|  | 249 | fOptionsTitles in 'Options\fOptionsTitles.pas' {frmOptionsTitles}, | 
|---|
|  | 250 | rOptions in 'Options\rOptions.pas', | 
|---|
|  | 251 | fOptions in 'Options\fOptions.pas' {frmOptions}, | 
|---|
|  | 252 | uSignItems in 'uSignItems.pas', | 
|---|
|  | 253 | mCoPayDesc in 'mCoPayDesc.pas' {fraCoPayDesc: TFrame}, | 
|---|
|  | 254 | XuDigSigSC_TLB in 'XuDigSigSC_TLB.pas', | 
|---|
|  | 255 | fOrdersCV in 'Orders\fOrdersCV.pas' {frmChgEvent}, | 
|---|
|  | 256 | fODReleaseEvent in 'Orders\fODReleaseEvent.pas' {frmOrdersReleaseEvent}, | 
|---|
|  | 257 | fODActive in 'Orders\fODActive.pas' {frmODActive}, | 
|---|
|  | 258 | fDefaultEvent in 'fDefaultEvent.pas' {frmDefaultEvent}, | 
|---|
|  | 259 | mEvntDelay in 'mEvntDelay.pas' {fraEvntDelayList: TFrame}, | 
|---|
|  | 260 | fOrdersEvntRelease in 'Orders\fOrdersEvntRelease.pas' {frmOrdersEvntRelease}, | 
|---|
|  | 261 | rECS in 'rECS.pas', | 
|---|
|  | 262 | fODChangeEvtDisp in 'Orders\fODChangeEvtDisp.pas' {frmChangeEventDisp}, | 
|---|
|  | 263 | fODValidateAction in 'Orders\fODValidateAction.pas' {frmInvalidActionList}, | 
|---|
|  | 264 | fODChild in 'Orders\fODChild.pas' {frmODChild}, | 
|---|
|  | 265 | uAccessibleStringGrid in 'uAccessibleStringGrid.pas' {AccessibleStringGrid: CoClass}, | 
|---|
|  | 266 | Accessibility_TLB in 'Accessibility_TLB.pas', | 
|---|
|  | 267 | uAccessibleListBox in 'uAccessibleListBox.pas' {AccessibleListBox: CoClass}, | 
|---|
|  | 268 | uAccessibleTreeNode in 'uAccessibleTreeNode.pas' {IAccessibleTreeNode: CoClass}, | 
|---|
|  | 269 | uAccessibleTreeView in 'uAccessibleTreeView.pas' {AccessibleTreeView: CoClass}, | 
|---|
|  | 270 | fDupPts in 'fDupPts.pas' {frmDupPts}, | 
|---|
|  | 271 | VERGENCECONTEXTORLib_TLB in 'VERGENCECONTEXTORLib_TLB.pas', | 
|---|
|  | 272 | uOrPtf in 'uOrPtf.pas', | 
|---|
|  | 273 | fPatientFlagMulti in 'fPatientFlagMulti.pas' {frmFlags}, | 
|---|
|  | 274 | fFrame in 'fFrame.pas' {frmFrame}, | 
|---|
|  | 275 | fAlertForward in 'fAlertForward.pas' {frmAlertForward}, | 
|---|
|  | 276 | fODMedNVA in 'Orders\fODMedNVA.pas' {frmODMedNVA}, | 
|---|
|  | 277 | uAccessibleRichEdit in 'uAccessibleRichEdit.pas' {AccessibleRichEdit: CoClass}, | 
|---|
|  | 278 | fPrintList in 'fPrintList.pas' {frmPrintList}, | 
|---|
|  | 279 | fODChangeUnreleasedRenew in 'Orders\fODChangeUnreleasedRenew.pas' {frmODChangeUnreleasedRenew}, | 
|---|
|  | 280 | UBAMessages in 'BA\UBAMessages.pas', | 
|---|
|  | 281 | UBAConst in 'BA\UBAConst.pas', | 
|---|
|  | 282 | UBAGlobals in 'BA\UBAGlobals.pas', | 
|---|
|  | 283 | fBALocalDiagnoses in 'BA\fBALocalDiagnoses.pas' {frmBALocalDiagnoses}, | 
|---|
|  | 284 | fReview in 'fReview.pas' {frmReview}, | 
|---|
|  | 285 | fARTFreeTextMsg in 'fARTFreeTextMsg.pas' {frmARTFreeTextMsg}, | 
|---|
|  | 286 | fAllgyBox in 'fAllgyBox.pas' {frmAllgyBox}, | 
|---|
|  | 287 | fARTAllgy in 'fARTAllgy.pas' {frmARTAllergy}, | 
|---|
|  | 288 | UBACore in 'BA\UBACore.pas', | 
|---|
|  | 289 | fBAOptionsDiagnoses in 'BA\fBAOptionsDiagnoses.pas' {frmBAOptionsDiagnoses}, | 
|---|
| [460] | 290 | fOtherSchedule in 'Orders\fOtherSchedule.pas' {frmOtherSchedule}, | 
|---|
|  | 291 | fODBBank in 'Orders\fODBBank.pas' {frmODBBank}, | 
|---|
|  | 292 | fNoteST in 'fNoteST.pas' {frmNotesSearchText}, | 
|---|
|  | 293 | fNoteSTStop in 'fNoteSTStop.pas' {frmSearchStop}, | 
|---|
|  | 294 | rGraphs in 'rGraphs.pas', | 
|---|
|  | 295 | fGraphs in 'fGraphs.pas' {frmGraphs}, | 
|---|
|  | 296 | fGraphSettings in 'fGraphSettings.pas' {frmGraphSettings}, | 
|---|
|  | 297 | fGraphProfiles in 'fGraphProfiles.pas' {frmGraphProfiles}, | 
|---|
|  | 298 | uGraphs in 'uGraphs.pas', | 
|---|
|  | 299 | fClinicWardMeds in 'fClinicWardMeds.pas' {frmClinicWardMeds}, | 
|---|
|  | 300 | fActivateDeactivate in 'fActivateDeactivate.pas' {frmActivateDeactive}, | 
|---|
|  | 301 | uFormMonitor in 'uFormMonitor.pas'; | 
|---|
| [459] | 302 |  | 
|---|
|  | 303 | {$R *.TLB} | 
|---|
|  | 304 |  | 
|---|
|  | 305 | {$R *.RES} | 
|---|
|  | 306 |  | 
|---|
|  | 307 | begin | 
|---|
|  | 308 | if not UpdateSelf then                          // only start if not copying new version | 
|---|
|  | 309 | begin | 
|---|
|  | 310 | RegisterCPRSTypeLibrary;                      // will halt program if /regserver or /unregserver param | 
|---|
|  | 311 | Application.Initialize; | 
|---|
|  | 312 | frmSplash := nil; | 
|---|
|  | 313 | if ParamSearch('SPLASH') <> 'OFF' then | 
|---|
|  | 314 | begin | 
|---|
|  | 315 | frmSplash := TfrmSplash.Create(Application);  // show splash screen | 
|---|
|  | 316 | frmSplash.Show;                               //         " | 
|---|
|  | 317 | frmSplash.Refresh;                            //         " | 
|---|
|  | 318 | end; | 
|---|
|  | 319 | Application.Title := 'CPRS - Patient Chart'; | 
|---|
|  | 320 | Application.HelpFile := 'cprs.hlp'; | 
|---|
|  | 321 | Application.CreateForm(TdmodShared, dmodShared); | 
|---|
|  | 322 | Application.CreateForm(TfrmFrame, frmFrame); | 
|---|
| [460] | 323 | Application.CreateForm(TfrmSearchStop, frmSearchStop); | 
|---|
| [459] | 324 | frmSplash.Free;                               // close & free splash screen | 
|---|
|  | 325 | Application.Run; | 
|---|
|  | 326 | end; | 
|---|
|  | 327 | end. | 
|---|