ISCareVisit.RepeatAmount

Description

The periodicity of the intervention template within the care plan.

Syntax

object.RepeatAmount

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

Return Value

int

Example

Display the periodicity of the intervention template within the care plan.

Dim aCarePlan
Dim aMessage
Dim aVisits
Dim aVisit

set aCarePlan = Profile.LoadCarePlanByCode ("FLU") 

set aVisits = aCarePlan.Visits

if aVisits.Count = 0 then
  aMessage = aMessage & vbNewLine & "There are no care visits!"
else
  
  for i = 0 to aVisits.Count - 1
   set aVisit = aVisits.Item(i)
    aMessage = aMessage & vbNewLine & "The periodicity of the " &_
    "intervention template '" &_
    aVisit.Description & "'" & " is "  & aVisit.RepeatAmount  
  next
end if       
   
Profile.MsgBox (aMessage)

Note:

In Profile Client v8 on User Interface Repeat Amount can be found in Maintain > Care Plans > Open Plan > Interventions > Alter Intervention > Repeat > Periodicity fields.

Version information

Added in v7.8.0