Index: AXimpl/Admin/STAT/Invoice/Processor.cls.xml
===================================================================
diff -u -r49523 -r49528
--- AXimpl/Admin/STAT/Invoice/Processor.cls.xml (.../Processor.cls.xml) (revision 49523)
+++ AXimpl/Admin/STAT/Invoice/Processor.cls.xml (.../Processor.cls.xml) (revision 49528)
@@ -47,10 +47,13 @@
If $$$Not(..IsNietMeeTeNemenKlant(KlantNr)) {
If $$$Not(KlantNr = VorigeKlantNr) {
Do ..KillSubscripts(0, 0, 1, 0, KlantNr,, Maand)
- If ($$$Not(ProductId = VorigProductId) && $$$Not(ProductBestaatNiet)) {
+ If $$$Not(ProductBestaatNiet) {
Do ..KillSubscripts(0, 0, 0, 1, KlantNr, ProductId, Maand)
}
}
+ If ($$$Not(ProductId = VorigProductId) && $$$Not(ProductBestaatNiet)) {
+ Do ..KillSubscripts(0, 0, 0, 1, KlantNr, ProductId, Maand)
+ }
Do ..ProcessKlantLastInfoRec(Line, KlantNr)
Do ..ProcessKlantMaandRec(Line, KlantNr, Maand)
If $$$Not(ProductBestaatNiet) {
@@ -81,7 +84,7 @@
Kill ^KSTKL(KlantNr,0,Maand)
}
If KlantProductMaandRec {
- Kill ^KSTKL(KlantNr,ProductId,Maand) // Wordt nog niet altijd op juiste moment gekilld?
+ Kill ^KSTKL(KlantNr,ProductId,Maand)
}
]]>
@@ -246,7 +249,6 @@
1
%Numeric