ISPatient.UsualPayerType

Description

The type of the payer that will pay all or a portion of the patient's invoices.

Syntax

object.UsualPayerType

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

Return Value

TSPayerType

Example

Display the type of the payer that will pay the patient's invoices.

Dim aPatient  
Dim aUsualPayerType

Set aPatient = Profile.SelectPatient
aUsualPayerType = aPatient.UsualPayerType
Profile.MsgBox (aUsualPayerType)
Note:

In Profile Client v8 on User Interface Usual Payer Type can be found in Patient > Alter Patient > Financial > Payer field.

Version information

Added in v7.8.0
return type changed from int to TSPayerType in v8.3.0
Parent topic: ISPatient