The code of the provider in whose name the letter is sent.
object.ProviderCode
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISLetter interface |
string
Display some information about the letter, including the code of the provider in whose name the letter is sent.
Dim aPatient
Dim aLetters, aLetter
Dim i
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)
aMessage = aMessage & vbNewLine &_
"Letter Date: " & aLetter.Date & vbNewLine &_
"Letter Subject: " & aLetter.Subject2 & vbNewLine &_
"The code of the provider in whose name the letter is sent: " &_
aLetter.ProviderCode & vbNewLine
next
Profile.MsgBox (aMessage)
In Profile Client v8 on User Interface Provider Code can be found in
or in .