Ajout du support des écritures ventilées.
[garradin.git] / include / class.compta_comptes_bancaires.php
index 1ac1213..88eb210 100644 (file)
@@ -75,8 +75,9 @@ class Compta_Comptes_Bancaires extends Compta_Comptes
 
         // Ne pas supprimer/désactiver un compte qui est utilisé dans l'exercice courant
         if ($db->simpleQuerySingle('SELECT 1 FROM compta_journal
 
         // Ne pas supprimer/désactiver un compte qui est utilisé dans l'exercice courant
         if ($db->simpleQuerySingle('SELECT 1 FROM compta_journal
+                LEFT JOIN compta_flux ON compta_journal.id = compta_flux.id_journal
                 WHERE id_exercice = (SELECT id FROM compta_exercices WHERE cloture = 0 LIMIT 1) 
                 WHERE id_exercice = (SELECT id FROM compta_exercices WHERE cloture = 0 LIMIT 1) 
-                AND (compte_debit = ? OR compte_debit = ?) LIMIT 1;', false, $id, $id))
+                AND compte = ? LIMIT 1;', false, $id))
         {
             throw new UserException('Ce compte ne peut être supprimé car des écritures y sont liées sur l\'exercice courant. '
                 . 'Il faut supprimer ou ré-attribuer ces écritures avant de pouvoir supprimer le compte.');
         {
             throw new UserException('Ce compte ne peut être supprimé car des écritures y sont liées sur l\'exercice courant. '
                 . 'Il faut supprimer ou ré-attribuer ces écritures avant de pouvoir supprimer le compte.');
@@ -161,4 +162,4 @@ class Compta_Comptes_Bancaires extends Compta_Comptes
     }
 }
 
     }
 }
 
-?>
\ No newline at end of file
+?>