Index: vhUnitTest/DOM/AKP/impl/DataM/DataMToeleveringTest.cls.xml
===================================================================
diff -u -r44703 -r44716
--- vhUnitTest/DOM/AKP/impl/DataM/DataMToeleveringTest.cls.xml	(.../DataMToeleveringTest.cls.xml)	(revision 44703)
+++ vhUnitTest/DOM/AKP/impl/DataM/DataMToeleveringTest.cls.xml	(.../DataMToeleveringTest.cls.xml)	(revision 44716)
@@ -117,6 +117,23 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: bewaren wijziging op een toeleveringlijn">
+<Implementation><![CDATA[
+	#dim Toelevering As DOM.AKP.Toelevering = ##class(DOM.AKP.impl.DataM.DataMToelevering).OpenId(..#ToeleveringID)
+	#dim ToeleveringLijn As DOM.AKP.ProductToeleveringLijn = Toelevering.GeefToeleveringLijnViaVolgNr(102)
+
+	Do $$$AssertEquals(ToeleveringLijn.GeefBestelBevestigingNr(),"")
+	do ToeleveringLijn.ZetBestelBevestigingNr(4321)
+	do Toelevering.Save()
+	
+	kill Toelevering , ToeleveringLijn	
+	set Toelevering = ##class(DOM.AKP.impl.DataM.DataMToelevering).OpenId(..#ToeleveringID)
+	set ToeleveringLijn = Toelevering.GeefToeleveringLijnViaVolgNr(102)
+	
+	Do $$$AssertEquals(ToeleveringLijn.GeefBestelBevestigingNr(),4321)
+]]></Implementation>
+</Method>
+
 <Method name="Test : Events worden pas geraised bij het saven">
 <Implementation><![CDATA[
 	set ToeleveringGewijzigdEventTester = ##class(vhTest.Utils.TECH.PubSub.EventSubscription.Tester).%New("ToeleveringGewijzigdEvent")