Dim composedPredicate As Expression(Of Func(Of SecurityLogsDto, Boolean)) = Nothing

Dim predicateSecurityLogsNotBEBU As Expression(Of Func(Of SecurityLogsDto, Boolean)) = Function(securityLog) Not {LteConst.DATAGROUP_BENEFICIARY, LteConst.DATAGROUP_BUSINESS_UNIT}.Contains(securityLog.type)
Dim predicateBEDataEntitlements As Expression(Of Func(Of SecurityLogsDto, Boolean)) = Function(slbe) LteConst.DATAGROUP_BENEFICIARY.Equals(slbe.type)

Dim filterExpressions As Expression(Of Func(Of SecurityLogsDto, Boolean))() = New Expression(Of Func(Of SecurityLogsDto, Boolean))() {predicateSecurityLogsNotBEBU, predicateBEDataEntitlements}
Dim operators As Func(Of Expression, Expression, BinaryExpression)() = New Func(Of Expression, Expression, BinaryExpression)() {Expression.OrElse}

composedPredicate = CombinePredicates(filterExpressions, operators)