This function returns True if the selected patient does not meet the criteria set in the Sex and (or) Age fields of the specified intervention template.
object.CanBeIgnored(PatientId)
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISCareVisit interface |
|
PatientId |
In, Required | int |
ID of the patient |
bool
Display CanBeIgnored for the intervention template.
Dim aCarePlan
Dim aMessage
Dim aVisits
Dim aVisit
Dim aCanBeIgnored
Set aCarePlan = Profile.LoadCarePlanByCode ("FLU")
set aPatient = Profile.SelectPatient
set aVisits = aCarePlan.Visits
if aVisits.Count = 0 then
Profile.MsgBox("There are no care visits!")
exit sub
end if
for i = 0 to aVisits.Count - 1
set aVisit = aVisits.Item(i)
aMessage = aMessage & vbNewLine & "Intervention: " & aVisit.Description
aCanBeIgnored = aVisit.CanBeIgnored(aPatient.Id)
aMessage = aMessage & vbNewLine & "Can be ignored: " & aCanBeIgnored
next 'i
Profile.MsgBox (aMessage)
In Profile Client v8 on User Interface Can Be Ignored cannot be found.