2004-07-15 14:40:07 +02:00
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
< html > < head > < meta http-equiv = "Content-Type" content = "text/html;charset=iso-8859-1" >
< title > dolibarr: htdocs/lib/functions.inc.php Source File< / title >
< link href = "doxygen.css" rel = "stylesheet" type = "text/css" >
< / head > < body >
<!-- G<> n<EFBFBD> r<EFBFBD> par Doxygen 1.3.7 -->
2004-07-15 20:43:48 +02:00
< div class = "qindex" > < a class = "qindex" href = "index.html" > Page principale< / a > | < a class = "qindex" href = "classes.html" > Liste alphab<EFBFBD> tique< / a > | < a class = "qindex" href = "annotated.html" > Liste des classes< / a > | < a class = "qindex" href = "files.html" > Liste des fichiers< / a > | < a class = "qindex" href = "functions.html" > Membres de classe< / a > | < a class = "qindex" href = "globals.html" > Membres de fichier< / a > < / div >
2004-07-16 00:17:39 +02:00
< h1 > htdocs/lib/functions.inc.php< / h1 > < a href = "functions_8inc_8php.html" > Aller <20> la documentation de ce fichier.< / a > < pre class = "fragment" > < div > 00001 < ?PHP
2004-07-15 14:40:07 +02:00
00002 < span class = "comment" > /* Copyright (C) 2000-2004 Rodolphe Quiedeville < rodolphe@quiedeville.org> < / span >
00003 < span class = "comment" > * Copyright (C) 2003 Jean-Louis Bergamo < jlb@j1b.org> < / span >
00004 < span class = "comment" > * Copyright (C) 2004 Laurent Destailleur < eldy@users.sourceforge.net> < / span >
00005 < span class = "comment" > *< / span >
00006 < span class = "comment" > * This program is free software; you can redistribute it and/or modify< / span >
00007 < span class = "comment" > * it under the terms of the GNU General Public License as published by< / span >
00008 < span class = "comment" > * the Free Software Foundation; either version 2 of the License, or< / span >
00009 < span class = "comment" > * (at your option) any later version.< / span >
00010 < span class = "comment" > *< / span >
00011 < span class = "comment" > * This program is distributed in the hope that it will be useful,< / span >
00012 < span class = "comment" > * but WITHOUT ANY WARRANTY; without even the implied warranty of< / span >
00013 < span class = "comment" > * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the< / span >
00014 < span class = "comment" > * GNU General Public License for more details.< / span >
00015 < span class = "comment" > *< / span >
00016 < span class = "comment" > * You should have received a copy of the GNU General Public License< / span >
00017 < span class = "comment" > * along with this program; if not, write to the Free Software< / span >
00018 < span class = "comment" > * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.< / span >
00019 < span class = "comment" > * or see http://www.gnu.org/< / span >
00020 < span class = "comment" > *< / span >
00021 < span class = "comment" > * $Id$< / span >
00022 < span class = "comment" > * $Source$< / span >
00023 < span class = "comment" > *< / span >
00024 < span class = "comment" > */< / span >
00025
2004-07-16 00:17:39 +02:00
00036 $yn[0] = < span class = "stringliteral" > "non"< / span > ;
00037 $yn[1] = < span class = "stringliteral" > "oui"< / span > ;
00038
< a name = "l00044" > < / a > < a class = "code" href = "functions_8inc_8php.html#a1" > 00044< / a > function < a class = "code" href = "functions_8inc_8php.html#a1" > dolibarr_syslog< / a > ($message)
00045 {
00046 define_syslog_variables();
00047
00048 openlog(< span class = "stringliteral" > "dolibarr"< / span > , LOG_PID | LOG_PERROR, LOG_USER); # LOG_USER au lieu de LOG_LOCAL0 car non accept<70> par tous les PHP
00049
00050 syslog(LOG_WARNING, $message);
00051
00052 closelog();
00053 }
00054
< a name = "l00063" > < / a > < a class = "code" href = "functions_8inc_8php.html#a2" > 00063< / a > function < a class = "code" href = "functions_8inc_8php.html#a2" > dolibarr_fiche_head< / a > ($links, $active=0)
00064 {
00065 print < span class = "stringliteral" > "< !-- fiche --> < div class=\"tabs\"> \n"< / span > ;
2004-07-15 14:40:07 +02:00
00066
2004-07-16 00:17:39 +02:00
00067 < span class = "keywordflow" > for< / span > ($i = 0 ; $i < < span class = "keyword" > sizeof< / span > ($links) ; $i++)
00068 {
00069 < span class = "keywordflow" > if< / span > ($links[$i][2] == 'image')
00070 {
00071 print '< a < span class = "keyword" > class< / span > =< span class = "stringliteral" > "tabimage"< / span > href=< span class = "stringliteral" > "'.$links[$i][0].'"< / span > > '.$links[$i][1].'< /a> '.< span class = "stringliteral" > "\n"< / span > ;
00072 }
00073 < span class = "keywordflow" > else< / span >
00074 {
00075 < span class = "keywordflow" > if< / span > ($i == $active)
00076 {
00077 print '< a < span class = "keywordtype" > id< / span > =< span class = "stringliteral" > "active"< / span > < span class = "keyword" > class< / span > =< span class = "stringliteral" > "tab"< / span > href=< span class = "stringliteral" > "'.$links[$i][0].'"< / span > > '.$links[$i][1].'< /a> '.< span class = "stringliteral" > "\n"< / span > ;
00078 }
00079 < span class = "keywordflow" > else< / span >
00080 {
00081 print '< a < span class = "keyword" > class< / span > =< span class = "stringliteral" > "tab"< / span > href=< span class = "stringliteral" > "'.$links[$i][0].'"< / span > > '.$links[$i][1].'< /a> '.< span class = "stringliteral" > "\n"< / span > ;
00082 }
00083 }
00084 }
00085
00086 print < span class = "stringliteral" > "< /div> \n"< / span > ;
00087 print < span class = "stringliteral" > "< div class=\"tabBar\"> \n< br> \n"< / span > ;
00088 }
00089
< a name = "l00103" > < / a > < a class = "code" href = "functions_8inc_8php.html#a3" > 00103< / a > function < a class = "code" href = "functions_8inc_8php.html#a3" > dolibarr_set_const< / a > ($db, $name, $value, $type='chaine', $visible=0, $note='')
00104 {
00105 $sql = < span class = "stringliteral" > "REPLACE INTO llx_const SET name = '$name', value='$value', visible=$visible, type='$type', note='$note'"< / span > ;
00106
00107 < span class = "keywordflow" > if< / span > ($db-> query($sql))
00108 {
00109 < span class = "keywordflow" > return< / span > 1;
00110 }
00111 < span class = "keywordflow" > else< / span >
00112 {
00113 < span class = "keywordflow" > return< / span > 0;
00114 }
00115 }
00116
< a name = "l00124" > < / a > < a class = "code" href = "functions_8inc_8php.html#a4" > 00124< / a > function < a class = "code" href = "functions_8inc_8php.html#a4" > dolibarr_del_const< / a > ($db, $name)
00125 {
00126 $sql = < span class = "stringliteral" > "DELETE FROM llx_const WHERE name='$name'"< / span > ;
00127
00128 < span class = "keywordflow" > if< / span > ($db-> query($sql))
00129 {
00130 < span class = "keywordflow" > return< / span > 1;
00131 }
00132 < span class = "keywordflow" > else< / span >
00133 {
00134 < span class = "keywordflow" > return< / span > 0;
00135 }
00136 }
00137
< a name = "l00144" > < / a > < a class = "code" href = "functions_8inc_8php.html#a5" > 00144< / a > function < a class = "code" href = "functions_8inc_8php.html#a5" > dolibarr_print_ca< / a > ($ca)
00145 {
00146 < span class = "keywordflow" > if< / span > ($ca > 1000)
00147 {
00148 $cat = round(($ca / 1000),2);
00149 $cat = < span class = "stringliteral" > "$cat Keuros"< / span > ;
00150 }
00151 < span class = "keywordflow" > else< / span >
00152 {
00153 $cat = round($ca,2);
00154 $cat = < span class = "stringliteral" > "$cat euros"< / span > ;
00155 }
00156
00157 < span class = "keywordflow" > if< / span > ($ca > 1000000)
00158 {
00159 $cat = round(($ca / 1000000),2);
00160 $cat = < span class = "stringliteral" > "$cat Meuros"< / span > ;
00161 }
00162
00163 < span class = "keywordflow" > return< / span > $cat;
2004-07-15 14:40:07 +02:00
00164 }
00165
2004-07-16 00:17:39 +02:00
< a name = "l00173" > < / a > < a class = "code" href = "functions_8inc_8php.html#a6" > 00173< / a > function < a class = "code" href = "functions_8inc_8php.html#a6" > dolibarr_print_date< / a > ($time,$format=< span class = "stringliteral" > "%d %b %Y"< / span > )
00174 {
00175 < span class = "keywordflow" > return< / span > strftime($format,$time);
00176 }
00177
00178
< a name = "l00184" > < / a > < a class = "code" href = "functions_8inc_8php.html#a7" > 00184< / a > function < a class = "code" href = "functions_8inc_8php.html#a7" > dolibarr_print_object_info< / a > ($object)
00185 {
00186 print < span class = "stringliteral" > "Cr<43> <72> par : "< / span > . $object-> user_creation-> fullname . '< br> ';
00187 print < span class = "stringliteral" > "Date de cr<63> ation : "< / span > . strftime(< span class = "stringliteral" > "%A %d %B %Y %H:%M:%S"< / span > ,$object-> date_creation) . '< br> ';
00188 print < span class = "stringliteral" > "Modifi<66> par : "< / span > . $object-> user_modification-> fullname . '< br> ';
00189 print < span class = "stringliteral" > "Date de modification : "< / span > . strftime(< span class = "stringliteral" > "%A %d %B %Y %H:%M:%S"< / span > ,$object-> date_modification) . '< br> ';
2004-07-15 14:40:07 +02:00
00190 }
00191
2004-07-16 00:17:39 +02:00
< a name = "l00199" > < / a > < a class = "code" href = "functions_8inc_8php.html#a8" > 00199< / a > function < a class = "code" href = "functions_8inc_8php.html#a8" > dolibarr_print_phone< / a > ($phone)
00200 {
00201 < span class = "keywordflow" > if< / span > (strlen(trim($phone)) == 10)
00202 {
00203 < span class = "keywordflow" > return< / span > substr($phone,0,2).< span class = "stringliteral" > " "< / span > .substr($phone,2,2).< span class = "stringliteral" > " "< / span > .substr($phone,4,2).< span class = "stringliteral" > " "< / span > .substr($phone,6,2).< span class = "stringliteral" > " "< / span > .substr($phone,8,2);
00204 }
00205 < span class = "keywordflow" > else< / span >
00206 {
00207 < span class = "keywordflow" > return< / span > $phone;
00208 }
00209 }
00210
00211 function img_file($alt = < span class = "stringliteral" > "Voir"< / span > )
00212 {
00213 < span class = "keywordflow" > return< / span > '< img src=< span class = "stringliteral" > "'.DOL_URL_ROOT.'/theme/'.MAIN_THEME.'/img/file.png"< / span > border=< span class = "stringliteral" > "0"< / span > alt=< span class = "stringliteral" > "'.$alt.'"< / span > > ';
00214 }
00215
00216 function img_file_new($alt = < span class = "stringliteral" > "Voir"< / span > )
00217 {
00218 < span class = "keywordflow" > return< / span > '< img src=< span class = "stringliteral" > "'.DOL_URL_ROOT.'/theme/'.MAIN_THEME.'/img/filenew.png"< / span > border=< span class = "stringliteral" > "0"< / span > alt=< span class = "stringliteral" > "'.$alt.'"< / span > > ';
00219 }
00220
00221
00222 function img_pdf($alt = < span class = "stringliteral" > "Voir"< / span > )
00223 {
00224 < span class = "keywordflow" > return< / span > '< img src=< span class = "stringliteral" > "'.DOL_URL_ROOT.'/theme/'.MAIN_THEME.'/img/pdf.png"< / span > border=< span class = "stringliteral" > "0"< / span > alt=< span class = "stringliteral" > "'.$alt.'"< / span > > ';
00225 }
00226
00227 function img_warning($alt = < span class = "stringliteral" > "Voir"< / span > )
00228 {
00229 < span class = "keywordflow" > return< / span > '< img src=< span class = "stringliteral" > "'.DOL_URL_ROOT.'/theme/'.MAIN_THEME.'/img/warning.png"< / span > border=< span class = "stringliteral" > "0"< / span > alt=< span class = "stringliteral" > "'.$alt.'"< / span > > ';
00230 }
00231
00232 function img_delete($alt = < span class = "stringliteral" > "Supprimer"< / span > )
00233 {
00234 < span class = "keywordflow" > return< / span > '< img src=< span class = "stringliteral" > "'.DOL_URL_ROOT.'/theme/'.MAIN_THEME.'/img/delete.png"< / span > border=< span class = "stringliteral" > "0"< / span > alt=< span class = "stringliteral" > "'.$alt.'"< / span > title=< span class = "stringliteral" > "Supprimer"< / span > > ';
00235 }
00236
00237 function img_info($alt = < span class = "stringliteral" > "Informations"< / span > )
00238 {
00239 < span class = "keywordflow" > return< / span > '< img src=< span class = "stringliteral" > "'.DOL_URL_ROOT.'/theme/'.MAIN_THEME.'/img/info.png"< / span > border=< span class = "stringliteral" > "0"< / span > alt=< span class = "stringliteral" > "'.$alt.'"< / span > title=< span class = "stringliteral" > "Informations"< / span > > ';
00240 }
00241
00242
00243 function img_edit($alt = < span class = "stringliteral" > "Modifier"< / span > )
00244 {
00245 < span class = "keywordflow" > return< / span > '< img src=< span class = "stringliteral" > "'.DOL_URL_ROOT.'/theme/'.MAIN_THEME.'/img/edit.png"< / span > border=< span class = "stringliteral" > "0"< / span > alt=< span class = "stringliteral" > "'.$alt.'"< / span > title=< span class = "stringliteral" > "Modifier"< / span > > ';
00246 }
00247
00248 function img_phone_in($alt = < span class = "stringliteral" > "Modifier"< / span > )
00249 {
00250 < span class = "keywordflow" > return< / span > '< img src=< span class = "stringliteral" > "'.DOL_URL_ROOT.'/theme/'.MAIN_THEME.'/img/call.png"< / span > border=< span class = "stringliteral" > "0"< / span > alt=< span class = "stringliteral" > "'.$alt.'"< / span > title=< span class = "stringliteral" > "'.$alt.'"< / span > > ';
00251 }
00252
00253 function img_phone_out($alt = < span class = "stringliteral" > "Modifier"< / span > )
00254 {
00255 < span class = "keywordflow" > return< / span > '< img src=< span class = "stringliteral" > "'.DOL_URL_ROOT.'/theme/'.MAIN_THEME.'/img/call_out.png"< / span > border=< span class = "stringliteral" > "0"< / span > alt=< span class = "stringliteral" > "'.$alt.'"< / span > title=< span class = "stringliteral" > "'.$alt.'"< / span > > ';
00256 }
00257
00258
00259 function img_alerte($alt = < span class = "stringliteral" > "Alerte"< / span > )
00260 {
00261 < span class = "keywordflow" > return< / span > '< img src=< span class = "stringliteral" > "'.DOL_URL_ROOT.'/theme/'.MAIN_THEME.'/img/alerte.png"< / span > border=< span class = "stringliteral" > "0"< / span > alt=< span class = "stringliteral" > "'.$alt.'"< / span > title=< span class = "stringliteral" > "'.$alt.'"< / span > > ';
00262 }
00263
00264
00265 function img_next($alt = < span class = "stringliteral" > "Suivant"< / span > )
00266 {
00267 < span class = "keywordflow" > return< / span > '< img src=< span class = "stringliteral" > "'.DOL_URL_ROOT.'/theme/'.MAIN_THEME.'/img/next.png"< / span > border=< span class = "stringliteral" > "0"< / span > alt=< span class = "stringliteral" > "'.$alt.'"< / span > title=< span class = "stringliteral" > "'.$alt.'"< / span > > ';
00268 }
00269
00270 function img_previous($alt = < span class = "stringliteral" > "Pr<50> c<EFBFBD> dent"< / span > )
00271 {
00272 < span class = "keywordflow" > return< / span > '< img src=< span class = "stringliteral" > "'.DOL_URL_ROOT.'/theme/'.MAIN_THEME.'/img/previous.png"< / span > border=< span class = "stringliteral" > "0"< / span > alt=< span class = "stringliteral" > "'.$alt.'"< / span > title=< span class = "stringliteral" > "'.$alt.'"< / span > > ';
00273 }
00274
< a name = "l00281" > < / a > < a class = "code" href = "functions_8inc_8php.html#a21" > 00281< / a > function < a class = "code" href = "functions_8inc_8php.html#a21" > loginfunction< / a > ()
00282 {
00283 print '< !DOCTYPE HTML PUBLIC < span class = "stringliteral" > "-//W3C//DTD HTML 4.01 Transitional//EN"< / span > < span class = "stringliteral" > "http://www.w3.org/TR/html4/loose.dtd"< / span > > ';
00284 print < span class = "stringliteral" > "\n< html> < head> < title> Dolibarr Authentification< /title> "< / span > ;
00285 print '< style type=< span class = "stringliteral" > "text/css"< / span > >
00286 body {
00287 font-size:14px;
00288 font-family: Verdana, Tahoma, Arial, Helvetica, sans-serif;
00289 background-color: #cac8c0;
00290 margin-left: 30%;
00291 margin-right: 30%;
00292 margin-top: 10%;
00293 margin-bottom: 1%;
00294 }
00295 div.main {
00296 background-color: white;
00297 text-align: left;
00298 border: solid black 1px;
00299 }
00300 div.main-inside {
00301 background-color: white;
00302 padding-left: 20px;
00303 padding-right: 50px;
00304 text-align: center;
00305 margin-bottom: 50px;
00306 margin-top: 30px;
00307 }
00308 div.footer {
00309 background-color: #dcdff4;
00310 font-size: 10px;
00311 border-top: solid black 1px;
00312 padding-left: 5px;
00313 text-align: center;
00314 }
00315 div.header {
00316 background-color: #dcdff4;
00317 border-bottom: solid black 1px;
00318 padding-left: 5px;
00319 text-align: center;
00320 }
00321 div.footer p {
00322 margin: 0px;
00323 }
00324 a:link,a:visited,a:active {
00325 text-decoration:none;
00326 color:blue;
00327 }
00328 a:hover {
00329 text-decoration:underline;
00330 color:blue;
00331 }
00332 < /style>
00333 < meta http-equiv=< span class = "stringliteral" > "Content-Type"< / span > content=< span class = "stringliteral" > "text/html; charset=iso-8859-15"< / span > >
00334 < script language=< span class = "stringliteral" > "javascript"< / span > >
00335 function donnefocus(){
00336 document.identification.username.focus();
00337 }
00338 < /script>
00339 < /head>
00340 < body onload=< span class = "stringliteral" > "donnefocus();"< / span > >
00341 < div < span class = "keyword" > class< / span > =< span class = "stringliteral" > "main"< / span > >
00342 < div < span class = "keyword" > class< / span > =< span class = "stringliteral" > "header"< / span > > ';
00343 print 'Dolibarr '.DOL_VERSION;
00344 print '
00345 < /div>
00346 < div < span class = "keyword" > class< / span > =< span class = "stringliteral" > "main-inside"< / span > >
00347 ';
00348
00349 echo '< form method=< span class = "stringliteral" > "post"< / span > action=< span class = "stringliteral" > "' . $_SERVER['PHP_SELF'] . '"< / span > name=< span class = "stringliteral" > "identification"< / span > > ';
00350 print '< table> < tr> ';
00351 print '< td> Login : < /td> < td> < input type=< span class = "stringliteral" > "text"< / span > name=< span class = "stringliteral" > "username"< / span > > < /td> < /tr> ';;
00352 print '< tr> < td> Password : < /td> < td> < input type=< span class = "stringliteral" > "password"< / span > name=< span class = "stringliteral" > "password"< / span > > < /td> < /tr> ';
00353
00354 echo '< /table>
00355 < p align=< span class = "stringliteral" > "center"< / span > > < input value=< span class = "stringliteral" > "Login"< / span > type=< span class = "stringliteral" > "submit"< / span > >
00356 < /form> ';
00357 }
00358
< a name = "l00363" > < / a > < a class = "code" href = "functions_8inc_8php.html#a22" > 00363< / a > function < a class = "code" href = "functions_8inc_8php.html#a22" > accessforbidden< / a > ()
00364 {
00365 llxHeader();
00366 print < span class = "stringliteral" > "Acc<63> s interdit"< / span > ;
00367 llxFooter();
00368 exit(0);
00369 }
00370
< a name = "l00377" > < / a > < a class = "code" href = "functions_8inc_8php.html#a23" > 00377< / a > function < a class = "code" href = "functions_8inc_8php.html#a23" > doliMoveFileUpload< / a > ($src_file, $dest_file)
00378 {
00379 $file_name = $dest_file;
00380
00381 < span class = "keywordflow" > if< / span > (substr($file_name, strlen($file_name) -3 , 3) == 'php')
00382 {
00383 $file_name = $dest_file . < span class = "stringliteral" > ".txt"< / span > ;
00384 }
00385
00386 < span class = "keywordflow" > return< / span > move_uploaded_file($src_file, $file_name);
00387 }
2004-07-15 14:40:07 +02:00
00388
00389
2004-07-16 00:17:39 +02:00
00390 function dolibarr_user_page_param($db, & $user)
00391 {
00392 foreach ($GLOBALS[< span class = "stringliteral" > "_GET"< / span > ] as $key=> $value)
00393 {
00394 < span class = "keywordflow" > if< / span > ($key == < span class = "stringliteral" > "sortfield"< / span > )
00395 {
00396 $sql = < span class = "stringliteral" > "REPLACE INTO "< / span > .MAIN_DB_PREFIX.< span class = "stringliteral" > "user_param "< / span > ;
00397 $sql .= < span class = "stringliteral" > " SET fk_user ="< / span > .$user-> id;
00398 $sql .= < span class = "stringliteral" > " ,page='"< / span > .$GLOBALS[< span class = "stringliteral" > "SCRIPT_URL"< / span > ] . < span class = "stringliteral" > "'"< / span > ;
00399 $sql .= < span class = "stringliteral" > " ,param='sortfield'"< / span > ;
00400 $sql .= < span class = "stringliteral" > " ,value='"< / span > .urlencode($value).< span class = "stringliteral" > "'"< / span > ;
00401
00402 $db-> query($sql);
00403 $user-> page_param[< span class = "stringliteral" > "sortfield"< / span > ] = $value;
00404 }
00405
00406 < span class = "comment" > // print $key . "=".$value . "< br> ";< / span >
00407
00408 < span class = "keywordflow" > if< / span > ($key == < span class = "stringliteral" > "sortorder"< / span > )
00409 {
00410 $sql = < span class = "stringliteral" > "REPLACE INTO "< / span > .MAIN_DB_PREFIX.< span class = "stringliteral" > "user_param "< / span > ;
00411 $sql .= < span class = "stringliteral" > " SET fk_user ="< / span > .$user-> id;
00412 $sql .= < span class = "stringliteral" > " ,page='"< / span > .$GLOBALS[< span class = "stringliteral" > "SCRIPT_URL"< / span > ] . < span class = "stringliteral" > "'"< / span > ;
00413 $sql .= < span class = "stringliteral" > " ,param='sortorder'"< / span > ;
00414 $sql .= < span class = "stringliteral" > " ,value='"< / span > .urlencode($value).< span class = "stringliteral" > "'"< / span > ;
00415
00416 $db-> query($sql);
00417 $user-> page_param[< span class = "stringliteral" > "sortorder"< / span > ] = $value;
00418 }
00419 < span class = "keywordflow" > if< / span > ($key == < span class = "stringliteral" > "begin"< / span > )
00420 {
00421 $sql = < span class = "stringliteral" > "REPLACE INTO "< / span > .MAIN_DB_PREFIX.< span class = "stringliteral" > "user_param "< / span > ;
00422 $sql .= < span class = "stringliteral" > " SET fk_user ="< / span > .$user-> id;
00423 $sql .= < span class = "stringliteral" > " ,page='"< / span > .$GLOBALS[< span class = "stringliteral" > "SCRIPT_URL"< / span > ] . < span class = "stringliteral" > "'"< / span > ;
00424 $sql .= < span class = "stringliteral" > " ,param='begin'"< / span > ;
00425 $sql .= < span class = "stringliteral" > " ,value='"< / span > .$value.< span class = "stringliteral" > "'"< / span > ;
00426
00427 $db-> query($sql);
00428 $user-> page_param[< span class = "stringliteral" > "begin"< / span > ] = $value;
00429 }
00430 < span class = "keywordflow" > if< / span > ($key == < span class = "stringliteral" > "page"< / span > )
00431 {
00432 $sql = < span class = "stringliteral" > "REPLACE INTO "< / span > .MAIN_DB_PREFIX.< span class = "stringliteral" > "user_param "< / span > ;
00433 $sql .= < span class = "stringliteral" > " SET fk_user ="< / span > .$user-> id;
00434 $sql .= < span class = "stringliteral" > " ,page='"< / span > .$GLOBALS[< span class = "stringliteral" > "SCRIPT_URL"< / span > ] . < span class = "stringliteral" > "'"< / span > ;
00435 $sql .= < span class = "stringliteral" > " ,param='page'"< / span > ;
00436 $sql .= < span class = "stringliteral" > " ,value='"< / span > .$value.< span class = "stringliteral" > "'"< / span > ;
00437
00438 $db-> query($sql);
00439 $user-> page_param[< span class = "stringliteral" > "page"< / span > ] = $value;
00440 }
00441 }
00442 }
00443
< a name = "l00451" > < / a > < a class = "code" href = "functions_8inc_8php.html#a25" > 00451< / a > function < a class = "code" href = "functions_8inc_8php.html#a25" > transcoS2L< / a > ($zonein,$devise)
00452 {
00453 < span class = "comment" > // Open source offert par < A HREF="mailto:alainfloch@free.fr?subject=chif2let"> alainfloch@free.fr< /A> 28/10/2001, sans garantie.< / span >
00454 < span class = "comment" > // d<> but de la fonction de transcodification de somme en toutes lettres< / span >
00455
00456 < span class = "comment" > /* $zonein = "123,56";< / span >
00457 < span class = "comment" > * $devise = "E"; // pr<70> ciser F si francs , sinon ce sera de l'euro< / span >
00458 < span class = "comment" > * $r = transcoS2L($zonein,$devise); // appeler la fonction< / span >
00459 < span class = "comment" > * echo "r<> sultat vaut $r< br> ";< / span >
00460 < span class = "comment" > * $zonelettresM = strtoupper($r); // si vous voulez la m<> me zone mais tout en majuscules< / span >
00461 < span class = "comment" > * echo "r<> sultat en Majuscules vaut $zonelettresM< br> ";< / span >
00462 < span class = "comment" > * $zonein = "1,01";< / span >
00463 < span class = "comment" > * $r = transcoS2L($zonein,$devise);< / span >
00464 < span class = "comment" > * echo "r<> sultat vaut $r< br> ";< / span >
00465 < span class = "comment" > */< / span >
00466
00467
00468 < span class = "keywordflow" > if< / span > ($devise == < span class = "stringliteral" > "F"< / span > )
00469 {
00470 $unite_singulier = < span class = "stringliteral" > " franc "< / span > ;
00471 $unite_pluriel = < span class = "stringliteral" > " francs "< / span > ;
00472 $cent_singulier = < span class = "stringliteral" > " centime"< / span > ;
00473 }
00474 < span class = "keywordflow" > else< / span >
00475 {
00476 $unite_singulier = < span class = "stringliteral" > " euro "< / span > ;
00477 $unite_pluriel = < span class = "stringliteral" > " euros "< / span > ;
00478 $cent_singulier = < span class = "stringliteral" > " centime"< / span > ;
00479 }
00480
00481 $arr1_99 = array(< span class = "stringliteral" > "z<> ro"< / span > ,< span class = "stringliteral" > "un"< / span > ,< span class = "stringliteral" > "deux"< / span > ,< span class = "stringliteral" > "trois"< / span > ,
00482 < span class = "stringliteral" > "quatre"< / span > ,< span class = "stringliteral" > "cinq"< / span > ,< span class = "stringliteral" > "six"< / span > ,< span class = "stringliteral" > "sept"< / span > ,
00483 < span class = "stringliteral" > "huit"< / span > ,< span class = "stringliteral" > "neuf"< / span > ,< span class = "stringliteral" > "dix"< / span > ,< span class = "stringliteral" > "onze"< / span > ,< span class = "stringliteral" > "douze"< / span > ,
00484 < span class = "stringliteral" > "treize"< / span > ,< span class = "stringliteral" > "quatorze"< / span > ,< span class = "stringliteral" > "quinze"< / span > ,< span class = "stringliteral" > "seize"< / span > ,
00485 < span class = "stringliteral" > "dix-sept"< / span > ,< span class = "stringliteral" > "dix-huit"< / span > ,< span class = "stringliteral" > "dix-neuf"< / span > ,< span class = "stringliteral" > "vingt "< / span > );
00486
00487 $arr1_99[30] = < span class = "stringliteral" > "trente "< / span > ;
00488 $arr1_99[40] = < span class = "stringliteral" > "quarante "< / span > ;
00489 $arr1_99[50] = < span class = "stringliteral" > "cinquante "< / span > ;
00490 $arr1_99[60] = < span class = "stringliteral" > "soixante "< / span > ;
00491 $arr1_99[70] = < span class = "stringliteral" > "soixante-dix "< / span > ;
00492 $arr1_99[71] = < span class = "stringliteral" > "soixante et onze"< / span > ;
00493 $arr1_99[80] = < span class = "stringliteral" > "quatre-vingts "< / span > ;
00494 $i = 22;
00495 < span class = "keywordflow" > while< / span > ($i < 63) {< span class = "comment" > // initialise la table< / span >
00496 $arr1_99[$i - 1] = $arr1_99[$i - 2].< span class = "stringliteral" > " et un"< / span > ;
00497 $j = 0;
00498 < span class = "keywordflow" > while< / span > ($j < 8) {
00499 $k = $i + $j;
00500 $arr1_99[$k] = $arr1_99[$i - 2].$arr1_99[$j + 2];
00501 $j++;
00502 }
00503 $i = $i + 10;
00504 } < span class = "comment" > // fin initialise la table< / span >
00505
00506 $i = 12;
00507 < span class = "keywordflow" > while< / span > ($i < 20) {< span class = "comment" > // initialise la table (suite)< / span >
00508 $j = 60 + $i;
00509 $arr1_99[$j] = < span class = "stringliteral" > "soixante-"< / span > .$arr1_99[$i];
00510 $i++;
00511 } < span class = "comment" > // fin initialise la table (suite)< / span >
00512
00513 $i = 1;
00514 < span class = "keywordflow" > while< / span > ($i < 20) {< span class = "comment" > // initialise la table (fin)< / span >
00515 $j = 80 + $i;
00516 $arr1_99[$j] = < span class = "stringliteral" > "quatre-vingt-"< / span > .$arr1_99[$i];
00517 $i++;
00518 } < span class = "comment" > // fin initialise la table (fin)< / span >
00519 < span class = "comment" > // echo "Pour une valeur en entr<74> e = $zonein< br> "; //pour ceux qui ne croient que ce qu'ils voient !< / span >
00520 < span class = "comment" > // quelques petits controles s'imposent !! < / span >
00521 $valid = < span class = "stringliteral" > "[a-zA-Z\& \<5C> \"\'\(\-\<5C> \_\<5C> \<5C> \)\=\;\:\!\*\$\^< > ]"< / span > ;
00522 < span class = "keywordflow" > if< / span > (ereg($valid,$zonein))
2004-07-15 14:40:07 +02:00
00523 {
2004-07-16 00:17:39 +02:00
00524 $r = < span class = "stringliteral" > "< b> la cha<68> ne "< / span > .$zonein.< span class = "stringliteral" > " n'est pas valide< /b> "< / span > ;
00525 < span class = "keywordflow" > return< / span > ($r);
00526 }
00527 $zone = explode(< span class = "stringliteral" > " "< / span > ,$zonein); < span class = "comment" > // supprimer les blancs s<> parateurs< / span >
00528 $zonein = implode(< span class = "stringliteral" > ""< / span > ,$zone); < span class = "comment" > // reconcat<61> ne la zone input< / span >
00529 $zone = explode(< span class = "stringliteral" > "."< / span > ,$zonein); < span class = "comment" > // supprimer les points s<> parateurs< / span >
00530 $zonein = implode(< span class = "stringliteral" > ""< / span > ,$zone); < span class = "comment" > // reconcat<61> ne la zone input, <20> a c'est fort ! merci PHP< / span >
00531 $virg = strpos($zonein,< span class = "stringliteral" > ","< / span > ,1); < span class = "comment" > // <20> la poursuite de la virgule< / span >
00532 $i = strlen($zonein); < span class = "comment" > // et de la longueur de la zone input< / span >
00533 < span class = "keywordflow" > if< / span > ($virg == 0) { < span class = "comment" > // ya pas de virgule< / span >
00534 < span class = "keywordflow" > if< / span > ($i > 7)
00535 {
00536 $r = < span class = "stringliteral" > "< b> la cha<68> ne "< / span > .$zonein.< span class = "stringliteral" > " est trop longue (maxi = 9 millions)< /b> "< / span > ;
00537 < span class = "keywordflow" > return< / span > ($r);
00538 }
00539 $deb = 7 - $i;
00540 $zoneanaly = substr($zonechiffres,0,$deb).$zonein.< span class = "stringliteral" > ",00"< / span > ;
00541 }
00542 < span class = "keywordflow" > else< / span >
00543 { < span class = "comment" > //ya une virgule< / span >
00544 $ti = explode(< span class = "stringliteral" > ","< / span > ,$zonein); < span class = "comment" > // mettre de c<> t<EFBFBD> ce qu'il y a devant la virgule< / span >
00545 $i = strlen($ti[0]); < span class = "comment" > // en controler la longueur< / span >
00546 $zonechiffres = < span class = "stringliteral" > "0000000,00"< / span > ;
00547 < span class = "keywordflow" > if< / span > ($i > 7)
00548 {
00549 $r = < span class = "stringliteral" > "< b> la cha<68> ne "< / span > .$zonein.< span class = "stringliteral" > " est trop longue (maxi = 9 millions,00)< /b> "< / span > ;
00550 < span class = "keywordflow" > return< / span > ($r);
00551 }
00552 $deb = 7 - $i;
00553 $zoneanaly = substr($zonechiffres,0,$deb).$zonein;
00554 }
00555 $M= substr($zoneanaly,0,1);
00556 < span class = "keywordflow" > if< / span > ($M != 0)
00557 { < span class = "comment" > // qui veut gagner des millions< / span >
00558 $r = $arr1_99[$M].< span class = "stringliteral" > " million"< / span > ;
00559 < span class = "keywordflow" > if< / span > ($M ==1) $r = $r.< span class = "stringliteral" > " "< / span > ;
00560 < span class = "keywordflow" > else< / span > $r = $r.< span class = "stringliteral" > "s "< / span > ;
00561 < span class = "keywordflow" > if< / span > (substr($zoneanaly,1,6)==0)
00562 {
00563 < span class = "keywordflow" > if< / span > ($devise == < span class = "charliteral" > 'F'< / span > ) $r = $r.< span class = "stringliteral" > " de "< / span > ;
00564 < span class = "keywordflow" > else< / span > $r = $r.< span class = "stringliteral" > "d'"< / span > ;
00565 }
00566 }
00567 $CM= substr($zoneanaly,1,1);
00568 < span class = "keywordflow" > if< / span > ($CM == 1)
00569 { < span class = "comment" > // qui veut gagner des centaines de mille< / span >
00570 $r = $r.< span class = "stringliteral" > " cent "< / span > ;
00571 }
00572 < span class = "keywordflow" > else< / span >
00573 { < span class = "comment" > // ya des centaines de mille< / span >
00574 < span class = "keywordflow" > if< / span > ($CM > 1)
00575 {
00576 $r = $r. $arr1_99[$CM].< span class = "stringliteral" > " cent "< / span > ;
00577 }
00578 } < span class = "comment" > // fin du else ya des centaines de mille< / span >
00579 $MM= substr($zoneanaly,2,2);
00580 < span class = "keywordflow" > if< / span > (substr($zoneanaly,2,1)==0){ $MM = substr($zoneanaly,3,1);} < span class = "comment" > // enlever le z<> ro des milliers cause indexation< / span >
00581 < span class = "keywordflow" > if< / span > ($MM ==0 & & $CM > 0)
00582 {
00583 $r = $r.< span class = "stringliteral" > "mille "< / span > ;
00584 }
00585 < span class = "keywordflow" > if< / span > ($MM != 0)
00586 {
00587 < span class = "keywordflow" > if< / span > ($MM == 80)
00588 {
00589 $r = $r.< span class = "stringliteral" > "quatre-vingt mille "< / span > ;
00590 }
00591 < span class = "keywordflow" > else< / span >
00592 {
00593 < span class = "keywordflow" > if< / span > ($MM > 1 )
00594 {
00595 $r = $r.$arr1_99[$MM].< span class = "stringliteral" > " mille "< / span > ;
00596 }
00597 < span class = "keywordflow" > else< / span >
00598 {
00599 < span class = "keywordflow" > if< / span > ($CM == 0) $r = $r.< span class = "stringliteral" > " mille "< / span > ;
00600 < span class = "keywordflow" > else< / span >
00601 {
00602 $r = $r.$arr1_99[$MM].< span class = "stringliteral" > " mille "< / span > ;
00603 }
00604 }
00605 }
00606 }
00607 $C2= substr($zoneanaly,5,2);
00608 < span class = "keywordflow" > if< / span > (substr($zoneanaly,5,1)==0){ $C2 = substr($zoneanaly,6,1);} < span class = "comment" > // enlever le z<> ro des centaines cause indexation< / span >
00609 $C1= substr($zoneanaly,4,1);
00610 < span class = "keywordflow" > if< / span > ($C2 ==0 & & $C1 > 1)
00611 {
00612 $r = $r.$arr1_99[$C1].< span class = "stringliteral" > " cents "< / span > ;
00613 }
00614 < span class = "keywordflow" > else< / span >
00615 {
00616 < span class = "keywordflow" > if< / span > ($C1 == 1) $r = $r.< span class = "stringliteral" > " cent "< / span > ;
00617 < span class = "keywordflow" > else< / span >
00618 {
00619 < span class = "keywordflow" > if< / span > ($C1 > 1) $r = $r.$arr1_99[$C1].< span class = "stringliteral" > " cent "< / span > ;
00620 }
00621 }
00622 < span class = "keywordflow" > if< / span > ($C2 != 0)
00623 {
00624 $r = $r.$arr1_99[$C2];
00625 }
00626 < span class = "keywordflow" > if< / span > ($virg !=0)
00627 {
00628 < span class = "keywordflow" > if< / span > ($ti[0] > 1) $r = $r. $unite_pluriel; < span class = "keywordflow" > else< / span > $r = < span class = "stringliteral" > "un "< / span > .$unite_singulier;
00629 }
00630 < span class = "keywordflow" > else< / span >
00631 {
00632 < span class = "keywordflow" > if< / span > ($zonein > 1) $r = $r.$unite_pluriel; < span class = "keywordflow" > else< / span > $r = < span class = "stringliteral" > "un "< / span > .$unite_singulier;
00633 }
00634 $UN= substr($zoneanaly,8,2);
00635 < span class = "keywordflow" > if< / span > ($UN != < span class = "stringliteral" > "00"< / span > )
00636 {
00637 $cts = $UN;
00638 < span class = "keywordflow" > if< / span > (substr($UN,0,1)==0){ $cts = substr($UN,1,1);} < span class = "comment" > // enlever le z<> ro des centimes cause indexation< / span >
00639 $r = $r.< span class = "stringliteral" > " et "< / span > . $arr1_99[$cts].$cent_singulier;
00640 < span class = "keywordflow" > if< / span > ($UN > 1) $r =$r.< span class = "stringliteral" > "s"< / span > ; < span class = "comment" > // accorde au pluriel< / span >
00641 }
00642 $r1 = ltrim($r); < span class = "comment" > // enleve quelques blancs possibles en d<> but de zone< / span >
00643 $r = ucfirst($r1); < span class = "comment" > // met le 1er caract<63> re en Majuscule, c'est + zoli< / span >
00644 < span class = "keywordflow" > return< / span > ($r); < span class = "comment" > // retourne le r<> sultat< / span >
00645 } < span class = "comment" > // fin fonction transcoS2L< / span >
2004-07-15 14:40:07 +02:00
00646
2004-07-16 00:17:39 +02:00
< a name = "l00658" > < / a > < a class = "code" href = "functions_8inc_8php.html#a26" > 00658< / a > function < a class = "code" href = "functions_8inc_8php.html#a26" > print_liste_field_titre< / a > ($name, $file, $field, $begin=< span class = "stringliteral" > ""< / span > , $options=< span class = "stringliteral" > ""< / span > )
00659 {
00660 global $conf;
00661
00662 print $name.< span class = "stringliteral" > "& nbsp;"< / span > ;
00663 print '< a href=< span class = "stringliteral" > "'.$file.'?sortfield='.$field.'& amp;sortorder=asc& amp;begin='.$begin.$options.'"< / span > > ';
00664 print '< img src=< span class = "stringliteral" > "'.DOL_URL_ROOT.'/theme/'.$conf-> theme.'/img/1downarrow.png"< / span > border=< span class = "stringliteral" > "0"< / span > alt=< span class = "stringliteral" > "A-Z"< / span > > < /a> ';
00665 print '< a href=< span class = "stringliteral" > "'.$file.'?sortfield='.$field.'& amp;sortorder=desc& amp;begin='.$begin.$options.'"< / span > > ';
00666 print '< img src=< span class = "stringliteral" > "'.DOL_URL_ROOT.'/theme/'.$conf-> theme.'/img/1uparrow.png"< / span > border=< span class = "stringliteral" > "0"< / span > alt=< span class = "stringliteral" > "Z-A"< / span > > < /a> ';
00667 }
00668
< a name = "l00684" > < / a > < a class = "code" href = "functions_8inc_8php.html#a27" > 00684< / a > function < a class = "code" href = "functions_8inc_8php.html#a27" > print_liste_field_titre_new< / a > ($name, $file, $field, $begin=< span class = "stringliteral" > ""< / span > , $options=< span class = "stringliteral" > ""< / span > , $td=< span class = "stringliteral" > ""< / span > , $sortfield=< span class = "stringliteral" > ""< / span > )
00685 {
00686 global $conf;
00687 < span class = "keywordflow" > if< / span > ($sortfield == $field)
00688 {
00689 print '< td < span class = "keyword" > class< / span > =< span class = "stringliteral" > "menusel"< / span > '. $td.< span class = "charliteral" > '> '< / span > ;
00690 }
00691 < span class = "keywordflow" > else< / span >
00692 {
00693 print '< td '. $td.< span class = "charliteral" > '> '< / span > ;
00694 }
00695 print $name.< span class = "stringliteral" > "& nbsp;"< / span > ;
00696 print '< a href=< span class = "stringliteral" > "'.$file.'?sortfield='.$field.'& amp;sortorder=asc& amp;begin='.$begin.$options.'"< / span > > ';
00697 print '< img src=< span class = "stringliteral" > "'.DOL_URL_ROOT.'/theme/'.$conf-> theme.'/img/1downarrow.png"< / span > border=< span class = "stringliteral" > "0"< / span > alt=< span class = "stringliteral" > "A-Z"< / span > > < /a> ';
00698 print '< a href=< span class = "stringliteral" > "'.$file.'?sortfield='.$field.'& amp;sortorder=desc& amp;begin='.$begin.$options.'"< / span > > ';
00699 print '< img src=< span class = "stringliteral" > "'.DOL_URL_ROOT.'/theme/'.$conf-> theme.'/img/1uparrow.png"< / span > border=< span class = "stringliteral" > "0"< / span > alt=< span class = "stringliteral" > "Z-A"< / span > > < /a> ';
00700 print < span class = "stringliteral" > "< /td> "< / span > ;
00701 }
00702
< a name = "l00708" > < / a > < a class = "code" href = "functions_8inc_8php.html#a28" > 00708< / a > function < a class = "code" href = "functions_8inc_8php.html#a28" > print_titre< / a > ($titre)
00709 {
00710 print '< div < span class = "keyword" > class< / span > =< span class = "stringliteral" > "titre"< / span > > '.$titre.'< /div> ';
00711 }
00712
< a name = "l00719" > < / a > < a class = "code" href = "functions_8inc_8php.html#a29" > 00719< / a > function < a class = "code" href = "functions_8inc_8php.html#a29" > print_fiche_titre< / a > ($titre, $mesg='')
00720 {
00721 print < span class = "stringliteral" > "\n"< / span > .'< table width=< span class = "stringliteral" > "100%"< / span > border=< span class = "stringliteral" > "0"< / span > cellpadding=< span class = "stringliteral" > "3"< / span > cellspacing=< span class = "stringliteral" > "0"< / span > > ';
00722 print '< tr> < td> < div < span class = "keyword" > class< / span > =< span class = "stringliteral" > "titre"< / span > valign=< span class = "stringliteral" > "middle"< / span > > '.$titre.'< /div> < /td> ';
00723 < span class = "keywordflow" > if< / span > (strlen($mesg))
2004-07-15 14:40:07 +02:00
00724 {
2004-07-16 00:17:39 +02:00
00725 print '< td align=< span class = "stringliteral" > "right"< / span > valign=< span class = "stringliteral" > "middle"< / span > > < b> '.$mesg.'< /b> < /td> ';
00726 }
00727 print '< /tr> < /table> '.< span class = "stringliteral" > "\n"< / span > ;
00728 }
00729
< a name = "l00735" > < / a > < a class = "code" href = "functions_8inc_8php.html#a30" > 00735< / a > function < a class = "code" href = "functions_8inc_8php.html#a30" > dol_delete_file< / a > ($file)
00736 {
00737 < span class = "keywordflow" > return< / span > unlink($file);
00738 }
00739
< a name = "l00744" > < / a > < a class = "code" href = "functions_8inc_8php.html#a31" > 00744< / a > function < a class = "code" href = "functions_8inc_8php.html#a31" > block_access< / a > ()
00745 {
00746 llxHeader();
00747 print < span class = "stringliteral" > "Acc<63> s refus<75> "< / span > ;
00748 llxFooter();
00749 }
00750
00751 < span class = "comment" > /*< / span >
00752 < span class = "comment" > *< / span >
00753 < span class = "comment" > *< / span >
00754 < span class = "comment" > */< / span >
00755
00756 function print_barre_liste($titre, $page, $file, $options='', $sortfield='', $sortorder='', $form='', $num=-1)
00757 {
00758 global $conf;
00759
00760 < span class = "keywordflow" > if< / span > ($num > $conf-> liste_limit or $num == -1)
00761 {
00762 $nextpage = 1;
00763 }
00764 < span class = "keywordflow" > else< / span >
00765 {
00766 $nextpage = 0;
00767 }
00768
00769 print '< table width=< span class = "stringliteral" > "100%"< / span > border=< span class = "stringliteral" > "0"< / span > cellpadding=< span class = "stringliteral" > "3"< / span > cellspacing=< span class = "stringliteral" > "0"< / span > > ';
00770
00771 < span class = "keywordflow" > if< / span > ($page > 0)
00772 {
00773 print '< tr> < td> < div < span class = "keyword" > class< / span > =< span class = "stringliteral" > "titre"< / span > > '.$titre.' - page '.($page+1).'< /div> < /td> ';
00774 }
00775 < span class = "keywordflow" > else< / span >
00776 {
00777 print '< tr> < td> < div < span class = "keyword" > class< / span > =< span class = "stringliteral" > "titre"< / span > > '.$titre.'< /div> < /td> ';
00778 }
00779
00780 < span class = "keywordflow" > if< / span > ($form)
00781 {
00782 print '< td align=< span class = "stringliteral" > "left"< / span > > '.$form.'< /td> ';
00783 }
00784
00785 print '< td align=< span class = "stringliteral" > "right"< / span > > ';
00786
00787 < span class = "keywordflow" > if< / span > (strlen($sortfield))
00788 {
00789 $options .= < span class = "stringliteral" > "& amp;sortfield=$sortfield"< / span > ;
00790 }
00791
00792 < span class = "keywordflow" > if< / span > (strlen($sortorder))
00793 {
00794 $options .= < span class = "stringliteral" > "& amp;sortorder=$sortorder"< / span > ;
00795 }
00796
00797 < span class = "comment" > // affichage des fleches de navigation< / span >
00798
00799 < a class = "code" href = "functions_8inc_8php.html#a33" > print_fleche_navigation< / a > ($page,$file,$options, $nextpage);
00800
00801 print '< /td> < /tr> < /table> ';
00802 }
00803
< a name = "l00812" > < / a > < a class = "code" href = "functions_8inc_8php.html#a33" > 00812< / a > function < a class = "code" href = "functions_8inc_8php.html#a33" > print_fleche_navigation< / a > ($page,$file,$options='', $nextpage)
00813 {
00814 global $conf;
00815 < span class = "keywordflow" > if< / span > ($page > 0)
00816 {
00817 print '< a href=< span class = "stringliteral" > "'.$file.'?page='.($page-1).$options.'"< / span > > < img alt=< span class = "stringliteral" > "Page pr<70> c<EFBFBD> dente"< / span > src=< span class = "stringliteral" > "'.DOL_URL_ROOT.'/theme/'.$conf-> theme.'/img/1leftarrow.png"< / span > border=< span class = "stringliteral" > "0"< / span > > < /a> ';
00818 }
00819
00820 < span class = "keywordflow" > if< / span > ($nextpage > 0)
00821 {
00822 print '< a href=< span class = "stringliteral" > "'.$file.'?page='.($page+1).$options.'"< / span > > < img alt=< span class = "stringliteral" > "Page suivante"< / span > src=< span class = "stringliteral" > "'.DOL_URL_ROOT.'/theme/'.$conf-> theme.'/img/1rightarrow.png"< / span > border=< span class = "stringliteral" > "0"< / span > > < /a> ';
00823 }
00824 }
00825
< a name = "l00832" > < / a > < a class = "code" href = "functions_8inc_8php.html#a34" > 00832< / a > function < a class = "code" href = "functions_8inc_8php.html#a34" > print_oui_non< / a > ($value)
00833 {
00834 < span class = "keywordflow" > if< / span > ($value)
00835 {
00836 print '< option value=< span class = "stringliteral" > "0"< / span > > non';
00837 print '< option value=< span class = "stringliteral" > "1"< / span > selected> oui';
00838 }
00839 < span class = "keywordflow" > else< / span >
00840 {
00841 print '< option value=< span class = "stringliteral" > "0"< / span > selected> non';
00842 print '< option value=< span class = "stringliteral" > "1"< / span > > oui';
00843 }
00844 }
00845
< a name = "l00852" > < / a > < a class = "code" href = "functions_8inc_8php.html#a35" > 00852< / a > function < a class = "code" href = "functions_8inc_8php.html#a35" > print_date_select< / a > ($set_time='')
00853 {
00854 < span class = "keywordflow" > if< / span > (! $set_time)
00855 {
00856 $set_time = time();
00857 }
00858
00859 $strmonth[1] = < span class = "stringliteral" > "Janvier"< / span > ;
00860 $strmonth[2] = < span class = "stringliteral" > "F& eacute;vrier"< / span > ;
00861 $strmonth[3] = < span class = "stringliteral" > "Mars"< / span > ;
00862 $strmonth[4] = < span class = "stringliteral" > "Avril"< / span > ;
00863 $strmonth[5] = < span class = "stringliteral" > "Mai"< / span > ;
00864 $strmonth[6] = < span class = "stringliteral" > "Juin"< / span > ;
00865 $strmonth[7] = < span class = "stringliteral" > "Juillet"< / span > ;
00866 $strmonth[8] = < span class = "stringliteral" > "Ao& ucirc;t"< / span > ;
00867 $strmonth[9] = < span class = "stringliteral" > "Septembre"< / span > ;
00868 $strmonth[10] = < span class = "stringliteral" > "Octobre"< / span > ;
00869 $strmonth[11] = < span class = "stringliteral" > "Novembre"< / span > ;
00870 $strmonth[12] = < span class = "stringliteral" > "D& eacute;cembre"< / span > ;
00871
00872 $smonth = 1; $endmonth = 12;
00873 $sday = 1; $endday = 31;
00874
00875 $cday = date(< span class = "stringliteral" > "d"< / span > , $set_time);
00876 $cmonth = date(< span class = "stringliteral" > "n"< / span > , $set_time);
00877 $syear = date(< span class = "stringliteral" > "Y"< / span > , $set_time);
00878
00879 print < span class = "stringliteral" > "< select name=\"reday\"> "< / span > ;
2004-07-15 14:40:07 +02:00
00880
2004-07-16 00:17:39 +02:00
00881 < span class = "keywordflow" > for< / span > ($day = 1 ; $day < = $endday ; $day++)
00882 {
00883 < span class = "keywordflow" > if< / span > ($day == $cday)
00884 {
00885 print < span class = "stringliteral" > "< option value=\"$day\" selected> $day"< / span > ;
00886 }
00887 < span class = "keywordflow" > else< / span >
00888 {
00889 print < span class = "stringliteral" > "< option value=\"$day\"> $day"< / span > ;
00890 }
00891 }
2004-07-15 14:40:07 +02:00
00892
2004-07-16 00:17:39 +02:00
00893 print < span class = "stringliteral" > "< /select> "< / span > ;
00894
00895
00896 print < span class = "stringliteral" > "< select name=\"remonth\"> "< / span > ;
00897 < span class = "keywordflow" > for< / span > ($month = $smonth ; $month < = $endmonth ; $month++)
00898 {
00899 < span class = "keywordflow" > if< / span > ($month == $cmonth)
00900 {
00901 print < span class = "stringliteral" > "< option value=\"$month\" selected> "< / span > . $strmonth[$month];
00902 }
00903 < span class = "keywordflow" > else< / span >
00904 {
00905 print < span class = "stringliteral" > "< option value=\"$month\"> "< / span > . $strmonth[$month];
00906 }
00907 }
00908 print < span class = "stringliteral" > "< /select> "< / span > ;
00909
00910 print < span class = "stringliteral" > "< select name=\"reyear\"> "< / span > ;
00911
00912 < span class = "keywordflow" > for< / span > ($year = $syear - 2; $year < $syear + 5 ; $year++)
00913 {
00914 < span class = "keywordflow" > if< / span > ($year == $syear)
00915 {
00916 print < span class = "stringliteral" > "< option value=\"$year\" SELECTED> $year"< / span > ;
00917 }
00918 < span class = "keywordflow" > else< / span >
00919 {
00920 print < span class = "stringliteral" > "< option value=\"$year\"> $year"< / span > ;
00921 }
00922 }
00923 print < span class = "stringliteral" > "< /select> \n"< / span > ;
00924
00925 }
< a name = "l00935" > < / a > < a class = "code" href = "functions_8inc_8php.html#a36" > 00935< / a > function < a class = "code" href = "functions_8inc_8php.html#a36" > print_heure_select< / a > ($prefix,$begin=1,$end=23) {
00936
00937 print '< select name=< span class = "stringliteral" > "'.$prefix.'hour"< / span > > ';
00938 < span class = "keywordflow" > for< / span > ($hour = $begin ; $hour < = $end ; $hour++) {
00939 print < span class = "stringliteral" > "< option value=\"$hour\"> $hour"< / span > ;
00940 }
00941 print < span class = "stringliteral" > "< /select> & nbsp;H& nbsp;"< / span > ;
00942 print '< select name=< span class = "stringliteral" > "'.$prefix.'min"< / span > > ';
00943 < span class = "keywordflow" > for< / span > ($min = 0 ; $min < 60 ; $min=$min+5) {
00944 < span class = "keywordflow" > if< / span > ($min < 10) {
00945 $min = < span class = "stringliteral" > "0"< / span > . $min;
00946 }
00947 print < span class = "stringliteral" > "< option value=\"$min\"> $min"< / span > ;
00948 }
00949 print < span class = "stringliteral" > "< /select> \n"< / span > ;
00950 }
00951
< a name = "l00957" > < / a > < a class = "code" href = "functions_8inc_8php.html#a37" > 00957< / a > function < a class = "code" href = "functions_8inc_8php.html#a37" > print_duree_select< / a > ($prefix)
00958 {
00959 print '< select name=< span class = "stringliteral" > "'.$prefix.'hour"< / span > > ';
00960 print < span class = "stringliteral" > "< option value=\"0\"> 0"< / span > ;
00961 print < span class = "stringliteral" > "< option value=\"1\" SELECTED> 1"< / span > ;
00962
00963 < span class = "keywordflow" > for< / span > ($hour = 2 ; $hour < 13 ; $hour++)
00964 {
00965 print < span class = "stringliteral" > "< option value=\"$hour\"> $hour"< / span > ;
00966 }
00967 print < span class = "stringliteral" > "< /select> & nbsp;H& nbsp;"< / span > ;
00968 print '< select name=< span class = "stringliteral" > "'.$prefix.'min"< / span > > ';
00969 < span class = "keywordflow" > for< / span > ($min = 0 ; $min < 55 ; $min=$min+5)
00970 {
00971 print < span class = "stringliteral" > "< option value=\"$min\"> $min"< / span > ;
00972 }
00973 print < span class = "stringliteral" > "< /select> \n"< / span > ;
00974 }
00975
< a name = "l00985" > < / a > < a class = "code" href = "functions_8inc_8php.html#a38" > 00985< / a > function < a class = "code" href = "functions_8inc_8php.html#a38" > price< / a > ($amount, $html=0)
00986 {
00987 < span class = "keywordflow" > if< / span > ($html)
00988 {
00989
00990 $dec=< span class = "charliteral" > '.'< / span > ; $thousand=< span class = "charliteral" > ' '< / span > ;
00991 < span class = "keywordflow" > return< / span > ereg_replace(< span class = "charliteral" > ' '< / span > ,'& nbsp;',number_format($amount, 2, $dec, $thousand));
00992
00993 }
00994 < span class = "keywordflow" > else< / span >
00995 {
00996 < span class = "keywordflow" > return< / span > number_format($amount, 2, < span class = "charliteral" > '.'< / span > , < span class = "charliteral" > ' '< / span > );
00997 }
00998
00999 }
01000
< a name = "l01007" > < / a > < a class = "code" href = "functions_8inc_8php.html#a39" > 01007< / a > function < a class = "code" href = "functions_8inc_8php.html#a39" > francs< / a > ($euros)
01008 {
01009 < span class = "keywordflow" > return< / span > < a class = "code" href = "functions_8inc_8php.html#a38" > price< / a > ($euros * 6.55957);
01010 }
01011
< a name = "l01018" > < / a > < a class = "code" href = "functions_8inc_8php.html#a40" > 01018< / a > function < a class = "code" href = "functions_8inc_8php.html#a40" > tva< / a > ($euros, $taux=19.6)
01019 {
01020 $taux = $taux / 100 ;
01021
01022 < span class = "keywordflow" > return< / span > sprintf(< span class = "stringliteral" > "%01.2f"< / span > ,($euros * $taux));
01023 }
01024
< a name = "l01031" > < / a > < a class = "code" href = "functions_8inc_8php.html#a41" > 01031< / a > function < a class = "code" href = "functions_8inc_8php.html#a41" > inctva< / a > ($euros, $taux=1.196)
01032 {
01033 < span class = "keywordflow" > return< / span > sprintf(< span class = "stringliteral" > "%01.2f"< / span > ,($euros * $taux));
01034 }
01035
< a name = "l01046" > < / a > < a class = "code" href = "functions_8inc_8php.html#a42" > 01046< / a > function < a class = "code" href = "functions_8inc_8php.html#a42" > stat_print< / a > ($basename,$bc1,$bc2,$ftc, $jour) {
01047
01048 $db = pg_Connect(< span class = "stringliteral" > ""< / span > ,< span class = "stringliteral" > ""< / span > ,< span class = "stringliteral" > ""< / span > ,< span class = "stringliteral" > ""< / span > ,< span class = "stringliteral" > "$basename"< / span > );
01049 < span class = "keywordflow" > if< / span > (!$db) {
01050 echo < span class = "stringliteral" > "Pas de connexion a la base\n"< / span > ;
01051 exit ;
01052 }
01053
01054 $offset = $jour * 9;
01055
01056 $sql=< span class = "stringliteral" > "SELECT s.date, s.nb, l.libelle FROM stat_base as s, stat_cat as l WHERE s.cat = l.id ORDER by s.date DESC, s.cat ASC LIMIT 9 OFFSET $offset"< / span > ;
01057
01058 $result = $db-> query($sql);
01059 < span class = "keywordflow" > if< / span > (!$result) {
01060 print < span class = "stringliteral" > "Erreur SELECT< br> < h1> $sql< /h1> < br> "< / span > ;
01061 < span class = "keywordflow" > return< / span > 1;
01062 }
01063
01064 print < span class = "stringliteral" > "< table border=1 cellspacing=0 cellpadding=2> "< / span > ;
01065 print < span class = "stringliteral" > "< tr> < td> < font color=\"white\"> base < b> $basename< /b> < /font> < /td> "< / span > ;
01066 print < span class = "stringliteral" > "< td> < font color=\"white\"> libelle< /font> < /td> "< / span > ;
01067 print < span class = "stringliteral" > "< /tr> "< / span > ;
01068
01069 $num = $db-> num_rows();
01070 $i = 0;
01071
01072 $tag = 1;
01073 < span class = "keywordflow" > while< / span > ( $i < $num) {
01074 $obj = $db-> fetch_object( $i);
01075
01076 $tag = !$tag;
01077
01078 print < span class = "stringliteral" > "< TR> < TD> $obj-> date< /TD> < TD> $obj-> libelle< /TD> \n"< / span > ;
01079 print < span class = "stringliteral" > "< TD align=\"center\"> $obj-> nb< /TD> < /TR> \n"< / span > ;
01080 $i++;
01081 }
01082 print < span class = "stringliteral" > "< /TABLE> "< / span > ;
01083 $db-> free();
01084
01085 $db-> close();
01086
01087 }
01088
01089 function tab_count($basename,$bc1,$bc2,$ftc) {
2004-07-15 14:40:07 +02:00
01090
2004-07-16 00:17:39 +02:00
01091 $db = pg_Connect(< span class = "stringliteral" > ""< / span > ,< span class = "stringliteral" > ""< / span > ,< span class = "stringliteral" > ""< / span > ,< span class = "stringliteral" > ""< / span > ,< span class = "stringliteral" > "$basename"< / span > );
01092 < span class = "keywordflow" > if< / span > (!$db) {
01093 echo < span class = "stringliteral" > "Pas de connexion a la base\n"< / span > ;
01094 exit ;
01095 }
01096
01097 $sql=< span class = "stringliteral" > "SELECT count(*) AS nbcv from candidat WHERE active=1"< / span > ;
01098 $result = $db-> query($sql);
01099 < span class = "keywordflow" > if< / span > (!$result) {
01100 print < span class = "stringliteral" > "Erreur SELECT< br> < h1> $sql< /h1> < br> "< / span > ;
01101 < span class = "keywordflow" > return< / span > 1;
01102 }
01103 print < span class = "stringliteral" > "< table border=0 bgcolor=black cellspacing=0 cellpadding=0> < tr> < td> "< / span > ;
01104
01105 print < span class = "stringliteral" > "< table border=0 cellspacing=1 cellpadding=1> "< / span > ;
01106 print < span class = "stringliteral" > "< tr> < td> < font color=\"white\"> base < b> $basename< /b> < /font> < /td> "< / span > ;
01107 print < span class = "stringliteral" > "< td> < font color=\"white\"> libelle< /font> < /td> "< / span > ;
01108 print < span class = "stringliteral" > "< /tr> "< / span > ;
01109 $nbcv = $db-> result( $i, < span class = "stringliteral" > "nbcv"< / span > );
01110
01111 print < span class = "stringliteral" > "< tr $bc1> < td> < b> $ftc Nombre de CV< /font> < /b> < /td> \n"< / span > ;
01112 print < span class = "stringliteral" > "< td align=\"center\"> $ftc $nbcv< /td> \n"< / span > ;
01113 print < span class = "stringliteral" > "< /tr> \n"< / span > ;
01114 $db-> free();
01115
01116 $sql=< span class = "stringliteral" > "SELECT count(*) AS nbcv from offre WHERE active=1"< / span > ;
01117
01118 $result = $db-> query($sql);
01119 < span class = "keywordflow" > if< / span > (!$result) {
01120 print < span class = "stringliteral" > "Erreur SELECT< br> < h1> $sql< /h1> < br> "< / span > ;
01121 }
01122 $nbcv = $db-> result( $i, < span class = "stringliteral" > "nbcv"< / span > );
01123
01124 print < span class = "stringliteral" > "< tr $bc2> < td> < b> $ftc Nombre d'offre< /font> < /b> < /td> "< / span > ;
01125 print < span class = "stringliteral" > "< td align=\"center\"> $ftc $nbcv< /td> "< / span > ;
01126 print < span class = "stringliteral" > "< /tr> "< / span > ;
01127
01128 $db-> free();
01129
01130
01131 $sql=< span class = "stringliteral" > "SELECT count(*) AS nbcv from candidat WHERE active=0"< / span > ;
01132
01133 $result = $db-> query($sql);
01134 < span class = "keywordflow" > if< / span > (!$result) {
01135 print < span class = "stringliteral" > "Erreur SELECT< br> < h1> $sql< /h1> < br> "< / span > ;
01136 }
01137
01138 $nbcv = $db-> result( $i, < span class = "stringliteral" > "nbcv"< / span > );
01139
01140 print < span class = "stringliteral" > "< tr $bc1> < td> < b> $ftc Nombre de CV inactifs< /font> < /b> < /td> \n"< / span > ;
01141 print < span class = "stringliteral" > "< td align=\"center\"> $ftc $nbcv< /td> "< / span > ;
01142 print < span class = "stringliteral" > "< /tr> "< / span > ;
01143
01144 $db-> free();
01145
01146
01147 $sql=< span class = "stringliteral" > "SELECT count(*) AS nbcv from offre WHERE active=0"< / span > ;
01148
01149 $result = $db-> query($sql);
01150 < span class = "keywordflow" > if< / span > (!$result) {
01151 print < span class = "stringliteral" > "Erreur SELECT< br> < h1> $sql< /h1> < br> "< / span > ;
01152 }
01153
01154 $nbcv = $db-> result( $i, < span class = "stringliteral" > "nbcv"< / span > );
01155
01156 print < span class = "stringliteral" > "< tr $bc2> < td> < b> $ftc Nombre d'offres inactives< /font> < /b> < /td> \n"< / span > ;
01157 print < span class = "stringliteral" > "< td align=\"center\"> $ftc $nbcv< /td> \n"< / span > ;
01158 print < span class = "stringliteral" > "< /tr> \n"< / span > ;
01159
01160 $db-> free();
01161
01162 $sql=< span class = "stringliteral" > "SELECT count(*) AS nbsoc from logsoc"< / span > ;
01163
01164 $result = $db-> query($sql);
01165 < span class = "keywordflow" > if< / span > (!$result) {
01166 print < span class = "stringliteral" > "Erreur SELECT< br> < h1> $sql< /h1> < br> "< / span > ;
01167 }
01168
01169 $nbsoc = $db-> result( $i, < span class = "stringliteral" > "nbsoc"< / span > );
01170
01171 print < span class = "stringliteral" > "< tr $bc1> < td> < b> $ftc Nombre de logins societes< /font> < /b> < /td> \n"< / span > ;
01172 print < span class = "stringliteral" > "< td align=\"center\"> $ftc $nbsoc< /td> "< / span > ;
01173 print < span class = "stringliteral" > "< /tr> "< / span > ;
01174
01175 print < span class = "stringliteral" > "< /td> < /tr> < /table> < /td> < /tr> < /table> "< / span > ;
01176
01177 $db-> close();
01178
01179 }
01180
< a name = "l01188" > < / a > < a class = "code" href = "functions_8inc_8php.html#a44" > 01188< / a > function < a class = "code" href = "functions_8inc_8php.html#a44" > logfile< / a > ($str,$log=< span class = "stringliteral" > "/var/log/dolibarr/dolibarr.log"< / span > )
01189 {
01190 < span class = "keywordflow" > if< / span > (defined(< span class = "stringliteral" > "MAIN_DEBUG"< / span > ) & & MAIN_DEBUG ==1)
01191 {
01192 < span class = "keywordflow" > if< / span > (!file_exists($log))
01193 {
01194 < span class = "keywordflow" > if< / span > (!$file=fopen($log,< span class = "stringliteral" > "w"< / span > ))
01195 {
01196 < span class = "keywordflow" > return< / span > 0;
01197 }
01198 }
01199 < span class = "keywordflow" > else< / span >
01200 {
01201 < span class = "keywordflow" > if< / span > (!$file=fopen($log,< span class = "stringliteral" > "a+"< / span > ))
01202 {
01203 < span class = "keywordflow" > return< / span > 0;
01204 }
01205 }
01206 $logentry=date(< span class = "stringliteral" > "[d/M/Y:H:i:s] "< / span > ).$str.< span class = "stringliteral" > "\n"< / span > ;
01207 < span class = "keywordflow" > if< / span > (!fwrite($file,$logentry)) {
01208 fclose($file);
01209 < span class = "keywordflow" > return< / span > 0;
01210 }
01211 fclose($file);
01212 < span class = "keywordflow" > return< / span > 1;
01213 }
01214 }
01215
< a name = "l01224" > < / a > < a class = "code" href = "functions_8inc_8php.html#a45" > 01224< / a > function < a class = "code" href = "functions_8inc_8php.html#a45" > creer_pass_aleatoire< / a > ($longueur = 8, $sel = < span class = "stringliteral" > ""< / span > ) {
01225 $seed = (< span class = "keywordtype" > double< / span > ) (microtime() + 1) * time();
01226 srand($seed);
01227
01228 < span class = "keywordflow" > for< / span > ($i = 0; $i < $longueur; $i++) {
01229 < span class = "keywordflow" > if< / span > (!$s) {
01230 < span class = "keywordflow" > if< / span > (!$s) $s = rand();
01231 $s = substr(md5(uniqid($s).$sel), 0, 16);
01232 }
01233 $r = unpack(< span class = "stringliteral" > "Cr"< / span > , pack(< span class = "stringliteral" > "H2"< / span > , $s.$s));
01234 $x = $r[< span class = "charliteral" > 'r'< / span > ] & 63;
01235 < span class = "keywordflow" > if< / span > ($x < 10) $x = chr($x + 48);
01236 < span class = "keywordflow" > else< / span > < span class = "keywordflow" > if< / span > ($x < 36) $x = chr($x + 55);
01237 < span class = "keywordflow" > else< / span > < span class = "keywordflow" > if< / span > ($x < 62) $x = chr($x + 61);
01238 < span class = "keywordflow" > else< / span > < span class = "keywordflow" > if< / span > ($x == 63) $x = < span class = "charliteral" > '/'< / span > ;
01239 < span class = "keywordflow" > else< / span > $x = < span class = "charliteral" > '.'< / span > ;
01240 $pass .= $x;
01241 $s = substr($s, 2);
01242 }
01243 < span class = "keywordflow" > return< / span > $pass;
01244 }
01245
< a name = "l01251" > < / a > < a class = "code" href = "functions_8inc_8php.html#a46" > 01251< / a > function < a class = "code" href = "functions_8inc_8php.html#a46" > initialiser_sel< / a > () {
01252 global $htsalt;
01253
01254 $htsalt = '$1$'.creer_pass_aleatoire();
01255 }
01256
01257 ?>
2004-07-16 08:41:58 +02:00
< / div > < / pre > < hr size = "1" > < address style = "align: right;" > < small > G<EFBFBD> n<EFBFBD> r<EFBFBD> le Fri Jul 16 08:51:51 2004 pour dolibarr par
2004-07-15 14:40:07 +02:00
< a href = "http://www.doxygen.org/index.html" >
< img src = "doxygen.png" alt = "doxygen" align = "middle" border = 0 > < / a > 1.3.7 < / small > < / address >
< / body >
< / html >
