Index: BL/PPS/TBX/WPPers/InfoBepaler.cls.xml
===================================================================
diff -u -r57675 -r57676
--- BL/PPS/TBX/WPPers/InfoBepaler.cls.xml	(.../InfoBepaler.cls.xml)	(revision 57675)
+++ BL/PPS/TBX/WPPers/InfoBepaler.cls.xml	(.../InfoBepaler.cls.xml)	(revision 57676)
@@ -103,7 +103,7 @@
 
 	#dim Info2 As %String = ""
 	
-	If $$$Not(TBX.GeefDwarsverdeling()=##class(DOM.PM.enu.TBXDwarsverdeling).Zonder()) && $$$Not(..IsV1Verpakking(TBX)) {
+	If ..HeeftDwarsverdeling(TBX) && $$$Not(..IsV1Verpakking(TBX)) {
 		Set Info2 = ..GeefInfoMetMelding(Info2, "DWV:"_TBX.GeefDwarsverdeling())
 	}
 	
@@ -122,6 +122,14 @@
 <Implementation><![CDATA[	Quit (TBX.GeefVerpakking()= ##class(DOM.PM.enu.TBXVerpakking).StukMetOnderdelen())
 ]]></Implementation>
 </Method>
+
+<Method name="HeeftDwarsverdeling">
+<FormalSpec>TBX:DOM.PM.TBXProduct.TBXLade</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit $$$Not(TBX.GeefDwarsverdeling()=##class(DOM.PM.enu.TBXDwarsverdeling).Zonder())
+]]></Implementation>
+</Method>
 </Class>