Index: vhTest/Fake/DOM/PM/impl/DataM/DataMProduct.cls.xml
===================================================================
diff -u -r45983 -r45984
--- vhTest/Fake/DOM/PM/impl/DataM/DataMProduct.cls.xml	(.../DataMProduct.cls.xml)	(revision 45983)
+++ vhTest/Fake/DOM/PM/impl/DataM/DataMProduct.cls.xml	(.../DataMProduct.cls.xml)	(revision 45984)
@@ -14,89 +14,86 @@
 <Type>%Integer</Type>
 </Property>
 
-<Method name="GeefCifPPL">
+<Method name="ZetCifPerc">
+<FormalSpec>CifPerc:%Numeric</FormalSpec>
 <Implementation><![CDATA[
 ]]></Implementation>
 </Method>
 
-<Method name="GeefFSCHout">
+<Method name="ZetCifPercentage">
+<FormalSpec>CifPercentage:%Numeric</FormalSpec>
 <Implementation><![CDATA[
 ]]></Implementation>
 </Method>
 
+<Method name="GeefCifPPL">
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="GeefFSCHout">
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
 <Method name="GeefGewichtPerDuizendStuksInKG">
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="GeefPalletAantal">
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="GeefStockNietStock">
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="ZetAantalInGrootVerpakking">
 <FormalSpec>AantalInGrootVerpakking:%Integer</FormalSpec>
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="ZetAantalInKleinVerpakking">
 <FormalSpec>AantalInKleinVerpakking:%Integer</FormalSpec>
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="ZetAantalInNormaleVerpakking">
 <FormalSpec>AantalInNormaleVerpakking:%Integer</FormalSpec>
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="ZetCifPPL">
 <FormalSpec>CifPPL:%Numeric</FormalSpec>
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="ZetFSCHout">
 <FormalSpec>FSCHout:%String</FormalSpec>
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="ZetGewichtPerDuizendStuksInKG">
 <FormalSpec>GewichtPerDuizendStuksInKG:%Numeric</FormalSpec>
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="ZetLeverancierReferentie">
 <FormalSpec>LeverancierReferentie:%String</FormalSpec>
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="ZetPalletAantal">
 <FormalSpec>PalletAantal:%Integer</FormalSpec>
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="ZetStockNietStock">
 <FormalSpec>StockNietStock:%String</FormalSpec>
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="ZetTelbaar">
 <FormalSpec>Telbaar:TECH.String</FormalSpec>
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="GeefAantalInGrootVerpakking">
@@ -154,7 +151,7 @@
 </Method>
 
 <Method name="GeefCifPercentage">
-<ReturnType>%Float</ReturnType>
+<ReturnType>%Numeric</ReturnType>
 <Implementation><![CDATA[	Quit ""
 ]]></Implementation>
 </Method>
Index: vhTest/Mock/DOM/PM/Product.cls.xml
===================================================================
diff -u -r45983 -r45984
--- vhTest/Mock/DOM/PM/Product.cls.xml	(.../Product.cls.xml)	(revision 45983)
+++ vhTest/Mock/DOM/PM/Product.cls.xml	(.../Product.cls.xml)	(revision 45984)
@@ -69,7 +69,7 @@
 </Method>
 
 <Method name="GeefCifPercentage">
-<ReturnType>%Float</ReturnType>
+<ReturnType>%Numeric</ReturnType>
 <Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefCifPercentage")
 ]]></Implementation>
 </Method>
@@ -454,6 +454,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="ZetCifPercentage">
+<FormalSpec>CifPercentage:%Numeric</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("ZetCifPercentage",CifPercentage)
+]]></Implementation>
+</Method>
+
 <Method name="ZetFSCHout">
 <FormalSpec>FSCHout:%String</FormalSpec>
 <Implementation><![CDATA[	do ..VerwerkMethodCall("ZetFSCHout",FSCHout)
Index: DOM/PM/Product.cls.xml
===================================================================
diff -u -r45983 -r45984
--- DOM/PM/Product.cls.xml	(.../Product.cls.xml)	(revision 45983)
+++ DOM/PM/Product.cls.xml	(.../Product.cls.xml)	(revision 45984)
@@ -288,7 +288,7 @@
 
 <Method name="GeefCifPercentage">
 <Abstract>1</Abstract>
-<ReturnType>%Float</ReturnType>
+<ReturnType>%Numeric</ReturnType>
 </Method>
 
 <Method name="GeefKortingsPercentageAankoop">
@@ -442,6 +442,11 @@
 <FormalSpec>CifPPL:%Numeric</FormalSpec>
 </Method>
 
+<Method name="ZetCifPercentage">
+<Abstract>1</Abstract>
+<FormalSpec>CifPercentage:%Numeric</FormalSpec>
+</Method>
+
 <Method name="Save">
 <Abstract>1</Abstract>
 </Method>
Index: vhUnitTest/DOM/PM/impl/ProductImpl/Test.cls.xml
===================================================================
diff -u -r45983 -r45984
--- vhUnitTest/DOM/PM/impl/ProductImpl/Test.cls.xml	(.../Test.cls.xml)	(revision 45983)
+++ vhUnitTest/DOM/PM/impl/ProductImpl/Test.cls.xml	(.../Test.cls.xml)	(revision 45984)
@@ -301,6 +301,19 @@
 	Do DataMProductMock.Verifieer()
 ]]></Implementation>
 </Method>
+
+<Method name="Test: ZetCifPercentage zet CifPercentage">
+<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("ZetCifPercentage","5.4").DanDoeNiks()
+	
+	Do Product.ZetCifPercentage("5.4")
+	
+	Do DataMProductMock.Verifieer()
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: vhUnitTest/DOM/PM/impl/DataM/DataMProduct/Test.cls.xml
===================================================================
diff -u -r45983 -r45984
--- vhUnitTest/DOM/PM/impl/DataM/DataMProduct/Test.cls.xml	(.../Test.cls.xml)	(revision 45983)
+++ vhUnitTest/DOM/PM/impl/DataM/DataMProduct/Test.cls.xml	(.../Test.cls.xml)	(revision 45984)
@@ -55,7 +55,9 @@
 	Do Product.ZetLeverancierReferentie("LeverancierReferentie")
 	Do Product.ZetStockNietStock("1")
 	Do Product.ZetCifPPL("7.6")
+	Do Product.ZetCifPercentage("5.4")
 	
+	Do $$$AssertEquals(Product.GeefCifPercentage(),"5.4")
 	Do $$$AssertEquals(Product.GeefCifPPL(),"7.6")
 	Do $$$AssertEquals(Product.GeefStockNietStock(),"1")
 	Do $$$AssertEquals(Product.GeefLeverancierReferentie(),"LeverancierReferentie")
Index: vhTest/Mock/DOM/PM/impl/DataM/DataMProduct.cls.xml
===================================================================
diff -u -r45983 -r45984
--- vhTest/Mock/DOM/PM/impl/DataM/DataMProduct.cls.xml	(.../DataMProduct.cls.xml)	(revision 45983)
+++ vhTest/Mock/DOM/PM/impl/DataM/DataMProduct.cls.xml	(.../DataMProduct.cls.xml)	(revision 45984)
@@ -68,7 +68,7 @@
 </Method>
 
 <Method name="GeefCifPercentage">
-<ReturnType>%Float</ReturnType>
+<ReturnType>%Numeric</ReturnType>
 <Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefCifPercentage")
 ]]></Implementation>
 </Method>
@@ -391,6 +391,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="ZetCifPercentage">
+<FormalSpec>CifPercentage:%Numeric</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("ZetCifPercentage",CifPercentage)
+]]></Implementation>
+</Method>
+
 <Method name="ZetFSCHout">
 <FormalSpec>FSCHout:%String</FormalSpec>
 <Implementation><![CDATA[	do ..VerwerkMethodCall("ZetFSCHout",FSCHout)
Index: DOM/PM/impl/DataM/DataMProduct.cls.xml
===================================================================
diff -u -r45983 -r45984
--- DOM/PM/impl/DataM/DataMProduct.cls.xml	(.../DataMProduct.cls.xml)	(revision 45983)
+++ DOM/PM/impl/DataM/DataMProduct.cls.xml	(.../DataMProduct.cls.xml)	(revision 45984)
@@ -543,7 +543,7 @@
 </Method>
 
 <Method name="GeefCifPercentage">
-<ReturnType>%Float</ReturnType>
+<ReturnType>%Numeric</ReturnType>
 <Implementation><![CDATA[	Quit ..DataJ.GeefPiece(21)/100
 ]]></Implementation>
 </Method>
@@ -706,6 +706,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="ZetCifPercentage">
+<FormalSpec>CifPercentage:%Numeric</FormalSpec>
+<Implementation><![CDATA[	Do ..DataJ.ZetPiece(21,CifPercentage * 100)
+]]></Implementation>
+</Method>
+
 <Method name="Data0Get">
 <Private>1</Private>
 <ReturnType>%String</ReturnType>
Index: vhTest/Dummy/DOM/PM/Product.cls.xml
===================================================================
diff -u -r44041 -r45984
--- vhTest/Dummy/DOM/PM/Product.cls.xml	(.../Product.cls.xml)	(revision 44041)
+++ vhTest/Dummy/DOM/PM/Product.cls.xml	(.../Product.cls.xml)	(revision 45984)
@@ -64,7 +64,7 @@
 </Method>
 
 <Method name="GeefCifPercentage">
-<ReturnType>%Float</ReturnType>
+<ReturnType>%Numeric</ReturnType>
 <Implementation><![CDATA[	Quit ""
 ]]></Implementation>
 </Method>
Index: vhTest/Mock/DOM/PM/MaatwerkProduct.cls.xml
===================================================================
diff -u -r41811 -r45984
--- vhTest/Mock/DOM/PM/MaatwerkProduct.cls.xml	(.../MaatwerkProduct.cls.xml)	(revision 41811)
+++ vhTest/Mock/DOM/PM/MaatwerkProduct.cls.xml	(.../MaatwerkProduct.cls.xml)	(revision 45984)
@@ -63,7 +63,7 @@
 </Method>
 
 <Method name="GeefCifPercentage">
-<ReturnType>%Float</ReturnType>
+<ReturnType>%Numeric</ReturnType>
 <Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefCifPercentage")
 ]]></Implementation>
 </Method>
Index: DOM/PM/impl/ProductImpl.cls.xml
===================================================================
diff -u -r45983 -r45984
--- DOM/PM/impl/ProductImpl.cls.xml	(.../ProductImpl.cls.xml)	(revision 45983)
+++ DOM/PM/impl/ProductImpl.cls.xml	(.../ProductImpl.cls.xml)	(revision 45984)
@@ -495,7 +495,7 @@
 </Method>
 
 <Method name="GeefCifPercentage">
-<ReturnType>%Float</ReturnType>
+<ReturnType>%Numeric</ReturnType>
 <Implementation><![CDATA[	Quit ..Product.GeefCifPercentage()
 ]]></Implementation>
 </Method>
@@ -673,6 +673,12 @@
 <Implementation><![CDATA[	Do ..Product.ZetCifPPL(CifPPL)
 ]]></Implementation>
 </Method>
+
+<Method name="ZetCifPercentage">
+<FormalSpec>CifPercentage:%Numeric</FormalSpec>
+<Implementation><![CDATA[	Do ..Product.ZetCifPercentage(CifPercentage)
+]]></Implementation>
+</Method>
 </Class>