Returns True if the intervention template is to be due at a specific time after the due date.
object.DateOffsetFlag
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISCareVisit interface |
bool
Display DateOffsetFlag for the intervention template.
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 & "Date Offset Flag " &_
"for the intervention template '" & aVisit.Description &_
"'" & " = " & aVisit.DateOffsetFlag
next
end if
Profile.MsgBox (aMessage)
In Profile Client v8 on User Interface the Offset by checkbox can be checked in
.