Index: vhUnitTest/DOM/PM/impl/IKCanonischeWaarde/TestINKKenmerken.cls.xml
===================================================================
diff -u -r68061 -r68079
--- vhUnitTest/DOM/PM/impl/IKCanonischeWaarde/TestINKKenmerken.cls.xml	(.../TestINKKenmerken.cls.xml)	(revision 68061)
+++ vhUnitTest/DOM/PM/impl/IKCanonischeWaarde/TestINKKenmerken.cls.xml	(.../TestINKKenmerken.cls.xml)	(revision 68079)
@@ -1,11 +1,11 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="vhUnitTest.DOM.PM.impl.IKCanonischeWaarde.TestINKKenmerken">
-<Super>vhUnitTest.DOM.PM.Maatwerk.MVX.Base,vhUnitTest.DOM.PM.Maatwerk.Calc.Common.impl.LadeUitsparingCanonischeWaardeGenerator.Basis</Super>
+<Super>vhUnitTest.DOM.PM.Maatwerk.INK.Base</Super>
 
 <Parameter name="CanonischeWaardeBasis">
 <Type>%String</Type>
-<Default>;V;\\;\\;\{UitsparingPlaceHolder}\;OG;40;0;I;TOB;0;0;0;1;580;500;M;OG-M;Z;;M;Hout;{ToepassingPlaceHolder};Probox;Metaal;0;15;;Pure;;;;Zonder</Default>
+<Default>;;\\;\\;3;0;0.924.098.0;1080;\380;240;160\</Default>
 </Parameter>
 
 <Property name="IKCanonischeWaardeGenerator">
@@ -28,67 +28,15 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test MvxKenmerken Gewone Lade">
+<Method name="Test InkKenmerken Gewone Lade">
 <Implementation><![CDATA[
-	#dim MvxKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.INKKenmerken = ..GeefMvxKenmerken()	
+	#dim InkKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.INKKenmerken = ..GeefInkKenmerken()	
 	#dim VerwachteCanonischeWaarde As %String = ..GeefVerwachteCanonischeWaarde()
 	
-	Do ..AssertCanonischeWaarde(MvxKenmerken,VerwachteCanonischeWaarde)
+	Do ..AssertCanonischeWaarde(InkKenmerken,VerwachteCanonischeWaarde)
 ]]></Implementation>
 </Method>
 
-<Method name="Test MvxKenmerken Lade Met Onlies En NietMeeleveren, de items worden gesorteerd">
-<Implementation><![CDATA[
-	#dim MvxKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.MVXKenmerken = ..GeefMvxKenmerken()	
-	Set MvxKenmerken.Onderdelen = ##class(TECH.ListUtils).CreateListOfDataTypes("RolB","RolC","RolA")
-	Set MvxKenmerken.NietMeeleveren = ##class(TECH.ListUtils).CreateListOfDataTypes("Rol3","Rol1","Rol2")
-	
-	#dim VerwachteCanonischeWaarde As %String = ..GeefVerwachteCanonischeWaarde()
-	Set VerwachteCanonischeWaarde = ##class(TECH.StringUtils).Replace(VerwachteCanonischeWaarde, ";\\;\\;\\;" , ";\RolA;RolB;RolC\;\Rol1;Rol2;Rol3\;\\;" ,0,1)   ; StartPos = 0, ReplaceCount = 1 --> enkel het eerste item vervangen 
-	
-	Do ..AssertCanonischeWaarde(MvxKenmerken,VerwachteCanonischeWaarde)
-]]></Implementation>
-</Method>
-
-<Method name="Test MvxKenmerken Lade Met GekoppeldeMat">
-<Implementation><![CDATA[	// TODO : wanneer Matten of SST ondersteund wordt.
-]]></Implementation>
-</Method>
-
-<Method name="Test MvxKenmerken Sifonlade">
-<Implementation><![CDATA[
-	#dim MvxKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.MVXKenmerken = ..GeefMvxKenmerken()
-	Set MvxKenmerken.Toepassing = ##class(DOM.PM.enu.MVXToepassing).Sifon()
-	Set MvxKenmerken.UitsparingData = ..GeefUitsparingDataDubbel()
-	
-	#dim VerwachteCanonischeWaarde As %String =..GeefVerwachteCanonischeWaarde("SY", ..GeefVerwachteCanonischeWaardeUitsparingDubbel())
-	
-	Do ..AssertCanonischeWaarde(MvxKenmerken,VerwachteCanonischeWaarde)
-]]></Implementation>
-</Method>
-
-<Method name="Test MvxKenmerken Spoelbaklade">
-<Implementation><![CDATA[
-	#dim MvxKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.MVXKenmerken = ..GeefMvxKenmerken()
-	Set MvxKenmerken.Toepassing = ##class(DOM.PM.enu.MVXToepassing).Spoelbak()
-	Set MvxKenmerken.UitsparingData = ..GeefUitsparingDataEnkel()
-	
-	#dim VerwachteCanonischeWaarde As %String =..GeefVerwachteCanonischeWaarde("SP", ..GeefVerwachteCanonischeWaardeUitsparingEnkel())
-
-	Do ..AssertCanonischeWaarde(MvxKenmerken,VerwachteCanonischeWaarde)
-]]></Implementation>
-</Method>
-
-<UDLText name="T">
-<Content><![CDATA[
-/* 
-  =====================
-  |  PRIVATE METHODS  |
-  =====================
-*/
-]]></Content>
-</UDLText>
-
 <Method name="AssertCanonischeWaarde">
 <FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,VerwachteCanonischeWaarde:%String</FormalSpec>
 <Private>1</Private>
@@ -98,46 +46,20 @@
 ]]></Implementation>
 </Method>
 
-<Method name="GeefMvxKenmerken">
+<Method name="GeefInkKenmerken">
 <Private>1</Private>
-<ReturnType>DOM.PM.Maatwerk.Calc.Common.impl.MVXKenmerken</ReturnType>
+<ReturnType>DOM.PM.Maatwerk.Calc.Common.impl.INKKenmerken</ReturnType>
 <Implementation><![CDATA[
-	#dim MvxKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.MVXKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.MVXKenmerken).StandaardLade()
+	#dim MvxKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.MVXKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.INKKenmerken).StandaardInkorting()
 	
-	// Voor deze testcase zoveel mogelijk properties invullen, ook al vormt deze set kenmerken dan een onmogelijke combinatie voor MVX. 
-	// Het doel is enkel om de "pieces" van de CanonischeWaarde te controleren. 
-	
-	Set MvxKenmerken.AantalDwarsverdelingen = 0
-	Set MvxKenmerken.IsBinnenlade = $$$True
-	Set MvxKenmerken.VoorwandType = ..Enum.VoorwandType.Metaal
-	Set MvxKenmerken.GeleiderTechnologie = ..Enum.GeleiderTechnologie.TIPONBLUMOTION
-	Set MvxKenmerken.HeeftOpvullijstLinks = $$$False
-	Set MvxKenmerken.HeeftOpvullijstRechts = $$$False
-	Set MvxKenmerken.HeeftZijstabilisering = $$$False
-	Set MvxKenmerken.MeenemerSet = "Z"
-		
-	Set MvxKenmerken.InterneBreedte = 580
-	Set MvxKenmerken.GUIKenmerken.IsBinnenbreedte = $$$False
-	Set MvxKenmerken.GUIKenmerken.WandDikte = 15
-	Set MvxKenmerken.NietMeeleveren = ""
-	;Set MvxKenmerken.HeeftOpvullijstLinks = $$$True
-	;Set MvxKenmerken.HeeftOpvullijstRechts = $$$True
-	;Set MvxKenmerken.HeeftZijstabilisering = $$$True
-	;Set MvxKenmerken.VoorWandVerhogingHoogte = "Hoog()"
-	;Set MvxKenmerken.VoorWandVerhogingMateriaal = "GlasDiamant()"
-	;Set MvxKenmerken.OpvullijstKleur = ##class(DOM.PM.enu.MVXOpvullijstKleur).PlatinaZilverGrijs()
-
 	Quit MvxKenmerken
 ]]></Implementation>
 </Method>
 
 <Method name="GeefVerwachteCanonischeWaarde">
-<FormalSpec>Toepassing:%String="L",UitsparingData:%String=""</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
 	#dim VerwachteCanonischeWaarde As %String = ..#CanonischeWaardeBasis
-	Set VerwachteCanonischeWaarde = ##class(TECH.StringUtils).Replace(VerwachteCanonischeWaarde,"{ToepassingPlaceHolder}",Toepassing)
-	Set VerwachteCanonischeWaarde = ##class(TECH.StringUtils).Replace(VerwachteCanonischeWaarde,"{UitsparingPlaceHolder}",UitsparingData)
 	Quit VerwachteCanonischeWaarde
 ]]></Implementation>
 </Method>
Index: DOM/PM/Maatwerk/Calc/Common/IKCanonischeWaardeGenerator.cls.xml
===================================================================
diff -u -r68039 -r68079
--- DOM/PM/Maatwerk/Calc/Common/IKCanonischeWaardeGenerator.cls.xml	(.../IKCanonischeWaardeGenerator.cls.xml)	(revision 68039)
+++ DOM/PM/Maatwerk/Calc/Common/IKCanonischeWaardeGenerator.cls.xml	(.../IKCanonischeWaardeGenerator.cls.xml)	(revision 68079)
@@ -361,7 +361,7 @@
 			_ ";" _ INKKenmerken.IdentiekeLengtes
 			_ ";" _ INKKenmerken.HalffabrikaatIdentNummer
 			_ ";" _ INKKenmerken.LengteProduct
-			_ ";" _ INKKenmerken.Lengtes
+			_ ";" _ "\" _ ##class(TECH.ListUtils).ListToPieces(INKKenmerken.Lengtes, ";") _ "\"
 ]]></Implementation>
 </Method>