* Copyright (C) 2004 Éric Seigne * Copyright (C) 2004 Laurent Destailleur * * 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/compta/facture.php \ingroup facture \brief Page de création d'une facture \version $Revision$ */ require("./pre.inc.php"); $user->getrights('facture'); $user->getrights('banque'); if (!$user->rights->facture->lire) accessforbidden(); $langs->load("bills"); require("../facture.class.php"); require("../lib/CMailFile.class.php"); require("../paiement.class.php"); require("../project.class.php"); require("../propal.class.php"); require("./bank/account.class.php"); require("../contrat/contrat.class.php"); require("../commande/commande.class.php"); /* * Sécurité accés client */ if ($user->societe_id > 0) { $action = ''; $socidp = $user->societe_id; } // Nombre de ligne pour choix de produit/service prédéfinis $NBLINES=4; /* * */ if ($_POST["action"] == 'classin') { $facture = new Facture($db); $facture->fetch($_POST["facid"]); $facture->classin($_POST["projetid"]); } /* * */ if ($_POST["action"] == 'add') { $datefacture = mktime(12, 0 , 0, $_POST["remonth"], $_POST["reday"], $_POST["reyear"]); $facture = new Facture($db, $_POST["socid"]); $facture->number = $_POST["facnumber"]; $facture->date = $datefacture; $facture->note = $_POST["note"]; if ($_POST["fac_rec"] > 0) { /* * Facture récurrente */ $facture->fac_rec = $_POST["fac_rec"]; $facid = $facture->create($user); } else { $facture->projetid = $_POST["projetid"]; $facture->cond_reglement = $_POST["condid"]; $facture->amount = $_POST["amount"]; $facture->remise = $_POST["remise"]; $facture->remise_percent = $_POST["remise_percent"]; if (!$_POST["propalid"] && !$_POST["commandeid"]) { for ($i = 1 ; $i <= $NBLINES ; $i++) { if ($_POST["idprod${i}"]) { $startday=''; $endday=''; if ($_POST["date_start${i}year"] && $_POST["date_start${i}month"] && $_POST["date_start${i}day"]) { $startday=$_POST["date_start${i}year"].'-'.$_POST["date_start${i}month"].'-'.$_POST["date_start${i}day"]; } if ($_POST["date_end${i}year"] && $_POST["date_end${i}month"] && $_POST["date_end${i}day"]) { $endday=$_POST["date_end${i}year"].'-'.$_POST["date_end${i}month"].'-'.$_POST["date_end${i}day"]; } $facture->add_product($_POST["idprod${i}"],$_POST["qty${i}"],$_POST["remise_percent${i}"],$startday,$endday); } } $facid = $facture->create($user); if ($facid) { Header("Location: facture.php?facid=".$facid); } } else { /* * Propale */ if ($_POST["propalid"]) { $facture->propalid = $_POST["propalid"]; $facid = $facture->create($user); if ($facid) { $prop = New Propal($db); if ( $prop->fetch($_POST["propalid"]) ) { for ($i = 0 ; $i < sizeof($prop->lignes) ; $i++) { print "
la propale précédente en ligne " . $prop->lignes[$i]->libelle . " avait comme prix : " . $prop->lignes[$i]->price . " !
\n"; $result = $facture->addline($facid, addslashes($prop->lignes[$i]->libelle), $prop->lignes[$i]->subprice, $prop->lignes[$i]->qty, $prop->lignes[$i]->tva_tx, $prop->lignes[$i]->product_id, $prop->lignes[$i]->remise_percent); } } else { print "Erreur"; } } } /* * Commande */ if ($_POST["commandeid"]) { $facture->commandeid = $_POST["commandeid"]; $facid = $facture->create($user); if ($facid) { $comm = New Commande($db); if ( $comm->fetch($_POST["commandeid"]) ) { $lines = $comm->fetch_lignes(); for ($i = 0 ; $i < sizeof($lines) ; $i++) { $result = $facture->addline($facid, addslashes($lines[$i]->description), $lines[$i]->subprice, $lines[$i]->qty, $lines[$i]->tva_tx, $lines[$i]->product_id, $lines[$i]->remise_percent); } } else { print "Erreur"; } } else { print "

Erreur : la facture n'a pas été créée, vérifier le numéro !"; print "

Retour à la propale"; print $db->error(); } } if ($facid) { Header("Location: facture.php?facid=".$facid); } } } } /* * */ if ($_POST["action"] == 'confirm_valid' && $_POST["confirm"] == yes && $user->rights->facture->valider) { $fac = new Facture($db); $fac->fetch($_GET["facid"]); $soc = new Societe($db); $soc->fetch($fac->socidp); $result = $fac->set_valid($fac->id, $user, $soc); if ($result) { facture_pdf_create($db, $fac->id); } } if ($_GET["action"] == 'payed' && $user->rights->facture->paiement) { $fac = new Facture($db); $result = $fac->set_payed($_GET["facid"]); } if ($_POST["action"] == 'setremise' && $user->rights->facture->creer) { $fac = new Facture($db); $fac->fetch($facid); $fac->set_remise($user, $_POST["remise"]); } if ($_POST["action"] == 'addligne' && $user->rights->facture->creer) { $fac = new Facture($db); $fac->fetch($_POST["facid"]); $datestart=''; $dateend=''; if ($_POST["date_startyear"] && $_POST["date_startmonth"] && $_POST["date_startday"]) { $datestart=$_POST["date_startyear"].'-'.$_POST["date_startmonth"].'-'.$_POST["date_startday"]; } if ($_POST["date_endyear"] && $_POST["date_endmonth"] && $_POST["date_endday"]) { $dateend=$_POST["date_endyear"].'-'.$_POST["date_endmonth"].'-'.$_POST["date_endday"]; } $result = $fac->addline($_POST["facid"], $_POST["desc"], $_POST["pu"], $_POST["qty"], $_POST["tva_tx"], 0, $_POST["remise_percent"], $datestart, $dateend ); $_GET["facid"]=$_POST["facid"]; // Pour réaffichage de la fiche en cours d'édition } if ($_POST["action"] == 'updateligne' && $user->rights->facture->creer) { $fac = new Facture($db,"",$_POST["facid"]); $fac->fetch($_POST["facid"]); $datestart=''; $dateend=''; if ($_POST["date_startyear"] && $_POST["date_startmonth"] && $_POST["date_startday"]) { $datestart=$_POST["date_startyear"].'-'.$_POST["date_startmonth"].'-'.$_POST["date_startday"]; } if ($_POST["date_endyear"] && $_POST["date_endmonth"] && $_POST["date_endday"]) { $dateend=$_POST["date_endyear"].'-'.$_POST["date_endmonth"].'-'.$_POST["date_endday"]; } $result = $fac->updateline($_POST["rowid"], $_POST["desc"], $_POST["price"], $_POST["qty"], $_POST["remise_percent"], $datestart, $dateend ); $_GET["facid"]=$_POST["facid"]; // Pour réaffichage de la fiche en cours d'édition } if ($_GET["action"] == 'deleteline' && $user->rights->facture->creer) { $fac = new Facture($db,"",$_GET["facid"]); $fac->fetch($_GET["facid"]); $result = $fac->deleteline($_GET["rowid"]); } if ($_POST["action"] == 'confirm_delete' && $_POST["confirm"] == yes) { if ($user->rights->facture->supprimer ) { $fac = new Facture($db); $fac->delete($_GET["facid"]); $_GET["facid"] = 0 ; Header("Location: facture.php"); } } if ($_POST["action"] == 'confirm_canceled' && $_POST["confirm"] == yes) { if ($user->rights->facture->supprimer ) { $fac = new Facture($db); $result = $fac->set_canceled($_GET["facid"]); $_GET["facid"] = 0 ; Header("Location: facture.php"); } } /* * */ if ($_POST["action"] == 'send' || $_POST["action"] == 'relance') { $fac = new Facture($db,"",$_POST["facid"]); if ( $fac->fetch($_POST["facid"]) ) { $forbidden_chars=array("/","\\",":","*","?","\"","<",">","|","[","]",",",";","="); $facref = str_replace($forbidden_chars,"_",$fac->ref); $file = FAC_OUTPUTDIR . "/" . $facref . "/" . $facref . ".pdf"; if (is_readable($file)) { if ($_POST["sendto"]) { // Le destinataire a été fourni via le champ libre $sendto = $_POST["sendto"]; $sendtoid = 0; } elseif ($_POST["receiver"]) { // Le destinataire a été fourni via la liste déroulante $soc = new Societe($db, $fac->socidp); $sendto = $soc->contact_get_email($_POST["receiver"]); $sendtoid = $_POST["receiver"]; } if (strlen($sendto)) { if ($_POST["action"] == 'send') { $subject = $langs->trans("Bill")." $fac->ref"; $actioncode=9; $actionmsg="Envoyée à $sendto"; $actionmsg2="Envoi Facture par mail"; } if ($_POST["action"] == 'relance') { $subject = "Relance facture $fac->ref"; $actioncode=10; $actionmsg="Relance envoyée à $sendto"; $actionmsg2="Relance Facture par mail"; } $message = $_POST["message"]; $filename = $fac->ref.".pdf"; $replyto = $_POST["replytoname"] . " <".$_POST["replytomail"] .">"; // Envoi de la facture $mailfile = new CMailFile($subject,$sendto,$replyto,$message,array ($file),array ("application/pdf"),array ($filename)); if ( $mailfile->sendfile() ) { $sendto = htmlentities($sendto); $sql = "INSERT INTO ".MAIN_DB_PREFIX."actioncomm (datea,fk_action,fk_soc,note,fk_facture, fk_contact,fk_user_author, label, percent) VALUES (now(), '$actioncode' ,'$fac->socidp' ,'$actionmsg','$fac->id','$sendtoid','$user->id', '$actionmsg2',100);"; if (! $db->query($sql) ) { dolibarr_print_error($db->error()); } } else { print $langs->trans("ErrorFailedToSendMail",$replyto,$sendto); } } else { dolibarr_syslog("Le mail du destinataire est vide"); } } else { dolibarr_syslog("Impossible de lire :".$file); } } else { dolibarr_syslog("Impossible de lire les données de la facture. Le fichier facture n'a peut-être pas été généré."); } } /* * Générer ou regénérer le PDF */ if ($_GET["action"] == 'pdf') { // Generation de la facture définie dans /includes/modules/facture/modules_facture.php facture_pdf_create($db, $_GET["facid"]); } llxHeader('',$langs->trans("Bill"),'Facture'); $html = new Form($db); /********************************************************************* * * Mode creation * ************************************************************************/ if ($_GET["action"] == 'create') { print_titre("Emettre une facture"); if ($propalid) { $sql = "SELECT s.nom, s.prefix_comm, s.idp, p.price, p.remise, p.remise_percent, p.tva, p.total, p.ref, ".$db->pdate("p.datep")." as dp, c.id as statut, c.label as lst"; $sql .= " FROM ".MAIN_DB_PREFIX."societe as s, ".MAIN_DB_PREFIX."propal as p, ".MAIN_DB_PREFIX."c_propalst as c"; $sql .= " WHERE p.fk_soc = s.idp AND p.fk_statut = c.id"; $sql .= " AND p.rowid = $propalid"; } else { $sql = "SELECT s.nom, s.prefix_comm, s.idp "; $sql .= "FROM ".MAIN_DB_PREFIX."societe as s "; $sql .= "WHERE s.idp = ".$_GET["socidp"]; } if ($_GET["commandeid"]) { $commande = New Commande($db); $commande->fetch($_GET["commandeid"]); $societe_id = $commande->soc_id; } if ( $db->query($sql) ) { $num = $db->num_rows(); if ($num) { $obj = $db->fetch_object(); $soc = new Societe($db); $soc->fetch($obj->idp); print '

'; print ''; print '' ."\n"; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ""; if ($conf->projet->enabled) { $langs->load("projects"); print '"; } if ($_GET["propalid"] > 0) { $amount = ($obj->price); print ''."\n"; print ''."\n"; print ''."\n"; print ''."\n"; print ''."\n"; print ''; print ''; print ''; print '"; print '"; } elseif ($_GET["commandeid"] > 0) { print ''; print ''; print ''; print '"; print '"; } else { print ''; print ''; } /* * Factures récurrentes * */ if ($_GET["propalid"] == 0 && $_GET["commandeid"] == 0) { $sql = "SELECT r.rowid, r.titre, r.amount FROM ".MAIN_DB_PREFIX."facture_rec as r"; $sql .= " WHERE r.fk_soc = ".$soc->id; if ( $db->query($sql) ) { $num = $db->num_rows(); $i = 0; if ($num > 0) { print ''; } $db->free(); } else { print "$sql"; } } /* * */ print ''; print "\n"; print "
'.$langs->trans("Customer").' :'.$soc->nom.''.$langs->trans("Comment").'
'.$langs->trans("Author").' :'.$user->fullname.''; print '
'.$langs->trans("Date").' :'; print_date_select(time()); print '
'.$langs->trans("Ref").' :Provisoire
Conditions de réglement :"; $sql = "SELECT rowid, libelle FROM ".MAIN_DB_PREFIX."cond_reglement ORDER BY sortorder"; $result = $db->query($sql); $conds=array(); if ($result) { $num = $db->num_rows(); $i = 0; while ($i < $num) { $objp = $db->fetch_object(); $conds[$objp->rowid]=$objp->libelle; $i++; } $db->free(); } $html->select_array("condid",$conds); print "
'.$langs->trans("Project").' :'; $proj = new Project($db); $html->select_array("projetid",$proj->liste_array($socidp)); print "
Proposition'.$obj->ref.'
Montant HT'.price($amount).'
TVA'.price($obj->tva)."
'.$langs->trans("TotalTTC").''.price($obj->total)."
Commande'.$commande->ref.'
Montant HT'.price($commande->total_ht).'
TVA'.price($commande->total_tva)."
'.$langs->trans("TotalTTC").''.price($commande->total_ttc)."
 
'; /* * * Liste des elements * */ $sql = "SELECT p.rowid,p.label,p.ref,p.price FROM ".MAIN_DB_PREFIX."product as p "; $sql .= " WHERE envente = 1"; $sql .= " ORDER BY p.nbvente DESC LIMIT ".$conf->liste_limit; if ( $db->query($sql) ) { $opt = ""; if ($result) { $num = $db->num_rows(); $i = 0; while ($i < $num) { $objp = $db->fetch_object(); $opt .= "\n"; $i++; } } $db->free(); } else { print $db->error(); } print ''; print ''; if ($conf->service->enabled) { print ''; } for ($i = 1 ; $i <= $NBLINES ; $i++) { print ''; print ''; print ''; print ''; // Si le module service est actif, on propose des dates de début et fin à la ligne if ($conf->service->enabled) { print ''; } print "\n"; } print '
Services/Produits prédéfinisQuan.Remise     Si produit de type service à durée limitée
% '; print 'Du '; print $html->select_date('',"date_start$i",0,0,1); print ' au '; print $html->select_date('',"date_end$i",0,0,1); print '
'; print '
Factures récurrentes :
\n"; if ($_GET["propalid"]) { /* * Produits */ print_titre("Produits"); print ''; print ''; print ''; $sql = "SELECT pt.rowid, p.label as product, p.ref, pt.price, pt.qty, p.rowid as prodid, pt.remise_percent"; $sql .= " FROM ".MAIN_DB_PREFIX."propaldet as pt, ".MAIN_DB_PREFIX."product as p WHERE pt.fk_product = p.rowid AND pt.fk_propal = $propalid"; $sql .= " ORDER BY pt.rowid ASC"; $result = $db->query($sql); if ($result) { $num = $db->num_rows(); $i = 0; $var=True; while ($i < $num) { $objp = $db->fetch_object(); $var=!$var; print "\n"; print ''; print ""; print ''; print "\n"; $i++; } } $sql = "SELECT pt.rowid, pt.description as product, pt.price, pt.qty, pt.remise_percent"; $sql .= " FROM ".MAIN_DB_PREFIX."propaldet as pt WHERE pt.fk_propal = $propalid AND pt.fk_product = 0"; $sql .= " ORDER BY pt.rowid ASC"; if ($db->query($sql)) { $num = $db->num_rows(); $i = 0; while ($i < $num) { $objp = $db->fetch_object(); $var=!$var; print "\n"; print ''; print ''; print ''; print "\n"; $i++; } } else { print $sql; } print '
'.$langs->trans("Ref").'Produit'.$langs->trans("Price").'RemiseQté.
[$objp->ref]'.$objp->product.'".price($objp->price)."'.$objp->remise_percent.' %".$objp->qty."
 '.$objp->product.''.price($objp->price).''.$objp->remise_percent.' %".$objp->qty."
'; } /* * Produits dans la commande * */ if ($_GET["commandeid"]) { print_titre("Produits"); print ''; print ''; print ''; $sql = "SELECT pt.rowid, p.label as product, p.ref, pt.subprice, pt.qty, p.rowid as prodid, pt.remise_percent"; $sql .= " FROM ".MAIN_DB_PREFIX."commandedet as pt, ".MAIN_DB_PREFIX."product as p"; $sql .= " WHERE pt.fk_product = p.rowid AND pt.fk_commande = ".$commande->id; $sql .= " ORDER BY pt.rowid ASC"; $result = $db->query($sql); if ($result) { $num = $db->num_rows(); $i = 0; $var=True; while ($i < $num) { $objp = $db->fetch_object(); $var=!$var; print "\n"; print ''; print ''; print ''; print ''; $i++; } } else { print $sql; } print '
'.$langs->trans("Ref").'Produit'.$langs->trans("Price").'RemiseQté.
[$objp->ref]'.$objp->product.''.price($objp->subprice).''.$objp->remise_percent.' %'.$objp->qty.'
'; } } } else { dolibarr_print_error($db); } } else /* *************************************************************************** */ /* */ /* Mode fiche */ /* */ /* *************************************************************************** */ { if ($_GET["facid"] > 0) { $fac = New Facture($db); if ( $fac->fetch($_GET["facid"], $user->societe_id) > 0) { $soc = new Societe($db, $fac->socidp); $soc->fetch($fac->socidp); $author = new User($db); $author->id = $fac->user_author; $author->fetch(); $h = 0; $head[$h][0] = DOL_URL_ROOT.'/compta/facture.php?facid='.$fac->id; $head[$h][1] = $langs->trans("Bill")." : $fac->ref"; $hselected = $h; $h++; $head[$h][0] = DOL_URL_ROOT.'/compta/facture/apercu.php?facid='.$fac->id; $head[$h][1] = $langs->trans("Apercu"); $h++; $head[$h][0] = DOL_URL_ROOT.'/compta/facture/note.php?facid='.$fac->id; $head[$h][1] = $langs->trans("Note"); $h++; $head[$h][0] = DOL_URL_ROOT.'/compta/facture/info.php?facid='.$fac->id; $head[$h][1] = $langs->trans("Info"); $h++; dolibarr_fiche_head($head, $hselected, $soc->nom); /* * Confirmation de la suppression de la facture * */ if ($_GET["action"] == 'delete') { $html->form_confirm($_SERVER["PHP_SELF"]."?facid=$fac->id","Supprimer la facture","Etes-vous sûr de vouloir supprimer cette facture ?","confirm_delete"); } /* * Confirmation du classement abandonné * */ if ($_GET["action"] == 'canceled') { $html->form_confirm($_SERVER["PHP_SELF"]."?facid=$fac->id","Classer la facture à l'état 'Abandonnée'","La totalité du paiement de cette facture n'a pas été réalisée. Etes-vous sûr de vouloir abandonner définitivement cette facture ?","confirm_canceled"); } /* * Confirmation de la validation * */ if ($_GET["action"] == 'valid') { $numfa = facture_get_num($soc); $html->form_confirm("facture.php?facid=$fac->id","Valider la facture sous la référence no ".$numfa,"Etes-vous sûr de vouloir valider cette facture avec la référence no $numfa ?","confirm_valid"); } /* * Facture */ print ''; print ''; print ''; print ""; print ''; print "\n"; print ""; print ''; if ($conf->projet->enabled) { $langs->load("projects"); print '"; } else { print '"; } print '"; print ""; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; if ($fac->note) { print '"; } else { print ''; } print "
'.$langs->trans("Customer").''; print ''.$soc->nom.'Conditions de réglement : " . $fac->cond_reglement ."
'.$langs->trans("Date").'".strftime("%A %d %B %Y",$fac->date)."Date limite de réglement : " . strftime("%d %B %Y",$fac->date_lim_reglement) ."
'.$langs->trans("Project").''; if ($fac->projetid > 0) { $projet = New Project($db); $projet->fetch($fac->projetid); print ''.$projet->title.''; } else { print 'Classer la facture'; } print "  '; print " '; /* * Paiements */ print $langs->trans("Payments").' :
'; $sql = "SELECT ".$db->pdate("datep")." as dp, pf.amount,"; $sql .= "c.libelle as paiement_type, p.num_paiement, p.rowid"; $sql .= " FROM ".MAIN_DB_PREFIX."paiement as p, ".MAIN_DB_PREFIX."c_paiement as c, ".MAIN_DB_PREFIX."paiement_facture as pf"; $sql .= " WHERE pf.fk_facture = ".$fac->id." AND p.fk_paiement = c.id AND pf.fk_paiement = p.rowid"; $sql .= " ORDER BY dp DESC"; $result = $db->query($sql); if ($result) { $num = $db->num_rows(); $i = 0; $total = 0; print ''; print ''; print ''; $var=True; while ($i < $num) { $objp = $db->fetch_object(); $var=!$var; print "\n"; print "\n"; print '\n"; print ""; $totalpaye += $objp->amount; $i++; } if ($fac->paye == 0) { print "\n"; print "\n"; $resteapayer = $fac->total_ttc - $totalpaye; print ""; print "\n"; } print "
Date'.$langs->trans("Type").''.$langs->trans("Amount").' 
"; print ''.img_file().''; print " ".strftime("%d %B %Y",$objp->dp)."$objp->paiement_type $objp->num_paiement'.price($objp->amount)."".MAIN_MONNAIE."
Total déjà payé:".price($totalpaye)."".MAIN_MONNAIE."
Facturé :".price($fac->total_ttc)."".MAIN_MONNAIE."
Reste à payer :".price($resteapayer)."".MAIN_MONNAIE."
"; $db->free(); } else { print $db->error(); } print "
".$langs->trans("Author")."$author->fullname
Remise globale'.$fac->remise_percent.'%
'.$langs->trans("AmountHT").''.price($fac->total_ht).''.MAIN_MONNAIE.' HT
'.$langs->trans("VAT").''.price($fac->total_tva).''.MAIN_MONNAIE.'
'.$langs->trans("AmountTTC").''.price($fac->total_ttc).''.MAIN_MONNAIE.' TTC
'.$langs->trans("Status").''.($fac->get_libstatut()).'
'.$langs->trans("Note").' : '.nl2br($fac->note)."
 

"; if ($fac->brouillon == 1 && $user->rights->facture->creer) { print '
'; print ''; print '
Remise'; print '%'; print ''; print '
'; } /* * Lignes de factures * */ $sql = "SELECT l.fk_product, l.description, l.price, l.qty, l.rowid, l.tva_taux, l.remise_percent, l.subprice, ".$db->pdate("l.date_start")." as date_start, ".$db->pdate("l.date_end")." as date_end "; $sql .= " FROM ".MAIN_DB_PREFIX."facturedet as l WHERE l.fk_facture = $fac->id ORDER BY l.rowid"; $result = $db->query($sql); if ($result) { $num_lignes = $db->num_rows(); $i = 0; $total = 0; echo ''; if ($num_lignes) { print ""; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print "\n"; } $var=True; while ($i < $num_lignes) { $objp = $db->fetch_object(); $var=!$var; print ""; if ($objp->fk_product > 0) { print ''; } else { print "\n"; } print ''; print '\n"; print ''; if ($objp->remise_percent > 0) { print '\n"; } else { print ''; } print '\n"; // Icone d'edition et suppression if ($fac->statut == 0 && $user->rights->facture->creer) { print ''; print ''; } else { print ''; } print ""; // Update ligne de facture if ($_GET["action"] == 'editline' && $_GET["rowid"] == $objp->rowid) { print ''; print ''; print ''; print ''; print ""; print ''; print ''; print ''; print ''; print ''; print ''; print '' . "\n"; if ($conf->service->enabled) { print ""; print ''; print '' . "\n"; } print "\n"; } $total = $total + ($objp->qty * $objp->price); $i++; } $db->free(); // print "
'.$langs->trans("Description").''.$langs->trans("VAT").'P.U. HT'.$langs->trans("Quantity").'Remise'.$langs->trans("AmountHT").'  
'.stripslashes(nl2br($objp->description)).''; if ($objp->date_start && $objp->date_end) { print " (Du ".dolibarr_print_date($objp->date_start)." au ".dolibarr_print_date($objp->date_end).")"; } if ($objp->date_start && ! $objp->date_end) { print " (A partir du ".dolibarr_print_date($objp->date_start).")"; } if (! $objp->date_start && $objp->date_end) { print " (Jusqu'au ".dolibarr_print_date($objp->date_end).")"; } print '".stripslashes(nl2br($objp->description)); if ($objp->date_start && $objp->date_end) { print " (Du ".dolibarr_print_date($objp->date_start)." au ".dolibarr_print_date($objp->date_end).")"; } if ($objp->date_start && ! $objp->date_end) { print " (A partir du ".dolibarr_print_date($objp->date_start).")"; } if (! $objp->date_start && $objp->date_end) { print " (Jusqu'au ".dolibarr_print_date($objp->date_end).")"; } print "'.$objp->tva_taux.' %'.price($objp->subprice)."'.$objp->qty.''.$objp->remise_percent." % '.price($objp->subprice*$objp->qty*(100-$objp->remise_percent)/100)."'; print img_edit(); print ''; print img_delete(); print '  
'; //print $html->select_tva("tva_tx",$objp->tva_taux); print "$objp->tva_taux %"; // Taux tva dépend du produit, donc on ne doit pas pouvoir le changer ici print ' %
Si produit de type service à durée limitée: Du '; print $html->select_date($objp->date_start,"date_start",0,0,$objp->date_start?0:1); print ' au '; print $html->select_date($objp->date_end,"date_end",0,0,$objp->date_end?0:1); print '
"; } else { dolibarr_print_error($db->error()); } /* * Ajouter une ligne * */ if ($fac->statut == 0 && $user->rights->facture->creer) { print "
"; print ""; print ''.$langs->trans("Description").''; print ''.$langs->trans("VAT").''; print 'P.U. HT'; print ''.$langs->trans("Quantity").''; print 'Remise'; print ' '; print ' '; print ' '; print "\n"; print ''; print ''; print ''; print ''; print $html->select_tva("tva_tx",$conf->defaulttx); print ''; print ''; print ''; print ' %'; print ''; if ($conf->service->enabled) { print ''; print 'Si produit de type service à durée limitée: Du '; print $html->select_date('',"date_start",0,0,1); print ' au '; print $html->select_date('',"date_end",0,0,1); print ''; } print ''; print "
"; } print "
\n"; /* * Fin Ajout ligne * */ print ''; if ($user->societe_id == 0 && $_GET["action"] <> 'valid') { print "
\n"; // Valider if ($fac->statut == 0 && $num_lignes > 0) { if ($user->rights->facture->valider) { print ''.$langs->trans("Valid").''; } } else { // Générer if ($fac->statut == 1 && ($fac->paye == 0 || $user->admin) && $user->rights->facture->creer) { if ($fac->paye == 0) { print "id&action=pdf\">".$langs->trans("BuildPDF").""; } else { print "id&action=pdf\">".$langs->trans("RebuildPDF").""; } } } // Supprimer if ($fac->statut == 0 && $user->rights->facture->supprimer) { print "id&action=delete\">".$langs->trans("Delete").""; } // Envoyer if ($fac->statut == 1 && $user->rights->facture->envoyer) { print "id&action=presend\">".$langs->trans("Send").""; } // Envoyer une relance if ($fac->statut == 1 && price($resteapayer) > 0 && $user->rights->facture->envoyer) { print "id&action=prerelance\">".$langs->trans("SendRemind").""; } // Emettre paiement if ($fac->statut == 1 && price($resteapayer) > 0 && $user->rights->facture->paiement) { print "id."&action=create\">".$langs->trans("DoPaiement").""; } // Classer 'payé' if ($fac->statut == 1 && price($resteapayer) <= 0 && $fac->paye == 0 && $user->rights->facture->paiement) { print "id&action=payed\">".$langs->trans("ClassifyPayed").""; } // Classer 'abandonnée' (possible si validée et pas encore classer payée) if ($fac->statut == 1 && $fac->paye == 0 && $user->rights->facture->paiement) { print "id&action=canceled\">".$langs->trans("ClassifyCanceled").""; } // Récurrente if (! defined("FACTURE_DISABLE_RECUR")) // Possibilité de désactiver les factures récurrentes { if ($fac->statut > 0) { print 'Récurrente'; } } print "
"; } print "

\n"; /* * Documents générés * */ $forbidden_chars=array("/","\\",":","*","?","\"","<",">","|","[","]",",",";","="); $facref = str_replace($forbidden_chars,"_",$fac->ref); $file = FAC_OUTPUTDIR . "/" . $facref . "/" . $facref . ".pdf"; $filedetail = FAC_OUTPUTDIR . "/" . $facref . "/" . $facref . "-detail.pdf"; print "
"; if (file_exists($file)) { $encfile = urlencode($file); print_titre("Documents"); print ''; print ""; print ''; print ''; print ''; print ''; if (file_exists($filedetail)) // facture détaillée supplémentaire { $encfile = urlencode($filedetail); print ""; print ''; print ''; print ''; print ''; } print "
Facture PDF'.$fac->ref.'.pdf'.filesize($file). ' bytes'.strftime("%d %b %Y %H:%M:%S",filemtime($file)).'
Facture détaillée'.$fac->ref.'-detail.pdf'.filesize($filedetail). ' bytes'.strftime("%d %b %Y %H:%M:%S",filemtime($filedetail)).'
\n"; } print '		'; /* * Liste des actions propres à la facture * */ $sql = "SELECT id, ".$db->pdate("a.datea")." as da, a.note, code "; $sql .= " FROM ".MAIN_DB_PREFIX."actioncomm as a, ".MAIN_DB_PREFIX."user as u "; $sql .= " WHERE a.fk_user_author = u.rowid "; $sql .= " AND a.fk_action in (9,10) "; $sql .= " AND a.fk_soc = ".$fac->socidp ; $sql .= " AND a.fk_facture = ".$fac->id; $result = $db->query($sql); if ($result) { $num = $db->num_rows(); if ($num) { print_titre($langs->trans("ActionsOnBill")); $i = 0; $total = 0; print ''; print ''; print "\n"; $var=True; while ($i < $num) { $objp = $db->fetch_object(); $var=!$var; print ""; print ''; print '\n"; print ''; print ''; print "\n"; $i++; } print "
'.$langs->trans("Ref").''.$langs->trans("Date").''.$langs->trans("Action").''.$langs->trans("By").'
'.$objp->id.''.dolibarr_print_date($objp->da)."'.stripslashes($objp->note).''.$objp->code.'
\n"; } } else { dolibarr_print_error($db); } print "
"; /* * * */ if ($_GET["action"] == 'classer') { print "

id\">\n"; print ''; print ''; print ''; print '"; print '
'.$langs->trans("Project").''; $proj = new Project($db); $html->select_array("projetid",$proj->liste_array($soc->id)); print "

'; } /* * * */ if ($_GET["action"] == 'presend') { print_titre("Envoyer la facture par mail"); $langs->load("other"); $replytoname = $user->fullname; $from_name = $replytoname; $replytomail = $user->email; $from_mail = $replytomail; $form = new Form($db); print "
\n"; print ''; print ''; print ''; print ''; print '
'; // From print ""; print ""; print ""; print "
".$langs->trans("MailFrom")."$from_name".($from_mail?" <$from_mail>":"")."
".$langs->trans("MailReply")."$replytoname".($replytomail?" <$replytomail>":""); print "
"; // To print ""; print '"; // Topic + Message $defaultmessage="Veuillez trouver ci-joint la facture $fac->ref\n\nCordialement\n\n"; $form->mail_topicmessagefile(0,1,0,$defaultmessage); print "
trans("Send")."\">
\n"; print "\n"; } if ($_GET["action"] == 'prerelance') { print_titre("Envoyer une relance par mail"); $langs->load("other"); $replytoname = $user->fullname; $from_name = $replytoname; $replytomail = $user->email; $from_mail = $replytomail; $form = new Form($db); print "\n"; print ''; print ''; print ''; print ''; print '
'; // From print "
'.$langs->trans("MailTo").''; $form->select_array("receiver",$soc->contact_email_array()); print " ".$langs->trans("or")." email\">
"; print ""; print ""; print "
".$langs->trans("MailFrom")."$from_name".($from_mail?" <$from_mail>":"")."
".$langs->trans("MailReply")."$replytoname".($replytomail?" <$replytomail>":""); print "
"; // To print ""; print '"; // Affiche la partie mail topic + message + file $defaultmessage="Nous apportons à votre connaissance que la facture ".$fac->ref." ne semble toujours pas avoir été réglée. La voici donc, pour rappel, en pièce jointe.\n\nCordialement\n\n"; $form->mail_topicmessagefile(0,1,0,$defaultmessage); print "
trans("Send")."\">
\n"; print "pdate("p.datep")." as dp, p.price, p.ref, p.rowid as propalid"; $sql .= " FROM ".MAIN_DB_PREFIX."propal as p, ".MAIN_DB_PREFIX."fa_pr as fp WHERE fp.fk_propal = p.rowid AND fp.fk_facture = $fac->id"; $result = $db->query($sql); if ($result) { $num = $db->num_rows(); if ($num) { $i = 0; $total = 0; print "

"; if ($num >1) { print_titre("Propositions commerciales associées"); } else { print_titre("Proposition commerciale associée"); } print '

'.$langs->trans("MailTo").''; $form->select_array("receiver",$soc->contact_email_array()); print " ".$langs->trans("or")." email\">
'; print ''; print ''; print ''; print ''; print "\n"; $var=True; while ($i < $num) { $objp = $db->fetch_object(); $var=!$var; print ""; print "\n"; print "\n"; print ''; print ""; $total = $total + $objp->price; $i++; } print "\n"; print "
'.$langs->trans("Ref").''.$langs->trans("Date").''.$langs->trans("Price").'
propalid\">$objp->ref".strftime("%d %B %Y",$objp->dp)."'.price($objp->price).'
".$langs->trans("TotalHT").": ".price($total)." ".MAIN_MONNAIE."
"; } } else { dolibarr_print_error($db); } } else { /* Facture non trouvée */ print "Facture inexistante"; } } else { /*************************************************************************** * * * Mode Liste * * * ***************************************************************************/ $page=$_GET["page"]; $sortorder=$_GET["sortorder"]; $sortfield=$_GET["sortfield"]; $month=$_GET["month"]; $year=$_GET["year"]; if ($page == -1) { $page = 0 ; } if ($user->rights->facture->lire) { $limit = $conf->liste_limit; $offset = $limit * $page ; if ($sortorder == "") $sortorder="DESC"; if ($sortfield == "") $sortfield="f.datef"; $sql = "SELECT s.nom,s.idp,f.facnumber,f.total,f.total_ttc,".$db->pdate("f.datef")." as df, f.paye as paye, f.rowid as facid, f.fk_statut, sum(pf.amount) as am"; $sql .= " FROM ".MAIN_DB_PREFIX."societe as s,".MAIN_DB_PREFIX."facture as f left join ".MAIN_DB_PREFIX."paiement_facture as pf on f.rowid=pf.fk_facture WHERE f.fk_soc = s.idp"; if ($socidp) $sql .= " AND s.idp = $socidp"; if ($month > 0) $sql .= " AND date_format(f.datef, '%m') = $month"; if ($_GET["filtre"]) { $filtrearr = split(",", $_GET["filtre"]); foreach ($filtrearr as $fil) { $filt = split(":", $fil); $sql .= " AND " . $filt[0] . " = " . $filt[1]; } } if ($year > 0) $sql .= " AND date_format(f.datef, '%Y') = $year"; if (strlen($_POST["sf_ref"]) > 0) { $sql .= " AND f.facnumber like '%".$_POST["sf_ref"] . "%'"; } $sql .= " GROUP BY f.facnumber"; $sql .= " ORDER BY "; $listfield=split(',',$sortfield); foreach ($listfield as $key => $value) { $sql.="$listfield[$key] $sortorder,"; } $sql .= " f.rowid DESC "; $sql .= $db->plimit($limit,$offset); $result = $db->query($sql); } if ($result) { $num = $db->num_rows(); print_barre_liste("Factures clients",$page,$_SERVER["PHP_SELF"],"&socidp=$socidp",$sortfield,$sortorder,'',$num); $i = 0; print ''; print ''; print ''; print "\n"; if ($num > 0) { $var=True; $total=0; $totalrecu=0; while ($i < min($num,$limit)) { $objp = $db->fetch_object(); $var=!$var; print ""; if ($objp->paye) { $class = "normal"; } else { if ($objp->fk_statut == 0) { $class = "normal"; } else { $class = "impayee"; } } print '\n"; if ($objp->df > 0 ) { print "\n"; } else { print "\n"; } print ''; print ""; print ""; print ""; // Affiche statut de la facture if (! $objp->paye) { if ($objp->fk_statut == 0) { print ''; } elseif ($objp->fk_statut == 3) { print ''; } else { print ''; } } else { print ''; } print "\n"; $total+=$objp->total; $total_ttc+=$objp->total_ttc; $totalrecu+=$objp->am; $i++; } if ($num <= $limit) { // Print total print ""; print ""; print ""; print ""; print ""; print ''; print "\n"; } } print "
'; print_liste_field_titre($langs->trans("Ref"),$_SERVER["PHP_SELF"],"f.facnumber","","&socidp=$socidp"); print ''; print_liste_field_titre($langs->trans("Date"),$_SERVER["PHP_SELF"],"f.datef","","&socidp=$socidp"); print ''; print_liste_field_titre($langs->trans("Company"),$_SERVER["PHP_SELF"],"s.nom","","&socidp=$socidp"); print ''; print_liste_field_titre($langs->trans("AmountHT"),$_SERVER["PHP_SELF"],"f.total","","&socidp=$socidp"); print ''; print_liste_field_titre($langs->trans("AmountTTC"),$_SERVER["PHP_SELF"],"f.total_ttc","","&socidp=$socidp"); print ''; print_liste_field_titre("Reçu",$_SERVER["PHP_SELF"],"am","","&socidp=$socidp"); print ''; print_liste_field_titre($langs->trans("Status"),$_SERVER["PHP_SELF"],"fk_statut,paye","","&socidp=$socidp"); print '
'.img_file()." \n"; print ''.$objp->facnumber.""; $y = strftime("%Y",$objp->df); $m = strftime("%m",$objp->df); print strftime("%d",$objp->df)."\n"; print ' '; print substr(strftime("%B",$objp->df),0,3)."\n"; print ' '; print strftime("%Y",$objp->df)."!!!'.$objp->nom.'".price($objp->total)."".price($objp->total_ttc)."".price($objp->am)."brouillonabandonnée'.($objp->am?"commencé":"impayée").'payée
".$langs->trans("Total").": ".price($total)."".price($total_ttc)."".price($totalrecu)." 
"; $db->free(); } else { dolibarr_print_error($db); } } } $db->close(); llxFooter("Dernière modification $Date$ révision $Revision$"); ?>