slapos_accounting: Use getInventoryList list to fetch unpaid invoices

    The implementation shouldn't rely on the existence of Payment Transaction for knowing if the Sale Invoice Transaction is payed or not.

master/bt5/slapos_accounting/SkinTemplateItem/portal_skins/slapos_accounting/AccountingTransactionModule_getUnpaidInvoiceList.py

@@ -3,16 +3,10 @@ portal_membership=portal.portal_membership
 
 user = portal_membership.getAuthenticatedMember().getUserValue()
 
-def wrapWithShadow():
-  return [i.getCausalityValue(portal_type="Sale Invoice Transaction") for i in context.getPortalObject().portal_catalog(
-    portal_type="Payment Transaction",
-    simulation_state="started",
-    destination_section_uid=user.getUid(),
-    default_causality_portal_type="Sale Invoice Transaction",
-    default_causality_simulation_state=("stopped", "delivered"),
-  )]
+def wrapWithShadow(user):
+  return user.Entity_getOutstandingAmountList()
 
 return user.Person_restrictMethodAsShadowUser(
   shadow_document=user,
   callable_object=wrapWithShadow,
-  argument_list=[])
+  argument_list=[user])

master/bt5/slapos_accounting/SkinTemplateItem/portal_skins/slapos_accounting/Base_getReceivableAccountList.py

+# Note: can be cached for 24h if needed: the list is not expected to change often, nor to ever reach even 10 entries.
+portal = context.getPortalObject()
+return portal.account_module.searchFolder(
+  strict_account_type_uid=portal.portal_categories.account_type.asset.receivable.getUid(),
+  validation_state='validated',
+)

master/bt5/slapos_accounting/SkinTemplateItem/portal_skins/slapos_accounting/Base_getReceivableAccountList.xml

+<?xml version="1.0"?>
+<ZopeData>
+  <record id="1" aka="AAAAAAAAAAE=">
+    <pickle>
+      <global name="PythonScript" module="Products.PythonScripts.PythonScript"/>
+    </pickle>
+    <pickle>
+      <dictionary>
+        <item>
+            <key> <string>Script_magic</string> </key>
+            <value> <int>3</int> </value>
+        </item>
+        <item>
+            <key> <string>_bind_names</string> </key>
+            <value>
+              <object>
+                <klass>
+                  <global name="NameAssignments" module="Shared.DC.Scripts.Bindings"/>
+                </klass>
+                <tuple/>
+                <state>
+                  <dictionary>
+                    <item>
+                        <key> <string>_asgns</string> </key>
+                        <value>
+                          <dictionary>
+                            <item>
+                                <key> <string>name_container</string> </key>
+                                <value> <string>container</string> </value>
+                            </item>
+                            <item>
+                                <key> <string>name_context</string> </key>
+                                <value> <string>context</string> </value>
+                            </item>
+                            <item>
+                                <key> <string>name_m_self</string> </key>
+                                <value> <string>script</string> </value>
+                            </item>
+                            <item>
+                                <key> <string>name_subpath</string> </key>
+                                <value> <string>traverse_subpath</string> </value>
+                            </item>
+                          </dictionary>
+                        </value>
+                    </item>
+                  </dictionary>
+                </state>
+              </object>
+            </value>
+        </item>
+        <item>
+            <key> <string>_params</string> </key>
+            <value> <string></string> </value>
+        </item>
+        <item>
+            <key> <string>id</string> </key>
+            <value> <string>Base_getReceivableAccountList</string> </value>
+        </item>
+      </dictionary>
+    </pickle>
+  </record>
+</ZopeData>

master/bt5/slapos_accounting/SkinTemplateItem/portal_skins/slapos_accounting/Entity_getOutstandingAmountList.py

+"""return a list of invoices with the following attributes:
+ - payment_request_uid: the uid of the invoice, we consider that payment request is the invoice.
+ - total_price: the amount left to pay for this invoice
+ - getTotalPrice: the original amount of this invoice.
+ Arguments:
+ - at_date (default None)
+"""
+portal = context.getPortalObject()
+
+params = dict()
+
+if at_date:
+  params['at_date'] = at_date
+
+params['grouping_reference'] = None
+
+object_list = []
+
+for (idx, brain) in enumerate(portal.portal_simulation.getInventoryList(
+    mirror_section_uid=context.getUid(),
+    simulation_state=('stopped', 'delivered'),
+    node_uid=[x.uid for x in context.Base_getReceivableAccountList()] or -1,
+    **params )):
+
+  # XXX rewrap inventory list brain because they don't have a valid "uid" and cannot be used
+  # directly in listbox. We should probably add support for this in getInventoryList instead
+  # of this hack
+
+  # XXX In our case, this hould be always None.
+  payment_request_uid = brain.payment_request_uid
+  if not payment_request_uid:
+    payment_request_uid = brain.getObject().getExplanationUid()
+  payment_request = portal.portal_catalog.getObject(uid=payment_request_uid)
+  object_list.append(payment_request.asContext(
+                section_uid=brain.section_uid,
+                payment_request_uid=payment_request_uid,
+                node_uid=brain.node_uid,
+                node_relative_url=brain.node_relative_url,
+                total_price=brain.total_price,
+                uid='new_%s' % idx,))
+
+return object_list

master/bt5/slapos_accounting/SkinTemplateItem/portal_skins/slapos_accounting/Entity_getOutstandingAmountList.xml

+<?xml version="1.0"?>
+<ZopeData>
+  <record id="1" aka="AAAAAAAAAAE=">
+    <pickle>
+      <global name="PythonScript" module="Products.PythonScripts.PythonScript"/>
+    </pickle>
+    <pickle>
+      <dictionary>
+        <item>
+            <key> <string>Script_magic</string> </key>
+            <value> <int>3</int> </value>
+        </item>
+        <item>
+            <key> <string>_bind_names</string> </key>
+            <value>
+              <object>
+                <klass>
+                  <global name="NameAssignments" module="Shared.DC.Scripts.Bindings"/>
+                </klass>
+                <tuple/>
+                <state>
+                  <dictionary>
+                    <item>
+                        <key> <string>_asgns</string> </key>
+                        <value>
+                          <dictionary>
+                            <item>
+                                <key> <string>name_container</string> </key>
+                                <value> <string>container</string> </value>
+                            </item>
+                            <item>
+                                <key> <string>name_context</string> </key>
+                                <value> <string>context</string> </value>
+                            </item>
+                            <item>
+                                <key> <string>name_m_self</string> </key>
+                                <value> <string>script</string> </value>
+                            </item>
+                            <item>
+                                <key> <string>name_subpath</string> </key>
+                                <value> <string>traverse_subpath</string> </value>
+                            </item>
+                          </dictionary>
+                        </value>
+                    </item>
+                  </dictionary>
+                </state>
+              </object>
+            </value>
+        </item>
+        <item>
+            <key> <string>_params</string> </key>
+            <value> <string>at_date=None, **kw</string> </value>
+        </item>
+        <item>
+            <key> <string>id</string> </key>
+            <value> <string>Entity_getOutstandingAmountList</string> </value>
+        </item>
+      </dictionary>
+    </pickle>
+  </record>
+</ZopeData>

master/bt5/slapos_accounting/TestTemplateItem/portal_components/test.erp5.testSlapOSAccountingSkins.py

@@ -289,19 +289,6 @@ return context.getParentValue()""")
 
   def test_AccountingTransactionModule_getUnpaidInvoiceList(self):
     person = self.makePerson(user=1)
-
-    payment_template = self.portal.restrictedTraverse(
-      self.portal.portal_preferences.getPreferredDefaultPrePaymentTemplate())
-    payment = payment_template.Base_createCloneDocument(batch_mode=1)
-
-    for line in payment.contentValues():
-      if line.getSource() == "account_module/payment_to_encash":
-        line.setQuantity(-1)
-      elif line.getSource() == "account_module/receivable":
-        line.setQuantity(1)
-
-    payment.confirm()
-    payment.start()
   
     template = self.portal.restrictedTraverse(
       self.portal.portal_preferences.getPreferredDefaultPrePaymentSubscriptionInvoiceTemplate())
@@ -321,26 +308,63 @@ return context.getParentValue()""")
     cell.edit(quantity=1)
     cell.setPrice(1)
     
-    payment.setCausalityValue(current_invoice)
-    payment.setDestinationSectionValue(person)
-    
     current_invoice.plan()
     current_invoice.confirm()
     current_invoice.startBuilding()
     current_invoice.reindexObject()
     current_invoice.stop()
 
+    self.tic()
+    current_invoice.Delivery_manageBuildingCalculatingDelivery()
+    self.tic()
+    current_invoice.SaleInvoiceTransaction_forceBuildSlapOSAccountingLineList()
+
     self.tic()
     self.login(person.getUserId())
+    unpaid_invoice_list = self.portal.accounting_module.AccountingTransactionModule_getUnpaidInvoiceList()
     self.assertEqual(
-      self.portal.accounting_module.AccountingTransactionModule_getUnpaidInvoiceList(),
-      [current_invoice])
+      [i.getRelativeUrl() for i in unpaid_invoice_list],
+      [current_invoice.getRelativeUrl()])
 
     self.login()
+    payment_template = self.portal.restrictedTraverse(
+      self.portal.portal_preferences.getPreferredDefaultPrePaymentTemplate())
+    payment = payment_template.Base_createCloneDocument(batch_mode=1)
+
+    for line in payment.contentValues():
+      if line.getSource() == "account_module/payment_to_encash":
+        line.setQuantity(-1)
+      elif line.getSource() == "account_module/receivable":
+        line.setQuantity(1)
+
+    payment.confirm()
+    payment.start()
+    payment.setCausalityValue(current_invoice)
+    payment.setDestinationSectionValue(person)
+    
     payment.stop()
     self.tic()
 
+    is_lettered = False
+    letter = None
+    for line in current_invoice.contentValues():
+      if line.getSource() == "account_module/receivable":
+        is_lettered = True
+        letter = line.getGroupingReference()
+
+    self.assertTrue(is_lettered)
+
+    # is it groupped?
+    is_lettered = False
+    for line in payment.contentValues():
+      if line.getSource() == "account_module/receivable":
+        is_lettered = True
+        self.assertEqual(letter, line.getGroupingReference())
+    
+    self.assertTrue(is_lettered)
+ 
     self.login(person.getUserId())
+    unpaid_invoice_list = self.portal.accounting_module.AccountingTransactionModule_getUnpaidInvoiceList()
     self.assertEqual(
-      self.portal.accounting_module.AccountingTransactionModule_getUnpaidInvoiceList(),
+      [i.getRelativeUrl() for i in unpaid_invoice_list],
       [])
\ No newline at end of file

master/bt5/slapos_crm/SkinTemplateItem/portal_skins/slapos_crm/Alarm_createRegularisationRequest.py

 portal = context.getPortalObject()
 
+person_uid_list = []
+for (_, brain) in enumerate(portal.portal_simulation.getInventoryList(
+    simulation_state=('stopped', 'delivered'),
+    parent_payment_mode_uid = [
+      portal.portal_categories.payment_mode.payzen.getUid(),
+      portal.portal_categories.payment_mode.wechat.getUid()],
+    group_by_mirror_section=True,
+    portal_type=portal.getPortalAccountingMovementTypeList(),
+    node_uid=[x.uid for x in context.Base_getReceivableAccountList()],
+    grouping_reference=None)):
+
+  payment_request_uid = brain.payment_request_uid
+  if not payment_request_uid:
+    payment_request_uid = brain.getObject().getExplanationUid()
+
+  payment_request = portal.portal_catalog.getObject(uid=payment_request_uid)
+  section_uid = payment_request.getDestinationSectionUid(portal_type="Person")
+  if section_uid is not None:
+    person_uid_list.append(section_uid)
+
 portal.portal_catalog.searchAndActivate(
       portal_type="Person", 
       validation_state="validated",
-      destination_section_related__portal_type="Payment Transaction",
-      destination_section_related__simulation_state="started",
+      uid=person_uid_list,
       method_id='Person_checkToCreateRegularisationRequest',
       activate_kw={'tag': tag}
       )