Function

OrderChecksEnabled

Module

rOrders

Last Modified

7/15/2014 3:26:42 PM

Scope

Interfaced

Declaration

function OrderChecksEnabled: Boolean;

Called-By Hierarchy


                                            OrderChecksEnabled
                                      TfrmODBase.SetFillerID┤ 
                                     TfrmODMisc.FormCreate┤ │ 
                                      TfrmODGen.FormCreate┤ │ 
                                    TfrmODMedIn.FormCreate┤ │ 
                                   TfrmODMedOut.FormCreate┤ │ 
                                     TfrmODText.FormCreate┤ │ 
                                     TfrmODProc.FormCreate┤ │ 
                                     TfrmODCslt.FormCreate┤ │ 
                                      TfrmODRad.FormCreate┤ │ 
                                      TfrmODLab.FormCreate┤ │ 
                                    TfrmODBBank.FormCreate┤ │ 
                                    TfrmODMedIV.FormCreate┤ │ 
                                   TfrmODVitals.FormCreate┤ │ 
                                    TfrmODAuto.SetupDialog┤ │ 
                                   TfrmODMedNVA.FormCreate┤ │ 
                                     TfrmODMeds.FormCreate┤ │ 
                           TfrmODMeds.SetControlsInpatient┤ │ 
                                   TfrmODMeds.FormCreate┘ │ │ 
                          TfrmODMeds.SetControlsOutpatient┤ │ 
                                   TfrmODMeds.FormCreate┘ │ │ 
                                     TfrmODDiet.FormCreate┤ │ 
                                  TfrmODAllergy.FormCreate┘ │ 
                                TfrmODBase.AcceptOrderChecks┤ 
                                      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┘   │ 
                                          ExecuteRenewOrders┘ 
                               TfrmOrders.mnuActRenewClick┤   
                                 TfrmMeds.mnuActRenewClick┘   

Called-By

Name Declaration Comments
TfrmODBase.AcceptOrderChecks function AcceptOrderChecks: Boolean; -
ExecuteRenewOrders function ExecuteRenewOrders(var SelectedList: TList): Boolean; -
TfrmODBase.SetFillerID procedure SetFillerID(const Value: string); -


Source

2263  function OrderChecksEnabled: Boolean;
2264  begin
2265    if uOrderChecksOn = #0 then uOrderChecksOn := CharAt(sCallV('ORWDXC ON', [nil]), 1);
2266    Result := uOrderChecksOn = 'E';
2267  end;