ISPatient.WorkName

Description

The name of the patient's place of work.

Syntax

object.WorkName

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

Return Value

string

Example

Display the name of the patient's place of work.

Dim aPatient  
Dim aWorkName   

Set aPatient = Profile.SelectPatient
aWorkName = aPatient.WorkName
Profile.MsgBox (aWorkName)
Note:

In Profile Client v8 on User Interface Work Name can be found in Patient > Alter Patient > Social > Work Name field.

Version information

Added in v7.8.0
Parent topic: ISPatient