ISPatient.SetOrgNodeByName

Description

This function sets the organisational node for the patient by its name.

Syntax

object.SetOrgNodeByName aValue, aNodeType = "BUNIT"

Part	Attribute	Type	Description
`object`	Required	ISPatient	The `object` always implements the ISPatient interface
`aValue`	In, Required	string	The name of the node
`aNodeType`	In, Required Default value is "BUNIT"	string	The type of the node

Example

Set the organisational node for the patient by its name.

Dim aPatient  
Dim aValue
Dim aNodeType

Set aPatient = Profile.SelectPatient
aValue = "Business Unit X"
aNodeType = "BUNIT"
aPatient.SetOrgNodeByName aValue, aNodeType  
aPatient.Save
Profile.MsgBox("The organisational node was set successfully!")

Note:

In Profile Client v8 on User Interface Organisational Node can be set in Patient > Alter Patient > Organisation > Organisation field.

Version information

Added in v7.8.0