ISPatient.OccupationDescription

Description

The patient's occupation short code description.

Syntax

object.OccupationDescription

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

Return Value

string

Example

Display the patient's occupation short code description.

Dim aPatient  
Dim aOccupationDescription  

Set aPatient = Profile.SelectPatient
aOccupationDescription = aPatient.OccupationDescription
Profile.MsgBox (aOccupationDescription)
Note: On User Interface the patient's occupation description will be automatically populated from the selected occupation code, however it can be altered or replaced as free text if necessary.

In Profile Client v8 on User Interface Occupation Description can be found in Patient > Alter Patient > Social > Occupation Descr field or in Clinical > Clinical Details > Family > Social History > Occupation field.

Version information

Added in v7.8.0
Parent topic: ISPatient