Index: vhUnitTest/APPS/VKP/Maatwerk/impl/AluKaderConvertorNSv1Mock.cls.xml
===================================================================
diff -u -r29059 -r51153
--- vhUnitTest/APPS/VKP/Maatwerk/impl/AluKaderConvertorNSv1Mock.cls.xml	(.../AluKaderConvertorNSv1Mock.cls.xml)	(revision 29059)
+++ vhUnitTest/APPS/VKP/Maatwerk/impl/AluKaderConvertorNSv1Mock.cls.xml	(.../AluKaderConvertorNSv1Mock.cls.xml)	(revision 51153)
@@ -3,6 +3,16 @@
 <Class name="vhUnitTest.APPS.VKP.Maatwerk.impl.AluKaderConvertorNSv1Mock">
 <Super>APPS.VKP.Maatwerk.impl.AluKaderConvertorNSv1</Super>
 
+<Method name="ValideerProfielType">
+<FormalSpec>ProfileTypeNS:APPS.VKP.Maatwerk.enu.ProfileTypeNS</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	Quit:(ProfileTypeNS = "")   ; Bij een aantal testen is het ProfielType niet van belang.  Dus bij deze UT geen validatie indien leeg. 
+	
+	Do ##super(ProfileTypeNS)
+]]></Implementation>
+</Method>
+
 <Method name="GeefKADVulling">
 <ReturnType>DOM.PM.Maatwerk.Calc.Common.impl.KADVullingBeschrijving</ReturnType>
 <Implementation><![CDATA[	Quit ##super()
Index: vhUnitTest/APPS/VKP/Maatwerk/impl/TestAluKaderConvertorNSv1.cls.xml
===================================================================
diff -u -r29059 -r51153
--- vhUnitTest/APPS/VKP/Maatwerk/impl/TestAluKaderConvertorNSv1.cls.xml	(.../TestAluKaderConvertorNSv1.cls.xml)	(revision 29059)
+++ vhUnitTest/APPS/VKP/Maatwerk/impl/TestAluKaderConvertorNSv1.cls.xml	(.../TestAluKaderConvertorNSv1.cls.xml)	(revision 51153)
@@ -1,8 +1,6 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="vhUnitTest.APPS.VKP.Maatwerk.impl.TestAluKaderConvertorNSv1">
-<Description>
-Do ##class(vhUnitTest.Manager).RunTest("/debug/display=all","APPS.VKP.Maatwerk.impl.TestAluKaderConvertorNSv1")</Description>
 <ClassType/>
 <ProcedureBlock>1</ProcedureBlock>
 <Super>vhUnitTest.TestCase</Super>
@@ -12,6 +10,7 @@
 <Private>1</Private>
 <ReturnType>APPS.VKP.Maatwerk.IAluKaderConvertorNS</ReturnType>
 <Implementation><![CDATA[
+	Set:($$$Not($IsObject(Properties))) Properties = ##class(APPS.VKP.Maatwerk.dto.KADPropertiesForOfferNS1).%New()   ; Quick&Dirty work-around for UT. 
 	Set Convertor = ##class(vhUnitTest.APPS.VKP.Maatwerk.impl.AluKaderConvertorNSv1Mock).%New(Properties)
 	Quit Convertor
 ]]></Implementation>
Index: vhUnitTest/APPS/VKP/Maatwerk/TestAluKaderServiceNS.cls.xml
===================================================================
diff -u -r45909 -r51153
--- vhUnitTest/APPS/VKP/Maatwerk/TestAluKaderServiceNS.cls.xml	(.../TestAluKaderServiceNS.cls.xml)	(revision 45909)
+++ vhUnitTest/APPS/VKP/Maatwerk/TestAluKaderServiceNS.cls.xml	(.../TestAluKaderServiceNS.cls.xml)	(revision 51153)
@@ -1,8 +1,6 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="vhUnitTest.APPS.VKP.Maatwerk.TestAluKaderServiceNS">
-<Description>
-Do ##class(vhUnitTest.Manager).RunTest("/debug/display=all","APPS.VKP.Maatwerk.TestAluKaderServiceNS")</Description>
 <ClassType/>
 <ProcedureBlock>1</ProcedureBlock>
 <Super>vhUnitTest.TestCase</Super>
@@ -37,6 +35,7 @@
 <Implementation><![CDATA[
 	Set Properties = ##class(APPS.VKP.Maatwerk.dto.KADPropertiesForOfferNS1).%New()
 	Set Properties.Version=1
+	Set Properties.ProfileType = ##class(APPS.VKP.Maatwerk.enu.ProfileTypeNS).BreedGlas()
 
 	#dim AluKaderConvertor As APPS.VKP.Maatwerk.IAluKaderConvertorNS = ..GeefAluKaderServiceMock().GeefAluKaderConvertor(Properties)
 	
@@ -54,7 +53,7 @@
 
 	Set Properties.Height = 900
 	Set Properties.Width = 480
-	Set Properties.ProfileType = ##class(DOM.PM.enu.KADProfielType).BreedGlas()
+	Set Properties.ProfileType = ##class(APPS.VKP.Maatwerk.enu.ProfileTypeNS).BreedGlas()
 	Set Properties.DoorType= ##class(APPS.VKP.Maatwerk.enu.DoorTypeNS).NormalDoor()
 	Set Properties.GlassName = "FZ verre satimat"
 	Set Properties.IsHardened = 1