Examples: IsCategory property (NotesViewColumn - LotusScript®)

This agent checks whether the first column in the By Category view of the DENMARK.NSF database is categorized.

Sub Initialize
  Dim db As New NotesDatabase( "", "denmark.nsf" )
  Dim view As NotesView
  Dim column As NotesViewColumn
  Set view = db.GetView( "By Category" )
  Set column = view.Columns( 0 )
  If column.IsCategory Then
    Messagebox( "First column is categorized." )
  Else
    Messagebox( "First column isn't categorized." )
  End If
End Sub