* Copyright (C) 2004 Éric Seigne * Copyright (C) 2004-2007 Laurent Destailleur * Copyright (C) 2005 Marc Barilley / Ocebo * Copyright (C) 2005-2007 Regis Houssin * Copyright (C) 2006 Andre Cianfarani * * 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'); require_once(DOL_DOCUMENT_ROOT ."/includes/modules/facture/modules_facture.php"); require_once(DOL_DOCUMENT_ROOT.'/facture.class.php'); require_once(DOL_DOCUMENT_ROOT.'/discount.class.php'); require_once(DOL_DOCUMENT_ROOT.'/paiement.class.php'); require_once(DOL_DOCUMENT_ROOT.'/lib/invoice.lib.php'); require_once(DOL_DOCUMENT_ROOT.'/lib/CMailFile.class.php'); if ($conf->projet->enabled) require_once(DOL_DOCUMENT_ROOT.'/project.class.php'); if ($conf->propal->enabled) require_once(DOL_DOCUMENT_ROOT.'/propal.class.php'); if ($conf->contrat->enabled) require_once(DOL_DOCUMENT_ROOT.'/contrat/contrat.class.php'); if ($conf->commande->enabled) require_once(DOL_DOCUMENT_ROOT.'/commande/commande.class.php'); $user->getrights('facture'); $user->getrights('banque'); if (! $user->rights->facture->lire) accessforbidden(); $langs->load('bills'); $langs->load('companies'); $langs->load('products'); $langs->load('main'); $sall=isset($_GET['sall'])?trim($_GET['sall']):trim($_POST['sall']); $mesg=isset($_GET['mesg'])?urldecode($_GET['mesg']):''; $socid=isset($_GET['socid'])?$_GET['socid']:$_POST['socid']; // Sécurité accés client if ($user->societe_id > 0) { $action = ''; $socid = $user->societe_id; } // Récupération de l'id de projet $projetid = 0; if ($_GET["projetid"]) { $projetid = $_GET["projetid"]; } // Nombre de ligne pour choix de produit/service prédéfinis $NBLINES=4; /* * Actions */ // Validation if ($_GET['action'] == 'valid') { $facture = new Facture($db); $facture->fetch($_GET['facid']); // On verifie signe facture if ($facture->type == 2) { // Si avoir, le signe doit etre négatif if ($facture->total_ht >= 0) { $mesg='

'.$langs->trans("ErrorInvoiceAvoirMustBeNegative").'

'; $_GET['action']=''; } } else { // Si non avoir, le signe doit etre positif if ($facture->total_ht < 0) { $mesg='

'.$langs->trans("ErrorInvoiceOfThisTypeMustBePositive").'

'; $_GET['action']=''; } } } if ($_POST['action'] == 'classin') { $facture = new Facture($db); $facture->fetch($_GET['facid']); $facture->classin($_POST['projetid']); } if ($_POST['action'] == 'setmode') { $facture = new Facture($db); $facture->fetch($_GET['facid']); $result=$facture->mode_reglement($_POST['mode_reglement_id']); if ($result < 0) dolibarr_print_error($facture->db,$facture->error); } if ($_POST['action'] == 'setconditions') { $facture = new Facture($db); $facture->fetch($_GET['facid']); $result=$facture->cond_reglement($_POST['cond_reglement_id']); if ($result < 0) dolibarr_print_error($facture->db,$facture->error); } if ($_REQUEST['action'] == 'setremisepercent' && $user->rights->facture->creer) { $fac = new Facture($db); $fac->fetch($_REQUEST['facid']); $result = $fac->set_remise($user, $_POST['remise_percent']); $_GET['facid']=$_REQUEST['facid']; } if ($_POST['action'] == "setabsolutediscount" && $user->rights->facture->creer) { if ($_POST["remise_id"]) { $fac = new Facture($db); $fac->id=$_GET['facid']; $ret=$fac->fetch($_GET['facid']); if ($ret > 0) { $result=$fac->insert_discount($_POST["remise_id"]); if ($result < 0) { $mesg='

'.$fac->error.'

'; } } else { dolibarr_print_error($db,$fac->error); } } } if ($_POST['action'] == 'classin') { $facture = new Facture($db); $facture->fetch($_GET['facid']); $facture->classin($_POST['projetid']); } if ($_POST['action'] == 'set_ref_client') { $facture = new Facture($db); $facture->fetch($_GET['facid']); $facture->set_ref_client($_POST['ref_client']); } // Classe à "validée" if ($_POST['action'] == 'confirm_valid' && $_POST['confirm'] == 'yes' && $user->rights->facture->valider) { $fac = new Facture($db); $fac->fetch($_GET['facid']); $fac->fetch_client(); $result = $fac->set_valid($fac->id, $user); if ($result >= 0) { if ($_REQUEST['lang_id']) { $outputlangs = new Translate(DOL_DOCUMENT_ROOT ."/langs",$conf); $outputlangs->setDefaultLang($_REQUEST['lang_id']); } facture_pdf_create($db, $fac->id, '', $fac->modelpdf, $outputlangs); } else { $mesg='

'.$fac->error.'

'; } } // Repasse la facture en mode brouillon if ($_GET['action'] == 'modif' && $user->rights->facture->modifier && $conf->global->FACTURE_ENABLE_EDITDELETE) { $fac = new Facture($db); $fac->fetch($_GET['facid']); // On vérifie si la facture a des paiements $sql = 'SELECT pf.amount'; $sql.= ' FROM '.MAIN_DB_PREFIX.'paiement_facture as pf'; $sql.= ' WHERE pf.fk_facture = '.$fac->id; $result = $db->query($sql); if ($result) { $i = 0; $num = $db->num_rows($result); while ($i < $num) { $objp = $db->fetch_object($result); $totalpaye += $objp->amount; $i++; } } $resteapayer = $fac->total_ttc - $totalpaye; // On vérifie si les lignes de factures ont été exportées en compta et/ou ventilées $ventilExportCompta = $fac->getVentilExportCompta(); // On vérifie si aucun paiement n'a été effectué if ($resteapayer == $fac->total_ttc && $fac->paye == 0 && $ventilExportCompta == 0) { $fac->set_draft($user); } } if ($_POST['action'] == 'confirm_deleteproductline' && $_POST['confirm'] == 'yes' && $conf->global->PRODUIT_CONFIRM_DELETE_LINE) { if ($user->rights->facture->creer) { $fac = new Facture($db); $fac->fetch($_GET['facid']); $fac->deleteline($_GET['rowid'], $user); if ($_REQUEST['lang_id']) { $outputlangs = new Translate(DOL_DOCUMENT_ROOT ."/langs",$conf); $outputlangs->setDefaultLang($_REQUEST['lang_id']); } facture_pdf_create($db, $fac->id, '', $fac->modelpdf, $outputlangs); } Header('Location: '.$_SERVER["PHP_SELF"].'?facid='.$_GET['facid']); exit; } // Classe à "payée" if ($_POST['action'] == 'confirm_payed' && $_POST['confirm'] == 'yes' && $user->rights->facture->paiement) { $fac = new Facture($db); $fac->fetch($_GET['facid']); $result = $fac->set_payed($user); } // Classe à "payée partiellement" if ($_POST['action'] == 'confirm_payed_partially' && $_POST['confirm'] == 'yes' && $user->rights->facture->paiement) { $fac = new Facture($db); $fac->fetch($_GET['facid']); $close_code=$_POST["close_code"]; $close_note=$_POST["close_note"]; if ($close_code) { $result = $fac->set_payed($user,$close_code,$close_note); } else { $mesg='

'.$langs->trans("ErrorFieldRequired",$langs->trans("Reason")).'

'; } } // Classe à "abandonnée" if ($_POST['action'] == 'confirm_canceled' && $_POST['confirm'] == 'yes') { $fac = new Facture($db); $fac->fetch($_GET['facid']); $close_code=$_POST["close_code"]; $close_note=$_POST["close_note"]; if ($close_code) { $result = $fac->set_canceled($user,$close_code,$close_note); } else { $mesg='

'.$langs->trans("ErrorFieldRequired",$langs->trans("Reason")).'

'; } } // Supprimer if ($_POST['action'] == 'confirm_delete' && $_POST['confirm'] == 'yes') { if ($user->rights->facture->supprimer) { $fac = new Facture($db); $result = $fac->fetch($_GET['facid']); $result = $fac->delete(); if ($result > 0) { Header('Location: '.$_SERVER["PHP_SELF"]); exit; } else { $mesg='

'.$fac->error.'

'; } } } // Convertir en reduc if ($_POST['action'] == 'confirm_converttoreduc' && $_POST['confirm'] == 'yes' && $user->rights->facture->creer) { $db->begin(); $fac = new Facture($db); $fac->fetch($_GET['facid']); $fac->fetch_client(); $fac->fetch_lines(); if (! $fac->paye) // protection against multiple submit { // Boucle sur chaque taux de tva $i=0; foreach($fac->lignes as $ligne) { $amount_ht[$ligne->tva_tx]+=$ligne->total_ht; $amount_tva[$ligne->tva_tx]+=$ligne->total_tva; $amount_ttc[$ligne->tva_tx]+=$ligne->total_ttc; $i++; } // Insère une remise par famille de taux tva $discount = new DiscountAbsolute($db); $discount->desc='(CREDIT_NOTE)'; $discount->tva_tx=abs($fac->total_ttc); $discount->fk_soc=$fac->socid; $discount->fk_facture_source=$fac->id; $error=0; foreach($amount_ht as $tva_tx => $xxx) { $discount->amount_ht=abs($amount_ht[$tva_tx]); $discount->amount_tva=abs($amount_tva[$tva_tx]); $discount->amount_ttc=abs($amount_ttc[$tva_tx]); $discount->tva_tx=abs($tva_tx); $result=$discount->create($user); if ($result < 0) { $error++; break; } } if (! $error) { // Classe facture $result=$fac->set_payed($user); if ($result > 0) { //$mesg='OK'.$discount->id; $db->commit(); } else { $mesg='

'.$fac->error.'

'; $db->rollback(); } } else { $mesg='

'.$discount->error.'

'; $db->rollback(); } } } /* * Insertion facture */ if ($_POST['action'] == 'add' && $user->rights->facture->creer) { $facture = new Facture($db); $facture->socid=$_POST['socid']; $facture->fetch_client(); $db->begin(); // Facture remplacement if ($_POST['type'] == 1) { if ($_POST['fac_replacement'] > 0) { // Si facture remplacement $datefacture = mktime(12, 0 , 0, $_POST['remonth'], $_POST['reday'], $_POST['reyear']); $result=$facture->fetch($_POST['fac_replacement']); $facture->date = $datefacture; $facture->note_public = trim($_POST['note_public']); $facture->note = trim($_POST['note']); $facture->ref_client = $_POST['ref_client']; $facture->modelpdf = $_POST['model']; $facture->projetid = $_POST['projetid']; $facture->cond_reglement_id = $_POST['cond_reglement_id']; $facture->mode_reglement_id = $_POST['mode_reglement_id']; $facture->remise_absolue = $_POST['remise_absolue']; $facture->remise_percent = $_POST['remise_percent']; // Propriétés particulieres a facture de remplacement $facture->fk_facture_source = $_POST['fac_replacement']; $facture->type = 1; $facid=$facture->create_clone($user); } else { $error=1; $mesg='

'.$langs->trans("ErrorFieldRequired",$langs->trans("ReplaceInvoice")).'

'; } } // Facture avoir if ($_POST['type'] == 2) { if ($_POST['fac_avoir'] > 0) { // Si facture avoir $datefacture = mktime(12, 0 , 0, $_POST['remonth'], $_POST['reday'], $_POST['reyear']); //$result=$facture->fetch($_POST['fac_avoir']); $facture->socid = $_POST['socid']; $facture->number = $_POST['facnumber']; $facture->date = $datefacture; $facture->note_public = trim($_POST['note_public']); $facture->note = trim($_POST['note']); $facture->ref_client = $_POST['ref_client']; $facture->modelpdf = $_POST['model']; $facture->projetid = $_POST['projetid']; $facture->cond_reglement_id = 0; $facture->mode_reglement_id = $_POST['mode_reglement_id']; $facture->remise_absolue = $_POST['remise_absolue']; $facture->remise_percent = $_POST['remise_percent']; // Propriétés particulieres a facture avoir $facture->fk_facture_source = $_POST['fac_avoir']; $facture->type = 2; $facid = $facture->create($user); } else { $error=1; $mesg='

'.$langs->trans("ErrorFieldRequired",$langs->trans("CorrectInvoice")).'

'; } } if ($_POST['type'] == 0 && $_POST['fac_rec'] > 0) { // Si facture récurrente $datefacture = mktime(12, 0 , 0, $_POST['remonth'], $_POST['reday'], $_POST['reyear']); $facture->socid = $_POST['socid']; $facture->type = $_POST['type']; $facture->number = $_POST['facnumber']; $facture->date = $datefacture; $facture->note_public = trim($_POST['note_public']); $facture->note = trim($_POST['note']); $facture->ref_client = $_POST['ref_client']; $facture->modelpdf = $_POST['model']; // Propriétés particulieres a facture recurrente $facture->fac_rec = $_POST['fac_rec']; $facture->type = 0; $facid = $facture->create($user); } if ($_POST['type'] == 0 && $_POST['fac_rec'] <= 0) { // Si facture standard $datefacture = mktime(12, 0 , 0, $_POST['remonth'], $_POST['reday'], $_POST['reyear']); $facture->socid = $_POST['socid']; $facture->type = $_POST['type']; $facture->number = $_POST['facnumber']; $facture->date = $datefacture; $facture->note_public = trim($_POST['note_public']); $facture->note = trim($_POST['note']); $facture->ref_client = $_POST['ref_client']; $facture->modelpdf = $_POST['model']; $facture->projetid = $_POST['projetid']; $facture->cond_reglement_id = $_POST['cond_reglement_id']; $facture->mode_reglement_id = $_POST['mode_reglement_id']; $facture->amount = $_POST['amount']; $facture->remise_absolue = $_POST['remise_absolue']; $facture->remise_percent = $_POST['remise_percent']; if (! $_POST['propalid'] && ! $_POST['commandeid'] && ! $_POST['contratid']) { 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); } else { /* * Si creation depuis propale */ if ($_POST['propalid']) { $facture->propalid = $_POST['propalid']; $facid = $facture->create($user); if ($facid > 0) { $prop = New Propal($db); if ( $prop->fetch($_POST['propalid']) ) { for ($i = 0 ; $i < sizeof($prop->lignes) ; $i++) { $desc=($prop->lignes[$i]->desc?$prop->lignes[$i]->desc:$prop->lignes[$i]->libelle); $result = $facture->addline( $facid, $desc, $prop->lignes[$i]->subprice, $prop->lignes[$i]->qty, $prop->lignes[$i]->tva_tx, $prop->lignes[$i]->fk_product, $prop->lignes[$i]->remise_percent, '', '', 0, $prop->lignes[$i]->info_bits, $prop->lignes[$i]->fk_remise_except ); if ($result < 0) { $error++; break; } } } else { $error++; } } else { $error++; } } /* * Si création depuis commande */ if ($_POST['commandeid']) { $facture->commandeid = $_POST['commandeid']; $facid = $facture->create($user); if ($facid > 0) { $comm = New Commande($db); if ( $comm->fetch($_POST['commandeid']) ) { $comm->fetch_lines(); $lines = $comm->lignes; for ($i = 0 ; $i < sizeof($lines) ; $i++) { $desc=($lines[$i]->desc ? $lines[$i]->desc : $lines[$i]->libelle); $result = $facture->addline( $facid, $desc, $lines[$i]->subprice, $lines[$i]->qty, $lines[$i]->tva_tx, $lines[$i]->fk_product, $lines[$i]->remise_percent, '', '', 0, $lines[$i]->info_bits, $lines[$i]->fk_remise_except ); if ($result < 0) { $error++; break; } } } else { $error++; } } else { $error++; } } /* * Si création depuis contrat */ if ($_POST['contratid']) { $facture->contratid = $_POST['contratid']; $facid = $facture->create($user); if ($facid > 0) { $contrat = New Contrat($db); if ($contrat->fetch($_POST['contratid']) > 0) { $lines = $contrat->fetch_lignes(); for ($i = 0 ; $i < sizeof($lines) ; $i++) { $desc=($contrat->lignes[$i]->desc?$contrat->lignes[$i]->desc:$contrat->lignes[$i]->libelle); // Plage de dates $date_start=$contrat->lignes[$i]->date_debut_prevue; if ($contrat->lignes[$i]->date_debut_reel) $date_start=$contrat->lignes[$i]->date_debut_reel; $date_end=$contrat->lignes[$i]->date_fin_prevue; if ($contrat->lignes[$i]->date_fin_reel) $date_end=$contrat->lignes[$i]->date_fin_reel; $result = $facture->addline( $facid, $desc, $lines[$i]->subprice, $lines[$i]->qty, $lines[$i]->tva_tx, $lines[$i]->fk_product, $lines[$i]->remise_percent, $date_start, $date_end, 0, $lines[$i]->info_bits, $lines[$i]->fk_remise_except ); if ($result < 0) { $error++; break; } } } else { $error++; } } else { $error++; } } } } // Fin création facture, on l'affiche if ($facid > 0 && ! $error) { $db->commit(); Header('Location: '.$_SERVER["PHP_SELF"].'?facid='.$facid); exit; } else { $db->rollback(); $_GET["action"]='create'; $_GET["propalid"]=$_POST["propalid"]; $_GET["commandeid"]=$_POST["commandeid"]; $_GET["contratid"]=$_POST["contratid"]; if (! $mesg) $mesg='

'.$facture->error.'

'; } } /* * Ajout d'une ligne produit dans la facture */ if (($_POST['action'] == 'addligne' || $_POST['action'] == 'addligne_predef') && $user->rights->facture->creer) { if ($_POST['qty'] && (($_POST['pu']!='' && $_POST['desc']) || $_POST['idprod'])) { $fac = new Facture($db); $ret=$fac->fetch($_POST['facid']); $ret=$fac->fetch_client(); $date_start=''; $date_end=''; // Si ajout champ produit libre if ($_POST['action'] == 'addligne') { if ($_POST['date_startyear'] && $_POST['date_startmonth'] && $_POST['date_startday']) { $date_start=$_POST['date_startyear'].'-'.$_POST['date_startmonth'].'-'.$_POST['date_startday']; } if ($_POST['date_endyear'] && $_POST['date_endmonth'] && $_POST['date_endday']) { $date_end=$_POST['date_endyear'].'-'.$_POST['date_endmonth'].'-'.$_POST['date_endday']; } } // Si ajout champ produit prédéfini if ($_POST['action'] == 'addligne_predef') { if ($_POST['date_start_predefyear'] && $_POST['date_start_predefmonth'] && $_POST['date_start_predefday']) { $date_start=$_POST['date_start_predefyear'].'-'.$_POST['date_start_predefmonth'].'-'.$_POST['date_start_predefday']; } if ($_POST['date_end_predefyear'] && $_POST['date_end_predefmonth'] && $_POST['date_end_predefday']) { $date_end=$_POST['date_end_predefyear'].'-'.$_POST['date_end_predefmonth'].'-'.$_POST['date_end_predefday']; } } $price_base_type = 'HT'; // Ecrase $pu par celui du produit // Ecrase $desc par celui du produit // Ecrase $txtva par celui du produit // Ecrase $base_price_type par celui du produit if ($_POST['idprod']) { $prod = new Product($db, $_POST['idprod']); $prod->fetch($_POST['idprod']); $price_base_type = $prod->price_base_type; // multiprix if ($conf->global->PRODUIT_MULTIPRICES == 1) { $pu = $prod->multiprices[$fac->client->price_level]; $pu_ttc = $prod->multiprices_ttc[$fac->client->price_level]; $price_base_type = $prod->multiprices_base_type[$fac->client->price_level]; } else { $pu = $prod->price; $pu_ttc = $prod->price_ttc; } // La description de la ligne est celle saisie ou // celle du produit si (non saisi + PRODUIT_CHANGE_PROD_DESC défini) // \todo Ne faut-il pas rendre $conf->global->PRODUIT_CHANGE_PROD_DESC toujours a on $desc=$_POST['desc']; if (! $desc && $conf->global->PRODUIT_CHANGE_PROD_DESC) { $desc = $prod->description; } $tva_tx = get_default_tva($mysoc,$fac->client,$prod->tva_tx); } else { $pu=$_POST['pu']; $tva_tx=$_POST['tva_tx']; $desc=$_POST['desc']; } // Insere ligne $result = $fac->addline( $_POST['facid'], $desc, $pu, $_POST['qty'], $tva_tx, $_POST['idprod'], $_POST['remise_percent'], $date_start, $date_end, 0, '', '', $price_base_type, $pu_ttc ); } $_GET['facid']=$_POST['facid']; // Pour réaffichage de la fiche en cours d'édition } if ($_POST['action'] == 'updateligne' && $user->rights->facture->creer && $_POST['save'] == $langs->trans('Save')) { $fac = new Facture($db,'',$_POST['facid']); if (! $fac->fetch($_POST['facid']) > 0) dolibarr_print_error($db); $date_start=''; $date_end=''; if ($_POST['date_startyear'] && $_POST['date_startmonth'] && $_POST['date_startday']) { $date_start=$_POST['date_startyear'].'-'.$_POST['date_startmonth'].'-'.$_POST['date_startday']; } if ($_POST['date_endyear'] && $_POST['date_endmonth'] && $_POST['date_endday']) { $date_end=$_POST['date_endyear'].'-'.$_POST['date_endmonth'].'-'.$_POST['date_endday']; } $result = $fac->updateline($_POST['rowid'], $_POST['desc'], $_POST['price'], $_POST['qty'], $_POST['remise_percent'], $date_start, $date_end, $_POST['tva_tx'] ); if ($_REQUEST['lang_id']) { $outputlangs = new Translate(DOL_DOCUMENT_ROOT ."/langs",$conf); $outputlangs->setDefaultLang($_REQUEST['lang_id']); } facture_pdf_create($db, $fac->id, '', $fac->modelpdf, $outputlangs); $_GET['facid']=$_POST['facid']; // Pour réaffichage de la fiche en cours d'édition } if ($_POST['action'] == 'updateligne' && $user->rights->facture->creer && $_POST['cancel'] == $langs->trans('Cancel')) { Header('Location: '.$_SERVER["PHP_SELF"].'?facid='.$_POST['facid']); // Pour réaffichage de la fiche en cours d'édition exit; } if ($_GET['action'] == 'deleteline' && $user->rights->facture->creer && ! $conf->global->PRODUIT_CONFIRM_DELETE_LINE) { $fac = new Facture($db,'',$_GET['facid']); $fac->fetch($_GET['facid']); $result = $fac->deleteline($_GET['rowid'], $user); if ($result > 0) { if ($_REQUEST['lang_id']) { $outputlangs = new Translate(DOL_DOCUMENT_ROOT ."/langs",$conf); $outputlangs->setDefaultLang($_REQUEST['lang_id']); } // facture_pdf_create($db, $fac->id, '', $fac->modelpdf, $outputlangs); } else { print $fac->error; } } /* * Ordonnancement des lignes */ if ($_GET['action'] == 'up' && $user->rights->facture->creer) { $fac = new Facture($db,'',$_GET['facid']); $fac->fetch($_GET['facid']); $fac->line_up($_GET['rowid']); if ($_REQUEST['lang_id']) { $outputlangs = new Translate(DOL_DOCUMENT_ROOT ."/langs",$conf); $outputlangs->setDefaultLang($_REQUEST['lang_id']); } facture_pdf_create($db, $fac->id, '', $fac->modelpdf, $outputlangs); Header ('Location: '.$_SERVER["PHP_SELF"].'?facid='.$_GET["facid"].'#'.$_GET['rowid']); } if ($_GET['action'] == 'down' && $user->rights->facture->creer) { $fac = new Facture($db,'',$_GET['facid']); $fac->fetch($_GET['facid']); $fac->line_down($_GET['rowid']); if ($_REQUEST['lang_id']) { $outputlangs = new Translate(DOL_DOCUMENT_ROOT ."/langs",$conf); $outputlangs->setDefaultLang($_REQUEST['lang_id']); } facture_pdf_create($db, $fac->id, '', $fac->modelpdf, $outputlangs); Header ('Location: '.$_SERVER["PHP_SELF"].'?facid='.$_GET["facid"].'#'.$_GET['rowid']); } /* * Action envoi de mail */ if (($_POST['action'] == 'send' || $_POST['action'] == 'relance') && ! $_POST['cancel']) { $langs->load('mails'); $fac = new Facture($db,'',$_POST['facid']); if ( $fac->fetch($_POST['facid']) ) { $facref = sanitize_string($fac->ref); $file = $conf->facture->dir_output . '/' . $facref . '/' . $facref . '.pdf'; if (is_readable($file)) { $fac->fetch_client(); 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 if ($_POST['receiver'] < 0) // Id du tiers { $sendto = $fac->client->email; $sendtoid = 0; } else // Id du contact { $sendto = $fac->client->contact_get_email($_POST['receiver']); $sendtoid = $_POST['receiver']; } } if (strlen($sendto)) { $from = $_POST['fromname'] . ' <' . $_POST['frommail'] .'>'; $replyto = $_POST['replytoname']. ' <' . $_POST['replytomail'].'>'; $message = $_POST['message']; $sendtocc = $_POST['sendtocc']; $deliveryreceipt = $_POST['deliveryreceipt']; if ($_POST['action'] == 'send') { if(strlen($_POST['subject'])) { $subject = $_POST['subject']; } else { $subject = $langs->trans('Bill').' '.$fac->ref; } $actiontypecode='AC_FAC'; $actionmsg ='Mail envoyé par '.$from.' à '.$sendto.'.
'; if ($message) { $actionmsg.='Texte utilisé dans le corps du message:
'; $actionmsg.=$message; } $actionmsg2='Envoi facture par mail'; } if ($_POST['action'] == 'relance') { $subject = 'Relance facture '.$fac->ref; $actiontypecode='AC_FAC'; $actionmsg='Mail envoyé par '.$from.' à '.$sendto.'.
'; if ($message) { $actionmsg.='Texte utilisé dans le corps du message:
'; $actionmsg.=$message; } $actionmsg2='Relance facture par mail'; } $filepath[0] = $file; $filename[0] = $fac->ref.'.pdf'; $mimetype[0] = 'application/pdf'; if ($_FILES['addedfile']['tmp_name']) { $filepath[1] = $_FILES['addedfile']['tmp_name']; $filename[1] = $_FILES['addedfile']['name']; $mimetype[1] = $_FILES['addedfile']['type']; } // Envoi de la facture $mailfile = new CMailFile($subject,$sendto,$from,$message,$filepath,$mimetype,$filename,$sendtocc,'',$deliveryreceipt); if ($mailfile->error) { $mesg='

'.$mailfile->error.'

'; } else { $result=$mailfile->sendfile(); if ($result) { $mesg='

'.$langs->trans('MailSuccessfulySent',$from,$sendto).'.

'; // Insertion action require_once(DOL_DOCUMENT_ROOT.'/contact.class.php'); require_once(DOL_DOCUMENT_ROOT.'/actioncomm.class.php'); $actioncomm = new ActionComm($db); $actioncomm->type_code = $actiontypecode; $actioncomm->label = $actionmsg2; $actioncomm->note = $actionmsg; $actioncomm->date = time(); // L'action est faite maintenant $actioncomm->percent = 100; $actioncomm->contact = new Contact($db,$sendtoid); $actioncomm->societe = new Societe($db,$fac->socid); $actioncomm->user = $user; // User qui a fait l'action $actioncomm->facid = $fac->id; $ret=$actioncomm->add($user); // User qui saisit l'action if ($ret < 0) { dolibarr_print_error($db); } else { // Renvoie sur la fiche Header('Location: '.$_SERVER["PHP_SELF"].'?facid='.$fac->id.'&mesg='.urlencode($mesg)); exit; } } else { $langs->load("other"); $mesg='

'; if ($mailfile->error) { $mesg.=$langs->trans('ErrorFailedToSendMail',$from,$sendto); $mesg.='
'.$mailfile->error; } else { $mesg.='No mail sent. Feature is disabled by option MAIN_DISABLE_ALL_MAILS'; } $mesg.='

'; } } } else { $langs->load("other"); $mesg='

'.$langs->trans('ErrorMailRecipientIsEmpty').'

'; dolibarr_syslog('Recipient email is empty'); } } else { $langs->load("other"); $mesg='

'.$langs->trans('ErrorCantReadFile',$file).'

'; dolibarr_syslog('Failed to read file: '.$file); } } else { $langs->load("other"); $mesg='

'.$langs->trans('ErrorFailedToReadEntity',$langs->trans("Invoice")).'

'; 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 document PDF */ if ($_REQUEST['action'] == 'builddoc') // En get ou en post { $fac = new Facture($db, 0, $_GET['facid']); $fac->fetch($_GET['facid']); if ($_REQUEST['model']) { $fac->set_pdf_model($user, $_REQUEST['model']); } if ($_REQUEST['lang_id']) { $outputlangs = new Translate(DOL_DOCUMENT_ROOT ."/langs",$conf); $outputlangs->setDefaultLang($_REQUEST['lang_id']); } $result=facture_pdf_create($db, $fac->id, '', $fac->modelpdf, $outputlangs); if ($result <= 0) { dolibarr_print_error($db,$result); exit; } else { Header ('Location: '.$_SERVER["PHP_SELF"].'?facid='.$fac->id.'#builddoc'); } } /********************************************************************* * * Fonctions internes * **********************************************************************/ function print_date_range($date_start,$date_end) { global $langs; if ($date_start && $date_end) { print ' ('.$langs->trans('DateFromTo',dolibarr_print_date($date_start),dolibarr_print_date($date_end)).')'; } if ($date_start && ! $date_end) { print ' ('.$langs->trans('DateFrom',dolibarr_print_date($date_start)).')'; } if (! $date_start && $date_end) { print ' ('.$langs->trans('DateUntil',dolibarr_print_date($date_end)).')'; } } llxHeader('',$langs->trans('Bill'),'Facture'); $html = new Form($db); /********************************************************************* * * Mode creation * **********************************************************************/ if ($_GET['action'] == 'create') { $facturestatic=new Facture($db); print_titre($langs->trans('NewBill')); if ($mesg) print $mesg; $soc = new Societe($db); if ($_GET['propalid']) { $propal = New Propal($db); $propal->fetch($_GET['propalid']); $propal->fetch_client(); $projetid=$propal->projetidp; $ref_client=$propal->ref_client; $soc=$propal->client; $cond_reglement_id = $propal->cond_reglement_id; $mode_reglement_id = $propal->mode_reglement_id; $remise_percent = $propal->remise_percent; $remise_absolue = $propal->remise_absolue; } elseif ($_GET['commandeid']) { $commande = New Commande($db); $commande->fetch($_GET['commandeid']); $commande->fetch_client(); $projetid=$commande->projet_id; $ref_client=$commande->ref_client; $soc=$commande->client; $cond_reglement_id = $commande->cond_reglement_id; $mode_reglement_id = $commande->mode_reglement_id; $remise_percent = $commande->remise_percent; $remise_absolue = $commande->remise_absolue; } elseif ($_GET['contratid']) { $contrat = New Contrat($db); $contrat->fetch($_GET['contratid']); $contrat->fetch_client(); $projetid=$contrat->fk_projet; $soc=$contrat->client; $cond_reglement_id = $soc->cond_reglement; $mode_reglement_id = $soc->mod_reglement; $remise_percent = $soc->remise_client; $remise_absolue = 0; } else { $soc->fetch($socid); $cond_reglement_id = $soc->cond_reglement; $mode_reglement_id = $soc->mode_reglement; $remise_percent = $soc->remise_client; $remise_absolue = 0; } $absolute_discount=$soc->getCurrentDiscount(); print '

'; print ''; print '' ."\n"; print ''; print ''; // Ref print ''; /* \todo L'info "Reference commande client" est une carac de la commande et non de la facture. Elle devrait donc etre stockée sur l'objet commande liée à la facture et non sur la facture. Pour ceux qui veulent l'utiliser au niveau de la facture, positionner la constante FAC_USE_CUSTOMER_ORDER_REF à 1. */ if ($conf->global->FAC_USE_CUSTOMER_ORDER_REF) { print ''; } // Tiers print ''; print ''."\n"; // Type de facture $facids=$facturestatic->list_replacable_invoices($soc->id); if ($facids < 0) { dolibarr_print_error($db,$facturestatic); exit; } $options=""; foreach ($facids as $facparam) { $options.=''; } $facids=$facturestatic->list_qualified_avoir_invoices($soc->id); $optionsav=""; foreach ($facids as $key => $value) { $optionsav.=''; } print ''; // Ligne info remises tiers print ''; // Date facture print ''; // Conditions de réglement print ''; // Mode de réglement print ''; // Projet if ($conf->projet->enabled) { $langs->load('projects'); print ''; } // Modele PDF print ''; print '"; // Note publique print ''; print ''; print ''; // Note privée if (! $user->societe_id) { print ''; print ''; print ''; } if ($_GET['propalid'] > 0) { print ''."\n"; print ''."\n"; print ''."\n"; //print ''."\n"; //print ''."\n"; print ''; print ''; print ''; print '"; print '"; } elseif ($_GET['commandeid'] > 0) { print ''."\n"; print ''."\n"; print ''."\n"; //print ''."\n"; //print ''."\n"; print ''; print ''; print ''; print '"; print '"; } elseif ($_GET['contratid'] > 0) { // Calcul contrat->price (HT), contrat->total (TTC), contrat->tva $contrat->remise_absolue=$remise_absolue; $contrat->remise_percent=$remise_percent; $contrat->update_price(); print ''."\n"; print ''."\n"; print ''."\n"; // print ''."\n"; // print ''."\n"; print ''; print ''; print ''; print '"; print '"; } else { if ($conf->global->PRODUCT_SHOW_WHEN_CREATE) { print ''; } } /* * Factures récurrentes */ if (! $conf->global->FACTURE_DISABLE_RECUR) { if ($_GET['propalid'] == 0 && $_GET['commandeid'] == 0 && $_GET['contratid'] == 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 { dolibarr_print_error($db); } } } // Bouton "Create Draft" print ''; print "

'.$langs->trans('Ref').'

'.$langs->trans('Draft').'

'.$langs->trans('RefCustomerOrder').'

'; print ''; print '

'.$langs->trans('Company').'

'; print $soc->getNomUrl(1); print ''; print '

'.$langs->trans('Type').'

'; print ''."\n"; print ''."\n"; print ''."\n"; print ''."\n"; print '

'; print ''; print '	'; $desc=$html->textwithhelp($langs->trans("InvoiceStandardAsk"),$langs->transnoentities("InvoiceStandardDesc"),1); print $desc; print '
'; print ''; print '	'; $text=$langs->trans("InvoiceReplacementAsk").' '; $text.=''; $desc=$html->textwithhelp($text,$langs->transnoentities("InvoiceReplacementDesc"),1); print $desc; print '
'; print ''; print '	'; $text=$langs->transnoentities("InvoiceAvoirAsk").' '; // $text.=''; $text.=''; $desc=$html->textwithhelp($text,$langs->transnoentities("InvoiceAvoirDesc"),1); //.' ('.$langs->trans("FeatureNotYetAvailable").')',$langs->transnoentities("InvoiceAvoirDesc"),1); print $desc; print '

'; print '

'.$langs->trans('Discounts').'

'.$langs->trans('Date').'

'; $html->select_date('','','','','',"add"); print '

'.$langs->trans('PaymentConditionsShort').'

'; $html->select_conditions_paiements($cond_reglement_id,'cond_reglement_id'); print '

'.$langs->trans('PaymentMode').'

'; $html->select_types_paiements($mode_reglement_id,'mode_reglement_id'); print '

'.$langs->trans('Project').'

'; $html->select_projects($soc->id, $projetid, 'projetid'); print '

'.$langs->trans('Model').'

'; include_once(DOL_DOCUMENT_ROOT.'/includes/modules/facture/modules_facture.php'); $model=new ModelePDFFactures(); $liste=$model->liste_modeles($db); $html->select_array('model',$liste,$conf->global->FACTURE_ADDON_PDF); print "

'.$langs->trans('NotePublic').'

'; print '

'.$langs->trans('NotePrivate').'

'; print '

'.$langs->trans('Proposal').'

'.img_object($langs->trans("ShowPropal"),'propal').' '.$propal->ref.'

'.$langs->trans('TotalHT').'

'.price($propal->price).'

'.$langs->trans('TotalVAT').'

'.price($propal->total_tva)."

'.$langs->trans('TotalTTC').'

'.price($propal->total)."

'.$langs->trans('Order').'

'.img_object($langs->trans("ShowOrder"),'order').' '.$commande->ref.'

'.$langs->trans('TotalHT').'

'.price($commande->total_ht).'

'.$langs->trans('TotalVAT').'

'.price($commande->total_tva)."

'.$langs->trans('TotalTTC').'

'.price($commande->total_ttc)."

'.$langs->trans('Contract').'

'.img_object($langs->trans("ShowContract"),'contract').' '.$contrat->ref.'

'.$langs->trans('TotalHT').'

'.price($contrat->total_ht).'

'.$langs->trans('TotalVAT').'

'.price($contrat->total_tva)."

'.$langs->trans('TotalTTC').'

'.price($contrat->total_ttc)."

'; // Zone de choix des produits prédéfinis à la création print ''; print ''; print ''; print ''; print ''; if ($conf->service->enabled) { print ''; } print ''; for ($i = 1 ; $i <= $NBLINES ; $i++) { print ''; 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 '

'.$langs->trans('ProductsAndServices').'	'.$langs->trans('Qty').'	'.$langs->trans('ReductionShort').'		'.$langs->trans('ServiceLimitedDuration').'
'; // multiprix if($conf->global->PRODUIT_MULTIPRICES == 1) $html->select_produits('','idprod'.$i,'',$conf->produit->limit_size,$soc->price_level); else $html->select_produits('','idprod'.$i,'',$conf->produit->limit_size); print '		%		'; print $langs->trans('From').' '; print $html->select_date('','date_start'.$i,0,0,1,"add"); print ' '.$langs->trans('to').' '; print $html->select_date('','date_end'.$i,0,0,1,"add"); print '

'; print '

'.$langs->trans('CreateFromRepeatableInvoice').' :

\n"; print "

\n"; // Si creation depuis un propal if ($_GET['propalid']) { $title=$langs->trans('ProductsAndServices'); $sql = 'SELECT pt.rowid, pt.description, pt.price, pt.fk_product, pt.fk_remise_except,'; $sql.= ' pt.qty, pt.tva_tx, pt.remise_percent, pt.subprice, pt.info_bits,'; $sql.= ' p.label as product, p.ref, p.fk_product_type, p.rowid as prodid,'; $sql.= ' p.description as product_desc'; $sql.= ' FROM '.MAIN_DB_PREFIX.'propaldet as pt'; $sql.= ' LEFT JOIN '.MAIN_DB_PREFIX.'product as p ON pt.fk_product=p.rowid'; $sql.= ' WHERE pt.fk_propal = '.$_GET['propalid']; $sql.= ' ORDER BY pt.rang ASC, pt.rowid'; } if ($_GET['commandeid']) { $title=$langs->trans('Products'); $sql = 'SELECT pt.rowid, pt.subprice, pt.tva_tx, pt.qty, pt.fk_remise_except, pt.remise_percent, pt.description, pt.info_bits,'; $sql.= ' p.label as product, p.ref, p.rowid as prodid'; $sql.= ' FROM '.MAIN_DB_PREFIX.'commandedet as pt'; $sql.= ' LEFT JOIN '.MAIN_DB_PREFIX.'product as p ON pt.fk_product = p.rowid'; $sql.= ' WHERE pt.fk_commande = '.$commande->id; $sql.= ' ORDER BY pt.rowid ASC'; } if ($_GET['contratid']) { $title=$langs->trans('Services'); $sql = 'SELECT pt.rowid, pt.subprice, pt.tva_tx, pt.qty, pt.remise_percent, pt.description, pt.info_bits,'; $sql.= ' pt.date_ouverture_prevue as date_debut_prevue, pt.date_ouverture as date_debut_reel,'; $sql.= ' pt.date_fin_validite as date_fin_prevue, pt.date_cloture as date_fin_reel,'; $sql.= ' p.label as product, p.ref, p.rowid as prodid'; $sql.= ' FROM '.MAIN_DB_PREFIX.'contratdet as pt'; $sql.= ' LEFT JOIN '.MAIN_DB_PREFIX.'product as p ON pt.fk_product = p.rowid'; $sql.= ' WHERE pt.fk_contrat = '.$contrat->id; $sql.= ' ORDER BY pt.rowid ASC'; } if ($_GET['propalid'] || $_GET['commandeid'] || $_GET['contratid']) { print '
'; print_titre($title); print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; // Lignes $resql = $db->query($sql); if ($resql) { $num = $db->num_rows($resql); $i = 0; $var=True; while ($i < $num) { $objp = $db->fetch_object($resql); $var=!$var; print '\n"; print ''; print ''; print ''; print ''; print ''; print ''; $i++; } } else { dolibarr_print_error($db); } print '

'.$langs->trans('Ref').'	'.$langs->trans('Description').'	'.$langs->trans('VAT').'	'.$langs->trans('PriceUHT').'	'.$langs->trans('Qty').'	'.$langs->trans('ReductionShort').'
'; if (($objp->info_bits & 2) == 2) { print ''; print img_object($langs->trans("ShowReduc"),'reduc').' '.$langs->trans("Discount"); print ''; } else if ($objp->prodid) { print ''.img_object($langs->trans(''),'service').' '.$objp->ref.''; print $objp->product?' - '.$objp->product:''; // Plage de dates si contrat if ($_GET['contratid']) { $date_start=$objp->date_debut_prevue; if ($objp->date_debut_reel) $date_start=$objp->date_debut_reel; $date_end=$objp->date_fin_prevue; if ($objp->date_fin_reel) $date_end=$objp->date_fin_reel; print_date_range($date_start,$date_end); } } else { print ' '; } print "	'; if ($objp->description) { if ($objp->description == '(CREDIT_NOTE)') { $discount=new DiscountAbsolute($db); $discount->fetch($objp->fk_remise_except); print $langs->transnoentities("DiscountFromCreditNote",$discount->getNomUrl(0)); } else { print dolibarr_trunc($objp->description,60); } } print '	'.$objp->tva_tx.'%	'.price($objp->subprice).'	'; print (($objp->info_bits & 2) != 2) ? $objp->qty : ' '; print '	'; print (($objp->info_bits & 2) != 2) ? $objp->remise_percent.'%' : ' '; print '

'; } } else { /* *************************************************************************** */ /* */ /* Fiche en mode visu */ /* */ /* *************************************************************************** */ $id = $_GET['facid']; if ($id > 0) { if ($mesg) print $mesg.'
'; $fac = New Facture($db); if ($fac->fetch($_GET['facid'])) { if ($user->societe_id>0 && $user->societe_id!=$fac->socid) accessforbidden('',0); $soc = new Societe($db, $fac->socid); $soc->fetch($fac->socid); $absolute_discount=$soc->getCurrentDiscount(); $totalpaye = $fac->getSommePaiement(); $resteapayer = $fac->total_ttc - $totalpaye; if ($fac->paye) $resteapayer=0; $author = new User($db); if ($fac->user_author) { $author->id = $fac->user_author; $author->fetch(); } $facidnext=$fac->getIdReplacingInvoice(); $head = facture_prepare_head($fac); dolibarr_fiche_head($head, 'compta', $langs->trans('InvoiceCustomer')); /* * Confirmation de la conversion de l'avoir en reduc */ if ($_GET['action'] == 'converttoreduc') { $text=$langs->trans('ConfirmConvertToReduc'); $html->form_confirm($_SERVER['PHP_SELF'].'?facid='.$fac->id,$langs->trans('ConvertToReduc'),$text,'confirm_converttoreduc'); print '
'; } /* * Confirmation de la suppression de la facture */ if ($_GET['action'] == 'delete') { $text=$langs->trans('ConfirmDeleteBill'); $html->form_confirm($_SERVER['PHP_SELF'].'?facid='.$fac->id,$langs->trans('DeleteBill'),$text,'confirm_delete'); print '
'; } /* * Confirmation de la validation */ if ($_GET['action'] == 'valid') { // on vérifie si la facture est en numérotation provisoire $facref = substr($fac->ref, 1, 4); if ($facref == 'PROV') { $numfa = $fac->getNextNumRef($soc); } else { $numfa = $fac->ref; } $text=$langs->trans('ConfirmValidateBill',$numfa); if ($conf->notification->enabled) { require_once(DOL_DOCUMENT_ROOT ."/notify.class.php"); $notify=new Notify($db); $text.='
'; $text.=$notify->confirmMessage(2,$fac->socid); } $html->form_confirm($_SERVER["PHP_SELF"].'?facid='.$fac->id,$langs->trans('ValidateBill'),$text,'confirm_valid'); print '
'; } /* * Confirmation du classement payé */ if ($_GET['action'] == 'payed' && $resteapayer <= 0) { $html->form_confirm($_SERVER["PHP_SELF"].'?facid='.$fac->id,$langs->trans('ClassifyPayed'),$langs->trans('ConfirmClassifyPayedBill',$fac->ref),'confirm_payed'); print '
'; } if ($_GET['action'] == 'payed' && $resteapayer > 0) { // Code $i=0; $close[$i]['code']='discount_vat';$i++; $close[$i]['code']='badcustomer';$i++; //$close[$i]['code']='product_returned';$i++; $close[$i]['code']='abandon';$i++; // Help $i=0; $close[$i]['label']=$langs->trans("HelpEscompte").'

'.$langs->trans("ConfirmClassifyPayedPartiallyReasonDiscountVatDesc");$i++; $close[$i]['label']=$langs->trans("ConfirmClassifyPayedPartiallyReasonBadCustomerDesc");$i++; //$close[$i]['label']=$langs->trans("ConfirmClassifyPayedPartiallyReasonProductReturned");$i++; $close[$i]['label']=$langs->trans("ConfirmClassifyPayedPartiallyReasonOtherDesc");$i++; // Texte $i=0; $close[$i]['reason']=$html->textwithhelp($langs->transnoentities("ConfirmClassifyPayedPartiallyReasonDiscountVat",$resteapayer,$langs->trans("Currency".$conf->monnaie)),$close[$i]['label'],1);$i++; $close[$i]['reason']=$html->textwithhelp($langs->transnoentities("ConfirmClassifyPayedPartiallyReasonBadCustomer",$resteapayer,$langs->trans("Currency".$conf->monnaie)),$close[$i]['label'],1);$i++; //$close[$i]['reason']=$html->textwithhelp($langs->transnoentities("ConfirmClassifyPayedPartiallyReasonProductReturned",$resteapayer,$langs->trans("Currency".$conf->monnaie)),$close[$i]['label'],1);$i++; $close[$i]['reason']=$html->textwithhelp($langs->transnoentities("ConfirmClassifyPayedPartiallyReasonOther",$resteapayer,$langs->trans("Currency".$conf->monnaie)),$close[$i]['label'],1);$i++; // arrayreasons[code]=reason foreach($close as $key => $val) { $arrayreasons[$close[$key]['code']]=$close[$key]['reason']; } // Crée un tableau formulaire $formquestion=array( 'text' => $langs->trans("ConfirmClassifyPayedPartiallyQuestion"), array('type' => 'radio', 'name' => 'close_code', 'label' => $langs->trans("Reason"), 'values' => $arrayreasons), array('type' => 'text', 'name' => 'close_note', 'label' => $langs->trans("Comment"), 'value' => '', 'size' => '100') ); // Paiement incomplet. On demande si motif = escompte ou autre $html->form_confirm($_SERVER["PHP_SELF"].'?facid='.$fac->id,$langs->trans('ClassifyPayed'),$langs->trans('ConfirmClassifyPayedPartially',$fac->ref),'confirm_payed_partially',$formquestion); print '
'; } /* * Confirmation du classement abandonne */ if ($_GET['action'] == 'canceled') { // S'il y a une facture de remplacement pas encore validée (etat brouillon), // on ne permet pas de classer abandonner la facture. if ($facidnext) { $facturereplacement=new Facture($db); $facturereplacement->fetch($facidnext); $statusreplacement=$facturereplacement->statut; } if ($facidnext && $statusreplacement == 0) { print '

'.$langs->trans("ErrorCantCancelIfReplacementInvoiceNotValidated").'

'; } else { // Code $close[1]['code']='badcustomer'; $close[2]['code']='abandon'; // Help $close[1]['label']=$langs->trans("ConfirmClassifyPayedPartiallyReasonBadCustomerDesc"); $close[2]['label']=$langs->trans("ConfirmClassifyAbandonReasonOtherDesc"); // Texte $close[1]['reason']=$html->textwithhelp($langs->transnoentities("ConfirmClassifyPayedPartiallyReasonBadCustomer",$fac->ref),$close[1]['label'],1); $close[2]['reason']=$html->textwithhelp($langs->transnoentities("ConfirmClassifyAbandonReasonOther"),$close[2]['label'],1); // arrayreasons $arrayreasons[$close[1]['code']]=$close[1]['reason']; $arrayreasons[$close[2]['code']]=$close[2]['reason']; // Crée un tableau formulaire $formquestion=array( 'text' => $langs->trans("ConfirmCancelBillQuestion"), array('type' => 'radio', 'name' => 'close_code', 'label' => $langs->trans("Reason"), 'values' => $arrayreasons), array('type' => 'text', 'name' => 'close_note', 'label' => $langs->trans("Comment"), 'value' => '', 'size' => '100') ); $html->form_confirm($_SERVER['PHP_SELF'].'?facid='.$fac->id,$langs->trans('CancelBill'),$langs->trans('ConfirmCancelBill',$fac->ref),'confirm_canceled',$formquestion); print '
'; } } /* * Confirmation de la suppression d'une ligne produit */ if ($_GET['action'] == 'delete_product_line' && $conf->global->PRODUIT_CONFIRM_DELETE_LINE) { $html->form_confirm($_SERVER["PHP_SELF"].'?facid='.$fac->id.'&rowid='.$_GET["rowid"], $langs->trans('DeleteProductLine'), $langs->trans('ConfirmDeleteProductLine'), 'confirm_deleteproductline'); print '
'; } /* * Facture */ print ''; // Reference print ''; // Ref client /* \todo L'info "Reference commande client" est une carac de la commande et non de la facture. Elle devrait donc etre stockée sur l'objet commande lié à la facture et non sur la facture. Pour ceux qui utilisent ainsi, positionner la constante FAC_USE_CUSTOMER_ORDER_REF à 1. */ if ($conf->global->FAC_USE_CUSTOMER_ORDER_REF) { print ''; print ''; } // Tiers Société print ''; print ''; print ''; // Type print ''; // Ligne info remises tiers print ''; // Dates print ''; print ''; $nbrows=8; if ($conf->global->FAC_USE_CUSTOMER_ORDER_REF) $nbrows++; if ($conf->projet->enabled) $nbrows++; print ''; // Date limite reglement print ''; print ''; print ''; // Conditions de réglement print ''; // Mode de reglement print ''; // Lit lignes de facture pour déterminer montant // On s'en sert pas mais ca sert pour debuggage $sql = 'SELECT l.price as price, l.qty, l.rowid, l.tva_taux,'; $sql .= ' l.remise_percent, l.subprice'; $sql .= ' FROM '.MAIN_DB_PREFIX.'facturedet as l '; $sql .= ' WHERE l.fk_facture = '.$fac->id; $resql = $db->query($sql); if ($resql) { $num_lignes = $db->num_rows($resql); $i=0; $total_lignes_ht=0; $total_lignes_vat=0; $total_lignes_ttc=0; while ($i < $num_lignes) { $obj=$db->fetch_object($resql); $ligne_ht=($obj->price*$obj->qty); $ligne_vat=($ligne_ht*$obj->tva_taux/100); $ligne_ttc=($ligne_ht+$ligne_vat); $total_lignes_ht+=$ligne_ht; $total_lignes_vat+=$ligne_vat; $total_lignes_ttc+=$ligne_ttc; $i++; } } // Montants print ''; print ''; print ''; print ''; print ''; print ''; print ''; // Statut print ''; print ''; // Projet if ($conf->projet->enabled) { $langs->load('projects'); print ''; print ''; print ''; } print '

'.$langs->trans('Ref').'

'.$fac->ref.'

'; print ''; if ($_GET['action'] != 'RefCustomerOrder' && $fac->brouillon) print ''; print '

'; print $langs->trans('RefCustomerOrder').'

'; print '

'.img_edit($langs->trans('Edit')).'

'; print '

'; if ($user->rights->facture->creer && $_GET['action'] == 'RefCustomerOrder') { print ''; } else { print $fac->ref_client; } print '

'.$langs->trans('Company').'

'.$soc->getNomUrl(1,'compta').'

'.$langs->trans('Type').'

'; print $fac->getLibType(); if ($fac->type == 1) { $facreplaced=new Facture($db); $facreplaced->fetch($fac->fk_facture_source); print ' ('.$langs->transnoentities("ReplaceInvoice",$facreplaced->getNomUrl(1)).')'; } if ($fac->type == 2) { $facreplaced=new Facture($db); $facreplaced->fetch($fac->fk_facture_source); print ' ('.$langs->transnoentities("CorrectInvoice",$facreplaced->getNomUrl(1)).')'; } $facidavoir=$fac->getIdAvoirInvoice(); if (sizeof($facidavoir) > 0) { print ' ('.$langs->transnoentities("InvoiceHasAvoir"); $i=0; foreach($facidavoir as $id) { if ($i==0) print ' '; else print ','; $facavoir=new Facture($db); $facavoir->fetch($id); print $facavoir->getNomUrl(1); } print ')'; } if ($facidnext > 0) { $facthatreplace=new Facture($db); $facthatreplace->fetch($facidnext); print ' ('.$langs->transnoentities("ReplacedByInvoice",$facthatreplace->getNomUrl(1)).')'; } print '

'.$langs->trans('Discounts').'

'; if ($soc->remise_client) print $langs->trans("CompanyHasRelativeDiscount",$soc->remise_client); else print $langs->trans("CompanyHasNoRelativeDiscount"); print '. '; if ($absolute_discount) { if ($fac->statut > 0 || $fac->type == 2) { print $langs->trans("CompanyHasAbsoluteDiscount",$absolute_discount,$langs->trans("Currency".$conf->monnaie)); } else { print '
'; print $html->form_remise_dispo($_SERVER["PHP_SELF"].'?facid='.$fac->id,0,'remise_id',$soc->id,$absolute_discount); } } else print $langs->trans("CompanyHasNoAbsoluteDiscount").'.'; print '

'.$langs->trans('Date').'

'.dolibarr_print_date($fac->date,'%A %d %B %Y').'

'; /* * Liste des paiements */ $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($result); $i = 0; print ''; // Liste des paiements ou remboursements print ''; print ''; print ''; print ''; print ''; print ''; if ($fac->type != 2) { $var=True; while ($i < $num) { $objp = $db->fetch_object($result); $var=!$var; print ''; print ''; print ''; print ''; $i++; } // Already payed print ''; // Facturé print ''; $resteapayeraffiche=$resteapayer; // Payé partiellement 'escompte' if (($fac->statut == 2 || $fac->statut == 3) && $fac->close_code == 'escompte') { print ''; $resteapayeraffiche=0; } // Payé partiellement ou Abandon 'badcustomer' if (($fac->statut == 2 || $fac->statut == 3) && $fac->close_code == 'badcustomer') { print ''; //$resteapayeraffiche=0; } // Payé partiellement ou Abandon 'product_returned' if (($fac->statut == 2 || $fac->statut == 3) && $fac->close_code == 'product_returned') { print ''; $resteapayeraffiche=0; } // Payé partiellement ou Abandon 'abandon' if (($fac->statut == 2 || $fac->statut == 3) && $fac->close_code == 'abandon') { print ''; $resteapayeraffiche=0; } print ''; print ''; } else { // Solde avoir print ''; print ''; } print '

'.($fac->type == 2 ? $langs->trans("PaymentsBack") : $langs->trans('Payments')).'	'.$langs->trans('Type').'	'.$langs->trans('Amount').'
'; print ''.img_object($langs->trans('ShowPayment'),'payment').' '; print dolibarr_print_date($objp->dp).'	'.$objp->paiement_type.' '.$objp->num_paiement.'	'.price($objp->amount).'	'.$langs->trans('Currency'.$conf->monnaie).'
'.$langs->trans('AlreadyPayed').' :		'.price($totalpaye).'	'.$langs->trans('Currency'.$conf->monnaie).'
'.$langs->trans("Billed").' :		'.price($fac->total_ttc).'	'.$langs->trans('Currency'.$conf->monnaie).'
'; print $html->textwithhelp($langs->trans("Escompte").':',$langs->trans("HelpEscompte"),-1); print '		'.price($fac->total_ttc - $totalpaye).'	'.$langs->trans('Currency'.$conf->monnaie).'
'; print $html->textwithhelp($langs->trans("Abandoned").':',$langs->trans("HelpAbandonBadCustomer"),-1); print '		'.price($fac->total_ttc - $totalpaye).'	'.$langs->trans('Currency'.$conf->monnaie).'
'; print $html->textwithhelp($langs->trans("ProductReturned").':',$langs->trans("HelpAbandonProductReturned"),-1); print '		'.price($fac->total_ttc - $totalpaye).'	'.$langs->trans('Currency'.$conf->monnaie).'
'; $text=$langs->trans("HelpAbandonOther"); if ($fac->close_note) $text.=' '.$langs->trans("Reason").':'.$fac->close_note; print $html->textwithhelp($langs->trans("Abandoned").':',$text,-1); print '		'.price($fac->total_ttc - $totalpaye).'	'.$langs->trans('Currency'.$conf->monnaie).'
'.$langs->trans('RemainderToPay').' :		'.price($resteapayeraffiche).'	'.$langs->trans('Currency'.$conf->monnaie).'
'.$langs->trans('TotalTTCToYourCredit').' :		'.price(abs($fac->total_ttc)).'	'.$langs->trans('Currency'.$conf->monnaie).'

'; $db->free($result); } else { dolibarr_print_error($db); } print '

'.$langs->trans('DateMaxPayment').'

'; if ($fac->type != 2) { print dolibarr_print_date($fac->date_lim_reglement,'%A %d %B %Y'); if ($fac->date_lim_reglement < (time() - $conf->facture->client->warning_delay) && ! $fac->paye && $fac->statut == 1 && ! $fac->am) print img_warning($langs->trans('Late')); } else { print ' '; } print '

'; print ''; if ($fac->type != 2 && $_GET['action'] != 'editconditions' && $fac->brouillon && $user->rights->facture->creer) print ''; print '

'; print $langs->trans('PaymentConditionsShort'); print '

id.'">'.img_edit($langs->trans('SetConditions'),1).'

'; print '

'; if ($fac->type != 2) { if ($_GET['action'] == 'editconditions') { $html->form_conditions_reglement($_SERVER['PHP_SELF'].'?facid='.$fac->id,$fac->cond_reglement_id,'cond_reglement_id'); } else { $html->form_conditions_reglement($_SERVER['PHP_SELF'].'?facid='.$fac->id,$fac->cond_reglement_id,'none'); } } else { print ' '; } print '

'; print ''; if ($_GET['action'] != 'editmode' && $fac->brouillon && $user->rights->facture->creer) print ''; print '

'; print $langs->trans('PaymentMode'); print '

id.'">'.img_edit($langs->trans('SetMode'),1).'

'; print '

'; if ($_GET['action'] == 'editmode') { $html->form_modes_reglement($_SERVER['PHP_SELF'].'?facid='.$fac->id,$fac->mode_reglement_id,'mode_reglement_id'); } else { $html->form_modes_reglement($_SERVER['PHP_SELF'].'?facid='.$fac->id,$fac->mode_reglement_id,'none'); } print '

'.$langs->trans('AmountHT').'

'.price($fac->total_ht).'

'.$langs->trans('Currency'.$conf->monnaie).'

'.$langs->trans('AmountVAT').'

'.price($fac->total_tva).'

'.$langs->trans('Currency'.$conf->monnaie).'

'.$langs->trans('AmountTTC').'

'.price($fac->total_ttc).'

'.$langs->trans('Currency'.$conf->monnaie).'

'.$langs->trans('Status').'

'.($fac->getLibStatut(4,$totalpaye)).'

'; print ''; if ($_GET['action'] != 'classer') { print ''; } print '

'; print $langs->trans('Project'); print '

id.'">'; print img_edit($langs->trans('SetProject'),1); print '

'; print '

'; if ($_GET['action'] == 'classer') { $html->form_project($_SERVER['PHP_SELF'].'?facid='.$fac->id,$fac->socid,$fac->projetid,'projetid'); } else { $html->form_project($_SERVER['PHP_SELF'].'?facid='.$fac->id,$fac->socid,$fac->projetid,'none'); } print '

'; /* * Lignes de factures */ $sql = 'SELECT l.fk_product, l.description, l.price, l.qty, l.rowid, l.tva_taux,'; $sql.= ' l.fk_remise_except,'; $sql.= ' l.remise_percent, l.subprice, l.info_bits,'; $sql.= ' '.$db->pdate('l.date_start').' as date_start,'; $sql.= ' '.$db->pdate('l.date_end').' as date_end,'; $sql.= ' p.ref, p.fk_product_type, p.label as product,'; $sql.= ' p.description as product_desc'; $sql.= ' FROM '.MAIN_DB_PREFIX.'facturedet as l'; $sql.= ' LEFT JOIN '.MAIN_DB_PREFIX.'product p ON l.fk_product=p.rowid'; $sql.= ' WHERE l.fk_facture = '.$fac->id; $sql.= ' ORDER BY l.rang ASC, l.rowid'; $resql = $db->query($sql); if ($resql) { $num_lignes = $db->num_rows($resql); $i = 0; $total = 0; print ''; if ($num_lignes) { print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print "\n"; } $var=true; while ($i < $num_lignes) { $objp = $db->fetch_object($resql); $var=!$var; // Ligne en mode visu if ($_GET['action'] != 'editline' || $_GET['rowid'] != $objp->rowid) { 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 ''; if ($conf->global->PRODUIT_CONFIRM_DELETE_LINE) { print ''; print ''; } else { print ''; } print ''; } // Ligne en mode update if ($_GET['action'] == 'editline' && $user->rights->facture->creer && $_GET['rowid'] == $objp->rowid) { print 'rowid.'" method="post">'; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print '' . "\n"; if ($conf->service->enabled) { print ''; print ''; print ''; } print "\n"; } $total = $total + ($objp->qty * $objp->price); $i++; } $db->free($resql); } else { dolibarr_print_error($db); } /* * Ajouter une ligne */ if ($fac->statut == 0 && $user->rights->facture->creer && $_GET['action'] <> 'valid') { print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print "\n"; // Ajout produit produits/services personalisés print ''; print ''; print ''; $var=true; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; if ($conf->service->enabled) { print ''; print ''; print ''; } print ''; // Ajout de produits/services prédéfinis if ($conf->produit->enabled) { print ''; print ''; print ''; $var=! $var; print ''; print ''; print ''; print ''; print ''; print ''; print ''; if ($conf->service->enabled) { print ''; print ''; print ''; } print ''; } } print "

'.$langs->trans('Description').'

'.$langs->trans('VAT').'

'.$langs->trans('PriceUHT').'

'.$langs->trans('Qty').'

'.$langs->trans('ReductionShort').'

'.$langs->trans('AmountHT').'

'; print ''; // ancre pour retourner sur la ligne print ''; if ($objp->fk_product_type==1) print img_object($langs->trans('ShowService'),'service'); else print img_object($langs->trans('ShowProduct'),'product'); print ' '.$objp->ref.''; print ' - '.nl2br(stripslashes($objp->product)); print_date_range($objp->date_start,$objp->date_end); print ($objp->description && $objp->description!=$objp->product)?'
'.stripslashes(nl2br($objp->description)):''; // \todo Ne faut-il pas rendre $conf->global->PRODUIT_CHANGE_PROD_DESC toujours a on if ($conf->global->PRODUIT_DESC_IN_FORM && !$conf->global->PRODUIT_CHANGE_PROD_DESC) { print '
'.nl2br($objp->product_desc); } print '

'; print ''; // ancre pour retourner sur la ligne if (($objp->info_bits & 2) == 2) { print ''; print img_object($langs->trans("ShowReduc"),'reduc').' '.$langs->trans("Discount"); print ''; if ($objp->description) { if ($objp->description == '(CREDIT_NOTE)') { $discount=new DiscountAbsolute($db); $discount->fetch($objp->fk_remise_except); print ' - '.$langs->transnoentities("DiscountFromCreditNote",$discount->getNomUrl(0)); } else { print ' - '.nl2br($objp->description); } } } else { print nl2br($objp->description); print_date_range($objp->date_start,$objp->date_end); } print "

'.$objp->tva_taux.'%

'.price($objp->subprice)."

'; if (($objp->info_bits & 2) != 2) { print $objp->qty; } else print ' '; print '

'.$objp->remise_percent."%

'.price($objp->subprice*$objp->qty*(100-$objp->remise_percent)/100)."

'; if (($objp->info_bits & 2) == 2) { // Ligne remise prédéfinie, on permet pas modif } else { print 'rowid.'#'.$objp->rowid.'">'; print img_edit(); print ''; } print '

rowid.'">'; } else { print '

rowid.'">'; } print img_delete(); print '

'; if ($i > 0) { print 'rowid.'">'; print img_up(); print ''; } if ($i < $num_lignes-1) { print 'rowid.'">'; print img_down(); print ''; } print '

'; print ''; // ancre pour retourner sur la ligne if ($objp->fk_product > 0) { print ''; if ($objp->fk_product_type==1) print img_object($langs->trans('ShowService'),'service'); else print img_object($langs->trans('ShowProduct'),'product'); print ' '.$objp->ref.''; print ' - '.nl2br($objp->product); print '
'; } // éditeur wysiwyg if ($conf->fckeditor->enabled && $conf->global->FCKEDITOR_ENABLE_DETAILS) { require_once(DOL_DOCUMENT_ROOT."/lib/doleditor.class.php"); $doleditor=new DolEditor('desc',$objp->description,164,'dolibarr_details'); $doleditor->Create(); } else { print ''; } print '

'; if(! $soc->tva_assuj) print '0'; else print $html->select_tva('tva_tx',$objp->tva_taux,$mysoc,$soc); print '

'; if (($objp->info_bits & 2) != 2) { print ''; } else print ' '; print '

'; if (($objp->info_bits & 2) != 2) { print '%'; } else print ' '; print '

'; print '

'.$langs->trans('ServiceLimitedDuration').' '.$langs->trans('From').' '; print $html->select_date($objp->date_start,'date_start',0,0,$objp->date_start?0:1,"updateligne"); print ' '.$langs->trans('to').' '; print $html->select_date($objp->date_end,'date_end',0,0,$objp->date_end?0:1,"updateligne"); print '

'; print ''; // ancre print $langs->trans('Description').'

'.$langs->trans('VAT').'

'.$langs->trans('PriceUHT').'

'.$langs->trans('Qty').'

'.$langs->trans('ReductionShort').'

'; print '

'; if($soc->tva_assuj == "0") print '0'; else $html->select_tva('tva_tx',$conf->defaulttx,$mysoc,$soc); print '

'.$langs->trans('ServiceLimitedDuration').' '.$langs->trans('From').' '; print $html->select_date('','date_start',0,0,1,"addligne"); print ' '.$langs->trans('to').' '; print $html->select_date('','date_end',0,0,1,"addligne"); print '

'; // multiprix if($conf->global->PRODUIT_MULTIPRICES == 1) $html->select_produits('','idprod','',$conf->produit->limit_size,$soc->price_level); else $html->select_produits('','idprod','',$conf->produit->limit_size); if (! $conf->global->PRODUIT_USE_SEARCH_TO_SELECT) print '
'; print '

'.$langs->trans('ServiceLimitedDuration').' '.$langs->trans('From').' '; print $html->select_date('','date_start_predef',0,0,1,"addligne_predef"); print ' '.$langs->trans('to').' '; print $html->select_date('','date_end_predef',0,0,1,"addligne_predef"); print '

\n"; print "\n"; /* * Boutons actions */ if ($user->societe_id == 0 && $_GET['action'] <> 'valid' && $_GET['action'] <> 'editline') { print '

'; // Editer une facture déjà validée, sans paiement effectué et pas exporté en compta if ($fac->statut == 1) { // On vérifie si les lignes de factures ont été exportées en compta et/ou ventilées $ventilExportCompta = $fac->getVentilExportCompta(); if ($conf->global->FACTURE_ENABLE_EDITDELETE && $user->rights->facture->modifier && ($resteapayer == $fac->total_ttc && $fac->paye == 0 && $ventilExportCompta == 0)) { print ''.$langs->trans('Edit').''; } } // Récurrente if (! $conf->global->FACTURE_DISABLE_RECUR && $fac->type == 0) { if (! $facidnext) { print ''.$langs->trans("ChangeIntoRepeatableInvoice").''; } } // Valider if ($fac->statut == 0 && $num_lignes > 0 && (($fac->type < 2 && $fac->total_ttc >= 0) || ($fac->type == 2 && $fac->total_ttc <= 0))) { if ($user->rights->facture->valider) { print ''.$langs->trans('Validate').''; } } else { // Générer if ($fac->statut >= 1 && $user->rights->facture->creer) { if ($fac->paye == 0) { print ''.$langs->trans('BuildPDF').''; } else { print ''.$langs->trans('RebuildPDF').''; } } } // Envoyer if ($fac->statut == 1 && $user->rights->facture->envoyer) { if ($facidnext) { print ''.$langs->trans('SendByMail').''; } else { print ''.$langs->trans('SendByMail').''; } } // Envoyer une relance if ($fac->statut == 1 && $resteapayer > 0 && $user->rights->facture->envoyer) { if ($facidnext) { print ''.$langs->trans('SendRemindByMail').''; } else { print ''.$langs->trans('SendRemindByMail').''; } } // Emettre paiement if ($fac->type != 2 && $fac->statut == 1 && $fac->paye == 0 && $user->rights->facture->paiement) { if ($facidnext) { print ''.$langs->trans('DoPayment').''; } else { print ''.$langs->trans('DoPayment').''; } } // Emettre remboursement ou Convertir en reduc if ($fac->type == 2) { if ($fac->statut == 1 && $fac->paye == 0 && $user->rights->facture->paiement) { print ''.$langs->trans('DoPaymentBack').''; } if ($fac->statut == 1 && $fac->paye == 0 && $user->rights->facture->creer && $fac->getSommePaiement() == 0) { print ''.$langs->trans('ConvertToReduc').''; } } // Classer 'payé' if ($fac->statut == 1 && $fac->paye == 0 && $user->rights->facture->paiement && (($fac->type != 2 && $resteapayer <= 0) || ($fac->type == 2 && $resteapayer >= 0)) ) { print ''.$langs->trans('ClassifyPayed').''; } // Classer 'fermée' (possible si validée et pas encore classée payée) if ($fac->statut == 1 && $fac->paye == 0 && $resteapayer > 0 && $user->rights->facture->paiement) { if ($totalpaye > 0) { print ''.$langs->trans('ClassifyPayedPartially').''; } else { if ($facidnext) { print ''.$langs->trans('ClassifyCanceled').''; } else { print ''.$langs->trans('ClassifyCanceled').''; } } } // Supprimer if ($fac->is_erasable() && $user->rights->facture->supprimer && $_GET['action'] != 'delete') { if ($facidnext) { print ''.$langs->trans('Delete').''; } else { print ''.$langs->trans('Delete').''; } } print '

'; } print '

'; print ''; // ancre /* * Documents générés */ $filename=sanitize_string($fac->ref); $filedir=$conf->facture->dir_output . '/' . sanitize_string($fac->ref); $urlsource=$_SERVER['PHP_SELF'].'?facid='.$fac->id; $genallowed=($fac->statut >= 1 && $user->rights->facture->creer); $delallowed=$user->rights->facture->supprimer; $var=true; print '
'; $somethingshown=$html->show_documents('facture',$filename,$filedir,$urlsource,$genallowed,$delallowed,$fac->modelpdf); /* * Propales rattachées */ $sql = 'SELECT '.$db->pdate('p.datep').' as dp, p.price, p.ref, p.rowid as propalid'; $sql .= ' FROM '.MAIN_DB_PREFIX.'propal as p'; if (!$conf->commande->enabled) { $sql .= ", ".MAIN_DB_PREFIX."fa_pr as fp"; $sql .= " WHERE fp.fk_propal = p.rowid AND fp.fk_facture = ".$fac->id; } else { $sql .= ", ".MAIN_DB_PREFIX."co_pr as cp, ".MAIN_DB_PREFIX."co_fa as cf"; $sql .= " WHERE cf.fk_facture = ".$fac->id." AND cf.fk_commande = cp.fk_commande AND cp.fk_propale = p.rowid"; } $resql = $db->query($sql); if ($resql) { $num = $db->num_rows($resql); if ($num) { $i = 0; $total = 0; if ($somethingshown) print '
'; $somethingshown=1; print_titre($langs->trans('RelatedCommercialProposals')); print ''; print ''; print ''; print ''; print ''; print ''; $var=True; while ($i < $num) { $objp = $db->fetch_object($resql); $var=!$var; print ''; print ''; print ''; print ''; print ''; $total = $total + $objp->price; $i++; } print ''; print '

'.$langs->trans('Ref').'	'.$langs->trans('Date').'	'.$langs->trans('Price').'
'.img_object($langs->trans('ShowPropal'),'propal').' '.$objp->ref.'	'.dolibarr_print_date($objp->dp).'	'.price($objp->price).'
	'.$langs->trans('TotalHT').'	'.price($total).'

'; } } else { dolibarr_print_error($db); } /* * Commandes rattachées */ if($conf->commande->enabled) { $sql = 'SELECT '.$db->pdate('c.date_commande').' as date_commande, c.total_ht, c.ref, c.ref_client, c.rowid as id'; $sql .= ' FROM '.MAIN_DB_PREFIX.'commande as c, '.MAIN_DB_PREFIX.'co_fa as co_fa WHERE co_fa.fk_commande = c.rowid AND co_fa.fk_facture = '.$fac->id; $resql = $db->query($sql); if ($resql) { $num = $db->num_rows($resql); if ($num) { $i = 0; $total = 0; if ($somethingshown) print '
'; $somethingshown=1; print_titre($langs->trans('RelatedOrders')); print ''; print ''; print ''; print ''; print ''; print ''; print ''; $var=true; while ($i < $num) { $objp = $db->fetch_object($resql); $var=!$var; print '\n"; print ''; print ''; print ''; print "\n"; $total = $total + $objp->total_ht; $i++; } print ''; print ''; print ''; print ''; print ''; print '

'.$langs->trans('Ref').'	'.$langs->trans('RefCustomerOrderShort').'	'.$langs->trans('Date').'	'.$langs->trans('AmountHT').'
'; print ''.img_object($langs->trans('ShowOrder'), 'order').' '.$objp->ref."	'.$objp->ref_client.'	'.dolibarr_print_date($objp->date_commande).'	'.price($objp->total_ht).'
'.$langs->trans('TotalHT').'			'.price($total).'

'; } } else { dolibarr_print_error($db); } } print '

'; /* * Liste des actions propres à la facture */ $sql = 'SELECT a.id, '.$db->pdate('a.datea').' as da, a.label, a.note,'; $sql.= ' u.login'; $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->socid ; $sql.= ' AND a.fk_facture = '.$fac->id; $resql = $db->query($sql); if ($resql) { $num = $db->num_rows($resql); if ($num) { print '
'; print_titre($langs->trans('ActionsOnBill')); $i = 0; $total = 0; print ''; print ''; print "\n"; $var=True; while ($i < $num) { $objp = $db->fetch_object($resql); $var=!$var; print ''; print ''; print ''; print ''; print ''; print ''; $i++; } print '

'.$langs->trans('Ref').'	'.$langs->trans('Date').'	'.$langs->trans('Action').'	'.$langs->trans('By').'
'.img_object($langs->trans('ShowTask'),'task').' '.$objp->id.'	'.dolibarr_print_date($objp->da).'	'.stripslashes($objp->label).'	'.$objp->login.'

'; } } else { dolibarr_print_error($db); } print '

'; /* * Affiche formulaire mail */ if ($_GET['action'] == 'presend') { $facref = sanitize_string($fac->ref); $file = $conf->facture->dir_output . '/' . $facref . '/' . $facref . '.pdf'; // Construit PDF si non existant if (! is_readable($file)) { if ($_REQUEST['lang_id']) { $outputlangs = new Translate(DOL_DOCUMENT_ROOT ."/langs",$conf); $outputlangs->setDefaultLang($_REQUEST['lang_id']); } $result=facture_pdf_create($db, $fac->id, '', $_REQUEST['model'], $outputlangs); if ($result <= 0) { dolibarr_print_error($db,$result); exit; } } print '
'; print_titre($langs->trans('SendBillByMail')); $liste[0]=' '; foreach ($soc->thirdparty_and_contact_email_array() as $key=>$value) { $liste[$key]=$value; } // Créé l'objet formulaire mail include_once(DOL_DOCUMENT_ROOT.'/html.formmail.class.php'); $formmail = new FormMail($db); $formmail->fromname = $user->fullname; $formmail->frommail = $user->email; $formmail->withfrom=1; $formmail->withto=$liste; $formmail->withcc=1; $formmail->withtopic=$langs->trans('SendBillRef','__FACREF__'); $formmail->withfile=1; $formmail->withbody=1; $formmail->withdeliveryreceipt=1; $formmail->withcancel=1; // Tableau des substitutions $formmail->substit['__FACREF__']=$fac->ref; // Tableau des paramètres complémentaires du post $formmail->param['action']='send'; $formmail->param['models']='facture_send'; $formmail->param['facid']=$fac->id; $formmail->param['returnurl']=DOL_URL_ROOT.'/compta/facture.php?facid='.$fac->id; $formmail->show_form(); print '
'; } if ($_GET['action'] == 'prerelance') { $facref = sanitize_string($fac->ref); $file = $conf->facture->dir_output . '/' . $facref . '/' . $facref . '.pdf'; // Construit PDF si non existant if (! is_readable($file)) { if ($_REQUEST['lang_id']) { $outputlangs = new Translate(DOL_DOCUMENT_ROOT ."/langs",$conf); $outputlangs->setDefaultLang($_REQUEST['lang_id']); } $result=facture_pdf_create($db, $fac->id, '', $_REQUEST['model'], $outputlangs); if ($result <= 0) { dolibarr_print_error($db,$result); exit; } } print '
'; print_titre($langs->trans('SendReminderBillByMail')); $liste[0]=' '; foreach ($soc->thirdparty_and_contact_email_array() as $key=>$value) { $liste[$key]=$value; } // Créé l'objet formulaire mail include_once(DOL_DOCUMENT_ROOT.'/html.formmail.class.php'); $formmail = new FormMail($db); $formmail->fromname = $user->fullname; $formmail->frommail = $user->email; $formmail->withfrom=1; $formmail->withto=$liste; $formmail->withcc=1; $formmail->withtopic=$langs->trans('SendReminderBillRef','__FACREF__'); $formmail->withfile=1; $formmail->withbody=1; $formmail->withdeliveryreceipt=1; // Tableau des substitutions $formmail->substit['__FACREF__']=$fac->ref; // Tableau des paramètres complémentaires $formmail->param['action']='relance'; $formmail->param['models']='facture_relance'; $formmail->param['facid']=$fac->id; $formmail->param['returnurl']=DOL_URL_ROOT.'/compta/facture.php?facid='.$fac->id; $formmail->show_form(); print '
'; } } else { dolibarr_print_error($db,$fac->error); } } else { /*************************************************************************** * * * Mode Liste * * * ***************************************************************************/ $page =$_GET['page']; $sortorder=$_GET['sortorder']; $sortfield=$_GET['sortfield']; $month =$_GET['month']; $year =$_GET['year']; $limit = $conf->liste_limit; $offset = $limit * $page ; if (! $sortorder) $sortorder='DESC'; if (! $sortfield) $sortfield='f.datef'; $facturestatic=new Facture($db); if ($page == -1) $page = 0 ; $sql = 'SELECT '; $sql.= ' f.rowid as facid, f.facnumber, f.type, f.increment, f.total, f.total_ttc,'; $sql.= ' '.$db->pdate('f.datef').' as df, '.$db->pdate('f.date_lim_reglement').' as datelimite,'; $sql.= ' f.paye as paye, f.fk_statut,'; $sql.= ' s.nom, s.idp'; if (! $sall) $sql.= ' ,sum(pf.amount) as am'; $sql.= ' FROM '.MAIN_DB_PREFIX.'societe as s'; $sql.= ','.MAIN_DB_PREFIX.'facture as f'; if (! $sall) $sql.= ' LEFT JOIN '.MAIN_DB_PREFIX.'paiement_facture as pf ON f.rowid=pf.fk_facture '; if ($sall) $sql.= ' LEFT JOIN '.MAIN_DB_PREFIX.'facturedet as fd ON f.rowid=fd.fk_facture '; $sql.= ' WHERE f.fk_soc = s.idp'; if ($socid) $sql .= ' AND s.idp = '.$socid; 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 ' . trim($filt[0]) . ' = ' . trim($filt[1]); } } if ($_GET['search_ref']) { $sql .= ' AND f.facnumber like \'%'.addslashes(trim($_GET['search_ref'])).'%\''; } if ($_GET['search_societe']) { $sql .= ' AND s.nom like \'%'.addslashes(trim($_GET['search_societe'])).'%\''; } if ($_GET['search_montant_ht']) { $sql .= ' AND f.total = \''.addslashes(trim($_GET['search_montant_ht'])).'\''; } if ($_GET['search_montant_ttc']) { $sql .= ' AND f.total_ttc = \''.addslashes(trim($_GET['search_montant_ttc'])).'\''; } if ($year > 0) { $sql .= ' AND date_format(f.datef, \'%Y\') = '.$year; } if ($_POST['sf_ref']) { $sql .= ' AND f.facnumber like \'%'.addslashes(trim($_POST['sf_ref'])) . '%\''; } if ($sall) { $sql .= ' AND (s.nom like \'%'.addslashes($sall).'%\' OR f.facnumber like \'%'.addslashes($sall).'%\' OR f.note like \'%'.addslashes($sall).'%\' OR fd.description like \'%'.addslashes($sall).'%\')'; } $sql .= ' GROUP BY f.rowid'; $sql .= ' ORDER BY '; $listfield=split(',',$sortfield); foreach ($listfield as $key => $value) $sql.= $listfield[$key].' '.$sortorder.','; $sql .= ' f.rowid DESC '; $sql .= $db->plimit($limit+1,$offset); $resql = $db->query($sql); if ($resql) { $num = $db->num_rows($resql); if ($socid) { $soc = new Societe($db); $soc->fetch($socid); } print_barre_liste($langs->trans('BillsCustomers').' '.($socid?' '.$soc->nom:''),$page,'facture.php','&socid='.$socid,$sortfield,$sortorder,'',$num); $i = 0; print '

'."\n"; print ''; print ''; print_liste_field_titre($langs->trans('Ref'),$_SERVER['PHP_SELF'],'f.facnumber','','&socid='.$socid,'',$sortfield); print_liste_field_titre($langs->trans('Date'),$_SERVER['PHP_SELF'],'f.datef','','&socid='.$socid,'align="center"',$sortfield); print_liste_field_titre($langs->trans('Company'),$_SERVER['PHP_SELF'],'s.nom','','&socid='.$socid,'',$sortfield); print_liste_field_titre($langs->trans('AmountHT'),$_SERVER['PHP_SELF'],'f.total','','&socid='.$socid,'align="right"',$sortfield); print_liste_field_titre($langs->trans('AmountTTC'),$_SERVER['PHP_SELF'],'f.total_ttc','','&socid='.$socid,'align="right"',$sortfield); print_liste_field_titre($langs->trans('Received'),$_SERVER['PHP_SELF'],'am','','&socid='.$socid,'align="right"',$sortfield); print_liste_field_titre($langs->trans('Status'),$_SERVER['PHP_SELF'],'fk_statut,paye,am','','&socid='.$socid,'align="right"',$sortfield); print ''; // Lignes des champs de filtre print ''; print ''; print '\n"; if ($num > 0) { $var=True; $total=0; $totalrecu=0; while ($i < min($num,$limit)) { $objp = $db->fetch_object($resql); $var=!$var; print ''; print '\n"; if ($objp->df > 0 ) { print ''; } else { print ''; } print ''; print ''; print ''; print ''; // Affiche statut de la facture print '\n"; $total+=$objp->total; $total_ttc+=$objp->total_ttc; $totalrecu+=$objp->am; $i++; } if (($offset + $num) <= $limit) { // Print total print ''; print ''; print ''; print ''; print ''; print ''; print ''; } } print "

'; print ''; print '		'; print ''; print '	'; print ''; print '	'; print ''; print '	'; print ''; print "
'; $facturestatic->id=$objp->facid; $facturestatic->ref=$objp->facnumber; $facturestatic->type=$objp->type; print $facturestatic->getNomUrl(1); print $objp->increment; if ($objp->datelimite < (time() - $conf->facture->client->warning_delay) && ! $objp->paye && $objp->fk_statut == 1 && ! $objp->am) print img_warning($langs->trans('Late')); print "	'; $y = strftime('%Y',$objp->df); $m = strftime('%m',$objp->df); print strftime('%d',$objp->df); print ' '; print substr(strftime('%B',$objp->df),0,3).''; print ' '; print strftime('%Y',$objp->df).'	!!!	'.img_object($langs->trans('ShowCompany'),'company').' '.dolibarr_trunc($objp->nom,48).'	'.price($objp->total).'	'.price($objp->total_ttc).'	'.price($objp->am).'	'; print $facturestatic->LibStatut($objp->paye,$objp->fk_statut,5,$objp->am,$objp->type); print "
'.$langs->trans('Total').'			'.price($total).'	'.price($total_ttc).'	'.price($totalrecu).'

\n"; print "

\n"; $db->free($resql); } else { dolibarr_print_error($db); } } } $db->close(); llxFooter('$Date$ - $Revision$'); ?>