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

Bug fix : export compta

Browse Source
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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
htdocs/compta/export/index.php
View File

@ -113,7 +113,7 @@ while (($file = readdir($handle))!==false)
{ {
if (is_readable($dir.$file) && is_file($dir.$file)) 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>'; print '</tr>';
} }

11
htdocs/document.php
View File

@ -101,6 +101,17 @@ if ($modulepart)
} }
$original_file=$conf->compta->dir_output.'/'.$original_file; $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 // Wrapping pour les societe
if ($modulepart == 'societe') if ($modulepart == 'societe')