Public Class WorkItem implements IWorkItem Public Property BatchVisual As Integer Implements IWorkItem.BatchVisual Public Property DeliverToResource As String Implements IWorkItem.DeliverToResource Public Property ProductGroup As String Implements IWorkItem.ProductGroup Public Property Remark As String Implements IWorkItem.Remark Public Property EndTimeStamp As DateTime Implements IWorkItem.EndTimeStamp Public Property Activities As List(Of IActivity) Implements IWorkItem.Activities ''' Public Function AreAllActivatableActivitiesFinished() As Boolean Implements IWorkItem.AreAllActivatableActivitiesFinished Return Activities.All(Function(activity) Not activity.IsReadOnly And activity.Status = ActivityStateEnum.Finished) End Function End Class