Overview
Comment:Import de CSV de Garradin dans la compta
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: 6c589a8240b4d0337215331c7a4c729a63d70a86
User & Date: bohwaz on 2013-11-18 20:22:50
Other Links: manifest | tags
References
2013-11-18
20:30 Fixed ticket [5fbfdc2294]: Comptabilité: import/export dans un format interne plus 5 other changes artifact: 8ff2e944a5 user: bohwaz
Context
2013-11-18
21:42
Oubli check-in: 978425d0c5 user: bohwaz tags: trunk
20:22
Import de CSV de Garradin dans la compta check-in: 6c589a8240 user: bohwaz tags: trunk
20:22
Affichage plus sympa des messages d'erreur check-in: 04c5e26ca1 user: bohwaz tags: trunk
Changes

Modified src/include/class.compta_import.php from [819e0a1300] to [17f940c151].

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25




26
27
28
29
30
31
32
33
34
..
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64








































































































































65
66
67
68
69
70
71
...
125
126
127
128
129
130
131


132
133
134
135

136
137
138
139
140
141
142
143
144
145
146
147
148








149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
<?php

namespace Garradin;

class Compta_Import
{
	public function toCSV($exercice)
	{
		$db = DB::getInstance();

		$header = array(
			'Numéro mouvement',
			'Date',
			'Type de mouvement',
			'Catégorie',
			'Libellé',
			'Montant',
			'Compte de débit - numéro',
			'Compte de débit - libellé',
			'Compte de crédit - numéro',
			'Compte de crédit - libellé',
			'Moyen de paiement',
			'Numéro de chèque',
			'Numéro de pièce',
			'Remarques'




		);

		$res = $db->prepare('SELECT
			journal.id,
			strftime(\'%d/%m/%Y\', date) AS date,
			(CASE cat.type WHEN 1 THEN \'Recette\' WHEN -1 THEN \'Dépense\' ELSE \'Autre\' END) AS type,
			(CASE cat.intitule WHEN NULL THEN \'\' ELSE cat.intitule END) AS cat,
			journal.libelle,
			montant,
................................................................................
				LEFT JOIN compta_moyens_paiement AS moyen ON moyen.code = journal.moyen_paiement
			WHERE id_exercice = '.(int)$exercice.'
			ORDER BY journal.date;
		')->execute();

		$fp = fopen('php://output', 'w');

		fputcsv($fp, $header);

		while ($row = $res->fetchArray(SQLITE3_ASSOC))
		{
			fputcsv($fp, $row);
		}

		fclose($fp);

		return true;
	}









































































































































	public function fromCitizen($path)
	{
		if (!file_exists($path) || !is_readable($path))
		{
			throw new \RuntimeException('Fichier inconnu : '.$path);
		}
................................................................................
				return null;

			if (!isset($row[$columns[$column]]))
				return null;

			return $row[$columns[$column]];
		};



		while (!feof($fp))
		{
			$row = fgetcsv($fp, 4096, ';');


			if (empty($row))
			{
				continue;
			}

			if (empty($columns))
			{
				$columns = $row;
				$columns = array_flip($columns);
				continue;
			}









			$date = explode('/', $col('Date'));
			$date = $date[2] . '-' . $date[1] . '-' . $date[0];

			if ($db->simpleQuerySingle('SELECT 1 FROM compta_exercices
				WHERE (? < debut || ? > fin) AND cloture = 0;', false, $date, $date))
			{
				$db->exec('ROLLBACK;');
				throw new UserException('Impossible d\'importer dans cet exercice : une opération est datée au '.$col('Date').', en dehors de l\'exercice.');
			}

			if ($db->simpleQuerySingle('SELECT 1 FROM compta_exercices WHERE ? < debut AND cloture = 0;', false, $date))
			{
				$db->exec('ROLLBACK;');
				throw new UserException('Une opération est datée du '.$col('Date').', soit avant la date de début de l\'exercice.');
			}

			$debit = $get_compte($col('Compte débité - Numéro'), $col('Compte débité - Intitulé'));
			$credit = $get_compte($col('Compte crédité - Numéro'), $col('Compte crédité - Intitulé'));

			$cat = $col('Rubrique');
			$moyen = strtoupper(substr($col('Moyen de paiement'), 0, 2));






<
<
<
<
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
>
>
>
>
|








 







|










>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>







 







>
>




>













>
>
>
>
>
>
>
>
|



|

|
<
<
<
<
<
<
<







1
2
3
4
5
6




7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
..
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
...
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302







303
304
305
306
307
308
309
<?php

namespace Garradin;

class Compta_Import
{




	protected $csv_header = [
		'Numéro mouvement',
		'Date',
		'Type de mouvement',
		'Catégorie',
		'Libellé',
		'Montant',
		'Compte de débit - numéro',
		'Compte de débit - libellé',
		'Compte de crédit - numéro',
		'Compte de crédit - libellé',
		'Moyen de paiement',
		'Numéro de chèque',
		'Numéro de pièce',
		'Remarques'
	];

	public function toCSV($exercice)
	{
		$db = DB::getInstance();

		$res = $db->prepare('SELECT
			journal.id,
			strftime(\'%d/%m/%Y\', date) AS date,
			(CASE cat.type WHEN 1 THEN \'Recette\' WHEN -1 THEN \'Dépense\' ELSE \'Autre\' END) AS type,
			(CASE cat.intitule WHEN NULL THEN \'\' ELSE cat.intitule END) AS cat,
			journal.libelle,
			montant,
................................................................................
				LEFT JOIN compta_moyens_paiement AS moyen ON moyen.code = journal.moyen_paiement
			WHERE id_exercice = '.(int)$exercice.'
			ORDER BY journal.date;
		')->execute();

		$fp = fopen('php://output', 'w');

		fputcsv($fp, $this->csv_header);

		while ($row = $res->fetchArray(SQLITE3_ASSOC))
		{
			fputcsv($fp, $row);
		}

		fclose($fp);

		return true;
	}

	public function fromCSV($path)
	{
		if (!file_exists($path) || !is_readable($path))
		{
			throw new \RuntimeException('Fichier inconnu : '.$path);
		}

		$fp = fopen($path, 'r');

		if (!$fp)
		{
			return false;
		}

		$db = DB::getInstance();
		$db->exec('BEGIN;');
		$comptes = new Compta_Comptes;
		$banques = new Compta_Comptes_Bancaires;
		$cats = new Compta_Categories;
		$journal = new Compta_Journal;

		$columns = array_flip($this->csv_header);
		$liste_comptes = $db->simpleStatementFetchAssoc('SELECT id, id FROM compta_comptes;');
		$liste_cats = $db->simpleStatementFetchAssoc('SELECT intitule, id FROM compta_categories;');
		$liste_moyens = $cats->listMoyensPaiement();

		$col = function($column) use (&$row, &$columns)
		{
			if (!isset($columns[$column]))
				return null;

			if (!isset($row[$columns[$column]]))
				return null;

			return $row[$columns[$column]];
		};

		$line = 0;

		while (!feof($fp))
		{
			$row = fgetcsv($fp, 4096);
			$line++;

			if (empty($row))
			{
				continue;
			}

			if (trim($row[0]) == 'Numéro mouvement')
			{
				continue;
			}

			if (count($row) != count($columns))
			{
				$db->exec('ROLLBACK;');
				throw new UserException('Erreur sur la ligne ' . $line . ' : le nombre de colonnes est incorrect.');
			}

			if (!empty($row[0]) && !is_numeric($row[0]))
			{
				print_r($row);
				$db->exec('ROLLBACK;');
				throw new UserException('Erreur sur la ligne ' . $line . ' : la première colonne doit être vide ou contenir le numéro unique d\'opération.');
			}

			$id = $col('Numéro mouvement');
			$date = $col('Date');

			if (!preg_match('!^\d{2}/\d{2}/\d{4}$!', $date))
			{
				$db->exec('ROLLBACK;');
				throw new UserException('Erreur sur la ligne ' . $line . ' : la date n\'est pas au format jj/mm/aaaa.');
			}

			$date = explode('/', $date);
			$date = $date[2] . '-' . $date[1] . '-' . $date[0];

			// En dehors de l'exercice courant
			if ($db->simpleQuerySingle('SELECT 1 FROM compta_exercices
				WHERE (? < debut OR ? > fin) AND cloture = 0;', false, $date, $date))
			{
				continue;
			}

			$debit = $col('Compte de débit - numéro');
			$credit = $col('Compte de crédit - numéro');

			$cat = $col('Catégorie');
			$moyen = strtoupper(substr($col('Moyen de paiement'), 0, 2));

			if (!$moyen || !array_key_exists($moyen, $liste_moyens))
			{
				$moyen = false;
				$cat = false;
			}

			if ($cat && !array_key_exists($cat, $liste_cats))
			{
				$cat = $moyen = false;
			}

			$data = array(
				'libelle'       =>  $col('Libellé'),
				'montant'       =>  (float) $col('Montant'),
				'date'          =>  $date,
				'compte_credit' =>  $credit,
				'compte_debit'  =>  $debit,
				'numero_piece'  =>  $col('Numéro de pièce'),
				'remarques'     =>  $col('Remarques'),
			);

			if ($cat)
			{
				$data['moyen_paiement']	=	$moyen;
				$data['numero_cheque']	=	$col('Numéro de chèque');
				$data['id_categorie']	=	$liste_cats[$cat];
			}

			if (empty($id))
			{
				$journal->add($data);
			}
			else
			{
				$journal->edit($id, $data);
			}
		}

		$db->exec('END;');

		fclose($fp);
		return true;
	}

	public function fromCitizen($path)
	{
		if (!file_exists($path) || !is_readable($path))
		{
			throw new \RuntimeException('Fichier inconnu : '.$path);
		}
................................................................................
				return null;

			if (!isset($row[$columns[$column]]))
				return null;

			return $row[$columns[$column]];
		};

		$line = 0;

		while (!feof($fp))
		{
			$row = fgetcsv($fp, 4096, ';');
			$line++;

			if (empty($row))
			{
				continue;
			}

			if (empty($columns))
			{
				$columns = $row;
				$columns = array_flip($columns);
				continue;
			}

			$date = $col('Date');

			if (!preg_match('!^\d{2}/\d{2}/\d{4}$!', $date))
			{
				$db->exec('ROLLBACK;');
				throw new UserException('Erreur sur la ligne ' . $line . ' : la date n\'est pas au format jj/mm/aaaa.');
			}

			$date = explode('/', $date);
			$date = $date[2] . '-' . $date[1] . '-' . $date[0];

			if ($db->simpleQuerySingle('SELECT 1 FROM compta_exercices
				WHERE (? < debut OR ? > fin) AND cloture = 0;', false, $date, $date))
			{
				continue;







			}

			$debit = $get_compte($col('Compte débité - Numéro'), $col('Compte débité - Intitulé'));
			$credit = $get_compte($col('Compte crédité - Numéro'), $col('Compte crédité - Intitulé'));

			$cat = $col('Rubrique');
			$moyen = strtoupper(substr($col('Moyen de paiement'), 0, 2));

Modified src/templates/admin/compta/import.tpl from [b884ed2898] to [b2c64dde46].

1
2
3
4
5
6




7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22









23
24
25
26
27
28
29



30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
{include file="admin/_head.tpl" title="Import / Export" current="compta"}

{if $error}
    <p class="error">
        {$error|escape}
    </p>




{/if}

<ul class="actions">
    <li><a href="{$www_url}admin/compta/import.php">Importer</a></li>
    <li><a href="{$www_url}admin/compta/import.php?export">Exporter en CSV</a></li>
</ul>

<form method="post" action="{$self_url|escape}" enctype="multipart/form-data">

    <fieldset>
        <legend>Importer depuis un fichier</legend>
        <dl>
            <dt><label for="f_file">Fichier à importer</label> <b title="(Champ obligatoire)">obligatoire</b></dt>
            <dd><input type="file" name="upload" id="f_file" /></dd>
            <dt><label for="f_type">Type de fichier</label> <b title="(Champ obligatoire)">obligatoire</b></dt>
            <dd>









                <input type="radio" name="type" id="f_type" value="citizen" {form_field name=type checked="citizen" default="citizen"} />
                <label for="f_type">Export CSV de Citizen Comptabilité</label>
            </dd>
            <dd class="help">
                Export des données au format CSV provenant du logiciel de comptabilité de
                <a href="http://www.citizenplace.com/">Citizen Place</a>.
            </dd>



        </dl>
    </fieldset>

    <p class="help">
        Attention l'import ne pourra pas s'effectuer si des opérations contenues dans le fichier
        ne concernent pas la période de l'exercice en cours. Les catégories et comptes associés
        aux opérations seront automatiquement créés s'ils n'existent pas déjà.
    </p>

    <p class="submit">
        {csrf_field key="compta_import"}
        <input type="submit" name="import" value="Importer &rarr;" />
    </p>

</form>

{include file="admin/_foot.tpl"}






>
>
>
>



|












>
>
>
>
>
>
>
>
>
|
|





>
>
>



|
|
|
<










1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51

52
53
54
55
56
57
58
59
60
61
{include file="admin/_head.tpl" title="Import / Export" current="compta"}

{if $error}
    <p class="error">
        {$error|escape}
    </p>
{elseif $ok}
    <p class="confirm">
        L'import s'est bien déroulé.
    </p>
{/if}

<ul class="actions">
    <li class="current"><a href="{$www_url}admin/compta/import.php">Importer</a></li>
    <li><a href="{$www_url}admin/compta/import.php?export">Exporter en CSV</a></li>
</ul>

<form method="post" action="{$self_url|escape}" enctype="multipart/form-data">

    <fieldset>
        <legend>Importer depuis un fichier</legend>
        <dl>
            <dt><label for="f_file">Fichier à importer</label> <b title="(Champ obligatoire)">obligatoire</b></dt>
            <dd><input type="file" name="upload" id="f_file" /></dd>
            <dt><label for="f_type">Type de fichier</label> <b title="(Champ obligatoire)">obligatoire</b></dt>
            <dd>
                <input type="radio" name="type" id="f_type" value="garradin" {form_field name=type checked="garradin" default="garradin"} />
                <label for="f_type">Export CSV de Garradin</label>
            </dd>
            <dd class="help">
                Export du journal comptable au format CSV provenant de Garradin.
                Les lignes comportant un numéro d'opération mettront à jour les opérations existantes,
                les lignes sans numéro créeront de nouvelles opérations.
            </dd>
            <dd>
                <input type="radio" name="type" id="f_type_citizen" value="citizen" {form_field name=type checked="citizen"} />
                <label for="f_type_citizen">Export CSV de Citizen Comptabilité</label>
            </dd>
            <dd class="help">
                Export des données au format CSV provenant du logiciel de comptabilité de
                <a href="http://www.citizenplace.com/">Citizen Place</a>.
            </dd>
            <dd class="help">
                Toutes les opérations du fichier seront créées dans l'exercice en cours.  Les catégories et comptes associés aux opérations seront automatiquement créés s'ils n'existent pas déjà.
            </dd>
        </dl>
    </fieldset>

    <p class="alert">
        Si le fichier comporte des opérations dont la date est en dehors de l'exercice courant,
        elles seront ignorées.

    </p>

    <p class="submit">
        {csrf_field key="compta_import"}
        <input type="submit" name="import" value="Importer &rarr;" />
    </p>

</form>

{include file="admin/_foot.tpl"}

Modified src/www/admin/compta/import.php from [c88663e1e0] to [53787cfb79].

19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
..
35
36
37
38
39
40
41




42
43
44
45
46
47
48
49
50
51
52
53
54
55
56



57
58
59
60
    exit;
}

$error = false;

if (!empty($_POST['import']))
{
    if (!utils::CSRF_check('compta_import'))
    {
        $error = 'Une erreur est survenue, merci de renvoyer le formulaire.';
    }
    elseif (empty($_FILES['upload']['tmp_name']))
    {
        $error = 'Aucun fichier fourni.';
    }
................................................................................
    {
        try
        {
            if (utils::post('type') == 'citizen')
            {
                $import->fromCitizen($_FILES['upload']['tmp_name']);
            }




            else
            {
                throw new UserException('Import inconnu.');
            }

            utils::redirect('/admin/compta/');
        }
        catch (UserException $e)
        {
            $error = $e->getMessage();
        }
    }
}

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




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

?>







|







 







>
>
>
>





|









>
>
>




19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
..
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
    exit;
}

$error = false;

if (!empty($_POST['import']))
{
    if (false && !utils::CSRF_check('compta_import'))
    {
        $error = 'Une erreur est survenue, merci de renvoyer le formulaire.';
    }
    elseif (empty($_FILES['upload']['tmp_name']))
    {
        $error = 'Aucun fichier fourni.';
    }
................................................................................
    {
        try
        {
            if (utils::post('type') == 'citizen')
            {
                $import->fromCitizen($_FILES['upload']['tmp_name']);
            }
            elseif (utils::post('type') == 'garradin')
            {
                $import->fromCSV($_FILES['upload']['tmp_name']);
            }
            else
            {
                throw new UserException('Import inconnu.');
            }

            utils::redirect('/admin/compta/import.php?ok');
        }
        catch (UserException $e)
        {
            $error = $e->getMessage();
        }
    }
}

$tpl->assign('error', $error);
$tpl->assign('ok', isset($_GET['ok']) ? true : false);

echo $a;

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

?>