Index: AXimpl/Admin/STAT/Invoice/Processor.cls.xml
===================================================================
diff -u -r54316 -r54330
--- AXimpl/Admin/STAT/Invoice/Processor.cls.xml	(.../Processor.cls.xml)	(revision 54316)
+++ AXimpl/Admin/STAT/Invoice/Processor.cls.xml	(.../Processor.cls.xml)	(revision 54330)
@@ -75,7 +75,6 @@
 				Do ..ProcessKlantProductMaandRec(Line, KlantNr, ProductId, Maand) // Ook ProductMaandRec EN ProductKlantMaandRec
 				Do ..ProcessProductLastInfoRec(Line, ProductId)
 			}
-			Do ..ProcessKlantMaandRec(Line, KlantNr,Maand) // Afgezonderd van ProcessKlantProductMaandRec => check bestaan product irrelevant & Product kan verwijderd zijn!
 			Do ..SetLastProcessedRecord(Line.RecId)
 		}
 		If $$$Not(Line.Currency = "EUR") {
@@ -248,14 +247,7 @@
 	Set $Piece(ProductMaandRec,"\",3) = $Piece(ProductMaandRec,"\",3) + Line.LineAmount
 	Set $Piece(ProductMaandRec,"\",4) = $Piece(ProductMaandRec,"\",4)+Marge
 	Set ^KSTPR(ProductId,0,Maand) = ProductMaandRec
-]]></Implementation>
-</Method>
-
-<Method name="ProcessKlantMaandRec">
-<FormalSpec>Line:AXimpl.Admin.STAT.Invoice.Line,KlantNr:%Integer,Maand:%String</FormalSpec>
-<Private>1</Private>
-<Implementation><![CDATA[
-	#dim Marge as %Decimal = Line.LineAmount - Line.LineCost
+	
 	#dim KlantMaandRec As %String = $Get(^KSTKL(KlantNr,0,Maand),"")
 	Set $Piece(KlantMaandRec,"\",1) = $Piece(KlantMaandRec,"\",1) + Line.InventQty
 	Set $Piece(KlantMaandRec,"\",2) = $Piece(KlantMaandRec,"\",2) + 1
@@ -330,7 +322,7 @@
 <FormalSpec>KlantNr:%String</FormalSpec>
 <Private>1</Private>
 <ReturnType>%Boolean</ReturnType>
-<Implementation><![CDATA[	Quit +KlantNr="7587" // Halux is intercompany en mag daarom niet meespelen
+<Implementation><![CDATA[	Quit +KlantNr=7587 // Halux is intercompany en mag daarom niet meespelen
 ]]></Implementation>
 </Method>