ISPatientRecallVisit.RepeatStartDate

Description

The start date for the intervention, after which it should be repeated.

Syntax

object.RepeatStartDate

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

Return Value

DateTime

Example

Display the start date for the intervention, after which it should be repeated.

sub main()
   Dim aPatient, aRecallVisits, aMessage
     
   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
    info = info & vbNewLine & "The start date for the intervention '" &_
    aVisit.Description & "'" & ", after which it should " &_
    " be repeated = " & aVisit.RepeatStartDate
             
  next
  GetVisitCollectionInfo = info &  vbNewLine
end function

Note:

In Profile Client v8 on User Interface Repeat Start Date can be found in Clinical > Medical Record > Care Plans > Open active object(s) > Intervention fields.

Version information

Added in v7.8.0