Index: vhTest/Utils/APPS/EDI/common/dto/LadeTBX.cls.xml
===================================================================
diff -u -r54373 -r54513
--- vhTest/Utils/APPS/EDI/common/dto/LadeTBX.cls.xml	(.../LadeTBX.cls.xml)	(revision 54373)
+++ vhTest/Utils/APPS/EDI/common/dto/LadeTBX.cls.xml	(.../LadeTBX.cls.xml)	(revision 54513)
@@ -43,15 +43,26 @@
 ]]></Implementation>
 </Method>
 
-<Method name="DMZLade">
+<Method name="BinnenLade">
 <ClassMethod>1</ClassMethod>
 <ReturnType>APPS.EDI.common.dto.v001.LadeTBX</ReturnType>
 <Implementation><![CDATA[
 	#dim Resultaat As APPS.EDI.common.dto.v001.LadeTBX = ..StandaardLade()
 	
-	Set Resultaat.GreepEnMeenemer = "No"
 	Set Resultaat.IsBinnenlade = $$$True
 	Set Resultaat.FrontBevestiging = ##class(DOM.PM.enu.TBXFrontBevestiging).Zonder()
+	Set Resultaat.GreepEnMeenemer = "No"
+	
+	Quit Resultaat
+]]></Implementation>
+</Method>
+
+<Method name="DMZLade">
+<ClassMethod>1</ClassMethod>
+<ReturnType>APPS.EDI.common.dto.v001.LadeTBX</ReturnType>
+<Implementation><![CDATA[
+	#dim Resultaat As APPS.EDI.common.dto.v001.LadeTBX = ..BinnenLade()
+	
 	Set Resultaat.LadeHoogte = ##class(DOM.PM.enu.TBXLadehoogte).D()
 	Set Resultaat.RugHoogte = ##class(DOM.PM.enu.TBXRugHoogte).D()
 	Set Resultaat.ZijkantHoogte = ##class(DOM.PM.enu.TBXZijkantHoogte).M()