ISPatient.SmokerTypeStr

Description

The description of the short code of type 'Substance Smoker'.

Syntax

object.SmokerTypeStr

Part Attribute Type Description
object Required
ISPatient
The object always implements the ISPatient interface
Restriction: This property is readonly.

Return Value

string

Example

Display the patient's smoker type.

Dim aPatient  
Dim aSmokerTypeStr

Set aPatient = Profile.SelectPatient
aSmokerTypeStr = aPatient.SmokerTypeStr
Profile.MsgBox ("Smoker Type: " & aSmokerTypeStr)
Note:

In Profile Client v8 on User Interface Smoker Type can be found in Clinical > Clinical Details > Family > Social History > Smoker field.

Version information

Added in v7.8.0
Parent topic: ISPatient