[FIX]stages with sequence 0 was regarded as canceled, because of 0 meaned false....
[odoo/odoo.git] / addons / crm / crm_lead.py
1 # -*- coding: utf-8 -*-
2 ##############################################################################
3 #
4 #    OpenERP, Open Source Management Solution
5 #    Copyright (C) 2004-today OpenERP SA (<http://www.openerp.com>)
6 #
7 #    This program is free software: you can redistribute it and/or modify
8 #    it under the terms of the GNU Affero General Public License as
9 #    published by the Free Software Foundation, either version 3 of the
10 #    License, or (at your option) any later version.
11 #
12 #    This program is distributed in the hope that it will be useful,
13 #    but WITHOUT ANY WARRANTY; without even the implied warranty of
14 #    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15 #    GNU Affero General Public License for more details.
16 #
17 #    You should have received a copy of the GNU Affero General Public License
18 #    along with this program.  If not, see <http://www.gnu.org/licenses/>.
19 #
20 ##############################################################################
21
22 from openerp.addons.base_status.base_stage import base_stage
23 import crm
24 from datetime import datetime
25 from openerp.osv import fields, osv
26 import time
27 from openerp import tools
28 from openerp.tools.translate import _
29 from openerp.tools import html2plaintext
30
31 from base.res.res_partner import format_address
32
33 CRM_LEAD_FIELDS_TO_MERGE = ['name',
34     'partner_id',
35     'channel_id',
36     'company_id',
37     'country_id',
38     'section_id',
39     'state_id',
40     'stage_id',
41     'type_id',
42     'user_id',
43     'title',
44     'city',
45     'contact_name',
46     'description',
47     'email',
48     'fax',
49     'mobile',
50     'partner_name',
51     'phone',
52     'probability',
53     'planned_revenue',
54     'street',
55     'street2',
56     'zip',
57     'create_date',
58     'date_action_last',
59     'date_action_next',
60     'email_from',
61     'email_cc',
62     'partner_name']
63 CRM_LEAD_PENDING_STATES = (
64     crm.AVAILABLE_STATES[2][0], # Cancelled
65     crm.AVAILABLE_STATES[3][0], # Done
66     crm.AVAILABLE_STATES[4][0], # Pending
67 )
68
69 class crm_lead(base_stage, format_address, osv.osv):
70     """ CRM Lead Case """
71     _name = "crm.lead"
72     _description = "Lead/Opportunity"
73     _order = "priority,date_action,id desc"
74     _inherit = ['mail.thread', 'ir.needaction_mixin']
75
76     _track = {
77         'state': {
78             'crm.mt_lead_create': lambda self, cr, uid, obj, ctx=None: obj['state'] == 'new',
79             'crm.mt_lead_won': lambda self, cr, uid, obj, ctx=None: obj['state'] == 'done',
80             'crm.mt_lead_lost': lambda self, cr, uid, obj, ctx=None: obj['state'] == 'cancel',
81         },
82         'stage_id': {
83             'crm.mt_lead_stage': lambda self, cr, uid, obj, ctx=None: obj['state'] not in ['new', 'cancel', 'done'],
84         },
85     }
86
87     def create(self, cr, uid, vals, context=None):
88         if context is None:
89             context = {}
90         if not vals.get('stage_id'):
91             ctx = context.copy()
92             if vals.get('section_id'):
93                 ctx['default_section_id'] = vals['section_id']
94             if vals.get('type'):
95                 ctx['default_type'] = vals['type']
96             vals['stage_id'] = self._get_default_stage_id(cr, uid, context=ctx)
97         return super(crm_lead, self).create(cr, uid, vals, context=context)
98
99     def _get_default_section_id(self, cr, uid, context=None):
100         """ Gives default section by checking if present in the context """
101         return self._resolve_section_id_from_context(cr, uid, context=context) or False
102
103     def _get_default_stage_id(self, cr, uid, context=None):
104         """ Gives default stage_id """
105         section_id = self._get_default_section_id(cr, uid, context=context)
106         return self.stage_find(cr, uid, [], section_id, [('state', '=', 'draft')], context=context)
107
108     def _resolve_section_id_from_context(self, cr, uid, context=None):
109         """ Returns ID of section based on the value of 'section_id'
110             context key, or None if it cannot be resolved to a single
111             Sales Team.
112         """
113         if context is None:
114             context = {}
115         if type(context.get('default_section_id')) in (int, long):
116             return context.get('default_section_id')
117         if isinstance(context.get('default_section_id'), basestring):
118             section_name = context['default_section_id']
119             section_ids = self.pool.get('crm.case.section').name_search(cr, uid, name=section_name, context=context)
120             if len(section_ids) == 1:
121                 return int(section_ids[0][0])
122         return None
123
124     def _resolve_type_from_context(self, cr, uid, context=None):
125         """ Returns the type (lead or opportunity) from the type context
126             key. Returns None if it cannot be resolved.
127         """
128         if context is None:
129             context = {}
130         return context.get('default_type')
131
132     def _read_group_stage_ids(self, cr, uid, ids, domain, read_group_order=None, access_rights_uid=None, context=None):
133         access_rights_uid = access_rights_uid or uid
134         stage_obj = self.pool.get('crm.case.stage')
135         order = stage_obj._order
136         # lame hack to allow reverting search, should just work in the trivial case
137         if read_group_order == 'stage_id desc':
138             order = "%s desc" % order
139         # retrieve section_id from the context and write the domain
140         # - ('id', 'in', 'ids'): add columns that should be present
141         # - OR ('case_default', '=', True), ('fold', '=', False): add default columns that are not folded
142         # - OR ('section_ids', '=', section_id), ('fold', '=', False) if section_id: add section columns that are not folded
143         search_domain = []
144         section_id = self._resolve_section_id_from_context(cr, uid, context=context)
145         if section_id:
146             search_domain += ['|', ('section_ids', '=', section_id)]
147             search_domain += [('id', 'in', ids)]
148         else:
149             search_domain += ['|', ('id', 'in', ids), ('case_default', '=', True)]
150         # retrieve type from the context (if set: choose 'type' or 'both')
151         type = self._resolve_type_from_context(cr, uid, context=context)
152         if type:
153             search_domain += ['|', ('type', '=', type), ('type', '=', 'both')]
154         # perform search
155         stage_ids = stage_obj._search(cr, uid, search_domain, order=order, access_rights_uid=access_rights_uid, context=context)
156         result = stage_obj.name_get(cr, access_rights_uid, stage_ids, context=context)
157         # restore order of the search
158         result.sort(lambda x,y: cmp(stage_ids.index(x[0]), stage_ids.index(y[0])))
159
160         fold = {}
161         for stage in stage_obj.browse(cr, access_rights_uid, stage_ids, context=context):
162             fold[stage.id] = stage.fold or False
163         return result, fold
164
165     def fields_view_get(self, cr, user, view_id=None, view_type='form', context=None, toolbar=False, submenu=False):
166         res = super(crm_lead,self).fields_view_get(cr, user, view_id, view_type, context, toolbar=toolbar, submenu=submenu)
167         if view_type == 'form':
168             res['arch'] = self.fields_view_get_address(cr, user, res['arch'], context=context)
169         return res
170
171     _group_by_full = {
172         'stage_id': _read_group_stage_ids
173     }
174
175     def _compute_day(self, cr, uid, ids, fields, args, context=None):
176         """
177         :return dict: difference between current date and log date
178         """
179         cal_obj = self.pool.get('resource.calendar')
180         res_obj = self.pool.get('resource.resource')
181
182         res = {}
183         for lead in self.browse(cr, uid, ids, context=context):
184             for field in fields:
185                 res[lead.id] = {}
186                 duration = 0
187                 ans = False
188                 if field == 'day_open':
189                     if lead.date_open:
190                         date_create = datetime.strptime(lead.create_date, "%Y-%m-%d %H:%M:%S")
191                         date_open = datetime.strptime(lead.date_open, "%Y-%m-%d %H:%M:%S")
192                         ans = date_open - date_create
193                         date_until = lead.date_open
194                 elif field == 'day_close':
195                     if lead.date_closed:
196                         date_create = datetime.strptime(lead.create_date, "%Y-%m-%d %H:%M:%S")
197                         date_close = datetime.strptime(lead.date_closed, "%Y-%m-%d %H:%M:%S")
198                         date_until = lead.date_closed
199                         ans = date_close - date_create
200                 if ans:
201                     resource_id = False
202                     if lead.user_id:
203                         resource_ids = res_obj.search(cr, uid, [('user_id','=',lead.user_id.id)])
204                         if len(resource_ids):
205                             resource_id = resource_ids[0]
206
207                     duration = float(ans.days)
208                     if lead.section_id and lead.section_id.resource_calendar_id:
209                         duration =  float(ans.days) * 24
210                         new_dates = cal_obj.interval_get(cr,
211                             uid,
212                             lead.section_id.resource_calendar_id and lead.section_id.resource_calendar_id.id or False,
213                             datetime.strptime(lead.create_date, '%Y-%m-%d %H:%M:%S'),
214                             duration,
215                             resource=resource_id
216                         )
217                         no_days = []
218                         date_until = datetime.strptime(date_until, '%Y-%m-%d %H:%M:%S')
219                         for in_time, out_time in new_dates:
220                             if in_time.date not in no_days:
221                                 no_days.append(in_time.date)
222                             if out_time > date_until:
223                                 break
224                         duration =  len(no_days)
225                 res[lead.id][field] = abs(int(duration))
226         return res
227
228     def _history_search(self, cr, uid, obj, name, args, context=None):
229         res = []
230         msg_obj = self.pool.get('mail.message')
231         message_ids = msg_obj.search(cr, uid, [('email_from','!=',False), ('subject', args[0][1], args[0][2])], context=context)
232         lead_ids = self.search(cr, uid, [('message_ids', 'in', message_ids)], context=context)
233
234         if lead_ids:
235             return [('id', 'in', lead_ids)]
236         else:
237             return [('id', '=', '0')]
238
239     _columns = {
240         'partner_id': fields.many2one('res.partner', 'Partner', ondelete='set null', track_visibility='onchange',
241             select=True, help="Linked partner (optional). Usually created when converting the lead."),
242
243         'id': fields.integer('ID', readonly=True),
244         'name': fields.char('Subject', size=64, required=True, select=1),
245         'active': fields.boolean('Active', required=False),
246         'date_action_last': fields.datetime('Last Action', readonly=1),
247         'date_action_next': fields.datetime('Next Action', readonly=1),
248         'email_from': fields.char('Email', size=128, help="Email address of the contact", select=1),
249         'section_id': fields.many2one('crm.case.section', 'Sales Team',
250                         select=True, track_visibility='onchange', help='When sending mails, the default email address is taken from the sales team.'),
251         'create_date': fields.datetime('Creation Date' , readonly=True),
252         'email_cc': fields.text('Global CC', size=252 , help="These email addresses will be added to the CC field of all inbound and outbound emails for this record before being sent. Separate multiple email addresses with a comma"),
253         'description': fields.text('Notes'),
254         'write_date': fields.datetime('Update Date' , readonly=True),
255         'categ_ids': fields.many2many('crm.case.categ', 'crm_lead_category_rel', 'lead_id', 'category_id', 'Categories', \
256             domain="['|',('section_id','=',section_id),('section_id','=',False), ('object_id.model', '=', 'crm.lead')]"),
257         'type_id': fields.many2one('crm.case.resource.type', 'Campaign', \
258             domain="['|',('section_id','=',section_id),('section_id','=',False)]", help="From which campaign (seminar, marketing campaign, mass mailing, ...) did this contact come from?"),
259         'channel_id': fields.many2one('crm.case.channel', 'Channel', help="Communication channel (mail, direct, phone, ...)"),
260         'contact_name': fields.char('Contact Name', size=64),
261         'partner_name': fields.char("Customer Name", size=64,help='The name of the future partner company that will be created while converting the lead into opportunity', select=1),
262         'opt_out': fields.boolean('Opt-Out', oldname='optout', help="If opt-out is checked, this contact has refused to receive emails or unsubscribed to a campaign."),
263         'type':fields.selection([ ('lead','Lead'), ('opportunity','Opportunity'), ],'Type', help="Type is used to separate Leads and Opportunities"),
264         'priority': fields.selection(crm.AVAILABLE_PRIORITIES, 'Priority', select=True),
265         'date_closed': fields.datetime('Closed', readonly=True),
266         'stage_id': fields.many2one('crm.case.stage', 'Stage', track_visibility='onchange',
267                         domain="['&', '&', ('fold', '=', False), ('section_ids', '=', section_id), '|', ('type', '=', type), ('type', '=', 'both')]"),
268         'user_id': fields.many2one('res.users', 'Salesperson', select=True, track_visibility='onchange'),
269         'referred': fields.char('Referred By', size=64),
270         'date_open': fields.datetime('Opened', readonly=True),
271         'day_open': fields.function(_compute_day, string='Days to Open', \
272                                 multi='day_open', type="float", store=True),
273         'day_close': fields.function(_compute_day, string='Days to Close', \
274                                 multi='day_close', type="float", store=True),
275         'state': fields.related('stage_id', 'state', type="selection", store=True,
276                 selection=crm.AVAILABLE_STATES, string="Status", readonly=True,
277                 help='The Status is set to \'Draft\', when a case is created. If the case is in progress the Status is set to \'Open\'. When the case is over, the Status is set to \'Done\'. If the case needs to be reviewed then the Status is  set to \'Pending\'.'),
278
279         # Only used for type opportunity
280         'probability': fields.float('Success Rate (%)',group_operator="avg"),
281         'planned_revenue': fields.float('Expected Revenue', track_visibility='always'),
282         'ref': fields.reference('Reference', selection=crm._links_get, size=128),
283         'ref2': fields.reference('Reference 2', selection=crm._links_get, size=128),
284         'phone': fields.char("Phone", size=64),
285         'date_deadline': fields.date('Expected Closing', help="Estimate of the date on which the opportunity will be won."),
286         'date_action': fields.date('Next Action Date', select=True),
287         'title_action': fields.char('Next Action', size=64),
288         'color': fields.integer('Color Index'),
289         'partner_address_name': fields.related('partner_id', 'name', type='char', string='Partner Contact Name', readonly=True),
290         'partner_address_email': fields.related('partner_id', 'email', type='char', string='Partner Contact Email', readonly=True),
291         'company_currency': fields.related('company_id', 'currency_id', type='many2one', string='Currency', readonly=True, relation="res.currency"),
292         'user_email': fields.related('user_id', 'email', type='char', string='User Email', readonly=True),
293         'user_login': fields.related('user_id', 'login', type='char', string='User Login', readonly=True),
294
295         # Fields for address, due to separation from crm and res.partner
296         'street': fields.char('Street', size=128),
297         'street2': fields.char('Street2', size=128),
298         'zip': fields.char('Zip', change_default=True, size=24),
299         'city': fields.char('City', size=128),
300         'state_id': fields.many2one("res.country.state", 'State'),
301         'country_id': fields.many2one('res.country', 'Country'),
302         'phone': fields.char('Phone', size=64),
303         'fax': fields.char('Fax', size=64),
304         'mobile': fields.char('Mobile', size=64),
305         'function': fields.char('Function', size=128),
306         'title': fields.many2one('res.partner.title', 'Title'),
307         'company_id': fields.many2one('res.company', 'Company', select=1),
308         'payment_mode': fields.many2one('crm.payment.mode', 'Payment Mode', \
309                             domain="[('section_id','=',section_id)]"),
310         'planned_cost': fields.float('Planned Costs'),
311     }
312
313     _defaults = {
314         'active': 1,
315         'type': 'lead',
316         'user_id': lambda s, cr, uid, c: s._get_default_user(cr, uid, c),
317         'email_from': lambda s, cr, uid, c: s._get_default_email(cr, uid, c),
318         'stage_id': lambda s, cr, uid, c: s._get_default_stage_id(cr, uid, c),
319         'section_id': lambda s, cr, uid, c: s._get_default_section_id(cr, uid, c),
320         'company_id': lambda s, cr, uid, c: s.pool.get('res.company')._company_default_get(cr, uid, 'crm.lead', context=c),
321         'priority': lambda *a: crm.AVAILABLE_PRIORITIES[2][0],
322         'color': 0,
323     }
324
325     _sql_constraints = [
326         ('check_probability', 'check(probability >= 0 and probability <= 100)', 'The probability of closing the deal should be between 0% and 100%!')
327     ]
328
329     def onchange_stage_id(self, cr, uid, ids, stage_id, context=None):
330         if not stage_id:
331             return {'value':{}}
332         stage = self.pool.get('crm.case.stage').browse(cr, uid, stage_id, context)
333         if not stage.on_change:
334             return {'value':{}}
335         return {'value':{'probability': stage.probability}}
336
337     def on_change_partner(self, cr, uid, ids, partner_id, context=None):
338         result = {}
339         values = {}
340         if partner_id:
341             partner = self.pool.get('res.partner').browse(cr, uid, partner_id, context=context)
342             values = {
343                 'partner_name' : partner.name,
344                 'street' : partner.street,
345                 'street2' : partner.street2,
346                 'city' : partner.city,
347                 'state_id' : partner.state_id and partner.state_id.id or False,
348                 'country_id' : partner.country_id and partner.country_id.id or False,
349                 'email_from' : partner.email,
350                 'phone' : partner.phone,
351                 'mobile' : partner.mobile,
352                 'fax' : partner.fax,
353             }
354         return {'value' : values}
355
356     def _check(self, cr, uid, ids=False, context=None):
357         """ Override of the base.stage method.
358             Function called by the scheduler to process cases for date actions
359             Only works on not done and cancelled cases
360         """
361         cr.execute('select * from crm_case \
362                 where (date_action_last<%s or date_action_last is null) \
363                 and (date_action_next<=%s or date_action_next is null) \
364                 and state not in (\'cancel\',\'done\')',
365                 (time.strftime("%Y-%m-%d %H:%M:%S"),
366                     time.strftime('%Y-%m-%d %H:%M:%S')))
367
368         ids2 = map(lambda x: x[0], cr.fetchall() or [])
369         cases = self.browse(cr, uid, ids2, context=context)
370         return self._action(cr, uid, cases, False, context=context)
371
372     def stage_find(self, cr, uid, cases, section_id, domain=None, order='sequence', context=None):
373         """ Override of the base.stage method
374             Parameter of the stage search taken from the lead:
375             - type: stage type must be the same or 'both'
376             - section_id: if set, stages must belong to this section or
377               be a default stage; if not set, stages must be default
378               stages
379         """
380         if isinstance(cases, (int, long)):
381             cases = self.browse(cr, uid, cases, context=context)
382         # collect all section_ids
383         section_ids = []
384         types = ['both']
385         if not cases :
386             type = context.get('default_type')
387             types += [type]
388         if section_id:
389             section_ids.append(section_id)
390         for lead in cases:
391             if lead.section_id:
392                 section_ids.append(lead.section_id.id)
393             if lead.type not in types:
394                 types.append(lead.type)
395         # OR all section_ids and OR with case_default
396         search_domain = []
397         if section_ids:
398             search_domain += [('|')] * len(section_ids)
399             for section_id in section_ids:
400                 search_domain.append(('section_ids', '=', section_id))
401         else:
402             search_domain.append(('case_default', '=', True))
403         # AND with cases types
404         search_domain.append(('type', 'in', types))
405         # AND with the domain in parameter
406         search_domain += list(domain)
407         # perform search, return the first found
408         stage_ids = self.pool.get('crm.case.stage').search(cr, uid, search_domain, order=order, context=context)
409         if stage_ids:
410             return stage_ids[0]
411         return False
412
413     def case_cancel(self, cr, uid, ids, context=None):
414         """ Overrides case_cancel from base_stage to set probability """
415         res = super(crm_lead, self).case_cancel(cr, uid, ids, context=context)
416         self.write(cr, uid, ids, {'probability' : 0.0}, context=context)
417         return res
418
419     def case_reset(self, cr, uid, ids, context=None):
420         """ Overrides case_reset from base_stage to set probability """
421         res = super(crm_lead, self).case_reset(cr, uid, ids, context=context)
422         self.write(cr, uid, ids, {'probability': 0.0}, context=context)
423         return res
424
425     def case_mark_lost(self, cr, uid, ids, context=None):
426         """ Mark the case as lost: state=cancel and probability=0 """
427         for lead in self.browse(cr, uid, ids):
428             stage_id = self.stage_find(cr, uid, [lead], lead.section_id.id or False, [('probability', '=', 0.0),('on_change','=',True)], context=context)
429             if stage_id:
430                 self.case_set(cr, uid, [lead.id], values_to_update={'probability': 0.0}, new_stage_id=stage_id, context=context)
431         return True
432
433     def case_mark_won(self, cr, uid, ids, context=None):
434         """ Mark the case as won: state=done and probability=100 """
435         for lead in self.browse(cr, uid, ids):
436             stage_id = self.stage_find(cr, uid, [lead], lead.section_id.id or False, [('probability', '=', 100.0),('on_change','=',True)], context=context)
437             if stage_id:
438                 self.case_set(cr, uid, [lead.id], values_to_update={'probability': 100.0}, new_stage_id=stage_id, context=context)
439         return True
440
441     def set_priority(self, cr, uid, ids, priority):
442         """ Set lead priority
443         """
444         return self.write(cr, uid, ids, {'priority' : priority})
445
446     def set_high_priority(self, cr, uid, ids, context=None):
447         """ Set lead priority to high
448         """
449         return self.set_priority(cr, uid, ids, '1')
450
451     def set_normal_priority(self, cr, uid, ids, context=None):
452         """ Set lead priority to normal
453         """
454         return self.set_priority(cr, uid, ids, '3')
455
456     def _merge_get_result_type(self, cr, uid, opps, context=None):
457         """
458         Define the type of the result of the merge.  If at least one of the
459         element to merge is an opp, the resulting new element will be an opp.
460         Otherwise it will be a lead.
461
462         We'll directly use a list of browse records instead of a list of ids
463         for performances' sake: it will spare a second browse of the
464         leads/opps.
465
466         :param list opps: list of browse records containing the leads/opps to process
467         :return string type: the type of the final element
468         """
469         for opp in opps:
470             if (opp.type == 'opportunity'):
471                 return 'opportunity'
472
473         return 'lead'
474
475     def _merge_data(self, cr, uid, ids, oldest, fields, context=None):
476         """
477         Prepare lead/opp data into a dictionary for merging.  Different types
478         of fields are processed in different ways:
479         - text: all the values are concatenated
480         - m2m and o2m: those fields aren't processed
481         - m2o: the first not null value prevails (the other are dropped)
482         - any other type of field: same as m2o
483
484         :param list ids: list of ids of the leads to process
485         :param list fields: list of leads' fields to process
486         :return dict data: contains the merged values
487         """
488         opportunities = self.browse(cr, uid, ids, context=context)
489
490         def _get_first_not_null(attr):
491             for opp in opportunities:
492                 if hasattr(opp, attr) and bool(getattr(opp, attr)):
493                     return getattr(opp, attr)
494             return False
495
496         def _get_first_not_null_id(attr):
497             res = _get_first_not_null(attr)
498             return res and res.id or False
499
500         def _concat_all(attr):
501             return '\n\n'.join(filter(lambda x: x, [getattr(opp, attr) or '' for opp in opportunities if hasattr(opp, attr)]))
502
503         # Process the fields' values
504         data = {}
505         for field_name in fields:
506             field_info = self._all_columns.get(field_name)
507             if field_info is None:
508                 continue
509             field = field_info.column
510             if field._type in ('many2many', 'one2many'):
511                 continue
512             elif field._type == 'many2one':
513                 data[field_name] = _get_first_not_null_id(field_name)  # !!
514             elif field._type == 'text':
515                 data[field_name] = _concat_all(field_name)  #not lost
516             else:
517                 data[field_name] = _get_first_not_null(field_name)  #not lost
518
519         # Define the resulting type ('lead' or 'opportunity')
520         data['type'] = self._merge_get_result_type(cr, uid, opportunities, context)
521         return data
522
523     def _mail_body(self, cr, uid, lead, fields, title=False, context=None):
524         body = []
525         if title:
526             body.append("%s\n" % (title))
527
528         for field_name in fields:
529             field_info = self._all_columns.get(field_name)
530             if field_info is None:
531                 continue
532             field = field_info.column
533             value = ''
534
535             if field._type == 'selection':
536                 if hasattr(field.selection, '__call__'):
537                     key = field.selection(self, cr, uid, context=context)
538                 else:
539                     key = field.selection
540                 value = dict(key).get(lead[field_name], lead[field_name])
541             elif field._type == 'many2one':
542                 if lead[field_name]:
543                     value = lead[field_name].name_get()[0][1]
544             elif field._type == 'many2many':
545                 if lead[field_name]:
546                     for val in lead[field_name]:
547                         field_value = val.name_get()[0][1]
548                         value += field_value + ","
549             else:
550                 value = lead[field_name]
551
552             body.append("%s: %s" % (field.string, value or ''))
553         return "<br/>".join(body + ['<br/>'])
554
555     def _merge_notify(self, cr, uid, opportunity_id, opportunities, context=None):
556         """
557         Create a message gathering merged leads/opps information.
558         """
559         #TOFIX: mail template should be used instead of fix body, subject text
560         details = []
561         result_type = self._merge_get_result_type(cr, uid, opportunities, context)
562         if result_type == 'lead':
563             merge_message = _('Merged leads')
564         else:
565             merge_message = _('Merged opportunities')
566         subject = [merge_message]
567         for opportunity in opportunities:
568             subject.append(opportunity.name)
569             title = "%s : %s" % (opportunity.type == 'opportunity' and _('Merged opportunity') or _('Merged lead'), opportunity.name)
570             details.append(self._mail_body(cr, uid, opportunity, CRM_LEAD_FIELDS_TO_MERGE, title=title, context=context))
571
572         # Chatter message's subject
573         subject = subject[0] + ": " + ", ".join(subject[1:])
574         details = "\n\n".join(details)
575         return self.message_post(cr, uid, [opportunity_id], body=details, subject=subject, context=context)
576
577     def _merge_opportunity_history(self, cr, uid, opportunity_id, opportunities, context=None):
578         message = self.pool.get('mail.message')
579         for opportunity in opportunities:
580             for history in opportunity.message_ids:
581                 message.write(cr, uid, history.id, {
582                         'res_id': opportunity_id,
583                         'subject' : _("From %s : %s") % (opportunity.name, history.subject)
584                 }, context=context)
585
586         return True
587
588     def _merge_opportunity_attachments(self, cr, uid, opportunity_id, opportunities, context=None):
589         attachment = self.pool.get('ir.attachment')
590
591         # return attachments of opportunity
592         def _get_attachments(opportunity_id):
593             attachment_ids = attachment.search(cr, uid, [('res_model', '=', self._name), ('res_id', '=', opportunity_id)], context=context)
594             return attachment.browse(cr, uid, attachment_ids, context=context)
595
596         count = 1
597         first_attachments = _get_attachments(opportunity_id)
598         for opportunity in opportunities:
599             attachments = _get_attachments(opportunity.id)
600             for first in first_attachments:
601                 for attachment in attachments:
602                     if attachment.name == first.name:
603                         values = dict(
604                             name = "%s (%s)" % (attachment.name, count,),
605                             res_id = opportunity_id,
606                         )
607                         attachment.write(values)
608                         count+=1
609
610         return True
611
612     def merge_opportunity(self, cr, uid, ids, context=None):
613         """
614         Different cases of merge:
615         - merge leads together = 1 new lead
616         - merge at least 1 opp with anything else (lead or opp) = 1 new opp
617
618         :param list ids: leads/opportunities ids to merge
619         :return int id: id of the resulting lead/opp
620         """
621         if context is None:
622             context = {}
623
624         if len(ids) <= 1:
625             raise osv.except_osv(_('Warning!'), _('Please select more than one element (lead or opportunity) from the list view.'))
626
627         opportunities = self.browse(cr, uid, ids, context=context)
628         sequenced_opps = []
629         for opportunity in opportunities:
630             if opportunity.stage_id and opportunity.stage_id.state != 'cancel':
631                 sequenced_opps.append((opportunity.stage_id.sequence, opportunity))
632             else:
633                 sequenced_opps.append((-1, opportunity))
634         sequenced_opps.sort(key=lambda tup: tup[0], reverse=True)
635         opportunities = [opportunity for sequence, opportunity in sequenced_opps]
636         ids = [opportunity.id for opportunity in opportunities]
637         highest = opportunities[0]
638         opportunities_rest = opportunities[1:]
639
640         tail_opportunities = opportunities_rest
641
642         merged_data = self._merge_data(cr, uid, ids, highest, CRM_LEAD_FIELDS_TO_MERGE, context=context)
643
644         # Merge messages and attachements into the first opportunity
645         self._merge_opportunity_history(cr, uid, highest.id, tail_opportunities, context=context)
646         self._merge_opportunity_attachments(cr, uid, highest.id, tail_opportunities, context=context)
647
648         # Merge notifications about loss of information
649         opportunities = [highest]
650         opportunities.extend(opportunities_rest)
651         self._merge_notify(cr, uid, highest, opportunities, context=context)
652         # Check if the stage is in the stages of the sales team. If not, assign the stage with the lowest sequence
653         if merged_data.get('type') == 'opportunity' and merged_data.get('section_id'):
654             section_stages = self.pool.get('crm.case.section').read(cr, uid, merged_data['section_id'], ['stage_ids'], context=context)
655             if merged_data.get('stage_id') not in section_stages['stage_ids']:
656                 stages_sequences = self.pool.get('crm.case.stage').search(cr, uid, [('id','in',section_stages['stage_ids'])], order='sequence', limit=1, context=context)
657                 merged_data['stage_id'] = stages_sequences and stages_sequences[0] or False
658         # Write merged data into first opportunity
659         self.write(cr, uid, [highest.id], merged_data, context=context)
660         # Delete tail opportunities
661         self.unlink(cr, uid, [x.id for x in tail_opportunities], context=context)
662
663         return highest.id
664
665     def _convert_opportunity_data(self, cr, uid, lead, customer, section_id=False, context=None):
666         crm_stage = self.pool.get('crm.case.stage')
667         contact_id = False
668         if customer:
669             contact_id = self.pool.get('res.partner').address_get(cr, uid, [customer.id])['default']
670         if not section_id:
671             section_id = lead.section_id and lead.section_id.id or False
672         val = {
673             'planned_revenue': lead.planned_revenue,
674             'probability': lead.probability,
675             'name': lead.name,
676             'partner_id': customer and customer.id or False,
677             'user_id': (lead.user_id and lead.user_id.id),
678             'type': 'opportunity',
679             'date_action': fields.datetime.now(),
680             'date_open': fields.datetime.now(),
681             'email_from': customer and customer.email or lead.email_from,
682             'phone': customer and customer.phone or lead.phone,
683         }
684         if not lead.stage_id or lead.stage_id.type=='lead':
685             val['stage_id'] = self.stage_find(cr, uid, [lead], section_id, [('state', '=', 'draft'),('type', 'in', ('opportunity','both'))], context=context)
686         return val
687
688     def convert_opportunity(self, cr, uid, ids, partner_id, user_ids=False, section_id=False, context=None):
689         customer = False
690         if partner_id:
691             partner = self.pool.get('res.partner')
692             customer = partner.browse(cr, uid, partner_id, context=context)
693         for lead in self.browse(cr, uid, ids, context=context):
694             if lead.state in ('done', 'cancel'):
695                 continue
696             vals = self._convert_opportunity_data(cr, uid, lead, customer, section_id, context=context)
697             self.write(cr, uid, [lead.id], vals, context=context)
698         self.message_post(cr, uid, ids, body=_("Lead <b>converted into an Opportunity</b>"), subtype="crm.mt_lead_convert_to_opportunity", context=context)
699
700         if user_ids or section_id:
701             self.allocate_salesman(cr, uid, ids, user_ids, section_id, context=context)
702
703         return True
704
705     def _lead_create_contact(self, cr, uid, lead, name, is_company, parent_id=False, context=None):
706         partner = self.pool.get('res.partner')
707         vals = {'name': name,
708             'user_id': lead.user_id.id,
709             'comment': lead.description,
710             'section_id': lead.section_id.id or False,
711             'parent_id': parent_id,
712             'phone': lead.phone,
713             'mobile': lead.mobile,
714             'email': lead.email_from and tools.email_split(lead.email_from)[0],
715             'fax': lead.fax,
716             'title': lead.title and lead.title.id or False,
717             'function': lead.function,
718             'street': lead.street,
719             'street2': lead.street2,
720             'zip': lead.zip,
721             'city': lead.city,
722             'country_id': lead.country_id and lead.country_id.id or False,
723             'state_id': lead.state_id and lead.state_id.id or False,
724             'is_company': is_company,
725             'type': 'contact'
726         }
727         partner = partner.create(cr, uid, vals, context=context)
728         return partner
729
730     def _create_lead_partner(self, cr, uid, lead, context=None):
731         partner_id = False
732         if lead.partner_name and lead.contact_name:
733             partner_id = self._lead_create_contact(cr, uid, lead, lead.partner_name, True, context=context)
734             partner_id = self._lead_create_contact(cr, uid, lead, lead.contact_name, False, partner_id, context=context)
735         elif lead.partner_name and not lead.contact_name:
736             partner_id = self._lead_create_contact(cr, uid, lead, lead.partner_name, True, context=context)
737         elif not lead.partner_name and lead.contact_name:
738             partner_id = self._lead_create_contact(cr, uid, lead, lead.contact_name, False, context=context)
739         elif lead.email_from and self.pool.get('res.partner')._parse_partner_name(lead.email_from, context=context)[0]:
740             contact_name = self.pool.get('res.partner')._parse_partner_name(lead.email_from, context=context)[0]
741             partner_id = self._lead_create_contact(cr, uid, lead, contact_name, False, context=context)
742         else:
743             raise osv.except_osv(
744                 _('Warning!'),
745                 _('No customer name defined. Please fill one of the following fields: Company Name, Contact Name or Email ("Name <email@address>")')
746             )
747         return partner_id
748
749     def _lead_set_partner(self, cr, uid, lead, partner_id, context=None):
750         """
751         Assign a partner to a lead.
752
753         :param object lead: browse record of the lead to process
754         :param int partner_id: identifier of the partner to assign
755         :return bool: True if the partner has properly been assigned
756         """
757         res = False
758         res_partner = self.pool.get('res.partner')
759         if partner_id:
760             res_partner.write(cr, uid, partner_id, {'section_id': lead.section_id and lead.section_id.id or False})
761             contact_id = res_partner.address_get(cr, uid, [partner_id])['default']
762             res = lead.write({'partner_id': partner_id}, context=context)
763             message = _("<b>Partner</b> set to <em>%s</em>." % (lead.partner_id.name))
764             self.message_post(cr, uid, [lead.id], body=message, context=context)
765         return res
766
767     def handle_partner_assignation(self, cr, uid, ids, action='create', partner_id=False, context=None):
768         """
769         Handle partner assignation during a lead conversion.
770         if action is 'create', create new partner with contact and assign lead to new partner_id.
771         otherwise assign lead to the specified partner_id
772
773         :param list ids: leads/opportunities ids to process
774         :param string action: what has to be done regarding partners (create it, assign an existing one, or nothing)
775         :param int partner_id: partner to assign if any
776         :return dict: dictionary organized as followed: {lead_id: partner_assigned_id}
777         """
778         #TODO this is a duplication of the handle_partner_assignation method of crm_phonecall
779         partner_ids = {}
780         # If a partner_id is given, force this partner for all elements
781         force_partner_id = partner_id
782         for lead in self.browse(cr, uid, ids, context=context):
783             # If the action is set to 'create' and no partner_id is set, create a new one
784             if action == 'create':
785                 partner_id = force_partner_id or self._create_lead_partner(cr, uid, lead, context)
786             self._lead_set_partner(cr, uid, lead, partner_id, context=context)
787             partner_ids[lead.id] = partner_id
788         return partner_ids
789
790     def allocate_salesman(self, cr, uid, ids, user_ids=None, team_id=False, context=None):
791         """
792         Assign salesmen and salesteam to a batch of leads.  If there are more
793         leads than salesmen, these salesmen will be assigned in round-robin.
794         E.g.: 4 salesmen (S1, S2, S3, S4) for 6 leads (L1, L2, ... L6).  They
795         will be assigned as followed: L1 - S1, L2 - S2, L3 - S3, L4 - S4,
796         L5 - S1, L6 - S2.
797
798         :param list ids: leads/opportunities ids to process
799         :param list user_ids: salesmen to assign
800         :param int team_id: salesteam to assign
801         :return bool
802         """
803         index = 0
804
805         for lead_id in ids:
806             value = {}
807             if team_id:
808                 value['section_id'] = team_id
809             if user_ids:
810                 value['user_id'] = user_ids[index]
811                 # Cycle through user_ids
812                 index = (index + 1) % len(user_ids)
813             if value:
814                 self.write(cr, uid, [lead_id], value, context=context)
815         return True
816
817     def schedule_phonecall(self, cr, uid, ids, schedule_time, call_summary, desc, phone, contact_name, user_id=False, section_id=False, categ_id=False, action='schedule', context=None):
818         """
819         :param string action: ('schedule','Schedule a call'), ('log','Log a call')
820         """
821         phonecall = self.pool.get('crm.phonecall')
822         model_data = self.pool.get('ir.model.data')
823         phonecall_dict = {}
824         if not categ_id:
825             res_id = model_data._get_id(cr, uid, 'crm', 'categ_phone2')
826             if res_id:
827                 categ_id = model_data.browse(cr, uid, res_id, context=context).res_id
828         for lead in self.browse(cr, uid, ids, context=context):
829             if not section_id:
830                 section_id = lead.section_id and lead.section_id.id or False
831             if not user_id:
832                 user_id = lead.user_id and lead.user_id.id or False
833             vals = {
834                 'name': call_summary,
835                 'opportunity_id': lead.id,
836                 'user_id': user_id or False,
837                 'categ_id': categ_id or False,
838                 'description': desc or '',
839                 'date': schedule_time,
840                 'section_id': section_id or False,
841                 'partner_id': lead.partner_id and lead.partner_id.id or False,
842                 'partner_phone': phone or lead.phone or (lead.partner_id and lead.partner_id.phone or False),
843                 'partner_mobile': lead.partner_id and lead.partner_id.mobile or False,
844                 'priority': lead.priority,
845             }
846             new_id = phonecall.create(cr, uid, vals, context=context)
847             phonecall.case_open(cr, uid, [new_id], context=context)
848             if action == 'log':
849                 phonecall.case_close(cr, uid, [new_id], context=context)
850             phonecall_dict[lead.id] = new_id
851             self.schedule_phonecall_send_note(cr, uid, [lead.id], new_id, action, context=context)
852         return phonecall_dict
853
854     def redirect_opportunity_view(self, cr, uid, opportunity_id, context=None):
855         models_data = self.pool.get('ir.model.data')
856
857         # Get opportunity views
858         dummy, form_view = models_data.get_object_reference(cr, uid, 'crm', 'crm_case_form_view_oppor')
859         dummy, tree_view = models_data.get_object_reference(cr, uid, 'crm', 'crm_case_tree_view_oppor')
860         return {
861             'name': _('Opportunity'),
862             'view_type': 'form',
863             'view_mode': 'tree, form',
864             'res_model': 'crm.lead',
865             'domain': [('type', '=', 'opportunity')],
866             'res_id': int(opportunity_id),
867             'view_id': False,
868             'views': [(form_view or False, 'form'),
869                     (tree_view or False, 'tree'),
870                     (False, 'calendar'), (False, 'graph')],
871             'type': 'ir.actions.act_window',
872         }
873
874     def redirect_lead_view(self, cr, uid, lead_id, context=None):
875         models_data = self.pool.get('ir.model.data')
876
877         # Get lead views
878         dummy, form_view = models_data.get_object_reference(cr, uid, 'crm', 'crm_case_form_view_leads')
879         dummy, tree_view = models_data.get_object_reference(cr, uid, 'crm', 'crm_case_tree_view_leads')
880         return {
881             'name': _('Lead'),
882             'view_type': 'form',
883             'view_mode': 'tree, form',
884             'res_model': 'crm.lead',
885             'domain': [('type', '=', 'lead')],
886             'res_id': int(lead_id),
887             'view_id': False,
888             'views': [(form_view or False, 'form'),
889                       (tree_view or False, 'tree'),
890                       (False, 'calendar'), (False, 'graph')],
891             'type': 'ir.actions.act_window',
892         }
893
894     def action_makeMeeting(self, cr, uid, ids, context=None):
895         """
896         Open meeting's calendar view to schedule meeting on current opportunity.
897         :return dict: dictionary value for created Meeting view
898         """
899         opportunity = self.browse(cr, uid, ids[0], context)
900         res = self.pool.get('ir.actions.act_window').for_xml_id(cr, uid, 'base_calendar', 'action_crm_meeting', context)
901         res['context'] = {
902             'default_opportunity_id': opportunity.id,
903             'default_partner_id': opportunity.partner_id and opportunity.partner_id.id or False,
904             'default_partner_ids' : opportunity.partner_id and [opportunity.partner_id.id] or False,
905             'default_user_id': uid,
906             'default_section_id': opportunity.section_id and opportunity.section_id.id or False,
907             'default_email_from': opportunity.email_from,
908             'default_name': opportunity.name,
909         }
910         return res
911
912     def write(self, cr, uid, ids, vals, context=None):
913         if vals.get('stage_id') and not vals.get('probability'):
914             # change probability of lead(s) if required by stage
915             stage = self.pool.get('crm.case.stage').browse(cr, uid, vals['stage_id'], context=context)
916             if stage.on_change:
917                 vals['probability'] = stage.probability
918         return super(crm_lead, self).write(cr, uid, ids, vals, context=context)
919
920     def new_mail_send(self, cr, uid, ids, context=None):
921         '''
922         This function opens a window to compose an email, with the edi sale template message loaded by default
923         '''
924         assert len(ids) == 1, 'This option should only be used for a single id at a time.'
925         ir_model_data = self.pool.get('ir.model.data')
926         try:
927             template_id = ir_model_data.get_object_reference(cr, uid, 'crm', 'email_template_opportunity_mail')[1]
928         except ValueError:
929             template_id = False
930         try:
931             compose_form_id = ir_model_data.get_object_reference(cr, uid, 'mail', 'email_compose_message_wizard_form')[1]
932         except ValueError:
933             compose_form_id = False 
934         if context is None:
935             context = {}
936         ctx = context.copy()
937         ctx.update({
938             'default_model': 'crm.lead',
939             'default_res_id': ids[0],
940             'default_use_template': bool(template_id),
941             'default_template_id': template_id,
942             'default_composition_mode': 'comment',
943         })
944         return {
945             'type': 'ir.actions.act_window',
946             'view_type': 'form',
947             'view_mode': 'form',
948             'res_model': 'mail.compose.message',
949             'views': [(compose_form_id, 'form')],
950             'view_id': compose_form_id,
951             'target': 'new',
952             'context': ctx,
953         }
954
955     # ----------------------------------------
956     # Mail Gateway
957     # ----------------------------------------
958
959     def message_get_reply_to(self, cr, uid, ids, context=None):
960         """ Override to get the reply_to of the parent project. """
961         return [lead.section_id.message_get_reply_to()[0] if lead.section_id else False
962                     for lead in self.browse(cr, uid, ids, context=context)]
963
964     def message_new(self, cr, uid, msg, custom_values=None, context=None):
965         """ Overrides mail_thread message_new that is called by the mailgateway
966             through message_process.
967             This override updates the document according to the email.
968         """
969         if custom_values is None: custom_values = {}
970
971         desc = html2plaintext(msg.get('body')) if msg.get('body') else ''
972         defaults = {
973             'name':  msg.get('subject') or _("No Subject"),
974             'description': desc,
975             'email_from': msg.get('from'),
976             'email_cc': msg.get('cc'),
977             'partner_id': msg.get('author_id', False),
978             'user_id': False,
979         }
980         if msg.get('author_id'):
981             defaults.update(self.on_change_partner(cr, uid, None, msg.get('author_id'), context=context)['value'])
982         if msg.get('priority') in dict(crm.AVAILABLE_PRIORITIES):
983             defaults['priority'] = msg.get('priority')
984         defaults.update(custom_values)
985         return super(crm_lead, self).message_new(cr, uid, msg, custom_values=defaults, context=context)
986
987     def message_update(self, cr, uid, ids, msg, update_vals=None, context=None):
988         """ Overrides mail_thread message_update that is called by the mailgateway
989             through message_process.
990             This method updates the document according to the email.
991         """
992         if isinstance(ids, (str, int, long)):
993             ids = [ids]
994         if update_vals is None: update_vals = {}
995
996         if msg.get('priority') in dict(crm.AVAILABLE_PRIORITIES):
997             update_vals['priority'] = msg.get('priority')
998         maps = {
999             'cost':'planned_cost',
1000             'revenue': 'planned_revenue',
1001             'probability':'probability',
1002         }
1003         for line in msg.get('body', '').split('\n'):
1004             line = line.strip()
1005             res = tools.command_re.match(line)
1006             if res and maps.get(res.group(1).lower()):
1007                 key = maps.get(res.group(1).lower())
1008                 update_vals[key] = res.group(2).lower()
1009
1010         return super(crm_lead, self).message_update(cr, uid, ids, msg, update_vals=update_vals, context=context)
1011
1012     # ----------------------------------------
1013     # OpenChatter methods and notifications
1014     # ----------------------------------------
1015
1016     def schedule_phonecall_send_note(self, cr, uid, ids, phonecall_id, action, context=None):
1017         phonecall = self.pool.get('crm.phonecall').browse(cr, uid, [phonecall_id], context=context)[0]
1018         if action == 'log': prefix = 'Logged'
1019         else: prefix = 'Scheduled'
1020         message = _("<b>%s a call</b> for the <em>%s</em>.") % (prefix, phonecall.date)
1021         return self.message_post(cr, uid, ids, body=message, context=context)
1022
1023     def onchange_state(self, cr, uid, ids, state_id, context=None):
1024         if state_id:
1025             country_id=self.pool.get('res.country.state').browse(cr, uid, state_id, context).country_id.id
1026             return {'value':{'country_id':country_id}}
1027         return {}
1028
1029 # vim:expandtab:smartindent:tabstop=4:softtabstop=4:shiftwidth=4: