Index: vhUnitTest/WSimpl/Halux/AAP/DnaCodeService/DnaCodeAfmelden/Test.cls.xml
===================================================================
diff -u -r56261 -r56640
--- vhUnitTest/WSimpl/Halux/AAP/DnaCodeService/DnaCodeAfmelden/Test.cls.xml	(.../Test.cls.xml)	(revision 56261)
+++ vhUnitTest/WSimpl/Halux/AAP/DnaCodeService/DnaCodeAfmelden/Test.cls.xml	(.../Test.cls.xml)	(revision 56640)
@@ -9,9 +9,9 @@
 	Set Request.DnaCode = "DnaCode"
 	
 	Set DnaCode1 = ##class(DOM.Halux.AAP.DnaCode).%New()
-	Set DnaCode1.Toelevering = "333333"
+	Set DnaCode1.Toelevering = "222222"
 	Set DnaCode2 = ##class(DOM.Halux.AAP.DnaCode).%New()
-	Set DnaCode2.Toelevering = "333333"
+	Set DnaCode2.Toelevering = "222222"
 	Set DnaCode2.InitialenScanner = "XXX"
 	#dim DnaCodeIteratorEenStuk As TECH.Iterator = ##class(TECH.ListUtils).CreateIteratorOfObjects(DnaCode1)
 	#dim DnaCodeIteratorTweeStuks As TECH.Iterator = ##class(TECH.ListUtils).CreateIteratorOfObjects(DnaCode1, DnaCode2)
@@ -59,9 +59,9 @@
 	Set Request.DnaCode = "DnaCode"
 	
 	Set DnaCode1 = ##class(DOM.Halux.AAP.DnaCode).%New()
-	Set DnaCode1.Toelevering = "333333"
+	Set DnaCode1.Toelevering = "222222"
 	Set DnaCode2 = ##class(DOM.Halux.AAP.DnaCode).%New()
-	Set DnaCode2.Toelevering = "333333"
+	Set DnaCode2.Toelevering = "222222"
 	Set DnaCode2.InitialenScanner = "XXX"
 	#dim DnaCodeIteratorEenStuk As TECH.Iterator = ##class(TECH.ListUtils).CreateIteratorOfObjects(DnaCode1)
 	#dim DnaCodeIteratorTweeStuks As TECH.Iterator = ##class(TECH.ListUtils).CreateIteratorOfObjects(DnaCode1, DnaCode2)
@@ -75,7 +75,7 @@
 	#dim Antwoord As WS.Halux.AAP.DnaCodeAfmeldenResponse = DnaCodeService.DnaCodeAfmelden(Request)
 	
 	Do $$$AssertEquals(Antwoord.Header.Status,"-1021")
-	Do $$$AssertEquals(Antwoord.Header.Omschrijving,"Geen data gevonden voor toelevering '333333'")
+	Do $$$AssertEquals(Antwoord.Header.Omschrijving,"Geen data gevonden voor toelevering '222222'")
 	Do $$$AssertEquals(Antwoord.DnaCodes.Count(),0)
 	Do $$$AssertEquals(Antwoord.AantalInToelevering,"0")
 	Do $$$AssertEquals(Antwoord.AantalReedsGescand,"0")
@@ -89,9 +89,9 @@
 	Set Request.DnaCode = "DnaCode"
 	
 	Set DnaCode1 = ##class(DOM.Halux.AAP.DnaCode).%New()
-	Set DnaCode1.Toelevering = "333333"
+	Set DnaCode1.Toelevering = "222222"
 	Set DnaCode2 = ##class(DOM.Halux.AAP.DnaCode).%New()
-	Set DnaCode2.Toelevering = "333333"
+	Set DnaCode2.Toelevering = "222222"
 	Set DnaCode2.InitialenScanner = "XXX"
 	#dim DnaCodeIteratorEenStuk As TECH.Iterator = ##class(TECH.ListUtils).CreateIteratorOfObjects(DnaCode1)
 	#dim DnaCodeIteratorTweeStuks As TECH.Iterator = ##class(TECH.ListUtils).CreateIteratorOfObjects(DnaCode1, DnaCode2)
@@ -120,7 +120,7 @@
 	Set Request.Toelevering = "356789"
 	
 	Set DnaCode1 = ##class(DOM.Halux.AAP.DnaCode).%New()
-	Set DnaCode1.Toelevering = "333333"
+	Set DnaCode1.Toelevering = "222222"
 	#dim DnaCodeIteratorEenStuk As TECH.Iterator = ##class(TECH.ListUtils).CreateIteratorOfObjects(DnaCode1)
 	Set DnaCodeRepositoryMock = ##class(vhTest.Mock.DOM.Halux.AAP.DnaCodeRepository).%New()
 	Do DnaCodeRepositoryMock.IndienMethodCall("ZoekViaDnaCode",Request.DnaCode).DanReturn(DnaCodeIteratorEenStuk)
@@ -171,16 +171,16 @@
 	Set Request.PalletCode = "TBX12345"
 	
 	Set DnaCode1 = ##class(DOM.Halux.AAP.DnaCode).%New()
-	Set DnaCode1.Toelevering = "333333"
+	Set DnaCode1.Toelevering = "222222"
 	Set DnaCode1.PalletCode = "TBX12345"
 	
 	Set DnaCode1.InitialenScanner = "XXX"
 	Set DnaCode2 = ##class(DOM.Halux.AAP.DnaCode).%New()
-	Set DnaCode2.Toelevering = "333333"
+	Set DnaCode2.Toelevering = "222222"
 	Set DnaCode2.InitialenScanner = "XXX"
 	
 	Set AfgemeldeDnaCode = ##class(DOM.Halux.AAP.DnaCode).%New()
-	Set AfgemeldeDnaCode.Toelevering = "333333"
+	Set AfgemeldeDnaCode.Toelevering = "222222"
 	Set AfgemeldeDnaCode.InitialenScanner = ""
 	Set AfgemeldeDnaCode.Status = ##class(DOM.Halux.AAP.enu.DnaCodeStatus).Ongedaan()