42if ($action ==
'print_file' && $user->hasRight(
'printing',
'read')) {
43 $langs->load(
"printing");
44 require_once DOL_DOCUMENT_ROOT.
'/core/modules/printing/modules_printing.php';
46 $list = $objectprint->listDrivers(
$db, 10);
47 $dirmodels = array_merge(array(
'/core/modules/printing/'), (array)
$conf->modules_parts[
'printing']);
50 foreach ($list as $driver) {
52 foreach ($dirmodels as $dir) {
53 $tmpclassfile =
dol_buildpath($dir, 0).$driver.
'.modules.php';
54 if (file_exists($tmpclassfile)) {
55 $classfile = $tmpclassfile;
59 if ($classfile ===
null) {
62 require_once $classfile;
63 $classname =
'printing_'.$driver;
64 $printer =
new $classname(
$db);
65 '@phan-var-force PrintingDriver $printer';
67 $langs->load(
'printing');
73 $module =
GETPOST(
'printer',
'alpha');
77 $filetoprint =
GETPOST(
'file',
'alpha');
78 if ($module ==
'facture') {
79 require_once DOL_DOCUMENT_ROOT.
'/compta/facture/class/facture.class.php';
80 $refinvoice = preg_replace(
'/[\/\\\\].*$/',
'', $filetoprint);
82 $tmpinvoice->fetch(0, $refinvoice);
83 if ($tmpinvoice->id > 0) {
85 $sql =
"UPDATE ".MAIN_DB_PREFIX.
"facture SET pos_print_counter = pos_print_counter + 1";
86 $sql .=
" WHERE rowid = ".((int) $tmpinvoice->id);
95 $ret = $printer->printFile($filetoprint, $module, $subdir);
103 setEventMessages($langs->transnoentitiesnoconv(
"FileWasSentToPrinter", basename(
GETPOST(
'file',
'alpha'))).
' '.$langs->transnoentitiesnoconv(
"ViaModule").
' '.$printer->name,
null);
111 if ($printerfound == 0) {
112 setEventMessages($langs->trans(
"NoActivePrintingModuleFound", $langs->transnoentities(
"Module64000Name")),
null,
'warnings');
Class to manage invoices.
Parent class of emailing target selectors modules.
setEventMessages($mesg, $mesgs, $style='mesgs', $messagekey='', $noduplicate=0, $attop=0)
Set event messages in dol_events session object.
GETPOST($paramname, $check='alphanohtml', $method=0, $filter=null, $options=null, $noreplace=0)
Return value of a param into GET or POST supervariable.
dol_buildpath($path, $type=0, $returnemptyifnotfound=0)
Return path of url or filesystem.
getDolGlobalString($key, $default='')
Return a Dolibarr global constant string value.