ISProfileForm.TemplateContactCode

Description

The property defines the diagnosis code that will be used in the contact for the CEF form.

Syntax

object.TemplateContactCode

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

Return Value

string

Example

Display some information about the predefined contact properties of the CEF form.

Dim aForm
Dim aFormInfo

Set aForm = Profile.Form
aFormInfo =_
  "Short Name: " & aForm.ShortName & vbNewLine &_
  "TypeName: " & aForm.TypeName & vbNewLine &_   
  "Template Contact Code: " & aForm.TemplateContactCode & vbNewLine &_   
  "Template Contact Description: " & aForm.TemplateContactDescription

Profile.MsgBox(aFormInfo)

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

Template Contact Code cannot be found in the Object Inspector. In Profile Client v8 on User Interface Diagnosis Code can be found in Clinical > Medical Record > Encounters > Open encounter > Contact properties > Diagnosis field.

Version information

Added in v7.8.0