1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267 |
- <?php
- /* Copyright (C) 2015-2017 Laurent Destailleur <eldy@users.sourceforge.net>
- * Copyright (C) 2018 Nicolas ZABOURI <info@inovea-conseil.com>
- * Copyright (C) 2018 Juanjo Menent <jmenent@2byte.es>
- * Copyright (C) 2019 Ferran Marcet <fmarcet@2byte.es>
- *
- * This program is free software; you can redistribute it and/or modify
- * it under the terms of the GNU General Public License as published by
- * the Free Software Foundation; either version 3 of the License, or
- * (at your option) any later version.
- *
- * This program is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- * GNU General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License
- * along with this program. If not, see <http://www.gnu.org/licenses/>.
- * or see http://www.gnu.org/
- */
- /**
- * \file htdocs/core/actions_massactions.inc.php
- * \brief Code for actions done with massaction button (send by email, merge pdf, delete, ...)
- */
- // $massaction must be defined
- // $objectclass and $objectlabel must be defined
- // $parameters, $object, $action must be defined for the hook.
- // $permtoread, $permtocreate and $permtodelete may be defined
- // $uploaddir may be defined (example to $conf->projet->dir_output."/";)
- // $toselect may be defined
- // Protection
- if (empty($objectclass) || empty($uploaddir))
- {
- dol_print_error(null, 'include of actions_massactions.inc.php is done but var $massaction or $objectclass or $uploaddir was not defined');
- exit;
- }
- // Mass actions. Controls on number of lines checked.
- $maxformassaction=(empty($conf->global->MAIN_LIMIT_FOR_MASS_ACTIONS)?1000:$conf->global->MAIN_LIMIT_FOR_MASS_ACTIONS);
- if (! empty($massaction) && count($toselect) < 1)
- {
- $error++;
- setEventMessages($langs->trans("NoRecordSelected"), null, "warnings");
- }
- if (! $error && is_array($toselect) && count($toselect) > $maxformassaction)
- {
- setEventMessages($langs->trans('TooManyRecordForMassAction',$maxformassaction), null, 'errors');
- $error++;
- }
- if (! $error && $massaction == 'confirm_presend' && ! GETPOST('sendmail')) // If we do not choose button send (for example when we change template or limit), we must not send email, but keep on send email form
- {
- $massaction='presend';
- }
- if (! $error && $massaction == 'confirm_presend')
- {
- $resaction = '';
- $nbsent = 0;
- $nbignored = 0;
- $langs->load("mails");
- include_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php';
- $listofobjectid=array();
- $listofobjectthirdparties=array();
- $listofobjectref=array();
- if (! $error)
- {
- $thirdparty=new Societe($db);
- $objecttmp=new $objectclass($db);
- if ($objecttmp->element == 'expensereport') $thirdparty=new User($db);
- if ($objecttmp->element == 'holiday') $thirdparty=new User($db);
- foreach($toselect as $toselectid)
- {
- $objecttmp=new $objectclass($db); // we must create new instance because instance is saved into $listofobjectref array for future use
- $result=$objecttmp->fetch($toselectid);
- if ($result > 0)
- {
- $listofobjectid[$toselectid]=$toselectid;
- $thirdpartyid=($objecttmp->fk_soc?$objecttmp->fk_soc:$objecttmp->socid);
- if ($objecttmp->element == 'societe') $thirdpartyid=$objecttmp->id;
- if ($objecttmp->element == 'expensereport') $thirdpartyid=$objecttmp->fk_user_author;
- if ($objecttmp->element == 'holiday') $thirdpartyid=$objecttmp->fk_user;
- if (empty($thirdpartyid)) $thirdpartyid=0;
- $listofobjectthirdparties[$thirdpartyid]=$thirdpartyid;
- $listofobjectref[$thirdpartyid][$toselectid]=$objecttmp;
- }
- }
- }
- // Check mandatory parameters
- if (GETPOST('fromtype','alpha') === 'user' && empty($user->email))
- {
- $error++;
- setEventMessages($langs->trans("NoSenderEmailDefined"), null, 'warnings');
- $massaction='presend';
- }
- $receiver=$_POST['receiver'];
- if (! is_array($receiver))
- {
- if (empty($receiver) || $receiver == '-1') $receiver=array();
- else $receiver=array($receiver);
- }
- if (! trim($_POST['sendto']) && count($receiver) == 0 && count($listofobjectthirdparties) == 1) // if only one recipient, receiver is mandatory
- {
- $error++;
- setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("Recipient")), null, 'warnings');
- $massaction='presend';
- }
- if (! GETPOST('subject','none'))
- {
- $error++;
- setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("MailTopic")), null, 'warnings');
- $massaction='presend';
- }
- // Loop on each recipient/thirdparty
- if (! $error)
- {
- foreach ($listofobjectthirdparties as $thirdpartyid)
- {
- $result = $thirdparty->fetch($thirdpartyid);
- if ($result < 0)
- {
- dol_print_error($db);
- exit;
- }
- $sendto='';
- $sendtocc='';
- $sendtobcc='';
- $sendtoid = array();
- // Define $sendto
- $tmparray=array();
- if (trim($_POST['sendto']))
- {
- // Recipients are provided into free text
- $tmparray[] = trim($_POST['sendto']);
- }
- if (count($receiver)>0)
- {
- foreach($receiver as $key=>$val)
- {
- // Recipient was provided from combo list
- if ($val == 'thirdparty') // Id of third party or user
- {
- $tmparray[] = $thirdparty->name.' <'.$thirdparty->email.'>';
- }
- elseif ($val && method_exists($thirdparty, 'contact_get_property')) // Id of contact
- {
- $tmparray[] = $thirdparty->contact_get_property((int) $val,'email');
- $sendtoid[] = $val;
- }
- }
- }
- $sendto=implode(',',$tmparray);
- // Define $sendtocc
- $receivercc=$_POST['receivercc'];
- if (! is_array($receivercc))
- {
- if ($receivercc == '-1') $receivercc=array();
- else $receivercc=array($receivercc);
- }
- $tmparray=array();
- if (trim($_POST['sendtocc']))
- {
- $tmparray[] = trim($_POST['sendtocc']);
- }
- if (count($receivercc) > 0)
- {
- foreach($receivercc as $key=>$val)
- {
- // Recipient was provided from combo list
- if ($val == 'thirdparty') // Id of third party
- {
- $tmparray[] = $thirdparty->name.' <'.$thirdparty->email.'>';
- }
- elseif ($val) // Id du contact
- {
- $tmparray[] = $thirdparty->contact_get_property((int) $val,'email');
- //$sendtoid[] = $val; TODO Add also id of contact in CC ?
- }
- }
- }
- $sendtocc=implode(',',$tmparray);
- //var_dump($listofobjectref);exit;
- $attachedfiles=array('paths'=>array(), 'names'=>array(), 'mimes'=>array());
- $listofqualifiedobj=array();
- $listofqualifiedref=array();
- $thirdpartywithoutemail=array();
- foreach($listofobjectref[$thirdpartyid] as $objectid => $objectobj)
- {
- //var_dump($thirdpartyid.' - '.$objectid.' - '.$objectobj->statut);
- if ($objectclass == 'Propal' && $objectobj->statut == Propal::STATUS_DRAFT)
- {
- $langs->load("errors");
- $nbignored++;
- $resaction.='<div class="error">'.$langs->trans('ErrorOnlyProposalNotDraftCanBeSentInMassAction',$objectobj->ref).'</div><br>';
- continue; // Payment done or started or canceled
- }
- if ($objectclass == 'Commande' && $objectoj->statut == Commande::STATUS_DRAFT)
- {
- $langs->load("errors");
- $nbignored++;
- $resaction.='<div class="error">'.$langs->trans('ErrorOnlyOrderNotDraftCanBeSentInMassAction',$objectobj->ref).'</div><br>';
- continue;
- }
- if ($objectclass == 'Facture' && $objectobj->statut == Facture::STATUS_DRAFT)
- {
- $langs->load("errors");
- $nbignored++;
- $resaction.='<div class="error">'.$langs->trans('ErrorOnlyInvoiceValidatedCanBeSentInMassAction',$objectobj->ref).'</div><br>';
- continue; // Payment done or started or canceled
- }
- // Test recipient
- if (empty($sendto)) // For the case, no recipient were set (multi thirdparties send)
- {
- if ($objectobj->element == 'expensereport')
- {
- $fuser = new User($db);
- $fuser->fetch($objectobj->fk_user_author);
- $sendto = $fuser->email;
- }
- elseif ($objectobj->element == 'holiday')
- {
- $fuser = new User($db);
- $fuser->fetch($objectobj->fk_user);
- $sendto = $fuser->email;
- }
- else
- {
- $objectobj->fetch_thirdparty();
- $sendto = $objectobj->thirdparty->email;
- }
- }
- if (empty($sendto))
- {
- //print "No recipient for thirdparty ".$objectobj->thirdparty->name;
- $nbignored++;
- if (empty($thirdpartywithoutemail[$objectobj->thirdparty->id]))
- {
- $resaction.='<div class="error">'.$langs->trans('NoRecipientEmail',$objectobj->thirdparty->name).'</div><br>';
- }
- dol_syslog('No recipient for thirdparty: '.$objectobj->thirdparty->name, LOG_WARNING);
- $thirdpartywithoutemail[$objectobj->thirdparty->id]=1;
- continue;
- }
- if ($_POST['addmaindocfile'])
- {
- // TODO Use future field $objectobj->fullpathdoc to know where is stored default file
- // TODO If not defined, use $objectobj->modelpdf (or defaut invoice config) to know what is template to use to regenerate doc.
- $filename=dol_sanitizeFileName($objectobj->ref).'.pdf';
- $filedir=$uploaddir . '/' . dol_sanitizeFileName($objectobj->ref);
- $file = $filedir . '/' . $filename;
- $mime = dol_mimetype($file);
- if (dol_is_file($file))
- {
- // Create form object
- $attachedfiles=array(
- 'paths'=>array_merge($attachedfiles['paths'],array($file)),
- 'names'=>array_merge($attachedfiles['names'],array($filename)),
- 'mimes'=>array_merge($attachedfiles['mimes'],array($mime))
- );
- }
- else
- {
- $nbignored++;
- $langs->load("errors");
- $resaction.='<div class="error">'.$langs->trans('ErrorCantReadFile',$file).'</div><br>';
- dol_syslog('Failed to read file: '.$file, LOG_WARNING);
- continue;
- }
- }
- // Object of thirdparty qualified, we add it
- $listofqualifiedobj[$objectid]=$objectobj;
- $listofqualifiedref[$objectid]=$objectobj->ref;
- //var_dump($listofqualifiedref);
- }
- // Send email if there is at least one qualified object for current thirdparty
- if (count($listofqualifiedobj) > 0)
- {
- $langs->load("commercial");
- $fromtype = GETPOST('fromtype');
- if ($fromtype === 'user') {
- $from = $user->getFullName($langs) .' <'.$user->email.'>';
- }
- elseif ($fromtype === 'company') {
- $from = $conf->global->MAIN_INFO_SOCIETE_NOM .' <'.$conf->global->MAIN_INFO_SOCIETE_MAIL.'>';
- }
- elseif (preg_match('/user_aliases_(\d+)/', $fromtype, $reg)) {
- $tmp=explode(',', $user->email_aliases);
- $from = trim($tmp[($reg[1] - 1)]);
- }
- elseif (preg_match('/global_aliases_(\d+)/', $fromtype, $reg)) {
- $tmp=explode(',', $conf->global->MAIN_INFO_SOCIETE_MAIL_ALIASES);
- $from = trim($tmp[($reg[1] - 1)]);
- }
- elseif (preg_match('/senderprofile_(\d+)_(\d+)/', $fromtype, $reg)) {
- $sql='SELECT rowid, label, email FROM '.MAIN_DB_PREFIX.'c_email_senderprofile WHERE rowid = '.(int) $reg[1];
- $resql = $db->query($sql);
- $obj = $db->fetch_object($resql);
- if ($obj)
- {
- $from = $obj->label.' <'.$obj->email.'>';
- }
- }
- else {
- $from = $_POST['fromname'] . ' <' . $_POST['frommail'] .'>';
- }
- $replyto = $from;
- $subject = GETPOST('subject','none');
- $message = GETPOST('message','none');
- $sendtobcc = GETPOST('sendtoccc');
- if ($objectclass == 'Propal') $sendtobcc .= (empty($conf->global->MAIN_MAIL_AUTOCOPY_PROPOSAL_TO) ? '' : (($sendtobcc?", ":"").$conf->global->MAIN_MAIL_AUTOCOPY_PROPOSAL_TO));
- if ($objectclass == 'Commande') $sendtobcc .= (empty($conf->global->MAIN_MAIL_AUTOCOPY_ORDER_TO) ? '' : (($sendtobcc?", ":"").$conf->global->MAIN_MAIL_AUTOCOPY_ORDER_TO));
- if ($objectclass == 'Facture') $sendtobcc .= (empty($conf->global->MAIN_MAIL_AUTOCOPY_INVOICE_TO) ? '' : (($sendtobcc?", ":"").$conf->global->MAIN_MAIL_AUTOCOPY_INVOICE_TO));
- if ($objectclass == 'Supplier_Proposal') $sendtobcc .= (empty($conf->global->MAIN_MAIL_AUTOCOPY_SUPPLIER_PROPOSAL_TO) ? '' : (($sendtobcc?", ":"").$conf->global->MAIN_MAIL_AUTOCOPY_SUPPLIER_PROPOSAL_TO));
- if ($objectclass == 'CommandeFournisseur') $sendtobcc .= (empty($conf->global->MAIN_MAIL_AUTOCOPY_SUPPLIER_ORDER_TO) ? '' : (($sendtobcc?", ":"").$conf->global->MAIN_MAIL_AUTOCOPY_SUPPLIER_ORDER_TO));
- if ($objectclass == 'FactureFournisseur') $sendtobcc .= (empty($conf->global->MAIN_MAIL_AUTOCOPY_SUPPLIER_INVOICE_TO) ? '' : (($sendtobcc?", ":"").$conf->global->MAIN_MAIL_AUTOCOPY_SUPPLIER_INVOICE_TO));
- // $listofqualifiedobj is array with key = object id and value is instance of qualified objects, for the current thirdparty (but thirdparty property is not loaded yet)
- // $looparray will be an array with number of email to send for the current thirdparty (so 1 or n if n object for same thirdparty)
- $oneemailperrecipient=(GETPOST('oneemailperrecipient','alpha')=='on'?1:0);
- $looparray=array();
- if (! $oneemailperrecipient)
- {
- $looparray = $listofqualifiedobj;
- foreach ($looparray as $key => $objecttmp)
- {
- $looparray[$key]->thirdparty = $thirdparty; // Force thirdparty on object
- }
- }
- else
- {
- $objectforloop=new $objectclass($db);
- $objectforloop->thirdparty = $thirdparty; // Force thirdparty on object (even if object was not loaded)
- $looparray[0]=$objectforloop;
- }
- //var_dump($looparray);exit;
- dol_syslog("We have set an array of ".count($looparray)." emails to send");
- foreach ($looparray as $objectid => $objecttmp) // $objecttmp is a real object or an empty object if we choose to send one email per thirdparty instead of one per object
- {
- // Make substitution in email content
- $substitutionarray=getCommonSubstitutionArray($langs, 0, null, $objecttmp);
- $substitutionarray['__ID__'] = ($oneemailperrecipient ? join(', ',array_keys($listofqualifiedobj)) : $objecttmp->id);
- $substitutionarray['__REF__'] = ($oneemailperrecipient ? join(', ',$listofqualifiedref) : $objecttmp->ref);
- $substitutionarray['__EMAIL__'] = $thirdparty->email;
- $substitutionarray['__CHECK_READ__'] = '<img src="'.DOL_MAIN_URL_ROOT.'/public/emailing/mailing-read.php?tag='.$thirdparty->tag.'&securitykey='.urlencode($conf->global->MAILING_EMAIL_UNSUBSCRIBE_KEY).'" width="1" height="1" style="width:1px;height:1px" border="0"/>';
- $parameters=array('mode'=>'formemail');
- if ( ! empty( $listofobjectthirdparties ) ) {
- $parameters['listofobjectthirdparties'] = $listofobjectthirdparties;
- }
- if ( ! empty( $listofobjectref ) ) {
- $parameters['listofobjectref'] = $listofobjectref;
- }
- complete_substitutions_array($substitutionarray, $langs, $objecttmp, $parameters);
- $subject=make_substitutions($subject, $substitutionarray);
- $message=make_substitutions($message, $substitutionarray);
- $filepath = $attachedfiles['paths'];
- $filename = $attachedfiles['names'];
- $mimetype = $attachedfiles['mimes'];
- // Define the trackid when emails sent from the mass action
- if ($oneemailperrecipient)
- {
- $trackid='thi'.$thirdparty->id;
- if ($objecttmp->element == 'expensereport') $trackid='use'.$thirdparty->id;
- if ($objecttmp->element == 'holiday') $trackid='use'.$thirdparty->id;
- }
- else
- {
- $trackid=strtolower(get_class($objecttmp));
- if (get_class($objecttmp)=='Contrat') $trackid='con';
- if (get_class($objecttmp)=='Propal') $trackid='pro';
- if (get_class($objecttmp)=='Commande') $trackid='ord';
- if (get_class($objecttmp)=='Facture') $trackid='inv';
- if (get_class($objecttmp)=='Supplier_Proposal') $trackid='spr';
- if (get_class($objecttmp)=='CommandeFournisseur') $trackid='sor';
- if (get_class($objecttmp)=='FactureFournisseur') $trackid='sin';
- $trackid.=$objecttmp->id;
- }
- //var_dump($filepath);
- //var_dump($trackid);exit;
- // Send mail (substitutionarray must be done just before this)
- require_once DOL_DOCUMENT_ROOT.'/core/class/CMailFile.class.php';
- $mailfile = new CMailFile($subject,$sendto,$from,$message,$filepath,$mimetype,$filename,$sendtocc,$sendtobcc,$deliveryreceipt,-1,'','',$trackid);
- if ($mailfile->error)
- {
- $resaction.='<div class="error">'.$mailfile->error.'</div>';
- }
- else
- {
- $result=$mailfile->sendfile();
- if ($result)
- {
- $resaction.=$langs->trans('MailSuccessfulySent',$mailfile->getValidAddress($from,2),$mailfile->getValidAddress($sendto,2)).'<br>'; // Must not contain "
- $error=0;
- // Insert logs into agenda
- foreach($listofqualifiedobj as $objid2 => $objectobj2)
- {
- if ((! $oneemailperrecipient) && $objid2 != $objectid) continue; // We discard this pass to avoid duplicate with other pass in looparray at higher level
- dol_syslog("Try to insert email event into agenda for objid=".$objid2." => objectobj=".get_class($objectobj2));
- /*if ($objectclass == 'Propale') $actiontypecode='AC_PROP';
- if ($objectclass == 'Commande') $actiontypecode='AC_COM';
- if ($objectclass == 'Facture') $actiontypecode='AC_FAC';
- if ($objectclass == 'Supplier_Proposal') $actiontypecode='AC_SUP_PRO';
- if ($objectclass == 'CommandeFournisseur') $actiontypecode='AC_SUP_ORD';
- if ($objectclass == 'FactureFournisseur') $actiontypecode='AC_SUP_INV';*/
- $actionmsg=$langs->transnoentities('MailSentBy').' '.$from.' '.$langs->transnoentities('To').' '.$sendto;
- if ($message)
- {
- if ($sendtocc) $actionmsg = dol_concatdesc($actionmsg, $langs->transnoentities('Bcc') . ": " . $sendtocc);
- $actionmsg = dol_concatdesc($actionmsg, $langs->transnoentities('MailTopic') . ": " . $subject);
- $actionmsg = dol_concatdesc($actionmsg, $langs->transnoentities('TextUsedInTheMessageBody') . ":");
- $actionmsg = dol_concatdesc($actionmsg, $message);
- }
- $actionmsg2='';
- // Initialisation donnees
- $objectobj2->sendtoid = 0;
- $objectobj2->actionmsg = $actionmsg; // Long text
- $objectobj2->actionmsg2 = $actionmsg2; // Short text
- $objectobj2->fk_element = $objid2;
- $objectobj2->elementtype = $objectobj2->element;
- $triggername = strtoupper(get_class($objectobj2)) .'_SENTBYMAIL';
- if ($triggername == 'SOCIETE_SENTBYMAIL') $triggername = 'COMPANY_SENTBYMAIL';
- if ($triggername == 'CONTRAT_SENTBYMAIL') $triggername = 'CONTRACT_SENTBYMAIL';
- if ($triggername == 'COMMANDE_SENTBYMAIL') $triggername = 'ORDER_SENTBYMAIL';
- if ($triggername == 'FACTURE_SENTBYMAIL') $triggername = 'BILL_SENTBYMAIL';
- if ($triggername == 'EXPEDITION_SENTBYMAIL') $triggername = 'SHIPPING_SENTBYMAIL';
- if ($triggername == 'COMMANDEFOURNISSEUR_SENTBYMAIL') $triggername = 'ORDER_SUPPLIER_SENTBYMAIL';
- if ($triggername == 'FACTUREFOURNISSEUR_SENTBYMAIL') $triggername = 'BILL_SUPPLIER_SENTBYMAIL';
- if ($triggername == 'SUPPLIERPROPOSAL_SENTBYMAIL') $triggername = 'PROPOSAL_SUPPLIER_SENTBYMAIL';
- if (! empty($triggername))
- {
- // Appel des triggers
- include_once DOL_DOCUMENT_ROOT . "/core/class/interfaces.class.php";
- $interface=new Interfaces($db);
- $result=$interface->run_triggers($triggername, $objectobj2, $user, $langs, $conf);
- if ($result < 0) { $error++; $errors=$interface->errors; }
- // Fin appel triggers
- if ($error)
- {
- setEventMessages($db->lasterror(), $errors, 'errors');
- dol_syslog("Error in trigger ".$triggername.' '.$db->lasterror(), LOG_ERR);
- }
- }
- }
- $nbsent++; // Nb of email sent (may be lower than number of record selected if we group thirdparties)
- }
- else
- {
- $langs->load("other");
- if ($mailfile->error)
- {
- $resaction.=$langs->trans('ErrorFailedToSendMail',$from,$sendto);
- $resaction.='<br><div class="error">'.$mailfile->error.'</div>';
- }
- else
- {
- $resaction.='<div class="warning">No mail sent. Feature is disabled by option MAIN_DISABLE_ALL_MAILS</div>';
- }
- }
- }
- }
- }
- }
- $resaction.=($resaction?'<br>':$resaction);
- $resaction.='<strong>'.$langs->trans("ResultOfMailSending").':</strong><br>'."\n";
- $resaction.=$langs->trans("NbSelected").': '.count($toselect)."\n<br>";
- $resaction.=$langs->trans("NbIgnored").': '.($nbignored?$nbignored:0)."\n<br>";
- $resaction.=$langs->trans("NbSent").': '.($nbsent?$nbsent:0)."\n<br>";
- if ($nbsent)
- {
- $action=''; // Do not show form post if there was at least one successfull sent
- //setEventMessages($langs->trans("EMailSentToNRecipients", $nbsent.'/'.count($toselect)), null, 'mesgs');
- setEventMessages($langs->trans("EMailSentForNElements", $nbsent.'/'.count($toselect)), null, 'mesgs');
- setEventMessages($resaction, null, 'mesgs');
- }
- else
- {
- //setEventMessages($langs->trans("EMailSentToNRecipients", 0), null, 'warnings'); // May be object has no generated PDF file
- setEventMessages($resaction, null, 'warnings');
- }
- $action='list';
- $massaction='';
- }
- }
- if ($massaction == 'confirm_createbills')
- {
- $orders = GETPOST('toselect','array');
- $createbills_onebythird = GETPOST('createbills_onebythird', 'int');
- $validate_invoices = GETPOST('valdate_invoices', 'int');
- $TFact = array();
- $TFactThird = array();
- $nb_bills_created = 0;
- $db->begin();
- foreach($orders as $id_order)
- {
- $cmd = new Commande($db);
- if ($cmd->fetch($id_order) <= 0) continue;
- $objecttmp = new Facture($db);
- if (!empty($createbills_onebythird) && !empty($TFactThird[$cmd->socid])) $objecttmp = $TFactThird[$cmd->socid]; // If option "one bill per third" is set, we use already created order.
- else {
- // Load extrafields of order
- $cmd->fetch_optionals();
- $objecttmp->socid = $cmd->socid;
- $objecttmp->type = Facture::TYPE_STANDARD;
- $objecttmp->cond_reglement_id = $cmd->cond_reglement_id;
- $objecttmp->mode_reglement_id = $cmd->mode_reglement_id;
- $objecttmp->fk_project = $cmd->fk_project;
- $datefacture = dol_mktime(12, 0, 0, $_POST['remonth'], $_POST['reday'], $_POST['reyear']);
- if (empty($datefacture))
- {
- $datefacture = dol_mktime(date("h"), date("M"), 0, date("m"), date("d"), date("Y"));
- }
- $objecttmp->date = $datefacture;
- $objecttmp->origin = 'commande';
- $objecttmp->origin_id = $id_order;
- $objecttmp->array_options = $cmd->array_options; // Copy extrafields
- $res = $objecttmp->create($user);
- if($res > 0) $nb_bills_created++;
- }
- if ($objecttmp->id > 0)
- {
- $sql = "INSERT INTO ".MAIN_DB_PREFIX."element_element (";
- $sql.= "fk_source";
- $sql.= ", sourcetype";
- $sql.= ", fk_target";
- $sql.= ", targettype";
- $sql.= ") VALUES (";
- $sql.= $id_order;
- $sql.= ", '".$objecttmp->origin."'";
- $sql.= ", ".$objecttmp->id;
- $sql.= ", '".$objecttmp->element."'";
- $sql.= ")";
- if (! $db->query($sql))
- {
- $error++;
- }
- if (! $error)
- {
- $lines = $cmd->lines;
- if (empty($lines) && method_exists($cmd, 'fetch_lines'))
- {
- $cmd->fetch_lines();
- $lines = $cmd->lines;
- }
- $fk_parent_line=0;
- $num=count($lines);
- for ($i=0;$i<$num;$i++)
- {
- $desc=($lines[$i]->desc?$lines[$i]->desc:$lines[$i]->libelle);
- if ($lines[$i]->subprice < 0)
- {
- // Negative line, we create a discount line
- $discount = new DiscountAbsolute($db);
- $discount->fk_soc=$objecttmp->socid;
- $discount->amount_ht=abs($lines[$i]->total_ht);
- $discount->amount_tva=abs($lines[$i]->total_tva);
- $discount->amount_ttc=abs($lines[$i]->total_ttc);
- $discount->tva_tx=$lines[$i]->tva_tx;
- $discount->fk_user=$user->id;
- $discount->description=$desc;
- $discountid=$discount->create($user);
- if ($discountid > 0)
- {
- $result=$objecttmp->insert_discount($discountid);
- //$result=$discount->link_to_invoice($lineid,$id);
- }
- else
- {
- setEventMessages($discount->error, $discount->errors, 'errors');
- $error++;
- break;
- }
- }
- else
- {
- // Positive line
- $product_type=($lines[$i]->product_type?$lines[$i]->product_type:0);
- // Date start
- $date_start=false;
- if ($lines[$i]->date_debut_prevue) $date_start=$lines[$i]->date_debut_prevue;
- if ($lines[$i]->date_debut_reel) $date_start=$lines[$i]->date_debut_reel;
- if ($lines[$i]->date_start) $date_start=$lines[$i]->date_start;
- //Date end
- $date_end=false;
- if ($lines[$i]->date_fin_prevue) $date_end=$lines[$i]->date_fin_prevue;
- if ($lines[$i]->date_fin_reel) $date_end=$lines[$i]->date_fin_reel;
- if ($lines[$i]->date_end) $date_end=$lines[$i]->date_end;
- // Reset fk_parent_line for no child products and special product
- if (($lines[$i]->product_type != 9 && empty($lines[$i]->fk_parent_line)) || $lines[$i]->product_type == 9)
- {
- $fk_parent_line = 0;
- }
- // Extrafields
- if (empty($conf->global->MAIN_EXTRAFIELDS_DISABLED) && method_exists($lines[$i], 'fetch_optionals')) {
- $lines[$i]->fetch_optionals($lines[$i]->rowid);
- $array_options = $lines[$i]->array_options;
- }
- $result = $objecttmp->addline(
- $desc,
- $lines[$i]->subprice,
- $lines[$i]->qty,
- $lines[$i]->tva_tx,
- $lines[$i]->localtax1_tx,
- $lines[$i]->localtax2_tx,
- $lines[$i]->fk_product,
- $lines[$i]->remise_percent,
- $date_start,
- $date_end,
- 0,
- $lines[$i]->info_bits,
- $lines[$i]->fk_remise_except,
- 'HT',
- 0,
- $product_type,
- $ii,
- $lines[$i]->special_code,
- $objecttmp->origin,
- $lines[$i]->rowid,
- $fk_parent_line,
- $lines[$i]->fk_fournprice,
- $lines[$i]->pa_ht,
- $lines[$i]->label,
- $array_options
- );
- if ($result > 0)
- {
- $lineid=$result;
- }
- else
- {
- $lineid=0;
- $error++;
- break;
- }
- // Defined the new fk_parent_line
- if ($result > 0 && $lines[$i]->product_type == 9)
- {
- $fk_parent_line = $result;
- }
- }
- }
- }
- }
- //$cmd->classifyBilled($user); // Disabled. This behavior must be set or not using the workflow module.
- if(!empty($createbills_onebythird) && empty($TFactThird[$cmd->socid])) $TFactThird[$cmd->socid] = $objecttmp;
- else $TFact[$objecttmp->id] = $objecttmp;
- }
- // Build doc with all invoices
- $TAllFact = empty($createbills_onebythird) ? $TFact : $TFactThird;
- $toselect = array();
- if (! $error && $validate_invoices)
- {
- $massaction = $action = 'builddoc';
- foreach($TAllFact as &$objecttmp)
- {
- $result = $objecttmp->validate($user);
- if ($result <= 0)
- {
- $error++;
- setEventMessages($objecttmp->error, $objecttmp->errors, 'errors');
- break;
- }
- $id = $objecttmp->id; // For builddoc action
- $object = $objecttmp;
- // Builddoc
- $donotredirect = 1;
- $upload_dir = $conf->facture->dir_output;
- $permissioncreate=$user->rights->facture->creer;
- // Call action to build doc
- $savobject = $object;
- $object = $objecttmp;
- include DOL_DOCUMENT_ROOT.'/core/actions_builddoc.inc.php';
- $object = $savobject;
- }
- $massaction = $action = 'confirm_createbills';
- }
- if (! $error)
- {
- $db->commit();
- setEventMessages($langs->trans('BillCreated', $nb_bills_created), null, 'mesgs');
- // Make a redirect to avoid to bill twice if we make a refresh or back
- $param='';
- if (! empty($contextpage) && $contextpage != $_SERVER["PHP_SELF"]) $param.='&contextpage='.urlencode($contextpage);
- if ($limit > 0 && $limit != $conf->liste_limit) $param.='&limit='.urlencode($limit);
- if ($sall) $param.='&sall='.urlencode($sall);
- if ($socid > 0) $param.='&socid='.urlencode($socid);
- if ($viewstatut != '') $param.='&viewstatut='.urlencode($viewstatut);
- if ($search_orderday) $param.='&search_orderday='.urlencode($search_orderday);
- if ($search_ordermonth) $param.='&search_ordermonth='.urlencode($search_ordermonth);
- if ($search_orderyear) $param.='&search_orderyear='.urlencode($search_orderyear);
- if ($search_deliveryday) $param.='&search_deliveryday='.urlencode($search_deliveryday);
- if ($search_deliverymonth) $param.='&search_deliverymonth='.urlencode($search_deliverymonth);
- if ($search_deliveryyear) $param.='&search_deliveryyear='.urlencode($search_deliveryyear);
- if ($search_ref) $param.='&search_ref='.urlencode($search_ref);
- if ($search_company) $param.='&search_company='.urlencode($search_company);
- if ($search_ref_customer) $param.='&search_ref_customer='.urlencode($search_ref_customer);
- if ($search_user > 0) $param.='&search_user='.urlencode($search_user);
- if ($search_sale > 0) $param.='&search_sale='.urlencode($search_sale);
- if ($search_total_ht != '') $param.='&search_total_ht='.urlencode($search_total_ht);
- if ($search_total_vat != '') $param.='&search_total_vat='.urlencode($search_total_vat);
- if ($search_total_ttc != '') $param.='&search_total_ttc='.urlencode($search_total_ttc);
- if ($search_project_ref >= 0) $param.="&search_project_ref=".urlencode($search_project_ref);
- if ($show_files) $param.='&show_files=' .urlencode($show_files);
- if ($optioncss != '') $param.='&optioncss='.urlencode($optioncss);
- if ($billed != '') $param.='&billed='.urlencode($billed);
- header("Location: ".$_SERVER['PHP_SELF'].'?'.$param);
- exit;
- }
- else
- {
- $db->rollback();
- $action='create';
- $_GET["origin"]=$_POST["origin"];
- $_GET["originid"]=$_POST["originid"];
- setEventMessages("Error", null, 'errors');
- $error++;
- }
- }
- if (!$error && $massaction == 'cancelorders')
- {
- $db->begin();
- $nbok = 0;
- $orders = GETPOST('toselect', 'array');
- foreach ($orders as $id_order)
- {
- $cmd = new Commande($db);
- if ($cmd->fetch($id_order) <= 0)
- continue;
- if ($cmd->statut != Commande::STATUS_VALIDATED)
- {
- $langs->load('errors');
- setEventMessages($langs->trans("ErrorObjectMustHaveStatusValidToBeCanceled", $cmd->ref), null, 'errors');
- $error++;
- break;
- }
- else
- $result = $cmd->cancel();
- if ($result < 0)
- {
- setEventMessages($cmd->error, $cmd->errors, 'errors');
- $error++;
- break;
- }
- else
- $nbok++;
- }
- if (!$error)
- {
- if ($nbok > 1)
- setEventMessages($langs->trans("RecordsModified", $nbok), null, 'mesgs');
- else
- setEventMessages($langs->trans("RecordsModified", $nbok), null, 'mesgs');
- $db->commit();
- }
- else
- {
- $db->rollback();
- }
- }
- if (! $error && $massaction == "builddoc" && $permtoread && ! GETPOST('button_search'))
- {
- if (empty($diroutputmassaction))
- {
- dol_print_error(null, 'include of actions_massactions.inc.php is done but var $diroutputmassaction was not defined');
- exit;
- }
- require_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php';
- require_once DOL_DOCUMENT_ROOT.'/core/lib/pdf.lib.php';
- require_once DOL_DOCUMENT_ROOT.'/core/lib/date.lib.php';
- $objecttmp=new $objectclass($db);
- $listofobjectid=array();
- $listofobjectthirdparties=array();
- $listofobjectref=array();
- foreach($toselect as $toselectid)
- {
- $objecttmp=new $objectclass($db); // must create new instance because instance is saved into $listofobjectref array for future use
- $result=$objecttmp->fetch($toselectid);
- if ($result > 0)
- {
- $listofobjectid[$toselectid]=$toselectid;
- $thirdpartyid=$objecttmp->fk_soc?$objecttmp->fk_soc:$objecttmp->socid;
- $listofobjectthirdparties[$thirdpartyid]=$thirdpartyid;
- $listofobjectref[$toselectid]=$objecttmp->ref;
- }
- }
- $arrayofinclusion=array();
- foreach($listofobjectref as $tmppdf) $arrayofinclusion[]='^'.preg_quote(dol_sanitizeFileName($tmppdf),'/').'\.pdf$';
- foreach($listofobjectref as $tmppdf) $arrayofinclusion[]='^'.preg_quote(dol_sanitizeFileName($tmppdf),'/').'_[a-zA-Z0-9-_]+\.pdf$'; // To include PDF generated from ODX files
- $listoffiles = dol_dir_list($uploaddir,'all',1,implode('|',$arrayofinclusion),'\.meta$|\.png','date',SORT_DESC,0,true);
- // build list of files with full path
- $files = array();
- foreach($listofobjectref as $basename)
- {
- $basename = dol_sanitizeFileName($basename);
- foreach($listoffiles as $filefound)
- {
- if (strstr($filefound["name"],$basename))
- {
- $files[] = $uploaddir.'/'.$basename.'/'.$filefound["name"];
- break;
- }
- }
- }
- // Define output language (Here it is not used because we do only merging existing PDF)
- $outputlangs = $langs;
- $newlang='';
- if ($conf->global->MAIN_MULTILANGS && empty($newlang) && GETPOST('lang_id','aZ09')) $newlang=GETPOST('lang_id','aZ09');
- if ($conf->global->MAIN_MULTILANGS && empty($newlang)) $newlang=$objecttmp->thirdparty->default_lang;
- if (! empty($newlang))
- {
- $outputlangs = new Translate("",$conf);
- $outputlangs->setDefaultLang($newlang);
- }
- if (!empty($conf->global->USE_PDFTK_FOR_PDF_CONCAT))
- {
- // Create output dir if not exists
- dol_mkdir($diroutputmassaction);
- // Defined name of merged file
- $filename=strtolower(dol_sanitizeFileName($langs->transnoentities($objectlabel)));
- $filename=preg_replace('/\s/','_',$filename);
- // Save merged file
- if (in_array($objecttmp->element, array('facture', 'facture_fournisseur')) && $search_status == Facture::STATUS_VALIDATED)
- {
- if ($option=='late') $filename.='_'.strtolower(dol_sanitizeFileName($langs->transnoentities("Unpaid"))).'_'.strtolower(dol_sanitizeFileName($langs->transnoentities("Late")));
- else $filename.='_'.strtolower(dol_sanitizeFileName($langs->transnoentities("Unpaid")));
- }
- if ($year) $filename.='_'.$year;
- if ($month) $filename.='_'.$month;
- if (count($files)>0)
- {
- $now=dol_now();
- $file=$diroutputmassaction.'/'.$filename.'_'.dol_print_date($now,'dayhourlog').'.pdf';
- $input_files = '';
- foreach($files as $f) {
- $input_files.=' '.escapeshellarg($f);
- }
- $cmd = 'pdftk '.escapeshellarg($input_files).' cat output '.escapeshellarg($file);
- exec($cmd);
- if (! empty($conf->global->MAIN_UMASK))
- @chmod($file, octdec($conf->global->MAIN_UMASK));
- $langs->load("exports");
- setEventMessages($langs->trans('FileSuccessfullyBuilt',$filename.'_'.dol_print_date($now,'dayhourlog')), null, 'mesgs');
- }
- else
- {
- setEventMessages($langs->trans('NoPDFAvailableForDocGenAmongChecked'), null, 'errors');
- }
- }
- else {
- // Create empty PDF
- $formatarray=pdf_getFormat();
- $page_largeur = $formatarray['width'];
- $page_hauteur = $formatarray['height'];
- $format = array($page_largeur,$page_hauteur);
- $pdf=pdf_getInstance($format);
- if (class_exists('TCPDF'))
- {
- $pdf->setPrintHeader(false);
- $pdf->setPrintFooter(false);
- }
- $pdf->SetFont(pdf_getPDFFont($outputlangs));
- if (! empty($conf->global->MAIN_DISABLE_PDF_COMPRESSION)) $pdf->SetCompression(false);
- // Add all others
- foreach($files as $file)
- {
- // Charge un document PDF depuis un fichier.
- $pagecount = $pdf->setSourceFile($file);
- for ($i = 1; $i <= $pagecount; $i++)
- {
- $tplidx = $pdf->importPage($i);
- $s = $pdf->getTemplatesize($tplidx);
- $pdf->AddPage($s['h'] > $s['w'] ? 'P' : 'L');
- $pdf->useTemplate($tplidx);
- }
- }
- // Create output dir if not exists
- dol_mkdir($diroutputmassaction);
- // Defined name of merged file
- $filename=strtolower(dol_sanitizeFileName($langs->transnoentities($objectlabel)));
- $filename=preg_replace('/\s/','_',$filename);
- // Save merged file
- if (in_array($objecttmp->element, array('facture', 'facture_fournisseur')) && $search_status == Facture::STATUS_VALIDATED)
- {
- if ($option=='late') $filename.='_'.strtolower(dol_sanitizeFileName($langs->transnoentities("Unpaid"))).'_'.strtolower(dol_sanitizeFileName($langs->transnoentities("Late")));
- else $filename.='_'.strtolower(dol_sanitizeFileName($langs->transnoentities("Unpaid")));
- }
- if ($year) $filename.='_'.$year;
- if ($month) $filename.='_'.$month;
- if ($pagecount)
- {
- $now=dol_now();
- $file=$diroutputmassaction.'/'.$filename.'_'.dol_print_date($now,'dayhourlog').'.pdf';
- $pdf->Output($file,'F');
- if (! empty($conf->global->MAIN_UMASK))
- @chmod($file, octdec($conf->global->MAIN_UMASK));
- $langs->load("exports");
- setEventMessages($langs->trans('FileSuccessfullyBuilt',$filename.'_'.dol_print_date($now,'dayhourlog')), null, 'mesgs');
- }
- else
- {
- setEventMessages($langs->trans('NoPDFAvailableForDocGenAmongChecked'), null, 'errors');
- }
- }
- }
- // Remove a file from massaction area
- if ($action == 'remove_file')
- {
- require_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php';
- $langs->load("other");
- $upload_dir = $diroutputmassaction;
- $file = $upload_dir . '/' . GETPOST('file');
- $ret=dol_delete_file($file);
- if ($ret) setEventMessages($langs->trans("FileWasRemoved", GETPOST('file')), null, 'mesgs');
- else setEventMessages($langs->trans("ErrorFailToDeleteFile", GETPOST('file')), null, 'errors');
- $action='';
- }
- // Validate records
- if (! $error && $massaction == 'validate' && $permtocreate)
- {
- $objecttmp=new $objectclass($db);
- if ($objecttmp->element == 'invoice' && ! empty($conf->stock->enabled) && ! empty($conf->global->STOCK_CALCULATE_ON_BILL))
- {
- $langs->load("errors");
- setEventMessages($langs->trans('ErrorMassValidationNotAllowedWhenStockIncreaseOnAction'), null, 'errors');
- $error++;
- }
- if ($objecttmp->element == 'invoice_supplier' && ! empty($conf->stock->enabled) && ! empty($conf->global->STOCK_CALCULATE_ON_SUPPLIER_BILL))
- {
- $langs->load("errors");
- setEventMessages($langs->trans('ErrorMassValidationNotAllowedWhenStockIncreaseOnAction'), null, 'errors');
- $error++;
- }
- if (! $error)
- {
- $db->begin();
- $nbok = 0;
- foreach($toselect as $toselectid)
- {
- $result=$objecttmp->fetch($toselectid);
- if ($result > 0)
- {
- //if (in_array($objecttmp->element, array('societe','member'))) $result = $objecttmp->delete($objecttmp->id, $user, 1);
- //else
- $result = $objecttmp->validate($user);
- if ($result == 0)
- {
- $langs->load("errors");
- setEventMessages($langs->trans("ErrorObjectMustHaveStatusDraftToBeValidated", $objecttmp->ref), null, 'errors');
- $error++;
- break;
- }
- elseif ($result < 0)
- {
- setEventMessages($objecttmp->error, $objecttmp->errors, 'errors');
- $error++;
- break;
- }
- else $nbok++;
- }
- else
- {
- setEventMessages($objecttmp->error, $objecttmp->errors, 'errors');
- $error++;
- break;
- }
- }
- if (! $error)
- {
- if ($nbok > 1) setEventMessages($langs->trans("RecordsModified", $nbok), null, 'mesgs');
- else setEventMessages($langs->trans("RecordsModified", $nbok), null, 'mesgs');
- $db->commit();
- }
- else
- {
- $db->rollback();
- }
- //var_dump($listofobjectthirdparties);exit;
- }
- }
- // Closed records
- if (!$error && $massaction == 'closed' && $objectclass == "Propal" && $permtoclose) {
- $db->begin();
- $objecttmp = new $objectclass($db);
- $nbok = 0;
- foreach ($toselect as $toselectid) {
- $result = $objecttmp->fetch($toselectid);
- if ($result > 0) {
- $result = $objecttmp->cloture($user, 3);
- if ($result <= 0) {
- setEventMessages($objecttmp->error, $objecttmp->errors, 'errors');
- $error++;
- break;
- } else
- $nbok++;
- }
- else {
- setEventMessages($objecttmp->error, $objecttmp->errors, 'errors');
- $error++;
- break;
- }
- }
- if (!$error) {
- if ($nbok > 1)
- setEventMessages($langs->trans("RecordsModified", $nbok), null, 'mesgs');
- else
- setEventMessages($langs->trans("RecordsModified", $nbok), null, 'mesgs');
- $db->commit();
- }
- else {
- $db->rollback();
- }
- }
- // Delete record from mass action (massaction = 'delete' for direct delete, action/confirm='delete'/'yes' with a confirmation step before)
- if (! $error && ($massaction == 'delete' || ($action == 'delete' && $confirm == 'yes')) && $permtodelete)
- {
- $db->begin();
- $objecttmp=new $objectclass($db);
- $nbok = 0;
- foreach($toselect as $toselectid)
- {
- $result=$objecttmp->fetch($toselectid);
- if ($result > 0)
- {
- // Refuse deletion for some objects/status
- if ($objectclass == 'Facture' && empty($conf->global->INVOICE_CAN_ALWAYS_BE_REMOVED) && $objecttmp->status != Facture::STATUS_DRAFT)
- {
- $langs->load("errors");
- $nbignored++;
- $resaction.='<div class="error">'.$langs->trans('ErrorOnlyDraftStatusCanBeDeletedInMassAction',$objecttmp->ref).'</div><br>';
- continue;
- }
- if ($objectclass == "Task" && $objecttmp->hasChildren() > 0)
- {
- $sql = "UPDATE ".MAIN_DB_PREFIX."projet_task SET fk_task_parent = 0 WHERE fk_task_parent = ".$objecttmp->id;
- $res = $db->query($sql);
- if (!$res)
- {
- setEventMessage('ErrorRecordParentingNotModified', 'errors');
- $error++;
- }
- }
- if (in_array($objecttmp->element, array('societe', 'member'))) $result = $objecttmp->delete($objecttmp->id, $user, 1);
- else $result = $objecttmp->delete($user);
- if ($result <= 0)
- {
- setEventMessages($objecttmp->error, $objecttmp->errors, 'errors');
- $error++;
- break;
- }
- else $nbok++;
- }
- else
- {
- setEventMessages($objecttmp->error, $objecttmp->errors, 'errors');
- $error++;
- break;
- }
- }
- if (! $error)
- {
- if ($nbok > 1) setEventMessages($langs->trans("RecordsDeleted", $nbok), null, 'mesgs');
- else setEventMessages($langs->trans("RecordDeleted", $nbok), null, 'mesgs');
- $db->commit();
- }
- else
- {
- $db->rollback();
- }
- //var_dump($listofobjectthirdparties);exit;
- }
- // Generate document foreach object according to model linked to object
- // @TODO : propose model selection
- if (! $error && $massaction == 'generate_doc' && $permtoread)
- {
- $db->begin();
- $objecttmp=new $objectclass($db);
- $nbok = 0;
- foreach($toselect as $toselectid)
- {
- $result=$objecttmp->fetch($toselectid);
- if ($result > 0)
- {
- $outputlangs = $langs;
- $newlang='';
- if ($conf->global->MAIN_MULTILANGS && empty($newlang) && GETPOST('lang_id','aZ09')) $newlang=GETPOST('lang_id','aZ09');
- if ($conf->global->MAIN_MULTILANGS && empty($newlang) && isset($objecttmp->thirdparty->default_lang)) $newlang=$objecttmp->thirdparty->default_lang; // for proposal, order, invoice, ...
- if ($conf->global->MAIN_MULTILANGS && empty($newlang) && isset($objecttmp->default_lang)) $newlang=$objecttmp->default_lang; // for thirdparty
- if (! empty($newlang))
- {
- $outputlangs = new Translate("",$conf);
- $outputlangs->setDefaultLang($newlang);
- }
- // To be sure vars is defined
- if (empty($hidedetails)) $hidedetails=0;
- if (empty($hidedesc)) $hidedesc=0;
- if (empty($hideref)) $hideref=0;
- if (empty($moreparams)) $moreparams=null;
- $result= $objecttmp->generateDocument($objecttmp->modelpdf, $outputlangs, $hidedetails, $hidedesc, $hideref, $moreparams);
- if ($result <= 0)
- {
- setEventMessages($objecttmp->error, $objecttmp->errors, 'errors');
- $error++;
- break;
- }
- else $nbok++;
- }
- else
- {
- setEventMessages($objecttmp->error, $objecttmp->errors, 'errors');
- $error++;
- break;
- }
- }
- if (! $error)
- {
- if ($nbok > 1) setEventMessages($langs->trans("RecordsGenerated", $nbok), null, 'mesgs');
- else setEventMessages($langs->trans("RecordGenerated", $nbok), null, 'mesgs');
- $db->commit();
- }
- else
- {
- $db->rollback();
- }
- }
- $parameters['toselect']=$toselect;
- $parameters['uploaddir']=$uploaddir;
- $reshook=$hookmanager->executeHooks('doMassActions',$parameters, $object, $action); // Note that $action and $object may have been modified by some hooks
- if ($reshook < 0) setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
|