This function checks if the patient has the selected provider in the care team.
object.HasProviderInCareTeam(aProvider)
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISPatient interface |
|
aProvider |
In, Required | The provider to check |
bool
Display HasProviderInCareTeam for the patient.
Dim aPatient
Dim aProviderInCareTeam
Dim aProvider
Set aPatient = Profile.SelectPatient
set aProvider = Profile.LoadProvider("GG")
aProviderInCareTeam = aPatient.HasProviderInCareTeam(aProvider)
Profile.MsgBox (aProviderInCareTeam)
In Profile Client v8 on User Interface Care Team can be found in
or in .