Doc: Doxygen

This commit is contained in:
Laurent Destailleur 2008-01-27 17:12:56 +00:00
parent 4100b04d44
commit 968bd915a1
5 changed files with 99 additions and 40 deletions

View File

@ -1,2 +1,3 @@
comptahtml comptahtml
compta compta
dolibarr-doxygen2.conf

View File

@ -1,8 +1,9 @@
#!/usr/bin/perl #!/usr/bin/perl
#-------------------------------------------------------------------- #--------------------------------------------------------------------
# Script filtrage des sources Dolibarr pour doxygen # \brief This script is a preprocessor for PHP files to be used
# # on PHP source files before running Doxygen.
# \version $Id$ # \version $Id$
# \author Laurent Destailleur
#-------------------------------------------------------------------- #--------------------------------------------------------------------
# Usage: dolibarr-doxygen-getversion.pl pathtofilefromdolibarrroot # Usage: dolibarr-doxygen-getversion.pl pathtofilefromdolibarrroot
@ -19,6 +20,65 @@ while (<FILE>)
$_ =~ s/(\\version\s+)[^\s]+\s/$1/i; $_ =~ s/(\\version\s+)[^\s]+\s/$1/i;
$_ =~ s/(\w)\s(\w)/$1_$2/g; $_ =~ s/(\w)\s(\w)/$1_$2/g;
} }
print $_; $_ =~ s/exit\s*;/exit(0);/i;
$i=0;
$len=length($_);
$s="";
$insidequote=0;
$insidedquote=0;
$ignore="";
while ($i < $len)
{
$c=substr($_,$i,1);
if ($c eq "\\")
{
if ($insidequote) { $ignore="'"; };
if ($insidedquote) { $ignore="\""; };
}
else
{
if ($c eq "'")
{
if (! $insidedquote)
{
$c="\"";
#print "X".$ignore;
if ($ignore ne "'")
{
#print "Z".$ignore;
$insidequote++;
if ($insidequote == 2)
{
$insidequote=0;
}
}
}
#print "X".$insidequote;
}
elsif ($c eq "\"")
{
#print "Y".$insidequote;
if ($insidequote)
{
$c="'";
}
else
{
if ($ignore ne "\"")
{
$insidedquote++;
if ($insidedquote == 2)
{
$insidedquote=0;
}
}
}
}
$ignore="";
}
$s.=$c;
$i++;
}
print $s;
} }
close(FILE); close(FILE);

View File

@ -16,15 +16,13 @@
* You should have received a copy of the GNU General Public License * You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software * along with this program; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
*
* $Id$
*/ */
/** /**
\file htdocs/admin/barcode.php \file htdocs/admin/barcode.php
\ingroup barcode \ingroup barcode
\brief Page d'administration/configuration du module Code barre \brief Page d'administration/configuration du module Code barre
\version $Revision$ \version $Id$
*/ */
require("./pre.inc.php"); require("./pre.inc.php");
@ -135,9 +133,9 @@ if ($resql)
print $obj->libelle; print $obj->libelle;
print "</td><td>\n"; print "</td><td>\n";
print $langs->trans('BarcodeDesc'.$obj->encoding); print $langs->trans('BarcodeDesc'.$obj->encoding);
//print "L'EAN se compose de 8 caractères, 7 chiffres plus une clé de contrôle.<br>"; //print "L'EAN se compose de 8 caract<EFBFBD>res, 7 chiffres plus une cl<63> de contr<74>le.<br>";
//print "L'utilisation des symbologies EAN8 impose la souscription et l'abonnement auprès d'organisme tel que GENCOD.<br>"; //print "L'utilisation des symbologies EAN8 impose la souscription et l'abonnement aupr<EFBFBD>s d'organisme tel que GENCOD.<br>";
//print "Codes numériques utilisés exclusivement à l'identification des produits susceptibles d'être vendus au grand public."; //print "Codes num<EFBFBD>riques utilis<69>s exclusivement <20> l'identification des produits susceptibles d'<27>tre vendus au grand public.";
print '</td>'; print '</td>';
// Affiche exemple // Affiche exemple
@ -201,6 +199,11 @@ if (!isset($_ENV['windir']) && !file_exists($_ENV['windir']))
print '<td>'.$langs->trans("GenbarcodeLocation").'</td>'; print '<td>'.$langs->trans("GenbarcodeLocation").'</td>';
print '<td width="60" align="center">'; print '<td width="60" align="center">';
print '<input type="text" size="40" name="genbarcodelocation" value="'.$conf->global->GENBARCODE_LOCATION.'">'; print '<input type="text" size="40" name="genbarcodelocation" value="'.$conf->global->GENBARCODE_LOCATION.'">';
if (! empty($conf->global->GENBARCODE_LOCATION) && ! file_exists($conf->global->GENBARCODE_LOCATION))
{
$langs->load("errors");
print '<br><font class="error">'.$langs->trans("ErrorGenbarCodeNotfound").'</font>';
}
print '</td>'; print '</td>';
print '<td width="60" align="center"><input type="submit" class="button" value="'.$langs->trans("Modify").'"></td>'; print '<td width="60" align="center"><input type="submit" class="button" value="'.$langs->trans("Modify").'"></td>';
print '</tr>'; print '</tr>';
@ -231,9 +234,9 @@ print '</table>';
print "EAN13"; print "EAN13";
print "</td><td>\n"; print "</td><td>\n";
print "L'EAN se compose de 13 caractères, 12 chiffres plus une clé de contrôle. Il fonctionne de la même manière que l'UPC, avec lequel il est compatible.<br>"; print "L'EAN se compose de 13 caract<EFBFBD>res, 12 chiffres plus une cl<63> de contr<74>le. Il fonctionne de la m<>me mani<6E>re que l'UPC, avec lequel il est compatible.<br>";
print "L'utilisation des symbologies EAN13 impose la souscription et l'abonnement auprès d'organisme tel que GENCOD.<br>"; print "L'utilisation des symbologies EAN13 impose la souscription et l'abonnement aupr<EFBFBD>s d'organisme tel que GENCOD.<br>";
print "Codes numériques utilisés exclusivement à l'identification des produits susceptibles d'être vendus au grand public."; print "Codes num<EFBFBD>riques utilis<69>s exclusivement <20> l'identification des produits susceptibles d'<27>tre vendus au grand public.";
print '</td>'; print '</td>';
// Affiche exemple // Affiche exemple
@ -249,10 +252,10 @@ print '</table>';
print '<tr '.$bc[$var].'><td width="100">'; print '<tr '.$bc[$var].'><td width="100">';
print "UPC"; print "UPC";
print "</td><td>\n"; print "</td><td>\n";
print "L'UPC est l'équivalent de l'EAN8/13 pour des pays codificateurs autre que l'Europe.<br>"; print "L'UPC est l'<EFBFBD>quivalent de l'EAN8/13 pour des pays codificateurs autre que l'Europe.<br>";
print "Il ne comporte que 11 chiffres plus la clé.<br>"; print "Il ne comporte que 11 chiffres plus la cl<EFBFBD>.<br>";
print "C'est en réalité un code EAN13 dont le premier chiffre serait zéro et dont la présentation serait légérement différente.<br>"; print "C'est en r<EFBFBD>alit<EFBFBD> un code EAN13 dont le premier chiffre serait z<>ro et dont la pr<70>sentation serait l<>g<EFBFBD>rement diff<66>rente.<br>";
print "Codes numériques utilisés exclusivement à l'identification des produits susceptibles d'être vendus au grand public."; print "Codes num<EFBFBD>riques utilis<69>s exclusivement <20> l'identification des produits susceptibles d'<27>tre vendus au grand public.";
print '</td>'; print '</td>';
// Affiche exemple // Affiche exemple
@ -268,7 +271,7 @@ print '</table>';
print '<tr '.$bc[$var].'><td width="100">'; print '<tr '.$bc[$var].'><td width="100">';
print "ISBN"; print "ISBN";
print "</td><td>\n"; print "</td><td>\n";
print "Le code ISBN est un code dédié au milieu de la presse écrite."; print "Le code ISBN est un code d<EFBFBD>di<EFBFBD> au milieu de la presse <20>crite.";
print '</td>'; print '</td>';
// Affiche exemple // Affiche exemple
@ -284,11 +287,11 @@ print '</table>';
print '<tr '.$bc[$var].'><td width="100">'; print '<tr '.$bc[$var].'><td width="100">';
print "Code 39"; print "Code 39";
print "</td><td>\n"; print "</td><td>\n";
print "Premier code alpha numérique utilisé massivement dans l'Industrie pour sa capacité d'encodage (chiffres et lettres)<br>"; print "Premier code alpha num<EFBFBD>rique utilis<69> massivement dans l'Industrie pour sa capacit<69> d'encodage (chiffres et lettres)<br>";
print "ainsi que par son degré de sécurité à l'encodage (clef de contrôle).<br>"; print "ainsi que par son degr<EFBFBD> de s<>curit<69> <20> l'encodage (clef de contr<74>le).<br>";
print "Il met a disposition les 10 chiffres, les 26 lettres de l'alphabet et sept symboles.<br>"; print "Il met a disposition les 10 chiffres, les 26 lettres de l'alphabet et sept symboles.<br>";
print "l'astérisque (*) sert de caractère de bornage. La lecture est bidirectionnelle.<br>"; print "l'ast<EFBFBD>risque (*) sert de caract<63>re de bornage. La lecture est bidirectionnelle.<br>";
print "La longueur est variable mais en général ne dépasse pas 32 caractères."; print "La longueur est variable mais en g<EFBFBD>n<EFBFBD>ral ne d<>passe pas 32 caract<63>res.";
print '</td>'; print '</td>';
// Affiche exemple // Affiche exemple
@ -305,11 +308,11 @@ print '</table>';
print '<tr '.$bc[$var].'><td width="100">'; print '<tr '.$bc[$var].'><td width="100">';
print "Code 128"; print "Code 128";
print "</td><td>\n"; print "</td><td>\n";
print "Ce code \"dernière génération\" alpha numérique est susceptible d'encoder les 128 caractères de la table ASCII ( chiffres + lettres + symboles ).<br>"; print "Ce code \"derni<EFBFBD>re g<>n<EFBFBD>ration\" alpha num<75>rique est susceptible d'encoder les 128 caract<63>res de la table ASCII ( chiffres + lettres + symboles ).<br>";
print "Le code 128 possède des algorithmes de cryptage sécurisés assez avancés.<br>"; print "Le code 128 poss<EFBFBD>de des algorithmes de cryptage s<>curis<69>s assez avanc<6E>s.<br>";
print "C'est le plus complet des codes à barres, il propose 3 jeux de 128 caractères.<br>"; print "C'est le plus complet des codes <EFBFBD> barres, il propose 3 jeux de 128 caract<63>res.<br>";
print "La lecture est bidirectionnelle.<br>"; print "La lecture est bidirectionnelle.<br>";
print "La longueur est variable mais en général ne dépasse pas 20 caractères."; print "La longueur est variable mais en g<EFBFBD>n<EFBFBD>ral ne d<>passe pas 20 caract<63>res.";
print '</td>'; print '</td>';
// Affiche exemple // Affiche exemple

View File

@ -15,14 +15,13 @@
* You should have received a copy of the GNU General Public License * You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software * along with this program; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
*
* $Id$
*/ */
/** /**
\file htdocs/admin/menus/edit.php \file htdocs/admin/menus/edit.php
\ingroup core \ingroup core
\brief Edition des menus \brief Edition des menus
\version $Id$
*/ */
require("./pre.inc.php"); require("./pre.inc.php");

View File

@ -18,10 +18,10 @@
*/ */
/** /**
\file htdocs/admin/menus/index.php \file htdocs/admin/menus/index.php
\ingroup core \ingroup core
\brief Page to show personalized menus \brief Index page for menu editor
\version $Id$ \version $Id$
*/ */
require("./pre.inc.php"); require("./pre.inc.php");
@ -221,11 +221,9 @@ if ($_GET["action"] == 'delete')
$html = new Form($db); $html = new Form($db);
$html->form_confirm("index.php?menu_handler=".$menu_handler."&menuId=".$_GET['menuId'],$langs->trans("DeleteMenu"),$langs->trans("ConfirmDeleteMenu",$obj->titre),"confirm_delete"); $html->form_confirm("index.php?menu_handler=".$menu_handler."&menuId=".$_GET['menuId'],$langs->trans("DeleteMenu"),$langs->trans("ConfirmDeleteMenu",$obj->titre),"confirm_delete");
print "<br />\n"; print "<br>\n";
} }
//print $html->textwithwarning($langs->trans("FeatureExperimental"),$langs->trans("FeatureExperimental"),-1);
//print '<br>';
print '<form name="newmenu" class="nocellnopadding" action="'.$_SERVER["PHP_SELF"].'">'; print '<form name="newmenu" class="nocellnopadding" action="'.$_SERVER["PHP_SELF"].'">';
print '<input type="hidden" action="change_menu_handler">'; print '<input type="hidden" action="change_menu_handler">';
@ -245,9 +243,7 @@ print '</tr>';
print '<tr>'; print '<tr>';
print '<td>'; print '<td>';
/************************* // ARBORESCENCE
* ARBORESCENCE *
*************************/
$rangLast = 0; $rangLast = 0;
$idLast = -1; $idLast = -1;