ISCmiDetail.Description

Description

The description of Consumer medicine information.

Syntax

object.Description

Part Attribute Type Description
object Required
The object always implements the ISCmiDetail interface
Restriction: This property is readonly.

Return Value

string

Example

Display Cmi details and their descriptions for the Rx items loaded on the basis of the selected filter.

Dim aFilter
Dim aRx, aRxCollection
Dim i, j
Dim aCmiDetail
Dim aMessage

Set aFilter = Profile.CreateRxFilter
aFilter.RxName = "Pendine"
set aRxCollection = Profile.LoadRxCollection(aFilter)

aMessage = "Rx Items Count = " & aRxCollection.Count &_
  vbNewLine & vbNewLine & "#  As String"

for i = 0 to aRxCollection.Count - 1
  set aRx = aRxCollection.Item(i)
  aMessage = aMessage & vbNewLine & (i + 1) & ") " & aRx.AsString 
   
  for j = 0 to aRx.CmiDetailCount - 1
    set aCmiDetail = aRx.CmiDetail(j) 
    aMessage = aMessage & vbNewLine & vbTab & (i + 1) & "." & (j + 1) & " " &_
      "Cmi Details Count = " & aRx.CmiDetailCount & "; Cmi Detail Description: " &_
      aCmiDetail.Description  
  next 'j 
next 'i      

Profile.MsgBox(aMessage)   
Note:

In Profile Client v8 on User Interface Description cannot be found, but Cmi details can be found in Maintain > Formulary > Rx > Show Consumer medicine information, in Clinical > Medical Record > New Encounter > Scripts > Usual Scrips tab > Show Consumer medicine information or in Clinical > New Encounter > Scripts > Usual Scrips tab > Show Consumer medicine information.

Version information

Added in v7.8.0