ISLetter.Template

Description

The template of the letter.

Syntax

object.Template

Part Attribute Type Description
object Required
The object always implements the ISLetter interface
Restriction: This property is readonly.

Return Value

ISLetterTemplate

Example

Display some information about the letter, including the subject and ID of its template.

Dim aPatient
Dim aLetters, aLetter
Dim i
Dim aLetterTemplate
Dim aMessage

Set aPatient = Profile.SelectPatient
set aLetters = aPatient.GetLetters (1) ' slcfWordRTF

aMessage =_
  "The number of the letters of the selected format is " & aLetters.Count

for i = 0 to aLetters.Count - 1
  set aLetter = aLetters.Item(i)
  
set aLetterTemplate = aLetter.Template
aMessage = aMessage & vbNewLine &_
    "Letter Date: " & aLetter.Date & vbNewLine &_
    "Letter Subject: " & aLetter.Subject2 & vbNewLine &_
    "Letter ID: " & aLetter.ID & vbNewLine &_
    "Letter Template ID: " & aLetterTemplate.ID & vbNewLine &_
    "Letter Template Subject: " & aLetterTemplate.Subject & vbNewLine
next    
Profile.MsgBox (aMessage)  
Note:

In Profile Client v8 on User Interface Template can be found in Clinical > Medical Record > Documents > Open saved document > Information and Recipients > Template or in Organisation > Work Centre > Communication > Letters > Open saved document > Information and Recipients > Template.

Version information

Added in v7.8.0