Procedure

TPCEDiag.SetFromString

Directives

Override

Module

uPCE

Last Modified

7/15/2014 3:26:36 PM

Comments

Procedure TPCEDiag.SetFromString(const x: string);
modified: 6/17/98
By: Robert Bott
Location: ISL
Purpose: Sets fields to pieces passed from server.

 sets fields to pieces passed from server:  TYP ^ Code ^ Category ^ Narrative ^ Primary ^ ^ ^ Comment

Visibility

Public

Overrides

TPCEItem.SetFromString

Owner

TPCEDiag

Declaration

procedure SetFromString(const x: string); override;

Calls Hierarchy


TPCEDiag.SetFromString
 └TPCEItem.SetFromString
   └TPCEItem.SetComment

Called-By Hierarchy


                                                   TPCEDiag.SetFromString
                                                    TPCEData.PCEForNote┘ 
                                                            IsOK2Sign┤   
                                         TfrmDCSumm.mnuActSignClick┤ │   
                                            TfrmDCSumm.SaveSignItem┤ │   
                                            TfrmReview.cmdOKClick┘ │ │   
                                                  ReviewChanges┘   │ │   
                              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┘ │     │ │   
                                     TfrmFrame.FormCloseQuery┤     │ │   
                                 TfrmFrame.mnuFileReviewClick┤     │ │   
                                              UpdateEncounter┘     │ │   
                            TfrmFrame.mnuFileEncounterClick┤       │ │   
                                    TfrmFrame.ViewInfo...┤ │       │ │   
                       TfrmODMedIV.SetValuesFromResponses┤ │       │ │   
                                TfrmODMedIV.SetupDialog┤ │ │       │ │   
                      TfrmODMedIV.cboSolutionMouseClick┘ │ │       │ │   
                          TfrmODMedIV.cboSolutionExit┘   │ │       │ │   
                     TfrmODMedIV.cboSolutionMouseClick...┤ │       │ │   
                        TfrmODMedIV.cboAdditiveMouseClick┤ │       │ │   
                            TfrmODMedIV.cboAdditiveExit┘ │ │       │ │   
                                   TfrmODAuto.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┘   │ │       │ │   
                                  TfrmOMSet.InsertList...┤ │       │ │   
                                   TfrmODMeds.SetupDialog┤ │       │ │   
                                TfrmODMeds.btnSelectClick┤ │       │ │   
                                TfrmODMeds.UMDelayClick┘ │ │       │ │   
                                       ExecuteRenewOrders┘ │       │ │   
                            TfrmOrders.mnuActRenewClick┤   │       │ │   
                              TfrmMeds.mnuActRenewClick┘   │       │ │   
                                           EncounterPresent┤       │ │   
                                         ReadyForNewOrder┤ │       │ │   
                              TfrmRemDlg.btnFinishClick┤ │ │       │ │   
           TfrmConsults.mnuActNewConsultRequestClick...┤ │ │       │ │   
                TfrmConsults.mnuActNewProcedureClick...┤ │ │       │ │   
                                        ChangeOrders...┤ │ │       │ │   
                                        ChangeOrdersEvt┤ │ │       │ │   
                                          CopyOrders...┤ │ │       │ │   
                                      TransferOrders...┤ │ │       │ │   
                               TfrmOrders.lstWriteClick┤ │ │       │ │   
                                TfrmMeds.mnuActNewClick┘ │ │       │ │   
                                        ReadyForNewOrder1┤ │       │ │   
               TfrmOrders.PlaceOrderForDefaultDialog...┘ │ │       │ │   
                                 TfrmOrders.mnuActDCClick┤ │       │ │   
                                TfrmOrders.mnuActRelClick┤ │       │ │   
                               TfrmOrders.mnuActHoldClick┤ │       │ │   
                             TfrmOrders.mnuActUnholdClick┤ │       │ │   
                              TfrmOrders.mnuActRenewClick┤ │       │ │   
                            TfrmOrders.mnuActReleaseClick┤ │       │ │   
                            TfrmOrders.mnuActOnChartClick┤ │       │ │   
                               TfrmOrders.mnuActSignClick┤ │       │ │   
                                   TfrmMeds.mnuActDCClick┤ │       │ │   
                                 TfrmMeds.mnuActHoldClick┤ │       │ │   
                                TfrmMeds.mnuActRenewClick┤ │       │ │   
                               TfrmMeds.mnuActUnholdClick┤ │       │ │   
                                 TfrmMeds.mnuActCopyClick┤ │       │ │   
                               TfrmMeds.mnuActRefillClick┘ │       │ │   
                                        EncounterPresentEDO┤       │ │   
                                      ReadyForNewOrder...┤ │       │ │   
                            TfrmOrders.mnuActChgEvntClick┤ │       │ │   
                             TfrmOrders.mnuActChangeClick┤ │       │ │   
                               TfrmOrders.mnuActCopyClick┤ │       │ │   
                          TfrmOrders.btnDelayedOrderClick┤ │       │ │   
                               TfrmMeds.mnuActChangeClick┤ │       │ │   
                                 TfrmMeds.mnuActCopyClick┘ │       │ │   
                                                UpdateVisit┤       │ │   
                                              EditPCEData┤ │       │ │   
                                TfrmSurgery.cmdPCEClick┤ │ │       │ │   
                                    UpdateEncounterInfo┘ │ │       │ │   
                                TfrmNotes.cmdPCEClick┘   │ │       │ │   
                           TfrmVitals.btnEnterVitalsClick┘ │       │ │   
                                                UpdateVisit┤       │ │   
                                           EncounterPresent┘       │ │   
                            TfrmProblems.lstProbActsClick┘         │ │   
                        TfrmProblems.wgProbDataDblClick┤           │ │   
                              TfrmProblems.lstViewClick┘           │ │   
                      TfrmProblems.HighlightDuplicate┘             │ │   
                            TfrmProblems.AddProblem┤               │ │   
                 TfrmProblems.lstProbActsClick...┤ │               │ │   
                    TfrmProblems.lstProbPickClick┤ │               │ │   
                 TfrmProblems.lstProbPickDblClick┤ │               │ │   
                 TfrmProblems.edProbEntKeyPress┘ │ │               │ │   
                         TfrmProblems.UMPLLexicon┘ │               │ │   
                      TfrmdlgProb.bbChangeProbClick┘               │ │   
                              TfrmConsults.mnuActSignatureSignClick┤ │   
                                          TfrmConsults.SaveSignItem┤ │   
                                         TfrmReview.cmdOKClick...┘ │ │   
                                        TfrmSurgery.mnuActSignClick┤ │   
                                           TfrmSurgery.SaveSignItem┤ │   
                                         TfrmReview.cmdOKClick...┘ │ │   
                                          TfrmNotes.mnuActSignClick┤ │   
                                             TfrmNotes.SaveSignItem┘ │   
                                         TfrmReview.cmdOKClick...┘   │   
                                                TfrmDCSumm.DisplayPCE┤   
                                           TfrmDCSumm.lstSummsClick┤ │   
                                         TfrmDCSumm.InsertNewSumm┤ │ │   
                                      TfrmDCSumm.mnuActNewClick┤ │ │ │   
                                   TfrmDCSumm.cmdNewSummClick┘ │ │ │ │   
                               TfrmDCSumm.mnuActAddIDEntryClick┘ │ │ │   
                                        TfrmDCSumm.InsertAddendum┤ │ │   
                                   TfrmDCSumm.mnuActAddendClick┘ │ │ │   
                                           TfrmDCSumm.LoadForEdit┤ │ │   
                                    TfrmDCSumm.InsertNewSumm...┤ │ │ │   
                                     TfrmDCSumm.mnuActEditClick┘ │ │ │   
                                        TfrmDCSumm.SaveEditedSumm┤ │ │   
                                     TfrmDCSumm.SaveCurrentSumm┘ │ │ │   
                                TfrmDCSumm.AllowContextChange┤   │ │ │   
                         TfrmFrame.AllowContextChangeAll...┘ │   │ │ │   
                                   TfrmDCSumm.LstSummsToPrint┤   │ │ │   
                   TfrmFrame.mnuFilePrintSelectedItemsClick┘ │   │ │ │   
                                      TfrmDCSumm.RequestPrint┤   │ │ │   
                                TfrmFrame.mnuFilePrintClick┘ │   │ │ │   
                                  TfrmDCSumm.InsertNewSumm...┤   │ │ │   
                                      TfrmDCSumm.mnuViewClick┤   │ │ │   
                                  TfrmDCSumm.SetViewContext┤ │   │ │ │   
                                   TfrmDCSumm.DisplayPage┤ │ │   │ │ │   
                   TfrmDCSumm.mnuViewReturntoDefaultClick┘ │ │   │ │ │   
                       TfrmDCSumm.mnuViewSaveAsDefaultClick┘ │   │ │ │   
                                      TfrmDCSumm.StartNewEdit┤   │ │ │   
                               TfrmDCSumm.mnuActNewClick...┤ │   │ │ │   
                           TfrmDCSumm.mnuActAddIDEntryClick┤ │   │ │ │   
                               TfrmDCSumm.mnuActAddendClick┤ │   │ │ │   
                                 TfrmDCSumm.mnuActEditClick┘ │   │ │ │   
                     TfrmDCSumm.mnuActDetachFromIDParentClick┤   │ │ │   
                                 TfrmDCSumm.mnuActDeleteClick┤   │ │ │   
                               TfrmDCSumm.SaveEditedSumm...┘ │   │ │ │   
                                   TfrmDCSumm.mnuActSaveClick┤   │ │ │   
                                   TfrmDCSumm.mnuActSignClick┤   │ │ │   
                                   TfrmDCSumm.SaveSignItem...┤   │ │ │   
                                         TfrmDCSumm.FormClose┤   │ │ │   
                    TfrmDCSumm.mnuActIdentifyAddlSignersClick┤   │ │ │   
                        TfrmDCSumm.popSummMemoAddlSignClick┘ │   │ │ │   
                              TfrmDCSumm.ProcessNotifications┤   │ │ │   
                                     TfrmDCSumm.DisplayPage┘ │   │ │ │   
                                 TfrmDCSumm.SetViewContext...┤   │ │ │   
                                   TfrmDCSumm.tvSummsDragDrop┤   │ │ │   
                                  TfrmDCSumm.tvSummsStartDrag┤   │ │ │   
                       TfrmDCSumm.mnuActAttachtoIDParentClick┘   │ │ │   
                                       TfrmDCSumm.mnuActSignClick┤ │ │   
                                       TfrmDCSumm.SaveSignItem...┤ │ │   
                                    TfrmDCSumm.mnuViewDetailClick┤ │ │   
                     TfrmDCSumm.mnuActIdentifyAddlSignersClick...┤ │ │   
                                         TfrmDCSumm.tvSummsChange┤ │ │   
                                   TfrmDCSumm.SaveEditedSumm...┤ │ │ │   
                                     TfrmDCSumm.mnuActSignClick┤ │ │ │   
                             TfrmDCSumm.ProcessNotifications...┤ │ │ │   
                                           TfrmDCSumm.LoadSumms┘ │ │ │   
                                TfrmDCSumm.LstSummsToPrint...┤   │ │ │   
                                   TfrmDCSumm.mnuViewClick...┤   │ │ │   
                                   TfrmDCSumm.StartNewEdit...┤   │ │ │   
                     TfrmDCSumm.mnuActDetachFromIDParentClick┤   │ │ │   
                              TfrmDCSumm.mnuActDeleteClick...┤   │ │ │   
                                   TfrmDCSumm.mnuActSaveClick┤   │ │ │   
                                   TfrmDCSumm.mnuActSignClick┤   │ │ │   
                                   TfrmDCSumm.SaveSignItem...┤   │ │ │   
                 TfrmDCSumm.mnuActIdentifyAddlSignersClick...┤   │ │ │   
                       TfrmDCSumm.mnuActAttachtoIDParentClick┤   │ │ │   
                                   TfrmDCSumm.DoAttachIDChild┘   │ │ │   
                                 TfrmDCSumm.tvSummsDragDrop┤     │ │ │   
                     TfrmDCSumm.mnuActAttachtoIDParentClick┘     │ │ │   
                                     TfrmDCSumm.lvSummsSelectItem┘ │ │   
                                    TfrmDCSumm.tvSummsChange...┘   │ │   
                                             TfrmDCSumm.cmdPCEClick┘ │   
                                          TfrmDCSumm.InsertNewSumm...┤   
                                         TfrmDCSumm.InsertAddendum...┤   
                                            TfrmDCSumm.LoadForEdit...┤   
                                         TfrmConsults.CompleteConsult┤   
                                   TfrmConsults.mnuActCompleteClick┤ │   
                                 TfrmConsults.mnuActAddIDEntryClick┘ │   
                                          TfrmConsults.InsertAddendum┤   
                               TfrmConsults.mnuActMakeAddendumClick┘ │   
                                             TfrmConsults.LoadForEdit┤   
                                   TfrmConsults.mnuActNoteEditClick┘ │   
                                 TfrmConsults.mnuActCompleteClick┘   │   
                                              TfrmConsults.DisplayPCE┤   
                                      TfrmConsults.lstConsultsClick┤ │   
                                    TfrmConsults.tvConsultsChange┘ │ │   
                     TfrmConsults.mnuActDetachFromIDParentClick┤   │ │   
                                       TfrmConsults.NotifyOrder┤   │ │   
                                         TfrmFrame.UMNewOrder┘ │   │ │   
                         TfrmConsults.mnuActDisplayDetailsClick┤   │ │   
                    TfrmConsults.mnuActIdentifyAddlSignersClick┤   │ │   
                        TfrmConsults.popNoteMemoAddlSignClick┘ │   │ │   
                              TfrmConsults.ProcessNotifications┤   │ │   
                                     TfrmConsults.DisplayPage┘ │   │ │   
                                      TfrmConsults.LoadConsults┤   │ │   
                                      TfrmConsults.UpdateList┤ │   │ │   
                                  TfrmConsults.mnuViewClick┤ │ │   │ │   
                              TfrmConsults.SetViewContext┘ │ │ │   │ │   
                               TfrmConsults.DisplayPage┤   │ │ │   │ │   
               TfrmConsults.mnuViewReturntoDefaultClick┘   │ │ │   │ │   
                         TfrmConsults.mnuActNoteDeleteClick┤ │ │   │ │   
                           TfrmConsults.SaveEditedConsult┘ │ │ │   │ │   
                           TfrmConsults.SaveCurrentNote┘   │ │ │   │ │   
                      TfrmConsults.AllowContextChange┤     │ │ │   │ │   
                 TfrmFrame.AllowContextChangeAll...┘ │     │ │ │   │ │   
                       TfrmConsults.SetViewContext...┤     │ │ │   │ │   
                         TfrmConsults.mnuViewClick...┤     │ │ │   │ │   
           TfrmConsults.mnuActDetachFromIDParentClick┤     │ │ │   │ │   
                TfrmConsults.mnuActNoteDeleteClick...┤     │ │ │   │ │   
                TfrmConsults.mnuActSignatureSaveClick┤     │ │ │   │ │   
                TfrmConsults.mnuActSignatureSignClick┤     │ │ │   │ │   
                         TfrmConsults.SaveSignItem...┤     │ │ │   │ │   
                      TfrmConsults.mnuActConsultClick┤     │ │ │   │ │   
                            TfrmConsults.RequestPrint┤     │ │ │   │ │   
                 TfrmConsults.mnuActPrintSF513Click┤ │     │ │ │   │ │   
                        TfrmFrame.mnuFilePrintClick┘ │     │ │ │   │ │   
               TfrmConsults.mnuActDisplayResultsClick┤     │ │ │   │ │   
               TfrmConsults.ProcessNotifications...┘ │     │ │ │   │ │   
                 TfrmConsults.mnuActDisplaySF513Click┤     │ │ │   │ │   
                   TfrmConsults.mnuActPrintSF513Click┤     │ │ │   │ │   
               TfrmConsults.mnuActDisplayDetailsClick┤     │ │ │   │ │   
                               TfrmConsults.FormClose┤     │ │ │   │ │   
       TfrmConsults.mnuActIdentifyAddlSignersClick...┤     │ │ │   │ │   
                 TfrmConsults.ProcessNotifications...┤     │ │ │   │ │   
                    TfrmConsults.mnuActNotePrintClick┤     │ │ │   │ │   
                 TfrmConsults.popNoteMemoPrintClick┘ │     │ │ │   │ │   
                            TfrmConsults.StartNewEdit┤     │ │ │   │ │   
                   TfrmConsults.mnuActCompleteClick┤ │     │ │ │   │ │   
                 TfrmConsults.mnuActAddIDEntryClick┤ │     │ │ │   │ │   
               TfrmConsults.mnuActMakeAddendumClick┤ │     │ │ │   │ │   
                TfrmConsults.mnuActNoteEditClick...┘ │     │ │ │   │ │   
                     TfrmConsults.tvCsltNotesDragDrop┤     │ │ │   │ │   
                    TfrmConsults.tvCsltNotesStartDrag┤     │ │ │   │ │   
             TfrmConsults.mnuActAttachtoIDParentClick┤     │ │ │   │ │   
                      TfrmConsults.LstConsultsToPrint┘     │ │ │   │ │   
           TfrmFrame.mnuFilePrintSelectedItemsClick┘       │ │ │   │ │   
                      TfrmConsults.mnuActSignatureSaveClick┤ │ │   │ │   
                      TfrmConsults.mnuActSignatureSignClick┤ │ │   │ │   
                               TfrmConsults.SaveSignItem...┤ │ │   │ │   
                            TfrmConsults.mnuActConsultClick┤ │ │   │ │   
                                TfrmConsults.NotifyOrder...┤ │ │   │ │   
                                    TfrmConsults.UMNewOrder┤ │ │   │ │   
                             TfrmConsults.ProcessMedResults┘ │ │   │ │   
                        TfrmConsults.mnuActAttachMedClick┤   │ │   │ │   
                        TfrmConsults.mnuActRemoveMedClick┘   │ │   │ │   
                         TfrmConsults.mnuActEditResubmitClick┤ │   │ │   
                          TfrmConsults.cmdEditResubmitClick┘ │ │   │ │   
                           TfrmConsults.LstConsultsToPrint...┘ │   │ │   
                                   TfrmConsults.tvConsultsClick┤   │ │   
                                 TfrmConsults.mnuViewClick...┤ │   │ │   
                   TfrmConsults.mnuActDetachFromIDParentClick┤ │   │ │   
                        TfrmConsults.mnuActNoteDeleteClick...┤ │   │ │   
                        TfrmConsults.mnuActSignatureSaveClick┤ │   │ │   
                        TfrmConsults.mnuActSignatureSignClick┤ │   │ │   
                                 TfrmConsults.SaveSignItem...┤ │   │ │   
                              TfrmConsults.mnuActConsultClick┤ │   │ │   
                      TfrmConsults.mnuActEditResubmitClick...┤ │   │ │   
                                 TfrmConsults.StartNewEdit...┤ │   │ │   
                            TfrmConsults.ProcessMedResults...┤ │   │ │   
                     TfrmConsults.mnuActAttachtoIDParentClick┘ │   │ │   
                                   TfrmConsults.DoAttachIDChild┤   │ │   
                             TfrmConsults.tvCsltNotesDragDrop┤ │   │ │   
                     TfrmConsults.mnuActAttachtoIDParentClick┘ │   │ │   
                                   TfrmConsults.tvConsultsKeyUp┘   │ │   
                                           TfrmConsults.cmdPCEClick┤ │   
                                         TfrmConsults.lstNotesClick┤ │   
                                  TfrmConsults.CompleteConsult...┤ │ │   
                                   TfrmConsults.InsertAddendum...┤ │ │   
                                      TfrmConsults.LoadForEdit...┤ │ │   
                                                      SaveOrAbort┤ │ │   
                              TfrmConsults.SaveEditedConsult...┘ │ │ │   
                                TfrmConsults.SaveEditedConsult...┤ │ │   
                            TfrmConsults.mnuActSignatureSignClick┤ │ │   
                                     TfrmConsults.SaveSignItem...┤ │ │   
                   TfrmConsults.mnuActIdentifyAddlSignersClick...┤ │ │   
                                   TfrmConsults.tvCsltNotesChange┘ │ │   
                              TfrmConsults.SaveEditedConsult...┤   │ │   
                          TfrmConsults.mnuActSignatureSignClick┤   │ │   
                           TfrmConsults.ProcessNotifications...┘   │ │   
                                         TfrmConsults.AssignRemForm┘ │   
                                               ViewRemDlgFromForm┘   │   
                                                     ViewRemDlg┤     │   
                                           ViewReminderDialog┤ │     │   
                             TfrmDrawers.tvRemindersMouseUp┤ │ │     │   
                             TfrmDrawers.RemindersChanged┘ │ │ │     │   
                                TfrmDrawers.ShowDrawers┘   │ │ │     │   
                            TfrmDrawers.CreateDrawers┤     │ │ │     │   
                              TfrmDCSumm.FormCreate┤ │     │ │ │     │   
                            TfrmConsults.FormCreate┤ │     │ │ │     │   
                             TfrmSurgery.FormCreate┤ │     │ │ │     │   
                               TfrmNotes.FormCreate┘ │     │ │ │     │   
                           TfrmDrawers.DisplayDrawers┘     │ │ │     │   
                         TfrmConsults.DisplayPCE...┤       │ │ │     │   
                             TfrmSurgery.DisplayPCE┤       │ │ │     │   
                          TfrmSurgery.cmdPCEClick┤ │       │ │ │     │   
                      TfrmSurgery.tvSurgeryChange┤ │       │ │ │     │   
                     TfrmSurgery.SaveEditedNote┤ │ │       │ │ │     │   
                  TfrmSurgery.SaveCurrentNote┘ │ │ │       │ │ │     │   
             TfrmSurgery.AllowContextChange┤   │ │ │       │ │ │     │   
       TfrmFrame.AllowContextChangeAll...┘ │   │ │ │       │ │ │     │   
                 TfrmSurgery.SetViewContext┤   │ │ │       │ │ │     │   
                  TfrmSurgery.DisplayPage┤ │   │ │ │       │ │ │     │   
  TfrmSurgery.mnuViewReturntoDefaultClick┘ │   │ │ │       │ │ │     │   
                   TfrmSurgery.RequestPrint┤   │ │ │       │ │ │     │   
              TfrmFrame.mnuFilePrintClick┘ │   │ │ │       │ │ │     │   
                   TfrmSurgery.mnuViewClick┤   │ │ │       │ │ │     │   
            TfrmSurgery.SetViewContext...┘ │   │ │ │       │ │ │     │   
                   TfrmSurgery.StartNewEdit┤   │ │ │       │ │ │     │   
               TfrmSurgery.mnuActNewClick┤ │   │ │ │       │ │ │     │   
            TfrmSurgery.cmdNewNoteClick┘ │ │   │ │ │       │ │ │     │   
            TfrmSurgery.mnuActAddendClick┤ │   │ │ │       │ │ │     │   
              TfrmSurgery.mnuActEditClick┘ │   │ │ │       │ │ │     │   
              TfrmSurgery.mnuActDeleteClick┤   │ │ │       │ │ │     │   
            TfrmSurgery.SaveEditedNote...┘ │   │ │ │       │ │ │     │   
                TfrmSurgery.mnuActSaveClick┤   │ │ │       │ │ │     │   
                TfrmSurgery.mnuActSignClick┤   │ │ │       │ │ │     │   
                TfrmSurgery.SaveSignItem...┤   │ │ │       │ │ │     │   
                      TfrmSurgery.FormClose┤   │ │ │       │ │ │     │   
 TfrmSurgery.mnuActIdentifyAddlSignersClick┤   │ │ │       │ │ │     │   
     TfrmSurgery.popNoteMemoAddlSignClick┘ │   │ │ │       │ │ │     │   
           TfrmSurgery.ProcessNotifications┘   │ │ │       │ │ │     │   
                  TfrmSurgery.DisplayPage┘     │ │ │       │ │ │     │   
                    TfrmSurgery.mnuActSignClick┤ │ │       │ │ │     │   
                 TfrmSurgery.mnuViewDetailClick┤ │ │       │ │ │     │   
            TfrmSurgery.ProcessNotifications...┤ │ │       │ │ │     │   
                   TfrmSurgery.LoadSurgeryCases┘ │ │       │ │ │     │   
                  TfrmSurgery.mnuViewClick...┤   │ │       │ │ │     │   
                  TfrmSurgery.StartNewEdit...┤   │ │       │ │ │     │   
             TfrmSurgery.mnuActDeleteClick...┤   │ │       │ │ │     │   
                  TfrmSurgery.mnuActSaveClick┤   │ │       │ │ │     │   
                  TfrmSurgery.mnuActSignClick┤   │ │       │ │ │     │   
                  TfrmSurgery.SaveSignItem...┤   │ │       │ │ │     │   
TfrmSurgery.mnuActIdentifyAddlSignersClick...┘   │ │       │ │ │     │   
                        TfrmSurgery.lstNotesClick┘ │       │ │ │     │   
                      TfrmSurgery.InsertNewNote┤   │       │ │ │     │   
                TfrmSurgery.mnuActNewClick...┘ │   │       │ │ │     │   
                     TfrmSurgery.InsertAddendum┤   │       │ │ │     │   
                TfrmSurgery.mnuActAddendClick┘ │   │       │ │ │     │   
                        TfrmSurgery.LoadForEdit┤   │       │ │ │     │   
                  TfrmSurgery.mnuActEditClick┘ │   │       │ │ │     │   
                  TfrmSurgery.SaveEditedNote...┤   │       │ │ │     │   
                    TfrmSurgery.mnuActSignClick┤   │       │ │ │     │   
                    TfrmSurgery.SaveSignItem...┤   │       │ │ │     │   
  TfrmSurgery.mnuActIdentifyAddlSignersClick...┤   │       │ │ │     │   
                 TfrmSurgery.tvSurgeryChange...┘   │       │ │ │     │   
                               TfrmNotes.DisplayPCE┘       │ │ │     │   
                          TfrmNotes.lstNotesClick┤         │ │ │     │   
                        TfrmNotes.InsertNewNote┤ │         │ │ │     │   
                     TfrmNotes.mnuActNewClick┤ │ │         │ │ │     │   
                  TfrmNotes.cmdNewNoteClick┘ │ │ │         │ │ │     │   
              TfrmNotes.mnuActAddIDEntryClick┘ │ │         │ │ │     │   
                       TfrmNotes.InsertAddendum┤ │         │ │ │     │   
                  TfrmNotes.mnuActAddendClick┘ │ │         │ │ │     │   
                          TfrmNotes.LoadForEdit┤ │         │ │ │     │   
                    TfrmNotes.mnuActEditClick┘ │ │         │ │ │     │   
                       TfrmNotes.SaveEditedNote┤ │         │ │ │     │   
                    TfrmNotes.SaveCurrentNote┘ │ │         │ │ │     │   
               TfrmNotes.AllowContextChange┤   │ │         │ │ │     │   
       TfrmFrame.AllowContextChangeAll...┘ │   │ │         │ │ │     │   
                  TfrmNotes.LstNotesToPrint┤   │ │         │ │ │     │   
 TfrmFrame.mnuFilePrintSelectedItemsClick┘ │   │ │         │ │ │     │   
                     TfrmNotes.RequestPrint┤   │ │         │ │ │     │   
              TfrmFrame.mnuFilePrintClick┘ │   │ │         │ │ │     │   
                     TfrmNotes.mnuViewClick┤   │ │         │ │ │     │   
                 TfrmNotes.SetViewContext┤ │   │ │         │ │ │     │   
                  TfrmNotes.DisplayPage┤ │ │   │ │         │ │ │     │   
  TfrmNotes.mnuViewReturntoDefaultClick┘ │ │   │ │         │ │ │     │   
      TfrmNotes.mnuViewSaveAsDefaultClick┘ │   │ │         │ │ │     │   
                     TfrmNotes.StartNewEdit┤   │ │         │ │ │     │   
              TfrmNotes.mnuActNewClick...┤ │   │ │         │ │ │     │   
          TfrmNotes.mnuActAddIDEntryClick┤ │   │ │         │ │ │     │   
              TfrmNotes.mnuActAddendClick┤ │   │ │         │ │ │     │   
                TfrmNotes.mnuActEditClick┘ │   │ │         │ │ │     │   
    TfrmNotes.mnuActDetachFromIDParentClick┤   │ │         │ │ │     │   
                TfrmNotes.mnuActDeleteClick┤   │ │         │ │ │     │   
              TfrmNotes.SaveEditedNote...┘ │   │ │         │ │ │     │   
                  TfrmNotes.mnuActSaveClick┤   │ │         │ │ │     │   
                  TfrmNotes.mnuActSignClick┤   │ │         │ │ │     │   
                  TfrmNotes.SaveSignItem...┤   │ │         │ │ │     │   
                        TfrmNotes.FormClose┤   │ │         │ │ │     │   
   TfrmNotes.mnuActIdentifyAddlSignersClick┤   │ │         │ │ │     │   
       TfrmNotes.popNoteMemoAddlSignClick┘ │   │ │         │ │ │     │   
             TfrmNotes.ProcessNotifications┤   │ │         │ │ │     │   
                    TfrmNotes.DisplayPage┘ │   │ │         │ │ │     │   
                TfrmNotes.SetViewContext...┤   │ │         │ │ │     │   
                  TfrmNotes.tvNotesDragDrop┤   │ │         │ │ │     │   
      TfrmNotes.mnuActAttachtoIDParentClick┘   │ │         │ │ │     │   
                      TfrmNotes.mnuActSignClick┤ │         │ │ │     │   
                      TfrmNotes.SaveSignItem...┤ │         │ │ │     │   
                   TfrmNotes.mnuViewDetailClick┤ │         │ │ │     │   
    TfrmNotes.mnuActIdentifyAddlSignersClick...┤ │         │ │ │     │   
                        TfrmNotes.tvNotesChange┤ │         │ │ │     │   
                  TfrmNotes.SaveEditedNote...┤ │ │         │ │ │     │   
                    TfrmNotes.mnuActSignClick┤ │ │         │ │ │     │   
            TfrmNotes.ProcessNotifications...┤ │ │         │ │ │     │   
                          TfrmNotes.LoadNotes┘ │ │         │ │ │     │   
               TfrmNotes.LstNotesToPrint...┤   │ │         │ │ │     │   
                  TfrmNotes.mnuViewClick...┤   │ │         │ │ │     │   
                  TfrmNotes.StartNewEdit...┤   │ │         │ │ │     │   
    TfrmNotes.mnuActDetachFromIDParentClick┤   │ │         │ │ │     │   
             TfrmNotes.mnuActDeleteClick...┤   │ │         │ │ │     │   
                  TfrmNotes.mnuActSaveClick┤   │ │         │ │ │     │   
                  TfrmNotes.mnuActSignClick┤   │ │         │ │ │     │   
                  TfrmNotes.SaveSignItem...┤   │ │         │ │ │     │   
TfrmNotes.mnuActIdentifyAddlSignersClick...┤   │ │         │ │ │     │   
      TfrmNotes.mnuActAttachtoIDParentClick┤   │ │         │ │ │     │   
                  TfrmNotes.DoAttachIDChild┘   │ │         │ │ │     │   
                TfrmNotes.tvNotesDragDrop┤     │ │         │ │ │     │   
    TfrmNotes.mnuActAttachtoIDParentClick┘     │ │         │ │ │     │   
                    TfrmNotes.lvNotesSelectItem┘ │         │ │ │     │   
                   TfrmNotes.tvNotesChange...┘   │         │ │ │     │   
                           UpdateEncounterInfo...┤         │ │ │     │   
                          TfrmNotes.AssignRemForm┘         │ │ │     │   
                          ViewRemDlgFromForm...┘           │ │ │     │   
                             TfrmDrawers.tvRemindersKeyDown┘ │ │     │   
                                   ViewReminderDialogTemplate┘ │     │   
                                     ViewRemDlgTemplateFromForm┘     │   
                              TTemplate.ExecuteReminderDialog┘       │   
                               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┘             │   
                                                       EditPCEData...┤   
                                            TfrmSurgery.DisplayPCE...┤   
                                         TfrmSurgery.InsertNewNote...┤   
                                        TfrmSurgery.InsertAddendum...┤   
                                           TfrmSurgery.LoadForEdit...┤   
                                              TfrmNotes.DisplayPCE...┤   
                                           TfrmNotes.InsertNewNote...┤   
                                          TfrmNotes.InsertAddendum...┤   
                                             TfrmNotes.LoadForEdit...┘   

Calls

Name Declaration Comments
TPCEItem.SetFromString procedure SetFromString(const x: string); virtual; -

Called-By

Name Declaration Comments
TPCEData.PCEForNote procedure PCEForNote(NoteIEN: Integer; EditObj: TPCEData);(* overload; -


Source

1616  procedure TPCEDiag.SetFromString(const x: string);
1617  { sets fields to pieces passed from server:  TYP ^ Code ^ Category ^ Narrative ^ Primary ^ ^ ^ Comment }
1618  begin
1619    inherited SetFromString(x);
1620    OldComment := Comment;
1621    Primary := (Piece(x, U, pnumDiagPrimary) = '1');
1622    //Provider := StrToInt64Def(Piece(x, U, pnumProvider),0);
1623    AddProb := (Piece(x, U, pnumDiagAdd2PL) = '1');
1624  end;