<PersistentAlias("Iif(ApprovedBy != null AND ApprovedBy > 0, True, False)")> _
Public Property IsApproved() As Boolean
    Get
        Return Convert.ToBoolean(EvaluateAlias("IsApproved"))
    End Get
    Set(ByVal Approve As Boolean)
        If IsReady() Then
            If Approve Then
                ApprovedOn = Base.BMSRemote.GetServerDate
                ApprovedBy = Base.CurrentUser(Session)