The number of the patient's documents.
object.Count
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISPatientDocuments interface |
int
Display the number of the patient's documents.
Dim aPatient
Dim aFilter
Dim aDocuments
Dim aDocument
Dim aMessage
Set aPatient = Profile.SelectPatient
set aFilter = Profile.CreatePatientDocumentFilter
aFilter.PatientId = aPatient.ID
set aDocuments = Profile.LoadPatientDocuments(aFilter)
aMessage = "Documents Count = " & aDocuments.Count
Profile.MsgBox(aMessage)
In Profile Client v8 on User Interface Documents can be found in
.