ISPatientRecallVisit.GUID

Description

Globally Unique Identifier of the patient's intervention.

Syntax

object.GUID

Part	Attribute	Type	Description
`object`	Required	ISPatientRecallVisit	The `object` always implements the ISPatientRecallVisit interface

Return Value

string

Example

Display Globally Unique ID of the patient's intervention.

sub main()
   Dim aPatient 
   Dim aRecallPlans 
   Dim aMessage
   Dim aPlan
     
   Set aPatient = Profile.SelectPatient
   set aRecallPlans = aPatient.RecallPlans
   
   for each aPlan in aRecallPlans
     aMessage = aMessage & GetVisitCollectionInfo(aPlan.Visits)
   next

  Profile.MsgBox(aMessage)
end sub

function GetVisitCollectionInfo(aVisits)
    
  for each aVisit in aVisits 
    set aPlan = aVisit.ParentPlan
    info = info & vbNewLine & aVisit.Description & "   " &_
       ": GUID = " & aVisit.GUID
  next
  GetVisitCollectionInfo = info
end function

Note:

In Profile Client v8 on User Interface GUID cannot be found.

Version information

Added in v7.8.0