This function opens case form.
object.OpenCaseForm
aCaseID
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISProfile interface |
|
aCaseID |
In, Required | int |
ID of the case |
Display the case window.
Dim aResult
Dim aPatientId
Dim aCaseId
aResult = Profile.Lookup_PatientCaseSearch(aPatientId, aCaseId, _
"Select Case for search", true)
if not aResult then exit sub
Profile.OpenCaseForm(aCaseId)
In Profile Client v8 on User Interface Cases can be found in
.