' $System.Access Read Project $Office.Name - Project ' Init $GID = $Login.Group.ID
' If $Finish ' Else ' EndIf
Group List of Completed ProjectProject List[Settings for Each Project]
' If $Finish ' For Each $p in $Project.Projects ' If $p.Finish ' If ! $GID or ($GID = $p.GID) ' EndIf ' EndIf ' Next
Project NameProject Manager
$p.Name
(Completion Date: $p.FinishDate.Day $p.FinishDate.MONTH, $p.FinishDate.Year)		 $p.Rate% Completed $p.Manager
$_p.Mail.MailTo
[Current Project] ' Else ' For $i = 1 to 10 ' Next ' For Each $p in $Project.Projects ' If ! $p.Finish ' If ! $GID or ($GID = $p.GID) ' If $p.EndDate ' Else ' EndIf ' If $p.Status = 3 ' $Color = #ff0000 ' Elif $p.Status = 2 ' $Color = #ff6666 ' Else ' $Color = #008000 ' EndIf ' If $p.PhaseSpan ' EndIf ' If $p.TargetSpan ' EndIf ' If $p.Status = 1 ' Elif $p.Status = 2 ' Elif $p.Status = 3 ' Else ' EndIf ' EndIf ' EndIf ' Next
Project NameProgress StatusProject Manager
$p.Name
(Expected Completion Date: $p.EndDate.Day $p.EndDate.MONTH, $p.EndDate.Year)		 $p.Name$p.Rate% Completed$p.Manager
$_p.Mail.MailTo
On Schedule
Behind ($p.Late% Delay)
Urgent ! ($p.Late% Delay)

[Completed Project] ' EndIf

[Top Page] [Top Page] [Settings] [Help]