Index: vhUnitTest/WSimpl/Halux/AAP/DnaCodeService/DnaCodeInVhossKastBepaler/MagDnaCodeInVhossKast/Test.cls.xml
===================================================================
diff -u -r61587 -r61590
--- vhUnitTest/WSimpl/Halux/AAP/DnaCodeService/DnaCodeInVhossKastBepaler/MagDnaCodeInVhossKast/Test.cls.xml	(.../Test.cls.xml)	(revision 61587)
+++ vhUnitTest/WSimpl/Halux/AAP/DnaCodeService/DnaCodeInVhossKastBepaler/MagDnaCodeInVhossKast/Test.cls.xml	(.../Test.cls.xml)	(revision 61590)
@@ -321,73 +321,6 @@
 	Do $$$AssertFalse(Antwoord)
 ]]></Implementation>
 </Method>
-
-<UDLText name="T">
-<Content><![CDATA[
-// 
-
-]]></Content>
-</UDLText>
-
-<Method name="aTest: LBX, 2 productiesequentieitems met correct intern vhossnummer -&gt; mag wel">
-<Implementation><![CDATA[
-	#dim BatchId As %String = "100000"
-	
-	Set DnaCode = ##class(DOM.Halux.AAP.DnaCode).%New()
-	Set DnaCode.DnaCode = "LAAAAA0"
-	Set DnaCode.BatchId = "100000"
-	#dim Pallet As %String = "O100000010"
-	
-	Set SequentieServiceStub = ##class(vhTest.Mock.APPS.Halux.common.SequentieService).%New()
-	Do SequentieServiceStub.IndienMethodCall("HeeftProductieSequentie", DnaCode.BatchId).DanReturn($$$True)
-	
-	Set Batch = ##class(APPS.Halux.common.impl.BatchImpl).%New()
-	Set ProductieSequentieItem1 = ##class(APPS.Halux.common.VHOSSProductieSequentieItem).%New()
-	Set ProductieSequentieItem1.VHOSSID = "1"
-	Set ProductieSequentieItem2 = ##class(APPS.Halux.common.VHOSSProductieSequentieItem).%New()
-	Set ProductieSequentieItem2.VHOSSID = "1"
-	Set ProductieSequentie = ##class(APPS.Halux.common.ProductieSequentie).%New(Batch)
-	Do ProductieSequentie.VoegToeSequentieItem(ProductieSequentieItem1)
-	Do ProductieSequentie.VoegToeSequentieItem(ProductieSequentieItem2)
-	Do SequentieServiceStub.IndienMethodCall("GeefProductieSequentie", DnaCode.BatchId).DanReturn(ProductieSequentie)
-	
-	Set Bepaler = ##class(WSimpl.Halux.AAP.DnaCodeService.DnaCodeInVhossKastBepaler).%New(SequentieServiceStub)
-	
-	#dim Antwoord As %Boolean = Bepaler.MagDnaCodeInVhossKast(DnaCode,Pallet,BatchId)
-	
-	Do $$$AssertTrue(Antwoord)
-]]></Implementation>
-</Method>
-
-<Method name="aTest: LBX, 2 productiesequentieitems waarvan 1 met correct intern vhossnummer -&gt; mag wel">
-<Implementation><![CDATA[
-	#dim BatchId As %String = "100000"
-	
-	Set DnaCode = ##class(DOM.Halux.AAP.DnaCode).%New()
-	Set DnaCode.DnaCode = "LAAAAA0"
-	Set DnaCode.BatchId = "100000"
-	#dim Pallet As %String = "O100000010"
-	
-	Set SequentieServiceStub = ##class(vhTest.Mock.APPS.Halux.common.SequentieService).%New()
-	Do SequentieServiceStub.IndienMethodCall("HeeftProductieSequentie", DnaCode.BatchId).DanReturn($$$True)
-	
-	Set Batch = ##class(APPS.Halux.common.impl.BatchImpl).%New()
-	Set ProductieSequentieItem1 = ##class(APPS.Halux.common.VHOSSProductieSequentieItem).%New()
-	Set ProductieSequentieItem1.VHOSSID = "2"
-	Set ProductieSequentieItem2 = ##class(APPS.Halux.common.VHOSSProductieSequentieItem).%New()
-	Set ProductieSequentieItem2.VHOSSID = "1"
-	Set ProductieSequentie = ##class(APPS.Halux.common.ProductieSequentie).%New(Batch)
-	Do ProductieSequentie.VoegToeSequentieItem(ProductieSequentieItem1)
-	Do ProductieSequentie.VoegToeSequentieItem(ProductieSequentieItem2)
-	Do SequentieServiceStub.IndienMethodCall("GeefProductieSequentie", DnaCode.BatchId).DanReturn(ProductieSequentie)
-	
-	Set Bepaler = ##class(WSimpl.Halux.AAP.DnaCodeService.DnaCodeInVhossKastBepaler).%New(SequentieServiceStub)
-	
-	#dim Antwoord As %Boolean = Bepaler.MagDnaCodeInVhossKast(DnaCode,Pallet,BatchId)
-	
-	Do $$$AssertTrue(Antwoord)
-]]></Implementation>
-</Method>
 </Class>