Works on workflow

htdocs/business/inc/triggers/interface_modBusiness_BusinessWorkflow.class.php

@@ -0,0 +1,145 @@
+<?php
+/* Copyright (C) 2010  Regis Houssin     <regis@dolibarr.fr>
+ *
+ * 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.
+ */
+
+/**
+ *      \file       htdocs/business/inc/triggers/interface_modBusiness_Workflow.class.php
+ *      \ingroup    business
+ *      \brief      Trigger file for workflow of business module
+ *      \version	$Id$
+ */
+
+
+/**
+ *      \class      InterfaceBusinessWorkflow
+ *      \brief      Classe des fonctions triggers des actions personalisees du workflow
+ */
+
+class InterfaceBusinessWorkflow
+{
+    var $db;
+    
+    /**
+     *   \brief      Constructeur.
+     *   \param      DB      Handler d'acces base
+     */
+    function InterfaceBusinessWorkflow($DB)
+    {
+        $this->db = $DB ;
+    
+        $this->name = preg_replace('/^Interface/i','',get_class($this));
+        $this->family = "business";
+        $this->description = "Triggers of this module allows to manage workflow of business";
+        $this->version = '1.0';            // 'development', 'experimental', 'dolibarr' or version
+        $this->picto = 'business@business';
+        $this->disabled_if_workflow = 1;
+    }
+    
+    
+    /**
+     *   \brief      Renvoi nom du lot de triggers
+     *   \return     string      Nom du lot de triggers
+     */
+    function getName()
+    {
+        return $this->name;
+    }
+    
+    /**
+     *   \brief      Renvoi descriptif du lot de triggers
+     *   \return     string      Descriptif du lot de triggers
+     */
+    function getDesc()
+    {
+        return $this->description;
+    }
+
+    /**
+     *   \brief      Renvoi version du lot de triggers
+     *   \return     string      Version du lot de triggers
+     */
+    function getVersion()
+    {
+        global $langs;
+        $langs->load("admin");
+
+        if ($this->version == 'development') return $langs->trans("Development");
+        elseif ($this->version == 'experimental') return $langs->trans("Experimental");
+        elseif ($this->version == 'dolibarr') return DOL_VERSION;
+        elseif ($this->version) return $this->version;
+        else return $langs->trans("Unknown");
+    }
+    
+    /**
+     *      \brief      Fonction appelee lors du declenchement d'un evenement Dolibarr.
+     *                  D'autres fonctions run_trigger peuvent etre presentes dans includes/triggers
+     *      \param      action      Code de l'evenement
+     *      \param      object      Objet concerne
+     *      \param      user        Objet user
+     *      \param      lang        Objet lang
+     *      \param      conf        Objet conf
+     *      \return     int         <0 if fatal error, 0 si nothing done, >0 if ok
+     */
+	function run_trigger($action,$object,$user,$langs,$conf)
+    {	
+        // Mettre ici le code a executer en reaction de l'action
+        // Les donnees de l'action sont stockees dans $object
+
+        // Proposals
+        if ($action == 'PHASE_MODIFY')
+        {
+        	dol_syslog("Trigger '".$this->name."' for action '$action' launched by ".__FILE__.". id=".$object->id);
+            return $this->_verifyPhaseProgression($action,$object,$user,$langs,$conf);
+        }
+
+		return 0;
+    }
+    
+    /**
+	 * 		\brief      Verify the progression of phase
+	 */
+    function _verifyPhaseProgression($action,$object,$user,$langs,$conf)
+    {
+    	include_once(DOL_DOCUMENT_ROOT."/business/class/phase.class.php");
+    	
+    	$error=0;
+		
+    	if ($object->statut)
+    	{
+    		if (!$object->progress)
+    		{
+    			$phase = new Phase($this->db);
+    			$phase->fetch($object->id);
+    			$phase->setStatut(1);
+    		}
+    		else if ($object->progress && $object->progress < 100)
+    		{
+    			$phase = new Phase($this->db);
+    			$phase->fetch($object->id);
+    			$phase->setStatut(2);
+    		}
+    		else if ($object->progress == 100)
+    		{
+    			$phase = new Phase($this->db);
+    			$phase->fetch($object->id);
+    			$phase->setStatut(5);
+    		}
+    	}	
+    }
+
+}
+?>

htdocs/core/interfaces.class.php

@@ -115,7 +115,7 @@ class Interfaces
 						// Bypass if workflow module is enabled and if the trigger asked to be disable in such case
 						if ($conf->workflow->enabled && ! empty($objMod->disabled_if_workflow))
 						{
-							dol_syslog("Interfaces::run_triggers Launch triggers for file '".$file."'",LOG_INFO);
+							dol_syslog("Interfaces::run_triggers Bypass triggers for file '".$file."'",LOG_INFO);
 							continue;
 						}
 
@@ -231,7 +231,7 @@ class Interfaces
 			{
 				$objMod = new $modName($db);
 				// Bypass if workflow module is enabled and if the trigger is compatible
-				if ($workflow && !$objMod->workflow) continue;
+				if ($workflow && empty($objMod->disabled_if_workflow)) continue;
 			}
 
 			// Define disabledbyname and disabledbymodule

htdocs/includes/modules/modWebcalendar.class.php

@@ -1,7 +1,7 @@
 <?php
 /* Copyright (C) 2003      Rodolphe Quiedeville <rodolphe@quiedeville.org>
  * Copyright (C) 2004-2007 Laurent Destailleur  <eldy@users.sourceforge.net>
- * Copyright (C) 2005-2009 Regis Houssin        <regis@dolibarr.fr>
+ * Copyright (C) 2005-2010 Regis Houssin        <regis@dolibarr.fr>
  *
  * 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
@@ -18,24 +18,26 @@
  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  */
 
-/**     \defgroup   webcalendar     Module webcalendar
+/**
-        \brief      Module to include Webcalendar GUI into Dolibarr menu and
+ *      \defgroup   webcalendar     Module webcalendar
-                    add Dolibarr events directly inside a Webcalendar database.
+ *      \brief      Module to include Webcalendar GUI into Dolibarr menu and
-		\version	$Id$
+ *                  add Dolibarr events directly inside a Webcalendar database.
-*/
+ *      \version	$Id$
+ */
 
 /**
-        \file       htdocs/includes/modules/modWebcalendar.class.php
+ *      \file       htdocs/includes/modules/modWebcalendar.class.php
-        \ingroup    webcalendar
+ *      \ingroup    webcalendar
-        \brief      Description and activation file for module Webcalendar
+ *      \brief      Description and activation file for module Webcalendar
-*/
+ */
 
 include_once(DOL_DOCUMENT_ROOT ."/includes/modules/DolibarrModules.class.php");
 
 
-/**     \class      modWebcalendar
+/**     
-        \brief      Description and activation class for module Webcalendar
+ * 		\class      modWebcalendar
-*/
+ *      \brief      Description and activation class for module Webcalendar
+ */
 
 class modWebcalendar extends DolibarrModules
 {
@@ -68,6 +70,9 @@ class modWebcalendar extends DolibarrModules
 		// Name of png file (without png) used for this module
 		$this->picto='calendar';
 		
+		// Defined if the directory /mymodule/inc/triggers/ contains triggers or not
+		$this->triggers = 1;
+
 		// Data directories to create when module is enabled
 		$this->dirs = array();