Index: DOM/VKP/dto/VerkoopPrijsUitzondering.cls.xml
===================================================================
diff -u -r45368 -r45369
--- DOM/VKP/dto/VerkoopPrijsUitzondering.cls.xml	(.../VerkoopPrijsUitzondering.cls.xml)	(revision 45368)
+++ DOM/VKP/dto/VerkoopPrijsUitzondering.cls.xml	(.../VerkoopPrijsUitzondering.cls.xml)	(revision 45369)
@@ -78,8 +78,8 @@
 	Set VerkoopPrijsUitzondering.VolgNr = $Piece(Subscript,",",7)
 	
 	#dim DataString As %String = @("^KLPUTZ("_Subscript_")")
-	
 	Set VerkoopPrijsUitzondering.Korting1 = $Piece(DataString,"\",1)
+	Set VerkoopPrijsUitzondering.Korting2 = $Piece(DataString,"\",2)
 	
 	Quit VerkoopPrijsUitzondering
 ]]></Implementation>
Index: vhUnitTest/DOM/VKP/dto/VerkoopPrijsUitzondering/Test.cls.xml
===================================================================
diff -u -r45368 -r45369
--- vhUnitTest/DOM/VKP/dto/VerkoopPrijsUitzondering/Test.cls.xml	(.../Test.cls.xml)	(revision 45368)
+++ vhUnitTest/DOM/VKP/dto/VerkoopPrijsUitzondering/Test.cls.xml	(.../Test.cls.xml)	(revision 45369)
@@ -142,6 +142,22 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: Piece 2 is korting2">
+<Implementation><![CDATA[
+	Set VerkoopPrijsUitzondering = ##class(DOM.VKP.dto.VerkoopPrijsUitzondering).%New()
+	Set VerkoopPrijsUitzondering.KlantId = "K||999"
+	Set VerkoopPrijsUitzondering.Korting2 = "75"
+	#dim OpgezetteDataString As %String = VerkoopPrijsUitzondering.ToDataString()
+	Set ..OpgezetteSubscript = VerkoopPrijsUitzondering.ToSubscript()
+	
+	Set @("^KLPUTZ("_..OpgezetteSubscript_")") = OpgezetteDataString
+	
+	#dim Uitzondering As DOM.VKP.dto.VerkoopPrijsUitzondering = ##class(DOM.VKP.dto.VerkoopPrijsUitzondering).FromNode(..OpgezetteSubscript)
+	
+	Do $$$AssertEquals(Uitzondering.Korting2,"75")
+]]></Implementation>
+</Method>
+
 <Method name="KuisDataOp">
 <Private>1</Private>
 <Implementation><![CDATA[