From 01174cd2118675140559db4463cab5a34f26905a Mon Sep 17 00:00:00 2001
From: "RGA(OpenERP)" <>
Date: Mon, 19 Nov 2012 18:29:17 +0530
Subject: [PATCH] add exception on deletion of partner

bzr revid: rgaopenerp-20121119125917-eourqspwm19zsrd3
---
 openerp/addons/base/res/res_partner.py | 9 ++++++---
 1 file changed, 6 insertions(+), 3 deletions(-)

diff --git a/openerp/addons/base/res/res_partner.py b/openerp/addons/base/res/res_partner.py
index 0e31d4736d7..9ad1738d467 100644
--- a/openerp/addons/base/res/res_partner.py
+++ b/openerp/addons/base/res/res_partner.py
@@ -353,9 +353,12 @@ class res_partner(osv.osv, format_address):
         if not ids:
             return True
         res_user = self.pool.get('res.users')
-        res_id = res_user.search(cr, uid, [('partner_id', '=', ids)], context=context)
-        res_user.unlink(cr, uid, res_id)
-        return super(res_partner,self).unlink(cr, uid, ids, context=context)
+        user_ids = res_user.search(cr, uid, [('partner_id', '=', ids)], context=context)
+        if user_ids:
+            raise osv.except_osv(_('Error!'),
+                    _('You can not delete partner because there is some related user to this partner'))
+        res = super(res_partner,self).unlink(cr, uid, ids, context=context)
+        return res
 
     def write(self, cr, uid, ids, vals, context=None):
         # Update parent and siblings or children records