ISProfileForm.GetParentForm

Description

This function returns the form itself.

Syntax

object.GetParentForm( [aFormTypeName])

Part	Attribute	Type	Description
`object`	Required	ISProfileForm	The `object` always implements the ISProfileForm interface
`aFormTypeName`	Optional	string	The name of the form type

Return Value

ISProfileForm

Returns the form itself.

Example

Display the short name of the form itself.

Dim aForm
Dim aFormParent
Dim aFormInfo

Set aForm = Profile.Form 
set aFormParent = aForm.GetParentForm("TIVisualForm")
aFormInfo = "Form: " & aForm.ShortName 

Profile.MsgBox(aFormInfo)

Note: This macro should be executed in any event handler of the form control.

In Profile Client v8 on User Interface Parent Form can be found in Maintain > Templates > Health Record Collection Templates > Open the selected form template > Open form editor > Object Inspector.

Version information

Added in v7.8.0