This question is locked. New answers and comments are not allowed.
Hello,
Could you tell me why I have an error in Q3 that I do not have in Q2?
This works fine in Q2 but in Q3 I get an error or get 0 objects returned...
Erik
Could you tell me why I have an error in Q3 that I do not have in Q2?
Private
mobj_AllTables
As
List(Of Entities.NetBas.DataDict.Data.Table) =
Nothing
Private
mobj_AllColumns
As
List(Of Entities.NetBas.DataDict.Data.TableColumn) =
Nothing
...
Dim
qry_Tables
As
IQueryable(Of Entities.NetBas.DataDict.Data.Table)
qry_Tables = From t
In
DBC.GetAll(Of Entities.NetBas.DataDict.Data.Table)()
Join pi
In
DBC.GetAll(Of Entities.NetBas.ProjectItem)()
On
t.TableId Equals pi.BinderId
Where pi.ProjectId = obj_Project.ProjectId
And
pi.BinderType.ToUpper.Trim =
"TABLE"
Order By t.TableId
Select
ConvertProjectItem(t, pi)
mobj_AllTables = qry_Tables.ToList
' result in 44 tables
Dim
qry_TableColumns2
As
IQueryable(Of Entities.NetBas.DataDict.Data.TableColumn)
qry_TableColumns2 = From tc
In
DBC.GetAll(Of Entities.NetBas.DataDict.Data.TableColumn)()
Join t
In
mobj_AllTables
On
tc.TableId Equals t.TableId
Select
tc
This works fine in Q2 but in Q3 I get an error or get 0 objects returned...
Erik