ISLetterWorkParams.CaseID

Description

ID of the case the letter relates to.

Syntax

object.CaseID

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 aCaseId
Dim aPatientId
Dim aSelectPatientResult, aPrintingResult 
Dim aParam

aSelectPatientResult = Profile.Lookup_PatientCaseSearch(aPatientId, aCaseId, _
  "Select Case for search", true)
  
if not aSelectPatientResult then exit sub 

Set aParam = Profile.CreateLetterWorkParams
aParam.Template = "All Categories\Template 1"
aParam.PatientId = aPatientId
aParam.CaseID = aCaseId 

aPrintingResult = Profile.GenerateAndPrintLetter(aParam)

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

Note:

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

Version information

Added in v7.8.0