ISProfile.OpenCase

Description

This function returns the case with the specified ID.

Syntax

object.OpenCase(aCaseID)

Part	Attribute	Type	Description
`object`	Required	ISProfile	The `object` always implements the ISProfile interface
`aCaseID`	In, Required	int	ID of the case

Return Value

ISCase

Returns the case with the specified ID.

Example

Display the title of the case.

Dim aCase
Dim aResult

aResult = Profile.Lookup_PatientCaseSearch(aPatientId, aCaseId, _
  "Select Case for search", true)
  
if not aResult then exit sub 
Set aCase = Profile.OpenCase(aCaseID)

Profile.MsgBox (aCase.CaseTitle)

Note:

In Profile Client v8 on User Interface Cases can be found in Clinical > Medical Record > Cases.

Version information

Added in v7.8.0