Index: APPS/Halux/PPS/Document/impl/MVX/DwarsverdelingInkorten.cls.xml
===================================================================
diff -u -r74260 -r74288
--- APPS/Halux/PPS/Document/impl/MVX/DwarsverdelingInkorten.cls.xml	(.../DwarsverdelingInkorten.cls.xml)	(revision 74260)
+++ APPS/Halux/PPS/Document/impl/MVX/DwarsverdelingInkorten.cls.xml	(.../DwarsverdelingInkorten.cls.xml)	(revision 74288)
@@ -149,8 +149,8 @@
 		Set PropertyIterator = ##class(TECH.ListIterator).%New(..GeefTotalenPropertyVelden())
 		While PropertyIterator.HasNext() {
 			#dim TotaalSpecificatie As %String = PropertyIterator.Next()
-			#dim OpTeTellenPropertyName As %String = $P(TotaalSpecificatie, "->", 1)
-			#dim SomPropertyName As %String = $P(TotaalSpecificatie, "->", 2)
+			#dim OpTeTellenPropertyName As %String = $Piece(TotaalSpecificatie, "->", 1)
+			#dim SomPropertyName As %String = $Piece(TotaalSpecificatie, "->", 2)
 			If (SomPropertyName = "") { Set SomPropertyName = OpTeTellenPropertyName }
 			Set $Property(InkortenInfo, SomPropertyName) = $Property(InkortenInfo, SomPropertyName) + $Property(UitvoeringInfo, OpTeTellenPropertyName)
 		}