ISCareVisit.DateOffsetAmount

Description

The specified number of days (weeks, months, years) after which the intervention template status is to be set 'Due'.

Syntax

object.DateOffsetAmount

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

Return Value

int

Example

Display the specified number of days (weeks, months, years) after which the intervention template status is to be set 'Due'.

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 & "ID of the service " &_
    "the intervention template '" & aVisit.Description &_
    "'" & " is associated with = "  & aVisit.DateOffsetAmount
  next

end if       
   
Profile.MsgBox (aMessage)   
Note:

In Profile Client v8 on User Interface Date Offset Amount can be found in Maintain > Care Plans > Open Plan > Interventions > Alter Intervention > date > Offset by field.

Version information

Added in v7.8.0