Index: AXimpl/Admin/STAT/Invoice/Processor.cls.xml
===================================================================
diff -u -r49655 -r49681
--- AXimpl/Admin/STAT/Invoice/Processor.cls.xml	(.../Processor.cls.xml)	(revision 49655)
+++ AXimpl/Admin/STAT/Invoice/Processor.cls.xml	(.../Processor.cls.xml)	(revision 49681)
@@ -3,8 +3,8 @@
 <Class name="AXimpl.Admin.STAT.Invoice.Processor">
 <Super>TECH.RegisteredObject</Super>
 
-<Property name="StatistiekMaand">
-<Type>%Date</Type>
+<Property name="InvoiceDate">
+<Type>%String</Type>
 <Private>1</Private>
 </Property>
 
@@ -42,10 +42,8 @@
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
-	Set ..StatistiekMaand=StatistiekMaand
-	#dim LastProcessedRecId As %Integer = ..GetLastProcessedRecord()
-	#dim InvoiceDate As %String = ..GeefDag1LopendeMaand()
-	Set ..InvoiceLineIterator = $$$Inject(InvoiceLineIterator, ##class(AXimpl.Admin.STAT.Invoice.LineIterator).%New(,InvoiceDate))
+	Set ..InvoiceDate = ..GeefDag1LopendeMaand(StatistiekMaand)
+	Set ..InvoiceLineIterator = $$$Inject(InvoiceLineIterator, ##class(AXimpl.Admin.STAT.Invoice.LineIterator).%New(,..InvoiceDate))
 	Set ..ProductApi = $$$Inject(ProductApi, ##class(DOM.DomeinContext).Instance().GeefProductAPI())
 	Set ..DateTimeApi = $$$Inject(DateTimeApi, ##class(TECH.Context).Instance().GeefDateTimeAPI())
 	Set ..Logger = $$$Inject(Logger, ##class(vhLib.Logger).%New())
@@ -70,7 +68,7 @@
 			Do ..LogCurrencyError(Line, KlantNr, ProductId)
 		}
 		#dim ProductBestaatNiet As %Boolean = (ProductId = 0)
-		#dim Maand As %String = $Piece(..GeefDag1LopendeMaand(),"-",1)_"."_$Piece(..GeefDag1LopendeMaand(),"-",2)_" "
+		#dim Maand As %String = $Piece(..InvoiceDate,"-",1)_"."_$Piece(..InvoiceDate,"-",2)_" "
 		If $$$Not(..IsNietMeeTeNemenKlant(KlantNr)) {
 			// KILLS (op LastInfo-kills na => In ...InfoRec()-methods)
 			If $$$Not(KlantNr = VorigeKlantNr) {
@@ -315,13 +313,6 @@
 ]]></Implementation>
 </Method>
 
-<Method name="GetLastProcessedRecord">
-<Private>1</Private>
-<ReturnType>%Integer</ReturnType>
-<Implementation><![CDATA[	Quit $Get(^AX.Config("Id","Stat.Invoice.Customer"),1)
-]]></Implementation>
-</Method>
-
 <Method name="SetLastProcessedRecord">
 <FormalSpec>RecId:%Integer</FormalSpec>
 <Private>1</Private>
@@ -330,10 +321,11 @@
 </Method>
 
 <Method name="GeefDag1LopendeMaand">
+<FormalSpec>StatistiekMaand:%Date</FormalSpec>
 <Private>1</Private>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
-	#dim StatistiekDatum As %String = $Replace($$EXTDATE^vhLib.DataTypes(..StatistiekMaand,"DS"),"\","-")
+	#dim StatistiekDatum As %String = $Replace($$EXTDATE^vhLib.DataTypes(StatistiekMaand,"DS"),"\","-")
 	Quit $Replace(StatistiekDatum,$Piece(StatistiekDatum,"-",3),"01")
 ]]></Implementation>
 </Method>