596 lines
16 KiB
PHP
596 lines
16 KiB
PHP
<?php
|
|
/* Copyright (C) 2002-2004 Rodolphe Quiedeville <rodolphe@quiedeville.org>
|
|
* Copyright (C) 2004-2005 Laurent Destailleur <eldy@users.sourceforge.net>
|
|
* Copyright (C) 2004 Christophe Combelles <ccomb@free.fr>
|
|
* Copyright (C) 2005 Marc Barilley / Ocebo <marc@ocebo.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 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/fourn/fournisseur.facture.class.php
|
|
\ingroup fournisseur,facture
|
|
\brief Fichier de la classe des factures fournisseurs
|
|
\version $Revision$
|
|
*/
|
|
|
|
include_once(DOL_DOCUMENT_ROOT."/facture.class.php");
|
|
|
|
|
|
/**
|
|
\class FactureFournisseur
|
|
\brief Classe permettant la gestion des factures fournisseurs
|
|
*/
|
|
|
|
class FactureFournisseur extends Facture
|
|
{
|
|
var $id;
|
|
var $db;
|
|
var $socid;
|
|
var $statut;
|
|
var $paye;
|
|
var $author;
|
|
var $libelle;
|
|
var $date;
|
|
var $date_echeance;
|
|
var $ref;
|
|
var $amount;
|
|
var $remise;
|
|
var $tva;
|
|
var $total_ht;
|
|
var $total_tva;
|
|
var $total_ttc;
|
|
var $note;
|
|
var $propalid;
|
|
var $lignes;
|
|
var $fournisseur;
|
|
|
|
/**
|
|
* \brief Constructeur de la classe
|
|
* \param DB Handler accès base de données
|
|
* \param socid Id societe ('' par defaut)
|
|
* \param facid Id facture ('' par defaut)
|
|
*/
|
|
function FactureFournisseur($DB, $socid='', $facid='')
|
|
{
|
|
$this->db = $DB ;
|
|
$this->table = 'facture_fourn';
|
|
$this->tabledetail = 'facture_fourn_det';
|
|
|
|
$this->id = $facid;
|
|
$this->socid = $socid;
|
|
|
|
$this->amount = 0;
|
|
$this->remise = 0;
|
|
$this->tva = 0;
|
|
$this->total_ht = 0;
|
|
$this->total_tva = 0;
|
|
$this->total_ttc = 0;
|
|
$this->propalid = 0;
|
|
|
|
$this->products = array();
|
|
$this->lignes = array();
|
|
}
|
|
|
|
/**
|
|
* \brief Création de la facture en base
|
|
* \param user object utilisateur qui crée
|
|
* \return int id facture si ok, < 0 si erreur
|
|
*/
|
|
function create($user)
|
|
{
|
|
global $langs;
|
|
|
|
$socid = $this->socid;
|
|
$number = $this->ref;
|
|
$amount = $this->amount;
|
|
$remise = $this->remise;
|
|
|
|
$this->db->begin();
|
|
|
|
if (! $remise) $remise = 0 ;
|
|
$totalht = ($amount - $remise);
|
|
|
|
$sql = 'INSERT INTO '.MAIN_DB_PREFIX.'facture_fourn (facnumber, libelle, fk_soc, datec, datef, note, fk_user_author, date_lim_reglement) ';
|
|
$sql .= " VALUES ('".addslashes($number)."','".addslashes($this->libelle)."',";
|
|
$sql .= $this->socid.", now(),'".$this->db->idate($this->date)."','".addslashes($this->note)."', ".$user->id.",'".$this->db->idate($this->date_echeance)."');";
|
|
$resql=$this->db->query($sql);
|
|
if ($resql)
|
|
{
|
|
$this->id = $this->db->last_insert_id(MAIN_DB_PREFIX.'facture_fourn');
|
|
for ($i = 0 ; $i < sizeof($this->lignes) ; $i++)
|
|
{
|
|
$sql = 'INSERT INTO '.MAIN_DB_PREFIX.'facture_fourn_det (fk_facture_fourn)';
|
|
$sql .= ' VALUES ('.$this->id.');';
|
|
$resql_insert=$this->db->query($sql);
|
|
if ($resql_insert)
|
|
{
|
|
$idligne = $this->db->last_insert_id(MAIN_DB_PREFIX.'facture_fourn_det');
|
|
$this->updateline($idligne,
|
|
$this->lignes[$i]->description,
|
|
$this->lignes[$i]->pu_ht,
|
|
$this->lignes[$i]->tva_taux,
|
|
$this->lignes[$i]->qty);
|
|
}
|
|
}
|
|
// Mise à jour prix
|
|
if ($this->update_price($this->id) > 0)
|
|
{
|
|
$this->db->commit();
|
|
return $this->id;
|
|
}
|
|
else
|
|
{
|
|
$this->error=$langs->trans('FailedToUpdatePrice');
|
|
$this->db->rollback();
|
|
return -3;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
if ($this->db->errno() == 'DB_ERROR_RECORD_ALREADY_EXISTS')
|
|
{
|
|
$this->error=$langs->trans('ErrorBillRefAlreadyExists');
|
|
$this->db->rollback();
|
|
return -1;
|
|
}
|
|
else
|
|
{
|
|
$this->error=$this->db->error();
|
|
$this->db->rollback();
|
|
return -2;
|
|
}
|
|
}
|
|
}
|
|
|
|
/**
|
|
* \brief Recupére l'objet facture et ses lignes de factures
|
|
* \param rowid id de la facture a récupérer
|
|
*/
|
|
function fetch($rowid)
|
|
{
|
|
$sql = 'SELECT libelle, facnumber, amount, remise, '.$this->db->pdate(datef).'as df,';
|
|
$sql.= ' total_ht, total_tva, total_ttc, fk_user_author,';
|
|
$sql.= ' fk_statut, paye, f.note, f.note_public,';
|
|
$sql.= ' '.$this->db->pdate('date_lim_reglement').'as de,';
|
|
$sql.= ' s.nom as socnom, s.idp as socid';
|
|
$sql.= ' FROM '.MAIN_DB_PREFIX.'facture_fourn as f,'.MAIN_DB_PREFIX.'societe as s';
|
|
$sql.= ' WHERE f.rowid='.$rowid.' AND f.fk_soc = s.idp';
|
|
$resql = $this->db->query($sql);
|
|
if ($resql)
|
|
{
|
|
$num=$this->db->num_rows($resql);
|
|
if ($num)
|
|
{
|
|
$obj = $this->db->fetch_object();
|
|
|
|
$this->id = $rowid;
|
|
$this->datep = $obj->df;
|
|
$this->date_echeance = $obj->de;
|
|
$this->ref = $obj->facnumber;
|
|
$this->libelle = $obj->libelle;
|
|
|
|
$this->remise = $obj->remise;
|
|
$this->socid = $obj->socid;
|
|
|
|
$this->total_ht = $obj->total_ht;
|
|
$this->total_tva = $obj->total_tva;
|
|
$this->total_ttc = $obj->total_ttc;
|
|
|
|
$this->author = $obj->fk_user_author;
|
|
|
|
$this->statut = $obj->fk_statut;
|
|
$this->paye = $obj->paye;
|
|
|
|
$this->socnom = $obj->socnom;
|
|
$this->note = $obj->note;
|
|
$this->note_public = $obj->note_public;
|
|
|
|
$this->db->free($resql);
|
|
|
|
/*
|
|
* Lignes
|
|
*/
|
|
$sql = 'SELECT rowid, description, pu_ht, qty, tva_taux, tva, total_ht, total_ttc, fk_product';
|
|
$sql .= ' FROM '.MAIN_DB_PREFIX.'facture_fourn_det';
|
|
$sql .= ' WHERE fk_facture_fourn='.$this->id;
|
|
$resql_rows = $this->db->query($sql);
|
|
if ($resql_rows)
|
|
{
|
|
$num_rows = $this->db->num_rows($resql_rows);
|
|
$i = 0;
|
|
if ($num_rows)
|
|
{
|
|
while ($i < $num_rows)
|
|
{
|
|
$obj = $this->db->fetch_object($resql_rows);
|
|
$this->lignes[$i]->description = $obj->description;
|
|
$this->lignes[$i]->pu_ht = $obj->pu_ht;
|
|
$this->lignes[$i]->tva_taux = $obj->tva_taux;
|
|
$this->lignes[$i]->qty = $obj->qty;
|
|
$this->lignes[$i]->total_ht = $obj->total_ht;
|
|
$this->lignes[$i]->tva = $obj->tva;
|
|
$this->lignes[$i]->total_ttc = $obj->total_ttc;
|
|
$this->lignes[$i]->rowid = $obj->rowid;
|
|
$this->lignes[$i]->total_tva = $obj->total_tva;
|
|
$i++;
|
|
}
|
|
}
|
|
$this->db->free($resql_rows);
|
|
}
|
|
else
|
|
{
|
|
dolibarr_syslog('Erreur FactureFournisseur::Fetch rowid='.$rowid.', Erreur dans fetch des lignes');
|
|
$this->error=$this->db->error();
|
|
dolibarr_print_error($this->db);
|
|
return -3;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
dolibarr_syslog('Erreur FactureFournisseur::Fetch rowid='.$rowid.' numrows=0 sql='.$sql);
|
|
$this->error='Bill with id '.$rowid.' not found sql='.$sql;
|
|
dolibarr_print_error($this->db);
|
|
return -2;
|
|
}
|
|
$this->db->free($resql);
|
|
}
|
|
else
|
|
{
|
|
dolibarr_syslog('Erreur FactureFournisseur::Fetch rowid='.$rowid.' Erreur dans fetch de la facture fournisseur');
|
|
$this->error=$this->db->error();
|
|
dolibarr_print_error($this->db);
|
|
return -1;
|
|
}
|
|
return 1;
|
|
}
|
|
|
|
/**
|
|
* \brief Recupére l'objet fournisseur lié à la facture
|
|
*
|
|
*/
|
|
function fetch_fournisseur()
|
|
{
|
|
$fournisseur = new Fournisseur($this->db);
|
|
$fournisseur->fetch($this->socid);
|
|
$this->fournisseur = $fournisseur;
|
|
}
|
|
|
|
/**
|
|
* \brief Supprime la facture
|
|
* \param rowid id de la facture à supprimer
|
|
*/
|
|
function delete($rowid)
|
|
{
|
|
$sql = 'DELETE FROM '.MAIN_DB_PREFIX.'facture_fourn_det WHERE fk_facture_fourn = '.$rowid.';';
|
|
$resql = $this->db->query($sql);
|
|
if ($resql)
|
|
{
|
|
$sql = 'DELETE FROM '.MAIN_DB_PREFIX.'facture_fourn WHERE rowid = '.$rowid.' AND fk_statut = 0;';
|
|
$resql2 = $this->db->query($sql);
|
|
if ($resql2)
|
|
{
|
|
return 1;
|
|
}
|
|
else
|
|
{
|
|
dolibarr_print_error($this->db);
|
|
}
|
|
}
|
|
else
|
|
{
|
|
dolibarr_print_error($this->db);
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
* \brief Tag la facture comme payée complètement
|
|
* \param user Objet utilisateur qui modifie l'état
|
|
* \return int <0 si ko, >0 si ok
|
|
*/
|
|
function set_payed($user)
|
|
{
|
|
$sql = 'UPDATE '.MAIN_DB_PREFIX.'facture_fourn';
|
|
$sql.= ' SET paye = 1';
|
|
$sql.= ' WHERE rowid = '.$this->id;
|
|
$resql = $this->db->query($sql);
|
|
if (! $resql)
|
|
{
|
|
$this->error=$this->db->error();
|
|
dolibarr_print_error($this->db);
|
|
return -1;
|
|
}
|
|
return 1;
|
|
}
|
|
|
|
|
|
/**
|
|
* \brief Tag la facture comme validée
|
|
* \param user Objet utilisateur qui valide la facture
|
|
* \return int <0 si ko, >0 si ok
|
|
*/
|
|
function set_valid($user)
|
|
{
|
|
$sql = "UPDATE ".MAIN_DB_PREFIX."facture_fourn";
|
|
$sql.= " SET fk_statut = 1, fk_user_valid = ".$user->id;
|
|
$sql.= " WHERE rowid = ".$this->id;
|
|
$resql = $this->db->query($sql);
|
|
if (! $resql)
|
|
{
|
|
$this->error=$this->db->error();
|
|
dolibarr_print_error($this->db);
|
|
return -1;
|
|
}
|
|
return 1;
|
|
}
|
|
|
|
|
|
/**
|
|
* \brief Ajoute une ligne de facture (associé à aucun produit/service prédéfini)
|
|
* \param desc description de la ligne
|
|
* \param pu prix unitaire
|
|
* \param tauxtva taux de tva
|
|
* \param qty quantité
|
|
* \param idproduct id produit
|
|
*/
|
|
function addline($desc, $pu, $tauxtva, $qty, $idproduct=0)
|
|
{
|
|
$sql = 'INSERT INTO '.MAIN_DB_PREFIX.'facture_fourn_det (fk_facture_fourn)';
|
|
$sql .= ' VALUES ('.$this->id.');';
|
|
$resql = $this->db->query($sql);
|
|
if ($resql)
|
|
{
|
|
$idligne = $this->db->last_insert_id(MAIN_DB_PREFIX.'facture_fourn_det');
|
|
$this->updateline($idligne, $desc, $pu, $tauxtva, $qty, $idproduct);
|
|
|
|
// Mise a jour prix facture
|
|
$this->update_price($this->id);
|
|
|
|
return 1;
|
|
}
|
|
else
|
|
{
|
|
dolibarr_print_error($this->db);
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* \brief Mets à jour une ligne de facture
|
|
* \param id Id de la ligne de facture
|
|
* \param label Description de la ligne
|
|
* \param puht Prix unitaire
|
|
* \param tauxtva Taux tva
|
|
* \param qty Quantité
|
|
* \param idproduct Id produit
|
|
* \return int <0 si ko, >0 si ok
|
|
*/
|
|
function updateline($id, $label, $puht, $tauxtva, $qty=1, $idproduct=0)
|
|
{
|
|
$puht = price2num($puht);
|
|
$qty = price2num($qty);
|
|
|
|
if (is_numeric($puht) && is_numeric($qty))
|
|
{
|
|
$totalht = ($puht * $qty);
|
|
$tva = ($totalht * $tauxtva / 100);
|
|
$totalttc = $totalht + $tva;
|
|
|
|
$sql = 'UPDATE '.MAIN_DB_PREFIX.'facture_fourn_det ';
|
|
$sql.= 'SET ';
|
|
$sql.= 'description =\''.addslashes($label).'\'';
|
|
$sql.= ', pu_ht = ' .$puht;
|
|
$sql.= ', qty =' .$qty;
|
|
$sql.= ', total_ht=' .price2num($totalht);
|
|
$sql.= ', tva=' .price2num($tva);
|
|
$sql.= ', tva_taux=' .price2num($tauxtva);
|
|
$sql.= ', total_ttc='.price2num($totalttc);
|
|
if ($idproduct) $sql.= ', fk_product='.$idproduct;
|
|
else $sql.= ', fk_product=null';
|
|
$sql.= ' WHERE rowid = '.$id;
|
|
|
|
$resql=$this->db->query($sql);
|
|
if ($resql)
|
|
{
|
|
// Mise a jour prix facture
|
|
return $this->update_price($this->id);
|
|
}
|
|
else
|
|
{
|
|
$this->error=$this->db->error();
|
|
return -1;
|
|
}
|
|
}
|
|
}
|
|
|
|
/**
|
|
* \brief Supprime une ligne facture de la base
|
|
* \param rowid id de la ligne de facture a supprimer
|
|
*/
|
|
function deleteline($rowid)
|
|
{
|
|
// Supprime ligne
|
|
$sql = 'DELETE FROM '.MAIN_DB_PREFIX.'facture_fourn_det ';
|
|
$sql .= ' WHERE rowid = '.$rowid.';';
|
|
$resql = $this->db->query($sql);
|
|
if (! $resql)
|
|
{
|
|
dolibarr_print_error($this->db);
|
|
}
|
|
// Mise a jour prix facture
|
|
$this->update_price($this->id);
|
|
return 1;
|
|
}
|
|
|
|
/**
|
|
* \brief Mise à jour des sommes de la facture
|
|
* \param facid id de la facture a modifier
|
|
* \return int <0 si ko, >0 si ok
|
|
*/
|
|
function update_price($facid)
|
|
{
|
|
$total_ht = 0;
|
|
$total_tva = 0;
|
|
$total_ttc = 0;
|
|
|
|
$sql = 'SELECT sum(total_ht), sum(tva), sum(total_ttc) FROM '.MAIN_DB_PREFIX.'facture_fourn_det';
|
|
$sql .= ' WHERE fk_facture_fourn = '.$facid.';';
|
|
$resql = $this->db->query($sql);
|
|
if ($resql)
|
|
{
|
|
$num = $this->db->num_rows($resql);
|
|
if ($num)
|
|
{
|
|
$row = $this->db->fetch_row();
|
|
$total_ht = $row[0];
|
|
$total_tva = $row[1];
|
|
$total_ttc = $row[2];
|
|
}
|
|
$this->db->free($resql);
|
|
|
|
$total_ht = $total_ht != '' ? $total_ht : 0;
|
|
$total_tva = $total_tva != '' ? $total_tva : 0;
|
|
$total_ttc = $total_ttc != '' ? $total_ttc : 0;
|
|
|
|
$sql = 'UPDATE '.MAIN_DB_PREFIX.'facture_fourn SET';
|
|
$sql .= ' total_ht = '. price2num($total_ht);
|
|
$sql .= ',total_tva = '.price2num($total_tva);
|
|
$sql .= ',total_ttc = '.price2num($total_ttc);
|
|
$sql .= ' WHERE rowid = '.$facid.';';
|
|
$resql2 = $this->db->query($sql);
|
|
if ($resql2)
|
|
{
|
|
return 1;
|
|
}
|
|
else
|
|
{
|
|
$this->error=$this->db->error();
|
|
return -2;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
dolibarr_print_error($this->db);
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
* \brief Charge les informations d'ordre info dans l'objet facture
|
|
* \param id Id de la facture a charger
|
|
*/
|
|
function info($id)
|
|
{
|
|
$sql = 'SELECT c.rowid, '.$this->db->pdate('datec').' as datec';
|
|
$sql .= ', fk_user_author, fk_user_valid';
|
|
$sql .= ' FROM '.MAIN_DB_PREFIX.'facture_fourn as c';
|
|
$sql .= ' WHERE c.rowid = '.$id;
|
|
|
|
$result=$this->db->query($sql);
|
|
if ($result)
|
|
{
|
|
if ($this->db->num_rows($result))
|
|
{
|
|
$obj = $this->db->fetch_object($result);
|
|
$this->id = $obj->rowid;
|
|
if ($obj->fk_user_author)
|
|
{
|
|
$cuser = new User($this->db, $obj->fk_user_author);
|
|
$cuser->fetch();
|
|
$this->user_creation = $cuser;
|
|
}
|
|
if ($obj->fk_user_valid)
|
|
{
|
|
$vuser = new User($this->db, $obj->fk_user_valid);
|
|
$vuser->fetch();
|
|
$this->user_validation = $vuser;
|
|
}
|
|
$this->date_creation = $obj->datec;
|
|
//$this->date_validation = $obj->datev; \todo La date de validation n'est pas encore gérée
|
|
}
|
|
$this->db->free($result);
|
|
}
|
|
else
|
|
{
|
|
dolibarr_print_error($this->db);
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
* \brief Charge indicateurs this->nbtodo et this->nbtodolate de tableau de bord
|
|
* \param user Objet user
|
|
* \return int <0 si ko, >0 si ok
|
|
*/
|
|
function load_board($user)
|
|
{
|
|
global $conf, $user;
|
|
|
|
$this->nbtodo=$this->nbtodolate=0;
|
|
$sql = 'SELECT ff.rowid,'.$this->db->pdate('ff.date_lim_reglement').' as datefin';
|
|
if (!$user->rights->commercial->client->voir && !$user->societe_id) $sql .= ", sc.fk_soc, sc.fk_user";
|
|
$sql.= ' FROM '.MAIN_DB_PREFIX.'facture_fourn as ff';
|
|
if (!$user->rights->commercial->client->voir && !$user->societe_id) $sql .= ", ".MAIN_DB_PREFIX."societe_commerciaux as sc";
|
|
$sql.= ' WHERE ff.paye=0 AND ff.fk_statut > 0';
|
|
if ($user->societe_id) $sql.=' AND ff.fk_soc = '.$user->societe_id;
|
|
if (!$user->rights->commercial->client->voir && !$user->societe_id) $sql .= " AND ff.fk_soc = sc.fk_soc AND sc.fk_user = " .$user->id;
|
|
$resql=$this->db->query($sql);
|
|
if ($resql)
|
|
{
|
|
while ($obj=$this->db->fetch_object($resql))
|
|
{
|
|
$this->nbtodo++;
|
|
if ($obj->datefin < (time() - $conf->facture->fournisseur->warning_delay)) $this->nbtodolate++;
|
|
}
|
|
$this->db->free($resql);
|
|
return 1;
|
|
}
|
|
else
|
|
{
|
|
dolibarr_print_error($this->db);
|
|
$this->error=$this->db->error();
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
* \brief Renvoie nom clicable (avec eventuellement le picto)
|
|
* \param withpicto Inclut le picto dans le lien
|
|
* \param option Sur quoi pointe le lien
|
|
* \return string Chaine avec URL
|
|
*/
|
|
function getNomUrl($withpicto=0,$option='')
|
|
{
|
|
global $langs;
|
|
|
|
$result='';
|
|
|
|
$lien = '<a href="'.DOL_URL_ROOT.'/fourn/facture/fiche.php?facid='.$this->id.'">';
|
|
$lienfin='</a>';
|
|
|
|
if ($withpicto) $result.=($lien.img_object($langs->trans("ShowInvoice"),'bill').$lienfin.' ');
|
|
$result.=$lien.$this->ref.$lienfin;
|
|
return $result;
|
|
}
|
|
|
|
}
|
|
?>
|