Index: DOM/PM/Maatwerk/Calc/Common/IKID.cls.xml
===================================================================
diff -u -r1803 -r1821
--- DOM/PM/Maatwerk/Calc/Common/IKID.cls.xml	(.../IKID.cls.xml)	(revision 1803)
+++ DOM/PM/Maatwerk/Calc/Common/IKID.cls.xml	(.../IKID.cls.xml)	(revision 1821)
@@ -7,7 +7,7 @@
 <ClassDefinitionError>0</ClassDefinitionError>
 
 <Property name="Hash">
-<Type>%Binary</Type>
+<Type>%String</Type>
 <Private>1</Private>
 </Property>
 
@@ -24,7 +24,7 @@
 </Index>
 
 <Method name="%OnNew">
-<FormalSpec>Hash:%Binary,OverflowID:%Integer</FormalSpec>
+<FormalSpec>Hash:%String,OverflowID:%Integer</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
@@ -36,7 +36,7 @@
 </Method>
 
 <Method name="GeefHash">
-<ReturnType>%Binary</ReturnType>
+<ReturnType>%String</ReturnType>
 <Implementation><![CDATA[	Quit ..Hash
 ]]></Implementation>
 </Method>
Index: DOM/PM/impl/IngegevenKenmerkenAPIimpl.cls.xml
===================================================================
diff -u -r1818 -r1821
--- DOM/PM/impl/IngegevenKenmerkenAPIimpl.cls.xml	(.../IngegevenKenmerkenAPIimpl.cls.xml)	(revision 1818)
+++ DOM/PM/impl/IngegevenKenmerkenAPIimpl.cls.xml	(.../IngegevenKenmerkenAPIimpl.cls.xml)	(revision 1821)
@@ -17,7 +17,7 @@
 	
 	If ($$$ISERR(Status))
 	{
-		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.SaveFailedException).%New("Kon de nodige data niet opslagen voor de IKID.",Status))
+		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.SaveFailedException).%New("Kon de nodige data niet opslaan voor de IKID.",Status))
 	}
 	
 	Quit IKID
@@ -29,7 +29,7 @@
 <Private>1</Private>
 <ReturnType>DOM.PM.Maatwerk.Calc.Common.impl.IKIDHash</ReturnType>
 <Implementation><![CDATA[
-	Set Hash = $System.Encryption.MD5Encode(CanonischeWaarde)
+	Set Hash = $System.Encryption.Base64Encode($System.Encryption.MD5Encode(CanonischeWaarde))
 	Set IKIDHash = ##class(DOM.PM.Maatwerk.Calc.Common.impl.IKIDHash).%OpenId(Hash)
 	If ('$IsObject(IKIDHash))
 	{
Index: zTryout/CSC/IKnaarIKID.cls.xml
===================================================================
diff -u -r1818 -r1821
--- zTryout/CSC/IKnaarIKID.cls.xml	(.../IKnaarIKID.cls.xml)	(revision 1818)
+++ zTryout/CSC/IKnaarIKID.cls.xml	(.../IKnaarIKID.cls.xml)	(revision 1821)
@@ -7,7 +7,7 @@
 
 <Method name="Do">
 <Description>
-Do ##class(zTryout.CSC.IKnaarIKID).Do()</Description>
+TWEEDE  Do ##class(zTryout.CSC.IKnaarIKID).Do()</Description>
 <ClassMethod>1</ClassMethod>
 <Implementation><![CDATA[
 	Set IKAPI = ##class(DOM.DomeinContext).Instance().GeefIngegevenKenmerkenAPI()
@@ -17,7 +17,7 @@
 	{
 		Set ID = IDResultSet.Data("ID")
 		Set ProductSpecificatie = ##class(DOM.PM.Maatwerk.Calc.Common.ProductSpecificatie).%OpenId(ID)
-		Do ProductSpecificatie.ZetIngegevenKenmerken(ProductSpecificatie.GeefIngegevenKenmerken())
+		Do ProductSpecificatie.ZetIngegevenKenmerken(ProductSpecificatie.IngegevenKenmerken)
 		Set Status = ProductSpecificatie.%Save()
 		If ($$$ISERR(Status))
 		{
@@ -33,7 +33,7 @@
 
 <Method name="CleanProductBerekening">
 <Description>
-Do ##class(zTryout.CSC.IKnaarIKID).CleanProductBerekening()</Description>
+EERSTE  Do ##class(zTryout.CSC.IKnaarIKID).CleanProductBerekening()</Description>
 <ClassMethod>1</ClassMethod>
 <Implementation><![CDATA[
 	Set Products = ##class(%ArrayOfDataTypes).%New()
Index: DOM/PM/Maatwerk/Calc/Common/impl/IKIDHash.cls.xml
===================================================================
diff -u -r1818 -r1821
--- DOM/PM/Maatwerk/Calc/Common/impl/IKIDHash.cls.xml	(.../IKIDHash.cls.xml)	(revision 1818)
+++ DOM/PM/Maatwerk/Calc/Common/impl/IKIDHash.cls.xml	(.../IKIDHash.cls.xml)	(revision 1821)
@@ -13,7 +13,7 @@
 </Property>
 
 <Property name="Hash">
-<Type>%Binary</Type>
+<Type>%String</Type>
 <Private>1</Private>
 </Property>
 
@@ -25,7 +25,7 @@
 </Index>
 
 <Method name="%OnNew">
-<FormalSpec>Hash:%Binary</FormalSpec>
+<FormalSpec>Hash:%String</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
@@ -36,7 +36,7 @@
 </Method>
 
 <Method name="GeefHash">
-<ReturnType>%Binary</ReturnType>
+<ReturnType>%String</ReturnType>
 <Implementation><![CDATA[	Quit ..Hash
 ]]></Implementation>
 </Method>
Index: DOM/PM/Maatwerk/Calc/Common/ProductSpecificatie.cls.xml
===================================================================
diff -u -r1818 -r1821
--- DOM/PM/Maatwerk/Calc/Common/ProductSpecificatie.cls.xml	(.../ProductSpecificatie.cls.xml)	(revision 1818)
+++ DOM/PM/Maatwerk/Calc/Common/ProductSpecificatie.cls.xml	(.../ProductSpecificatie.cls.xml)	(revision 1821)
@@ -48,7 +48,7 @@
 <Implementation><![CDATA[
 	Set ..Familie = Familie
 	Set ..Variant = Variant
-	Set ..IngegevenKenmerken = IngegevenKenmerken
+	Do ..ZetIngegevenKenmerken(IngegevenKenmerken)
 	Quit $$$OK
 ]]></Implementation>
 </Method>
@@ -67,15 +67,19 @@
 
 <Method name="GeefIngegevenKenmerken">
 <ReturnType>DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</ReturnType>
-<Implementation><![CDATA[	Quit ..IngegevenKenmerken
+<Implementation><![CDATA[	Quit ##class(DOM.DomeinContext).Instance().GeefIngegevenKenmerkenAPI().GeefIngegevenKenmerken(..IKID)
 ]]></Implementation>
 </Method>
 
 <Method name="ZetIngegevenKenmerken">
 <Description>
 Deze method zou niet mogen gebruikt worden. Deze is enkel aanwezig ter ondersteuning van de generatie van oude producten.</Description>
 <FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</FormalSpec>
-<Implementation><![CDATA[	Set ..IKID = ##class(DOM.DomeinContext).Instance().GeefIngegevenKenmerkenAPI().BewaarIngegevenKenmerken(IngegevenKenmerken)
+<Implementation><![CDATA[
+	If ($IsObject(IngegevenKenmerken))
+	{
+		Set ..IKID = ##class(DOM.DomeinContext).Instance().GeefIngegevenKenmerkenAPI().BewaarIngegevenKenmerken(IngegevenKenmerken)
+	}
 ]]></Implementation>
 </Method>
 
Index: APPS/PM/Maatwerk/KenmerkConversie.cls.xml
===================================================================
diff -u -r1073 -r1821
--- APPS/PM/Maatwerk/KenmerkConversie.cls.xml	(.../KenmerkConversie.cls.xml)	(revision 1073)
+++ APPS/PM/Maatwerk/KenmerkConversie.cls.xml	(.../KenmerkConversie.cls.xml)	(revision 1821)
@@ -7,17 +7,9 @@
 
 <Method name="ConverteerTBX">
 <Description>
-OPPASSEN BIJ HET UITVOEREN:
-
-De KILLEXTENT mag NIET meer uitgevoerd worden van zodra OLM wordt gedeployed
-
-
 d ##class(APPS.PM.Maatwerk.KenmerkConversie).ConverteerTBX()</Description>
 <ClassMethod>1</ClassMethod>
 <Implementation><![CDATA[
-	//Do ##class(DOM.PM.Maatwerk.Calc.Common.ProductSpecificatie).%KillExtent()
-	//Do ##class(DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken).%KillExtent()
-	
 	Set Convertor = ##class(APPS.PM.Maatwerk.TBX.Conversie.KenmerkConvertor).%New()
 	Set ProductAPI = ##class(DOM.DomeinContext).Instance().GeefProductAPI()
 	
@@ -35,17 +27,13 @@
 			If (ProductSpecificatieID '= "")
 			{
 				Set ProductSpecificatie = ##class(DOM.PM.Maatwerk.Calc.Common.ProductSpecificatie).%OpenId(ProductSpecificatieID)
-				If ($IsObject(ProductSpecificatie))
+				If ('$IsObject(ProductSpecificatie))
 				{
-					Set IngegevenKenmerken = ProductSpecificatie.GeefIngegevenKenmerken()
-				}
-				Else
-				{
 					w "Kon ProductSpecificatie met ID "_ProductSpecificatieID_" niet openen voor product "_PRNr,!
 				}
 			}
 			
-			Set IngegevenKenmerken = Convertor.Converteer(Product, .ErrorLijst, IngegevenKenmerken)
+			Set IngegevenKenmerken = Convertor.Converteer(Product, .ErrorLijst)
 			
 			If (ErrorLijst.Count() > 0)
 			{
@@ -57,23 +45,36 @@
 				}
 			}
 
-			Set Familie = Product.GeefFamilie()
-			Set Variant = Product.GeefVariant()
-			If ('$IsObject(ProductSpecificatie))
+			Set Status = IngegevenKenmerken.%Save()
+			If ($$$ISOK(Status))
 			{
-				Set ProductSpecificatie = ##class(DOM.PM.Maatwerk.Calc.Common.ProductSpecificatie).%New(Familie, Variant, IngegevenKenmerken)
+				Set Familie = Product.GeefFamilie()
+				Set Variant = Product.GeefVariant()
+				If ('$IsObject(ProductSpecificatie))
+				{
+					Set ProductSpecificatie = ##class(DOM.PM.Maatwerk.Calc.Common.ProductSpecificatie).%New(Familie, Variant, IngegevenKenmerken)
+				}
+				Else
+				{
+					Do ProductSpecificatie.ZetIngegevenKenmerken(IngegevenKenmerken)
+				}
+				Do ProductSpecificatie.Annotaties.SetAt("De ingegeven kenmerken werden gegenereerd door conversie van het oude product","Gegenereerd door")
+				Set Status = ProductSpecificatie.%Save()
+				
+				Set ParsedStatus = $$ParseStatus^vhLib(Status)
+				If (ParsedStatus '= "")
+				{
+					w "Save gefaald voor "_PRNr_": "_ParsedStatus,!
+				}
+				Else
+				{
+					Set $Piece(^KPR(Product.GeefPRNr(),15),"\",13) = ProductSpecificatie.%Id()
+				}
 			}
-			Do ProductSpecificatie.Annotaties.SetAt("De ingegeven kenmerken werden gegenereerd door conversie van het oude product","Gegenereerd door")
-			Set Status = ProductSpecificatie.%Save()
-			
-			Set ParsedStatus = $$ParseStatus^vhLib(Status)
-			If (ParsedStatus '= "")
-			{
-				w "Save gefaald voor "_PRNr_": "_ParsedStatus,!
-			}
 			Else
 			{
-				Set $Piece(^KPR(Product.GeefPRNr(),15),"\",13) = ProductSpecificatie.%Id()
+				Set ParsedStatus = $$ParseStatus^vhLib(Status)
+				w "Kon IK niet opslaan voor "_PRNr_": "_ParsedStatus,!
 			}
 
 		}
@@ -109,17 +110,13 @@
 				If (ProductSpecificatieID '= "")
 				{
 					Set ProductSpecificatie = ##class(DOM.PM.Maatwerk.Calc.Common.ProductSpecificatie).%OpenId(ProductSpecificatieID)
-					If ($IsObject(ProductSpecificatie))
+					If ('$IsObject(ProductSpecificatie))
 					{
-						Set IngegevenKenmerken = ProductSpecificatie.GeefIngegevenKenmerken()
-					}
-					Else
-					{
 						w "Kon ProductSpecificatie met ID "_ProductSpecificatieID_" niet openen voor product "_PRNr,!
 					}
 				}
 				
-				Set IngegevenKenmerken = Convertor.Converteer(Kaderdeur,.ErrorLijst,IngegevenKenmerken)
+				Set IngegevenKenmerken = Convertor.Converteer(Kaderdeur,.ErrorLijst)
 				
 				If (ErrorLijst.Count() > 0)
 				{
@@ -131,23 +128,36 @@
 					}
 				}
 				
-				Set Familie = ##class(DOM.PM.enu.Familie).AluKader()
-				Set Variant = ##class(DOM.PM.enu.AluKaderVariant).Basis()
-				If ('$IsObject(ProductSpecificatie))
+				Set Status = IngegevenKenmerken.%Save()
+				If ($$$ISOK(Status))
 				{
-					Set ProductSpecificatie = ##class(DOM.PM.Maatwerk.Calc.Common.ProductSpecificatie).%New(Familie, Variant, IngegevenKenmerken)
+					Set Familie = ##class(DOM.PM.enu.Familie).AluKader()
+					Set Variant = ##class(DOM.PM.enu.AluKaderVariant).Basis()
+					If ('$IsObject(ProductSpecificatie))
+					{
+						Set ProductSpecificatie = ##class(DOM.PM.Maatwerk.Calc.Common.ProductSpecificatie).%New(Familie, Variant, IngegevenKenmerken)
+					}
+					Else
+					{
+						Do ProductSpecificatie.ZetIngegevenKenmerken(IngegevenKenmerken)
+					}
+					Do ProductSpecificatie.Annotaties.SetAt("De ingegeven kenmerken werden gegenereerd door conversie van het oude product","Gegenereerd door")
+					Set Status = ProductSpecificatie.%Save()
+					
+					Set ParsedStatus = $$ParseStatus^vhLib(Status)
+					If (ParsedStatus '= "")
+					{
+						w "Save gefaald voor "_PRNr_": "_ParsedStatus,!
+					}
+					Else
+					{
+						Set $Piece(^KPR(PRNr,15),"\",13) = ProductSpecificatie.%Id()
+					}
 				}
-				Do ProductSpecificatie.Annotaties.SetAt("De ingegeven kenmerken werden gegenereerd door conversie van het oude product","Gegenereerd door")
-				Set Status = ProductSpecificatie.%Save()
-				
-				Set ParsedStatus = $$ParseStatus^vhLib(Status)
-				If (ParsedStatus '= "")
-				{
-					w "Save gefaald voor "_PRNr_": "_ParsedStatus,!
-				}
 				Else
 				{
-					Set $Piece(^KPR(PRNr,15),"\",13) = ProductSpecificatie.%Id()
+					Set ParsedStatus = $$ParseStatus^vhLib(Status)
+					w "Kon IK niet opslaan voor "_PRNr_": "_ParsedStatus,!
 				}
 				
 				Set i = i + 1