##############################################################################
#
# Copyright (c) 2002 Nexedi SARL and Contributors. All Rights Reserved.
# Jean-Paul Smets-Solanes <jp@nexedi.com>
#
# WARNING: This program as such is intended to be used by professional
# programmers who take the whole responsability of assessing all potential
# consequences resulting from its eventual inadequacies and bugs
# End users who are looking for a ready-to-use solution with commercial
# garantees and support are strongly adviced to contract a Free Software
# Service Company
#
# This program is Free Software; you can redistribute it and/or
# modify it under the terms of the GNU General Public License
# as published by the Free Software Foundation; either version 2
# of the License, or (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
#
##############################################################################
from AccessControl import ClassSecurityInfo
from Products.ERP5Type import Permissions, PropertySheet, Constraint, Interface
from Products.ERP5.Document.Rule import Rule
from Products.ERP5Type.XMLMatrix import XMLMatrix
from Products.CMFCore.utils import getToolByName
from UserDict import UserDict
from zLOG import LOG
class InvoiceTransactionRule(Rule, XMLMatrix):
"""
Invoice Transaction Rule object make sure an Invoice in the similation
is consistent with the real invoice
WARNING: what to do with movement split ?
"""
# CMF Type Definition
meta_type = 'ERP5 Invoice Transaction Rule'
portal_type = 'Invoice Transaction Rule'
add_permission = Permissions.AddPortalContent
isPortalContent = 1
isRADContent = 1
# Declarative security
security = ClassSecurityInfo()
security.declareObjectProtected(Permissions.View)
# Default Properties
property_sheets = ( PropertySheet.Base
, PropertySheet.XMLObject
, PropertySheet.CategoryCore
, PropertySheet.DublinCore
)
def test(self, movement):
"""
Tests if the rule (still) applies
"""
# An invoice transaction rule applies when the movement's parent is an invoice rule
parent = movement.getParent()
parent_rule_id = parent.getSpecialiseId()
if 'default_invoice_rule' in parent_rule_id :
return 1
return 0
# Simulation workflow
security.declareProtected(Permissions.ModifyPortalContent, 'expand')
def expand(self, applied_rule, force=0, **kw):
"""
Expands the current movement downward.
-> new status -> expanded
An applied rule can be expanded only if its parent movement
is expanded.
"""
invoice_transaction_line_type = 'Simulation Movement'
# First, we need the region
my_invoice_line_simulation = applied_rule.getParent()
my_invoice_line = my_invoice_line_simulation.getDeliveryValue()
my_invoice = my_invoice_line.getParent()
my_destination = my_invoice.getDestinationValue() # maybe DestinationSection instead of Destination
my_destination_address = my_destination.get('default_address')
if my_destination_address is None :
my_destination_region = None
else :
my_destination_region = my_destination_address.getRegionValue()
# Then, the product line
my_product = my_invoice_line.getResourceValue()
my_product_line = my_product.getProductLineValue()
# Finally, the InvoiceTransactionRule Matrix
my_invoice_transaction_rule = applied_rule.getSpecialiseValue()
if force or \
(applied_rule.getLastExpandSimulationState() not in applied_rule.getPortalReservedInventoryStateList() and \
applied_rule.getLastExpandSimulationState() not in applied_rule.getPortalCurrentInventoryStateList()):
# get the corresponding Cell
new_kw = (('product_line', my_product_line), ('region', my_destination_region))
my_cell = my_invoice_transaction_rule.getCellByPredicate(*new_kw) #XXX WARNING ! : my_cell can be None
if my_cell is not None :
my_cell_transaction_id_list = map(lambda x : x.getId(), my_cell.contentValues())
else :
my_cell_transaction_id_list = []
# check each contained movement and make
# a list of invoice ids which do not need to be copied
# eventually delete movement which do not exist anylonger
existing_uid_list = []
for movement in applied_rule.contentValues():
if movement.getId() in my_cell_transaction_id_list :
existing_uid_list += [movement.getUid()]
else :
movement.flushActivity(invoke=0)
applied_rule._delObject(movement.getId())
# Add every movement from the Matrix to the Simulation
if my_cell is not None :
for transaction in my_cell.contentValues() :
if transaction.getId() not in existing_uid_list :
my_invoice_line.portal_types.constructContent(type_name=invoice_transaction_line_type
, container=applied_rule
, id=transaction.getId()
, source=transaction.getSource()
, destination=transaction.getDestination()
, quantity=transaction.getQuantity() * my_product.getBasePrice()
)
# Now we can set the last expand simulation state to the current state
applied_rule.setLastExpandSimulationState(my_invoice.getSimulationState())
# Pass to base class
Rule.expand(self, applied_rule, force=force, **kw)
security.declareProtected(Permissions.ModifyPortalContent, 'solve')
def solve(self, applied_rule, solution_list):
"""
Solve inconsitency according to a certain number of solutions
templates. This updates the
-> new status -> solved
This applies a solution to an applied rule. Once
the solution is applied, the parent movement is checked.
If it does not diverge, the rule is reexpanded. If not,
diverge is called on the parent movement.
"""
security.declareProtected(Permissions.ModifyPortalContent, 'diverge')
def diverge(self, applied_rule):
"""
-> new status -> diverged
This basically sets the rule to "diverged"
and blocks expansion process
"""
# Solvers
security.declareProtected(Permissions.View, 'isDivergent')
def isDivergent(self, applied_rule):
"""
Returns 1 if divergent rule
"""
security.declareProtected(Permissions.View, 'getDivergenceList')
def getDivergenceList(self, applied_rule):
"""
Returns a list Divergence descriptors
"""
security.declareProtected(Permissions.View, 'getSolverList')
def getSolverList(self, applied_rule):
"""
Returns a list Divergence solvers
"""
# Deliverability / orderability
def isOrderable(self, m):
return 1
def isDeliverable(self, m):
if m.getSimulationState() in m.getPortalDraftOrderStateList():
return 0
return 1
# Matrix related
security.declareProtected( Permissions.ModifyPortalContent, 'newCellContent' )
def newCellContent(self, id):
"""
This method can be overriden
"""
self.invokeFactory(type_name='Accounting Rule Cell',id=id)
new_cell = self.get(id)
new_cell.SaleInvoiceTransaction_init() # This is a site dependant script, it is used to create default invoice transaction lines.
return new_cell
security.declareProtected(Permissions.ModifyPortalContent, 'updateMatrix')
def updateMatrix(self) :
"""
Makes sure that the cells are consistent with the predicates.
"""
base_id = 'vat_per_region'
kwd = {'base_id': base_id}
new_range = self.InvoiceTransactionRule_asCellRange() # This is a site dependent script
self._setCellRange(*new_range, **kwd)
cell_range_key_list = self.getCellRangeKeyList(base_id = base_id)
if cell_range_key_list <> [[None, None]] :
for k in cell_range_key_list :
c = self.newCell(*k, **kwd)
c.edit( mapped_value_property_list = ( 'title',),
predicate_operator = 'SUPERSET_OF',
predicate_category_list = filter(lambda k_item: k_item is not None, k),
title = 'Transaction %s' % repr(map(lambda k_item : self.restrictedTraverse(k_item).getTitle(), k)),
force_update = 1
) # Make sure we do not take aquisition into account
else :
# If only one cell, delete it
cell_range_id_list = self.getCellRangeIdList(base_id = base_id)
for k in cell_range_id_list :
if self.get(k) is not None :
self[k].flushActivity(invoke=0)
self[k].immediateReindexObject()
self._delObject(k)
security.declareProtected(Permissions.View, 'getCellByPredicate')
def getCellByPredicate(self, *kw) :
"""
Returns the cell that match the *kw predicate.
*kw is a list of couple (base_category_title, category) we want to test against the predicates
"""
base_id = 'vat_per_region'
kwd = {'base_id': base_id}
predicate_list = self.InvoiceTransactionRule_asCellRange() # This is a site dependent script
portal_url = getToolByName(self, 'portal_url')
class Dummy(UserDict) :
def isMemberOf(self, category) :
if category in self.data.values() :
return 1
return 0
def getProperty(self, key) :
return self.data.get(key)
my_dummy = Dummy()
for (k,v) in kw :
if hasattr(v, 'getCategoryRelativeUrl') :
my_dummy[k]=v.getCategoryRelativeUrl(base=1)
else :
my_dummy[k]=v
selected_predicate_list = []
# predicate_list is a list of list of predicate, each dimension is one sublist
for predicate_dimension_item_list in predicate_list :
for predicate in predicate_dimension_item_list :
# test predicate against *kw and append to selected_predicate_list if they match
predicate = portal_url.restrictedTraverse(predicate)
if predicate.test(my_dummy) :
selected_predicate_list.append(predicate.getRelativeUrl())
break # we only want to add one predicate per dimension to the list
return self.getCell(*selected_predicate_list, **kwd)