Index: TAOR-rework-bugfixing/TAOR rework/databases/Cache/CacheMapper.vb =================================================================== diff -u -r1596 -r1601 --- TAOR-rework-bugfixing/TAOR rework/databases/Cache/CacheMapper.vb (.../CacheMapper.vb) (revision 1596) +++ TAOR-rework-bugfixing/TAOR rework/databases/Cache/CacheMapper.vb (.../CacheMapper.vb) (revision 1601) @@ -29,7 +29,7 @@ Dim comm As OdbcCommand = New OdbcCommand(query, SQLConnection) dr = comm.ExecuteReader() Catch ex As Exception - Throw New Exception("Er is een fout opgetreden bij het opvragen van de DataReader uit de Caché databank" & vbNewLine & ex.Message) + Throw New Exception("Er is een fout opgetreden bij het opvragen van de DataReader uit de Caché databank." & vbNewLine & ex.Message) End Try End Sub @@ -219,7 +219,7 @@ Return onderdelen End Function - Public Function updateRework(rework As Rework, Optional barcodeOrigineel As String = "") As Rework + Public Function updateRework(rework As Rework.Rework, Optional barcodeOrigineel As String = "") As Rework.Rework LogBestandTextMapper.writeToFile("Caché", "Updaten van rework met informatie uit databank") Dim barcode As String @@ -262,7 +262,7 @@ Return rework End Function - Public Sub opslaanReworkReden(ByRef rework As Rework) + Public Sub opslaanReworkReden(ByRef rework As Rework.Rework) LogBestandTextMapper.writeToFile("Caché", "Opslaan rework reden met reden: " & rework.reden) updateStapNummer(rework.barcode) @@ -284,7 +284,7 @@ LogBestandTextMapper.writeToFile("Caché", "Updaten stapnummer met verwerkingID: " & verwerkingID, True) End Sub - Private Sub slaRedenOp(ByVal rework As Rework) + Private Sub slaRedenOp(ByVal rework As Rework.Rework) LogBestandTextMapper.writeToFile("Caché", "Rework reden wegschrijven naar de databank, reden: " & rework.reden) rework.aanpassenData()