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

Ajout archivage

Browse Source
This commit is contained in:
Rodolphe Quiedeville 2007-07-09 10:23:59 +00:00
parent e20cc8cdb2
commit 1a3a881264
1 changed files with 25 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

29
htdocs/telephonie/facturation/files.php
View File

@ -22,6 +22,29 @@
require("./pre.inc.php");
require_once DOL_DOCUMENT_ROOT.'/telephonie/fournisseurtel.class.php';
if (!$user->rights->telephonie->facture->ecrire) accessforbidden();
if ($_GET["action"] == 'archive' && $user->rights->telephonie->facture->ecrire)
{
$srcdir = $conf->telephonie->dir_output."/cdr/atraiter/" ;
$file = urldecode ($_GET["file"]);
$destdir = $conf->telephonie->dir_output."/cdr/archive/".dirname($file).'/';
if (!is_dir($destdir))
{
@mkdir($destdir);
}
if (is_dir($destdir) && is_file($srcdir.$file))
{
rename($srcdir.$file,$destdir.basename($file));
}
}
$dir = $conf->telephonie->dir_output."/cdr/atraiter/" ;
$files = array();
@ -48,9 +71,6 @@ foreach ($fourns as $id => $nom)
}
}
if (!$user->rights->telephonie->facture->ecrire) accessforbidden();
llxHeader();
/*
@ -72,7 +92,7 @@ print '<table class="noborder" width="100%" cellspacing="0" cellpadding="4">';
print '<tr class="liste_titre"><td>Fournisseur</td>';
print '<td>Fichier</td><td>Date</td>';
print '<td align="right">Taille</td>';
print "</tr>\n";
print "<td>&nbsp;</td></tr>\n";
$var=True;
@ -91,6 +111,7 @@ foreach ($files as $file)
print '<td>'.date("d F Y H:i:s", filemtime($dir.$file)).'</td>';
print '<td align="right">'.filesize($dir.$file).' octets</td>';
print '<td align="right"><a href="files.php?action=archive&amp;file='.urlencode($file).'">archiver</a></td>';
}
print "</table>";