Bug fix : export compta

This commit is contained in:
simontosser 2005-10-18 14:19:15 +00:00
parent 9ab2a789bd
commit e5689ac0de
2 changed files with 12 additions and 1 deletions

View File

@ -113,7 +113,7 @@ while (($file = readdir($handle))!==false)
{
if (is_readable($dir.$file) && is_file($dir.$file))
{
print '<tr><td><a href="'.DOL_URL_ROOT.'/document.php?file='.$dir.$file.'&amp;type=text/plain">'.$file.'</a><td>';
print '<tr><td><a href="'.DOL_URL_ROOT.'/document.php?modulepart=export_compta&file=export/'.$file.'&amp;type=text/plain">'.$file.'</a><td>';
print '</tr>';
}

View File

@ -101,6 +101,17 @@ if ($modulepart)
}
$original_file=$conf->compta->dir_output.'/'.$original_file;
}
// Wrapping pour les exports de compta
if ($modulepart == 'export_compta')
{
$user->getrights('compta');
if ($user->rights->compta->ventilation->creer)
{
$accessallowed=1;
}
$original_file=$conf->compta->dir_output.'/'.$original_file;
}
// Wrapping pour les societe
if ($modulepart == 'societe')