This repository has been archived by the owner on Feb 28, 2020. It is now read-only.
-
Notifications
You must be signed in to change notification settings - Fork 14
/
Copy pathtiki-accounting_export.php
87 lines (77 loc) · 2.71 KB
/
tiki-accounting_export.php
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
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
<?php
/**
* @package tikiwiki
*/
// (c) Copyright 2002-2016 by authors of the Tiki Wiki CMS Groupware Project
//
// All Rights Reserved. See copyright.txt for details and a complete list of authors.
// Licensed under the GNU LESSER GENERAL PUBLIC LICENSE. See license.txt for details.
// $Id$
$section = 'accounting';
require_once('tiki-setup.php');
$access->checkAuthenticity();
// Feature available?
if ($prefs['feature_accounting'] != 'y') {
$smarty->assign('msg', tra("This feature is disabled") . ": feature_accounting");
$smarty->display("error.tpl");
die;
}
if (! isset($_REQUEST['bookId'])) {
$smarty->assign('msg', tra("Missing book id"));
$smarty->display("error.tpl");
die;
}
if (! isset($_REQUEST['what'])) {
$smarty->assign('msg', tra("Don't know what to export"));
$smarty->display("error.tpl");
die;
}
$bookId = $_REQUEST['bookId'];
$smarty->assign('bookId', $bookId);
$what = $_REQUEST['what'];
$smarty->assign('what', $what);
$globalperms = Perms::get();
$objectperms = Perms::get([ 'type' => 'accounting book', 'object' => $bookId ]);
if (! ($globalperms->acct_view or $objectperms->acct_view)) {
$smarty->assign('msg', tra("You do not have the right export/view this data"));
$smarty->display("error.tpl");
die;
}
$accountinglib = TikiLib::lib('accounting');
$book = $accountinglib->getBook($bookId);
$smarty->assign('book', $book);
if (! isset($_REQUEST['action'])) {
$_REQUEST['action'] = 'settings';
}
if ($_REQUEST['action'] == 'export' && $access->ticketMatch()) {
$prefs['log_tpl'] = 'n'; // Necessary to get a working css
$separator = (isset($_REQUEST['separator']) ? $_REQUEST['separator'] : ';');
$smarty->assign('separator', $separator);
$eol = (isset($_REQUEST['eol']) ? $_REQUEST['eol'] : "\n");
$smarty->assign('eol', preg_replace(["/CR/","/LF/"], ["\r","\n"], $eol));
$quote = (isset($_REQUEST['quote']) ? $_REQUEST['quote'] : '"');
$smarty->assign('quote', $quote);
header('Content-type: text/plain');
switch ($what) {
case "accounts":
header('Content-disposition: attachment; filename="accounts.csv"');
$accounts = $accountinglib->getExtendedAccounts($bookId, true);
$smarty->assign('accounts', $accounts);
$smarty->display("tiki-accounting_accounts_csv.tpl");
die();
case "journal":
header('Content-disposition: attachment; filename="journal.csv"');
if (isset($_REQUEST['accountId'])) {
$accountId = $_REQUEST['accountId'];
} else {
$accountId = '%';
}
$journal = $accountinglib->getJournal($bookId, $accountId, '`journalId` ASC');
$smarty->assign('journal', $journal);
$smarty->display("tiki-accounting_journal_csv.tpl");
die();
}
} else {
$smarty->assign('mid', 'tiki-accounting_export.tpl');
$smarty->display("tiki.tpl");
}