Index: vhTest/Utils/APPS/EDIExport/AankoopOrderResponse/BLUM/XML/ORDERS05.cls.xml
===================================================================
diff -u -r35597 -r43002
--- vhTest/Utils/APPS/EDIExport/AankoopOrderResponse/BLUM/XML/ORDERS05.cls.xml	(.../ORDERS05.cls.xml)	(revision 35597)
+++ vhTest/Utils/APPS/EDIExport/AankoopOrderResponse/BLUM/XML/ORDERS05.cls.xml	(.../ORDERS05.cls.xml)	(revision 43002)
@@ -4,6 +4,7 @@
 <Super>TECH.RegisteredObject</Super>
 
 <Method name="GeefORDERS05">
+<ClassMethod>1</ClassMethod>
 <ReturnType>APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05</ReturnType>
 <Implementation><![CDATA[
 	#dim ORDERS05 As APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05 = ##class(APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05).%New()
Index: vhUnitTest/APPS/EDIExport/AankoopOrderResponse/BLUM/impl/Converteerder/Converteer/Test.cls.xml
===================================================================
diff -u -r38960 -r43002
--- vhUnitTest/APPS/EDIExport/AankoopOrderResponse/BLUM/impl/Converteerder/Converteer/Test.cls.xml	(.../Test.cls.xml)	(revision 38960)
+++ vhUnitTest/APPS/EDIExport/AankoopOrderResponse/BLUM/impl/Converteerder/Converteer/Test.cls.xml	(.../Test.cls.xml)	(revision 43002)
@@ -6,7 +6,7 @@
 <Method name="Test : Converteer BLUM aankooporderresponse ORDERS05 waaronder 1 prod zonder schedule naar COASO">
 <Implementation><![CDATA[
 	#Dim Converteerder As APPS.EDIExport.AankoopOrderResponse.BLUM.impl.Converteerder = ##class(APPS.EDIExport.AankoopOrderResponse.BLUM.impl.Converteerder).%New()
-	#Dim ORDERS05Double As APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05 = ##class(vhTest.Utils.APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05).%New().GeefORDERS05()
+	#Dim ORDERS05Double As APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05 = ##class(vhTest.Utils.APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05).GeefORDERS05()
 	; verwijder E1EDP20 tags voor 1 artikel
 	
 	Do ##class(vhUnitTest.DataHelper).VerwijderToelevering(277788)
@@ -70,7 +70,7 @@
 <Method name="Test : Converteer BLUM aankooporderresponse ORDERS05 naar COASO">
 <Implementation><![CDATA[
 	#dim Converteerder As APPS.EDIExport.AankoopOrderResponse.BLUM.impl.Converteerder = ##class(APPS.EDIExport.AankoopOrderResponse.BLUM.impl.Converteerder).%New()
-	#dim ORDERS05Double As APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05 = ##class(vhTest.Utils.APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05).%New().GeefORDERS05()
+	#dim ORDERS05Double As APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05 = ##class(vhTest.Utils.APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05).GeefORDERS05()
 	#dim COASO As APPS.EDIExport.AankoopOrderResponse.BLUM.dto.COASO = Converteerder.Converteer(ORDERS05Double)
 	
 	Do $$$AssertIsObject(COASO)
@@ -124,7 +124,7 @@
 <Method name="Test : BLUM ORDERS05 Prijsdimensie 1000 wordt code 3 voor COASO">
 <Implementation><![CDATA[
 	#dim Converteerder As APPS.EDIExport.AankoopOrderResponse.BLUM.impl.Converteerder = ##class(APPS.EDIExport.AankoopOrderResponse.BLUM.impl.Converteerder).%New()
-	#dim ORDERS05Double As APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05 = ##class(vhTest.Utils.APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05).%New().GeefORDERS05()
+	#dim ORDERS05Double As APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05 = ##class(vhTest.Utils.APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05).GeefORDERS05()
 	Set ORDERS05Double.IDOC.E1EDP01.GetAt(1).E1EDP05.UPRBS="1000"
 	
 	#dim COASO As APPS.EDIExport.AankoopOrderResponse.BLUM.dto.COASO = Converteerder.Converteer(ORDERS05Double)
@@ -136,7 +136,7 @@
 <Method name="Test : BLUM ORDERS05 Prijsdimensie 1 wordt code 0 voor COASO">
 <Implementation><![CDATA[
 	#dim Converteerder As APPS.EDIExport.AankoopOrderResponse.BLUM.impl.Converteerder = ##class(APPS.EDIExport.AankoopOrderResponse.BLUM.impl.Converteerder).%New()
-	#dim ORDERS05Double As APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05 = ##class(vhTest.Utils.APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05).%New().GeefORDERS05()
+	#dim ORDERS05Double As APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05 = ##class(vhTest.Utils.APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05).GeefORDERS05()
 	Set ORDERS05Double.IDOC.E1EDP01.GetAt(1).E1EDP05.UPRBS="1"
 	
 	#dim COASO As APPS.EDIExport.AankoopOrderResponse.BLUM.dto.COASO = Converteerder.Converteer(ORDERS05Double)
@@ -148,7 +148,7 @@
 <Method name="Test : BLUM ORDERS05 Prijsdimensie 100 wordt code 2 voor COASO">
 <Implementation><![CDATA[
 	#dim Converteerder As APPS.EDIExport.AankoopOrderResponse.BLUM.impl.Converteerder = ##class(APPS.EDIExport.AankoopOrderResponse.BLUM.impl.Converteerder).%New()
-	#dim ORDERS05Double As APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05 = ##class(vhTest.Utils.APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05).%New().GeefORDERS05()
+	#dim ORDERS05Double As APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05 = ##class(vhTest.Utils.APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05).GeefORDERS05()
 	Set ORDERS05Double.IDOC.E1EDP01.GetAt(1).E1EDP05.UPRBS="100"
 	
 	#dim COASO As APPS.EDIExport.AankoopOrderResponse.BLUM.dto.COASO = Converteerder.Converteer(ORDERS05Double)
@@ -160,7 +160,7 @@
 <Method name="Test : BLUM ABGRU status leeg wordt shipmentstatus 3 voor COASO">
 <Implementation><![CDATA[
 	#dim Converteerder As APPS.EDIExport.AankoopOrderResponse.BLUM.impl.Converteerder = ##class(APPS.EDIExport.AankoopOrderResponse.BLUM.impl.Converteerder).%New()
-	#dim ORDERS05Double As APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05 = ##class(vhTest.Utils.APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05).%New().GeefORDERS05()
+	#dim ORDERS05Double As APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05 = ##class(vhTest.Utils.APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05).GeefORDERS05()
 	Set ORDERS05Double.IDOC.E1EDP01.GetAt(1).ABGRU =""
 	
 	#dim COASO As APPS.EDIExport.AankoopOrderResponse.BLUM.dto.COASO = Converteerder.Converteer(ORDERS05Double)
@@ -172,7 +172,7 @@
 <Method name="Test : BLUM ABGRU status 90 wordt shipmentstatus 3 voor COASO">
 <Implementation><![CDATA[
 	#dim Converteerder As APPS.EDIExport.AankoopOrderResponse.BLUM.impl.Converteerder = ##class(APPS.EDIExport.AankoopOrderResponse.BLUM.impl.Converteerder).%New()
-	#dim ORDERS05Double As APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05 = ##class(vhTest.Utils.APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05).%New().GeefORDERS05()
+	#dim ORDERS05Double As APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05 = ##class(vhTest.Utils.APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05).GeefORDERS05()
 	Set ORDERS05Double.IDOC.E1EDP01.GetAt(1).ABGRU ="90"
 	
 	#dim COASO As APPS.EDIExport.AankoopOrderResponse.BLUM.dto.COASO = Converteerder.Converteer(ORDERS05Double)
@@ -184,7 +184,7 @@
 <Method name="Test : BLUM ABGRU status 10 wordt shipmentstatus 0 voor COASO">
 <Implementation><![CDATA[
 	#dim Converteerder As APPS.EDIExport.AankoopOrderResponse.BLUM.impl.Converteerder = ##class(APPS.EDIExport.AankoopOrderResponse.BLUM.impl.Converteerder).%New()
-	#dim ORDERS05Double As APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05 = ##class(vhTest.Utils.APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05).%New().GeefORDERS05()
+	#dim ORDERS05Double As APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05 = ##class(vhTest.Utils.APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05).GeefORDERS05()
 	Set ORDERS05Double.IDOC.E1EDP01.GetAt(1).ABGRU ="10"
 	#dim COASO As APPS.EDIExport.AankoopOrderResponse.BLUM.dto.COASO = Converteerder.Converteer(ORDERS05Double)
 	Do $$$AssertEquals(COASO.ToeleveringList.GetAt(1).ToeleveringDetail.GetAt(1).ShipmentStatus,"0")
@@ -194,7 +194,7 @@
 <Method name="Test : BLUM ABGRU status leeg wordt reasoncode V voor COASO">
 <Implementation><![CDATA[
 	#dim Converteerder As APPS.EDIExport.AankoopOrderResponse.BLUM.impl.Converteerder = ##class(APPS.EDIExport.AankoopOrderResponse.BLUM.impl.Converteerder).%New()
-	#dim ORDERS05Double As APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05 = ##class(vhTest.Utils.APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05).%New().GeefORDERS05()
+	#dim ORDERS05Double As APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05 = ##class(vhTest.Utils.APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05).GeefORDERS05()
 	Set ORDERS05Double.IDOC.E1EDP01.GetAt(1).ABGRU =""
 	
 	#dim COASO As APPS.EDIExport.AankoopOrderResponse.BLUM.dto.COASO = Converteerder.Converteer(ORDERS05Double)
@@ -206,7 +206,7 @@
 <Method name="Test : BLUM ABGRU status 90 wordt reasoncode V voor COASO">
 <Implementation><![CDATA[
 	#dim Converteerder As APPS.EDIExport.AankoopOrderResponse.BLUM.impl.Converteerder = ##class(APPS.EDIExport.AankoopOrderResponse.BLUM.impl.Converteerder).%New()
-	#dim ORDERS05Double As APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05 = ##class(vhTest.Utils.APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05).%New().GeefORDERS05()
+	#dim ORDERS05Double As APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05 = ##class(vhTest.Utils.APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05).GeefORDERS05()
 	Set ORDERS05Double.IDOC.E1EDP01.GetAt(1).ABGRU ="90"
 	
 	#dim COASO As APPS.EDIExport.AankoopOrderResponse.BLUM.dto.COASO = Converteerder.Converteer(ORDERS05Double)
@@ -218,7 +218,7 @@
 <Method name="Test : BLUM ABGRU status 10 wordt reasoncode C voor COASO">
 <Implementation><![CDATA[
 	#dim Converteerder As APPS.EDIExport.AankoopOrderResponse.BLUM.impl.Converteerder = ##class(APPS.EDIExport.AankoopOrderResponse.BLUM.impl.Converteerder).%New()
-	#dim ORDERS05Double As APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05 = ##class(vhTest.Utils.APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05).%New().GeefORDERS05()
+	#dim ORDERS05Double As APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05 = ##class(vhTest.Utils.APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05).GeefORDERS05()
 	Set ORDERS05Double.IDOC.E1EDP01.GetAt(1).ABGRU ="10"
 	
 	#dim COASO As APPS.EDIExport.AankoopOrderResponse.BLUM.dto.COASO = Converteerder.Converteer(ORDERS05Double)
@@ -230,7 +230,7 @@
 <Method name="Test : BLUM ABGRU status leeg wordt DeliveryDateCode 2 voor COASO">
 <Implementation><![CDATA[
 	#dim Converteerder As APPS.EDIExport.AankoopOrderResponse.BLUM.impl.Converteerder = ##class(APPS.EDIExport.AankoopOrderResponse.BLUM.impl.Converteerder).%New()
-	#dim ORDERS05Double As APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05 = ##class(vhTest.Utils.APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05).%New().GeefORDERS05()
+	#dim ORDERS05Double As APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05 = ##class(vhTest.Utils.APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05).GeefORDERS05()
 	Set ORDERS05Double.IDOC.E1EDP01.GetAt(1).ABGRU =""
 	
 	#dim COASO As APPS.EDIExport.AankoopOrderResponse.BLUM.dto.COASO = Converteerder.Converteer(ORDERS05Double)
@@ -242,7 +242,7 @@
 <Method name="Test : BLUM ABGRU status 90 wordt DeliveryDateCode 2 voor COASO">
 <Implementation><![CDATA[
 	#dim Converteerder As APPS.EDIExport.AankoopOrderResponse.BLUM.impl.Converteerder = ##class(APPS.EDIExport.AankoopOrderResponse.BLUM.impl.Converteerder).%New()
-	#dim ORDERS05Double As APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05 = ##class(vhTest.Utils.APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05).%New().GeefORDERS05()
+	#dim ORDERS05Double As APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05 = ##class(vhTest.Utils.APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05).GeefORDERS05()
 	Set ORDERS05Double.IDOC.E1EDP01.GetAt(1).ABGRU ="90"
 	
 	#dim COASO As APPS.EDIExport.AankoopOrderResponse.BLUM.dto.COASO = Converteerder.Converteer(ORDERS05Double)
@@ -254,7 +254,7 @@
 <Method name="Test : BLUM ABGRU status 10 wordt DeliveryDateCode 2 voor COASO">
 <Implementation><![CDATA[
 	#dim Converteerder As APPS.EDIExport.AankoopOrderResponse.BLUM.impl.Converteerder = ##class(APPS.EDIExport.AankoopOrderResponse.BLUM.impl.Converteerder).%New()
-	#dim ORDERS05Double As APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05 = ##class(vhTest.Utils.APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05).%New().GeefORDERS05()
+	#dim ORDERS05Double As APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05 = ##class(vhTest.Utils.APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05).GeefORDERS05()
 	Set ORDERS05Double.IDOC.E1EDP01.GetAt(1).ABGRU ="10"
 	
 	#dim COASO As APPS.EDIExport.AankoopOrderResponse.BLUM.dto.COASO = Converteerder.Converteer(ORDERS05Double)
@@ -266,7 +266,7 @@
 <Method name="Test : BLUM order niet aanvaard geeft een lijn zonder aantallen en status No shipment en Position cancelled">
 <Implementation><![CDATA[
 	#Dim Converteerder As APPS.EDIExport.AankoopOrderResponse.BLUM.impl.Converteerder = ##class(APPS.EDIExport.AankoopOrderResponse.BLUM.impl.Converteerder).%New()
-	#Dim ORDERS05Double As APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05 = ##class(vhTest.Utils.APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05).%New().GeefORDERS05()
+	#Dim ORDERS05Double As APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05 = ##class(vhTest.Utils.APPS.EDIExport.AankoopOrderResponse.BLUM.XML.ORDERS05).GeefORDERS05()
 	Do ORDERS05Double.IDOC.E1EDP01.GetAt(1).E1EDP20.Clear()
 	Set ORDERS05Double.IDOC.E1EDP01.GetAt(1).ABGRU ="10"