<?php
namespace Garradin;

require_once __DIR__ . '/../_inc.php';

if ($user['droits']['compta'] < Membres::DROIT_ADMIN)
{
    throw new UserException("Vous n'avez pas le droit d'accéder à cette page.");
}

$journal = new Compta_Journal;
$cats = new Compta_Categories;
$banques = new Compta_Comptes_Bancaires;

$operation = $journal->get(utils::get('id'));

if (!$operation)
{
    throw new UserException("L'opération demandée n'existe pas.");
}

$debug = "_POST=".print_r($_POST, true);

if ($operation['id_categorie'])
{
    $categorie = $cats->get($operation['id_categorie']);
}
else
{
    $categorie = false;
}

if ($categorie && $categorie['type'] != Compta_Categories::AUTRES)
{
    $type = $categorie['type'];
}
else
{
    $type = null;
}

foreach ($operation['fluxs'] as $key => &$flux)
{
    $compte = $comptes->get($flux['compte']);
    $flux['compte_libelle'] = $compte['libelle'];
}
$tpl->assign('fluxs', $operation['fluxs']);

$error = false;

if (!empty($_POST['save']))
{
    if (!utils::CSRF_check('compta_modifier_'.$operation['id']))
    {
        $error = 'Une erreur est survenue, merci de renvoyer le formulaire.';
    }
    else
    {
        try
        {
            if (is_null($type))
            {
                $fluxs = [];
                $solde = 0.0;
                for ($n=0; array_key_exists('compte_'.$n, $_POST); $n++)
                {
                  $compte = $_POST['compte_'.$n];
                  if (array_key_exists('montant_'.$n, $_POST)) {
                      $montant = $_POST['montant_'.$n];
                      if ($montant == 0.0)
                      {
                          continue;
                      }
                      else
                      {
                          $solde += $montant;
                          $fluxs[] = ['compte' => $compte, 'montant' => $montant];
                      }
                  } else {
                      if ($solde != 0.0 || $n < 1) {
                          $fluxs[] = ['compte' => $compte, 'montant' => - $solde];
                      }
                      break;
                  }
                }
                $journal->edit($operation['id'], [
                    'libelle'       =>  utils::post('libelle'),
                    'fluxs'         =>  $fluxs,
                    'date'          =>  utils::post('date'),
                    'numero_piece'  =>  utils::post('numero_piece'),
                    'remarques'     =>  utils::post('remarques'),
                ]);
            }
            else
            {
                $cat = $cats->get(utils::post('id_categorie'));

                if (!$cat)
                {
                    throw new UserException('Il faut choisir une catégorie.');
                }

                if (!array_key_exists(utils::post('moyen_paiement'), $cats->listMoyensPaiement()))
                {
                    throw new UserException('Moyen de paiement invalide.');
                }

                if (utils::post('moyen_paiement') == 'ES')
                {
                    $a = Compta_Comptes::CAISSE;
                    $b = $cat['compte'];
                }
                else
                {
                    if (!trim(utils::post('banque')))
                    {
                        throw new UserException('Le compte bancaire choisi est invalide.');
                    }

                    if (!array_key_exists(utils::post('banque'), $banques->getList()))
                    {
                        throw new UserException('Le compte bancaire choisi n\'existe pas.');
                    }

                    $a = utils::post('banque');
                    $b = $cat['compte'];
                }

                if ($type == Compta_Categories::DEPENSES)
                {
                    $debit = $b;
                    $credit = $a;
                }
                elseif ($type == Compta_Categories::RECETTES)
                {
                    $debit = $a;
                    $credit = $b;
                }

                $journal->edit($operation['id'], [
                    'libelle'       =>  utils::post('libelle'),
                    'date'          =>  utils::post('date'),
                    'fluxs'      =>
                      [ ['compte'=>$credit, 'montant' => - utils::post('montant')]
                      , ['compte'=>$debit,  'montant' =>   utils::post('montant')] ],
                    'moyen_paiement'=>  utils::post('moyen_paiement'),
                    'numero_cheque' =>  utils::post('numero_cheque'),
                    'numero_piece'  =>  utils::post('numero_piece'),
                    'remarques'     =>  utils::post('remarques'),
                    'id_categorie'  =>  (int)$cat['id'],
                ]);
            }

            utils::redirect('/admin/compta/operations/voir.php?id='.(int)$operation['id']);
        }
        catch (UserException $e)
        {
            $error = $e->getMessage();
        }
    }
}

$tpl->assign('error', $error);

$tpl->assign('type', $type);

if ($type === null)
{
    $tpl->assign('comptes', $comptes->listTree());
}
else
{
    $tpl->assign('moyens_paiement', $cats->listMoyensPaiement());
    $tpl->assign('categories', $cats->getList($type));
    $tpl->assign('comptes_bancaires', $banques->getList());
}

$tpl->assign('debug', $debug);
$tpl->assign('operation', $operation);

$tpl->display('admin/compta/operations/modifier.tpl');

?>