' $System.Access Read Project ' Set $p = $Project.Projects.$PID ' If $System.IsPost ' If $Finish ' $p.Finish = 1 ' $p.FinishDate = $Date ' $System.Redirect $Server?page=ProjectIndex&gid=$GID ' Elif $Restart ' $p.Finish = 0 ' $System.Redirect $Server?page=ProjectIndex&gid=$GID&finish=1 ' Else ' $Command.Project.ViewDate ' $System.Redirect $Server?page=ProjectView&gid=$GID&pid=$PID&bpage=$BPage ' EndIf ' Exit ' EndIf $Office.Name - $p.Name
' If $p.EndDate ' Else ' EndIf
$p.Name (From $p.SetDate.Day $p.SetDate.MONTH, $p.SetDate.Year to $p.EndDate.Day $p.EndDate.MONTH, $p.EndDate.Year)$p.Name
Project Manager : $p.Manager $_p.Mail.MailTo ' If ! $p.Finish [Add an Action] ' EndIf [Display Settings]
Progress Status of the Whole Project : ' If $p.Finish Project Completed ' Else ' If $p.Status = 1 On Schedule, ' Elif $p.Status = 2 Behind ($p.Late% Delay), ' Elif $p.Status = 3 Urgent ! ($p.Late% Delay), ' EndIf $p.Rate% Completed ' EndIf
' $System.Year.Date = $p.ViewDate ' $System.Year.Months = $p.ViewMonths ' For Each $YDate in $System.Year ' Next ' $System.Year.Step = Day ' For Each $YDate in $System.Year ' $Color = "" ' If $YDate = $Date ' $Color = "bgcolor=#ff0000" ' Elif $YDate = $p.EndDate ' $Color = "bgcolor=#000000" ' EndIf ' Next ' For Each $t in $p.Themes ' $Name = $t.Name ' If ! $Name ' $Name = "(Action Name Not Specified)" ' EndIf ' $t.ViewDate = $p.ViewDate ' $t.ViewMonths = $p.ViewMonths ' If $t.PreSpan ' EndIf ' If $t.PhaseSpan ' EndIf ' If $t.TargetSpan ' EndIf ' If $t.PostSpan ' EndIf ' Next
Action$YDate.month


$Name
Managed by : $t.Manager		 $t.Rate%
Completed


$t.EndDate.Day-$t.EndDate.month

' If $p.Finish
the Project.
' Else
the Project.
' EndIf

' If $BPage = index ' Elif $p.Finish ' Else ' EndIf
[Top Page][List of Completed Project][Project List][Top Page] [Help]