Index: vhUnitTest/APPS/EDIExport/AankoopOrder/impl/BLUM/Converteerder/Converteer/Test.cls.xml
===================================================================
diff -u -r35622 -r66494
--- vhUnitTest/APPS/EDIExport/AankoopOrder/impl/BLUM/Converteerder/Converteer/Test.cls.xml	(.../Test.cls.xml)	(revision 35622)
+++ vhUnitTest/APPS/EDIExport/AankoopOrder/impl/BLUM/Converteerder/Converteer/Test.cls.xml	(.../Test.cls.xml)	(revision 66494)
@@ -6,7 +6,7 @@
 <Method name="Test : Converteer BLUM aankooporder COMSO naar ORDERS05">
 <Implementation><![CDATA[
 	#dim Converteerder As APPS.EDIExport.AankoopOrder.impl.BLUM.Converteerder = ##class(APPS.EDIExport.AankoopOrder.impl.BLUM.Converteerder).%New()
-	#dim COMSODouble As APPS.EDIExport.AankoopOrder.BLUM.dto.COMSO = ##class(vhTest.Utils.APPS.EDIExport.AankoopOrder.BLUM.dto.COMSO).%New().GeefCOMSO()
+	#dim COMSODouble As APPS.EDIExport.AankoopOrder.BLUM.dto.COMSO = ##class(vhTest.Utils.APPS.EDIExport.AankoopOrder.BLUM.dto.COMSO).GeefCOMSO()
 	#dim ORDERS05List As %ListOfObjects = Converteerder.Converteer(COMSODouble)
 	
 	Do $$$AssertIsObject(ORDERS05List)
@@ -102,7 +102,7 @@
 <Method name="Test : Converteer BLUM eenheid COMSO (waarde 0) naar ORDERS05 (waarde 1)">
 <Implementation><![CDATA[
 	#dim Converteerder As APPS.EDIExport.AankoopOrder.impl.BLUM.Converteerder = ##class(APPS.EDIExport.AankoopOrder.impl.BLUM.Converteerder).%New()
-	#dim COMSODouble As APPS.EDIExport.AankoopOrder.BLUM.dto.COMSO = ##class(vhTest.Utils.APPS.EDIExport.AankoopOrder.BLUM.dto.COMSO).%New().GeefCOMSO()
+	#dim COMSODouble As APPS.EDIExport.AankoopOrder.BLUM.dto.COMSO = ##class(vhTest.Utils.APPS.EDIExport.AankoopOrder.BLUM.dto.COMSO).GeefCOMSO()
 	Set COMSODouble.ToeleveringList.GetAt(1).ToeleveringDetail.GetAt(1).PriceDimension = 0
 	#dim ORDERS05List As %ListOfObjects = Converteerder.Converteer(COMSODouble)
 	
@@ -120,7 +120,7 @@
 <Method name="Test : Converteer BLUM eenheid COMSO (waarde 1) naar ORDERS05 (waarde 100)">
 <Implementation><![CDATA[
 	#dim Converteerder As APPS.EDIExport.AankoopOrder.impl.BLUM.Converteerder = ##class(APPS.EDIExport.AankoopOrder.impl.BLUM.Converteerder).%New()
-	#dim COMSODouble As APPS.EDIExport.AankoopOrder.BLUM.dto.COMSO = ##class(vhTest.Utils.APPS.EDIExport.AankoopOrder.BLUM.dto.COMSO).%New().GeefCOMSO()
+	#dim COMSODouble As APPS.EDIExport.AankoopOrder.BLUM.dto.COMSO = ##class(vhTest.Utils.APPS.EDIExport.AankoopOrder.BLUM.dto.COMSO).GeefCOMSO()
 	Set COMSODouble.ToeleveringList.GetAt(1).ToeleveringDetail.GetAt(1).PriceDimension = 1
 	#dim ORDERS05List As %ListOfObjects = Converteerder.Converteer(COMSODouble)
 	
@@ -138,7 +138,7 @@
 <Method name="Test : Converteer BLUM eenheid COMSO (waarde 3) naar ORDERS05 (waarde 1000)">
 <Implementation><![CDATA[
 	#dim Converteerder As APPS.EDIExport.AankoopOrder.impl.BLUM.Converteerder = ##class(APPS.EDIExport.AankoopOrder.impl.BLUM.Converteerder).%New()
-	#dim COMSODouble As APPS.EDIExport.AankoopOrder.BLUM.dto.COMSO = ##class(vhTest.Utils.APPS.EDIExport.AankoopOrder.BLUM.dto.COMSO).%New().GeefCOMSO()
+	#dim COMSODouble As APPS.EDIExport.AankoopOrder.BLUM.dto.COMSO = ##class(vhTest.Utils.APPS.EDIExport.AankoopOrder.BLUM.dto.COMSO).GeefCOMSO()
 	Set COMSODouble.ToeleveringList.GetAt(1).ToeleveringDetail.GetAt(1).PriceDimension = 3
 	#dim ORDERS05List As %ListOfObjects = Converteerder.Converteer(COMSODouble)