+global\Societe::delete()

Complexity

Conditions	24
Paths	12100

Size

Total Lines

117

Duplication

Lines	0
Ratio	0 %

Importance

Changes

0

<?php
	function delete($id, User $fuser=null, $call_trigger=1)
	{
		global $langs, $conf, $user;

		if (empty($fuser)) $fuser=$user;

		require_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php';

		$entity=isset($this->entity)?$this->entity:$conf->entity;

		dol_syslog(get_class($this)."::delete", LOG_DEBUG);
		$error = 0;

		// Test if child exists
		$objectisused = $this->isObjectUsed($id);
		if (empty($objectisused))
		{
			$this->db->begin();

			// User is mandatory for trigger call
			if (! $error && $call_trigger)
			{
				// Call trigger
				$result=$this->call_trigger('COMPANY_DELETE',$fuser);
				if ($result < 0) $error++;
				// End call triggers
			}

			if (! $error)
			{
				require_once DOL_DOCUMENT_ROOT.'/categories/class/categorie.class.php';
				$static_cat = new Categorie($this->db);
				$toute_categs = array();

				// Fill $toute_categs array with an array of (type => array of ("Categorie" instance))
				if ($this->client || $this->prospect)
				{
					$toute_categs['customer'] = $static_cat->containing($this->id,Categorie::TYPE_CUSTOMER);
				}
				if ($this->fournisseur)
				{
					$toute_categs['supplier'] = $static_cat->containing($this->id,Categorie::TYPE_SUPPLIER);
				}

				// Remove each "Categorie"
				foreach ($toute_categs as $type => $categs_type)
				{
					foreach ($categs_type as $cat)
					{
						$cat->del_type($this, $type);
					}
				}
			}

			foreach ($this->childtablesoncascade as $tabletodelete)
			{
				if (! $error)
				{
					$sql = "DELETE FROM ".MAIN_DB_PREFIX.$tabletodelete;
					$sql.= " WHERE fk_soc = " . $id;
					if (! $this->db->query($sql))
					{
						$error++;
						$this->errors[] = $this->db->lasterror();
					}
				}
			}

			// Removed extrafields
			if ((! $error) && (empty($conf->global->MAIN_EXTRAFIELDS_DISABLED))) // For avoid conflicts if trigger used
			{
				$result=$this->deleteExtraFields();
				if ($result < 0)
				{
					$error++;
					dol_syslog(get_class($this)."::delete error -3 ".$this->error, LOG_ERR);
				}
			}

			// Remove third party
			if (! $error)
			{
				$sql = "DELETE FROM ".MAIN_DB_PREFIX."societe";
				$sql.= " WHERE rowid = " . $id;
				if (! $this->db->query($sql))
				{
					$error++;
					$this->errors[] = $this->db->lasterror();
				}
			}

			if (! $error)
			{
				$this->db->commit();

				// Delete directory
				if (! empty($conf->societe->multidir_output[$entity]))
				{
					$docdir = $conf->societe->multidir_output[$entity] . "/" . $id;
					if (dol_is_dir($docdir))
					{
						dol_delete_dir_recursive($docdir);
					}
				}

				return 1;
			}
			else
			{
				dol_syslog($this->error, LOG_ERR);
				$this->db->rollback();
				return -1;
			}
		}
		else dol_syslog("Can't remove thirdparty with id ".$id.". There is ".$objectisused." childs", LOG_WARNING);
		return 0;
	}