addons/crm/test/crm_lead_message.yml

   1 -
   2   Customer interested in our product, so he sends request by email to get more details.
   3 -
   4   Mail script will fetch his request from mail server. Then I process that mail after read EML file.
   5 -
   6   !python {model: mail.thread}: |
   7     import addons
   8     request_file = open(addons.get_module_resource('crm','test', 'customer_request.eml'),'rb')
   9     request_message = request_file.read()
  10     self.message_process(cr, uid, 'crm.lead', request_message)
  11 -
  12   After getting the mail, I check details of new lead of that customer.
  13 -
  14   !python {model: crm.lead}: |
  15     lead_ids = self.search(cr, uid, [('email_from','=', 'Mr. John Right <info@customer.com>')])
  16     assert lead_ids and len(lead_ids), "Lead is not created after getting request"
  17     lead = self.browse(cr, uid, lead_ids[0], context=context)
  18     assert not lead.partner_id, "Customer should be a new one"
  19     assert lead.name == "Fournir votre devis avec le meilleur prix.", "Subject does not match"
  20 -
  21   I reply his request with welcome message. TODO revert mail.mail to mail.compose.message (conversion to customer should be automatic).
  22 -
  23   !python {model: mail.mail}: |
  24     lead_ids = self.pool.get('crm.lead').search(cr, uid, [('email_from','=', 'Mr. John Right <info@customer.com>')])
  25     context.update({'active_model': 'crm.lead','active_id': lead_ids[0]})
  26     id = self.create(cr, uid, {'body': "Merci de votre intérêt pour notre produit, nous vous contacterons bientôt. Bien à vous", 'email_from': 'sales@mycompany.com'}, context=context)
  27     try:
  28         self.send_mail(cr, uid, [id], context=context)
  29     except:
  30         pass
  31 -
  32   Now, I convert him into customer and put him into regular customer list.
  33 -
  34   !python {model: crm.lead}: |
  35     lead_ids = self.search(cr, uid, [('email_from','=', 'Mr. John Right <info@customer.com>')])
  36     self.handle_partner_assignation(cr, uid, lead_ids, context=context)