Index: vhUnitTest/WSimpl/Halux/PPS/MatService/GeefAfmetingenViaBatchId/Test.cls.xml
===================================================================
diff -u -r66710 -r66714
--- vhUnitTest/WSimpl/Halux/PPS/MatService/GeefAfmetingenViaBatchId/Test.cls.xml	(.../Test.cls.xml)	(revision 66710)
+++ vhUnitTest/WSimpl/Halux/PPS/MatService/GeefAfmetingenViaBatchId/Test.cls.xml	(.../Test.cls.xml)	(revision 66714)
@@ -71,8 +71,8 @@
 	#dim BatchServiceMock As vhTest.Mock.APPS.Halux.common.BatchService = ..GeefBatchMock(BatchId, Categorie)
 	
 	Set UitvoeringInfoLijst = ##class(%ListOfObjects).%New()
-	#dim MatInfo1 As DOM.Halux.PPS.MatInfo = ..MaakMatInfoObject(100000, "1A2B", 300000, 1, 273, "-", 1500, 422, "UTBeschrijving1", "UTKleur1", "UTMateriaal1", 1, $$$False)
-	#dim MatInfo2 As DOM.Halux.PPS.MatInfo = ..MaakMatInfoObject(100001, "3C4D", 300001, 2, 423, "-", 1500, 548, "UTBeschrijving2", "UTKleur2", "UTMateriaal2", 2, $$$False)
+	#dim MatInfo1 As DOM.Halux.PPS.MatInfo = ..MaakMatInfoObject(100000, 300000, 1, "-", 422, "UTKleur1")
+	#dim MatInfo2 As DOM.Halux.PPS.MatInfo = ..MaakMatInfoObject(100001, 300001, 2, "-", 548, "UTKleur2")
 	Do UitvoeringInfoLijst.Insert(MatInfo1)
 	Do UitvoeringInfoLijst.Insert(MatInfo2)
 	
@@ -90,10 +90,18 @@
 	
 	#dim UitvoeringInfo1Antwoord As WSimpl.Halux.PPS.dto.MatAfmeting = Antwoord.MatAfmetingen.GetAt(1)
 	Do $$$AssertEquals(UitvoeringInfo1Antwoord.Toelevering, 100000)
+	Do $$$AssertEquals(UitvoeringInfo1Antwoord.ProductId, 300000)
+	Do $$$AssertEquals(UitvoeringInfo1Antwoord.Aantal, 1)
+	Do $$$AssertEquals(UitvoeringInfo1Antwoord.BewerkingDiepte, "-")
+	Do $$$AssertEquals(UitvoeringInfo1Antwoord.BewerkingBreedte, 422)
 	Do $$$AssertEquals(UitvoeringInfo1Antwoord.Kleur, "UTKleur1")
 	
 	#dim UitvoeringInfo2Antwoord As WSimpl.Halux.PPS.dto.MatAfmeting = Antwoord.MatAfmetingen.GetAt(2)
 	Do $$$AssertEquals(UitvoeringInfo2Antwoord.Toelevering, 100001)
+	Do $$$AssertEquals(UitvoeringInfo2Antwoord.ProductId, 300001)
+	Do $$$AssertEquals(UitvoeringInfo2Antwoord.Aantal, 2)
+	Do $$$AssertEquals(UitvoeringInfo2Antwoord.BewerkingDiepte, "-")
+	Do $$$AssertEquals(UitvoeringInfo2Antwoord.BewerkingBreedte, 548)
 	Do $$$AssertEquals(UitvoeringInfo2Antwoord.Kleur, "UTKleur2")
 	
 	Do BatchServiceMock.Verifieer()
@@ -112,7 +120,7 @@
 	#dim BatchServiceMock As vhTest.Mock.APPS.Halux.common.BatchService = ..GeefBatchMock(BatchId, Categorie)
 	
 	Set UitvoeringInfoLijst = ##class(%ListOfObjects).%New()
-	#dim MatInfo1 As DOM.Halux.PPS.MatInfo = ..MaakMatInfoObject(100000, "1A2B", 300000, 1, 273, "-", 1500, "-", "UTBeschrijving1", "UTKleur1", "UTMateriaal1", 1, $$$False)
+	#dim MatInfo1 As DOM.Halux.PPS.MatInfo = ..MaakMatInfoObject(100000, 300000, 1, "-", "-", "UTKleur1")
 	Do UitvoeringInfoLijst.Insert(MatInfo1)
 	
 	Set UitvoeringLijstIterator = ##class(TECH.ListIterator).%New(UitvoeringInfoLijst)
@@ -146,7 +154,7 @@
 	#dim BatchServiceMock As vhTest.Mock.APPS.Halux.common.BatchService = ..GeefBatchMock(BatchId, Categorie)
 	
 	Set UitvoeringInfoLijst = ##class(%ListOfObjects).%New()
-	#dim MatInfo1 As DOM.Halux.PPS.MatInfo = ..MaakMatInfoObject(100000, "1A2B", 300000, 1, 273, "-", 1500, 500, "UTBeschrijving1", "UTKleur1", "UTMateriaal1", 1, $$$False)
+	#dim MatInfo1 As DOM.Halux.PPS.MatInfo = ..MaakMatInfoObject(100000, 300000, 1, "-", 500, "UTKleur1")
 	Do UitvoeringInfoLijst.Insert(MatInfo1)
 	
 	Set UitvoeringLijstIterator = ##class(TECH.ListIterator).%New(UitvoeringInfoLijst)
@@ -184,24 +192,18 @@
 </Method>
 
 <Method name="MaakMatInfoObject">
-<FormalSpec>ToeleveringId:%Integer,DossierCode:%String,ProductId:%Integer,Aantal:%Decimal,Diepte:%Decimal,BewerkingDiepte:%String,Breedte:%Decimal,BewerkingBreedte:%String,Beschrijving:%String,Kleur:%String,Materiaal:%String,SequentieNummer:%Integer,IsRework:%Boolean</FormalSpec>
+<FormalSpec>ToeleveringId:%Integer,ProductId:%Integer,Aantal:%Decimal,BewerkingDiepte:%String,BewerkingBreedte:%String,Kleur:%String</FormalSpec>
 <Private>1</Private>
 <ReturnType>APPS.Halux.PPS.Activiteit.impl.common.dto.MattenUitvoeringInfo</ReturnType>
 <Implementation><![CDATA[
 	Set UitvoeringInfo = ##class(DOM.Halux.PPS.MatInfo).%New()
 		
 	Set UitvoeringInfo.ToeleveringId = ToeleveringId
-	Set UitvoeringInfo.DossierCode = DossierCode
 	Set UitvoeringInfo.ProductId = ProductId
 	Set UitvoeringInfo.Aantal = Aantal	
-	Set UitvoeringInfo.Diepte = Diepte
 	Set UitvoeringInfo.BewerkingDiepte = BewerkingDiepte
-	Set UitvoeringInfo.Breedte = Breedte
 	Set UitvoeringInfo.BewerkingBreedte = BewerkingBreedte
 	Set UitvoeringInfo.Kleur = Kleur
-	Set UitvoeringInfo.Materiaal = Materiaal
-	Set UitvoeringInfo.SequentieNummer = SequentieNummer
-	Set UitvoeringInfo.IsRework = IsRework
 
 	Quit UitvoeringInfo
 ]]></Implementation>