ISPatient.PracticeDr

Description

The patient's main practice provider.

Syntax

object.PracticeDr

Part Attribute Type Description
object Required
The object always implements the ISPatient interface

Return Value

ISProvider

Example

Display full name of the patient's main practice provider.

Dim aPatient  
Dim aPracticeDr

Set aPatient = Profile.SelectPatient
aPracticeDr = aPatient.PracticeDr.FullName
Profile.MsgBox (aPracticeDr)    
Note:

In Profile Client v8 on User Interface Practice Dr. can be found in Patient > Alter Patient > General > Provider field.

Version information

Added in v7.8.0