Procedure

TOrder.Clear

Module

rOrders

Last Modified

7/15/2014 3:26:42 PM

Visibility

Public

Owner

TOrder

Declaration

procedure Clear;

Called-By Hierarchy


                                                    TOrder.Clear
                                                SetOrderFields┘ 
                                                  LoadOrders┤   
                                         RetrieveOrderFields┤   
                                  CheckForAutoDCDietOrders┤ │   
                               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┘     │ │ │   
                                  ActivateOrderDialog...┤ │ │   
                                TfrmODDiet.nbkDietChange┘ │ │   
                                 TfrmODDiet.InitDialog┤   │ │   
                                TfrmODDiet.SetupDialog┤   │ │   
                                             ..(rec)..┘   │ │   
                                         RetrieveOrderText┤ │   
                             IsValidActionOnComplexOrder┤ │ │   
                           TfrmOrders.ValidateSelected┤ │ │ │   
                            TfrmOrders.mnuActDCClick┤ │ │ │ │   
                           TfrmOrders.mnuActRelClick┤ │ │ │ │   
                       TfrmOrders.mnuActChgEvntClick┤ │ │ │ │   
                          TfrmOrders.mnuActHoldClick┤ │ │ │ │   
                        TfrmOrders.mnuActUnholdClick┤ │ │ │ │   
                         TfrmOrders.mnuActRenewClick┤ │ │ │ │   
                         TfrmOrders.mnuActAlertClick┤ │ │ │ │   
                      TfrmOrders.mnuActCompleteClick┤ │ │ │ │   
                        TfrmOrders.mnuActVerifyClick┤ │ │ │ │   
                      TfrmOrders.mnuActChartRevClick┤ │ │ │ │   
                        TfrmOrders.mnuActChangeClick┤ │ │ │ │   
                          TfrmOrders.mnuActCopyClick┤ │ │ │ │   
                       TfrmOrders.mnuActReleaseClick┤ │ │ │ │   
                       TfrmOrders.mnuActOnChartClick┤ │ │ │ │   
                          TfrmOrders.mnuActSignClick┘ │ │ │ │   
                             TfrmMeds.ValidateSelected┘ │ │ │   
                              TfrmMeds.mnuActDCClick┤   │ │ │   
                            TfrmMeds.mnuActHoldClick┤   │ │ │   
                           TfrmMeds.mnuActRenewClick┤   │ │ │   
                          TfrmMeds.mnuActUnholdClick┤   │ │ │   
                          TfrmMeds.mnuActChangeClick┤   │ │ │   
                          TfrmMeds.mnuActRefillClick┘   │ │ │   
                                  ActivateOrderDialog...┤ │ │   
                                           CopyOrders...┤ │ │   
                                       TransferOrders...┤ │ │   
                                     IMOActionValidation┤ │ │   
                                ActivateOrderDialog...┤ │ │ │   
                                    ExecuteRenewOrders┘ │ │ │   
                         TfrmOrders.mnuActRenewClick┤   │ │ │   
                           TfrmMeds.mnuActRenewClick┘   │ │ │   
                               ExecuteChangeRenewedOrder┤ │ │   
                                       ChangeOrders...┘ │ │ │   
                              TfrmChgEvent.updateChanges┘ │ │   
                                   ExecuteChangeEvt...┘   │ │   
                          TfrmOrders.RetrieveVisibleOrders┤ │   
                         TfrmOrders.lstOrdersMeasureItem┘ │ │   
                        TfrmODActive.RetrieveVisibleOrders┘ │   
                 TfrmODActive.lstActiveOrdersMeasureItem┘   │   
                                         SetOrderFromResults┤   
                                                RenewOrder┤ │   
                                   ExecuteRenewOrders...┘ │ │   
                                                 HoldOrder┤ │   
                                       ExecuteHoldOrders┘ │ │   
                            TfrmOrders.mnuActHoldClick┤   │ │   
                              TfrmMeds.mnuActHoldClick┘   │ │   
                                          ReleaseOrderHold┤ │   
                                     ExecuteUnholdOrders┘ │ │   
                          TfrmOrders.mnuActUnholdClick┤   │ │   
                            TfrmMeds.mnuActUnholdClick┘   │ │   
                                                   DCOrder┤ │   
                                  TfrmOrders.NotifyOrder┤ │ │   
                                  TfrmFrame.UMNewOrder┘ │ │ │   
                                         ExecuteDCOrders┘ │ │   
                              TfrmOrders.mnuActDCClick┤   │ │   
                                TfrmMeds.mnuActDCClick┘   │ │   
                                                 FlagOrder┤ │   
                                        ExecuteFlagOrder┘ │ │   
                            TfrmOrders.mnuActFlagClick┘   │ │   
                                               UnflagOrder┤ │   
                                      ExecuteUnflagOrder┘ │ │   
                          TfrmOrders.mnuActUnflagClick┘   │ │   
                                             CompleteOrder┤ │   
                                   ExecuteCompleteOrders┘ │ │   
                        TfrmOrders.mnuActCompleteClick┘   │ │   
                                               VerifyOrder┤ │   
                                     ExecuteVerifyOrders┘ │ │   
                          TfrmOrders.mnuActVerifyClick┤   │ │   
                        TfrmOrders.mnuActChartRevClick┘   │ │   
                                    VerifyOrderChartReview┤ │   
                                  ExecuteVerifyOrders...┘ │ │   
                                   SaveChangesOnRenewOrder┤ │   
                                         ChangeOrders...┘ │ │   
                                             OrderLateTray┘ │   
                                           LateTrayOrder┘   │   
                          TfrmODBase.cmdAcceptClick...┤     │   
                             TfrmODDiet.cmdAcceptClick┘     │   
                          TfrmODDiet.nbkDietChanging┘       │   
                                               GetOrderByIFN┤   
                               TfrmOrders.mnuActRenewClick┤ │   
                                 TfrmMeds.mnuActRenewClick┤ │   
                                 TfrmMeds.MakeSelectedList┤ │   
                                  TfrmMeds.mnuActDCClick┤ │ │   
                                TfrmMeds.mnuActHoldClick┤ │ │   
                               TfrmMeds.mnuActRenewClick┤ │ │   
                              TfrmMeds.mnuActUnholdClick┤ │ │   
                              TfrmMeds.mnuActChangeClick┤ │ │   
                                TfrmMeds.mnuActCopyClick┤ │ │   
                              TfrmMeds.mnuActRefillClick┘ │ │   
                    TfrmActivateDeactive.fActivateDeactive┘ │   
                          TfrmMeds.ActivateDeactiveRenew┘   │   
                                TfrmMeds.mnuActDCClick┘     │   
                                                 PutNewOrder┘   
                                      TResponses.SaveOrder┘     
                                    TfrmODBase.ValidSave┘       
                          TfrmODBase.cmdAcceptClick...┤         
                             TfrmODBase.FormCloseQuery┤         
                                   TfrmODBase.TabClose┤         
                          TfrmODAllergy.cmdAcceptClick┘         

Called-By

Name Declaration Comments
SetOrderFields procedure SetOrderFields(AnOrder: TOrder; const x, y, z: string); -


Source

420   procedure TOrder.Clear;
421   begin
422     ID           := '';
423     DGroup       := 0;
424     OrderTime    := 0;
425     StartTime    := '';
426     StopTime     := '';
427     Status       := 0;
428     Signature    := 0;
429     VerNurse     := '';
430     VerClerk     := '';
431     ChartRev     := '';
432     Provider     := 0;
433     ProviderName := '';
434     ProviderDEA  := '';
435     ProviderVA   :='';
436     DigSigReq    :='';
437     XMLText      := '';
438     Text         := '';
439     DGroupSeq    := 0;
440     DGroupName   := '';
441     Flagged      := False;
442     Retrieved    := False;
443     EditOf       := '';
444     ActionOn     := '';
445     OrderLocIEN  := '';         //imo
446     OrderLocName := '';         //imo
447     ParentID     := '';
448     LinkObject   := nil;
449     IsControlledSubstance := False;
450     IsDetox := False;
451   end;