ISLetterWorkParams.FromPosID

Description

ID of POS the letter is sent from.

Syntax

object.FromPosID

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

Return Value

int

Example

Print the letter for the selected patient and display the printing result.

Dim aPatient 
Dim aParam
Dim aResult
Dim aCurrentPOSId

Set aPatient = Profile.SelectPatient
aCurrentPOSId = Profile.CurrentPOSId 
set aParam = Profile.CreateLetterWorkParams
aParam.PatientId = aPatient.Id
aParam.Template = "All Categories\Template 1"
aParam.FromPosID = aCurrentPOSId

aResult = Profile.GenerateAndPrintLetter(aParam)

Profile.MsgBox("Letter printing result: " & aResult)

Note:

In Profile Client v8 on User Interface POS ID cannot be found.

Version information

Added in v7.8.0