ISProfile.NewPatient

Description

This function adds a new patient.

Syntax

object.NewPatient()

Part	Attribute	Type	Description
`object`	Required	ISProfile	The `object` always implements the ISProfile interface

Return Value

ISPatient

Returns the added patient.

Example

Add a new patient and display his/her name, surname and ID.

Dim aNewPatient

Set aNewPatient = Profile.NewPatient
aNewPatient.LastName = "Lana" 
aNewPatient.FirstName = "Banana"
aNewPatient.DOB = #02/02/1992#
aNewPatient.Save

Profile.MsgBox(aNewPatient.Lastname & " " & aNewPatient.FirstName & vbNewLine &_
  aNewPatient.ID)

Note:

In Profile Client v8 on User Interface New Patient can be added in Patient > New Patient.

Version information

Added in v7.8.0