ISPatientVers.SurnameFirstName

Description

A composite of the patient's names in the selected patient version, returned in the format "Last name, First name".

Syntax

object.SurnameFirstName

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

Restriction: This property is readonly.

Return Value

string

Example

Display the patient's names in the selected patient version in the format "Last name, First name".

Dim aPatient  
Dim aPatientVers
Dim aMessage  

Set aPatient = Profile.SelectPatient
set aPatientVers = aPatient.VersionOnDate(#01/01/2019#)

if aPatientVers is nothing then
  aMessage = "There are no patient versions for this date!"
    
else 

  aMessage = aMessage & vbNewLine &_  
   "On 01/01/2019 the surname and the first name of the patient were " &_ 
   aPatientVers.SurnameFirstName & ", now the surname and the first name " &_ 
    "of the patient are " & aPatient.SurnameFirstName
  
end if

Profile.MsgBox(aMessage)

Note:

In Profile Client v8 on User Interface Last Name can be found in Patient > Alter Patient > General > Show Versions > Last Name field, First Name can be found in Patient > Alter Patient > General > Show Versions > First Names field.

Version information

Added in v7.8.0