The number of the patient's due interventions.
object.Due
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISPatientRecallVisitsSet interface |
Display the number of the patient's due interventions.
sub main
Dim aPatient
Dim aRecallVisitsSet
Dim aDueVisits
Dim aMessage
Set aPatient = Profile.SelectPatient
set aRecallVisitsSet = aPatient.RecallVisits
set aDueVisits = aRecallVisitsSet.Due
aMessage = "The number of the patient's due interventions is " &_
aDueVisits.Count
Profile.MsgBox(aMessage)
end sub
In Profile Client v8 on User Interface Due can be found in
or .