ISAddress.DateFrom

Description

The date and time the patient's additional address is valid from.

Syntax

object.DateFrom

Part	Attribute	Type	Description
`object`	Required	ISAddress	The `object` always implements the ISAddress interface

Return Value

DateTime

Example

Display the date and time the patient's additional address is valid from.

Dim aPatient  
Dim aAddresses
Dim aAddress
Dim aDateFrom
Dim aMessage   

Set aPatient = Profile.SelectPatient 

set aAddresses = aPatient.LoadAddresses
aMessage = "Addresses Count = " & aAddresses.Count

for i = 0 to aAddresses.Count - 1
  set aAddress = aAddresses.Item(i)
  aMessage = aMessage & vbNewLine
  aMessage = aMessage & "From " & aAddress.DateFrom 
next 

Profile.MsgBox (aMessage)

Note:

In Profile Client v8 on User Interface Date From can be found in Patient > Alter Patient > Personal > Additional Addresses > Date From field.

Version information

Added in v7.10.110