dolibarr 21.0.0-alpha
actions_builddoc.inc.php
Go to the documentation of this file.
1<?php
2/* Copyright (C) 2015 Laurent Destailleur <eldy@users.sourceforge.net>
3 *
4 * This program is free software; you can redistribute it and/or modify
5 * it under the terms of the GNU General Public License as published by
6 * the Free Software Foundation; either version 3 of the License, or
7 * (at your option) any later version.
8 *
9 * This program is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU General Public License for more details.
13 *
14 * You should have received a copy of the GNU General Public License
15 * along with this program. If not, see <https://www.gnu.org/licenses/>.
16 * or see https://www.gnu.org/
17 */
18
25// $action must be defined
26// $id must be defined
27// $object must be defined and must have a method generateDocument().
28// $permissiontoadd must be defined
29// $upload_dir must be defined (example $conf->project->dir_output . "/";)
30// $hidedetails, $hidedesc, $hideref and $moreparams may have been set or not.
31
32if (!empty($permissioncreate) && empty($permissiontoadd)) {
33 $permissiontoadd = $permissioncreate; // For backward compatibility
34}
35
36// Build doc
37if ($action == 'builddoc' && ($permissiontoadd || !empty($usercangeneretedoc))) {
38 if (is_numeric(GETPOST('model', 'alpha'))) {
39 setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentities("Model")), null, 'errors');
40 } else {
41 // Reload to get all modified line records and be ready for hooks
42 $ret = $object->fetch($id);
43 $ret = $object->fetch_thirdparty();
44 /*if (empty($object->id) || ! $object->id > 0)
45 {
46 dol_print_error(null, 'Object must have been loaded by a fetch');
47 exit;
48 }*/
49
50 // Save last template used to generate document
51 if (GETPOST('model', 'alpha')) {
52 $object->setDocModel($user, GETPOST('model', 'alpha'));
53 }
54
55 // Special case to force bank account
56 //if (property_exists($object, 'fk_bank'))
57 //{
58 if (GETPOSTINT('fk_bank')) {
59 // this field may come from an external module
60 $object->fk_bank = GETPOSTINT('fk_bank');
61 } elseif (!empty($object->fk_account)) {
62 $object->fk_bank = $object->fk_account;
63 }
64 //}
65
66 $outputlangs = $langs;
67 $newlang = '';
68
69 if (getDolGlobalInt('MAIN_MULTILANGS') && empty($newlang) && GETPOST('lang_id', 'aZ09')) {
70 $newlang = GETPOST('lang_id', 'aZ09');
71 }
72 if (getDolGlobalInt('MAIN_MULTILANGS') && empty($newlang) && isset($object->thirdparty->default_lang)) {
73 $newlang = $object->thirdparty->default_lang; // for proposal, order, invoice, ...
74 }
75 if (getDolGlobalInt('MAIN_MULTILANGS') && empty($newlang) && isset($object->default_lang)) {
76 $newlang = $object->default_lang; // for thirdparty
77 }
78 if (!empty($newlang)) {
79 $outputlangs = new Translate("", $conf);
80 $outputlangs->setDefaultLang($newlang);
81 }
82
83 // To be sure vars is defined
84 if (empty($hidedetails)) {
85 $hidedetails = 0;
86 }
87 if (empty($hidedesc)) {
88 $hidedesc = 0;
89 }
90 if (empty($hideref)) {
91 $hideref = 0;
92 }
93 if (empty($moreparams)) {
94 $moreparams = null;
95 }
96
97 $result = $object->generateDocument($object->model_pdf, $outputlangs, $hidedetails, $hidedesc, $hideref, $moreparams);
98 if ($result <= 0) {
99 setEventMessages($object->error, $object->errors, 'errors');
100 $action = '';
101 } else {
102 if (empty($donotredirect)) { // This is set when include is done by bulk action "Bill Orders"
103 setEventMessages($langs->trans("FileGenerated"), null);
104
105 /*$urltoredirect = $_SERVER['REQUEST_URI'];
106 $urltoredirect = preg_replace('/#builddoc$/', '', $urltoredirect);
107 $urltoredirect = preg_replace('/action=builddoc&?/', '', $urltoredirect); // To avoid infinite loop
108
109 header('Location: '.$urltoredirect.'#builddoc');
110 exit;*/
111 }
112 }
113 }
114}
115
116// Delete file in doc form
117if ($action == 'remove_file' && $permissiontoadd) {
118 if (!empty($upload_dir)) {
119 require_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php';
120
121 if (empty($object->id) || !$object->id > 0) {
122 // Reload to get all modified line records and be ready for hooks
123 $ret = $object->fetch($id);
124 $ret = $object->fetch_thirdparty();
125 }
126
127 $langs->load("other");
128 $filetodelete = GETPOST('file', 'alpha');
129 $file = $upload_dir.'/'.$filetodelete;
130 $dirthumb = dirname($file).'/thumbs/'; // Chemin du dossier contenant la vignette (if file is an image)
131 $ret = dol_delete_file($file, 0, 0, 0, $object);
132 if ($ret) {
133 // If it exists, remove thumb.
134 $regs = array();
135 if (preg_match('/(\.jpg|\.jpeg|\.bmp|\.gif|\.png|\.tiff)$/i', $file, $regs)) {
136 $photo_vignette = basename(preg_replace('/'.$regs[0].'/i', '', $file).'_small'.$regs[0]);
137 if (file_exists(dol_osencode($dirthumb.$photo_vignette))) {
138 dol_delete_file($dirthumb.$photo_vignette);
139 }
140
141 $photo_vignette = basename(preg_replace('/'.$regs[0].'/i', '', $file).'_mini'.$regs[0]);
142 if (file_exists(dol_osencode($dirthumb.$photo_vignette))) {
143 dol_delete_file($dirthumb.$photo_vignette);
144 }
145 }
146
147 setEventMessages($langs->trans("FileWasRemoved", $filetodelete), null, 'mesgs');
148 } else {
149 setEventMessages($langs->trans("ErrorFailToDeleteFile", $filetodelete), null, 'errors');
150 }
151
152 // Make a redirect to avoid to keep the remove_file into the url that create side effects
153 $urltoredirect = $_SERVER['REQUEST_URI'];
154 $urltoredirect = preg_replace('/#builddoc$/', '', $urltoredirect);
155 $urltoredirect = preg_replace('/action=remove_file&?/', '', $urltoredirect);
156
157 header('Location: '.$urltoredirect);
158 exit;
159 } else {
160 setEventMessages('BugFoundVarUploaddirnotDefined', null, 'errors');
161 }
162}
if( $user->socid > 0) if(! $user->hasRight('accounting', 'chartofaccount')) $object
Definition card.php:58
Class to manage translations.
dol_delete_file($file, $disableglob=0, $nophperrors=0, $nohook=0, $object=null, $allowdotdot=false, $indexdatabase=1, $nolog=0)
Remove a file or several files with a mask.
GETPOSTINT($paramname, $method=0)
Return the value of a $_GET or $_POST supervariable, converted into integer.
dol_osencode($str)
Return a string encoded into OS filesystem encoding.
getDolGlobalInt($key, $default=0)
Return a Dolibarr global constant int value.
GETPOST($paramname, $check='alphanohtml', $method=0, $filter=null, $options=null, $noreplace=0)
Return value of a param into GET or POST supervariable.
setEventMessages($mesg, $mesgs, $style='mesgs', $messagekey='', $noduplicate=0)
Set event messages in dol_events session object.