Index: APPS/TBXWeb/TBXContext.cls.xml
===================================================================
diff -u -r628 -r631
--- APPS/TBXWeb/TBXContext.cls.xml	(.../TBXContext.cls.xml)	(revision 628)
+++ APPS/TBXWeb/TBXContext.cls.xml	(.../TBXContext.cls.xml)	(revision 631)
@@ -436,8 +436,7 @@
 <ClassMethod>1</ClassMethod>
 <FormalSpec>sDomVERW:%String</FormalSpec>
 <ReturnType>DOM.PM.enu.TBXVerpakking</ReturnType>
-<Implementation><![CDATA[
-	Quit ##class(DOM.PM.enu.TBXVerpakking).StukMetOnderdelen()
+<Implementation><![CDATA[	Quit $S(sDomVERW="SFS":##class(DOM.PM.enu.TBXVerpakking).ProboxMetOnderdelen(), 1:##class(DOM.PM.enu.TBXVerpakking).StukMetOnderdelen())
 ]]></Implementation>
 </Method>