| New file |
|---|
| 0,0 → 1,82 |
|---|
| <?php |
| // ATTENTION ! Classe compatible uniquement avec nouveau format de bdd du cel // |
| |
| /** |
| * PHP Version 5 |
| * |
| * @category PHP |
| * @package papyrus_bp |
| * @author David Delon <delon@tela-botanica.org> |
| * @copyright 2010 Tela-Botanica |
| * @license http://www.cecill.info/licences/Licence_CeCILL_V2-fr.txt Licence CECILL |
| * @version SVN: <svn_id> |
| * @link /doc/ |
| */ |
| |
| /** |
| * |
| * Utilitaire mise a jour enregistrement inventaire |
| * A voir avec David mais ne devrait plus être utilisé |
| * |
| */ |
| class InventoryCheck extends Cel { |
| |
| function getRessource(){ |
| |
| return; |
| |
| $requete_obs ="SELECT id_observation, zone_geo, ce_zone_geo, date_observation, ce_utilisateur, courriel_utilisateur FROM cel_obs"; |
| |
| $resultat_obs = Cel::db()->requeter($requete_obs); |
| |
| $observations = array(); |
| if (is_array($resultat_obs)) { |
| $observations = $resultat_obs; |
| } |
| |
| foreach ($observations as $obs) { |
| |
| if ($obs['ce_zone_geo']!="000null") { |
| $requete_lieu = "select * from cel_zones_geo where nom = '".mysql_escape_string($obs['zone_geo'])."' and id_zone_geo='".mysql_escape_string($obs['ce_zone_geo'])."' limit 1"; |
| } |
| else { |
| $requete_lieu = "select * from cel_zones_geo where name = '".mysql_escape_string($obs['zone_geo'])."' limit 1"; |
| } |
| |
| $res_loc = Cel::db()->requeter($requete_lieu); |
| |
| if (is_array($res_loc) && count($res_loc) > 0) { |
| |
| print $obs['id_observation']; |
| print " "; |
| print $obs['mail_utilisateur']; |
| print " : "; |
| print $obs['zone_geo']; |
| print " - "; |
| print $obs['ce_zone_geo']; |
| print " - "; |
| $lk="http://www.tela-botanica.org/cel/jrest/util/cel_inventory.php?PME_sys_fl=0&PME_sys_fm=0&PME_sys_sfn[0]=0&PME_sys_operation=PME_op_Change&PME_sys_rec=".$obs['id_observation']; |
| $link_desc=' <a href="'.$lk.'">Correction</a>'; |
| print $link_desc; |
| print "<br>"; |
| |
| } |
| } |
| } |
| } |
| |
| /* +--Fin du code ---------------------------------------------------------------------------------------+ |
| * $Log$ |
| * Revision 1.2 2008-01-30 08:57:28 ddelon |
| * fin mise en place mygwt |
| * |
| * Revision 1.1 2007-06-06 13:31:16 ddelon |
| * v0.09 |
| * |
| * Revision 1.3 2007-05-22 12:54:09 ddelon |
| * Securisation acces utilisateur |
| * |
| * |
| * |
| */ |
| ?> |
| Property changes: |
|---|
| Added: svn:executable |
|---|
| +* |
|---|
| \ No newline at end of property |
|---|