Nabend ihr lieben
Ich habe eine Klasse erstellt, welche ich an verschiedenen Stellen in meinem Programm verwende, um einen Artikel nach Eingabe eines EAN Code zu finden.
Ich durchsuche bisher die komplette Artikel Datatable (mittels FirstOrDefault), nach vorkommen des EAN Codes und gebe dann den gefundenen Artikel an die aufrufende Sub zurück.
Nun habe ich aber mehrere Stelle in meinem Programm, wo diese Artikelliste gefiltert sein kann (mittels BS.Filter).
Da meine EANSuchKlasse, aber die gesamte DataTable durchsucht finde ich unter Umständen Artikel, welche in der Filterung garnicht vorkommen.
Ist es möglich folgende Sub so umzuarbeiten, dass eben nicht die DataTable, sondern die BS (welche ich dann übergeben würde) durchsucht wird?
*Topic verschoben*
Ich habe eine Klasse erstellt, welche ich an verschiedenen Stellen in meinem Programm verwende, um einen Artikel nach Eingabe eines EAN Code zu finden.
Ich durchsuche bisher die komplette Artikel Datatable (mittels FirstOrDefault), nach vorkommen des EAN Codes und gebe dann den gefundenen Artikel an die aufrufende Sub zurück.
Nun habe ich aber mehrere Stelle in meinem Programm, wo diese Artikelliste gefiltert sein kann (mittels BS.Filter).
Da meine EANSuchKlasse, aber die gesamte DataTable durchsucht finde ich unter Umständen Artikel, welche in der Filterung garnicht vorkommen.
Ist es möglich folgende Sub so umzuarbeiten, dass eben nicht die DataTable, sondern die BS (welche ich dann übergeben würde) durchsucht wird?
VB.NET-Quellcode
- Private Function SearchItemByEAN(EANCode As String) As (ItemFound As Boolean, Itemrow As DtsDaten.ArtikelRow)
- If _Dts.Artikel.Count < 1 Then Return (False, Nothing)
- Dim Founditem As DtsDaten.ArtikelRow
- If _FilterByCompanies Then
- Founditem = _Dts.Artikel.FirstOrDefault(Function(z) _ListofCompaniesToOrder.Select(Function(x) x.ID).Contains(z.LieferantID) AndAlso z.EAN = EANCode)
- Else
- Founditem = _Dts.Artikel.FirstOrDefault(Function(z) z.EAN = EANCode)
- End If
- If Founditem Is Nothing Then
- Return (False, Nothing)
- Else
- Return (True, Founditem)
- End If
- End Function
*Topic verschoben*
Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „Marcus Gräfe“ ()