ISAppointment.IsPatientCancelled

Description

Returns True if the appointment is cancelled by the patient through Accession.

Syntax

object.IsPatientCancelled

Part Attribute Type Description
object Required
The object always implements the ISAppointment interface

Return Value

bool

Example

Display IsPatientCancelled for the appointment.

Dim aPatient
Dim aProvider
Dim aFilter 
Dim aAppointments
Dim aFirstAppointment
Dim aIsPatientCancelled

Set aPatient = Profile.SelectPatient
set aProvider = Profile.LoadProvider("PROV")
set aFilter = Profile.CreateAppointmentFilter

aFilter.ProviderID = aProvider.Id
aFilter.PatientId = aPatient.Id
aFilter.DateFrom = #01/01/2018#
aFilter.DateTo = #01/01/2019#

set aAppointments = Profile.LoadAppointments(aFilter)

if aAppointments.Count > 0 then
  set aFirstAppointment = aAppointments.Item(0)
  aFirstAppointment.IsPatientCancelled = True
  aFirstAppointment.IsCancelled = true
  aFirstAppointment.Save
  Profile.MsgBox(aFirstAppointment.IsPatientCancelled)
else
  Profile.MsgBox("aAppointments.Count = 0")
end if  
Note:

In Profile Client v8 on User Interface of Accession the appointment can be cancelled with the Cancel button in Appointments Window.

Version information

Added in v8.2.0