' $System.Access Read Schedule $Office.Name - Confirming Schedule ' $BackPage = $BPage ' $BackDate = $BDate $Date.Day $Date.MONTH, $Date.Year

' If $PrivatedDenied No Right to Browse this Schedule.

' Else Confirming Schedule
$User.Name's ' If $e.Private Private ' Else ' If $Shared Multiple-Member Assignment ' EndIf ' If $e.Regular Repeat ' EndIf ' EndIf Schedule $_User.Mail.MailTo $Tail

' If (! $SharedDenied and ! $Denied) or ! $Login [Modify or Delete] ' EndIf ' If $e.Regular ' EndIf
Date$Date.Day $Date.MONTH, $Date.Year ($Date.wday)
Repeat ' $Day = $e.Day ' If $e.Type = day "Everyday" ' Elif $e.Type = month "Every Month" ' If $Day = 0 "Month End" ' Else $Day ' EndIf ' Elif $e.Type = week Every $System.Week.$Day ' Elif $e.Type = 1stweek Every 1st $System.Week.$Day ' Elif $e.Type = 2ndweek Every 2nd $System.Week.$Day ' Elif $e.Type = 3rdweek Every 3rd $System.Week.$Day ' Elif $e.Type = 4thweek Every 4th $System.Week.$Day ' Elif $e.Type = lastweek Every Last $System.Week.$Day ' EndIf
Time ' If $e.SetTime $e.SetTime.hour : $e.SetTime.Minute00 $e.SetTime.AMPM ' If $e.EndTime - $e.EndTime.hour : $e.EndTime.Minute00 $e.EndTime.AMPM ' EndIf ' EndIf
Schedule$e.Event $e.Detail 
Location$e.Place $e.Other 
Memo
$e.Memo

' If $Shared Multiple-Member Assignment Property ' If (! $SharedDenied and ! $Denied) or ! $Login [Modify] ' EndIf ' $UID = $e.UID ' If $Users.$UID ' EndIf ' EndIf
Registered by$Users.$UID.Name $_Users.$UID.Mail.MailTo
Member ' For Each $UID in $e.Users ' If $Users.$UID $Users.$UID.Name $_Users.$UID.Mail.MailTo
' EndIf ' Next

' EndIf ' If $BPage = index ' $Caption = "Top Page" ' Elif $BPage = ScheduleIndex ' $Caption = "Weekly View" ' Elif $BPage = ScheduleMonth ' $Caption = "Monthly View" ' Elif ($BPage = ScheduleZoom) or ($BPage = ScheduleDay) ' $Caption = "Daily View" ' Else ' $Caption = "Back" ' EndIf
[$Caption] [Top Page] [Help]