Example: Getting the position of a view entry

This example will display the position of the view entry in the view hierarchy.

Sub Initialize
  Dim  NotesSession
  Dim db As NotesDatabase
  Dim view As NotesView
  Dim entry As NotesViewEntry
  Set db = session.CurrentDatabase
  Set view = db.GetView("By Category")
  Set entry = view.GetEntryByKey("Employees")
  Messagebox entry.GetPosition("1988")
End Sub