Returns S (Skip) if the patient already has a particular care plan, otherwise returns W (Warn) to inform the patient that this care plan has already been assigned.
object.Clash
| Part | Attribute | Type | Description |
|---|---|---|---|
object |
Required | The object always implements the
ISCareVisit interface |
string
Display S if the patient already has a particular care plan, otherwise display W to inform the patient that this care plan has already been assigned.
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 clash " &_
"for the intervention template '" &_
aVisit.Description & "'" & " is " & aVisit.Clash
next
end if
Profile.MsgBox (aMessage) In Profile Client v8 on User Interface the Skip radio button and the Warn radio button can be selected in .
int to string in v8.5.0