Index: DOM/VKP/impl/DataM/DataMFactuur.cls.xml
===================================================================
diff -u -r34617 -r34643
--- DOM/VKP/impl/DataM/DataMFactuur.cls.xml	(.../DataMFactuur.cls.xml)	(revision 34617)
+++ DOM/VKP/impl/DataM/DataMFactuur.cls.xml	(.../DataMFactuur.cls.xml)	(revision 34643)
@@ -285,12 +285,15 @@
 <Implementation><![CDATA[
 	set BoekingPerRekening = ##class(%ArrayOfDataTypes).%New()
 	
+	#dim Factor As %Integer = $$$If(..GeefFactuurCode()="C",-1,1)
+	
+	
 	#dim Iterator As TECH.Iterator = ..GeefBonLijnIterator()
 	while Iterator.HasNext() {
 		#dim Lijn As DOM.VKP.PrijsOrderlijnMetBoekhoudInfo = Iterator.Next()
 		continue:($$$Not(##class(TECH.StringUtils).Equals(Lijn.GeefType(),##class(DOM.VKP.enu.BonLijnType).Product(),##class(DOM.VKP.enu.BonLijnType).Manueel())))
 		#dim Rekening As %String = $$$Trim(Lijn.GeefBoekhoudkundigeRekening())
-		#dim Bedrag As %String = Lijn.GeefTotaalNettoExclBTW()
+		#dim Bedrag As %String = Lijn.GeefTotaalNettoExclBTW()*Factor
 		
 		#dim Totaal As %String = BoekingPerRekening.GetAt(Rekening)
 		do BoekingPerRekening.SetAt(Bedrag+Totaal,Rekening)
@@ -303,7 +306,7 @@
 	set BoekingPerRekeningIterator = ##class(TECH.ListIterator).%New(BoekingPerRekening)
 	while BoekingPerRekeningIterator.HasNext() {
 		set BoekhoudBoeking = ##class(DOM.VKP.Factuur.dto.BoekhoudBoeking).%New()
-		set BoekhoudBoeking.Bedrag = BoekingPerRekeningIterator.Next()
+		set BoekhoudBoeking.Bedrag = ##class(TECH.Math).Round(BoekingPerRekeningIterator.Next(),2)
 		set BoekhoudBoeking.BoekhoudRekeningId = BoekingPerRekeningIterator.Key()
 		do List.Insert(BoekhoudBoeking)
 	}