ISRx.Identifier

Description

The identifier of the Rx item. The property value is equal to the value of the 'Identification Number' property.

Syntax

object.Identifier

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

Restriction: This property is readonly.

Return Value

string

Example

Display some information about the Rx items loaded on the basis of the selected filter, including their identifiers.

Dim aFilter
Dim aRx, aRxCollection
Dim i
Dim aMessage

Set aFilter = Profile.CreateRxFilter
aFilter.RxName = "Pentasa"
aFilter.RxNameSearchMode = 1 'rnsmStartsWith
aFilter.IncludeChemicals = True
aFilter.IncludeGroups = True
aFilter.IncludePackages = True
aFilter.IncludePreparations = True 
set aRxCollection = Profile.LoadRxCollection(aFilter)

aMessage = "Rx Items Count = " & aRxCollection.Count & vbNewLine  
  
for i = 0 to aRxCollection.Count - 1
  set aRx = aRxCollection.Item(i)
  aMessage = aMessage & vbNewLine & (i + 1) & ") " & aRx.Name & vbNewLine &_
    "-Identifier: " & aRx.Identifier  
next      

Profile.MsgBox(aMessage)

Note: This property is specific for Canada.

Version information

Added in v7.8.0