Index: vhTest/Fake/DOM/PM/impl/DataM/DataMProduct.cls.xml
===================================================================
diff -u -r45971 -r45975
--- vhTest/Fake/DOM/PM/impl/DataM/DataMProduct.cls.xml	(.../DataMProduct.cls.xml)	(revision 45971)
+++ vhTest/Fake/DOM/PM/impl/DataM/DataMProduct.cls.xml	(.../DataMProduct.cls.xml)	(revision 45975)
@@ -24,6 +24,11 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefPalletAantal">
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
+
 <Method name="ZetAantalInGrootVerpakking">
 <FormalSpec>AantalInGrootVerpakking:%Integer</FormalSpec>
 <Implementation><![CDATA[
@@ -54,6 +59,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="ZetPalletAantal">
+<FormalSpec>PalletAantal:%Integer</FormalSpec>
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
+
 <Method name="ZetTelbaar">
 <FormalSpec>Telbaar:TECH.String</FormalSpec>
 <Implementation><![CDATA[
Index: DOM/PM/impl/ProductImpl.cls.xml
===================================================================
diff -u -r45971 -r45975
--- DOM/PM/impl/ProductImpl.cls.xml	(.../ProductImpl.cls.xml)	(revision 45971)
+++ DOM/PM/impl/ProductImpl.cls.xml	(.../ProductImpl.cls.xml)	(revision 45975)
@@ -560,6 +560,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefPalletAantal">
+<ReturnType>%Integer</ReturnType>
+<Implementation><![CDATA[	Quit ..Product.GeefPalletAantal()
+]]></Implementation>
+</Method>
+
 <Method name="ZetIdentNr">
 <FormalSpec>IdentNr:%String</FormalSpec>
 <Implementation><![CDATA[	Do ..Product.ZetIdentNr(IdentNr)
@@ -631,6 +637,12 @@
 <Implementation><![CDATA[	Do ..Product.ZetAantalInNormaleVerpakking(AantalInNormaleVerpakking)
 ]]></Implementation>
 </Method>
+
+<Method name="ZetPalletAantal">
+<FormalSpec>PalletAantal:%Integer</FormalSpec>
+<Implementation><![CDATA[	Do ..Product.ZetPalletAantal(PalletAantal)
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: DOM/PM/impl/DataM/DataMProduct.cls.xml
===================================================================
diff -u -r45971 -r45975
--- DOM/PM/impl/DataM/DataMProduct.cls.xml	(.../DataMProduct.cls.xml)	(revision 45971)
+++ DOM/PM/impl/DataM/DataMProduct.cls.xml	(.../DataMProduct.cls.xml)	(revision 45975)
@@ -597,6 +597,11 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefPalletAantal">
+<Implementation><![CDATA[	Quit ..Data2.GeefPiece(16)
+]]></Implementation>
+</Method>
+
 <Method name="ZetIdentNr">
 <FormalSpec>IdentNr:%String</FormalSpec>
 <Implementation><![CDATA[	Do ..Data2.ZetPiece(25, IdentNr)
@@ -667,6 +672,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="ZetPalletAantal">
+<FormalSpec>PalletAantal:%Integer</FormalSpec>
+<Implementation><![CDATA[	Do ..Data2.ZetPiece(16,PalletAantal)
+]]></Implementation>
+</Method>
+
 <Method name="Data0Get">
 <Private>1</Private>
 <ReturnType>%String</ReturnType>
Index: vhTest/Mock/DOM/PM/Product.cls.xml
===================================================================
diff -u -r45971 -r45975
--- vhTest/Mock/DOM/PM/Product.cls.xml	(.../Product.cls.xml)	(revision 45971)
+++ vhTest/Mock/DOM/PM/Product.cls.xml	(.../Product.cls.xml)	(revision 45975)
@@ -298,6 +298,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefPalletAantal">
+<ReturnType>%Integer</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefPalletAantal")
+]]></Implementation>
+</Method>
+
 <Method name="GeefProductGroep">
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefProductGroep")
@@ -472,6 +478,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="ZetPalletAantal">
+<FormalSpec>PalletAantal:%Integer</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("ZetPalletAantal",PalletAantal)
+]]></Implementation>
+</Method>
+
 <Method name="ZetSubGroep">
 <FormalSpec>SubGroep:%String</FormalSpec>
 <Implementation><![CDATA[	do ..VerwerkMethodCall("ZetSubGroep",SubGroep)
Index: vhTest/Mock/DOM/PM/impl/DataM/DataMProduct.cls.xml
===================================================================
diff -u -r45971 -r45975
--- vhTest/Mock/DOM/PM/impl/DataM/DataMProduct.cls.xml	(.../DataMProduct.cls.xml)	(revision 45971)
+++ vhTest/Mock/DOM/PM/impl/DataM/DataMProduct.cls.xml	(.../DataMProduct.cls.xml)	(revision 45975)
@@ -270,6 +270,11 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefPalletAantal">
+<Implementation><![CDATA[	do ..VerwerkMethodCall("GeefPalletAantal")
+]]></Implementation>
+</Method>
+
 <Method name="GeefProductTekst">
 <ReturnType>Prod.ProductTekst</ReturnType>
 <Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefProductTekst")
@@ -412,6 +417,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="ZetPalletAantal">
+<FormalSpec>PalletAantal:%Integer</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("ZetPalletAantal",PalletAantal)
+]]></Implementation>
+</Method>
+
 <Method name="ZetSubGroep">
 <FormalSpec>SubGroep:%String</FormalSpec>
 <Implementation><![CDATA[	do ..VerwerkMethodCall("ZetSubGroep",SubGroep)
Index: DOM/PM/Product.cls.xml
===================================================================
diff -u -r45971 -r45975
--- DOM/PM/Product.cls.xml	(.../Product.cls.xml)	(revision 45971)
+++ DOM/PM/Product.cls.xml	(.../Product.cls.xml)	(revision 45975)
@@ -341,6 +341,11 @@
 <ReturnType>%Integer</ReturnType>
 </Method>
 
+<Method name="GeefPalletAantal">
+<Abstract>1</Abstract>
+<ReturnType>%Integer</ReturnType>
+</Method>
+
 <Method name="IsFysiekHetzelfdeProductAls">
 <Abstract>1</Abstract>
 <FormalSpec>AnderProductID:%String</FormalSpec>
@@ -407,6 +412,11 @@
 <FormalSpec>AantalInNormaleVerpakking:%Integer</FormalSpec>
 </Method>
 
+<Method name="ZetPalletAantal">
+<Abstract>1</Abstract>
+<FormalSpec>PalletAantal:%Integer</FormalSpec>
+</Method>
+
 <Method name="Save">
 <Abstract>1</Abstract>
 </Method>
Index: vhUnitTest/DOM/PM/impl/ProductImpl/Test.cls.xml
===================================================================
diff -u -r45972 -r45975
--- vhUnitTest/DOM/PM/impl/ProductImpl/Test.cls.xml	(.../Test.cls.xml)	(revision 45972)
+++ vhUnitTest/DOM/PM/impl/ProductImpl/Test.cls.xml	(.../Test.cls.xml)	(revision 45975)
@@ -249,6 +249,19 @@
 	Do DataMProductMock.Verifieer()
 ]]></Implementation>
 </Method>
+
+<Method name="Test: ZetPalletAantal zet PalletAantal">
+<Implementation><![CDATA[
+	Set DataMProductMock = ##class(vhTest.Mock.DOM.PM.impl.DataM.DataMProduct).%New()
+	#dim Product As DOM.PM.Product = ##class(DOM.PM.impl.ProductImpl).%New(..#ProductId,DataMProductMock)
+	
+	Do DataMProductMock.VerwachtMethodCall("ZetPalletAantal","456").DanDoeNiks()
+	
+	Do Product.ZetPalletAantal("456")
+	
+	Do DataMProductMock.Verifieer()
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: vhUnitTest/DOM/PM/impl/DataM/DataMProduct/Test.cls.xml
===================================================================
diff -u -r45972 -r45975
--- vhUnitTest/DOM/PM/impl/DataM/DataMProduct/Test.cls.xml	(.../Test.cls.xml)	(revision 45972)
+++ vhUnitTest/DOM/PM/impl/DataM/DataMProduct/Test.cls.xml	(.../Test.cls.xml)	(revision 45975)
@@ -51,7 +51,9 @@
 	Do Product.ZetAantalInGrootVerpakking("333")
 	Do Product.ZetAantalInKleinVerpakking("111")
 	Do Product.ZetAantalInNormaleVerpakking("222")
+	Do Product.ZetPalletAantal("456")
 	
+	Do $$$AssertEquals(Product.GeefPalletAantal(),"456")
 	Do $$$AssertEquals(Product.GeefAantalInStukVerpakking(),"222")
 	Do $$$AssertEquals(Product.GeefAantalInKleinVerpakking(),"111")
 	Do $$$AssertEquals(Product.GeefAantalInGrootVerpakking(),"333")