Changeset 939 for trunk/Modules/Finance/Manage.php

Timestamp:

Aug 2, 2022, 9:26:10 AM (2 years ago)

Author:

chronos

Message:

• Fixed: Incorrectly used member date BillingPeriodLastDate for determining new payments log for payment notification email.

File:

• trunk/Modules/Finance/Manage.php (modified) (2 diffs)

trunk/Modules/Finance/Manage.php

@@ -393 +393 @@
         '<th style="border-style: solid; border-width: 1px; padding: 1px 5px 1px 5px; text-align: center; font-weight: bold;">Popis</th>'.
         '<th style="border-style: solid; border-width: 1px; padding: 1px 5px 1px 5px; text-align: center; font-weight: bold;">Částka [Kč]</th></tr>'."\n";
+      if ($Member['PaymentEmailTime'] <> 'NULL')
+      {
+        $Where = ' WHERE (`T1`.`Time` > "'.$Member['PaymentEmailTime'].'")';
+      } else 
+      {
+        $Where = '';
+      }
       $DbResult = $this->Database->query('SELECT T1.* FROM ((SELECT `Text`, `Time`, `Value`, `File` FROM `FinanceOperation` WHERE (`Subject`='.$Member['Subject'].')) UNION ALL '.
         '(SELECT (SELECT GROUP_CONCAT(`Description` SEPARATOR ", ") FROM `FinanceInvoiceItem` '.
         'WHERE `FinanceInvoiceItem`.`FinanceInvoice` = `FinanceInvoice`.`Id`) AS `Text`, '.
-        '`Time`, -`Value`, `File` FROM `FinanceInvoice` WHERE (`Subject`='.
-        $Member['Subject'].')) ORDER BY `Time` DESC) AS `T1` WHERE (`T1`.`Time` > "'.$Member['BillingPeriodLastDate'].'")');
+        '`Time`, -`Value`, `File` FROM `FinanceInvoice` WHERE (`Subject`='.$Member['Subject'].')) ORDER BY `Time` DESC) AS `T1`'.$Where);
       while ($DbRow = $DbResult->fetch_assoc())
       {
@@ -413 +419 @@
       ModuleEmailQueue::Cast($this->System->GetModule('EmailQueue'))->AddItem($User['Name'].' <'.$User['Email'].'>', $Title, $Content,
          $Config['Web']['Admin'].' <'.$Config['Web']['AdminEmail'].'>');
-      $Output = '';
+      $this->Database->update('Member', 'Id='.$Member['Id'], array('PaymentEmailTime' => 'NOW()'));
+      $Output = '';      
     } else $Output = 'Uživatel '.$User['Name'].' nemá email.';
     return $Output;