<?php
namespace Garradin\Compta;
use \Garradin\DB;
use \Garradin\Utils;
use \Garradin\UserException;
class Exercices
{
public function add($data)
{
$this->_checkFields($data);
$db = DB::getInstance();
if ($db->firstColumn('SELECT 1 FROM compta_exercices WHERE
(debut <= :debut AND fin >= :debut) OR (debut <= :fin AND fin >= :fin);',
['debut' => $data['debut'], 'fin' => $data['fin']]))
{
throw new UserException('La date de début ou de fin se recoupe avec un autre exercice.');
}
if ($db->firstColumn('SELECT 1 FROM compta_exercices WHERE cloture = 0;'))
{
throw new UserException('Il n\'est pas possible de créer un nouvel exercice tant qu\'il existe un exercice non-clôturé.');
}
$db->insert('compta_exercices', [
'libelle' => trim($data['libelle']),
'debut' => $data['debut'],
'fin' => $data['fin'],
]);
return $db->lastInsertRowId();
}
public function edit($id, $data)
{
$db = DB::getInstance();
$this->_checkFields($data);
// Evitons que les exercices se croisent
if ($db->firstColumn('SELECT 1 FROM compta_exercices WHERE id != :id AND
((debut <= :debut AND fin >= :debut) OR (debut <= :fin AND fin >= :fin));',
['debut' => $data['debut'], 'fin' => $data['fin'], 'id' => (int) $id]))
{
throw new UserException('La date de début ou de fin se recoupe avec un autre exercice.');
}
// On vérifie qu'on ne va pas mettre des opérations en dehors de tout exercice
if ($db->firstColumn('SELECT 1 FROM compta_journal WHERE id_exercice = ?
AND date < ? LIMIT 1;', (int)$id, $data['debut']))
{
throw new UserException('Des opérations de cet exercice ont une date antérieure à la date de début de l\'exercice.');
}
if ($db->firstColumn('SELECT 1 FROM compta_journal WHERE id_exercice = ?
AND date > ? LIMIT 1;', (int)$id, $data['fin']))
{
throw new UserException('Des opérations de cet exercice ont une date postérieure à la date de fin de l\'exercice.');
}
$db->update('compta_exercices', [
'libelle' => trim($data['libelle']),
'debut' => $data['debut'],
'fin' => $data['fin'],
], 'id = :id', ['id' => (int)$id]);
return true;
}
/**
* Clôturer un exercice et en ouvrir un nouveau
* Le report à nouveau n'est pas effectué automatiquement par cette fonction, voir doReports pour ça.
* @param integer $id ID de l'exercice à clôturer
* @param string $end Date de clôture de l'exercice au format Y-m-d
* @return integer L'ID du nouvel exercice créé
*/
public function close($id, $end)
{
$db = DB::getInstance();
if (!Utils::checkDate($end))
{
throw new UserException('Date de fin vide ou invalide.');
}
$db->begin();
// Clôture de l'exercice
$db->update('compta_exercices', [
'cloture' => 1,
'fin' => $end,
], 'id = :id', ['id' => (int)$id]);
// Date de début du nouvel exercice : lendemain de la clôture du précédent exercice
$new_begin = Utils::modifyDate($end, '+1 day');
// Date de fin du nouvel exercice : un an moins un jour après l'ouverture
$new_end = Utils::modifyDate($new_begin, '+1 year -1 day');
// Enfin sauf s'il existe déjà des opérations après cette date, auquel cas la date de fin
// est fixée à la date de la dernière opération, ceci pour ne pas avoir d'opération
// orpheline d'exercice
$last = $db->firstColumn('SELECT date FROM compta_journal WHERE id_exercice = ? AND date >= ? ORDER BY date DESC LIMIT 1;', $id, $new_end);
$new_end = $last ?: $new_end;
// Création du nouvel exercice
$new_id = $this->add([
'debut' => $new_begin,
'fin' => $new_end,
'libelle' => 'Nouvel exercice'
]);
// Ré-attribution des opérations de l'exercice à clôturer qui ne sont pas dans son
// intervale au nouvel exercice
$db->update('compta_journal', ['id_exercice' => $new_id], 'id_exercice = :id AND date >= :date', [
'id' => $id,
'date' => $new_begin,
]);
$db->commit();
return $new_id;
}
/**
* Créer les reports à nouveau issus de l'exercice $old_id dans le nouvel exercice courant
* @param integer $old_id ID de l'ancien exercice
* @param integer $new_id ID du nouvel exercice
* @param string $date Date Y-m-d donnée aux opérations créées
* @return boolean true si succès
*/
public function doReports($old_id, $date)
{
$db = DB::getInstance();
$db->begin();
$report_crediteur = 110;
$report_debiteur = 119;
$comptes = new Comptes;
if (!$comptes->isActive($report_crediteur))
{
throw new UserException('Impossible de faire le report à nouveau : le compte de report créditeur ' . $report_crediteur . ' n\'existe pas ou est désactivé.');
}
else if (!$comptes->isActive($report_debiteur))
{
throw new UserException('Impossible de faire le report à nouveau : le compte de report débiteur ' . $report_debiteur . ' n\'existe pas ou est désactivé.');
}
unset($comptes);
$this->solderResultat($old_id, $date);
// Récupérer chacun des comptes de bilan et leurs soldes (uniquement les classes 1 à 5)
$statement = $db->query('SELECT compta_comptes.id AS compte, compta_comptes.position AS position,
ROUND(COALESCE((SELECT SUM(montant) FROM compta_journal WHERE compte_debit = compta_comptes.id AND id_exercice = :id), 0), 2)
- ROUND(COALESCE((SELECT SUM(montant) FROM compta_journal WHERE compte_credit = compta_comptes.id AND id_exercice = :id), 0), 2) AS solde
FROM compta_comptes
INNER JOIN compta_journal ON compta_comptes.id = compta_journal.compte_debit
OR compta_comptes.id = compta_journal.compte_credit
WHERE id_exercice = :id AND solde != 0 AND CAST(substr(compta_comptes.id, 1, 1) AS INTEGER) <= 5
GROUP BY compta_comptes.id;', ['id' => $old_id]);
$diff = 0;
$journal = new Journal;
while ($row = $statement->fetchArray(SQLITE3_ASSOC))
{
$solde = $row['solde'];
// Solde du compte à zéro : aucun report à faire
if (empty($solde))
{
continue;
}
$compte_debit = $solde < 0 ? NULL : $row['compte'];
$compte_credit = $solde > 0 ? NULL : $row['compte'];
$diff += $solde;
$solde = round(abs($solde), 2);
// Chaque solde de compte est reporté dans le nouvel exercice
$journal->add([
'libelle' => 'Report à nouveau',
'date' => $date,
'montant' => $solde,
'compte_debit' => $compte_debit,
'compte_credit' => $compte_credit,
'remarques' => 'Report de solde créé automatiquement à la clôture de l\'exercice précédent',
]);
}
// FIXME utiliser $diff pour équilibrer
$db->commit();
return true;
}
/**
* Solder les comptes de charge et de produits de l'exercice N
* et les inscrire au résultat de l'exercice N+1
* @param integer $exercice ID de l'exercice à solder
* @param string $date Date de début de l'exercice Y-m-d
* @return boolean true en cas de succès
*/
public function solderResultat($exercice, $date)
{
$db = DB::getInstance();
$resultat_excedent = 120;
$resultat_debiteur = 129;
$comptes = new Comptes;
if (!$comptes->isActive($resultat_excedent))
{
throw new UserException('Impossible de solder l\'exercice : le compte de résultat excédent ' . $resultat_excedent . ' n\'existe pas ou est désactivé.');
}
else if (!$comptes->isActive($resultat_debiteur))
{
throw new UserException('Impossible de solder l\'exercice : le compte de résultat débiteur ' . $resultat_debiteur . ' n\'existe pas ou est désactivé.');
}
unset($comptes);
$resultat = $this->getCompteResultat($exercice);
$resultat = $resultat['resultat'];
if ($resultat != 0)
{
$journal = new Journal;
$journal->add([
'libelle' => 'Résultat de l\'exercice précédent',
'date' => $date,
'montant' => abs($resultat),
'compte_debit' => $resultat < 0 ? $resultat_debiteur : NULL,
'compte_credit' => $resultat > 0 ? $resultat_excedent : NULL,
]);
}
return true;
}
public function delete($id)
{
$db = DB::getInstance();
// Ne pas supprimer un compte qui est utilisé !
if ($db->firstColumn('SELECT 1 FROM compta_journal WHERE id_exercice = ? LIMIT 1;', $id))
{
throw new UserException('Cet exercice ne peut être supprimé car des opérations comptables y sont liées.');
}
$db->delete('compta_exercices', 'id = ?', (int)$id);
return true;
}
public function get($id)
{
$db = DB::getInstance();
return $db->first('SELECT *, strftime(\'%s\', debut) AS debut,
strftime(\'%s\', fin) AS fin FROM compta_exercices WHERE id = ?;', (int)$id);
}
public function getCurrent()
{
$db = DB::getInstance();
return $db->first('SELECT *, strftime(\'%s\', debut) AS debut, strftime(\'%s\', fin) AS fin FROM compta_exercices
WHERE cloture = 0 LIMIT 1;');
}
public function getCurrentId()
{
$db = DB::getInstance();
return $db->firstColumn('SELECT id FROM compta_exercices WHERE cloture = 0 LIMIT 1;');
}
public function getList()
{
$db = DB::getInstance();
return $db->getGrouped('SELECT id, *, strftime(\'%s\', debut) AS debut,
strftime(\'%s\', fin) AS fin,
(SELECT COUNT(*) FROM compta_journal WHERE id_exercice = compta_exercices.id) AS nb_operations
FROM compta_exercices ORDER BY fin DESC;');
}
protected function _checkFields(&$data)
{
if (empty($data['libelle']) || !trim($data['libelle']))
{
throw new UserException('Le libellé ne peut rester vide.');
}
$data['libelle'] = trim($data['libelle']);
if (empty($data['debut']) || !checkdate(substr($data['debut'], 5, 2), substr($data['debut'], 8, 2), substr($data['debut'], 0, 4)))
{
throw new UserException('Date de début vide ou invalide.');
}
if (empty($data['fin']) || !checkdate(substr($data['fin'], 5, 2), substr($data['fin'], 8, 2), substr($data['fin'], 0, 4)))
{
throw new UserException('Date de fin vide ou invalide.');
}
return true;
}
public function getJournal($exercice)
{
$db = DB::getInstance();
return $db->get('SELECT *, strftime(\'%s\', date) AS date FROM compta_journal
WHERE id_exercice = ? ORDER BY date, id;', $exercice);
}
public function getGrandLivre($exercice)
{
$db = DB::getInstance();
$livre = ['classes' => [], 'debit' => 0.0, 'credit' => 0.0];
$res = $db->query('SELECT compte FROM
(SELECT compte_debit AS compte FROM compta_journal
WHERE id_exercice = :exercice GROUP BY compte_debit
UNION
SELECT compte_credit AS compte FROM compta_journal
WHERE id_exercice = :exercice GROUP BY compte_credit)
ORDER BY compte ASC;', ['exercice' => (int) $exercice]);
while ($row = $res->fetchArray(SQLITE3_NUM))
{
$compte = $row[0];
if (is_null($compte))
continue;
$classe = substr($compte, 0, 1);
$parent = substr($compte, 0, 2);
if (!array_key_exists($classe, $livre['classes']))
{
$livre['classes'][$classe] = [];
}
if (!array_key_exists($parent, $livre['classes'][$classe]))
{
$livre['classes'][$classe][$parent] = [
'total' => 0.0,
'comptes' => [],
];
}
$livre['classes'][$classe][$parent]['comptes'][$compte] = ['debit' => 0.0, 'credit' => 0.0, 'journal' => []];
$livre['classes'][$classe][$parent]['comptes'][$compte]['journal'] = $db->get(
'SELECT *, strftime(\'%s\', date) AS date FROM (
SELECT * FROM compta_journal WHERE compte_debit = :compte AND id_exercice = :exercice
UNION
SELECT * FROM compta_journal WHERE compte_credit = :compte AND id_exercice = :exercice
)
ORDER BY date, numero_piece, id;',
['compte' => $compte, 'exercice' => (int) $exercice]);
$solde = 0.0;
foreach ($livre['classes'][$classe][$parent]['comptes'][$compte]['journal'] as &$ligne)
{
if ($ligne->compte_credit == $compte)
{
$solde += $ligne->montant;
}
else
{
$solde -= $ligne->montant;
}
$ligne->solde = $solde;
}
$debit = (float) $db->firstColumn(
'SELECT SUM(montant) FROM compta_journal WHERE compte_debit = ? AND id_exercice = ?;',
$compte, (int) $exercice);
$credit = (float) $db->firstColumn(
'SELECT SUM(montant) FROM compta_journal WHERE compte_credit = ? AND id_exercice = ?;',
$compte, (int) $exercice);
$livre['classes'][$classe][$parent]['comptes'][$compte]['debit'] = $debit;
$livre['classes'][$classe][$parent]['comptes'][$compte]['credit'] = $credit;
$livre['classes'][$classe][$parent]['comptes'][$compte]['solde'] = $credit - $debit;
$livre['classes'][$classe][$parent]['total'] += $debit;
$livre['classes'][$classe][$parent]['total'] -= $credit;
$livre['debit'] += $debit;
$livre['credit'] += $credit;
}
$res->finalize();
return $livre;
}
public function getCompteResultat($exercice)
{
$db = DB::getInstance();
$charges = ['comptes' => [], 'total' => 0.0];
$produits = ['comptes' => [], 'total' => 0.0];
$resultat = 0.0;
$res = $db->query('SELECT compte, SUM(debit), SUM(credit)
FROM
(SELECT compte_debit AS compte, SUM(montant) AS debit, 0 AS credit
FROM compta_journal WHERE id_exercice = :exercice GROUP BY compte_debit
UNION
SELECT compte_credit AS compte, 0 AS debit, SUM(montant) AS credit
FROM compta_journal WHERE id_exercice = :exercice GROUP BY compte_credit)
WHERE compte LIKE \'6%\' OR compte LIKE \'7%\'
GROUP BY compte
ORDER BY compte ASC;', ['exercice' => (int)$exercice]);
while ($row = $res->fetchArray(SQLITE3_NUM))
{
list($compte, $debit, $credit) = $row;
$classe = substr($compte, 0, 1);
$parent = substr($compte, 0, 2);
if ($classe == 6)
{
if (!isset($charges['comptes'][$parent]))
{
$charges['comptes'][$parent] = ['comptes' => [], 'solde' => 0.0];
}
$solde = round($debit - $credit, 2);
if (empty($solde))
continue;
$charges['comptes'][$parent]['comptes'][$compte] = $solde;
$charges['total'] += $solde;
$charges['comptes'][$parent]['solde'] += $solde;
}
elseif ($classe == 7)
{
if (!isset($produits['comptes'][$parent]))
{
$produits['comptes'][$parent] = ['comptes' => [], 'solde' => 0.0];
}
$solde = round($credit - $debit, 2);
if (empty($solde))
continue;
$produits['comptes'][$parent]['comptes'][$compte] = $solde;
$produits['total'] += $solde;
$produits['comptes'][$parent]['solde'] += $solde;
}
}
$res->finalize();
$resultat = $produits['total'] - $charges['total'];
return ['charges' => $charges, 'produits' => $produits, 'resultat' => $resultat];
}
/**
* Calculer le bilan comptable pour l'exercice $exercice
* @param integer $exercice ID de l'exercice dont il faut produire le bilan
* @param boolean $resultat true s'il faut calculer le résultat de l'exercice (utile pour un exercice en cours)
* @return array Un tableau multi-dimensionnel avec deux clés : actif et passif
*/
public function getBilan($exercice)
{
$db = DB::getInstance();
$include = [Comptes::ACTIF, Comptes::PASSIF,
Comptes::PASSIF | Comptes::ACTIF];
$actif = ['comptes' => [], 'total' => 0.0];
$passif = ['comptes' => [], 'total' => 0.0];
$actif_ou_passif = ['comptes' => [], 'total' => 0.0];
$resultat = $this->getCompteResultat($exercice);
if ($resultat['resultat'] >= 0)
{
$passif['comptes']['12'] = [
'comptes' => ['120' => $resultat['resultat']],
'solde' => $resultat['resultat']
];
$passif['total'] = $resultat['resultat'];
}
else
{
$passif['comptes']['12'] = [
'comptes' => ['129' => $resultat['resultat']],
'solde' => $resultat['resultat']
];
$passif['total'] = $resultat['resultat'];
}
// Y'a sûrement moyen d'améliorer tout ça pour que le maximum de travail
// soit fait au niveau du SQL, mais pour le moment ça marche
$res = $db->query('SELECT compte, debit, credit, (SELECT position FROM compta_comptes WHERE id = compte) AS position
FROM
(SELECT compte_debit AS compte, SUM(montant) AS debit, NULL AS credit
FROM compta_journal WHERE id_exercice = :exercice GROUP BY compte_debit
UNION
SELECT compte_credit AS compte, NULL AS debit, SUM(montant) AS credit
FROM compta_journal WHERE id_exercice = :exercice GROUP BY compte_credit)
WHERE compte IN (SELECT id FROM compta_comptes WHERE position IN ('.implode(', ', $include).'))
ORDER BY compte ASC;', ['exercice' => (int)$exercice]);
while ($row = $res->fetchArray(SQLITE3_NUM))
{
list($compte, $debit, $credit, $position) = $row;
$parent = substr($compte, 0, 2);
$classe = $compte[0];
if (($position & Comptes::ACTIF) && ($position & Comptes::PASSIF))
{
$position = 'actif_ou_passif';
$solde = $debit - $credit;
}
else if ($position & Comptes::ACTIF)
{
$position = 'actif';
$solde = $debit - $credit;
}
else if ($position & Comptes::PASSIF)
{
$position = 'passif';
$solde = $credit - $debit;
}
else
{
continue;
}
if (!isset(${$position}['comptes'][$parent]))
{
${$position}['comptes'][$parent] = ['comptes' => [], 'solde' => 0];
}
if (!isset(${$position}['comptes'][$parent]['comptes'][$compte]))
{
${$position}['comptes'][$parent]['comptes'][$compte] = 0;
}
$solde = round($solde, 2);
${$position}['comptes'][$parent]['comptes'][$compte] += $solde;
${$position}['total'] += $solde;
${$position}['comptes'][$parent]['solde'] += $solde;
}
$res->finalize();
foreach ($actif_ou_passif['comptes'] as $parent=>$p)
{
foreach ($p['comptes'] as $compte=>$solde)
{
if ($solde > 0)
{
$position = 'actif';
}
else if ($solde < 0)
{
$position = 'passif';
$solde = -$solde;
}
else
{
continue;
}
if (!isset(${$position}['comptes'][$parent]))
{
${$position}['comptes'][$parent] = ['comptes' => [], 'solde' => 0];
}
if (!isset(${$position}['comptes'][$parent]['comptes'][$compte]))
{
${$position}['comptes'][$parent]['comptes'][$compte] = 0;
}
${$position}['comptes'][$parent]['comptes'][$compte] += $solde;
${$position}['total'] += $solde;
${$position}['comptes'][$parent]['solde'] += $solde;
}
}
// Suppression des soldes nuls
foreach ($passif['comptes'] as $parent=>$p)
{
if ($p['solde'] == 0)
{
unset($passif['comptes'][$parent]);
continue;
}
foreach ($p['comptes'] as $id=>$solde)
{
if ($solde == 0)
{
unset($passif['comptes'][$parent]['comptes'][$id]);
}
}
}
foreach ($actif['comptes'] as $parent=>$p)
{
if (empty($p['solde']))
{
unset($actif['comptes'][$parent]);
continue;
}
foreach ($p['comptes'] as $id=>$solde)
{
if (empty($solde))
{
unset($actif['comptes'][$parent]['comptes'][$id]);
}
}
}
return ['actif' => $actif, 'passif' => $passif];
}
}