Index: vhUnitTest/APPS/PM/OL/OrgaluxGammaExporter.cls.xml
===================================================================
diff -u -r29059 -r31923
--- vhUnitTest/APPS/PM/OL/OrgaluxGammaExporter.cls.xml	(.../OrgaluxGammaExporter.cls.xml)	(revision 29059)
+++ vhUnitTest/APPS/PM/OL/OrgaluxGammaExporter.cls.xml	(.../OrgaluxGammaExporter.cls.xml)	(revision 31923)
@@ -4,7 +4,6 @@
 <Description>
 Do ##class(vhUnitTest.Manager).RunTest("/debug/display=all","APPS.PM.OL.OrgaluxGammaExporter")</Description>
 <ClassType/>
-<IncludeCode>DOM.PM.OL</IncludeCode>
 <ProcedureBlock>1</ProcedureBlock>
 <Super>vhUnitTest.TestCase</Super>
 
Index: vhUnitTest/APPS/PM/OL/OrgaluxGammaExporter/Test.cls.xml
===================================================================
diff -u -r31430 -r31923
--- vhUnitTest/APPS/PM/OL/OrgaluxGammaExporter/Test.cls.xml	(.../Test.cls.xml)	(revision 31430)
+++ vhUnitTest/APPS/PM/OL/OrgaluxGammaExporter/Test.cls.xml	(.../Test.cls.xml)	(revision 31923)
@@ -4,10 +4,14 @@
 <Description>
 Do ##class(vhUnitTest.Manager).RunTest("/debug/display=all","APPS.PM.OL.OrgaluxGammaExporter")</Description>
 <ClassType/>
-<IncludeCode>DOM.PM.OL</IncludeCode>
 <ProcedureBlock>1</ProcedureBlock>
 <Super>vhUnitTest.APPS.PM.OL.OrgaluxGammaExporter</Super>
 
+<Parameter name="Type">
+<Type>%String</Type>
+<Default>I</Default>
+</Parameter>
+
 <Method name="TestIntivo">
 <Implementation><![CDATA[
 	// SETUP
@@ -25,11 +29,6 @@
 ]]></Implementation>
 </Method>
 
-<Parameter name="Type">
-<Type>%String</Type>
-<Default>I</Default>
-</Parameter>
-
 <Method name="TestIntivoEnAntaro">
 <Implementation><![CDATA[
 	// SETUP
@@ -96,10 +95,10 @@
 	
 	#dim LadeFamilieWaarden As %ListOfDataTypes = ..ZoekDesignWaarden(Exporter.KenmerkQueryWaarden)
 	
-	Do $$$AssertTrue( $Data(LadeFamilieWaarden) )
-	Do $$$AssertEquals( 2, LadeFamilieWaarden.Count() )
-	Do $$$AssertTrue( LadeFamilieWaarden.Find(##class(DOM.PM.OL.enu.LadeFamilie).LBXPure()) )
-	Do $$$AssertTrue( LadeFamilieWaarden.Find("NietBlumLade") )
+	if $$$AssertEquals(LadeFamilieWaarden.Count() , 2  ) {
+		Do $$$AssertTrue( LadeFamilieWaarden.Find(##class(DOM.PM.OL.enu.LadeFamilie).LBXPure()) )
+		Do $$$AssertTrue( LadeFamilieWaarden.Find("NietBlumLade") )
+	}
 ]]></Implementation>
 </Method>
 
@@ -115,10 +114,10 @@
 	
 	#dim LadeFamilieWaarden As %ListOfDataTypes = ..ZoekDesignWaarden(Exporter.KenmerkQueryWaarden)
 	
-	Do $$$AssertTrue( $Data(LadeFamilieWaarden) )
-	Do $$$AssertEquals( 2, LadeFamilieWaarden.Count() )
-	Do $$$AssertTrue( LadeFamilieWaarden.Find(##class(DOM.PM.OL.enu.LadeFamilie).LBXFree()) )
-	Do $$$AssertTrue( LadeFamilieWaarden.Find(##class(DOM.PM.OL.enu.LadeFamilie).NietBlumLade()) )
+	if $$$AssertEquals( LadeFamilieWaarden.Count() , 2 ) {
+		Do $$$AssertTrue( LadeFamilieWaarden.Find(##class(DOM.PM.OL.enu.LadeFamilie).LBXFree()) )
+		Do $$$AssertTrue( LadeFamilieWaarden.Find(##class(DOM.PM.OL.enu.LadeFamilie).NietBlumLade()) )
+	}
 ]]></Implementation>
 </Method>
 
@@ -134,11 +133,11 @@
 	
 	#dim LadeFamilieWaarden As %ListOfDataTypes = ..ZoekDesignWaarden(Exporter.KenmerkQueryWaarden)
 	
-	Do $$$AssertTrue( $Data(LadeFamilieWaarden) )
-	Do $$$AssertEquals( 3, LadeFamilieWaarden.Count() )
-	Do $$$AssertTrue( LadeFamilieWaarden.Find(##class(DOM.PM.OL.enu.LadeFamilie).LBXPure()) )
-	Do $$$AssertTrue( LadeFamilieWaarden.Find(##class(DOM.PM.OL.enu.LadeFamilie).LBXFree()) )
-	Do $$$AssertTrue( LadeFamilieWaarden.Find(##class(DOM.PM.OL.enu.LadeFamilie).NietBlumLade()) )
+	if $$$AssertEquals(LadeFamilieWaarden.Count() , 3) {
+		Do $$$AssertTrue( LadeFamilieWaarden.Find(##class(DOM.PM.OL.enu.LadeFamilie).LBXPure()) )
+		Do $$$AssertTrue( LadeFamilieWaarden.Find(##class(DOM.PM.OL.enu.LadeFamilie).LBXFree()) )
+		Do $$$AssertTrue( LadeFamilieWaarden.Find(##class(DOM.PM.OL.enu.LadeFamilie).NietBlumLade()) )
+	}
 ]]></Implementation>
 </Method>
 
@@ -154,10 +153,10 @@
 	
 	#dim LadeFamilieWaarden As %ListOfDataTypes = ..ZoekDesignWaarden(Exporter.KenmerkQueryWaarden)
 	
-	Do $$$AssertTrue( $Data(LadeFamilieWaarden) )
-	Do $$$AssertEquals( 2, LadeFamilieWaarden.Count() )
-	Do $$$AssertTrue( LadeFamilieWaarden.Find(##class(DOM.PM.OL.enu.LadeFamilie).Taorbox()) )
-	Do $$$AssertTrue( LadeFamilieWaarden.Find(##class(DOM.PM.OL.enu.LadeFamilie).NietBlumLade()) )
+	if $$$AssertEquals( LadeFamilieWaarden.Count() , 2 ) {
+		Do $$$AssertTrue( LadeFamilieWaarden.Find(##class(DOM.PM.OL.enu.LadeFamilie).Taorbox()) )
+		Do $$$AssertTrue( LadeFamilieWaarden.Find(##class(DOM.PM.OL.enu.LadeFamilie).NietBlumLade()) )
+	}
 ]]></Implementation>
 </Method>
 
@@ -173,12 +172,12 @@
 	
 	#dim LadeFamilieWaarden As %ListOfDataTypes = ..ZoekDesignWaarden(Exporter.KenmerkQueryWaarden)
 	
-	Do $$$AssertTrue( $Data(LadeFamilieWaarden) )
-	Do $$$AssertEquals( 4, LadeFamilieWaarden.Count() )
-	Do $$$AssertTrue( LadeFamilieWaarden.Find("TBX_plus_Boxside_Ew_of_Dw") )
-	Do $$$AssertTrue( LadeFamilieWaarden.Find("TBX_plus_Reling_of_BXglas") )
-	Do $$$AssertTrue( LadeFamilieWaarden.Find("Alle_TBX_geen_bevestigingen_nodig") )
-	Do $$$AssertTrue( LadeFamilieWaarden.Find("NietBlumLade") )
+	if $$$AssertEquals( LadeFamilieWaarden.Count() , 4 ) {
+		Do $$$AssertTrue( LadeFamilieWaarden.Find("TBX_plus_Boxside_Ew_of_Dw") )
+		Do $$$AssertTrue( LadeFamilieWaarden.Find("TBX_plus_Reling_of_BXglas") )
+		Do $$$AssertTrue( LadeFamilieWaarden.Find("Alle_TBX_geen_bevestigingen_nodig") )
+		Do $$$AssertTrue( LadeFamilieWaarden.Find("NietBlumLade") )
+	}
 ]]></Implementation>
 </Method>
 
@@ -194,14 +193,14 @@
 	
 	#dim LadeFamilieWaarden As %ListOfDataTypes = ..ZoekDesignWaarden(Exporter.KenmerkQueryWaarden)
 	
-	Do $$$AssertTrue( $Data(LadeFamilieWaarden) )
-	Do $$$AssertEquals( 6, LadeFamilieWaarden.Count() )
-	Do $$$AssertTrue( LadeFamilieWaarden.Find("TBX_plus_Boxside_Ew_of_Dw") )
-	Do $$$AssertTrue( LadeFamilieWaarden.Find("TBX_plus_Reling_of_BXglas") )
-	Do $$$AssertTrue( LadeFamilieWaarden.Find("TBX_antaro_Reling") )
-	Do $$$AssertTrue( LadeFamilieWaarden.Find("TBX_intivo") )
-	Do $$$AssertTrue( LadeFamilieWaarden.Find("Alle_TBX_geen_bevestigingen_nodig") )
-	Do $$$AssertTrue( LadeFamilieWaarden.Find("NietBlumLade") )
+	if $$$AssertEquals( LadeFamilieWaarden.Count() , 6 )  {
+		Do $$$AssertTrue( LadeFamilieWaarden.Find("TBX_plus_Boxside_Ew_of_Dw") )
+		Do $$$AssertTrue( LadeFamilieWaarden.Find("TBX_plus_Reling_of_BXglas") )
+		Do $$$AssertTrue( LadeFamilieWaarden.Find("TBX_antaro_Reling") )
+		Do $$$AssertTrue( LadeFamilieWaarden.Find("TBX_intivo") )
+		Do $$$AssertTrue( LadeFamilieWaarden.Find("Alle_TBX_geen_bevestigingen_nodig") )
+		Do $$$AssertTrue( LadeFamilieWaarden.Find("NietBlumLade") )
+	}
 ]]></Implementation>
 </Method>
 
@@ -246,10 +245,11 @@
 	
 	Do Exporter.AddWebsites()
 	
-	Do $$$AssertEquals( 1, Exporter.KenmerkQueryWaarden.Count() )
-	#Dim QueryParameter As DOM.PM.OL.Gamma.impl.KenmerkQueryParameter = Exporter.KenmerkQueryWaarden.GetAt( 1 )
-	Do $$$AssertEquals( "WebSites", QueryParameter.KenmerkNaam )
-	Do $$$AssertEquals( VerwachteWebsitesWaarde, QueryParameter.Waarde )
+	if $$$AssertEquals( Exporter.KenmerkQueryWaarden.Count() , 1 ) {
+		#Dim QueryParameter As DOM.PM.OL.Gamma.impl.KenmerkQueryParameter = Exporter.KenmerkQueryWaarden.GetAt( 1 )
+		Do $$$AssertEquals( QueryParameter.KenmerkNaam , "WebSites" )
+		Do $$$AssertEquals( QueryParameter.Waarde , VerwachteWebsitesWaarde )
+	}
 ]]></Implementation>
 </Method>
 </Class>