Constructor

TCPRSEventHookManager.Create

Module

uEventHooks

Last Modified

7/15/2014 3:26:44 PM

Comments

TCPRSEventHookManager

Visibility

Public

Owner

TCPRSEventHookManager

Declaration

constructor Create;

Calls Hierarchy


TCPRSEventHookManager.Create
 ├TCPRSBroker.Create
 └TCPRSState.Create

Called-By Hierarchy


                                    TCPRSEventHookManager.Create
                                        EnsureEventHookObjects┘ 
                                         TCPRSBroker.CallRPC┤   
                               ProcessPatientChangeEventHook┤   
                                    TfrmFrame.SetupPatient┘ │   
                               UpdatePatientInfoForAlert┤   │   
                            TfrmFrame.mnuFileNextClick┘ │   │   
                          TfrmFrame.mnuFileOpenClick┤   │   │   
                              TfrmFrame.UMInitiate┤ │   │   │   
                     TfrmFrame.mnuFileNextClick...┤ │   │   │   
                     TfrmFrame.mnuFileRefreshClick┤ │   │   │   
                     TfrmOrders.CheckOrderStatus┤ │ │   │   │   
                 TfrmOrders.mnuActChgEvntClick┤ │ │ │   │   │   
                    TfrmOrders.mnuActHoldClick┤ │ │ │   │   │   
                  TfrmOrders.mnuActUnholdClick┤ │ │ │   │   │   
                   TfrmOrders.mnuActRenewClick┤ │ │ │   │   │   
                  TfrmOrders.mnuActChangeClick┤ │ │ │   │   │   
                    TfrmOrders.mnuActCopyClick┘ │ │ │   │   │   
                          TfrmMeds.mnuActDCClick┤ │ │   │   │   
                         TfrmMeds.CheckMedStatus┘ │ │   │   │   
                      TfrmMeds.mnuActHoldClick┤   │ │   │   │   
                     TfrmMeds.mnuActRenewClick┤   │ │   │   │   
                    TfrmMeds.mnuActUnholdClick┤   │ │   │   │   
                    TfrmMeds.mnuActChangeClick┤   │ │   │   │   
                      TfrmMeds.mnuActCopyClick┤   │ │   │   │   
                    TfrmMeds.mnuActRefillClick┘   │ │   │   │   
                                TfrmFrame.ViewInfo┘ │   │   │   
                             TfrmDCSumm.ViewInfo┤   │   │   │   
                           TfrmConsults.ViewInfo┤   │   │   │   
                   TfrmFrame.pnlRemindersMouseUp┤   │   │   │   
                    TfrmFrame.RemindersChanged┘ │   │   │   │   
                        TfrmFrame.FormCreate┘   │   │   │   │   
                          TfrmFrame.pnlCIRNClick┤   │   │   │   
                    TfrmFrame.pnlVistaWebClick┤ │   │   │   │   
                         TfrmFrame.FormKeyDown┘ │   │   │   │   
                       TfrmFrame.pnlPatientClick┤   │   │   │   
                         TfrmFrame.pnlVisitClick┤   │   │   │   
                   TfrmFrame.pnlPrimaryCareClick┤   │   │   │   
                     TfrmFrame.pnlRemindersClick┤   │   │   │   
                      TfrmFrame.pnlPostingsClick┤   │   │   │   
                          TfrmFrame.pnlFlagClick┤   │   │   │   
                            TfrmFrame.laMHVClick┤   │   │   │   
                           TfrmFrame.laVAA2Click┤   │   │   │   
                             TfrmOrders.ViewInfo┤   │   │   │   
                               TfrmMeds.ViewInfo┤   │   │   │   
                            TfrmSurgery.ViewInfo┤   │   │   │   
                              TfrmNotes.ViewInfo┤   │   │   │   
                           TfrmProblems.ViewInfo┘   │   │   │   
                   TfrmFrame.mnuFileNotifRemoveClick┤   │   │   
                           TfrmFrame.NextButtonClick┘   │   │   
                         TfrmFrame.SetUpNextButton┘     │   │   
                   TfrmFrame.mnuFileOpenClick...┤       │   │   
                            TfrmFrame.FormResize┘       │   │   
                          TfrmFrame.ChangeFont┘         │   │   
                  TfrmFrame.LoadSizesForUser┤           │   │   
             TfrmFrame.LoadUserPreferences┘ │           │   │   
                    TfrmFrame.UMInitiate┘   │           │   │   
                  TfrmFrame.mnuFontSizeClick┘           │   │   
                           TfrmFrame.mnuFileOpenClick...┤   │   
                        TfrmFrame.AllowCCOWContextChange┤   │   
                         TfrmFrame.mnuFileNextClick...┤ │   │   
                         TfrmFrame.mnuFileOpenClick...┤ │   │   
                TfrmFrame.mnuFileResumeContextSetClick┘ │   │   
                             TfrmFrame.UpdateCCOWContext┤   │   
                         TfrmFrame.mnuFileOpenClick...┤ │   │   
                       TfrmFrame.ctxContextorCommitted┤ │   │   
                        TfrmFrame.StartCCOWContextor┘ │ │   │   
                              TfrmFrame.FormCreate┘   │ │   │   
                TfrmFrame.mnuFileResumeContextGetClick┘ │   │   
                  TfrmFrame.mnuFileResumeContextSetClick┘   │   
                                 ProcessOrderAcceptEventHook┤   
                                      TfrmODBase.ValidSave┘ │   
                               TfrmODBase.cmdAcceptClick┤   │   
                                   ActivateOrderDialog┘ │   │   
                           TfrmRemDlg.btnFinishClick┤   │   │   
           TfrmConsults.mnuActNewConsultRequestClick┤   │   │   
                   TfrmConsults.cmdNewConsultClick┘ │   │   │   
                TfrmConsults.mnuActNewProcedureClick┤   │   │   
                      TfrmConsults.cmdNewProcClick┘ │   │   │   
                                        ChangeOrders┤   │   │   
                      TfrmOrders.mnuActChangeClick┤ │   │   │   
                        TfrmMeds.mnuActChangeClick┘ │   │   │   
                                     ChangeOrdersEvt┤   │   │   
                                          CopyOrders┤   │   │   
                        TfrmOrders.mnuActCopyClick┤ │   │   │   
                          TfrmMeds.mnuActCopyClick┤ │   │   │   
                           TfrmODActive.btnOKClick┘ │   │   │   
                                      TransferOrders┤   │   │   
                        TfrmOrders.mnuActCopyClick┤ │   │   │   
                          TfrmMeds.mnuActCopyClick┤ │   │   │   
                           TfrmODActive.btnOKClick┘ │   │   │   
                            TfrmOrders.lstWriteClick┤   │   │   
               TfrmOrders.PlaceOrderForDefaultDialog┤   │   │   
                  TfrmOrders.DisplayDefaultDlgList┤ │   │   │   
                       TfrmOrders.ResetOrderPage┘ │ │   │   │   
               TfrmOrders.btnDelayedOrderClick┘   │ │   │   │   
                                 DisplayEvntDialog┤ │   │   │   
                             SetDelayEventForMed┘ │ │   │   │   
                      TfrmMeds.mnuActCopyClick┘   │ │   │   │   
                                 DisplayEvntDialog┤ │   │   │   
                                  SetViewForCopy┘ │ │   │   │   
                    TfrmOrders.mnuActCopyClick┘   │ │   │   │   
                                 DisplayEvntDialog┘ │   │   │   
                                ExecuteChangeEvt┘   │   │   │   
                 TfrmOrders.mnuActChgEvntClick┘     │   │   │   
                             TfrmMeds.mnuActNewClick┤   │   │   
                           TfrmOMNavA.ActivateDialog┤   │   │   
                         TfrmOMNavA.grdMenuKeyDown┤ │   │   │   
                         TfrmOMNavA.grdMenuMouseUp┘ │   │   │   
                                TfrmOMSet.DoNextItem┘   │   │   
                              TfrmOMSet.InsertList┤     │   │   
                               ActivateOrderList┘ │     │   │   
                     TfrmRemDlg.btnFinishClick┤   │     │   │   
                             ActivateOrderHTML┤   │     │   │   
                    TfrmOrders.lstWriteClick┤ │   │     │   │   
    TfrmOrders.PlaceOrderForDefaultDialog...┘ │   │     │   │   
                              ActivateOrderSet┤   │     │   │   
                   TfrmRemDlg.btnFinishClick┤ │   │     │   │   
TfrmConsults.mnuActNewConsultRequestClick...┤ │   │     │   │   
     TfrmConsults.mnuActNewProcedureClick...┤ │   │     │   │   
                    TfrmOrders.lstWriteClick┤ │   │     │   │   
    TfrmOrders.PlaceOrderForDefaultDialog...┤ │   │     │   │   
                     TfrmMeds.mnuActNewClick┤ │   │     │   │   
                TfrmOMNavA.ActivateDialog...┤ │   │     │   │   
                     TfrmOMSet.DoNextItem...┘ │   │     │   │   
                       TfrmOMNavA.DoSelectList┘   │     │   │   
                     TfrmOMNavA.grdMenuKeyUp┤     │     │   │   
                   TfrmOMNavA.grdMenuMouseUp┘     │     │   │   
                                        SkipToNext┤     │   │   
                         TfrmOMSet.DoNextItem...┘ │     │   │   
                            TfrmOMSet.UMDelayEvent┘     │   │   
                               TfrmODBase.FormCloseQuery┤   │   
                                     TfrmODBase.TabClose┤   │   
                            TfrmODAllergy.cmdAcceptClick┘   │   
                                            GetCOMObjectText┘   
                                   TTemplate.COMObjectText┘     
                            ExecuteTemplateOrBoilerPlate┤       
                                  TfrmDrawers.InsertText┘       
                       TfrmDrawers.tvTemplatesDblClick┤         
                        TfrmDrawers.tvTemplatesKeyDown┤         
                            TfrmDrawers.NewRECDragDrop┤         
                      TfrmDrawers.SetRichEditControl┘ │         
                             TfrmDCSumm.FormCreate┤   │         
                           TfrmConsults.FormCreate┤   │         
                            TfrmSurgery.FormCreate┤   │         
                              TfrmNotes.FormCreate┘   │         
                    TfrmDrawers.mnuInsertTemplateClick┘         
              TfrmDCSumm.popSummMemoInsTemplateClick┤           
            TfrmConsults.popNoteMemoInsTemplateClick┤           
             TfrmSurgery.popNoteMemoInsTemplateClick┤           
               TfrmNotes.popNoteMemoInsTemplateClick┘           

Calls

Name Declaration Comments
TCPRSBroker.Create constructor Create; -
TCPRSState.Create constructor Create; -

Called-By

Name Declaration Comments
EnsureEventHookObjects procedure EnsureEventHookObjects; -


Source

380   constructor TCPRSEventHookManager.Create;
381   begin
382     inherited;
383     FCPRSBroker := TCPRSBroker.Create;
384     FCPRSState := TCPRSState.Create;
385   end;