LINQ EF4.1树查询

时间:2012-02-02 10:13:08

标签: linq entity-framework recursive-query

这是情景:

2个实体:treeanother

            tree

id    idParent     someValue
1     NULL         ALL
2     1            Child1.1
3     2            Child2.1
4*    2            child...
5     4            child...
6*    1            child...
7     1            child1.3
8     1            child...
9     8            child1.4.1
...

           another

id    idTree      SomeValue
1     4*          bind 1
2     6*          bind 2

Graphicaly:

       tree
1
   2
      3
      4*      --> binded to 1
         5
   6*         --> binded to 2
   7
   8
      9

我要找的是:如何选择没有祖先绑定到tree的所有叶another项。即:3,7,9

            tree

id    idParent     someValue
3     2            Child2.1
7     1            child1.3
9     8            child1.4.1

我尝试过

我在小问题上分解问题:获取所有叶子项然后递归地测试是一个祖先被绑定,等等。但我得到错误超时或性能不佳,因为我有25k树项目,我不知道如何使用lists等临时结构进行查询。

我需要一个新方法来解决这个问题。所有评论都很好。

我的代码(运行......因为递归而缓慢):

 Private Sub busca_no_assignats(
      ByRef l As List(Of Integer), 
      ByRef items As Object, 
      ByVal limit As Integer)
            If l.Count > limit Then
                Exit Sub
            End If
            For Each cu In items
                If cu.childrenItems.Count > 0 Then
                    If cu.others.Count = 0 Then
                        busca_no_assignats(l, cu.childrenItems, limit)
                    End If
                Else
                    If cu.others.Count = 0 Then
                        l.Add(cu.idItem)
                    End If
                End If
            Next
        End Sub


 Private Sub items_pendents_assignar_a_activitat_PreprocessQuery(
     ByRef query As System.Linq.IQueryable(Of LightSwitchApplication.tree))

     Dim l As New List(Of Integer)
     busca_no_assignats(l, Me.DataWorkspace.CAnaliticaData.tree_root_items, 100)

     query = From u In query
                    Where l.Contains(u.IdUnitat)

        End Sub
 End Class

(是的,通过lightswitch是EF)

1 个答案:

答案 0 :(得分:1)

确定,

我不希望找到解决方案,因为这是一个有点难的问题。

我发布了我的最终代码。在生产环境中性能已经足够。

Private Sub busca_no_assignats(
            ByRef l As List(Of Integer), 
            ByRef unitats As Object, 
            ByVal limit As Integer)
    If l.Count > limit Then
        Exit Sub
    End If
    For Each cu In unitats
        If l.Count < limit AndAlso cu.others.Count = 0 Then
            If cu.childrenItems.Count = 0 Then
                If cu.others.Count = 0 Then
                    l.Add(cu.idItem)
                End If
            Else
                busca_no_assignats(l, cu.childrenItems, limit)
            End If
        End If
    Next
End Sub

欢迎所有评论,我会以比我更好的方式标记解决方案。