BankAccount.py 6.39 KB
Newer Older
Jean-Paul Smets's avatar
Jean-Paul Smets committed
1 2
##############################################################################
#
3 4 5
# Copyright (c) 2002-2005 Nexedi SARL and Contributors. All Rights Reserved.
#               Jean-Paul Smets-Solanes <jp@nexedi.com>
#               Kevin Deldycke <kevin@nexedi.com>
Jean-Paul Smets's avatar
Jean-Paul Smets committed
6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32
#
# 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
33
from Products.ERP5Type.Document.Folder import Folder
34
from Products.ERP5.Document.Coordinate import Coordinate
Jean-Paul Smets's avatar
Jean-Paul Smets committed
35 36 37

import string

38

Sebastien Robin's avatar
Sebastien Robin committed
39
class BankAccount(Folder, Coordinate):
Jean-Paul Smets's avatar
Jean-Paul Smets committed
40
    """
41
    A bank account number holds a collection of numbers and codes (ex. SWIFT, RIB, etc.) which may be used to identify a bank account.
Jean-Paul Smets's avatar
Jean-Paul Smets committed
42

43
    A Bank Account is owned by a Person or an Organisation. A Bank Account contain Agents with Agent Privileges used by the owner to delegate the management of the bank account to trusted third-party Persons.
Jean-Paul Smets's avatar
Jean-Paul Smets committed
44

45
    BankAccount inherits from Base and from the mix-in Coordinate.
Jean-Paul Smets's avatar
Jean-Paul Smets committed
46 47 48 49
    """

    meta_type = 'ERP5 BankAccount'
    portal_type = 'BankAccount'
50
    add_permission = Permissions.AddPortalContent
Jean-Paul Smets's avatar
Jean-Paul Smets committed
51 52 53 54 55 56 57 58 59 60
    isPortalContent = 1
    isRADContent = 1

    # Declarative security
    security = ClassSecurityInfo()
    security.declareObjectProtected(Permissions.View)

    # Declarative properties
    property_sheets = ( PropertySheet.Base
                      , PropertySheet.SimpleItem
61 62
                      , PropertySheet.Task
                      , PropertySheet.Resource
63
                      , PropertySheet.BankAccount
Jean-Paul Smets's avatar
Jean-Paul Smets committed
64 65 66 67 68
                      )

    # Declarative interfaces
    __implements__ = ( Interface.Coordinate )

69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84

    security.declareProtected(Permissions.View, 'getIbanTextFormat')
    def getIbanTextFormat(self):
        """
          Returns the standard IBAN text format
        """
        iban = self.getIban()
        l = 4
        s = "IBAN"
        for i in range((len(iban) / l) + 1):
          s += ' ' + iban[i*l : (i+1)*l]
        return s


    security.declareProtected(Permissions.View, 'getIbanTextFormat')
    def getIban(self):
Jean-Paul Smets's avatar
Jean-Paul Smets committed
85
        """
86 87
          The International Bank Account Number of this bank account.
          IBAN is an international standard for identifying bank accounts worldwide.
Jean-Paul Smets's avatar
Jean-Paul Smets committed
88
        """
89 90 91 92 93 94 95 96 97 98 99
        key          = self.getIbanKey()
        country_code = self.getBankCountryCode()
        bban         = self.getBban()
        if key          == None: key          = ''
        if country_code == None: country_code = ''
        if bban         == None: bban         = ''
        return (country_code + key + bban).upper()


    security.declareProtected(Permissions.View, 'getIbanKey')
    def getIbanKey(self):
Jean-Paul Smets's avatar
Jean-Paul Smets committed
100
        """
101 102
          The IBAN key ensure the integry of the IBAN code.
          It's calculated with the ISO 7064 method (known as "97-10 modulo").
Jean-Paul Smets's avatar
Jean-Paul Smets committed
103
        """
104 105 106 107 108 109 110 111 112 113 114 115 116
        # Construct the alpha to number translation table
        table = {}
        for i in range(26):
          table[chr(65+i)] = str(10+i)
        # Calcul the key
        country_code = self.getBankCountryCode() + '00'
        s = self.getBban() + country_code
        n = ''
        for c in s:
          if c.isalpha():
            n += table[c.upper()]
          if c.isdigit():
            n += c
117 118
	key = str(98 - (int(n) % 97))
        return key.zfill(2)
119 120 121 122


    security.declareProtected(Permissions.View, 'getBban')
    def getBban(self):
Jean-Paul Smets's avatar
Jean-Paul Smets committed
123
        """
124 125
          The Basic Bank Account Number (BBAN) is the last part of the IBAN.
          Usualy it correspond to the national bank account number.
Jean-Paul Smets's avatar
Jean-Paul Smets committed
126
        """
127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176
        bank   = self.getBankCode()
        branch = self.getBranch()
        ban    = self.getBankAccountNumber()
        key    = self.getBbanKey()
        if bank   == None: bank       = ''
        if branch == None: branch     = ''
        if ban    == None: account_id = ''
        if key    == None: key        = ''
        return (bank + branch + ban + key).upper()


    security.declareProtected(Permissions.View, 'getBbanTextFormat')
    def getBbanTextFormat(self, sep=' '):
        """
          Returns a BBAN text format
        """
        bank   = self.getBankCode()
        branch = self.getBranch()
        ban    = self.getBankAccountNumber()
        key    = self.getBbanKey()
        if bank   == None: bank       = ''
        if branch == None: branch     = ''
        if ban    == None: account_id = ''
        if key    == None: key        = ''
        return sep.join([bank, branch, ban, key]).upper()


    security.declareProtected(Permissions.View, 'getBbanKey')
    def getBbanKey(self):
        """
          The BBAN key ensure the integry of the BBAN code.
          This is the french BBAN key algorithm.
        """
        def transcode(string):
          letter = 'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
          digit  = '12345678912345678923456789'
          for i in range(len(letter)):
            string = string.replace(letter[i], digit[i])
          return int(string)

        bank   = self.getBankCode()
        branch = self.getBranch()
        ban    = self.getBankAccountNumber()
        if bank   == None: bank   = ''
        if branch == None: branch = ''
        if ban    == None: ban    = ''

        bank   += ('0' * (5 - len(bank)))
        branch += ('0' * (5 - len(branch)))

177 178 179
        s = (bank + branch + ban).upper()	
	key = str(97 - ((transcode(s) * 100) % 97))
	return key.zfill(2)
180