ISPatient.SmokerPackYear

Description

The number of years the patient has smoked multiplied by the average number of packs per day.

Syntax

object.SmokerPackYear

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

Return Value

int

Example

Display the number of packs the patient smokes per year.

Dim aPatient  
Dim aSmokerPackYear

Set aPatient = Profile.SelectPatient
aSmokerPackYear = aPatient.SmokerPackYear
Profile.MsgBox (aSmokerPackYear)   
Note: The field is enabled if either "Smoker" or "Ex-smoker" is selected.

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

Version information

Added in v7.8.0