dolibarr  9.0.0
document.php
Go to the documentation of this file.
1 <?php
2 
3 /* Copyright (C) 2003-2007 Rodolphe Quiedeville <rodolphe@quiedeville.org>
4  * Copyright (C) 2004-2008 Laurent Destailleur <eldy@users.sourceforge.net>
5  * Copyright (C) 2005 Marc Barilley / Ocebo <marc@ocebo.com>
6  * Copyright (C) 2005-2017 Regis Houssin <regis.houssin@inodbox.com>
7  *
8  * This program is free software; you can redistribute it and/or modify
9  * it under the terms of the GNU General Public License as published by
10  * the Free Software Foundation; either version 2 of the License, or
11  * (at your option) any later version.
12  *
13  * This program is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16  * GNU General Public License for more details.
17  *
18  * You should have received a copy of the GNU General Public License
19  * along with this program. If not, see <http://www.gnu.org/licenses/>.
20  */
21 
27 require '../../main.inc.php';
28 require_once DOL_DOCUMENT_ROOT . "/core/lib/bank.lib.php";
29 require_once DOL_DOCUMENT_ROOT . "/core/lib/files.lib.php";
30 require_once DOL_DOCUMENT_ROOT . "/core/lib/images.lib.php";
31 require_once DOL_DOCUMENT_ROOT . "/core/class/html.formfile.class.php";
32 require_once DOL_DOCUMENT_ROOT . '/compta/bank/class/account.class.php';
33 
34 // Load translation files required by the page
35 $langs->loadLangs(array('banks', 'companies', 'other'));
36 
37 $id = (GETPOST('id', 'int') ? GETPOST('id', 'int') : GETPOST('account', 'int'));
38 $ref = GETPOST('ref', 'alpha');
39 $action = GETPOST('action', 'alpha');
40 $confirm = GETPOST('confirm', 'alpha');
41 
42 $mesg = '';
43 if (isset($_SESSION['DolMessage'])) {
44  $mesg = $_SESSION['DolMessage'];
45  unset($_SESSION['DolMessage']);
46 }
47 
48 // Security check
49 if ($user->societe_id) {
50  $action = '';
51  $socid = $user->societe_id;
52 }
53 if ($user->societe_id)
54  $socid = $user->societe_id;
55 $result = restrictedArea($user, 'banque', $fieldvalue, 'bank_account', '', '',
56  $fieldtype);
57 
58 // Get parameters
59 $sortfield = GETPOST("sortfield", 'alpha');
60 $sortorder = GETPOST("sortorder", 'alpha');
61 $page = GETPOST("page", 'int');
62 if (empty($page) || $page == -1) { $page = 0; }
63 $offset = $conf->liste_limit * $page;
64 $pageprev = $page - 1;
65 $pagenext = $page + 1;
66 if (!$sortorder)
67  $sortorder = "ASC";
68 if (!$sortfield)
69  $sortfield = "name";
70 
71 $object = new Account($db);
72 if ($id)
73  $object->fetch($id);
74 
75 /*
76  * Actions
77  */
78 
79 if ($object->id > 0)
80 {
81  $object->fetch_thirdparty();
82  $upload_dir = $conf->bank->dir_output . "/" . dol_sanitizeFileName($object->ref);
83 }
84 
85 include_once DOL_DOCUMENT_ROOT . '/core/actions_linkedfiles.inc.php';
86 
87 
88 /*
89  * View
90  */
91 
92 $title = $langs->trans("FinancialAccount").' - '.$langs->trans("Documents");
93 $helpurl = "";
94 llxHeader('',$title,$helpurl);
95 
96 $form = new Form($db);
97 
98 if ($id > 0 || !empty($ref)) {
99  if ($object->fetch($id, $ref)) {
100 
101  $upload_dir = $conf->bank->dir_output . '/' . $object->ref;
102 
103  // Onglets
104  $head = bank_prepare_head($object);
105  dol_fiche_head($head, 'document', $langs->trans("FinancialAccount"), -1, 'account');
106 
107 
108  // Build file list
109  $filearray = dol_dir_list($upload_dir, "files", 0, '', '\.meta$',
110  $sortfield,
111  (strtolower($sortorder) == 'desc' ? SORT_DESC : SORT_ASC), 1);
112  $totalsize = 0;
113  foreach ($filearray as $key => $file) {
114  $totalsize+=$file['size'];
115  }
116 
117  $linkback = '<a href="'.DOL_URL_ROOT.'/compta/bank/list.php?restore_lastsearch_values=1">'.$langs->trans("BackToList").'</a>';
118 
119  dol_banner_tab($object, 'ref', $linkback, 1, 'ref', 'ref', $morehtmlref);
120 
121 
122  print '<div class="fichecenter">';
123  print '<div class="underbanner clearboth"></div>';
124 
125  print '<table class="border" width="100%">';
126  print '<tr><td class="titlefield">' . $langs->trans("NbOfAttachedFiles") . '</td><td colspan="3">' . count($filearray) . '</td></tr>';
127  print '<tr><td>' . $langs->trans("TotalSizeOfAttachedFiles") . '</td><td colspan="3">' .dol_print_size($totalsize,1,1).'</td></tr>';
128  print "</table>\n";
129 
130  print '</div>';
131 
132  dol_fiche_end();
133 
134 
135  $modulepart = 'bank';
136  $permission = $user->rights->banque->modifier;
137  $permtoedit = $user->rights->banque->modifier;
138  $param = '&id=' . $object->id;
139  include_once DOL_DOCUMENT_ROOT . '/core/tpl/document_actions_post_headers.tpl.php';
140  }
141  else {
142  dol_print_error($db);
143  }
144 }
145 else {
146  Header('Location: index.php');
147  exit;
148 }
149 
150 // End of page
151 llxFooter();
152 $db->close();
GETPOST($paramname, $check='none', $method=0, $filter=null, $options=null, $noreplace=0)
Return value of a param into GET or POST supervariable.
print
Draft customers invoices.
Definition: index.php:91
bank_prepare_head(Account $object)
Prepare array with list of tabs.
Definition: bank.lib.php:34
dol_sanitizeFileName($str, $newstr='_', $unaccent=1)
Clean a string to use it as a file name.
dol_banner_tab($object, $paramid, $morehtml='', $shownav=1, $fieldid='rowid', $fieldref='ref', $morehtmlref='', $moreparam='', $nodbprefix=0, $morehtmlleft='', $morehtmlstatus='', $onlybanner=0, $morehtmlright='')
Show tab footer of a card.
dol_print_error($db='', $error='', $errors=null)
Affiche message erreur system avec toutes les informations pour faciliter le diagnostic et la remonte...
Class to manage bank accounts.
Class to manage generation of HTML components Only common components must be here.
dol_fiche_end($notab=0)
Show tab footer of a card.
dol_dir_list($path, $types="all", $recursive=0, $filter="", $excludefilter=null, $sortcriteria="name", $sortorder=SORT_ASC, $mode=0, $nohook=0, $relativename="", $donotfollowsymlinks=0)
Scan a directory and return a list of files/directories.
Definition: files.lib.php:59
restrictedArea($user, $features, $objectid=0, $tableandshare='', $feature2='', $dbt_keyfield='fk_soc', $dbt_select='rowid', $isdraft=0)
Check permissions of a user to show a page and an object.
llxFooter()
Footer empty.
Definition: document.php:68
dol_fiche_head($links=array(), $active='0', $title='', $notab=0, $picto='', $pictoisfullpath=0, $morehtmlright='', $morecss='')
Show tab header of a card.
if(isset($_GET["hashp"]) &&! defined("NOLOGIN")) if((isset($_GET["modulepart"]) && $_GET["modulepart"]=='medias')) llxHeader()
Header empty.
Definition: document.php:60