ISPatientUtils.GetDNACount

Description

This function returns the number of the appointments that the selected patient did not attend.

Syntax

object.GetDNACount(aPatient, aFromDate)

Part Attribute Type Description
object Required
The object always implements the ISPatientUtils interface
aPatient In, Required
The patient
aFromDate In, Required
DateTime
The date the appointment state is being checked from

Return Value

int

Returns the number of the appointments that the selected patient did not attend.

Example

Display the number of the appointments that the selected patient did not attend.

Dim aPatient
Dim aFromDate
Dim aDNACount
Dim aMessage

Set aPatient = Profile.SelectPatient
aFromDate = #01/01/2014#
aDNACount = Profile.PatientUtils.GetDNACount(aPatient, aFromDate)
aMessage = "The number of DNA for " & aPatient.SurNameFirstName & " is " & aDNACount  

Profile.MsgBox(aMessage) 
Note: The appointment is considered a 'Did not attend' if the 'Did not attend' checkbox is checked in Appointment window/Appointment tab/Appointment flags panel or if a time interval after which an appointment gets the status 'did not attend' is entered in Organisation/Preferences/Appointment/Arrival tab/ Patient did not attend for.

In Profile Client v8 on User Interface DNA can be found in Appointment Window > Booking > Status field.

See also

Version information

Added in v7.8.0