forked from Wavyzz/dolibarr
387 lines
11 KiB
PHP
387 lines
11 KiB
PHP
<?php
|
|
/* Copyright (C) 2016 Jamal Elbaz <jamelbaz@gmail.pro>
|
|
* Copyright (C) 2016 Alexandre Spangaro <aspangaro.dolibarr@gmail.com>
|
|
*
|
|
* 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 3 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, see <http://www.gnu.org/licenses/>.
|
|
*/
|
|
|
|
/**
|
|
* \file htdocs/accountancy/class/accountancycategory.class.php
|
|
* \ingroup Advanced accountancy
|
|
* \brief File of class to manage categories of an accounting category_type
|
|
*/
|
|
|
|
// Class
|
|
require_once DOL_DOCUMENT_ROOT . '/core/lib/accounting.lib.php';
|
|
|
|
/**
|
|
* Class to manage categories of an accounting account
|
|
*/
|
|
class AccountancyCategory
|
|
{
|
|
private $db;
|
|
public $error;
|
|
public $errors = array();
|
|
//public $element='accounting_category';
|
|
//public $table_element='c_accounting_category';
|
|
public $id;
|
|
|
|
/**
|
|
* Constructor
|
|
*
|
|
* @param DoliDB $db Database handler
|
|
*/
|
|
public function __construct($db)
|
|
{
|
|
$this->db = $db;
|
|
|
|
return 1;
|
|
}
|
|
|
|
/**
|
|
* Function to select all accounting accounts from an accounting category
|
|
*
|
|
* @param int $id Id
|
|
*
|
|
* @return int <0 if KO, 0 if not found, >0 if OK
|
|
*/
|
|
public function display($id)
|
|
{
|
|
$sql = "SELECT t.rowid, t.account_number, t.label";
|
|
$sql.= " FROM " . MAIN_DB_PREFIX . "accounting_account as t";
|
|
$sql.= " WHERE t.fk_accounting_category = " . $id;
|
|
|
|
dol_syslog(__METHOD__ . " sql=" . $sql, LOG_DEBUG);
|
|
$resql = $this->db->query($sql);
|
|
if ($resql) {
|
|
$i = 0;
|
|
$obj = '';
|
|
$num = $this->db->num_rows($resql);
|
|
if ($num) {
|
|
while ( $i < $num ) {
|
|
$obj[$i] = $this->db->fetch_object($resql);
|
|
$i ++;
|
|
}
|
|
}
|
|
|
|
return $obj;
|
|
} else {
|
|
$this->error = "Error " . $this->db->lasterror();
|
|
dol_syslog(__METHOD__ . " " . $this->error, LOG_ERR);
|
|
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Function to select accountiing category of an accounting account present in chart of accounts
|
|
*
|
|
* @param int $id Id category
|
|
*
|
|
* @return int <0 if KO, 0 if not found, >0 if OK
|
|
*/
|
|
public function getCptBK($id)
|
|
{
|
|
global $conf;
|
|
|
|
$sql = "SELECT t.numero_compte, t.label_compte, t.doc_ref";
|
|
$sql.= " FROM " . MAIN_DB_PREFIX . "accounting_bookkeeping as t";
|
|
$sql.= " WHERE t.numero_compte NOT IN (";
|
|
$sql.= " SELECT t.account_number";
|
|
$sql.= " FROM " . MAIN_DB_PREFIX . "accounting_account as t";
|
|
$sql.= " WHERE t.fk_accounting_category = " . $id .")";
|
|
$sql.= " AND t.numero_compte IN (";
|
|
$sql.= " SELECT DISTINCT aa.account_number";
|
|
$sql.= " FROM " . MAIN_DB_PREFIX . "accounting_account as aa";
|
|
$sql.= " INNER JOIN " . MAIN_DB_PREFIX . "accounting_system as asy ON aa.fk_pcg_version = asy.pcg_version";
|
|
$sql.= " AND asy.rowid = " . $conf->global->CHARTOFACCOUNTS;
|
|
$sql.= " AND aa.active = 1)";
|
|
$sql.= " GROUP BY t.numero_compte";
|
|
|
|
dol_syslog(__METHOD__ . " sql=" . $sql, LOG_DEBUG);
|
|
$resql = $this->db->query($sql);
|
|
if ($resql) {
|
|
$i = 0;
|
|
$obj = '';
|
|
$num = $this->db->num_rows($resql);
|
|
if ($num) {
|
|
while ( $i < $num ) {
|
|
$obj[$i] = $this->db->fetch_object($resql);
|
|
$i ++;
|
|
}
|
|
}
|
|
|
|
return $obj;
|
|
} else {
|
|
$this->error = "Error " . $this->db->lasterror();
|
|
dol_syslog(__METHOD__ . " " . $this->error, LOG_ERR);
|
|
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Function to add an accounting account in an accounting category
|
|
*
|
|
* @param int $id_cat Id category
|
|
* @param array $cpts list of accounts array
|
|
*
|
|
* @return int <0 if KO, >0 if OK
|
|
*/
|
|
public function updateAccAcc($id_cat, $cpts = array())
|
|
{
|
|
global $conf;
|
|
$error = 0;
|
|
|
|
$sql = "UPDATE " . MAIN_DB_PREFIX . "accounting_account as aa";
|
|
$sql.= " INNER JOIN " . MAIN_DB_PREFIX . "accounting_system as asy ON aa.fk_pcg_version = asy.pcg_version";
|
|
$sql.= " AND asy.rowid = " . $conf->global->CHARTOFACCOUNTS;
|
|
$sql.= " AND aa.active = 1";
|
|
$sql.= " SET fk_accounting_category=" . $id_cat;
|
|
$sql.= " WHERE aa.account_number IN (" . join(',',$cpts) .")";
|
|
$this->db->begin();
|
|
|
|
dol_syslog(__METHOD__ . " sql=" . $sql, LOG_DEBUG);
|
|
$resql = $this->db->query($sql);
|
|
if (! $resql) {
|
|
$error ++;
|
|
$this->errors[] = "Error " . $this->db->lasterror();
|
|
}
|
|
|
|
// Commit or rollback
|
|
if ($error) {
|
|
foreach ($this->errors as $errmsg) {
|
|
dol_syslog(__METHOD__ . " " . $errmsg, LOG_ERR);
|
|
$this->error.=($this->error ? ', ' . $errmsg : $errmsg);
|
|
}
|
|
$this->db->rollback();
|
|
|
|
return -1 * $error;
|
|
} else {
|
|
$this->db->commit();
|
|
|
|
return 1;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Function to delete an accounting account from an accounting category
|
|
*
|
|
* @param int $cpt_id Id of accounting account
|
|
*
|
|
* @return int <0 if KO, >0 if OK
|
|
*/
|
|
public function deleteCptCat($cpt_id)
|
|
{
|
|
$error = 0;
|
|
|
|
$sql = "UPDATE " . MAIN_DB_PREFIX . "accounting_account as aa";
|
|
$sql.= " SET fk_accounting_category= 0";
|
|
$sql.= " WHERE aa.rowid= " . $cpt_id;
|
|
$this->db->begin();
|
|
|
|
dol_syslog(__METHOD__ . " sql=" . $sql, LOG_DEBUG);
|
|
$resql = $this->db->query($sql);
|
|
if (! $resql) {
|
|
$error ++;
|
|
$this->errors[] = "Error " . $this->db->lasterror();
|
|
}
|
|
|
|
// Commit or rollback
|
|
if ($error) {
|
|
foreach ($this->errors as $errmsg) {
|
|
dol_syslog(__METHOD__ . " " . $errmsg, LOG_ERR);
|
|
$this->error.=($this->error ? ', ' . $errmsg : $errmsg);
|
|
}
|
|
$this->db->rollback();
|
|
|
|
return -1 * $error;
|
|
} else {
|
|
$this->db->commit();
|
|
|
|
return 1;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Function to know all category from accounting account
|
|
*
|
|
* @return array Result in table
|
|
*/
|
|
public function getCatsCpts()
|
|
{
|
|
global $mysoc;
|
|
$sql = "";
|
|
|
|
if (empty($mysoc->country_id) && empty($mysoc->country_code))
|
|
{
|
|
dol_print_error('','Call to select_accounting_account with mysoc country not yet defined');
|
|
exit;
|
|
}
|
|
|
|
if (! empty($mysoc->country_id))
|
|
{
|
|
$sql = "SELECT t.rowid, t.account_number, t.label as name_cpt, cat.code, cat.position, cat.label as name_cat, cat.sens ";
|
|
$sql.= " FROM " . MAIN_DB_PREFIX . "accounting_account as t, ".MAIN_DB_PREFIX."c_accounting_category as cat";
|
|
$sql.= " WHERE t.fk_accounting_category IN ( SELECT c.rowid ";
|
|
$sql.= " FROM ".MAIN_DB_PREFIX."c_accounting_category as c";
|
|
$sql.= " WHERE c.active = 1";
|
|
$sql.= " AND c.fk_country = ".$mysoc->country_id.")";
|
|
$sql.= " AND cat.rowid = t.fk_accounting_category";
|
|
$sql.= " ORDER BY cat.position ASC";
|
|
}
|
|
else
|
|
{
|
|
$sql = "SELECT c.rowid, c.code, c.label, c.category_type ";
|
|
$sql.= " FROM ".MAIN_DB_PREFIX."c_accounting_category as c, ".MAIN_DB_PREFIX."c_country as co";
|
|
$sql.= " WHERE c.active = 1 AND c.fk_country = co.rowid";
|
|
$sql.= " AND co.code = '".$mysoc->country_code."'";
|
|
$sql.= " ORDER BY c.position ASC";
|
|
}
|
|
|
|
$resql = $this->db->query($sql);
|
|
if ($resql) {
|
|
$i = 0;
|
|
$obj = '';
|
|
$num = $this->db->num_rows($resql);
|
|
$data = array();
|
|
if ($num) {
|
|
while ( $i < $num ) {
|
|
$obj = $this->db->fetch_object($resql);
|
|
$name_cat = $obj->name_cat;
|
|
$data[$name_cat][$i] = array(
|
|
'id' => $obj->rowid,
|
|
'code' => $obj->code,
|
|
'position' => $obj->position,
|
|
'account_number' => $obj->account_number,
|
|
'name_cpt' => $obj->name_cpt,
|
|
'sens' => $obj->sens,
|
|
);
|
|
$i ++;
|
|
}
|
|
}
|
|
return $data;
|
|
} else {
|
|
$this->error = "Error " . $this->db->lasterror();
|
|
dol_syslog(__METHOD__ . " " . $this->error, LOG_ERR);
|
|
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Function to show result of an accounting account from the general ledger with a sens and a period
|
|
*
|
|
* @param int $cpt Id accounting account
|
|
* @param string $month Specifig month - Can be empty
|
|
* @param string $year Specific year
|
|
* @param int $sens Sens of the account 0: credit - debit 1: debit - credit
|
|
*
|
|
* @return array Result in table
|
|
*/
|
|
public function getResult($cpt, $month, $year, $sens)
|
|
{
|
|
$sql = "SELECT SUM(t.debit) as debit, SUM(t.credit) as credit";
|
|
$sql.= " FROM " . MAIN_DB_PREFIX . "accounting_bookkeeping as t";
|
|
$sql.= " WHERE t.numero_compte = " . $cpt;
|
|
$sql.= " AND YEAR(t.doc_date) = " . $year;
|
|
|
|
if(! empty($month)){
|
|
$sql.= " AND MONTH(t.doc_date) = " . $month;
|
|
}
|
|
|
|
dol_syslog(__METHOD__ . " sql=" . $sql, LOG_DEBUG);
|
|
$resql = $this->db->query($sql);
|
|
|
|
if ($resql) {
|
|
$num = $this->db->num_rows($resql);
|
|
$sdc = 0;
|
|
if ($num) {
|
|
$obj = $this->db->fetch_object($resql);
|
|
if($sens == 1){
|
|
$sdc = $obj->debit - $obj->credit;
|
|
}else{
|
|
$sdc = $obj->credit - $obj->debit;
|
|
}
|
|
}
|
|
return $sdc;
|
|
} else {
|
|
$this->error = "Error " . $this->db->lasterror();
|
|
dol_syslog(__METHOD__ . " " . $this->error, LOG_ERR);
|
|
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Function to call category from a specific country
|
|
*
|
|
* @return array Result in table
|
|
*/
|
|
public function getCatsCal()
|
|
{
|
|
global $db,$langs,$user,$mysoc;
|
|
|
|
if (empty($mysoc->country_id) && empty($mysoc->country_code))
|
|
{
|
|
dol_print_error('','Call to select_accounting_account with mysoc country not yet defined');
|
|
exit;
|
|
}
|
|
|
|
if (! empty($mysoc->country_id))
|
|
{
|
|
$sql = "SELECT c.rowid, c.code, c.label, c.formula, c.position";
|
|
$sql.= " FROM ".MAIN_DB_PREFIX."c_accounting_category as c";
|
|
$sql.= " WHERE c.active = 1 AND c.category_type = 1 ";
|
|
$sql.= " AND c.fk_country = ".$mysoc->country_id;
|
|
$sql.= " ORDER BY c.position ASC";
|
|
}
|
|
else
|
|
{
|
|
$sql = "SELECT c.rowid, c.code, c.label, c.formula, c.position";
|
|
$sql.= " FROM ".MAIN_DB_PREFIX."c_accounting_category as c, ".MAIN_DB_PREFIX."c_country as co";
|
|
$sql.= " WHERE c.active = 1 AND c.category_type = 1 AND c.fk_country = co.rowid";
|
|
$sql.= " AND co.code = '".$mysoc->country_code."'";
|
|
$sql.= " ORDER BY c.position ASC";
|
|
}
|
|
|
|
dol_syslog(__METHOD__ . " sql=" . $sql, LOG_DEBUG);
|
|
$resql = $this->db->query($sql);
|
|
if ($resql) {
|
|
$i = 0;
|
|
$obj = '';
|
|
$num = $this->db->num_rows($resql);
|
|
$data = array();
|
|
if ($num) {
|
|
while ( $i < $num ) {
|
|
$obj = $this->db->fetch_object($resql);
|
|
$position = $obj->position;
|
|
$data[$position] = array(
|
|
'code' => $obj->code,
|
|
'label' => $obj->label,
|
|
'formula' => $obj->formula
|
|
);
|
|
$i ++;
|
|
}
|
|
}
|
|
return $data;
|
|
} else {
|
|
$this->error = "Error " . $this->db->lasterror();
|
|
dol_syslog(__METHOD__ . " " . $this->error, LOG_ERR);
|
|
|
|
return -1;
|
|
}
|
|
}
|
|
}
|