ReadXLotusPropsOutputLevel (NotesCalendar - LotusScript®)

読み書き可能。カレンダーエントリまたは通知を読み取るときの X-LOTUS プロパティの戻りを制御します。

定義位置

NotesCalendar

データ型

Integer

構文

取得する場合: setting% = notesCalendar.ReadXLotusPropsOutputLevel

設定する場合: notesCalendar.ReadXLotusPropsOutputLevel = setting%

使用法

エントリまたは通知を読み取る前に、このオプションを設定するか、デフォルトの CS_XLOTUS_READ_DEFAULT を受け入れてください。

定数名	数値
`CS_XLOTUS_READ_DEFAULT` (0)	プロプラエタリでない `X-LOTUS` プロパティを生成します。読み取り前にこのプロパティを設定していない場合は、これがデフォルトです。
`CS_XLOTUS_READ_NONE` (1)	すべての `X-LOTUS` プロパティを省略します。
`CS_XLOTUS_READ_ALL` (2)	プロプラエタリの `X-LOTUS` プロパティを生成します。呼び出し側は、これらの更新方法を知っている必要があります。

例

このエージェントは、X-LOTUS プロパティのないカレンダーエントリを読み取ります。

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.Readxlotuspropsoutputlevel = Cs_xlotus_read_none
	calstr = cal.Readrange(dt1, dt2)
	Call body.Appendtext(calstr)
	Call doc.Save( True, True )
End Sub

クロスリファレンス

Java™ NotesCalendar クラスの ReadXLotusPropsOutputLevel プロパティ