New: Gestion des triggers sur la cration, modification et suppression de socits
This commit is contained in:
Laurent Destailleur
parent
bf4bdd5ef6
commit
9460f44724
119
htdocs/includes/triggers/interface_demo.class.php
Normal file
119
htdocs/includes/triggers/interface_demo.class.php
Normal file
@ -0,0 +1,119 @@
|
||||
<?php
|
||||
/* Copyright (C) 2005 Laurent Destailleur <eldy@users.sourceforge.net>
|
||||
*
|
||||
* This program is free software; you can redistribute it and/or modify
|
||||
* it under the terms of the GNU General Public License as published by
|
||||
* the Free Software Foundation; either version 2 of the License, or
|
||||
* (at your option) any later version.
|
||||
*
|
||||
* This program is distributed in the hope that it will be useful,
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
* GNU General Public License for more details.
|
||||
*
|
||||
* You should have received a copy of the GNU General Public License
|
||||
* along with this program; if not, write to the Free Software
|
||||
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
||||
*
|
||||
* $Id$
|
||||
* $Source$
|
||||
*
|
||||
*/
|
||||
|
||||
/**
|
||||
\file htdocs/includes/triggers/interface_demo.class.php
|
||||
\ingroup core
|
||||
\brief Fichier des actions de demo de workflow
|
||||
\remarks Son propre fichier d'actions peut etre créés par recopie de celui-ci:
|
||||
- Le nom du fichier doit etre interface_xxx.class.php
|
||||
- Le fichier doit rester stocké dans includes/modules/triggers
|
||||
- Le nom de la classe doit etre InterfaceXxx
|
||||
*/
|
||||
|
||||
|
||||
/**
|
||||
\class interface_demo
|
||||
\brief Classe de la fonction trigger des actions de workflow
|
||||
*/
|
||||
|
||||
class InterfaceDemo
|
||||
{
|
||||
|
||||
/**
|
||||
* \brief Constructeur.
|
||||
* \param DB handler d'accès base
|
||||
*/
|
||||
function InterfaceDemo($DB)
|
||||
{
|
||||
$this->db = $DB ;
|
||||
}
|
||||
|
||||
/**
|
||||
* \brief Fonction appelée lors du déclenchement d'un évènement Dolibarr.
|
||||
* D'autres fonctions run_trigger peuvent etre présentes dans includes/triggers
|
||||
* \param action Code de l'evenement
|
||||
* \param object Objet concerné
|
||||
* \param user Objet user
|
||||
* \param lang Objet lang
|
||||
* \param conf Objet conf
|
||||
*/
|
||||
function run_trigger($action,$object,$user,$lang,$conf)
|
||||
{
|
||||
// Mettre ici le code à exécuter en réaction de l'action
|
||||
// Les données de l'action sont stockées dans $object
|
||||
if ($action == 'COMPANY_CREATE')
|
||||
{
|
||||
dolibarr_syslog("Trigger for action '$action' launched. id=".$object->id);
|
||||
}
|
||||
elseif ($action == 'COMPANY_MODIFY')
|
||||
{
|
||||
dolibarr_syslog("Trigger for action '$action' launched. id=".$object->id);
|
||||
}
|
||||
elseif ($action == 'COMPANY_DELETE')
|
||||
{
|
||||
dolibarr_syslog("Trigger for action '$action' launched. id=".$object->id);
|
||||
}
|
||||
elseif ($action == 'BILL_CREATE')
|
||||
{
|
||||
dolibarr_syslog("Trigger for action '$action' launched");
|
||||
}
|
||||
elseif ($action == 'BILL_MODIFY')
|
||||
{
|
||||
dolibarr_syslog("Trigger for action '$action' launched");
|
||||
}
|
||||
elseif ($action == 'BILL_DELETE')
|
||||
{
|
||||
dolibarr_syslog("Trigger for action '$action' launched");
|
||||
}
|
||||
elseif ($action == 'PRODUCT_CREATE')
|
||||
{
|
||||
dolibarr_syslog("Trigger for action '$action' launched");
|
||||
}
|
||||
elseif ($action == 'PRODUCT_MODIFY')
|
||||
{
|
||||
dolibarr_syslog("Trigger for action '$action' launched");
|
||||
}
|
||||
elseif ($action == 'PRODUCT_DELETE')
|
||||
{
|
||||
dolibarr_syslog("Trigger for action '$action' launched");
|
||||
}
|
||||
elseif ($action == 'ORDER_CREATE')
|
||||
{
|
||||
dolibarr_syslog("Trigger for action '$action' launched");
|
||||
}
|
||||
elseif ($action == 'ORDER_MODIFY')
|
||||
{
|
||||
dolibarr_syslog("Trigger for action '$action' launched");
|
||||
}
|
||||
elseif ($action == 'ORDER_DELETE')
|
||||
{
|
||||
dolibarr_syslog("Trigger for action '$action' launched");
|
||||
}
|
||||
else
|
||||
{
|
||||
dolibarr_syslog("A trigger for action '$action' was ran but no handler found.");
|
||||
}
|
||||
}
|
||||
|
||||
}
|
||||
?>
|
||||
95
htdocs/interfaces.class.php
Normal file
95
htdocs/interfaces.class.php
Normal file
@ -0,0 +1,95 @@
|
||||
<?php
|
||||
/* Copyright (C) 2005 Laurent Destailleur <eldy@users.sourceforge.net>
|
||||
*
|
||||
* This program is free software; you can redistribute it and/or modify
|
||||
* it under the terms of the GNU General Public License as published by
|
||||
* the Free Software Foundation; either version 2 of the License, or
|
||||
* (at your option) any later version.
|
||||
*
|
||||
* This program is distributed in the hope that it will be useful,
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
* GNU General Public License for more details.
|
||||
*
|
||||
* You should have received a copy of the GNU General Public License
|
||||
* along with this program; if not, write to the Free Software
|
||||
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
||||
*
|
||||
* $Id$
|
||||
* $Source$
|
||||
*
|
||||
*/
|
||||
|
||||
/**
|
||||
\file htdocs/interfaces.class.php
|
||||
\ingroup core
|
||||
\brief Fichier de la classe de gestion des triggers
|
||||
*/
|
||||
|
||||
|
||||
/**
|
||||
\class Interfaces
|
||||
\brief Classe de la gestion des triggers
|
||||
*/
|
||||
|
||||
class Interfaces
|
||||
{
|
||||
var $dir;
|
||||
|
||||
/**
|
||||
* \brief Constructeur.
|
||||
* \param DB handler d'accès base
|
||||
*/
|
||||
function Interfaces($DB)
|
||||
{
|
||||
$this->db = $DB ;
|
||||
$this->dir = DOL_DOCUMENT_ROOT . "/includes/triggers";
|
||||
}
|
||||
|
||||
/**
|
||||
* \brief Fonction appelée lors du déclenchement d'un évènement Dolibarr.
|
||||
* Cette fonction déclenche tous les triggers trouvés
|
||||
* \param action Code de l'evenement
|
||||
* \param object Objet concern
|
||||
* \param user Objet user
|
||||
* \param lang Objet lang
|
||||
* \param conf Objet conf
|
||||
* \return int Nbre de triggers déclenchés si pas d'erreurs. Nb en erreur sinon.
|
||||
*/
|
||||
function run_triggers($action,$object,$user,$lang,$conf)
|
||||
{
|
||||
|
||||
$handle=opendir($this->dir);
|
||||
$modules = array();
|
||||
$nbok = $nbko = 0;
|
||||
|
||||
while (($file = readdir($handle))!==false)
|
||||
{
|
||||
if (is_readable($this->dir."/".$file) && eregi('interface_(.*).class.php',$file,$reg))
|
||||
{
|
||||
$modName = "Interface".ucfirst($reg[1]);
|
||||
//print "file=$file"; print "modName=$modName"; exit;
|
||||
if ($modName)
|
||||
{
|
||||
include_once($this->dir."/".$file);
|
||||
$objMod = new $modName($db);
|
||||
if ($objMod)
|
||||
{
|
||||
if ($objMod->run_trigger($action,$object,$user,$lang,$conf) > 0)
|
||||
{
|
||||
$nbok++;
|
||||
}
|
||||
else
|
||||
{
|
||||
$nbko++;
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
if ($nbko) return $nbko;
|
||||
return $nbok;
|
||||
}
|
||||
|
||||
}
|
||||
?>
|
||||
@ -106,67 +106,74 @@ class Societe {
|
||||
* \return 0 si ok, < 0 si erreur
|
||||
*/
|
||||
|
||||
function create($user='')
|
||||
{
|
||||
global $langs;
|
||||
function create($user='')
|
||||
{
|
||||
global $langs,$conf;
|
||||
|
||||
$this->nom=trim($this->nom);
|
||||
$this->nom=trim($this->nom);
|
||||
|
||||
$this->db->begin();
|
||||
|
||||
$result = $this->verify();
|
||||
$this->db->begin();
|
||||
|
||||
if ($result >= 0)
|
||||
{
|
||||
$sql = "INSERT INTO ".MAIN_DB_PREFIX."societe (nom, datec, datea, fk_user_creat) ";
|
||||
$sql .= " VALUES ('".addslashes($this->nom)."', now(), now(), '".$user->id."')";
|
||||
|
||||
$result=$this->db->query($sql);
|
||||
if ($result)
|
||||
{
|
||||
$this->id = $this->db->last_insert_id(MAIN_DB_PREFIX."societe");
|
||||
|
||||
$this->creation_bit = 1;
|
||||
|
||||
$ret = $this->update($this->id);
|
||||
|
||||
if ($ret == 0)
|
||||
{
|
||||
$this->db->commit();
|
||||
}
|
||||
else
|
||||
{
|
||||
dolibarr_syslog("Societe::create echec update");
|
||||
$this->db->rollback();
|
||||
return -3;
|
||||
}
|
||||
|
||||
return $ret;
|
||||
}
|
||||
else
|
||||
|
||||
{
|
||||
if ($this->db->errno() == DB_ERROR_RECORD_ALREADY_EXISTS)
|
||||
{
|
||||
|
||||
$this->error=$langs->trans("ErrorCompanyNameAlreadyExists",$this->nom);
|
||||
}
|
||||
$result = $this->verify();
|
||||
|
||||
if ($result >= 0)
|
||||
{
|
||||
$sql = "INSERT INTO ".MAIN_DB_PREFIX."societe (nom, datec, datea, fk_user_creat) ";
|
||||
$sql .= " VALUES ('".addslashes($this->nom)."', now(), now(), '".$user->id."')";
|
||||
|
||||
$result=$this->db->query($sql);
|
||||
if ($result)
|
||||
{
|
||||
$this->id = $this->db->last_insert_id(MAIN_DB_PREFIX."societe");
|
||||
|
||||
$this->creation_bit = 1;
|
||||
|
||||
$ret = $this->update($this->id);
|
||||
|
||||
if ($ret == 0)
|
||||
{
|
||||
// Appel des triggers
|
||||
include_once(DOL_DOCUMENT_ROOT . "/interfaces.class.php");
|
||||
$interface=new Interfaces($this->db);
|
||||
$interface->run_triggers('COMPANY_CREATE',$this,$user,$lang,$conf);
|
||||
// Fin appel triggers
|
||||
|
||||
dolibarr_syslog("Societe::Create success id=".$this->id);
|
||||
$this->db->commit();
|
||||
}
|
||||
else
|
||||
{
|
||||
dolibarr_syslog("Societe::Create echec update");
|
||||
$this->db->rollback();
|
||||
return -3;
|
||||
}
|
||||
|
||||
return $ret;
|
||||
}
|
||||
else
|
||||
{
|
||||
dolibarr_syslog("Societe::create echec insert sql=$sql");
|
||||
}
|
||||
|
||||
{
|
||||
if ($this->db->errno() == DB_ERROR_RECORD_ALREADY_EXISTS)
|
||||
{
|
||||
|
||||
$this->error=$langs->trans("ErrorCompanyNameAlreadyExists",$this->nom);
|
||||
}
|
||||
else
|
||||
{
|
||||
dolibarr_syslog("Societe::Create echec insert sql=$sql");
|
||||
}
|
||||
$this->db->rollback();
|
||||
return -2;
|
||||
}
|
||||
|
||||
}
|
||||
else
|
||||
{
|
||||
$this->db->rollback();
|
||||
return -2;
|
||||
}
|
||||
|
||||
}
|
||||
else
|
||||
{
|
||||
$this->db->rollback();
|
||||
dolibarr_syslog("Societe::Create echec verify sql=$sql");
|
||||
return -1;
|
||||
}
|
||||
}
|
||||
dolibarr_syslog("Societe::Create echec verify sql=$sql");
|
||||
return -1;
|
||||
}
|
||||
}
|
||||
|
||||
/**
|
||||
* \brief Verification lors de la modification
|
||||
@ -230,6 +237,7 @@ class Societe {
|
||||
|
||||
dolibarr_syslog("Societe::Update");
|
||||
|
||||
$this->id=$id;
|
||||
$this->capital=trim($this->capital);
|
||||
$this->nom=trim($this->nom);
|
||||
$this->adresse=trim($this->adresse);
|
||||
@ -354,6 +362,12 @@ class Societe {
|
||||
|
||||
if ($this->db->query($sql))
|
||||
{
|
||||
// Appel des triggers
|
||||
include_once(DOL_DOCUMENT_ROOT . "/interfaces.class.php");
|
||||
$interface=new Interfaces($this->db);
|
||||
$interface->run_triggers('COMPANY_MODIFY',$this,$user,$lang,$conf);
|
||||
// Fin appel triggers
|
||||
|
||||
$result = 0;
|
||||
}
|
||||
else
|
||||
@ -564,6 +578,12 @@ class Societe {
|
||||
|
||||
if ($sqr == 3)
|
||||
{
|
||||
// Appel des triggers
|
||||
include_once(DOL_DOCUMENT_ROOT . "/interfaces.class.php");
|
||||
$interface=new Interfaces($this->db);
|
||||
$interface->run_triggers('COMPANY_DELETE',$this,$user,$lang,$conf);
|
||||
// Fin appel triggers
|
||||
|
||||
$this->db->commit();
|
||||
|
||||
// Suppression du répertoire document
|
||||
|
||||
Loading…
Reference in New Issue
Block a user