ISPatientCards.Count

Description

The number of the patient's cards, that entitle to a special rate or discount.

Syntax

object.Count

Part	Attribute	Type	Description
`object`	Required	ISPatientCards	The `object` always implements the ISPatientCards interface

Restriction: This property is readonly.

Return Value

int

Example

Display the number of the patient's cards.

Dim aPatient  
Dim aCards
Dim aCard
Dim aMessage

Set aPatient = Profile.SelectPatient 
set aCards = aPatient.Cards
aMessage = "Cards Count = " & aCards.Count

Profile.MsgBox(aMessage)

Note:

In Profile Client v8 on User Interface Cards can be found in Patient > Alter Patient > Financial > Health Plans and Cards.

Version information

Added in v7.8.0