Case (
    Tasks::Status = "Done" or Tasks::Status = "Cancelled" ; "Closed" ;
    not IsEmpty ( Tasks::DueDate ) and
        Tasks::DueDate < Get ( CurrentDate ) ; "Overdue" ;
    "Open"
)