$User.Name
' If $User.ID = $Login.ID
' EndIf
|
' Set $Calendar = $User.Schedule.Calendar
' Set $Calendar.Share = $Schedule.Calendar
' $Calendar.UID = $User.ID
' Set $Banner = $User.Schedule.Banner
' $Banner.SetDate = $SetDate
' For Each $WDate in $System.Week
' If $Banner.$WDate
' Else
|
' EndIf
' Set $s = $Calendar.$WDate
' $s.EndTime = $Schedule.EndTime
' For Each $e in $s
' If ! $e.Private or ($ID = $Login.ID)
$_e.Time12$ $e.Title$$e.Regular$$e.Shared
' EndIf
' Next
|
' Next
|
' For Each $WDate in $System.Week
' Set $b = $Banner.$WDate
' If $b.Span
$b.Title
|
' EndIf
' Next
 |