function ActiveOrdering: Boolean;
ActiveOrdering ChangeOrders┤ TfrmOrders.mnuActChangeClick┤ │ TfrmMeds.mnuActChangeClick┘ │ ChangeOrdersEvt┤ DestroyingOrderAction┤ ActivateAction┘ │ TfrmRemDlg.btnFinishClick┤ │ TfrmConsults.mnuActNewConsultRequestClick┤ │ TfrmConsults.cmdNewConsultClick┘ │ │ 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┤ │ │ │ TfrmConsults.cmdNewProcClick┘ │ │ │ │ TfrmOrders.lstWriteClick┤ │ │ │ TfrmOrders.PlaceOrderForDefaultDialog...┤ │ │ │ TfrmMeds.mnuActNewClick┤ │ │ │ TfrmOMNavA.ActivateDialog...┤ │ │ │ TfrmOMSet.DoNextItem...┘ │ │ │ TfrmOMNavA.DoSelectList┘ │ │ TfrmOMNavA.grdMenuKeyUp┤ │ │ TfrmOMNavA.grdMenuMouseUp┘ │ │ SkipToNext┤ │ TfrmOMSet.DoNextItem...┘ │ │ TfrmOMSet.UMDelayEvent┘ │ DestroyingOrderDialog┤ CreateOrderDialog┘ │ ActivateOrderDialog┘ │ TfrmRemDlg.btnFinishClick┤ │ TfrmConsults.mnuActNewConsultRequestClick...┤ │ TfrmConsults.mnuActNewProcedureClick...┤ │ ChangeOrders...┤ │ ChangeOrdersEvt┤ │ CopyOrders┤ │ TfrmOrders.mnuActCopyClick┤ │ │ TfrmMeds.mnuActCopyClick┤ │ │ TfrmODActive.btnOKClick┘ │ │ TransferOrders┤ │ TfrmOrders.mnuActCopyClick┤ │ │ TfrmMeds.mnuActCopyClick┤ │ │ TfrmODActive.btnOKClick┘ │ │ TfrmOrders.lstWriteClick┤ │ TfrmOrders.PlaceOrderForDefaultDialog...┤ │ TfrmMeds.mnuActNewClick┤ │ TfrmOMNavA.ActivateDialog...┤ │ TfrmOMSet.DoNextItem...┘ │ DestroyingOrderHTML┤ TfrmOMHTML.FormDestroy┘ │ DestroyingOrderMenu┤ TfrmOMNavA.FormDestroy┘ │ DestroyingOrderSet┤ TfrmOMSet.FormDestroy┘ │ TfrmOrders.AllowContextChange┤ TfrmFrame.AllowContextChangeAll┘ │ TfrmFrame.FormCloseQuery┤ │ 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.ctxContextorPending┤ │ TfrmFrame.StartCCOWContextor┘ │ │ TfrmFrame.FormCreate┘ │ │ TfrmFrame.ctxContextorCommitted┤ │ TfrmFrame.StartCCOWContextor...┘ │ │ TfrmFrame.mnuFileResumeContextGetClick┤ │ TfrmFrame.mnuFileResumeContextSetClick┘ │ TfrmOrders.CanChangeOrderView┤ TfrmOrders.SetOrderView┤ │ TfrmOrders.mnuViewActiveClick┤ │ │ TfrmOrders.mnuViewCurrentClick┤ │ │ TfrmOrders.mnuViewExpiringClick┤ │ │ TfrmOrders.mnuViewExpiredClick┤ │ │ TfrmOrders.mnuViewUnsignedClick┤ │ │ TfrmOrders.ProcessNotifications┘ │ │ │ TfrmOrders.DisplayPage┘ │ │ │ TfrmOrders.ViewAlertedOrders┘ │ │ TfrmOrders.ProcessNotifications...┘ │ │ TfrmOrders.mnuViewCustomClick┤ │ TfrmOrders.mnuViewDfltShowClick┤ │ TfrmOrders.DisplayPage┘ │ │ TfrmOrders.DfltViewForEvtDelay┤ │ TfrmOrders.InitOrderSheetsForEvtDelay┘ │ │ TfrmOrders.lstSheetsClick┤ │ │ TfraEvntDelayList.CheckMatch┤ │ │ │ TfrmOrdersTS.cmdOKClick┘ │ │ │ │ TfrmOrdersTS.fraEvntDelayListmlstEventsDblClick┤ │ │ │ │ TfrmOrdersTS.FormKeyDown┘ │ │ │ │ TfraEvntDelayList.mlstEventsChange┤ │ │ │ TfrmOrdersTS.fraEvntDelayListcboEvntListChange┤ │ │ │ │ TfrmOrdersTS.fraEvntDelayListmlstEventsChange┤ │ │ │ │ TfrmMedCopy.fraEvntDelayListcboEvntListChange┤ │ │ │ │ TfrmMedCopy.fraEvntDelayListmlstEventsChange┤ │ │ │ │ TfrmCopyOrders.fraEvntDelayListcboEvntListChange┤ │ │ │ │ TfrmCopyOrders.fraEvntDelayListmlstEventsChange┘ │ │ │ │ TfrmOrders.mnuViewDfltShowClick...┤ │ │ │ ..(rec)..┤ │ │ │ TfrmOrders.lstWriteClick┤ │ │ │ TfrmOrders.mnuActCopyClick┤ │ │ │ TfrmOrders.mnuActSignClick┤ │ │ │ TfrmOrders.ResetOrderPage...┤ │ │ │ TfrmOrders.PlaceOrderForDefaultDialog...┤ │ │ │ TfrmOrders.ClickLstSheet┤ │ │ │ TfraEvntDelayList.mlstEventsChange...┤ │ │ │ │ TfrmOrders.ResetOrderPage...┤ │ │ │ │ ExecuteReleaseEventOrders┘ │ │ │ │ TfrmOrders.mnuActRelClick┘ │ │ │ │ TfrmOrders.InitOrderSheets2┤ │ │ │ TfrmFrame.mnuFileReviewClick┘ │ │ │ │ TfrmOrders.PtEvtCompleted┤ │ │ │ TfrmFrame.DetermineNextTab┤ │ │ │ │ TfrmFrame.mnuFileOpenClick...┤ │ │ │ │ │ TfrmFrame.UpdateCCOWContext┘ │ │ │ │ │ TfrmFrame.mnuFileOpenClick...┤ │ │ │ │ │ TfrmFrame.ctxContextorCommitted...┤ │ │ │ │ │ TfrmFrame.mnuFileResumeContextGetClick┘ │ │ │ │ │ TfrmFrame.mnuFileReviewClick┤ │ │ │ │ TfrmOrders.lstSheetsClick...┤ │ │ │ │ TfrmOrders.lstWriteClick┤ │ │ │ │ TfrmOrders.mnuActDCClick┤ │ │ │ │ TfrmOrders.mnuActChgEvntClick┤ │ │ │ │ TfrmOrders.mnuActHoldClick┤ │ │ │ │ TfrmOrders.mnuActFlagClick┤ │ │ │ │ TfrmOrders.mnuActCommentClick┤ │ │ │ │ TfrmOrders.mnuActChangeClick┤ │ │ │ │ TfrmOrders.mnuActCopyClick┤ │ │ │ │ TfrmOrders.mnuActSignClick┤ │ │ │ │ TfrmOrders.btnDelayedOrderClick┤ │ │ │ │ TfrmMeds.mnuActCopyClick┤ │ │ │ │ TfrmODActive.btnOKClick┘ │ │ │ │ TfrmOrders.UMEventOccur┤ │ │ │ TfrmMeds.mnuActCopyClick┤ │ │ │ TfrmMeds.mnuActNewClick┤ │ │ │ SetDelayEventForMed...┤ │ │ │ SetViewForCopy...┤ │ │ │ TfrmCopyOrders.cmdOKClick┤ │ │ │ TfrmCopyOrders.UMStillDelay┤ │ │ │ │ TfrmCopyOrders.fraEvntDelayListmlstEventsDblClick┤ │ │ │ │ TfrmCopyOrders.FormKeyDown┘ │ │ │ │ ExecuteChangeEvt...┤ │ │ │ ExecuteDCOrders┘ │ │ │ TfrmOrders.mnuActDCClick┤ │ │ │ TfrmMeds.mnuActDCClick┘ │ │ │ TfrmOrders.lstWriteClick┤ │ │ TfrmOrders.mnuActCopyClick┤ │ │ TfrmOrders.mnuActSignClick┤ │ │ TfrmOrders.PtEvtCompleted...┤ │ │ TfrmOrders.RefreshToFirstItem┤ │ │ TfrmOrders.UMEventOccur┤ │ │ TfrmMeds.mnuActCopyClick┤ │ │ Highlight┤ │ │ SetDelayEventForMed...┘ │ │ │ Highlight┤ │ │ SetViewForCopy...┘ │ │ │ ExecuteReleaseEventOrders...┤ │ │ ExecuteChangeEvt...┤ │ │ TfrmChgEvent.Highlight┤ │ │ ExecuteChangeEvt...┘ │ │ │ ExecuteDCOrders...┘ │ │ TfrmOrders.EventRealeasedOrder1Click┘ │ TfrmOrders.lstWriteClick┤ TfrmOrders.PlaceOrderForDefaultDialog...┘
Name | Declaration | Comments |
---|---|---|
![]() |
function AllowContextChange(var WhyNot: string): Boolean; override; | - |
![]() |
function CanChangeOrderView: Boolean; | - |
![]() |
procedure ChangeOrders(AList: TStringList; AnEvent: TOrderDelayEvent); | - |
![]() |
function ChangeOrdersEvt(AnOrderID: string; AnEvent: TOrderDelayEvent): boolean; | - |
![]() |
procedure DestroyingOrderAction; | - |
![]() |
procedure DestroyingOrderDialog; | - |
![]() |
procedure DestroyingOrderHTML; | - |
![]() |
procedure DestroyingOrderMenu; | - |
![]() |
procedure DestroyingOrderSet; | - |
![]() |
procedure lstWriteClick(Sender: TObject); | - |
![]() |
function PlaceOrderForDefaultDialog(ADlgInfo: string; IsDefaultDialog: boolean; AEvent: TOrderDelayEvent): boolean; | - |
1525 function ActiveOrdering: Boolean; 1526 begin 1527 if (uOrderDialog = nil) and (uOrderMenu = nil) and (uOrderSet = nil) and 1528 (uOrderAction = nil) and (uOrderHTML = nil) 1529 then Result := False 1530 else Result := True; 1531 end;