ISPatient.NOKPhone

Description

The telephone number of the next of kin.

Syntax

object.NOKPhone

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

Return Value

string

Example

Display the telephone number of the next of kin.

Dim aPatient  
Dim aNOKPhone 

Set aPatient = Profile.SelectPatient
aNOKPhone = aPatient.NOKPhone
Profile.MsgBox (aNOKPhone)  
Note: If a valid NOK filenum is specified, then this will be obtained from the NOK patient record, contained within Profile. Otherwise, it is the free-form edited text from the correct fields.

In Profile Client v8 on User Interface NOK Phone can be found in Patient > Alter Patient > Family > NOK Phone field.

Version information

Added in v7.8.0