Procedure

TResponses.Clear

Directives

Overload

Module

fODBase

Last Modified

7/15/2014 3:26:40 PM

Comments

Clears all information in the response multiple

Visibility

Public

Owner

TResponses

Declaration

procedure Clear; overload;

Called-By Hierarchy


                                            TResponses.Clear
                                        TResponses.Destroy┤ 
                                   TResponses.SetCopyOrder┤ 
                                  TfrmODBase.SetupDialog┘ │ 
                                   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┘       │ 
                                   TResponses.SetEditOrder┤ 
                               TfrmODBase.SetupDialog...┘ │ 
                                  TResponses.SetQuickOrder┤ 
                         TfrmODMedIn.cboMedicationSelect┤ │ 
                              TfrmODMedIn.CheckFormAlt┘ │ │ 
                         TfrmODMedIn.cboDispenseExit┤   │ │ 
                   TfrmODMedIn.cboDispenseMouseClick┘   │ │ 
                TfrmODMedIn.cboMedicationSelect...┘     │ │ 
                        TfrmODMedOut.cboMedicationSelect┤ │ 
                             TfrmODMedOut.CheckFormAlt┘ │ │ 
                        TfrmODMedOut.cboDispenseExit┤   │ │ 
                  TfrmODMedOut.cboDispenseMouseClick┘   │ │ 
               TfrmODMedOut.cboMedicationSelect...┘     │ │ 
                                TfrmODProc.cboProcSelect┤ │ 
                             TfrmODCslt.treServiceChange┤ │ 
                          TfrmODCslt.treServiceKeyDown┘ │ │ 
                             TfrmODCslt.cboServiceSelect┤ │ 
                             TfrmODCslt.cboServiceExit┘ │ │ 
                            TfrmODRad.cboProcedureSelect┤ │ 
                            TfrmODRad.cboProcedureExit┘ │ │ 
                            TfrmODLab.cboAvailTestSelect┤ │ 
                                 TfrmODLab.SetupDialog┤ │ │ 
                            TfrmODLab.cboAvailTestExit┘ │ │ 
                             TfrmODBBank.SetOnQuickOrder┤ │ 
                             TfrmODBBank.cboQuickClick┘ │ │ 
                       TfrmODMedIV.cboSolutionMouseClick┤ │ 
                           TfrmODMedIV.cboSolutionExit┘ │ │ 
                             TfrmODMedNVA.btnSelectClick┤ │ 
                             TfrmODMedNVA.UMDelayClick┘ │ │ 
                               TfrmODMeds.btnSelectClick┤ │ 
                               TfrmODMeds.UMDelayClick┘ │ │ 
                       TfrmODDiet.cboDietAvailMouseClick┤ │ 
                           TfrmODDiet.cboDietAvailExit┘ │ │ 
                         TfrmODDiet.cboProductMouseClick┤ │ 
                             TfrmODDiet.cboProductExit┘ │ │ 
                     TfrmODDiet.cboOPDietAvailMouseClick┤ │ 
                              TfrmODDiet.nbkDietChange┤ │ │ 
                               TfrmODDiet.InitDialog┤ │ │ │ 
                              TfrmODDiet.SetupDialog┤ │ │ │ 
                                           ..(rec)..┘ │ │ │ 
                         TfrmODDiet.cboOPDietAvailExit┤ │ │ 
                      TfrmODDiet.cboOPDietAvailKeyDown┘ │ │ 
                          TfrmODAllergy.lstAllergySelect┘ │ 
                             TfrmODAllergy.SetupDialog┤   │ 
                                             ..(rec)..┘   │ 
                              TResponses.SetQuickOrderByID┤ 
                               TfrmODBase.SetupDialog...┘ │ 
                                     TfrmODBase.InitDialog┤ 
                                    TfrmODBase.ValidSave┤ │ 
                             TfrmODBase.cmdAcceptClick┤ │ │ 
                              ActivateOrderDialog...┘ │ │ │ 
                             TfrmODBase.FormCloseQuery┤ │ │ 
                                   TfrmODBase.TabClose┤ │ │ 
                          TfrmODAllergy.cmdAcceptClick┘ │ │ 
                            TfrmODBase.cmdAcceptClick...┤ │ 
                                     TfrmODBase.TabClose┘ │ 
                                  TfrmODMisc.ControlChange┤ 
                                  TfrmODMisc.SetupDialog┘ │ 
                        TfrmODMedIn.cboMedicationSelect...┤ 
                       TfrmODMedOut.cboMedicationSelect...┤ 
                                  TfrmODProc.cboProcSelect┤ 
                            TfrmODCslt.treServiceChange...┤ 
                                   TfrmODRad.ControlChange┤ 
                                   TfrmODRad.SetupDialog┤ │ 
                                    TfrmODRad.InitDialog┤ │ 
                                 TfrmODRad.SetupDialog┤ │ │ 
                             TfrmODRad.ImageTypeChange┘ │ │ 
                             TfrmODRad.cboImTypeExit┤   │ │ 
                    TfrmODRad.cboImTypeDropDownClose┘   │ │ 
                         TfrmODRad.cboAvailModMouseClick┤ │ 
                          TfrmODRad.cboAvailModKeyDown┘ │ │ 
                                TfrmODRad.cmdRemoveClick┤ │ 
                         TfrmODRad.cboProcedureSelect...┤ │ 
                             TfrmODRad.cboCategoryChange┤ │ 
                                TfrmODRad.memHistoryExit┤ │ 
                                TfrmODRad.calPreOpChange┘ │ 
                           TfrmODRad.cboProcedureSelect...┤ 
                                      TfrmODRad.FormCreate┤ 
                                   TfrmODLab.ControlChange┤ 
                                   TfrmODLab.SetupDialog┤ │ 
                                      TfrmODLab.Validate┤ │ 
                         TfrmODLab.cboAvailTestSelect...┤ │ 
                             TfrmODLab.cboCollSampChange┤ │ 
                                 TfrmODLab.SetupDialog┤ │ │ 
                       TfrmODLab.cboAvailTestSelect...┘ │ │ 
                              TfrmODLab.cboUrgencyChange┤ │ 
                             TfrmODLab.cboSpecimenChange┤ │ 
                             TfrmODLab.cboCollTimeChange┤ │ 
                            TfrmODLab.cboFrequencyChange┤ │ 
                                 TfrmODLab.SetupDialog┤ │ │ 
                       TfrmODLab.cboAvailTestSelect...┘ │ │ 
                             TfrmODLab.cboCollTypeChange┤ │ 
                           TfrmODLab.txtOrderCommentExit┤ │ 
                          TfrmODLab.txtAntiCoagulantExit┤ │ 
                            TfrmODLab.txtUrineVolumeExit┤ │ 
                            TfrmODLab.grpPeakTroughClick┤ │ 
                          TfrmODLab.txtAddlCommentExit┘ │ │ 
                               TfrmODLab.txtDoseTimeExit┤ │ 
                               TfrmODLab.txtDrawTimeExit┤ │ 
                           TfrmODLab.cboCollSampKeyPause┤ │ 
                         TfrmODLab.cboCollSampMouseClick┤ │ 
                               TfrmODLab.cboCollTimeExit┤ │ 
                         TfrmODLab.cboSpecimenMouseClick┤ │ 
                           TfrmODLab.cboSpecimenKeyPause┘ │ 
                           TfrmODLab.cboAvailTestSelect...┤ 
                                    TfrmODBBank.FormCreate┤ 
                                TfrmODBBank.btnRemoveClick┤ 
                                 TfrmODBBank.SetupDialog┤ │ 
                          TfrmODBBank.SetOnQuickOrder...┘ │ 
                                 TfrmODMedIV.ControlChange┤ 
                      TfrmODMedIV.SetValuesFromResponses┤ │ 
                               TfrmODMedIV.SetupDialog┤ │ │ 
                  TfrmODMedIV.cboSolutionMouseClick...┘ │ │ 
                               TfrmODMedIV.cboTypeChange┤ │ 
                            TfrmODMedIV.ClearAllFields┘ │ │ 
                              TfrmODMedIV.InitDialog┤   │ │ 
                            TfrmODMedIV.FormCreate┘ │   │ │ 
                          TfrmODMedIV.cmdRemoveClick┘   │ │ 
                             TfrmODMedIV.chkDoseNowClick┤ │ 
                                 TfrmODMedIV.chkPRNClick┤ │ 
                    TfrmODMedIV.cboSolutionMouseClick...┤ │ 
                           TfrmODMedIV.cboAddFreqCloseUp┤ │ 
                         TfrmODMedIV.cboAddFreqKeyDown┘ │ │ 
                           TfrmODMedIV.cboDurationChange┤ │ 
                       TfrmODMedIV.cboInfusionTimeChange┤ │ 
                           TfrmODMedIV.cboPriorityChange┤ │ 
                              TfrmODMedIV.cboRouteChange┤ │ 
                       TfrmODMedIV.txtAllIVRoutesClick┘ │ │ 
                         TfrmODMedIV.cboRouteKeyDown┘   │ │ 
                       TfrmODMedIV.cboAdditiveMouseClick┤ │ 
                           TfrmODMedIV.cboAdditiveExit┘ │ │ 
                           TfrmODMedIV.txtSelectedChange┤ │ 
                           TfrmODMedIV.cboScheduleChange┤ │ 
                               TfrmODMedIV.txtNSSClick┘ │ │ 
                      TfrmODMedIV.cboScheduleKeyDown┘   │ │ 
                          TfrmODMedIV.cboSelectedCloseUp┤ │ 
                        TfrmODMedIV.cboSelectedKeyDown┘ │ │ 
                              TfrmODMedIV.cmdRemoveClick┤ │ 
                          TfrmODMedIV.txtXDurationChange┤ │ 
                            TfrmODMedIV.txtXDurationExit┤ │ 
                               TfrmODMedIV.txtRateChange┘ │ 
                                TfrmODVitals.ControlChange┤ 
                                TfrmODVitals.SetupDialog┘ │ 
                             TfrmODMedNVA.ResetOnMedChange┤ 
                                 TfrmODMedNVA.InitDialog┤ │ 
                               TfrmODMedNVA.FormCreate┘ │ │ 
                          TfrmODMedNVA.btnSelectClick...┤ │ 
                           TfrmODMedNVA.CheckFormAltDose┘ │ 
                           TfrmODMedNVA.cboDosageClick┘   │ 
                          TfrmODMedNVA.cboDosageExit┘     │ 
                                TfrmODMedNVA.ControlChange┤ 
                                TfrmODMedNVA.SetupDialog┤ │ 
                                   TfrmODMedNVA.Validate┤ │ 
                          TfrmODMedNVA.btnSelectClick...┤ │ 
                              TfrmODMedNVA.tabDoseChange┤ │ 
                             TfrmODMedNVA.cboRouteChange┤ │ 
                           TfrmODMedNVA.SetOnMedSelect┘ │ │ 
                            TfrmODMedNVA.SetupDialog┤   │ │ 
                      TfrmODMedNVA.btnSelectClick...┤   │ │ 
                    TfrmODMedNVA.CheckFormAltDose...┘   │ │ 
                       TfrmODMedNVA.timCheckChangesTimer┤ │ 
                            TfrmODMedNVA.UpdateRelated┘ │ │ 
                            TfrmODMedNVA.SetupDialog┤   │ │ 
                      TfrmODMedNVA.btnSelectClick...┤   │ │ 
                      TfrmODMedNVA.cboDosageClick...┤   │ │ 
                        TfrmODMedNVA.cboDosageChange┤   │ │ 
                       TfrmODMedNVA.cboScheduleClick┤   │ │ 
                      TfrmODMedNVA.cboScheduleChange┤   │ │ 
                           TfrmODMedNVA.grdDosesExit┘   │ │ 
                                TfrmODMedNVA.chkPRNClick┤ │ 
                     TfrmODMedNVA.lbStatementsClickCheck┘ │ 
                               TfrmODMeds.ResetOnMedChange┤ 
                                   TfrmODMeds.InitDialog┤ │ 
                                 TfrmODMeds.FormCreate┘ │ │ 
                            TfrmODMeds.btnSelectClick...┤ │ 
                             TfrmODMeds.CheckFormAltDose┘ │ 
                             TfrmODMeds.cboDosageClick┘   │ 
                           TfrmODMeds.cboDosageKeyUp┘     │ 
                                  TfrmODMeds.ControlChange┤ 
                                  TfrmODMeds.SetupDialog┤ │ 
                                     TfrmODMeds.Validate┤ │ 
                            TfrmODMeds.btnSelectClick...┤ │ 
                                TfrmODMeds.tabDoseChange┤ │ 
                                TfrmODMeds.FormKeyDown┘ │ │ 
                               TfrmODMeds.cboRouteChange┤ │ 
                             TfrmODMeds.SetOnMedSelect┘ │ │ 
                              TfrmODMeds.SetupDialog┤   │ │ 
                        TfrmODMeds.btnSelectClick...┤   │ │ 
                      TfrmODMeds.CheckFormAltDose...┘   │ │ 
                             TfrmODMeds.popDurationClick┤ │ 
                              TfrmODMeds.cboXRouteChange┤ │ 
                               TfrmODMeds.cboXRouteClick┤ │ 
                              TfrmODMeds.cboXRouteExit┘ │ │ 
                           TfrmODMeds.txtXDurationChange┤ │ 
                           TfrmODMeds.popDurationClick┘ │ │ 
                              TfrmODMeds.btnXRemoveClick┤ │ 
                            TfrmODMeds.grdDosesKeyDown┘ │ │ 
                         TfrmODMeds.timCheckChangesTimer┤ │ 
                              TfrmODMeds.UpdateRelated┘ │ │ 
                              TfrmODMeds.SetupDialog┤   │ │ 
                        TfrmODMeds.btnSelectClick...┤   │ │ 
                        TfrmODMeds.cboDosageClick...┤   │ │ 
                          TfrmODMeds.cboDosageChange┤   │ │ 
                            TfrmODMeds.cboDosageExit┤   │ │ 
                         TfrmODMeds.cboScheduleClick┤   │ │ 
                         TfrmODMeds.cmdAcceptClick┤ │   │ │ 
                            TfrmODMeds.chkPRNClick┤ │   │ │ 
                            TfrmODMeds.txtNSSClick┤ │   │ │ 
                       TfrmODMeds.cboScheduleEnter┤ │   │ │ 
                       TfrmODMeds.UMShowNSSBuilder┘ │   │ │ 
                        TfrmODMeds.cboScheduleChange┤   │ │ 
                          TfrmODMeds.txtSupplyChange┤   │ │ 
                        TfrmODMeds.txtQuantityChange┤   │ │ 
                             TfrmODMeds.grdDosesExit┤   │ │ 
                         TfrmODMeds.cboXDosageChange┤   │ │ 
                          TfrmODMeds.cboXDosageClick┤   │ │ 
                         TfrmODMeds.cboXDosageExit┤ │   │ │ 
                        TfrmODMeds.cboXDosageKeyUp┘ │   │ │ 
                           TfrmODMeds.cboXDosageExit┤   │ │ 
                       TfrmODMeds.cboXScheduleChange┤   │ │ 
                            TfrmODMeds.txtNSSClick┘ │   │ │ 
                        TfrmODMeds.cboXScheduleClick┤   │ │ 
                           TfrmODMeds.chkXPRNClick┤ │   │ │ 
                       TfrmODMeds.pnlXScheduleExit┘ │   │ │ 
                         TfrmODMeds.pnlXScheduleExit┤   │ │ 
                    TfrmODMeds.txtXDurationChange...┤   │ │ 
                         TfrmODMeds.pnlXDurationExit┤   │ │ 
                              TfrmODMeds.chkPRNClick┤   │ │ 
                          TfrmODMeds.cboScheduleExit┤   │ │ 
                           TfrmODMeds.cboDosageKeyUp┤   │ │ 
                          TfrmODMeds.cboXDosageKeyUp┘   │ │ 
                           TfrmODMeds.chkPtInstructClick┤ │ 
                              TfrmODMeds.chkDoseNowClick┤ │ 
                            TfrmODMeds.SetOnQuickOrder┘ │ │ 
                              TfrmODMeds.SetupDialog┤   │ │ 
                        TfrmODMeds.btnSelectClick...┘   │ │ 
                                  TfrmODMeds.chkPRNClick┤ │ 
                           TfrmODMeds.cboXSequenceChange┤ │ 
                             TfrmODMeds.txtRefillsChange┘ │ 
                                TfrmODDiet.nbkDietChanging┤ 
                               TfrmODDiet.nbkDietChange...┤ 
                                     TfrmODDiet.DietChange┤ 
                     TfrmODDiet.SetValuesFromResponsesDO┤ │ 
                                TfrmODDiet.SetupDialog┤ │ │ 
                  TfrmODDiet.cboDietAvailMouseClick...┘ │ │ 
                    TfrmODDiet.cboDietAvailMouseClick...┤ │ 
                               TfrmODDiet.cmdRemoveClick┘ │ 
                                       TfrmODDiet.TFChange┤ 
                     TfrmODDiet.SetValuesFromResponsesTF┤ │ 
                                TfrmODDiet.SetupDialog┤ │ │ 
                    TfrmODDiet.cboProductMouseClick...┘ │ │ 
                      TfrmODDiet.cboProductMouseClick...┤ │ 
                            TfrmODDiet.cboStrengthChange┤ │ 
                              TfrmODDiet.cboStrengthExit┤ │ 
                            TfrmODDiet.txtQuantityChange┤ │ 
                              TfrmODDiet.txtQuantityExit┤ │ 
                             TfrmODDiet.cmdTFRemoveClick┘ │ 
                                       TfrmODDiet.ELChange┤ 
                     TfrmODDiet.SetValuesFromResponsesEL┤ │ 
                                TfrmODDiet.SetupDialog┘ │ │ 
                                 TfrmODDiet.grpMealClick┤ │ 
                TfrmODDiet.SetValuesFromResponsesEL...┘ │ │ 
                             TfrmODDiet.calELStartChange┤ │ 
                              TfrmODDiet.calELStopChange┘ │ 
                TfrmODDiet.SetValuesFromResponsesEL...┘   │ 
                                       TfrmODDiet.IPChange┤ 
                     TfrmODDiet.SetValuesFromResponsesIP┘ │ 
                                TfrmODDiet.SetupDialog┘   │ 
                                       TfrmODDiet.OPChange┤ 
                  TfrmODDiet.cboOPDietAvailMouseClick...┤ │ 
                     TfrmODDiet.SetValuesFromResponsesOP┤ │ 
                                TfrmODDiet.SetupDialog┤ │ │ 
                TfrmODDiet.cboOPDietAvailMouseClick...┘ │ │ 
                             TfrmODDiet.calOPStartChange┤ │ 
                              TfrmODDiet.calOPStopChange┤ │ 
                TfrmODDiet.SetValuesFromResponsesOP...┘ │ │ 
                               TfrmODDiet.grpOPMealClick┤ │ 
                             TfrmODDiet.cmdOPRemoveClick┘ │ 
                               TfrmODAllergy.ControlChange┤ 
                               TfrmODAllergy.SetupDialog┤ │ 
                           TfrmODAllergy.grpObsHistClick┤ │ 
                       TfrmODAllergy.lstAllergySelect...┤ │ 
                           TfrmODAllergy.memCommentsExit┤ │ 
                             TfrmODAllergy.btnAgentClick┤ │ 
                              TfrmODAllergy.FormCreate┘ │ │ 
                          TfrmODAllergy.cboSymptomsClick┤ │ 
                   TfrmODAllergy.ckNoKnownAllergiesClick┤ │ 
                     TfrmODAllergy.cboSymptomsMouseClick┘ │ 
                      TfrmODAllergy.cboSymptomsKeyDown┘   │ 
                         TfrmODAllergy.lstAllergySelect...┤ 
                              TfrmODAllergy.cmdAcceptClick┘ 

Called-By

Name Declaration Comments
TfrmODBBank.btnRemoveClick procedure btnRemoveClick(Sender: TObject); -
TfrmODLab.cboAvailTestSelect procedure cboAvailTestSelect(Sender: TObject); -
TfrmODMedIn.cboMedicationSelect procedure cboMedicationSelect(Sender: TObject); -
TfrmODMedOut.cboMedicationSelect procedure cboMedicationSelect(Sender: TObject); -
TfrmODRad.cboProcedureSelect procedure cboProcedureSelect(Sender: TObject); -
TfrmODProc.cboProcSelect procedure cboProcSelect(Sender: TObject); -
TfrmODAllergy.cmdAcceptClick procedure cmdAcceptClick(Sender: TObject); -
TfrmODMisc.ControlChange procedure ControlChange(Sender: TObject); -
TfrmODRad.ControlChange procedure ControlChange(Sender: TObject); -
TfrmODLab.ControlChange procedure ControlChange(Sender: TObject); -
TfrmODMedIV.ControlChange procedure ControlChange(Sender: TObject); -
TfrmODVitals.ControlChange procedure ControlChange(Sender: TObject); -
TfrmODMedNVA.ControlChange procedure ControlChange(Sender: TObject); -
TfrmODMeds.ControlChange procedure ControlChange(Sender: TObject); -
TfrmODAllergy.ControlChange procedure ControlChange(Sender: TObject); -
TResponses.Destroy destructor Destroy; override; -
TfrmODDiet.DietChange procedure DietChange(Sender: TObject); -
TfrmODDiet.ELChange procedure ELChange(Sender: TObject); -
TfrmODRad.FormCreate procedure FormCreate(Sender: TObject); -
TfrmODBBank.FormCreate procedure FormCreate(Sender: TObject); -
TfrmODBase.InitDialog procedure InitDialog; virtual; -
TfrmODDiet.IPChange procedure IPChange(Sender: TObject); -
TfrmODAllergy.lstAllergySelect procedure lstAllergySelect(Sender: TObject); -
TfrmODDiet.nbkDietChange procedure nbkDietChange(Sender: TObject); -
TfrmODDiet.nbkDietChanging procedure nbkDietChanging(Sender: TObject; var AllowChange: Boolean); -
TfrmODDiet.OPChange procedure OPChange(Sender: TObject); -
TfrmODMedNVA.ResetOnMedChange procedure ResetOnMedChange; -
TfrmODMeds.ResetOnMedChange procedure ResetOnMedChange; -
TResponses.SetCopyOrder procedure SetCopyOrder(const AnID: string); -
TResponses.SetEditOrder procedure SetEditOrder(const AnID: string); -
TResponses.SetQuickOrder procedure SetQuickOrder(AnIEN: Integer); -
TResponses.SetQuickOrderByID procedure SetQuickOrderByID(const AnID: string); -
TfrmODDiet.TFChange procedure TFChange(Sender: TObject); -
TfrmODCslt.treServiceChange procedure treServiceChange(Sender: TObject; Node: TTreeNode); -


Source

547   procedure TResponses.Clear;
548   { clears all information in the response multiple }
549   var
550     i: Integer;
551   begin
552     FVarLeading  := '';
553     FVarTrailing := '';
554     FQuickOrder  := 0;
555     //FCopyOrder  := '';  // don't clear FCopyOrder either?
556     // don't clear FEditOrder or it will cause a new order to be created instead of an edit
557     with FResponseList do for i := 0 to Count - 1 do TResponse(Items[i]).Free;
558     FResponseList.Clear;
559     FOrderChecks.Clear;
560   end;