ISPatient.EmbeddedForms

Description

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

Syntax

object.EmbeddedForms(aIndex)

Part	Attribute	Type	Description
`object`	Required	ISPatient	The `object` always implements the ISPatient interface
`aIndex`	In, Required	int	The index of the embedded form.

Restriction: This property is readonly.

Return Value

ISHRC

Example

Display the name of the first patient's embedded form.

Dim aPatient  
Dim aEmbeddedForms

Set aPatient = Profile.SelectPatient
aEmbeddedForms = aPatient.EmbeddedForms(0).Name
Profile.MsgBox (aEmbeddedForms)

Note:

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

Version information

Added in v7.8.0