lainwir3d/dolibarr
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Add patch from patrick raguin to add the pdf unpayed concatenation feature.

Browse Source
This commit is contained in:
Laurent Destailleur 2008-08-28 00:53:47 +00:00
parent 1cf5e23bd0
commit 9b89360f91
2 changed files with 13 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
htdocs/compta/facture/retardspaiement.php
View File

@ -42,6 +42,8 @@ $result = restrictedArea($user, 'facture',$facid,'');
* View
*/
$diroutputpdf=$conf->facture->dir_output . '/impayes/temp';
llxHeader('',$langs->trans("BillsLate"));
$html = new Form($db);
@ -103,10 +105,10 @@ if ($user->rights->facture->lire)
}
// vérifie que le chemin d'accès est bien accessible
create_exdir($conf->facture->dir_output . '/impayes');
create_exdir($diroutputpdf);
// enregistre le fichier pdf concaténé
$pdf->Output($conf->facture->dir_output . '/impayes/impayes'.dolibarr_date('YmdHis',time()).'.pdf');
$pdf->Output($diroutputpdf.'/impayes'.dolibarr_date('YmdHis',time()).'.pdf');
} else {
print '<div class="error">'.$langs->trans('UnpayedNotChecked').'</div>' ;
@ -309,7 +311,7 @@ if ($user->rights->facture->lire)
/*
* Gestion des documents générés
*/
$filedir=$conf->facture->dir_output . '/impayes';
$filedir=$diroutputpdf;
$urlsource=$_SERVER['PHP_SELF'].'?facid='.$fac->id;
$genallowed=$user->rights->facture->creer;
$delallowed=$user->rights->facture->supprimer;

16
htdocs/lib/functions.lib.php
View File

@ -2238,13 +2238,13 @@ function get_exdir($num,$level=3)
}
/**
\brief Cr<EFBFBD>ation de r<EFBFBD>pertoire recursive
\param $dir R<EFBFBD>pertoire a cr<EFBFBD>er
\return int < 0 si erreur, >= 0 si succ<EFBFBD>s
* \brief Creation of a directory (recursive)
* \param $dir Directory to create
* \return int < 0 if KO, >= 0 if OK
*/
function create_exdir($dir)
{
dolibarr_syslog("functions.lib.php::create_exdir: dir=$dir",LOG_INFO);
dolibarr_syslog("functions.lib.php::create_exdir: dir=".$dir,LOG_INFO);
if (@is_dir($dir)) return 0;
@ -2259,7 +2259,7 @@ function create_exdir($dir)
else $ccdir = $cdir[$i];
if (eregi("^.:$",$ccdir,$regs)) continue; // Si chemin Windows incomplet, on poursuit par rep suivant
// Attention, le is_dir() peut <EFBFBD>chouer bien que le rep existe.
// Attention, le is_dir() peut echouer bien que le rep existe.
// (ex selon config de open_basedir)
if ($ccdir)
{
@ -2270,20 +2270,20 @@ function create_exdir($dir)
umask(0);
if (! @mkdir($ccdir, 0755))
{
// Si le is_dir a renvoy<EFBFBD> une fausse info, alors on passe ici.
// Si le is_dir a renvoye une fausse info, alors on passe ici.
dolibarr_syslog("functions.lib.php::create_exdir: Fails to create directory '".$ccdir."' or directory already exists.",LOG_WARNING);
$nberr++;
}
else
{
dolibarr_syslog("functions.lib.php::create_exdir: Directory '".$ccdir."' created",LOG_DEBUG);
$nberr=0; // On remet a z<EFBFBD>ro car si on arrive ici, cela veut dire que les <20>checs pr<70>c<EFBFBD>dents peuvent etre ignor<6F>s
$nberr=0; // On remet a zero car si on arrive ici, cela veut dire que les <20>checs pr<70>c<EFBFBD>dents peuvent etre ignor<6F>s
$nbcreated++;
}
}
else
{
$nberr=0; // On remet a z<EFBFBD>ro car si on arrive ici, cela veut dire que les <20>checs pr<70>c<EFBFBD>dents peuvent etre ignor<6F>s
$nberr=0; // On remet a zero car si on arrive ici, cela veut dire que les <20>checs pr<70>c<EFBFBD>dents peuvent etre ignor<6F>s
}
}
}