ReadRangeMask2 (NotesCalendar - LotusScript®)

Read-write. Mask that controls the optional property display for a readRange operation.

Defined in

NotesCalendar

Data type

Long

Syntax

To get: mask& = notesCalendar.ReadRangeMask2

To set: notesCalendar.ReadRangeMask2 = mask&

Usage

Before calling readRange, set this mask to designate the properties that you want returned. By default, no properties are returned.
The following table specifies the bit values. Combine values by adding them.
Table 1. Bit values for ReadRangeMask2
Constant name Numerical value
CS_READ_RANGE_MASK_HASATTACH 1
CS_READ_RANGE_MASK_UNID 2

Examples

This agent gets limited calendar and scheduling information for the current user for today and tomorrow.
Sub Initialize
	Dim session As New NotesSession
	Dim maildb As New NotesDatabase("", "")
	Dim cal As NotesCalendar
	Dim dt1 As NotesDateTime
	Dim dt2 As NotesDateTime
	Dim calstr As String
	Dim db As NotesDatabase
	Dim doc As NotesDocument
	Dim body As NotesRichTextItem
	REM Get calendar for current user
	Call maildb.Openmail()
	Set cal = session.getCalendar(maildb)
	Set dt1 = session.createdatetime("Today 08")
	Set dt2 = session.Createdatetime("Tomorrow 17")
	REM Create document to post results
	Set db = session.CurrentDatabase
	Set doc = db.CreateDocument
	doc.Form = "main"
	doc.Subject = "Today and tomorrow"
	Set body = doc.Createrichtextitem("body")
	REM Read and put in body of document
	cal.Readrangemask2 = Cs_read_range_mask_hasattach + Cs_read_range_mask_unid
	calstr = cal.Readrange(dt1, dt2)
	Call body.Appendtext(calstr)
	Call doc.Save( True, True )
End Sub