mirror of
https://github.com/Dolibarr/dolibarr.git
synced 2025-02-20 13:46:52 +01:00
4d0a68d48c
This is to be more portable, to solve problem when database server time differs from PHP server and to prepare for TZ support.
451 lines
12 KiB
PHP
451 lines
12 KiB
PHP
<?php
|
|
/* Copyright (C) 2002 Rodolphe Quiedeville <rodolphe@quiedeville.org>
|
|
* Copyright (C) 2004-2007 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.
|
|
*/
|
|
|
|
/**
|
|
\file htdocs/chargesociales.class.php
|
|
\ingroup facture
|
|
\brief Fichier de la classe des charges sociales
|
|
\version $Id$
|
|
*/
|
|
|
|
|
|
/** \class ChargeSociales
|
|
\brief Classe permettant la gestion des paiements des charges
|
|
La tva collectée n'est calculée que sur les factures payées.
|
|
*/
|
|
class ChargeSociales
|
|
{
|
|
var $db;
|
|
|
|
var $id;
|
|
var $date_ech;
|
|
var $lib;
|
|
var $type;
|
|
var $type_libelle;
|
|
var $amount;
|
|
var $paye;
|
|
var $periode;
|
|
|
|
|
|
function ChargeSociales($DB)
|
|
{
|
|
$this->db = $DB;
|
|
|
|
return 1;
|
|
}
|
|
|
|
/**
|
|
* \brief Retrouve et charge une charge sociale
|
|
* \return int 1 si trouve, 0 sinon
|
|
*/
|
|
function fetch($id)
|
|
{
|
|
$sql = "SELECT cs.rowid,".$this->db->pdate("cs.date_ech")." as date_ech,";
|
|
$sql.= " cs.libelle as lib, cs.fk_type, cs.amount, cs.paye, ".$this->db->pdate("cs.periode")." as periode,";
|
|
$sql.= " c.libelle";
|
|
$sql.= " FROM ".MAIN_DB_PREFIX."chargesociales as cs, ".MAIN_DB_PREFIX."c_chargesociales as c";
|
|
$sql.= " WHERE cs.fk_type = c.id";
|
|
$sql.= " AND cs.rowid = ".$id;
|
|
|
|
dolibarr_syslog("ChargesSociales::fetch sql=".$sql);
|
|
$resql=$this->db->query($sql);
|
|
if ($resql)
|
|
{
|
|
if ($this->db->num_rows($resql))
|
|
{
|
|
$obj = $this->db->fetch_object($resql);
|
|
|
|
$this->id = $obj->rowid;
|
|
$this->date_ech = $obj->date_ech;
|
|
$this->lib = $obj->lib;
|
|
$this->type = $obj->fk_type;
|
|
$this->type_libelle = $obj->libelle;
|
|
$this->amount = $obj->amount;
|
|
$this->paye = $obj->paye;
|
|
$this->periode = $obj->periode;
|
|
|
|
return 1;
|
|
}
|
|
else
|
|
{
|
|
return 0;
|
|
}
|
|
$this->db->free($resql);
|
|
}
|
|
else
|
|
{
|
|
$this->error=$this->db->error();
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
* \brief Crée une charge sociale
|
|
* \param user Utilisateur qui crée
|
|
* \return int <0 si KO, id charge créée si OK
|
|
*/
|
|
function create($user)
|
|
{
|
|
// Nettoyage parametres
|
|
$newamount=price2num($this->amount,'MT');
|
|
|
|
// Validation parametres
|
|
if (! $newamount > 0)
|
|
{
|
|
$this->error="ErrorBadParameter";
|
|
return -2;
|
|
}
|
|
|
|
$this->db->begin();
|
|
|
|
$sql = "INSERT INTO ".MAIN_DB_PREFIX."chargesociales (fk_type, libelle, date_ech, periode, amount)";
|
|
$sql.= " VALUES (".$this->type.",'".addslashes($this->lib)."',";
|
|
$sql.= " '".$this->db->idate($this->date_ech)."','".$this->periode."',";
|
|
$sql.= " ".price2num($newamount);
|
|
$sql.= ")";
|
|
|
|
dolibarr_syslog("ChargesSociales::create sql=".$sql);
|
|
$resql=$this->db->query($sql);
|
|
if ($resql)
|
|
{
|
|
$this->id=$this->db->last_insert_id(MAIN_DB_PREFIX."chargesociales");
|
|
|
|
//dolibarr_syslog("ChargesSociales::create this->id=".$this->id);
|
|
$this->db->commit();
|
|
return $this->id;
|
|
}
|
|
else
|
|
{
|
|
$this->error=$this->db->error();
|
|
$this->db->rollback();
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
* \brief Efface un charge sociale
|
|
* \param user Utilisateur qui crée le paiement
|
|
* \return int <0 si erreur, >0 si ok
|
|
*/
|
|
function delete($user)
|
|
{
|
|
$sql = "DELETE FROM ".MAIN_DB_PREFIX."chargesociales where rowid='".$this->id."'";
|
|
|
|
dolibarr_syslog("ChargesSociales::delete sql=".$sql);
|
|
$resql=$this->db->query($sql);
|
|
if ($resql)
|
|
{
|
|
return 1;
|
|
}
|
|
else
|
|
{
|
|
$this->error=$this->db->error();
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
* \brief Met a jour une charge sociale
|
|
* \param user Utilisateur qui modifie
|
|
* \return int <0 si erreur, >0 si ok
|
|
*/
|
|
function update($user)
|
|
{
|
|
$this->db->begin();
|
|
|
|
$sql = "UPDATE ".MAIN_DB_PREFIX."chargesociales";
|
|
$sql.= " SET libelle='".addslashes($this->lib)."',";
|
|
$sql.= " date_ech='".$this->db->idate($this->date_ech)."',";
|
|
$sql.= " periode='".$this->periode."'";
|
|
$sql.= " WHERE rowid=".$this->id;
|
|
|
|
dolibarr_syslog("ChargesSociales::update sql=".$sql);
|
|
$resql=$this->db->query($sql);
|
|
if ($resql)
|
|
{
|
|
$this->db->commit();
|
|
return 1;
|
|
}
|
|
else
|
|
{
|
|
$this->error=$this->db->error();
|
|
$this->db->rollback();
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
|
|
function solde($year = 0)
|
|
{
|
|
$sql = "SELECT sum(f.amount) as amount";
|
|
$sql .= " FROM ".MAIN_DB_PREFIX."chargesociales as f WHERE paye = 0";
|
|
|
|
if ($year) {
|
|
$sql .= " AND f.datev >= '$y-01-01' AND f.datev <= '$y-12-31' ";
|
|
}
|
|
|
|
$result = $this->db->query($sql);
|
|
|
|
if ($result) {
|
|
if ($this->db->num_rows()) {
|
|
$obj = $this->db->fetch_object();
|
|
return $obj->amount;
|
|
} else {
|
|
return 0;
|
|
}
|
|
|
|
$this->db->free();
|
|
|
|
} else {
|
|
print $this->db->error();
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* \brief Tag la charge comme payée complètement
|
|
* \param rowid id de la ligne a modifier
|
|
*/
|
|
function set_payed($rowid)
|
|
{
|
|
$sql = "UPDATE ".MAIN_DB_PREFIX."chargesociales set paye=1 WHERE rowid = ".$rowid;
|
|
$return = $this->db->query( $sql);
|
|
}
|
|
|
|
/**
|
|
* \brief Retourne le libellé du statut d'une charge (impayé, payée)
|
|
* \param mode 0=libellé long, 1=libellé court, 2=Picto + Libellé court, 3=Picto, 4=Picto + Libellé long
|
|
* \return string Libelle
|
|
*/
|
|
function getLibStatut($mode=0)
|
|
{
|
|
return $this->LibStatut($this->paye,$mode);
|
|
}
|
|
|
|
/**
|
|
* \brief Renvoi le libellé d'un statut donné
|
|
* \param statut Id statut
|
|
* \param mode 0=libellé long, 1=libellé court, 2=Picto + Libellé court, 3=Picto, 4=Picto + Libellé long, 5=Libellé court + Picto
|
|
* \return string Libellé du statut
|
|
*/
|
|
function LibStatut($statut,$mode=0)
|
|
{
|
|
global $langs;
|
|
$langs->load('customers');
|
|
|
|
if ($mode == 0)
|
|
{
|
|
if ($statut == 0) return $langs->trans("Unpayed");
|
|
if ($statut == 1) return $langs->trans("Payed");
|
|
}
|
|
if ($mode == 1)
|
|
{
|
|
if ($statut == 0) return $langs->trans("Unpayed");
|
|
if ($statut == 1) return $langs->trans("Payed");
|
|
}
|
|
if ($mode == 2)
|
|
{
|
|
if ($statut == 0) return img_picto($langs->trans("Unpayed"), 'statut1').' '.$langs->trans("Unpayed");
|
|
if ($statut == 1) return img_picto($langs->trans("Payed"), 'statut6').' '.$langs->trans("Payed");
|
|
}
|
|
if ($mode == 3)
|
|
{
|
|
if ($statut == 0) return img_picto($langs->trans("Unpayed"), 'statut1');
|
|
if ($statut == 1) return img_picto($langs->trans("Payed"), 'statut6');
|
|
}
|
|
if ($mode == 4)
|
|
{
|
|
if ($statut == 0) return img_picto($langs->trans("Unpayed"), 'statut1').' '.$langs->trans("Unpayed");
|
|
if ($statut == 1) return img_picto($langs->trans("Payed"), 'statut6').' '.$langs->trans("Payed");
|
|
}
|
|
if ($mode == 5)
|
|
{
|
|
if ($statut == 0) return $langs->trans("Unpayed").' '.img_picto($langs->trans("Unpayed"), 'statut1');
|
|
if ($statut == 1) return $langs->trans("Payed").' '.img_picto($langs->trans("Payed"), 'statut6');
|
|
}
|
|
|
|
return "Error, mode/status not found";
|
|
}
|
|
|
|
|
|
/**
|
|
* \brief Renvoie nom clicable (avec eventuellement le picto)
|
|
* \param withpicto Inclut le picto dans le lien
|
|
* \param maxlen Longueur max libelle
|
|
* \return string Chaine avec URL
|
|
*/
|
|
function getNomUrl($withpicto=0,$maxlen=0)
|
|
{
|
|
global $langs;
|
|
|
|
$result='';
|
|
|
|
$lien = '<a href="'.DOL_URL_ROOT.'/compta/sociales/charges.php?id='.$this->id.'">';
|
|
$lienfin='</a>';
|
|
|
|
if ($withpicto) $result.=($lien.img_object($langs->trans("ShowSocialContribution"),'bill').$lienfin.' ');
|
|
$result.=$lien.($maxlen?dolibarr_trunc($this->lib,$maxlen):$this->lib).$lienfin;
|
|
return $result;
|
|
}
|
|
|
|
/**
|
|
* \brief Return amount aof payments already done
|
|
* \return int Amount of payment already done, <0 if KO
|
|
*/
|
|
function getSommePaiement()
|
|
{
|
|
$table='paiementcharge';
|
|
$field='fk_charge';
|
|
|
|
$sql = 'SELECT sum(amount) as amount';
|
|
$sql.= ' FROM '.MAIN_DB_PREFIX.$table;
|
|
$sql.= ' WHERE '.$field.' = '.$this->id;
|
|
|
|
dolibarr_syslog("ChargeSociales::getSommePaiement sql=".$sql, LOG_DEBUG);
|
|
$resql=$this->db->query($sql);
|
|
if ($resql)
|
|
{
|
|
$obj = $this->db->fetch_object($resql);
|
|
$this->db->free($resql);
|
|
return $obj->amount;
|
|
}
|
|
else
|
|
{
|
|
return -1;
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
/** \class PaiementCharge
|
|
\brief Classe permettant la gestion des paiements des charges
|
|
*/
|
|
class PaiementCharge
|
|
{
|
|
var $db;
|
|
|
|
var $id;
|
|
var $chid;
|
|
var $paiementtype;
|
|
var $datepaye;
|
|
var $amounts;
|
|
var $num_paiement;
|
|
var $note;
|
|
|
|
|
|
function PaiementCharge($DB)
|
|
{
|
|
$this->db = $DB;
|
|
return 1;
|
|
}
|
|
|
|
/**
|
|
* \brief Creation d'un paiement de charge sociale dans la base
|
|
* \param user Utilisateur qui crée le paiement
|
|
* \return int <0 si KO, id du paiement crée si OK
|
|
*/
|
|
function create($user)
|
|
{
|
|
global $conf;
|
|
$error = 0;
|
|
|
|
// Validation parametres
|
|
if (! $this->datepaye)
|
|
{
|
|
$this->error='ErrorBadValueForParameters';
|
|
return -1;
|
|
}
|
|
|
|
$this->db->begin();
|
|
|
|
$total=0;
|
|
foreach ($this->amounts as $key => $value)
|
|
{
|
|
$facid = $key;
|
|
$amount = price2num(trim($value), 'MT');
|
|
$total += $amount;
|
|
}
|
|
|
|
if ($total > 0)
|
|
{
|
|
$sql = "INSERT INTO ".MAIN_DB_PREFIX."paiementcharge (fk_charge, datec, datep, amount,";
|
|
$sql.= " fk_typepaiement, num_paiement, note, fk_user_creat, fk_bank)";
|
|
$sql.= " VALUES ($this->chid, ".$this->db->idate(mktime()).", ";
|
|
$sql.= $this->db->idate($this->datepaye).", ";
|
|
$sql.= price2num($total);
|
|
$sql.= ", ".$this->paiementtype.", '".$this->num_paiement."', '".addslashes($this->note)."', ".$user->id.",";
|
|
$sql.= "0)";
|
|
|
|
dolibarr_syslog("PaiementCharge::create sql=".$sql);
|
|
$resql=$this->db->query($sql);
|
|
if ($resql)
|
|
{
|
|
$this->id = $this->db->last_insert_id(MAIN_DB_PREFIX."paiementcharge");
|
|
}
|
|
else
|
|
{
|
|
$error++;
|
|
}
|
|
|
|
}
|
|
|
|
if ($total > 0 && ! $error)
|
|
{
|
|
$this->db->commit();
|
|
return $this->id;
|
|
}
|
|
else
|
|
{
|
|
$this->error=$this->db->error();
|
|
dolibarr_syslog("PaiementCharges::create ".$this->error, LOG_ERR);
|
|
$this->db->rollback();
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* \brief Mise a jour du lien entre le paiement de charge et la ligne dans llx_bank générée
|
|
* \param id_bank Id de la banque
|
|
* \return int >0 si OK, <=0 si KO
|
|
*/
|
|
function update_fk_bank($id_bank)
|
|
{
|
|
$sql = "UPDATE llx_paiementcharge set fk_bank = ".$id_bank." where rowid = ".$this->id;
|
|
|
|
dolibarr_syslog("PaiementCharge::update_fk_bank sql=".$sql);
|
|
$result = $this->db->query($sql);
|
|
if ($result)
|
|
{
|
|
return 1;
|
|
}
|
|
else
|
|
{
|
|
$this->error=$this->db->error();
|
|
dolibarr_syslog("PaiementCharges::update_fk_bank ".$this->error, LOG_ERR);
|
|
return 0;
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
?>
|