ISPatient.EmbeddedFormCount

Description

The number of the patient's custom forms, embedded into Patient Centre.

Syntax

object.EmbeddedFormCount

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

Restriction: This property is readonly.

Return Value

int

Example

Display the number of the patient's embedded forms.

Dim aPatient  
Dim aEmbeddedFormCount

Set aPatient = Profile.SelectPatient
aEmbeddedFormCount = aPatient.EmbeddedFormCount
Profile.MsgBox (aEmbeddedFormCount)

Note:

In Profile Client v8 on User Interface Embedded Forms can be added in Organisation > Preferences > Patient > Formsand can be found in Patient > Alter Patient > Custom.

Version information

Added in v7.8.0