Index: vhTest/Mock/DOM/AKP/ProductToeleveringLijn.cls.xml
===================================================================
diff -u -r44715 -r44732
--- vhTest/Mock/DOM/AKP/ProductToeleveringLijn.cls.xml	(.../ProductToeleveringLijn.cls.xml)	(revision 44715)
+++ vhTest/Mock/DOM/AKP/ProductToeleveringLijn.cls.xml	(.../ProductToeleveringLijn.cls.xml)	(revision 44732)
@@ -7,12 +7,6 @@
 <ProcedureBlock>1</ProcedureBlock>
 <Super>DOM.AKP.ProductToeleveringLijn,vhTest.Mock.DOM.AKP.ToeleveringLijn</Super>
 
-<Method name="GeefABLijnNummer">
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefABLijnNummer")
-]]></Implementation>
-</Method>
-
 <Method name="GeefAantal">
 <ReturnType>%Integer</ReturnType>
 <Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefAantal")
@@ -145,12 +139,6 @@
 ]]></Implementation>
 </Method>
 
-<Method name="ZetABLijnNummer">
-<FormalSpec>ABLijnNummer:%String</FormalSpec>
-<Implementation><![CDATA[	do ..VerwerkMethodCall("ZetABLijnNummer",ABLijnNummer)
-]]></Implementation>
-</Method>
-
 <Method name="ZetAantal">
 <FormalSpec>Aantal:%Integer</FormalSpec>
 <Implementation><![CDATA[	do ..VerwerkMethodCall("ZetAantal",Aantal)
Index: DOM/AKP/ProductToeleveringLijn.cls.xml
===================================================================
diff -u -r44715 -r44732
--- DOM/AKP/ProductToeleveringLijn.cls.xml	(.../ProductToeleveringLijn.cls.xml)	(revision 44715)
+++ DOM/AKP/ProductToeleveringLijn.cls.xml	(.../ProductToeleveringLijn.cls.xml)	(revision 44732)
@@ -67,16 +67,6 @@
 <ReturnType>%Decimal</ReturnType>
 </Method>
 
-<Method name="ZetABLijnNummer">
-<Abstract>1</Abstract>
-<FormalSpec>ABLijnNummer:%String</FormalSpec>
-</Method>
-
-<Method name="GeefABLijnNummer">
-<Abstract>1</Abstract>
-<ReturnType>%String</ReturnType>
-</Method>
-
 <Method name="ZetUniekLijnNummer">
 <Abstract>1</Abstract>
 <FormalSpec>UniekLijnNummer:%String</FormalSpec>
Index: DOM/AKP/impl/DataM/DataMProductToeleveringLijn.cls.xml
===================================================================
diff -u -r44714 -r44732
--- DOM/AKP/impl/DataM/DataMProductToeleveringLijn.cls.xml	(.../DataMProductToeleveringLijn.cls.xml)	(revision 44714)
+++ DOM/AKP/impl/DataM/DataMProductToeleveringLijn.cls.xml	(.../DataMProductToeleveringLijn.cls.xml)	(revision 44732)
@@ -109,6 +109,26 @@
 ]]></Implementation>
 </Method>
 
+<Method name="ZetNettoprijs">
+<FormalSpec>NettoPrijs:%Float</FormalSpec>
+<Implementation><![CDATA[
+	Do ..ZetPiece(9,NettoPrijs)
+	Do ..ZetPiece(10,NettoPrijs)
+]]></Implementation>
+</Method>
+
+<Method name="ZetUrgentiecode">
+<FormalSpec>Urgentiecode:%String</FormalSpec>
+<Implementation><![CDATA[	Do ..ZetPiece(31,Urgentiecode)
+]]></Implementation>
+</Method>
+
+<Method name="GeefUrgentiecode">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ..GeefPiece(31)
+]]></Implementation>
+</Method>
+
 <Method name="IsIDGewijzigd">
 <Private>1</Private>
 <ReturnType>%Boolean</ReturnType>
Index: DOM/AKP/impl/DataM/DataMToeleveringLijn.cls.xml
===================================================================
diff -u -r44726 -r44732
--- DOM/AKP/impl/DataM/DataMToeleveringLijn.cls.xml	(.../DataMToeleveringLijn.cls.xml)	(revision 44726)
+++ DOM/AKP/impl/DataM/DataMToeleveringLijn.cls.xml	(.../DataMToeleveringLijn.cls.xml)	(revision 44732)
@@ -117,18 +117,6 @@
 ]]></Implementation>
 </Method>
 
-<Method name="GeefABLijnNummer">
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit ..GeefPiece(14)
-]]></Implementation>
-</Method>
-
-<Method name="ZetABLijnNummer">
-<FormalSpec>ABLijnNummer:%String</FormalSpec>
-<Implementation><![CDATA[	do ..ZetPiece(14,ABLijnNummer)
-]]></Implementation>
-</Method>
-
 <Method name="GeefBestelBevestigingNr">
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[	Quit ..GeefPiece(14)
@@ -171,27 +159,29 @@
 ]]></Implementation>
 </Method>
 
-<Method name="GeefUniekLijnNummer">
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit ..GeefPiece(15)
+<Method name="GeefNettoprijs">
+<Abstract>1</Abstract>
+<ReturnType>%Float</ReturnType>
+<Implementation><![CDATA[	Quit ..GeefPiece(9)
 ]]></Implementation>
 </Method>
 
-<Method name="ZetUniekLijnNummer">
-<FormalSpec>UniekLijnNummer:%String</FormalSpec>
-<Implementation><![CDATA[	Quit ..ZetPiece(15,UniekLijnNummer)
+<Method name="ZetNettoprijs">
+<Abstract>1</Abstract>
+<FormalSpec>Nettoprijs:%Float</FormalSpec>
+<Implementation><![CDATA[	do ..ZetPiece(9,Nettoprijs)
 ]]></Implementation>
 </Method>
 
-<Method name="GeefUrgentiecode">
+<Method name="GeefUniekLijnNummer">
 <ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit ..GeefPiece(31)
+<Implementation><![CDATA[	Quit ..GeefPiece(15)
 ]]></Implementation>
 </Method>
 
-<Method name="ZetUrgentiecode">
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit ..GeefPiece(31)
+<Method name="ZetUniekLijnNummer">
+<FormalSpec>UniekLijnNummer:%String</FormalSpec>
+<Implementation><![CDATA[	Do ..ZetPiece(15,UniekLijnNummer)
 ]]></Implementation>
 </Method>
 
Index: vhUnitTest/DOM/AKP/impl/DataM/DataMToeleveringTestProperties.cls.xml
===================================================================
diff -u -r44726 -r44732
--- vhUnitTest/DOM/AKP/impl/DataM/DataMToeleveringTestProperties.cls.xml	(.../DataMToeleveringTestProperties.cls.xml)	(revision 44726)
+++ vhUnitTest/DOM/AKP/impl/DataM/DataMToeleveringTestProperties.cls.xml	(.../DataMToeleveringTestProperties.cls.xml)	(revision 44732)
@@ -127,6 +127,96 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test ProductToeleveringLijn property AantalBesteld">
+<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 ToeleveringLijn.ZetAantal(2)
+	Do Toelevering.Save()
+	Kill Toelevering
+
+	Set Toelevering = ##class(DOM.AKP.impl.DataM.DataMToelevering).OpenId(..#ToeleveringID)
+	Set ToeleveringLijn = Toelevering.GeefToeleveringLijnViaVolgNr(102)
+
+	Do ..AssertToeleveringLijn(ToeleveringLijn,"Aantal",2)
+]]></Implementation>
+</Method>
+
+<Method name="Test ProductToeleveringLijn property EenheidsPrijs">
+<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 ToeleveringLijn.ZetEenheidsPrijs(123)
+	Do Toelevering.Save()
+	Kill Toelevering
+
+	Set Toelevering = ##class(DOM.AKP.impl.DataM.DataMToelevering).OpenId(..#ToeleveringID)
+	Set ToeleveringLijn = Toelevering.GeefToeleveringLijnViaVolgNr(102)
+
+	Do ..AssertToeleveringLijn(ToeleveringLijn,"EenheidsPrijs",123)
+]]></Implementation>
+</Method>
+
+<Method name="Test ProductToeleveringLijn property Nettoprijs">
+<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 ToeleveringLijn.ZetNettoprijs(123)
+	Do Toelevering.Save()
+	Kill Toelevering
+
+	Set Toelevering = ##class(DOM.AKP.impl.DataM.DataMToelevering).OpenId(..#ToeleveringID)
+	Set ToeleveringLijn = Toelevering.GeefToeleveringLijnViaVolgNr(102)
+
+	Do ..AssertToeleveringLijn(ToeleveringLijn,"NettoPrijs",123)
+]]></Implementation>
+</Method>
+
+<Method name="Test ProductToeleveringLijn property BestelBevestigingNr">
+<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 ToeleveringLijn.ZetBestelBevestigingNr(123)
+	Do Toelevering.Save()
+	Kill Toelevering
+
+	Set Toelevering = ##class(DOM.AKP.impl.DataM.DataMToelevering).OpenId(..#ToeleveringID)
+	Set ToeleveringLijn = Toelevering.GeefToeleveringLijnViaVolgNr(102)
+
+	Do ..AssertToeleveringLijn(ToeleveringLijn,"BestelBevestigingNr",123)
+]]></Implementation>
+</Method>
+
+<Method name="Test ProductToeleveringLijn property UniekLijnNummer">
+<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 ToeleveringLijn.ZetUniekLijnNummer(123)
+	Do Toelevering.Save()
+	Kill Toelevering
+
+	Set Toelevering = ##class(DOM.AKP.impl.DataM.DataMToelevering).OpenId(..#ToeleveringID)
+	Set ToeleveringLijn = Toelevering.GeefToeleveringLijnViaVolgNr(102)
+
+	Do ..AssertToeleveringLijn(ToeleveringLijn,"UniekLijnNummer",123)
+]]></Implementation>
+</Method>
+
+<Method name="Test ProductToeleveringLijn property Urgentiecode">
+<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 ToeleveringLijn.ZetUrgentiecode("URG")
+	Do Toelevering.Save()
+	Kill Toelevering
+
+	Set Toelevering = ##class(DOM.AKP.impl.DataM.DataMToelevering).OpenId(..#ToeleveringID)
+	Set ToeleveringLijn = Toelevering.GeefToeleveringLijnViaVolgNr(102)
+
+	Do ..AssertToeleveringLijn(ToeleveringLijn,"Urgentiecode","URG")
+]]></Implementation>
+</Method>
+
 <Method name="VerwijderTestData">
 <Private>1</Private>
 <Implementation><![CDATA[	do ##class(vhUnitTest.DOM.PM.TestData).%New().VerwijderTestData(1000,1002)
@@ -173,12 +263,11 @@
 <Private>1</Private>
 <Implementation><![CDATA[
 	Do $$$AssertEquals(ToeleveringLijn.GeefAantal(),$Select(Propertyname="Aantal":Value,1:1))
-	Do $$$AssertEquals(ToeleveringLijn.GeefABLijnNummer(),$Select(Propertyname="ABLijnNummer":Value,1:""))
-	Do $$$AssertEquals(ToeleveringLijn.GeefBestelBevestigingNr(),$Select(Propertyname="BevestigingNr":Value,1:""))
+	Do $$$AssertEquals(ToeleveringLijn.GeefBestelBevestigingNr(),$Select(Propertyname="BestelBevestigingNr":Value,1:""))
 	Do $$$AssertEquals(ToeleveringLijn.GeefBlumLijnNr(),$Select(Propertyname="BlumLijnNr":Value,1:""))
 	Do $$$AssertEquals(ToeleveringLijn.GeefEenheidsPrijs(),$Select(Propertyname="EenheidsPrijs":Value,1:""))
 	Do $$$AssertEquals(ToeleveringLijn.GeefGrootteOrde(),$Select(Propertyname="GrootteOrde":Value,1:""))
-	Do $$$AssertEquals(ToeleveringLijn.GeefID(),$Select(Propertyname="ID":Value,1:110))
+	Do $$$AssertEquals(ToeleveringLijn.GeefID(),$Select(((Propertyname="ID")||(Propertyname="UniekLijnNummer")):Value,1:110))
 	Do $$$AssertEquals(ToeleveringLijn.GeefKorting(),$Select(Propertyname="Korting":Value,1:0))
 	Do $$$AssertEquals(ToeleveringLijn.GeefLeverdag(),$Select(Propertyname="Leverdag":Value,1:62168))
 	Do $$$AssertEquals(ToeleveringLijn.GeefLeveringsWeekVoorziene(),$Select(Propertyname="LeveringsWeekVoorziene":Value,1:""))
@@ -193,8 +282,9 @@
 	Do $$$AssertEquals(ToeleveringLijn.GeefProductID(),$Select(Propertyname="ProductID":Value,1:1002))
 	Do $$$AssertEquals(ToeleveringLijn.GeefSoortLijn(),$Select(Propertyname="SoortLijn":Value,1:"KTRPL"))
 	Do $$$AssertEquals(ToeleveringLijn.GeefTotaalBedrag(),$Select(Propertyname="TotaalBedrag":Value,1:""))
+	; cfr ID
 	Do $$$AssertEquals(ToeleveringLijn.GeefUniekLijnNummer(),$Select(Propertyname="UniekLijnNummer":Value,1:"110"))
-	Do $$$AssertEquals(ToeleveringLijn.GeefUrgentiecode(),$Select(Propertyname="UrgentieCode":Value,1:""))
+	Do $$$AssertEquals(ToeleveringLijn.GeefUrgentiecode(),$Select(Propertyname="Urgentiecode":Value,1:""))
 ]]></Implementation>
 </Method>
 </Class>