Index: TAOR-rework-bugfixing/TAOR rework/databases/Cache/CacheMapper.vb
===================================================================
diff -u -r1614 -r1626
--- TAOR-rework-bugfixing/TAOR rework/databases/Cache/CacheMapper.vb (.../CacheMapper.vb) (revision 1614)
+++ TAOR-rework-bugfixing/TAOR rework/databases/Cache/CacheMapper.vb (.../CacheMapper.vb) (revision 1626)
@@ -93,7 +93,7 @@
''' Een optionele filter
'''
Private Function GetDataReader(kolom As Kolommen, waarde As String, Optional filter As String = Nothing) As OdbcDataReader
- LogBestandTextMapper.writeToFile("Caché", $"Opvragen van DataReader met kolom, waarde, filter?: '{EnumMapper.geefWaardeBijEnumValue(kolom)}' '{waarde}' '{filter}'")
+ LogBestandTextMapper.writeToFile("Caché", $"Opvragen van DataReader met kolom, waarde, filter?: '{EnumMapper.GeefTekstVanEnumOptie(kolom)}' '{waarde}' '{filter}'")
Try
Dim kolomnaam As String = EnumMapper.geefCacheKolomNaamBijKolom(kolom)
Dim equalsOfLikeSleutelwoord As String
@@ -120,10 +120,10 @@
'Uitvoeren van query en datareader retourneren.
Dim dr = ExecuteIntoDataReader(query)
- LogBestandTextMapper.writeToFile("Caché", $"Opvragen van DataReader met kolom, waarde, filter?: '{EnumMapper.geefWaardeBijEnumValue(kolom)}' '{waarde}' '{filter}'", True)
+ LogBestandTextMapper.writeToFile("Caché", $"Opvragen van DataReader met kolom, waarde, filter?: '{EnumMapper.GeefTekstVanEnumOptie(kolom)}' '{waarde}' '{filter}'", True)
Return dr
Catch ex As Exception
- Throw New Exception($"Fout bij opvragen van DataReader met kolom, waarde, filter?: '{EnumMapper.geefWaardeBijEnumValue(kolom)}' '{waarde}' '{filter}'{vbNewLine}{ex.Message}")
+ Throw New Exception($"Fout bij opvragen van DataReader met kolom, waarde, filter?: '{EnumMapper.GeefTekstVanEnumOptie(kolom)}' '{waarde}' '{filter}'{vbNewLine}{ex.Message}")
End Try
End Function