PageRenderTime 37ms CodeModel.GetById 22ms RepoModel.GetById 0ms app.codeStats 1ms

/htdocs/compta/facture.php

https://github.com/zeert/dolibarr
PHP | 3331 lines | 2653 code | 351 blank | 327 comment | 929 complexity | 0e6934c45d5b9ad7898c0d41c0ccc530 MD5 | raw file
Possible License(s): LGPL-2.0 
    

  1. <?php
    2. 

  2. /* Copyright (C) 2002-2006 Rodolphe Quiedeville  <rodolphe@quiedeville.org>
    3. 

  3.  * Copyright (C) 2004      Eric Seigne           <eric.seigne@ryxeo.com>
    4. 

  4.  * Copyright (C) 2004-2012 Laurent Destailleur   <eldy@users.sourceforge.net>
    5. 

  5.  * Copyright (C) 2005      Marc Barilley / Ocebo <marc@ocebo.com>
    6. 

  6.  * Copyright (C) 2005-2012 Regis Houssin         <regis@dolibarr.fr>
    7. 

  7.  * Copyright (C) 2006      Andre Cianfarani      <acianfa@free.fr>
    8. 

  8.  * Copyright (C) 2010-2012 Juanjo Menent         <jmenent@2byte.es>
    9. 

  9.  * Copyright (C) 2012      Christophe Battarel   <christophe.battarel@altairis.fr>
    10. 

  10.  *
    11. 

  11.  * This program is free software; you can redistribute it and/or modify
    12. 

  12.  * it under the terms of the GNU General Public License as published by
    13. 

  13.  * the Free Software Foundation; either version 2 of the License, or
    14. 

  14.  * (at your option) any later version.
    15. 

  15.  *
    16. 

  16.  * This program is distributed in the hope that it will be useful,
    17. 

  17.  * but WITHOUT ANY WARRANTY; without even the implied warranty of
    18. 

  18.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    19. 

  19.  * GNU General Public License for more details.
    20. 

  20.  *
    21. 

  21.  * You should have received a copy of the GNU General Public License
    22. 

  22.  * along with this program. If not, see <http://www.gnu.org/licenses/>.
    23. 

  23.  */
    24. 

  24. 

  25. /**
    26. 

  26.  *	\file       htdocs/compta/facture.php
    27. 

  27.  *	\ingroup    facture
    28. 

  28.  *	\brief      Page to create/see an invoice
    29. 

  29.  */
    30. 

  30. 

  31. require('../main.inc.php');
    32. 

  32. require_once(DOL_DOCUMENT_ROOT."/core/class/html.formfile.class.php");
    33. 

  33. require_once(DOL_DOCUMENT_ROOT."/core/class/html.formother.class.php");
    34. 

  34. require_once(DOL_DOCUMENT_ROOT.'/core/modules/facture/modules_facture.php');
    35. 

  35. require_once(DOL_DOCUMENT_ROOT.'/compta/facture/class/facture.class.php');
    36. 

  36. require_once(DOL_DOCUMENT_ROOT.'/core/class/discount.class.php');
    37. 

  37. require_once(DOL_DOCUMENT_ROOT.'/compta/paiement/class/paiement.class.php');
    38. 

  38. require_once(DOL_DOCUMENT_ROOT."/core/lib/functions2.lib.php");
    39. 

  39. require_once(DOL_DOCUMENT_ROOT.'/core/lib/invoice.lib.php');
    40. 

  40. require_once(DOL_DOCUMENT_ROOT."/core/lib/date.lib.php");
    41. 

  41. if (! empty($conf->commande->enabled)) require_once(DOL_DOCUMENT_ROOT.'/commande/class/commande.class.php');
    42. 

  42. if (! empty($conf->projet->enabled))
    43. 

  43. {
    44. 

  44. 	require_once(DOL_DOCUMENT_ROOT.'/projet/class/project.class.php');
    45. 

  45. 	require_once(DOL_DOCUMENT_ROOT.'/core/lib/project.lib.php');
    46. 

  46. }
    47. 

  47. 

  48. $langs->load('bills');
    49. 

  49. //print 'ee'.$langs->trans('BillsCustomer');exit;
    50. 

  50. 

  51. $langs->load('companies');
    52. 

  52. $langs->load('products');
    53. 

  53. $langs->load('main');
    54. 

  54. if (! empty($conf->margin->enabled))
    55. 

  55.   $langs->load('margins');
    56. 

  56. 

  57. $sall=trim(GETPOST('sall'));
    58. 

  58. $projectid=(GETPOST('projectid')?GETPOST('projectid','int'):0);
    59. 

  59. 

  60. $id=(GETPOST('id','int')?GETPOST('id','int'):GETPOST('facid','int'));  // For backward compatibility
    61. 

  61. $ref=GETPOST('ref','alpha');
    62. 

  62. $socid=GETPOST('socid','int');
    63. 

  63. $action=GETPOST('action','alpha');
    64. 

  64. $confirm=GETPOST('confirm','alpha');
    65. 

  65. $lineid=GETPOST('lineid','int');
    66. 

  66. $userid=GETPOST('userid','int');
    67. 

  67. $search_ref=GETPOST('sf_ref')?GETPOST('sf_ref','alpha'):GETPOST('search_ref','alpha');
    68. 

  68. $search_societe=GETPOST('search_societe','alpha');
    69. 

  69. $search_montant_ht=GETPOST('search_montant_ht','alpha');
    70. 

  70. $search_montant_ttc=GETPOST('search_montant_ttc','alpha');
    71. 

  71. 

  72. //PDF
    73. 

  73. $hidedetails = (GETPOST('hidedetails','int') ? GETPOST('hidedetails','int') : (! empty($conf->global->MAIN_GENERATE_DOCUMENTS_HIDE_DETAILS) ? 1 : 0));
    74. 

  74. $hidedesc 	 = (GETPOST('hidedesc','int') ? GETPOST('hidedesc','int') : (! empty($conf->global->MAIN_GENERATE_DOCUMENTS_HIDE_DESC) ?  1 : 0));
    75. 

  75. $hideref 	 = (GETPOST('hideref','int') ? GETPOST('hideref','int') : (! empty($conf->global->MAIN_GENERATE_DOCUMENTS_HIDE_REF) ? 1 : 0));
    76. 

  76. 

  77. // Security check
    78. 

  78. $fieldid = (! empty($ref)?'facnumber':'rowid');
    79. 

  79. if ($user->societe_id) $socid=$user->societe_id;
    80. 

  80. $result = restrictedArea($user, 'facture', $id,'','','fk_soc',$fieldid);
    81. 

  81. 

  82. // Nombre de ligne pour choix de produit/service predefinis
    83. 

  83. $NBLINES=4;
    84. 

  84. 

  85. $usehm=(! empty($conf->global->MAIN_USE_HOURMIN_IN_DATE_RANGE)?$conf->global->MAIN_USE_HOURMIN_IN_DATE_RANGE:0);
    86. 

  86. 

  87. $object=new Facture($db);
    88. 

  88. 

  89. // Load object
    90. 

  90. if ($id > 0 || ! empty($ref))
    91. 

  91. {
    92. 

  92. 	$ret=$object->fetch($id, $ref);
    93. 

  93. }
    94. 

  94. 

  95. // Initialize technical object to manage hooks of thirdparties. Note that conf->hooks_modules contains array array
    96. 

  96. include_once(DOL_DOCUMENT_ROOT.'/core/class/hookmanager.class.php');
    97. 

  97. $hookmanager=new HookManager($db);
    98. 

  98. $hookmanager->initHooks(array('invoicecard'));
    99. 

  99. 

  100. 

  101. /*
    102. 

  102.  * Actions
    103. 

  103.  */
    104. 

  104. 

  105. $parameters=array('socid'=>$socid);
    106. 

  106. $reshook=$hookmanager->executeHooks('doActions',$parameters,$object,$action);    // Note that $action and $object may have been modified by some hooks
    107. 

  107. 

  108. 

  109. // Action clone object
    110. 

  110. if ($action == 'confirm_clone' && $confirm == 'yes' && $user->rights->facture->creer)
    111. 

  111. {
    112. 

  112.     if (1==0 && empty($_REQUEST["clone_content"]) && empty($_REQUEST["clone_receivers"]))
    113. 

  113.     {
    114. 

  114.         $mesgs[]='<div class="error">'.$langs->trans("NoCloneOptionsSpecified").'</div>';
    115. 

  115.     }
    116. 

  116.     else
    117. 

  117.     {
    118. 

  118.     	if ($object->fetch($id) > 0)
    119. 

  119.     	{
    120. 

  120.     		$result=$object->createFromClone($socid, $hookmanager);
    121. 

  121.     		if ($result > 0)
    122. 

  122.     		{
    123. 

  123.     			header("Location: ".$_SERVER['PHP_SELF'].'?facid='.$result);
    124. 

  124.     			exit;
    125. 

  125.     		}
    126. 

  126.     		else
    127. 

  127.     		{
    128. 

  128.     			$mesgs[]=$object->error;
    129. 

  129.     			$action='';
    130. 

  130.     		}
    131. 

  131.     	}
    132. 

  132.     }
    133. 

  133. }
    134. 

  134. 

  135. // Change status of invoice
    136. 

  136. else if ($action == 'reopen' && $user->rights->facture->creer)
    137. 

  137. {
    138. 

  138.     $result = $object->fetch($id);
    139. 

  139.     if ($object->statut == 2
    140. 

  140.     || ($object->statut == 3 && $object->close_code != 'replaced'))
    141. 

  141.     {
    142. 

  142.         $result = $object->set_unpaid($user);
    143. 

  143.         if ($result > 0)
    144. 

  144.         {
    145. 

  145.             Header('Location: '.$_SERVER["PHP_SELF"].'?facid='.$id);
    146. 

  146.             exit;
    147. 

  147.         }
    148. 

  148.         else
    149. 

  149.         {
    150. 

  150.             $mesgs[]='<div class="error">'.$object->error.'</div>';
    151. 

  151.         }
    152. 

  152.     }
    153. 

  153. }
    154. 

  154. 

  155. // Delete invoice
    156. 

  156. else if ($action == 'confirm_delete' && $confirm == 'yes' && $user->rights->facture->supprimer)
    157. 

  157. {
    158. 

  158. 	$result = $object->fetch($id);
    159. 

  159. 	$object->fetch_thirdparty();
    160. 

  160. 	$result = $object->delete();
    161. 

  161. 	if ($result > 0)
    162. 

  162. 	{
    163. 

  163. 		Header('Location: '.DOL_URL_ROOT.'/compta/facture/list.php');
    164. 

  164. 		exit;
    165. 

  165. 	}
    166. 

  166. 	else
    167. 

  167. 	{
    168. 

  168. 		$mesgs[]='<div class="error">'.$object->error.'</div>';
    169. 

  169. 	}
    170. 

  170. }
    171. 

  171. 

  172. // Delete line
    173. 

  173. else if ($action == 'confirm_deleteline' && $confirm == 'yes' && $user->rights->facture->creer)
    174. 

  174. {
    175. 

  175. 	$object->fetch($id);
    176. 

  176. 	$object->fetch_thirdparty();
    177. 

  177. 

  178. 	$result = $object->deleteline($_GET['lineid'], $user);
    179. 

  179. 	if ($result > 0)
    180. 

  180. 	{
    181. 

  181. 		// Define output language
    182. 

  182. 		$outputlangs = $langs;
    183. 

  183. 		$newlang='';
    184. 

  184. 		if ($conf->global->MAIN_MULTILANGS && empty($newlang) && ! empty($_REQUEST['lang_id'])) $newlang=$_REQUEST['lang_id'];
    185. 

  185. 		if ($conf->global->MAIN_MULTILANGS && empty($newlang)) $newlang=$object->client->default_lang;
    186. 

  186. 		if (! empty($newlang))
    187. 

  187. 		{
    188. 

  188. 			$outputlangs = new Translate("",$conf);
    189. 

  189. 			$outputlangs->setDefaultLang($newlang);
    190. 

  190. 		}
    191. 

  191. 		if (empty($conf->global->MAIN_DISABLE_PDF_AUTOUPDATE))
    192. 

  192. 		{
    193. 

  193. 			$ret=$object->fetch($id);    // Reload to get new records
    194. 

  194. 			$result=facture_pdf_create($db, $object, $object->modelpdf, $outputlangs, $hidedetails, $hidedesc, $hideref, $hookmanager);
    195. 

  195. 		}
    196. 

  196. 		if ($result >= 0)
    197. 

  197. 		{
    198. 

  198. 			Header('Location: '.$_SERVER["PHP_SELF"].'?facid='.$id);
    199. 

  199. 			exit;
    200. 

  200. 		}
    201. 

  201. 	}
    202. 

  202. 	else
    203. 

  203. 	{
    204. 

  204. 		$mesgs[]='<div clas="error">'.$object->error.'</div>';
    205. 

  205. 		$action='';
    206. 

  206. 	}
    207. 

  207. }
    208. 

  208. 

  209. // Delete link of credit note to invoice
    210. 

  210. else if ($action == 'unlinkdiscount' && $user->rights->facture->creer)
    211. 

  211. {
    212. 

  212.     $discount=new DiscountAbsolute($db);
    213. 

  213.     $result=$discount->fetch($_GET["discountid"]);
    214. 

  214.     $discount->unlink_invoice();
    215. 

  215. }
    216. 

  216. 

  217. // Validation
    218. 

  218. else if ($action == 'valid' && $user->rights->facture->creer)
    219. 

  219. {
    220. 

  220.     $object->fetch($id);
    221. 

  221. 

  222.     // On verifie signe facture
    223. 

  223.     if ($object->type == 2)
    224. 

  224.     {
    225. 

  225.         // Si avoir, le signe doit etre negatif
    226. 

  226.         if ($object->total_ht >= 0)
    227. 

  227.         {
    228. 

  228.             $mesgs[]='<div class="error">'.$langs->trans("ErrorInvoiceAvoirMustBeNegative").'</div>';
    229. 

  229.             $action='';
    230. 

  230.         }
    231. 

  231.     }
    232. 

  232.     else
    233. 

  233.     {
    234. 

  234.         // Si non avoir, le signe doit etre positif
    235. 

  235.         if (empty($conf->global->FACTURE_ENABLE_NEGATIVE) && $object->total_ht < 0)
    236. 

  236.         {
    237. 

  237.             $mesgs[]='<div class="error">'.$langs->trans("ErrorInvoiceOfThisTypeMustBePositive").'</div>';
    238. 

  238.             $action='';
    239. 

  239.         }
    240. 

  240.     }
    241. 

  241. }
    242. 

  242. 

  243. else if ($action == 'set_thirdparty' && $user->rights->facture->creer)
    244. 

  244. {
    245. 

  245.     $object->fetch($id);
    246. 

  246.     $object->setValueFrom('fk_soc',$socid);
    247. 

  247. 

  248.     Header('Location: '.$_SERVER["PHP_SELF"].'?facid='.$id);
    249. 

  249.     exit;
    250. 

  250. }
    251. 

  251. 

  252. else if ($action == 'classin' && $user->rights->facture->creer)
    253. 

  253. {
    254. 

  254.     $object->fetch($id);
    255. 

  255.     $object->setProject($_POST['projectid']);
    256. 

  256. }
    257. 

  257. 

  258. else if ($action == 'setmode' && $user->rights->facture->creer)
    259. 

  259. {
    260. 

  260.     $object->fetch($id);
    261. 

  261.     $result = $object->setPaymentMethods(GETPOST('mode_reglement_id','int'));
    262. 

  262.     if ($result < 0) dol_print_error($db,$object->error);
    263. 

  263. }
    264. 

  264. else if ($action == 'setinvoicedate' && $user->rights->facture->creer)
    265. 

  265. {
    266. 

  266.     $object->fetch($id);
    267. 

  267.     $object->date=dol_mktime(12,0,0,$_POST['invoicedatemonth'],$_POST['invoicedateday'],$_POST['invoicedateyear']);
    268. 

  268.     if ($object->date_lim_reglement < $object->date) $object->date_lim_reglement=$object->date;
    269. 

  269.     $result=$object->update($user);
    270. 

  270.     if ($result < 0) dol_print_error($db,$object->error);
    271. 

  271. }
    272. 

  272. else if ($action == 'setpaymentterm' && $user->rights->facture->creer)
    273. 

  273. {
    274. 

  274.     $object->fetch($id);
    275. 

  275.     $object->date_lim_reglement=dol_mktime(12,0,0,$_POST['paymenttermmonth'],$_POST['paymenttermday'],$_POST['paymenttermyear']);
    276. 

  276.     if ($object->date_lim_reglement < $object->date) $object->date_lim_reglement=$object->date;
    277. 

  277.     $result=$object->update($user);
    278. 

  278.     if ($result < 0) dol_print_error($db,$object->error);
    279. 

  279. }
    280. 

  280. else if ($action == 'setconditions' && $user->rights->facture->creer)
    281. 

  281. {
    282. 

  282.     $object->fetch($id);
    283. 

  283.     $result=$object->setPaymentTerms(GETPOST('cond_reglement_id','int'));
    284. 

  284.     if ($result < 0) dol_print_error($db,$object->error);
    285. 

  285. }
    286. 

  286. 

  287. else if ($action == 'setremisepercent' && $user->rights->facture->creer)
    288. 

  288. {
    289. 

  289.     $object->fetch($id);
    290. 

  290.     $result = $object->set_remise($user, $_POST['remise_percent']);
    291. 

  291. }
    292. 

  292. 

  293. else if ($action == "setabsolutediscount" && $user->rights->facture->creer)
    294. 

  294. {
    295. 

  295.     // POST[remise_id] ou POST[remise_id_for_payment]
    296. 

  296.     if (! empty($_POST["remise_id"]))
    297. 

  297.     {
    298. 

  298.         $ret=$object->fetch($id);
    299. 

  299.         if ($ret > 0)
    300. 

  300.         {
    301. 

  301.             $result=$object->insert_discount($_POST["remise_id"]);
    302. 

  302.             if ($result < 0)
    303. 

  303.             {
    304. 

  304.                 $mesgs[]='<div class="error">'.$object->error.'</div>';
    305. 

  305.             }
    306. 

  306.         }
    307. 

  307.         else
    308. 

  308.         {
    309. 

  309.             dol_print_error($db,$object->error);
    310. 

  310.         }
    311. 

  311.     }
    312. 

  312.     if (! empty($_POST["remise_id_for_payment"]))
    313. 

  313.     {
    314. 

  314.         require_once(DOL_DOCUMENT_ROOT.'/core/class/discount.class.php');
    315. 

  315.         $discount = new DiscountAbsolute($db);
    316. 

  316.         $discount->fetch($_POST["remise_id_for_payment"]);
    317. 

  317. 

  318.         $result=$discount->link_to_invoice(0,$id);
    319. 

  319.         if ($result < 0)
    320. 

  320.         {
    321. 

  321.             $mesgs[]='<div class="error">'.$discount->error.'</div>';
    322. 

  322.         }
    323. 

  323.     }
    324. 

  324. }
    325. 

  325. 

  326. else if ($action == 'set_ref_client' && $user->rights->facture->creer)
    327. 

  327. {
    328. 

  328.     $object->fetch($id);
    329. 

  329.     $object->set_ref_client($_POST['ref_client']);
    330. 

  330. }
    331. 

  331. 

  332. else if ($action == 'setnote_public' && $user->rights->facture->creer)
    333. 

  333. {
    334. 

  334. 	$object->fetch($id);
    335. 

  335. 	$result=$object->update_note_public(dol_html_entity_decode(GETPOST('note_public'), ENT_QUOTES));
    336. 

  336. 	if ($result < 0) dol_print_error($db,$object->error);
    337. 

  337. }
    338. 

  338. 

  339. else if ($action == 'setnote' && $user->rights->facture->creer)
    340. 

  340. {
    341. 

  341. 	$object->fetch($id);
    342. 

  342. 	$result=$object->update_note(dol_html_entity_decode(GETPOST('note'), ENT_QUOTES));
    343. 

  343. 	if ($result < 0) dol_print_error($db,$object->error);
    344. 

  344. }
    345. 

  345. 

  346. // Classify to validated
    347. 

  347. else if ($action == 'confirm_valid' && $confirm == 'yes' && $user->rights->facture->valider)
    348. 

  348. {
    349. 

  349.     $idwarehouse=GETPOST('idwarehouse');
    350. 

  350. 

  351.     $object->fetch($id);
    352. 

  352.     $object->fetch_thirdparty();
    353. 

  353. 

  354.     // Check parameters
    355. 

  355.     if ($object->type != 3 && ! empty($conf->global->STOCK_CALCULATE_ON_BILL) && $object->hasProductsOrServices(1))
    356. 

  356.     {
    357. 

  357.         if (! $idwarehouse || $idwarehouse == -1)
    358. 

  358.         {
    359. 

  359.             $error++;
    360. 

  360.             $mesgs[]=$langs->trans('ErrorFieldRequired',$langs->transnoentitiesnoconv("Warehouse"));
    361. 

  361.             $action='';
    362. 

  362.         }
    363. 

  363.     }
    364. 

  364. 

  365.     if (! $error)
    366. 

  366.     {
    367. 

  367.         $result = $object->validate($user,'',$idwarehouse);
    368. 

  368.         if ($result >= 0)
    369. 

  369.         {
    370. 

  370.             // Define output language
    371. 

  371.             $outputlangs = $langs;
    372. 

  372.             $newlang='';
    373. 

  373.             if ($conf->global->MAIN_MULTILANGS && empty($newlang) && ! empty($_REQUEST['lang_id'])) $newlang=$_REQUEST['lang_id'];
    374. 

  374.             if ($conf->global->MAIN_MULTILANGS && empty($newlang)) $newlang=$object->client->default_lang;
    375. 

  375.             if (! empty($newlang))
    376. 

  376.             {
    377. 

  377.                 $outputlangs = new Translate("",$conf);
    378. 

  378.                 $outputlangs->setDefaultLang($newlang);
    379. 

  379.             }
    380. 

  380.             if (empty($conf->global->MAIN_DISABLE_PDF_AUTOUPDATE))
    381. 

  381.             {
    382. 

  382.                 $ret=$object->fetch($id);    // Reload to get new records
    383. 

  383.                 facture_pdf_create($db, $object, $object->modelpdf, $outputlangs, $hidedetails, $hidedesc, $hideref, $hookmanager);
    384. 

  384.             }
    385. 

  385.         }
    386. 

  386.         else
    387. 

  387.         {
    388. 

  388.             $mesgs[]='<div class="error">'.$object->error.'</div>';
    389. 

  389.         }
    390. 

  390.     }
    391. 

  391. }
    392. 

  392. 

  393. // Go back to draft status (unvalidate)
    394. 

  394. else if ($action == 'confirm_modif' && ((empty($conf->global->MAIN_USE_ADVANCED_PERMS) && $user->rights->facture->valider) || $user->rights->facture->invoice_advance->unvalidate))
    395. 

  395. {
    396. 

  396.     $idwarehouse=GETPOST('idwarehouse');
    397. 

  397. 

  398.     $object->fetch($id);
    399. 

  399.     $object->fetch_thirdparty();
    400. 

  400. 

  401.     // Check parameters
    402. 

  402.     if ($object->type != 3 && ! empty($conf->global->STOCK_CALCULATE_ON_BILL) && $object->hasProductsOrServices(1))
    403. 

  403.     {
    404. 

  404.         if (! $idwarehouse || $idwarehouse == -1)
    405. 

  405.         {
    406. 

  406.             $error++;
    407. 

  407.             $mesgs[]=$langs->trans('ErrorFieldRequired',$langs->transnoentitiesnoconv("Warehouse"));
    408. 

  408.             $action='';
    409. 

  409.         }
    410. 

  410.     }
    411. 

  411. 

  412.     if (! $error)
    413. 

  413.     {
    414. 

  414. 	    // On verifie si la facture a des paiements
    415. 

  415. 	    $sql = 'SELECT pf.amount';
    416. 

  416. 	    $sql.= ' FROM '.MAIN_DB_PREFIX.'paiement_facture as pf';
    417. 

  417. 	    $sql.= ' WHERE pf.fk_facture = '.$object->id;
    418. 

  418. 

  419. 	    $result = $db->query($sql);
    420. 

  420. 	    if ($result)
    421. 

  421. 	    {
    422. 

  422. 	        $i = 0;
    423. 

  423. 	        $num = $db->num_rows($result);
    424. 

  424. 

  425. 	        while ($i < $num)
    426. 

  426. 	        {
    427. 

  427. 	            $objp = $db->fetch_object($result);
    428. 

  428. 	            $totalpaye += $objp->amount;
    429. 

  429. 	            $i++;
    430. 

  430. 	        }
    431. 

  431. 	    }
    432. 

  432. 	    else
    433. 

  433. 	    {
    434. 

  434. 	        dol_print_error($db,'');
    435. 

  435. 	    }
    436. 

  436. 

  437. 	    $resteapayer = $object->total_ttc - $totalpaye;
    438. 

  438. 

  439. 	    // On verifie si les lignes de factures ont ete exportees en compta et/ou ventilees
    440. 

  440. 	    $ventilExportCompta = $object->getVentilExportCompta();
    441. 

  441. 

  442. 	    // On verifie si aucun paiement n'a ete effectue
    443. 

  443. 	    if ($resteapayer == $object->total_ttc	&& $object->paye == 0 && $ventilExportCompta == 0)
    444. 

  444. 	    {
    445. 

  445. 	        $object->set_draft($user, $idwarehouse);
    446. 

  446. 

  447. 	        // Define output language
    448. 

  448. 	        $outputlangs = $langs;
    449. 

  449. 	        $newlang='';
    450. 

  450. 	        if ($conf->global->MAIN_MULTILANGS && empty($newlang) && ! empty($_REQUEST['lang_id'])) $newlang=$_REQUEST['lang_id'];
    451. 

  451. 	        if ($conf->global->MAIN_MULTILANGS && empty($newlang)) $newlang=$object->client->default_lang;
    452. 

  452. 	        if (! empty($newlang))
    453. 

  453. 	        {
    454. 

  454. 	            $outputlangs = new Translate("",$conf);
    455. 

  455. 	            $outputlangs->setDefaultLang($newlang);
    456. 

  456. 	        }
    457. 

  457. 	        if (empty($conf->global->MAIN_DISABLE_PDF_AUTOUPDATE))
    458. 

  458. 	        {
    459. 

  459.                 $ret=$object->fetch($id);    // Reload to get new records
    460. 

  460. 	            facture_pdf_create($db, $object, $object->modelpdf, $outputlangs, $hidedetails, $hidedesc, $hideref, $hookmanager);
    461. 

  461. 	        }
    462. 

  462. 	    }
    463. 

  463.     }
    464. 

  464. }
    465. 

  465. 

  466. // Classify "paid"
    467. 

  467. else if ($action == 'confirm_paid' && $confirm == 'yes' && $user->rights->facture->paiement)
    468. 

  468. {
    469. 

  469.     $object->fetch($id);
    470. 

  470.     $result = $object->set_paid($user);
    471. 

  471. }
    472. 

  472. // Classif  "paid partialy"
    473. 

  473. else if ($action == 'confirm_paid_partially' && $confirm == 'yes' && $user->rights->facture->paiement)
    474. 

  474. {
    475. 

  475.     $object->fetch($id);
    476. 

  476.     $close_code=$_POST["close_code"];
    477. 

  477.     $close_note=$_POST["close_note"];
    478. 

  478.     if ($close_code)
    479. 

  479.     {
    480. 

  480.         $result = $object->set_paid($user,$close_code,$close_note);
    481. 

  481.     }
    482. 

  482.     else
    483. 

  483.     {
    484. 

  484.         $mesgs[]='<div class="error">'.$langs->trans("ErrorFieldRequired",$langs->trans("Reason")).'</div>';
    485. 

  485.     }
    486. 

  486. }
    487. 

  487. // Classify "abandoned"
    488. 

  488. else if ($action == 'confirm_canceled' && $confirm == 'yes')
    489. 

  489. {
    490. 

  490.     $object->fetch($id);
    491. 

  491.     $close_code=$_POST["close_code"];
    492. 

  492.     $close_note=$_POST["close_note"];
    493. 

  493.     if ($close_code)
    494. 

  494.     {
    495. 

  495.         $result = $object->set_canceled($user,$close_code,$close_note);
    496. 

  496.     }
    497. 

  497.     else
    498. 

  498.     {
    499. 

  499.         $mesgs[]='<div class="error">'.$langs->trans("ErrorFieldRequired",$langs->trans("Reason")).'</div>';
    500. 

  500.     }
    501. 

  501. }
    502. 

  502. 

  503. // Convertir en reduc
    504. 

  504. else if ($action == 'confirm_converttoreduc' && $confirm == 'yes' && $user->rights->facture->creer)
    505. 

  505. {
    506. 

  506.     $db->begin();
    507. 

  507. 

  508.     $object->fetch($id);
    509. 

  509.     $object->fetch_thirdparty();
    510. 

  510.     $object->fetch_lines();
    511. 

  511. 

  512.     if (! $object->paye)	// protection against multiple submit
    513. 

  513.     {
    514. 

  514.         // Boucle sur chaque taux de tva
    515. 

  515.         $i=0;
    516. 

  516.         foreach($object->lines as $line)
    517. 

  517.         {
    518. 

  518.             $amount_ht[$line->tva_tx]+=$line->total_ht;
    519. 

  519.             $amount_tva[$line->tva_tx]+=$line->total_tva;
    520. 

  520.             $amount_ttc[$line->tva_tx]+=$line->total_ttc;
    521. 

  521.             $i++;
    522. 

  522.         }
    523. 

  523. 

  524.         // Insert one discount by VAT rate category
    525. 

  525.         $discount = new DiscountAbsolute($db);
    526. 

  526.         if ($object->type == 2)     $discount->description='(CREDIT_NOTE)';
    527. 

  527.         elseif ($object->type == 3) $discount->description='(DEPOSIT)';
    528. 

  528.         else {
    529. 

  529.             $this->error="CantConvertToReducAnInvoiceOfThisType";
    530. 

  530.             return -1;
    531. 

  531.         }
    532. 

  532.         $discount->tva_tx=abs($object->total_ttc);
    533. 

  533.         $discount->fk_soc=$object->socid;
    534. 

  534.         $discount->fk_facture_source=$object->id;
    535. 

  535. 

  536.         $error=0;
    537. 

  537.         foreach($amount_ht as $tva_tx => $xxx)
    538. 

  538.         {
    539. 

  539.             $discount->amount_ht=abs($amount_ht[$tva_tx]);
    540. 

  540.             $discount->amount_tva=abs($amount_tva[$tva_tx]);
    541. 

  541.             $discount->amount_ttc=abs($amount_ttc[$tva_tx]);
    542. 

  542.             $discount->tva_tx=abs($tva_tx);
    543. 

  543. 

  544.             $result=$discount->create($user);
    545. 

  545.             if ($result < 0)
    546. 

  546.             {
    547. 

  547.                 $error++;
    548. 

  548.                 break;
    549. 

  549.             }
    550. 

  550.         }
    551. 

  551. 

  552.         if (! $error)
    553. 

  553.         {
    554. 

  554.             // Classe facture
    555. 

  555.             $result=$object->set_paid($user);
    556. 

  556.             if ($result > 0)
    557. 

  557.             {
    558. 

  558.                 //$mesgs[]='OK'.$discount->id;
    559. 

  559.                 $db->commit();
    560. 

  560.             }
    561. 

  561.             else
    562. 

  562.             {
    563. 

  563.                 $mesgs[]='<div class="error">'.$object->error.'</div>';
    564. 

  564.                 $db->rollback();
    565. 

  565.             }
    566. 

  566.         }
    567. 

  567.         else
    568. 

  568.         {
    569. 

  569.             $mesgs[]='<div class="error">'.$discount->error.'</div>';
    570. 

  570.             $db->rollback();
    571. 

  571.         }
    572. 

  572.     }
    573. 

  573. }
    574. 

  574. 

  575. /*
    576. 

  576.  * Insert new invoice in database
    577. 

  577.  */
    578. 

  578. else if ($action == 'add' && $user->rights->facture->creer)
    579. 

  579. {
    580. 

  580.     $object->socid=GETPOST('socid','int');
    581. 

  581. 

  582.     $db->begin();
    583. 

  583. 

  584.     $error=0;
    585. 

  585. 

  586.     // Replacement invoice
    587. 

  587.     if ($_POST['type'] == 1)
    588. 

  588.     {
    589. 

  589.         $datefacture = dol_mktime(12, 0, 0, $_POST['remonth'], $_POST['reday'], $_POST['reyear']);
    590. 

  590.         if (empty($datefacture))
    591. 

  591.         {
    592. 

  592.             $error++;
    593. 

  593.             $mesgs[]='<div class="error">'.$langs->trans("ErrorFieldRequired",$langs->trans("Date")).'</div>';
    594. 

  594.         }
    595. 

  595. 

  596.         if (! ($_POST['fac_replacement'] > 0))
    597. 

  597.         {
    598. 

  598.             $error++;
    599. 

  599.             $mesgs[]='<div class="error">'.$langs->trans("ErrorFieldRequired",$langs->trans("ReplaceInvoice")).'</div>';
    600. 

  600.         }
    601. 

  601. 

  602.         if (! $error)
    603. 

  603.         {
    604. 

  604.             // This is a replacement invoice
    605. 

  605.             $result=$object->fetch($_POST['fac_replacement']);
    606. 

  606.             $object->fetch_thirdparty();
    607. 

  607. 

  608.             $object->date				= $datefacture;
    609. 

  609.             $object->note_public		= trim($_POST['note_public']);
    610. 

  610.             $object->note				= trim($_POST['note']);
    611. 

  611.             $object->ref_client			= $_POST['ref_client'];
    612. 

  612.             $object->ref_int			= $_POST['ref_int'];
    613. 

  613.             $object->modelpdf			= $_POST['model'];
    614. 

  614.             $object->fk_project			= $_POST['projectid'];
    615. 

  615.             $object->cond_reglement_id	= $_POST['cond_reglement_id'];
    616. 

  616.             $object->mode_reglement_id	= $_POST['mode_reglement_id'];
    617. 

  617.             $object->remise_absolue		= $_POST['remise_absolue'];
    618. 

  618.             $object->remise_percent		= $_POST['remise_percent'];
    619. 

  619. 

  620.             // Proprietes particulieres a facture de remplacement
    621. 

  621.             $object->fk_facture_source	= $_POST['fac_replacement'];
    622. 

  622.             $object->type				= 1;
    623. 

  623. 

  624.             $id=$object->createFromCurrent($user);
    625. 

  625.             if ($id <= 0) $mesgs[]=$object->error;
    626. 

  626.         }
    627. 

  627.     }
    628. 

  628. 

  629.     // Credit note invoice
    630. 

  630.     if ($_POST['type'] == 2)
    631. 

  631.     {
    632. 

  632.         if (! $_POST['fac_avoir'] > 0)
    633. 

  633.         {
    634. 

  634.             $error++;
    635. 

  635.             $mesgs[]='<div class="error">'.$langs->trans("ErrorFieldRequired",$langs->trans("CorrectInvoice")).'</div>';
    636. 

  636.         }
    637. 

  637. 

  638.         $datefacture = dol_mktime(12, 0, 0, $_POST['remonth'], $_POST['reday'], $_POST['reyear']);
    639. 

  639.         if (empty($datefacture))
    640. 

  640.         {
    641. 

  641.             $error++;
    642. 

  642.             $mesgs[]='<div class="error">'.$langs->trans("ErrorFieldRequired",$langs->trans("Date")).'</div>';
    643. 

  643.         }
    644. 

  644. 

  645.         if (! $error)
    646. 

  646.         {
    647. 

  647.             // Si facture avoir
    648. 

  648.             $datefacture = dol_mktime(12, 0, 0, $_POST['remonth'], $_POST['reday'], $_POST['reyear']);
    649. 

  649. 

  650.             //$result=$object->fetch($_POST['fac_avoir']);
    651. 

  651. 

  652.             $object->socid				= $_POST['socid'];
    653. 

  653.             $object->number				= $_POST['facnumber'];
    654. 

  654.             $object->date				= $datefacture;
    655. 

  655.             $object->note_public		= trim($_POST['note_public']);
    656. 

  656.             $object->note				= trim($_POST['note']);
    657. 

  657.             $object->ref_client			= $_POST['ref_client'];
    658. 

  658.             $object->ref_int			= $_POST['ref_int'];
    659. 

  659.             $object->modelpdf			= $_POST['model'];
    660. 

  660.             $object->fk_project			= $_POST['projectid'];
    661. 

  661.             $object->cond_reglement_id	= 0;
    662. 

  662.             $object->mode_reglement_id	= $_POST['mode_reglement_id'];
    663. 

  663.             $object->remise_absolue		= $_POST['remise_absolue'];
    664. 

  664.             $object->remise_percent		= $_POST['remise_percent'];
    665. 

  665. 

  666.             // Proprietes particulieres a facture avoir
    667. 

  667.             $object->fk_facture_source	= $_POST['fac_avoir'];
    668. 

  668.             $object->type				= 2;
    669. 

  669. 

  670.             $id = $object->create($user);
    671. 

  671. 

  672.             // Add predefined lines
    673. 

  673.             for ($i = 1; $i <= $NBLINES; $i++)
    674. 

  674.             {
    675. 

  675.                 if ($_POST['idprod'.$i])
    676. 

  676.                 {
    677. 

  677.                     $product=new Product($db);
    678. 

  678.                     $product->fetch($_POST['idprod'.$i]);
    679. 

  679.                     $startday=dol_mktime(12, 0, 0, $_POST['date_start'.$i.'month'], $_POST['date_start'.$i.'day'], $_POST['date_start'.$i.'year']);
    680. 

  680.                     $endday=dol_mktime(12, 0, 0, $_POST['date_end'.$i.'month'], $_POST['date_end'.$i.'day'], $_POST['date_end'.$i.'year']);
    681. 

  681.                     $result=$object->addline($id,$product->description,$product->price, $_POST['qty'.$i], $product->tva_tx, $product->localtax1_tx, $product->localtax2_tx, $_POST['idprod'.$i], $_POST['remise_percent'.$i], $startday, $endday, 0, 0, '', $product->price_base_type, $product->price_ttc, $product->type);
    682. 

  682.                 }
    683. 

  683.             }
    684. 

  684.         }
    685. 

  685.     }
    686. 

  686. 

  687.     // Standard invoice or Deposit invoice created from a Predefined invoice
    688. 

  688.     if (($_POST['type'] == 0 || $_POST['type'] == 3) && $_POST['fac_rec'] > 0)
    689. 

  689.     {
    690. 

  690.         $datefacture = dol_mktime(12, 0, 0, $_POST['remonth'], $_POST['reday'], $_POST['reyear']);
    691. 

  691.         if (empty($datefacture))
    692. 

  692.         {
    693. 

  693.             $error++;
    694. 

  694.             $mesgs[]='<div class="error">'.$langs->trans("ErrorFieldRequired",$langs->trans("Date")).'</div>';
    695. 

  695.         }
    696. 

  696. 

  697.         if (! $error)
    698. 

  698.         {
    699. 

  699.             $object->socid			= $_POST['socid'];
    700. 

  700.             $object->type           = $_POST['type'];
    701. 

  701.             $object->number         = $_POST['facnumber'];
    702. 

  702.             $object->date           = $datefacture;
    703. 

  703.             $object->note_public	= trim($_POST['note_public']);
    704. 

  704.             $object->note           = trim($_POST['note']);
    705. 

  705.             $object->ref_client     = $_POST['ref_client'];
    706. 

  706.             $object->ref_int     	= $_POST['ref_int'];
    707. 

  707.             $object->modelpdf       = $_POST['model'];
    708. 

  708. 

  709.             // Source facture
    710. 

  710.             $object->fac_rec        = $_POST['fac_rec'];
    711. 

  711. 

  712.             $id = $object->create($user);
    713. 

  713.         }
    714. 

  714.     }
    715. 

  715. 

  716.     // Standard or deposit or proforma invoice
    717. 

  717.     if (($_POST['type'] == 0 || $_POST['type'] == 3 || $_POST['type'] == 4) && $_POST['fac_rec'] <= 0)
    718. 

  718.     {
    719. 

  719.         $datefacture = dol_mktime(12, 0, 0, $_POST['remonth'], $_POST['reday'], $_POST['reyear']);
    720. 

  720.         if (empty($datefacture))
    721. 

  721.         {
    722. 

  722.             $error++;
    723. 

  723.             $mesgs[]='<div class="error">'.$langs->trans("ErrorFieldRequired",$langs->trans("Date")).'</div>';
    724. 

  724.         }
    725. 

  725. 

  726.         if (! $error)
    727. 

  727.         {
    728. 

  728.             // Si facture standard
    729. 

  729.             $object->socid				= $_POST['socid'];
    730. 

  730.             $object->type				= $_POST['type'];
    731. 

  731.             $object->number				= $_POST['facnumber'];
    732. 

  732.             $object->date				= $datefacture;
    733. 

  733.             $object->note_public		= trim($_POST['note_public']);
    734. 

  734.             $object->note				= trim($_POST['note']);
    735. 

  735.             $object->ref_client			= $_POST['ref_client'];
    736. 

  736.             $object->ref_int			= $_POST['ref_int'];
    737. 

  737.             $object->modelpdf			= $_POST['model'];
    738. 

  738.             $object->fk_project			= $_POST['projectid'];
    739. 

  739.             $object->cond_reglement_id	= ($_POST['type'] == 3?1:$_POST['cond_reglement_id']);
    740. 

  740.             $object->mode_reglement_id	= $_POST['mode_reglement_id'];
    741. 

  741.             $object->amount				= $_POST['amount'];
    742. 

  742.             $object->remise_absolue		= $_POST['remise_absolue'];
    743. 

  743.             $object->remise_percent		= $_POST['remise_percent'];
    744. 

  744. 

  745.             // If creation from another object of another module (Example: origin=propal, originid=1)
    746. 

  746.             if ($_POST['origin'] && $_POST['originid'])
    747. 

  747.             {
    748. 

  748.                 // Parse element/subelement (ex: project_task)
    749. 

  749.                 $element = $subelement = $_POST['origin'];
    750. 

  750.                 if (preg_match('/^([^_]+)_([^_]+)/i',$_POST['origin'],$regs))
    751. 

  751.                 {
    752. 

  752.                     $element = $regs[1];
    753. 

  753.                     $subelement = $regs[2];
    754. 

  754.                 }
    755. 

  755. 

  756.                 // For compatibility
    757. 

  757.                 if ($element == 'order')    { $element = $subelement = 'commande'; }
    758. 

  758.                 if ($element == 'propal')   { $element = 'comm/propal'; $subelement = 'propal'; }
    759. 

  759.                 if ($element == 'contract') { $element = $subelement = 'contrat'; }
    760. 

  760.                 if ($element == 'inter')    { $element = $subelement = 'ficheinter'; }
    761. 

  761.                 if ($element == 'shipping') {$element = $subelement = 'expedition'; }
    762. 

  762. 

  763.                 $object->origin    = $_POST['origin'];
    764. 

  764.                 $object->origin_id = $_POST['originid'];
    765. 

  765. 

  766.                 // Possibility to add external linked objects with hooks
    767. 

  767.                 $object->linked_objects[$object->origin] = $object->origin_id;
    768. 

  768.                 if (is_array($_POST['other_linked_objects']) && ! empty($_POST['other_linked_objects']))
    769. 

  769.                 {
    770. 

  770.                 	$object->linked_objects = array_merge($object->linked_objects, $_POST['other_linked_objects']);
    771. 

  771.                 }
    772. 

  772. 

  773.                 $id = $object->create($user);
    774. 

  774. 

  775.                 if ($id > 0)
    776. 

  776.                 {
    777. 

  777.                     dol_include_once('/'.$element.'/class/'.$subelement.'.class.php');
    778. 

  778. 

  779.                     $classname = ucfirst($subelement);
    780. 

  780.                     $srcobject = new $classname($db);
    781. 

  781. 

  782.                     dol_syslog("Try to find source object origin=".$object->origin." originid=".$object->origin_id." to add lines");
    783. 

  783.                     $result=$srcobject->fetch($object->origin_id);
    784. 

  784.                     if ($result > 0)
    785. 

  785.                     {
    786. 

  786.                         $lines = $srcobject->lines;
    787. 

  787.                         if (empty($lines) && method_exists($srcobject,'fetch_lines'))  $lines = $srcobject->fetch_lines();
    788. 

  788. 

  789.                         $fk_parent_line=0;
    790. 

  790.                         $num=count($lines);
    791. 

  791. 

  792.                         for ($i=0;$i<$num;$i++)
    793. 

  793.                         {
    794. 

  794.                             $desc=($lines[$i]->desc?$lines[$i]->desc:$lines[$i]->libelle);
    795. 

  795. 

  796.                             if ($lines[$i]->subprice < 0)
    797. 

  797.                             {
    798. 

  798.                                 // Negative line, we create a discount line
    799. 

  799.                             	$discount = new DiscountAbsolute($db);
    800. 

  800.                             	$discount->fk_soc=$object->socid;
    801. 

  801.                                 $discount->amount_ht=abs($lines[$i]->total_ht);
    802. 

  802.                                 $discount->amount_tva=abs($lines[$i]->total_tva);
    803. 

  803.                                 $discount->amount_ttc=abs($lines[$i]->total_ttc);
    804. 

  804.                                 $discount->tva_tx=$lines[$i]->tva_tx;
    805. 

  805.                                 $discount->fk_user=$user->id;
    806. 

  806.                                 $discount->description=$desc;
    807. 

  807.                                 $discountid=$discount->create($user);
    808. 

  808.                                 if ($discountid > 0)
    809. 

  809.                                 {
    810. 

  810.                                     $result=$object->insert_discount($discountid);    // This include link_to_invoice
    811. 

  811.                                 }
    812. 

  812.                                 else
    813. 

  813.                                 {
    814. 

  814.                                     $mesgs[]=$discount->error;
    815. 

  815.                                     $error++;
    816. 

  816.                                     break;
    817. 

  817.                                 }
    818. 

  818.                             }
    819. 

  819.                             else
    820. 

  820.                             {
    821. 

  821.                                 // Positive line
    822. 

  822.                                 $product_type=($lines[$i]->product_type?$lines[$i]->product_type:0);
    823. 

  823. 

  824.                                 // Date start
    825. 

  825.                                 $date_start=false;
    826. 

  826.                                 if ($lines[$i]->date_debut_prevue) $date_start=$lines[$i]->date_debut_prevue;
    827. 

  827.                                 if ($lines[$i]->date_debut_reel) $date_start=$lines[$i]->date_debut_reel;
    828. 

  828.                                 if ($lines[$i]->date_start) $date_start=$lines[$i]->date_start;
    829. 

  829. 

  830.                                 //Date end
    831. 

  831.                                 $date_end=false;
    832. 

  832.                                 if ($lines[$i]->date_fin_prevue) $date_end=$lines[$i]->date_fin_prevue;
    833. 

  833.                                 if ($lines[$i]->date_fin_reel) $date_end=$lines[$i]->date_fin_reel;
    834. 

  834.                                 if ($lines[$i]->date_end) $date_end=$lines[$i]->date_end;
    835. 

  835. 

  836.                                 // Reset fk_parent_line for no child products and special product
    837. 

  837.                                 if (($lines[$i]->product_type != 9 && empty($lines[$i]->fk_parent_line)) || $lines[$i]->product_type == 9) {
    838. 

  838.                                     $fk_parent_line = 0;
    839. 

  839.                                 }
    840. 

  840. 

  841.                                 $result = $object->addline(
    842. 

  842.                                     $id,
    843. 

  843.                                     $desc,
    844. 

  844.                                     $lines[$i]->subprice,
    845. 

  845.                                     $lines[$i]->qty,
    846. 

  846.                                     $lines[$i]->tva_tx,
    847. 

  847.                                     $lines[$i]->localtax1_tx,
    848. 

  848.                                     $lines[$i]->localtax2_tx,
    849. 

  849.                                     $lines[$i]->fk_product,
    850. 

  850.                                     $lines[$i]->remise_percent,
    851. 

  851.                                     $date_start,
    852. 

  852.                                     $date_end,
    853. 

  853.                                     0,
    854. 

  854.                                     $lines[$i]->info_bits,
    855. 

  855.                                     $lines[$i]->fk_remise_except,
    856. 

  856.                                     'HT',
    857. 

  857.                                     0,
    858. 

  858.                                     $product_type,
    859. 

  859.                                     $lines[$i]->rang,
    860. 

  860.                                     $lines[$i]->special_code,
    861. 

  861.                                     $object->origin,
    862. 

  862.                                     $lines[$i]->rowid,
    863. 

  863.                                     $fk_parent_line,
    864. 

  864.                                     $lines[$i]->fk_fournprice,
    865. 

  865.                                     $lines[$i]->pa_ht
    866. 

  866.                                 );
    867. 

  867. 

  868.                                 if ($result > 0)
    869. 

  869.                                 {
    870. 

  870.                                     $lineid=$result;
    871. 

  871.                                 }
    872. 

  872.                                 else
    873. 

  873.                                 {
    874. 

  874.                                     $lineid=0;
    875. 

  875.                                     $error++;
    876. 

  876.                                     break;
    877. 

  877.                                 }
    878. 

  878. 

  879.                                 // Defined the new fk_parent_line
    880. 

  880.                                 if ($result > 0 && $lines[$i]->product_type == 9) {
    881. 

  881.                                     $fk_parent_line = $result;
    882. 

  882.                                 }
    883. 

  883.                             }
    884. 

  884.                         }
    885. 

  885. 

  886.                         // Hooks
    887. 

  887.                         $parameters=array('objFrom'=>$srcobject);
    888. 

  888.                         $reshook=$hookmanager->executeHooks('createFrom',$parameters,$object,$action);    // Note that $action and $object may have been modified by hook
    889. 

  889.                         if ($reshook < 0) $error++;
    890. 

  890.                     }
    891. 

  891.                     else
    892. 

  892.                     {
    893. 

  893.                         $mesgs[]=$srcobject->error;
    894. 

  894.                         $error++;
    895. 

  895.                     }
    896. 

  896.                 }
    897. 

  897.                 else
    898. 

  898.                 {
    899. 

  899.                     $mesgs[]=$object->error;
    900. 

  900.                     $error++;
    901. 

  901.                 }
    902. 

  902.             }
    903. 

  903.             // If some invoice's lines already known
    904. 

  904.             else
    905. 

  905.             {
    906. 

  906.                 $id = $object->create($user);
    907. 

  907. 

  908.                 for ($i = 1; $i <= $NBLINES; $i++)
    909. 

  909.                 {
    910. 

  910.                     if ($_POST['idprod'.$i])
    911. 

  911.                     {
    912. 

  912.                         $product=new Product($db);
    913. 

  913.                         $product->fetch($_POST['idprod'.$i]);
    914. 

  914.                         $startday=dol_mktime(12, 0, 0, $_POST['date_start'.$i.'month'], $_POST['date_start'.$i.'day'], $_POST['date_start'.$i.'year']);
    915. 

  915.                         $endday=dol_mktime(12, 0, 0, $_POST['date_end'.$i.'month'], $_POST['date_end'.$i.'day'], $_POST['date_end'.$i.'year']);
    916. 

  916.                         $result=$object->addline($id,$product->description,$product->price, $_POST['qty'.$i], $product->tva_tx, $product->localtax1_tx, $product->localtax2_tx, $_POST['idprod'.$i], $_POST['remise_percent'.$i], $startday, $endday, 0, 0, '', $product->price_base_type, $product->price_ttc, $product->type);
    917. 

  917.                     }
    918. 

  918.                 }
    919. 

  919.             }
    920. 

  920.         }
    921. 

  921.     }
    922. 

  922. 

  923.     // End of object creation, we show it
    924. 

  924.     if ($id > 0 && ! $error)
    925. 

  925.     {
    926. 

  926.         $db->commit();
    927. 

  927.         Header('Location: '.$_SERVER["PHP_SELF"].'?facid='.$id);
    928. 

  928.         exit;
    929. 

  929.     }
    930. 

  930.     else
    931. 

  931.     {
    932. 

  932.         $db->rollback();
    933. 

  933.         $action='create';
    934. 

  934.         $_GET["origin"]=$_POST["origin"];
    935. 

  935.         $_GET["originid"]=$_POST["originid"];
    936. 

  936.         $mesgs[]='<div class="error">'.$object->error.'</div>';
    937. 

  937.     }
    938. 

  938. }
    939. 

  939. 

  940. // Add a new line
    941. 

  941. else if (($action == 'addline' || $action == 'addline_predef') && $user->rights->facture->creer)
    942. 

  942. {
    943. 

  943.     $result=0;
    944. 

  944. 

  945.     if ($_POST['np_price'] < 0 && $_POST["qty"] < 0)
    946. 

  946.     {
    947. 

  947.     	$langs->load("errors");
    948. 

  948.     	$mesgs[]='<div class="error">'.$langs->trans("ErrorBothFieldCantBeNegative",$langs->transnoentitiesnoconv("UnitPriceHT"),$langs->transnoentitiesnoconv("Qty")).'</div>';
    949. 

  949.     	$result = -1 ;
    950. 

  950.     }
    951. 

  951.     if (empty($_POST['idprod']) && $_POST["type"] < 0)
    952. 

  952.     {
    953. 

  953.         $mesgs[]='<div class="error">'.$langs->trans("ErrorFieldRequired",$langs->transnoentitiesnoconv("Type")).'</div>';
    954. 

  954.         $result = -1 ;
    955. 

  955.     }
    956. 

  956.     if (empty($_POST['idprod']) && (! isset($_POST["np_price"]) || $_POST["np_price"]==''))	// Unit price can be 0 but not ''
    957. 

  957.     {
    958. 

  958.         $mesgs[]='<div class="error">'.$langs->trans("ErrorFieldRequired",$langs->transnoentitiesnoconv("UnitPriceHT")).'</div>';
    959. 

  959.         $result = -1 ;
    960. 

  960.     }
    961. 

  961.     if (empty($_POST['idprod']) && empty($_POST["np_desc"]) && empty($_POST["dp_desc"]))
    962. 

  962.     {
    963. 

  963.         $mesgs[]='<div class="error">'.$langs->trans("ErrorFieldRequired",$langs->transnoentitiesnoconv("Description")).'</div>';
    964. 

  964.         $result = -1 ;
    965. 

  965.     }
    966. 

  966.     if (! isset($_POST['qty']) || $_POST['qty']=='')
    967. 

  967.     {
    968. 

  968.         $mesgs[]='<div class="error">'.$langs->trans("ErrorFieldRequired",$langs->transnoentitiesnoconv('Qty')).'</div>';
    969. 

  969.         $result = -1 ;
    970. 

  970.     }
    971. 

  971.     if ($result >= 0 && ( ($_POST['np_price']!='' && ($_POST['np_desc'] || $_POST['dp_desc'])) || $_POST['idprod'] ) )
    972. 

  972.     {
    973. 

  973.         $ret=$object->fetch($id);
    974. 

  974.         if ($ret < 0)
    975. 

  975.         {
    976. 

  976.             dol_print_error($db,$object->error);
    977. 

  977.             exit;
    978. 

  978.         }
    979. 

  979.         $ret=$object->fetch_thirdparty();
    980. 

  980. 

  981.         $suffixe = $_POST['idprod'] ? '_predef' : '';
    982. 

  982.         $date_start=dol_mktime($_POST['date_start'.$suffixe.'hour'],$_POST['date_start'.$suffixe.'min'],$_POST['date_start'.$suffixe.'sec'],$_POST['date_start'.$suffixe.'month'],$_POST['date_start'.$suffixe.'day'],$_POST['date_start'.$suffixe.'year']);
    983. 

  983.         $date_end=dol_mktime($_POST['date_end'.$suffixe.'hour'],$_POST['date_end'.$suffixe.'min'],$_POST['date_end'.$suffixe.'sec'],$_POST['date_end'.$suffixe.'month'],$_POST['date_end'.$suffixe.'day'],$_POST['date_end'.$suffixe.'year']);
    984. 

  984. 

  985.         $price_base_type = 'HT';
    986. 

  986. 

  987.         // Ecrase $pu par celui du produit
    988. 

  988.         // Ecrase $desc par celui du produit
    989. 

  989.         // Ecrase $txtva par celui du produit
    990. 

  990.         // Ecrase $base_price_type par celui du produit
    991. 

  991.         if ($_POST['idprod'])
    992. 

  992.         {
    993. 

  993.             $prod = new Product($db);
    994. 

  994.             $prod->fetch($_POST['idprod']);
    995. 

  995. 

  996.             $tva_tx = get_default_tva($mysoc,$object->client,$prod->id);
    997. 

  997.             $tva_npr = get_default_npr($mysoc,$object->client,$prod->id);
    998. 

  998. 

  999.             // We define price for product
    1000. 

  1000.             if ($conf->global->PRODUIT_MULTIPRICES && $object->client->price_level)
    1001. 

  1001.             {
    1002. 

  1002.                 $pu_ht = $prod->multiprices[$object->client->price_level];
    1003. 

  1003.                 $pu_ttc = $prod->multiprices_ttc[$object->client->price_level];
    1004. 

  1004.                 $price_min = $prod->multiprices_min[$object->client->price_level];
    1005. 

  1005.                 $price_base_type = $prod->multiprices_base_type[$object->client->price_level];
    1006. 

  1006.             }
    1007. 

  1007.             else
    1008. 

  1008.             {
    1009. 

  1009.                 $pu_ht = $prod->price;
    1010. 

  1010.                 $pu_ttc = $prod->price_ttc;
    1011. 

  1011.                 $price_min = $prod->price_min;
    1012. 

  1012.                 $price_base_type = $prod->price_base_type;
    1013. 

  1013.             }
    1014. 

  1014. 

  1015.             // On reevalue prix selon taux tva car taux tva transaction peut etre different
    1016. 

  1016.             // de ceux du produit par defaut (par exemple si pays different entre vendeur et acheteur).
    1017. 

  1017.             if ($tva_tx != $prod->tva_tx)
    1018. 

  1018.             {
    1019. 

  1019.                 if ($price_base_type != 'HT')
    1020. 

  1020.                 {
    1021. 

  1021.                     $pu_ht = price2num($pu_ttc / (1 + ($tva_tx/100)), 'MU');
    1022. 

  1022.                 }
    1023. 

  1023.                 else
    1024. 

  1024.                 {
    1025. 

  1025.                     $pu_ttc = price2num($pu_ht * (1 + ($tva_tx/100)), 'MU');
    1026. 

  1026.                 }
    1027. 

  1027.             }
    1028. 

  1028. 

  1029.             // Define output language
    1030. 

  1030. 			if (! empty($conf->global->MAIN_MULTILANGS) && ! empty($conf->global->PRODUIT_TEXTS_IN_THIRDPARTY_LANGUAGE))
    1031. 

  1031. 			{
    1032. 

  1032. 				$outputlangs = $langs;
    1033. 

  1033. 				$newlang='';
    1034. 

  1034. 				if (empty($newlang) && GETPOST('lang_id')) $newlang=GETPOST('lang_id');
    1035. 

  1035. 				if (empty($newlang)) $newlang=$object->client->default_lang;
    1036. 

  1036. 				if (! empty($newlang))
    1037. 

  1037. 				{
    1038. 

  1038. 					$outputlangs = new Translate("",$conf);
    1039. 

  1039. 					$outputlangs->setDefaultLang($newlang);
    1040. 

  1040. 				}
    1041. 

  1041. 

  1042. 				$desc = (! empty($prod->multilangs[$outputlangs->defaultlang]["description"])) ? $prod->multilangs[$outputlangs->defaultlang]["description"] : $prod->description;
    1043. 

  1043. 			}
    1044. 

  1044. 			else
    1045. 

  1045. 			{
    1046. 

  1046. 				$desc = $prod->description;
    1047. 

  1047. 			}
    1048. 

  1048. 

  1049.             $desc.= ($desc && $_POST['np_desc']) ? ((dol_textishtml($desc) || dol_textishtml($_POST['np_desc']))?"<br>\n":"\n") : "";
    1050. 

  1050.             $desc.= $_POST['np_desc'];
    1051. 

  1051.             if (! empty($prod->customcode) || ! empty($prod->country_code))
    1052. 

  1052.             {
    1053. 

  1053.                 $tmptxt='(';
    1054. 

  1054.                 if (! empty($prod->customcode)) $tmptxt.=$langs->transnoentitiesnoconv("CustomCode").': '.$prod->customcode;
    1055. 

  1055.                 if (! empty($prod->customcode) && ! empty($prod->country_code)) $tmptxt.=' - ';
    1056. 

  1056.                 if (! empty($prod->country_code)) $tmptxt.=$langs->transnoentitiesnoconv("CountryOrigin").': '.getCountry($prod->country_code,0,$db,$langs,0);
    1057. 

  1057.                 $tmptxt.=')';
    1058. 

  1058.                 $desc.= (dol_textishtml($desc)?"<br>\n":"\n").$tmptxt;
    1059. 

  1059.             }
    1060. 

  1060.             $type = $prod->type;
    1061. 

  1061.         }
    1062. 

  1062.         else
    1063. 

  1063.         {
    1064. 

  1064.             $pu_ht=$_POST['np_price'];
    1065. 

  1065.             $tva_tx=str_replace('*','',$_POST['np_tva_tx']);
    1066. 

  1066.             $tva_npr=preg_match('/\*/',$_POST['np_tva_tx'])?1:0;
    1067. 

  1067.             $desc=$_POST['dp_desc'];
    1068. 

  1068.             $type=$_POST["type"];
    1069. 

  1069.         }
    1070. 

  1070. 

  1071.         $localtax1_tx=get_localtax($tva_tx,1,$object->client);
    1072. 

  1072.         $localtax2_tx=get_localtax($tva_tx,2,$object->client);
    1073. 

  1073. 

  1074.     		// ajout prix achat
    1075. 

  1075.     		$fk_fournprice = $_POST['np_fournprice'];
    1076. 

  1076.     		if ( ! empty($_POST['np_buying_price']) )
    1077. 

  1077.     		  $pa_ht = $_POST['np_buying_price'];
    1078. 

  1078.     		else
    1079. 

  1079.     		  $pa_ht = null;
    1080. 

  1080. 

  1081.         $info_bits=0;
    1082. 

  1082.         if ($tva_npr) $info_bits |= 0x01;
    1083. 

  1083. 

  1084.         if ($result >= 0)
    1085. 

  1085.         {
    1086. 

  1086.             if($price_min && (price2num($pu_ht)*(1-price2num($_POST['remise_percent'])/100) < price2num($price_min)))
    1087. 

  1087.             {
    1088. 

  1088.                 $object->error = $langs->trans("CantBeLessThanMinPrice",price2num($price_min,'MU').' '.$langs->trans("Currency".$conf->currency));
    1089. 

  1089.                 $result = -1 ;
    1090. 

  1090.             }
    1091. 

  1091.             else
    1092. 

  1092.             {
    1093. 

  1093.             	// Insert line
    1094. 

  1094.                 $result = $object->addline(
    1095. 

  1095.                     $id,
    1096. 

  1096.                     $desc,
    1097. 

  1097.                     $pu_ht,
    1098. 

  1098.                     $_POST['qty'],
    1099. 

  1099.                     $tva_tx,
    1100. 

  1100.                     $localtax1_tx,
    1101. 

  1101.                     $localtax2_tx,
    1102. 

  1102.                     $_POST['idprod'],
    1103. 

  1103.                     $_POST['remise_percent'],
    1104. 

  1104.                     $date_start,
    1105. 

  1105.                     $date_end,
    1106. 

  1106.                     0,
    1107. 

  1107.                     $info_bits,
    1108. 

  1108.                     '',
    1109. 

  1109.                     $price_base_type,
    1110. 

  1110.                     $pu_ttc,
    1111. 

  1111.                     $type,
    1112. 

  1112.                     -1,
    1113. 

  1113.                     0,
    1114. 

  1114.                     '',
    1115. 

  1115.                     0,
    1116. 

  1116.                     GETPOST('fk_parent_line'),
    1117. 

  1117.                     $fk_fournprice,
    1118. 

  1118.                     $pa_ht
    1119. 

  1119.                 );
    1120. 

  1120.             }
    1121. 

  1121.         }
    1122. 

  1122.     }
    1123. 

  1123. 

  1124.     if ($result > 0)
    1125. 

  1125.     {
    1126. 

  1126.         // Define output language
    1127. 

  1127.         $outputlangs = $langs;
    1128. 

  1128.         $newlang='';
    1129. 

  1129.         if ($conf->global->MAIN_MULTILANGS && empty($newlang) && ! empty($_REQUEST['lang_id'])) $newlang=$_REQUEST['lang_id'];
    1130. 

  1130.         if ($conf->global->MAIN_MULTILANGS && empty($newlang)) $newlang=$object->client->default_lang;
    1131. 

  1131.         if (! empty($newlang))
    1132. 

  1132.         {
    1133. 

  1133.             $outputlangs = new Translate("",$conf);
    1134. 

  1134.             $outputlangs->setDefaultLang($newlang);
    1135. 

  1135.         }
    1136. 

  1136.         if (empty($conf->global->MAIN_DISABLE_PDF_AUTOUPDATE))
    1137. 

  1137.         {
    1138. 

  1138.             $ret=$object->fetch($id);    // Reload to get new records
    1139. 

  1139.             facture_pdf_create($db, $object, $object->modelpdf, $outputlangs, $hidedetails, $hidedesc, $hideref, $hookmanager);
    1140. 

  1140.         }
    1141. 

  1141.         unset($_POST['qty']);
    1142. 

  1142.         unset($_POST['type']);
    1143. 

  1143.         unset($_POST['idprod']);
    1144. 

  1144.         unset($_POST['remise_percent']);
    1145. 

  1145.         unset($_POST['dp_desc']);
    1146. 

  1146.         unset($_POST['np_desc']);
    1147. 

  1147.         unset($_POST['np_price']);
    1148. 

  1148.         unset($_POST['np_tva_tx']);
    1149. 

  1149. 				unset($_POST['np_buying_price']);
    1150. 

  1150.     }
    1151. 

  1151.     else
    1152. 

  1152.     {
    1153. 

  1153.         $mesgs[]='<div class="error">'.$object->error.'</div>';
    1154. 

  1154.     }
    1155. 

  1155. 

  1156.     $action='';
    1157. 

  1157. }
    1158. 

  1158. 

  1159. else if ($action == 'updateligne' && $user->rights->facture->creer && $_POST['save'] == $langs->trans('Save'))
    1160. 

  1160. {
    1161. 

  1161.     if (! $object->fetch($id) > 0) dol_print_error($db);
    1162. 

  1162.     $object->fetch_thirdparty();
    1163. 

  1163. 

  1164.     // Clean parameters
    1165. 

  1165.     $date_start='';
    1166. 

  1166.     $date_end='';
    1167. 

  1167.     $date_start=dol_mktime($_POST['date_start'.$suffixe.'hour'],$_POST['date_start'.$suffixe.'min'],$_POST['date_start'.$suffixe.'sec'],$_POST['date_start'.$suffixe.'month'],$_POST['date_start'.$suffixe.'day'],$_POST['date_start'.$suffixe.'year']);
    1168. 

  1168.     $date_end=dol_mktime($_POST['date_end'.$suffixe.'hour'],$_POST['date_end'.$suffixe.'min'],$_POST['date_end'.$suffixe.'sec'],$_POST['date_end'.$suffixe.'month'],$_POST['date_end'.$suffixe.'day'],$_POST['date_end'.$suffixe.'year']);
    1169. 

  1169.     $description=dol_htmlcleanlastbr($_POST['desc']);
    1170. 

  1170.     $up_ht=GETPOST('pu')?GETPOST('pu'):GETPOST('subprice');
    1171. 

  1171. 

  1172.     // Define info_bits
    1173. 

  1173.     $info_bits=0;
    1174. 

  1174.     if (preg_match('/\*/',$_POST['tva_tx'])) $info_bits |= 0x01;
    1175. 

  1175. 

  1176.     // Define vat_rate
    1177. 

  1177.     $vat_rate=$_POST['tva_tx'];
    1178. 

  1178.     $vat_rate=str_replace('*','',$vat_rate);
    1179. 

  1179.     $localtax1_rate=get_localtax($vat_rate,1,$object->client);
    1180. 

  1180.     $localtax2_rate=get_localtax($vat_rate,2,$object->client);
    1181. 

  1181. 

  1182.   	// ajout prix d'achat
    1183. 

  1183.   	$fk_fournprice = $_POST['fournprice'];
    1184. 

  1184.   	if ( ! empty($_POST['buying_price']) )
    1185. 

  1185.   	  $pa_ht = $_POST['buying_price'];
    1186. 

  1186.   	else
    1187. 

  1187.   	  $pa_ht = null;
    1188. 

  1188. 

  1189.     // Check parameters
    1190. 

  1190.     if (! GETPOST('productid') && GETPOST("type") < 0)
    1191. 

  1191.     {
    1192. 

  1192.         $mesgs[] = '<div class="error">'.$langs->trans("ErrorFieldRequired",$langs->transnoentitiesnoconv("Type")).'</div>';
    1193. 

  1193.         $result = -1 ;
    1194. 

  1194.     }
    1195. 

  1195.     // Check minimum price
    1196. 

  1196.     if (GETPOST('productid'))
    1197. 

  1197.     {
    1198. 

  1198.         $productid = GETPOST('productid');
    1199. 

  1199.         $product = new Product($db);
    1200. 

  1200.         $product->fetch($productid);
    1201. 

  1201.         $type=$product->type;
    1202. 

  1202.         $price_min = $product->price_min;
    1203. 

  1203.         if ($conf->global->PRODUIT_MULTIPRICES && $object->client->price_level)	$price_min = $product->multiprices_min[$object->client->price_level];
    1204. 

  1204.     }
    1205. 

  1205.     if ($object->type!=2 && $price_min && GETPOST('productid') && (price2num($up_ht)*(1-price2num(GETPOST('remise_percent'))/100) < price2num($price_min)))
    1206. 

  1206.     {
    1207. 

  1207.         //print "CantBeLessThanMinPrice ".$up_ht." - ".GETPOST('remise_percent')." - ".$product->price_min;
    1208. 

  1208.         $mesgs[] = '<div class="error">'.$langs->trans("CantBeLessThanMinPrice",price2num($price_min,'MU').' '.$langs->trans("Currency".$conf->currency)).'</div>';
    1209. 

  1209.         $result=-1;
    1210. 

  1210.     }
    1211. 

  1211. 

  1212.     // Define params
    1213. 

  1213.     if (GETPOST('productid')) $type=$product->type;
    1214. 

  1214.     else $type=GETPOST("type");
    1215. 

  1215. 

  1216.     // Update line
    1217. 

  1217.     if ($result >= 0)
    1218. 

  1218.     {
    1219. 

  1219.         $result = $object->updateline(
    1220. 

  1220.             GETPOST('lineid'),
    1221. 

  1221.             $description,
    1222. 

  1222.             $up_ht,
    1223. 

  1223.             GETPOST('qty'),
    1224. 

  1224.             GETPOST('remise_percent'),
    1225. 

  1225.             $date_start,
    1226. 

  1226.             $date_end,
    1227. 

  1227.             $vat_rate,
    1228. 

  1228.             $localtax1_rate,
    1229. 

  1229.             $localtax2_rate,
    1230. 

  1230.             'HT',
    1231. 

  1231.             $info_bits,
    1232. 

  1232.             $type,
    1233. 

  1233.             GETPOST('fk_parent_line'),
    1234. 

  1234.             0,
    1235. 

  1235.             $fk_fournprice,
    1236. 

  1236.             $pa_ht
    1237. 

  1237.         );
    1238. 

  1238. 

  1239.         // Define output language
    1240. 

  1240.         $outputlangs = $langs;
    1241. 

  1241.         $newlang='';
    1242. 

  1242.         if ($conf->global->MAIN_MULTILANGS && empty($newlang) && GETPOST('lang_id')) $newlang=GETPOST('lang_id');
    1243. 

  1243.         if ($conf->global->MAIN_MULTILANGS && empty($newlang)) $newlang=$object->client->default_lang;
    1244. 

  1244.         if (! empty($newlang))
    1245. 

  1245.         {
    1246. 

  1246.             $outputlangs = new Translate("",$conf);
    1247. 

  1247.             $outputlangs->setDefaultLang($newlang);
    1248. 

  1248.         }
    1249. 

  1249.         if (empty($conf->global->MAIN_DISABLE_PDF_AUTOUPDATE))
    1250. 

  1250.         {
    1251. 

  1251.             $ret=$object->fetch($id);    // Reload to get new records
    1252. 

  1252.             facture_pdf_create($db, $object, $object->modelpdf, $outputlangs, $hidedetails, $hidedesc, $hideref, $hookmanager);
    1253. 

  1253. 

  1254. 						unset($_POST['qty']);
    1255. 

  1255. 						unset($_POST['type']);
    1256. 

  1256. 						unset($_POST['np_price']);
    1257. 

  1257. 						unset($_POST['dp_desc']);
    1258. 

  1258. 						unset($_POST['np_tva_tx']);
    1259. 

  1259. 						unset($_POST['np_buying_price']);
    1260. 

  1260.         }
    1261. 

  1261.     }
    1262. 

  1262. }
    1263. 

  1263. 

  1264. else if ($action == 'updateligne' && $user->rights->facture->creer && $_POST['cancel'] == $langs->trans('Cancel'))
    1265. 

  1265. {
    1266. 

  1266.     Header('Location: '.$_SERVER["PHP_SELF"].'?facid='.$id);   // Pour reaffichage de la fiche en cours d'edition
    1267. 

  1267.     exit;
    1268. 

  1268. }
    1269. 

  1269. 

  1270. // Modify line position (up)
    1271. 

  1271. else if ($action == 'up' && $user->rights->facture->creer)
    1272. 

  1272. {
    1273. 

  1273.     $object->fetch($id);
    1274. 

  1274.     $object->fetch_thirdparty();
    1275. 

  1275.     $object->line_up($_GET['rowid']);
    1276. 

  1276. 

  1277.     // Define output language
    1278. 

  1278.     $outputlangs = $langs;
    1279. 

  1279.     $newlang='';
    1280. 

  1280.     if ($conf->global->MAIN_MULTILANGS && empty($newlang) && ! empty($_REQUEST['lang_id'])) $newlang=$_REQUEST['lang_id'];
    1281. 

  1281.     if ($conf->global->MAIN_MULTILANGS && empty($newlang)) $newlang=$object->client->default_lang;
    1282. 

  1282.     if (! empty($newlang))
    1283. 

  1283.     {
    1284. 

  1284.         $outputlangs = new Translate("",$conf);
    1285. 

  1285.         $outputlangs->setDefaultLang($newlang);
    1286. 

  1286.     }
    1287. 

  1287.     if (empty($conf->global->MAIN_DISABLE_PDF_AUTOUPDATE)) facture_pdf_create($db, $object, $object->modelpdf, $outputlangs, $hidedetails, $hidedesc, $hideref, $hookmanager);
    1288. 

  1288. 

  1289.     Header('Location: '.$_SERVER["PHP_SELF"].'?facid='.$object->id.'#'.$_GET['rowid']);
    1290. 

  1290.     exit;
    1291. 

  1291. }
    1292. 

  1292. // Modify line position (down)
    1293. 

  1293. else if ($action == 'down' && $user->rights->facture->creer)
    1294. 

  1294. {
    1295. 

  1295.     $object->fetch($id);
    1296. 

  1296.     $object->fetch_thirdparty();
    1297. 

  1297.     $object->line_down($_GET['rowid']);
    1298. 

  1298. 

  1299.     // Define output language
    1300. 

  1300.     $outputlangs = $langs;
    1301. 

  1301.     $newlang='';
    1302. 

  1302.     if ($conf->global->MAIN_MULTILANGS && empty($newlang) && ! empty($_REQUEST['lang_id'])) $newlang=$_REQUEST['lang_id'];
    1303. 

  1303.     if ($conf->global->MAIN_MULTILANGS && empty($newlang)) $newlang=$object->client->default_lang;
    1304. 

  1304.     if (! empty($newlang))
    1305. 

  1305.     {
    1306. 

  1306.         $outputlangs = new Translate("",$conf);
    1307. 

  1307.         $outputlangs->setDefaultLang($newlang);
    1308. 

  1308.     }
    1309. 

  1309.     if (empty($conf->global->MAIN_DISABLE_PDF_AUTOUPDATE)) facture_pdf_create($db, $object, $object->modelpdf, $outputlangs, $hidedetails, $hidedesc, $hideref, $hookmanager);
    1310. 

  1310. 

  1311.     Header('Location: '.$_SERVER["PHP_SELF"].'?facid='.$object->id.'#'.$_GET['rowid']);
    1312. 

  1312.     exit;
    1313. 

  1313. }
    1314. 

  1314. 

  1315. /*
    1316. 

  1316.  * Add file in email form
    1317. 

  1317.  */
    1318. 

  1318. if (GETPOST('addfile'))
    1319. 

  1319. {
    1320. 

  1320.     require_once(DOL_DOCUMENT_ROOT."/core/lib/files.lib.php");
    1321. 

  1321. 

  1322.     // Set tmp user directory
    1323. 

  1323.     $vardir=$conf->user->dir_output."/".$user->id;
    1324. 

  1324.     $upload_dir_tmp = $vardir.'/temp';
    1325. 

  1325. 

  1326.     dol_add_file_process($upload_dir_tmp,0,0);
    1327. 

  1327.     $action='presend';
    1328. 

  1328. }
    1329. 

  1329. 

  1330. /*
    1331. 

  1331.  * Remove file in email form
    1332. 

  1332.  */
    1333. 

  1333. if (! empty($_POST['removedfile']))
    1334. 

  1334. {
    1335. 

  1335.     require_once(DOL_DOCUMENT_ROOT."/core/lib/files.lib.php");
    1336. 

  1336. 

  1337.     // Set tmp user directory
    1338. 

  1338.     $vardir=$conf->user->dir_output."/".$user->id;
    1339. 

  1339.     $upload_dir_tmp = $vardir.'/temp';
    1340. 

  1340. 

  1341. 	// TODO Delete only files that was uploaded from email form
    1342. 

  1342.     dol_remove_file_process($_POST['removedfile'],0);
    1343. 

  1343.     $action='presend';
    1344. 

  1344. }
    1345. 

  1345. 

  1346. /*
    1347. 

  1347.  * Send mail
    1348. 

  1348.  */
    1349. 

  1349. if (($action == 'send' || $action == 'relance') && ! $_POST['addfile'] && ! $_POST['removedfile'] && ! $_POST['cancel'])
    1350. 

  1350. {
    1351. 

  1351.     $langs->load('mails');
    1352. 

  1352. 

  1353.     $actiontypecode='';$subject='';$actionmsg='';$actionmsg2='';
    1354. 

  1354. 

  1355.     $result=$object->fetch($id);
    1356. 

  1356.     $result=$object->fetch_thirdparty();
    1357. 

  1357. 

  1358.     if ($result > 0)
    1359. 

  1359.     {
    1360. 

  1360. //        $ref = dol_sanitizeFileName($object->ref);
    1361. 

  1361. //        $file = $conf->facture->dir_output . '/' . $ref . '/' . $ref . '.pdf';
    1362. 

  1362. 

  1363. //        if (is_readable($file))
    1364. 

  1364. //        {
    1365. 

  1365.             if ($_POST['sendto'])
    1366. 

  1366.             {
    1367. 

  1367.                 // Le destinataire a ete fourni via le champ libre
    1368. 

  1368.                 $sendto = $_POST['sendto'];
    1369. 

  1369.                 $sendtoid = 0;
    1370. 

  1370.             }
    1371. 

  1371.             elseif ($_POST['receiver'] != '-1')
    1372. 

  1372.             {
    1373. 

  1373.                 // Recipient was provided from combo list
    1374. 

  1374.                 if ($_POST['receiver'] == 'thirdparty') // Id of third party
    1375. 

  1375.                 {
    1376. 

  1376.                     $sendto = $object->client->email;
    1377. 

  1377.                     $sendtoid = 0;
    1378. 

  1378.                 }
    1379. 

  1379.                 else	// Id du contact
    1380. 

  1380.                 {
    1381. 

  1381.                     $sendto = $object->client->contact_get_property($_POST['receiver'],'email');
    1382. 

  1382.                     $sendtoid = $_POST['receiver'];
    1383. 

  1383.                 }
    1384. 

  1384.             }
    1385. 

  1385. 

  1386.             if (dol_strlen($sendto))
    1387. 

  1387.             {
    1388. 

  1388.                 $langs->load("commercial");
    1389. 

  1389. 

  1390.                 $from = $_POST['fromname'] . ' <' . $_POST['frommail'] .'>';
    1391. 

  1391.                 $replyto = $_POST['replytoname']. ' <' . $_POST['replytomail'].'>';
    1392. 

  1392.                 $message = $_POST['message'];
    1393. 

  1393.                 $sendtocc = $_POST['sendtocc'];
    1394. 

  1394.                 $deliveryreceipt = $_POST['deliveryreceipt'];
    1395. 

  1395. 

  1396.                 if ($action == 'send')
    1397. 

  1397.                 {
    1398. 

  1398.                     if (dol_strlen($_POST['subject'])) $subject = $_POST['subject'];
    1399. 

  1399.                     else $subject = $langs->transnoentities('Bill').' '.$object->ref;
    1400. 

  1400.                     $actiontypecode='AC_FAC';
    1401. 

  1401.                     $actionmsg=$langs->transnoentities('MailSentBy').' '.$from.' '.$langs->transnoentities('To').' '.$sendto.".\n";
    1402. 

  1402.                     if ($message)
    1403. 

  1403.                     {
    1404. 

  1404.                         $actionmsg.=$langs->transnoentities('MailTopic').": ".$subject."\n";
    1405. 

  1405.                         $actionmsg.=$langs->transnoentities('TextUsedInTheMessageBody').":\n";
    1406. 

  1406.                         $actionmsg.=$message;
    1407. 

  1407.                     }
    1408. 

  1408.                     //$actionmsg2=$langs->transnoentities('Action'.$actiontypecode);
    1409. 

  1409.                 }
    1410. 

  1410.                 if ($action == 'relance')
    1411. 

  1411.                 {
    1412. 

  1412.                     if (dol_strlen($_POST['subject'])) $subject = $_POST['subject'];
    1413. 

  1413.                     else $subject = $langs->transnoentities('Relance facture '.$object->ref);
    1414. 

  1414.                     $actiontypecode='AC_FAC';
    1415. 

  1415.                     $actionmsg=$langs->transnoentities('MailSentBy').' '.$from.' '.$langs->transnoentities('To').' '.$sendto.".\n";
    1416. 

  1416.                     if ($message) {
    1417. 

  1417.                         $actionmsg.=$langs->transnoentities('MailTopic').": ".$subject."\n";
    1418. 

  1418.                         $actionmsg.=$langs->transnoentities('TextUsedInTheMessageBody').":\n";
    1419. 

  1419.                         $actionmsg.=$message;
    1420. 

  1420.                     }
    1421. 

  1421.                     //$actionmsg2=$langs->transnoentities('Action'.$actiontypecode);
    1422. 

  1422.                 }
    1423. 

  1423. 

  1424.                 // Create form object
    1425. 

  1425.                 include_once(DOL_DOCUMENT_ROOT.'/core/class/html.formmail.class.php');
    1426. 

  1426.                 $formmail = new FormMail($db);
    1427. 

  1427. 

  1428.                 $attachedfiles=$formmail->get_attached_files();
    1429. 

  1429.                 $filepath = $attachedfiles['paths'];
    1430. 

  1430.                 $filename = $attachedfiles['names'];
    1431. 

  1431.                 $mimetype = $attachedfiles['mimes'];
    1432. 

  1432. 

  1433.                 // Send mail
    1434. 

  1434.                 require_once(DOL_DOCUMENT_ROOT.'/core/class/CMailFile.class.php');
    1435. 

  1435.                 $mailfile = new CMailFile($subject,$sendto,$from,$message,$filepath,$mimetype,$filename,$sendtocc,'',$deliveryreceipt,-1);
    1436. 

  1436.                 if ($mailfile->error)
    1437. 

  1437.                 {
    1438. 

  1438.                     $mesgs[]='<div class="error">'.$mailfile->error.'</div>';
    1439. 

  1439.                 }
    1440. 

  1440.                 else
    1441. 

  1441.                 {
    1442. 

  1442.                     $result=$mailfile->sendfile();
    1443. 

  1443.                     if ($result)
    1444. 

  1444.                     {
    1445. 

  1445.                         $error=0;
    1446. 

  1446. 

  1447.                         // Initialisation donnees
    1448. 

  1448.                         $object->sendtoid		= $sendtoid;
    1449. 

  1449.                         $object->actiontypecode	= $actiontypecode;
    1450. 

  1450.                         $object->actionmsg		= $actionmsg;  // Long text
    1451. 

  1451.                         $object->actionmsg2		= $actionmsg2; // Short text
    1452. 

  1452.                         $object->fk_element		= $object->id;
    1453. 

  1453.                         $object->elementtype	= $object->element;
    1454. 

  1454. 

  1455.                         // Appel des triggers
    1456. 

  1456.                         include_once(DOL_DOCUMENT_ROOT . "/core/class/interfaces.class.php");
    1457. 

  1457.                         $interface=new Interfaces($db);
    1458. 

  1458.                         $result=$interface->run_triggers('BILL_SENTBYMAIL',$object,$user,$langs,$conf);
    1459. 

  1459.                         if ($result < 0) { $error++; $this->errors=$interface->errors; }
    1460. 

  1460.                         // Fin appel triggers
    1461. 

  1461. 

  1462.                         if ($error)
    1463. 

  1463.                         {
    1464. 

  1464.                             dol_print_error($db);
    1465. 

  1465.                         }
    1466. 

  1466.                         else
    1467. 

  1467.                         {
    1468. 

  1468.                             // Redirect here
    1469. 

  1469.                             // This avoid sending mail twice if going out and then back to page
    1470. 

  1470.                         	$mesg=$langs->trans('MailSuccessfulySent',$mailfile->getValidAddress($from,2),$mailfile->getValidAddress($sendto,2));
    1471. 

  1471.                         	setEventMessage($mesg);
    1472. 

  1472.                             Header('Location: '.$_SERVER["PHP_SELF"].'?facid='.$object->id);
    1473. 

  1473.                             exit;
    1474. 

  1474.                         }
    1475. 

  1475.                     }
    1476. 

  1476.                     else
    1477. 

  1477.                     {
    1478. 

  1478.                         $langs->load("other");
    1479. 

  1479.                         $mesg='<div class="error">';
    1480. 

  1480.                         if ($mailfile->error)
    1481. 

  1481.                         {
    1482. 

  1482.                             $mesg.=$langs->trans('ErrorFailedToSendMail',$from,$sendto);
    1483. 

  1483.                             $mesg.='<br>'.$mailfile->error;
    1484. 

  1484.                         }
    1485. 

  1485.                         else
    1486. 

  1486.                         {
    1487. 

  1487.                             $mesg.='No mail sent. Feature is disabled by option MAIN_DISABLE_ALL_MAILS';
    1488. 

  1488.                         }
    1489. 

  1489.                         $mesg.='</div>';
    1490. 

  1490.                         $mesgs[]=$mesg;
    1491. 

  1491.                     }
    1492. 

  1492.                 }
    1493. 

  1493. /*            }
    1494. 

  1494.             else
    1495. 

  1495.             {
    1496. 

  1496.                 $langs->load("other");
    1497. 

  1497.                 $mesgs[]='<div class="error">'.$langs->trans('ErrorMailRecipientIsEmpty').'</div>';
    1498. 

  1498.                 dol_syslog('Recipient email is empty');
    1499. 

  1499.             }*/
    1500. 

  1500.         }
    1501. 

  1501.         else
    1502. 

  1502.         {
    1503. 

  1503.             $langs->load("errors");
    1504. 

  1504.             $mesgs[]='<div class="error">'.$langs->trans('ErrorCantReadFile',$file).'</div>';
    1505. 

  1505.             dol_syslog('Failed to read file: '.$file);
    1506. 

  1506.         }
    1507. 

  1507.     }
    1508. 

  1508.     else
    1509. 

  1509.     {
    1510. 

  1510.         $langs->load("other");
    1511. 

  1511.         $mesgs[]='<div class="error">'.$langs->trans('ErrorFailedToReadEntity',$langs->trans("Invoice")).'</div>';
    1512. 

  1512.         dol_syslog('Impossible de lire les donnees de la facture. Le fichier facture n\'a peut-etre pas ete genere.');
    1513. 

  1513.     }
    1514. 

  1514. 

  1515.     $action = 'presend';
    1516. 

  1516. }
    1517. 

  1517. 

  1518. /*
    1519. 

  1519.  * Generate document
    1520. 

  1520.  */
    1521. 

  1521. else if ($action == 'builddoc')	// En get ou en post
    1522. 

  1522. {
    1523. 

  1523.     $object->fetch($id);
    1524. 

  1524.     $object->fetch_thirdparty();
    1525. 

  1525. 

  1526.     if (GETPOST('model'))
    1527. 

  1527.     {
    1528. 

  1528.         $object->setDocModel($user, GETPOST('model'));
    1529. 

  1529.     }
    1530. 

  1530. 

  1531.     // Define output language
    1532. 

  1532.     $outputlangs = $langs;
    1533. 

  1533.     $newlang='';
    1534. 

  1534.     if ($conf->global->MAIN_MULTILANGS && empty($newlang) && GETPOST('lang_id')) $newlang=GETPOST('lang_id');
    1535. 

  1535.     if ($conf->global->MAIN_MULTILANGS && empty($newlang)) $newlang=$object->client->default_lang;
    1536. 

  1536.     if (! empty($newlang))
    1537. 

  1537.     {
    1538. 

  1538.         $outputlangs = new Translate("",$conf);
    1539. 

  1539.         $outputlangs->setDefaultLang($newlang);
    1540. 

  1540.     }
    1541. 

  1541.     $result=facture_pdf_create($db, $object, $object->modelpdf, $outputlangs, $hidedetails, $hidedesc, $hideref, $hookmanager);
    1542. 

  1542.     if ($result <= 0)
    1543. 

  1543.     {
    1544. 

  1544.         dol_print_error($db,$result);
    1545. 

  1545.         exit;
    1546. 

  1546.     }
    1547. 

  1547.     else
    1548. 

  1548.     {
    1549. 

  1549.         Header('Location: '.$_SERVER["PHP_SELF"].'?facid='.$object->id.(empty($conf->global->MAIN_JUMP_TAG)?'':'#builddoc'));
    1550. 

  1550.         exit;
    1551. 

  1551.     }
    1552. 

  1552. }
    1553. 

  1553. 

  1554. // Remove file in doc form
    1555. 

  1555. else if ($action == 'remove_file')
    1556. 

  1556. {
    1557. 

  1557. 	if ($object->fetch($id))
    1558. 

  1558. 	{
    1559. 

  1559. 		require_once(DOL_DOCUMENT_ROOT."/core/lib/files.lib.php");
    1560. 

  1560. 

  1561. 		$object->fetch_thirdparty();
    1562. 

  1562. 

  1563. 		$langs->load("other");
    1564. 

  1564. 		$upload_dir = $conf->facture->dir_output;
    1565. 

  1565. 		$file = $upload_dir . '/' . GETPOST('file');
    1566. 

  1566. 		$ret=dol_delete_file($file,0,0,0,$object);
    1567. 

  1567. 		if ($ret) setEventMessage($langs->trans("FileWasRemoved", GETPOST('urlfile')));
    1568. 

  1568. 		else setEventMessage($langs->trans("ErrorFailToDeleteFile", GETPOST('urlfile')), 'errors');
    1569. 

  1569. 		$action='';
    1570. 

  1570. 	}
    1571. 

  1571. }
    1572. 

  1572. 

  1573. if (! empty($conf->global->MAIN_DISABLE_CONTACTS_TAB))
    1574. 

  1574. {
    1575. 

  1575. 	if ($action == 'addcontact' && $user->rights->facture->creer)
    1576. 

  1576. 	{
    1577. 

  1577. 		$result = $object->fetch($id);
    1578. 

  1578. 

  1579. 		if ($result > 0 && $id > 0)
    1580. 

  1580. 		{
    1581. 

  1581. 			$contactid = (GETPOST('userid') ? GETPOST('userid') : GETPOST('contactid'));
    1582. 

  1582. 			$result = $result = $object->add_contact($contactid, $_POST["type"], $_POST["source"]);
    1583. 

  1583. 		}
    1584. 

  1584. 

  1585. 		if ($result >= 0)
    1586. 

  1586. 		{
    1587. 

  1587. 			Header("Location: ".$_SERVER['PHP_SELF']."?id=".$object->id);
    1588. 

  1588. 			exit;
    1589. 

  1589. 		}
    1590. 

  1590. 		else
    1591. 

  1591. 		{
    1592. 

  1592. 			if ($object->error == 'DB_ERROR_RECORD_ALREADY_EXISTS')
    1593. 

  1593. 			{
    1594. 

  1594. 				$langs->load("errors");
    1595. 

  1595. 				$mesgs[] = '<div class="error">'.$langs->trans("ErrorThisContactIsAlreadyDefinedAsThisType").'</div>';
    1596. 

  1596. 			}
    1597. 

  1597. 			else
    1598. 

  1598. 			{
    1599. 

  1599. 				$mesgs[] = '<div class="error">'.$object->error.'</div>';
    1600. 

  1600. 			}
    1601. 

  1601. 		}
    1602. 

  1602. 	}
    1603. 

  1603. 

  1604. 	// bascule du statut d'un contact
    1605. 

  1605. 	else if ($action == 'swapstatut' && $user->rights->facture->creer)
    1606. 

  1606. 	{
    1607. 

  1607. 		if ($object->fetch($id))
    1608. 

  1608. 		{
    1609. 

  1609. 			$result=$object->swapContactStatus(GETPOST('ligne'));
    1610. 

  1610. 		}
    1611. 

  1611. 		else
    1612. 

  1612. 		{
    1613. 

  1613. 			dol_print_error($db);
    1614. 

  1614. 		}
    1615. 

  1615. 	}
    1616. 

  1616. 

  1617. 	// Efface un contact
    1618. 

  1618. 	else if ($action == 'deletecontact' && $user->rights->facture->creer)
    1619. 

  1619. 	{
    1620. 

  1620. 		$object->fetch($id);
    1621. 

  1621. 		$result = $object->delete_contact($lineid);
    1622. 

  1622. 

  1623. 		if ($result >= 0)
    1624. 

  1624. 		{
    1625. 

  1625. 			Header("Location: ".$_SERVER['PHP_SELF']."?id=".$object->id);
    1626. 

  1626. 			exit;
    1627. 

  1627. 		}
    1628. 

  1628. 		else {
    1629. 

  1629. 			dol_print_error($db);
    1630. 

  1630. 		}
    1631. 

  1631. 	}
    1632. 

  1632. }
    1633. 

  1633. 

  1634. 

  1635. /*
    1636. 

  1636.  * View
    1637. 

  1637.  */
    1638. 

  1638. 

  1639. llxHeader('',$langs->trans('Bill'),'EN:Customers_Invoices|FR:Factures_Clients|ES:Facturas_a_clientes');
    1640. 

  1640. 

  1641. $form = new Form($db);
    1642. 

  1642. $htmlother = new FormOther($db);
    1643. 

  1643. $formfile = new FormFile($db);
    1644. 

  1644. $bankaccountstatic=new Account($db);
    1645. 

  1645. $now=dol_now();
    1646. 

  1646. 

  1647. 

  1648. /*********************************************************************
    1649. 

  1649.  *
    1650. 

  1650.  * Mode creation
    1651. 

  1651.  *
    1652. 

  1652.  **********************************************************************/
    1653. 

  1653. if ($action == 'create')
    1654. 

  1654. {
    1655. 

  1655.     $facturestatic=new Facture($db);
    1656. 

  1656. 

  1657.     print_fiche_titre($langs->trans('NewBill'));
    1658. 

  1658. 

  1659.     $soc = new Societe($db);
    1660. 

  1660.     if ($socid) $res=$soc->fetch($socid);
    1661. 

  1661. 

  1662.     if (GETPOST('origin') && GETPOST('originid'))
    1663. 

  1663.     {
    1664. 

  1664.         // Parse element/subelement (ex: project_task)
    1665. 

  1665.         $element = $subelement = GETPOST('origin');
    1666. 

  1666.         if (preg_match('/^([^_]+)_([^_]+)/i',GETPOST('origin'),$regs))
    1667. 

  1667.         {
    1668. 

  1668.             $element = $regs[1];
    1669. 

  1669.             $subelement = $regs[2];
    1670. 

  1670.         }
    1671. 

  1671. 

  1672.         if ($element == 'project')
    1673. 

  1673.         {
    1674. 

  1674.             $projectid=GETPOST('originid');
    1675. 

  1675.         }
    1676. 

  1676.         else
    1677. 

  1677.         {
    1678. 

  1678.             // For compatibility
    1679. 

  1679.             if ($element == 'order' || $element == 'commande')    { $element = $subelement = 'commande'; }
    1680. 

  1680.             if ($element == 'propal')   { $element = 'comm/propal'; $subelement = 'propal'; }
    1681. 

  1681.             if ($element == 'contract') { $element = $subelement = 'contrat'; }
    1682. 

  1682.             if ($element == 'shipping') { $element = $subelement = 'expedition'; }
    1683. 

  1683. 

  1684.             dol_include_once('/'.$element.'/class/'.$subelement.'.class.php');
    1685. 

  1685. 

  1686.             $classname = ucfirst($subelement);
    1687. 

  1687.             $objectsrc = new $classname($db);
    1688. 

  1688.             $objectsrc->fetch(GETPOST('originid'));
    1689. 

  1689.             if (empty($objectsrc->lines) && method_exists($objectsrc,'fetch_lines'))  $objectsrc->fetch_lines();
    1690. 

  1690.             $objectsrc->fetch_thirdparty();
    1691. 

  1691. 

  1692.             $projectid			= (!empty($objectsrc->fk_project)?$objectsrc->fk_project:'');
    1693. 

  1693.             $ref_client			= (!empty($objectsrc->ref_client)?$objectsrc->ref_client:'');
    1694. 

  1694.             $ref_int			= (!empty($objectsrc->ref_int)?$objectsrc->ref_int:'');
    1695. 

  1695. 

  1696.             $soc = $objectsrc->client;
    1697. 

  1697.             $cond_reglement_id 	= (!empty($objectsrc->cond_reglement_id)?$objectsrc->cond_reglement_id:(!empty($soc->cond_reglement_id)?$soc->cond_reglement_id:1));
    1698. 

  1698.             $mode_reglement_id 	= (!empty($objectsrc->mode_reglement_id)?$objectsrc->mode_reglement_id:(!empty($soc->mode_reglement_id)?$soc->mode_reglement_id:0));
    1699. 

  1699.             $remise_percent 	= (!empty($objectsrc->remise_percent)?$objectsrc->remise_percent:(!empty($soc->remise_percent)?$soc->remise_percent:0));
    1700. 

  1700.             $remise_absolue 	= (!empty($objectsrc->remise_absolue)?$objectsrc->remise_absolue:(!empty($soc->remise_absolue)?$soc->remise_absolue:0));
    1701. 

  1701.             $dateinvoice		= empty($conf->global->MAIN_AUTOFILL_DATE)?-1:0;
    1702. 

  1702.         }
    1703. 

  1703.     }
    1704. 

  1704.     else
    1705. 

  1705.     {
    1706. 

  1706.         $cond_reglement_id 	= $soc->cond_reglement_id;
    1707. 

  1707.         $mode_reglement_id 	= $soc->mode_reglement_id;
    1708. 

  1708.         $remise_percent 	= $soc->remise_percent;
    1709. 

  1709.         $remise_absolue 	= 0;
    1710. 

  1710.         $dateinvoice		= empty($conf->global->MAIN_AUTOFILL_DATE)?-1:0;
    1711. 

  1711.     }
    1712. 

  1712.     $absolute_discount=$soc->getAvailableDiscounts();
    1713. 

  1713. 

  1714. 

  1715.     if ($conf->use_javascript_ajax)
    1716. 

  1716.     {
    1717. 

  1717.         print ajax_combobox('fac_replacement');
    1718. 

  1718.         print ajax_combobox('fac_avoir');
    1719. 

  1719.     }
    1720. 

  1720. 

  1721.     print '<form name="add" action="'.$_SERVER["PHP_SELF"].'" method="POST">';
    1722. 

  1722.     print '<input type="hidden" name="token" value="'.$_SESSION['newtoken'].'">';
    1723. 

  1723.     print '<input type="hidden" name="action" value="add">';
    1724. 

  1724.     print '<input type="hidden" name="socid" value="'.$soc->id.'">' ."\n";
    1725. 

  1725.     print '<input name="facnumber" type="hidden" value="provisoire">';
    1726. 

  1726.     print '<input name="ref_client" type="hidden" value="'.$ref_client.'">';
    1727. 

  1727.     print '<input name="ref_int" type="hidden" value="'.$ref_int.'">';
    1728. 

  1728.     print '<input type="hidden" name="origin" value="'.GETPOST('origin').'">';
    1729. 

  1729.     print '<input type="hidden" name="originid" value="'.GETPOST('originid').'">';
    1730. 

  1730. 

  1731.     print '<table class="border" width="100%">';
    1732. 

  1732. 

  1733.     // Ref
    1734. 

  1734.     print '<tr><td class="fieldrequired">'.$langs->trans('Ref').'</td><td colspan="2">'.$langs->trans('Draft').'</td></tr>';
    1735. 

  1735. 

  1736.     // Factures predefinies
    1737. 

  1737.     if (empty($_GET['propalid']) && empty($_GET['commandeid']) && empty($_GET['contratid']) && empty($_GET['originid']))
    1738. 

  1738.     {
    1739. 

  1739.         $sql = 'SELECT r.rowid, r.titre, r.total_ttc';
    1740. 

  1740.         $sql.= ' FROM '.MAIN_DB_PREFIX.'facture_rec as r';
    1741. 

  1741.         $sql.= ' WHERE r.fk_soc = '.$soc->id;
    1742. 

  1742. 

  1743.         $resql=$db->query($sql);
    1744. 

  1744.         if ($resql)
    1745. 

  1745.         {
    1746. 

  1746.             $num = $db->num_rows($resql);
    1747. 

  1747.             $i = 0;
    1748. 

  1748. 

  1749.             if ($num > 0)
    1750. 

  1750.             {
    1751. 

  1751.                 print '<tr><td>'.$langs->trans('CreateFromRepeatableInvoice').'</td><td>';
    1752. 

  1752.                 print '<select class="flat" name="fac_rec">';
    1753. 

  1753.                 print '<option value="0" selected="selected"></option>';
    1754. 

  1754.                 while ($i < $num)
    1755. 

  1755.                 {
    1756. 

  1756.                     $objp = $db->fetch_object($resql);
    1757. 

  1757.                     print '<option value="'.$objp->rowid.'"';
    1758. 

  1758.                     if ($_POST["fac_rec"] == $objp->rowid) print ' selected="selected"';
    1759. 

  1759.                     print '>'.$objp->titre.' ('.price($objp->total_ttc).' '.$langs->trans("TTC").')</option>';
    1760. 

  1760.                     $i++;
    1761. 

  1761.                 }
    1762. 

  1762.                 print '</select></td></tr>';
    1763. 

  1763.             }
    1764. 

  1764.             $db->free($resql);
    1765. 

  1765.         }
    1766. 

  1766.         else
    1767. 

  1767.         {
    1768. 

  1768.             dol_print_error($db);
    1769. 

  1769.         }
    1770. 

  1770.     }
    1771. 

  1771. 

  1772.     // Tiers
    1773. 

  1773.     print '<tr><td class="fieldrequired">'.$langs->trans('Customer').'</td><td colspan="2">';
    1774. 

  1774.     print $soc->getNomUrl(1);
    1775. 

  1775.     print '<input type="hidden" name="socid" value="'.$soc->id.'">';
    1776. 

  1776.     print '</td>';
    1777. 

  1777.     print '</tr>'."\n";
    1778. 

  1778. 

  1779.     // Type de facture
    1780. 

  1780.     $facids=$facturestatic->list_replacable_invoices($soc->id);
    1781. 

  1781.     if ($facids < 0)
    1782. 

  1782.     {
    1783. 

  1783.         dol_print_error($db,$facturestatic);
    1784. 

  1784.         exit;
    1785. 

  1785.     }
    1786. 

  1786.     $options="";
    1787. 

  1787.     foreach ($facids as $facparam)
    1788. 

  1788.     {
    1789. 

  1789.         $options.='<option value="'.$facparam['id'].'"';
    1790. 

  1790.         if ($facparam['id'] == $_POST['fac_replacement']) $options.=' selected="selected"';
    1791. 

  1791.         $options.='>'.$facparam['ref'];
    1792. 

  1792.         $options.=' ('.$facturestatic->LibStatut(0,$facparam['status']).')';
    1793. 

  1793.         $options.='</option>';
    1794. 

  1794.     }
    1795. 

  1795. 

  1796.     $facids=$facturestatic->list_qualified_avoir_invoices($soc->id);
    1797. 

  1797.     if ($facids < 0)
    1798. 

  1798.     {
    1799. 

  1799.         dol_print_error($db,$facturestatic);
    1800. 

  1800.         exit;
    1801. 

  1801.     }
    1802. 

  1802.     $optionsav="";
    1803. 

  1803.     foreach ($facids as $key => $value)
    1804. 

  1804.     {
    1805. 

  1805.         $newinvoice=new Facture($db);
    1806. 

  1806.         $newinvoice->fetch($key);
    1807. 

  1807.         $optionsav.='<option value="'.$key.'"';
    1808. 

  1808.         if ($key == $_POST['fac_avoir']) $optionsav.=' selected="selected"';
    1809. 

  1809.         $optionsav.='>';
    1810. 

  1810.         $optionsav.=$newinvoice->ref;
    1811. 

  1811.         $optionsav.=' ('.$newinvoice->getLibStatut(1,$value).')';
    1812. 

  1812.         $optionsav.='</option>';
    1813. 

  1813.     }
    1814. 

  1814. 

  1815.     print '<tr><td valign="top" class="fieldrequired">'.$langs->trans('Type').'</td><td colspan="2">';
    1816. 

  1816.     print '<table class="nobordernopadding">'."\n";
    1817. 

  1817. 

  1818.     // Standard invoice
    1819. 

  1819.     print '<tr height="18"><td width="16px" valign="middle">';
    1820. 

  1820.     print '<input type="radio" name="type" value="0"'.(GETPOST('type')==0?' checked="checked"':'').'>';
    1821. 

  1821.     print '</td><td valign="middle">';
    1822. 

  1822.     $desc=$form->textwithpicto($langs->trans("InvoiceStandardAsk"),$langs->transnoentities("InvoiceStandardDesc"),1);
    1823. 

  1823.     print $desc;
    1824. 

  1824.     print '</td></tr>'."\n";
    1825. 

  1825. 

  1826.     // Deposit
    1827. 

  1827.     print '<tr height="18"><td width="16px" valign="middle">';
    1828. 

  1828.     print '<input type="radio" name="type" value="3"'.(GETPOST('type')==3?' checked="checked"':'').'>';
    1829. 

  1829.     print '</td><td valign="middle">';
    1830. 

  1830.     $desc=$form->textwithpicto($langs->trans("InvoiceDeposit"),$langs->transnoentities("InvoiceDepositDesc"),1);
    1831. 

  1831.     print $desc;
    1832. 

  1832.     print '</td></tr>'."\n";
    1833. 

  1833. 

  1834.     // Proforma
    1835. 

  1835.     if ($conf->global->FACTURE_USE_PROFORMAT)
    1836. 

  1836.     {
    1837. 

  1837.         print '<tr height="18"><td width="16px" valign="middle">';
    1838. 

  1838.         print '<input type="radio" name="type" value="4"'.(GETPOST('type')==4?' checked="checked"':'').'>';
    1839. 

  1839.         print '</td><td valign="middle">';
    1840. 

  1840.         $desc=$form->textwithpicto($langs->trans("InvoiceProForma"),$langs->transnoentities("InvoiceProFormaDesc"),1);
    1841. 

  1841.         print $desc;
    1842. 

  1842.         print '</td></tr>'."\n";
    1843. 

  1843.     }
    1844. 

  1844. 

  1845.     // Replacement
    1846. 

  1846.     print '<tr height="18"><td valign="middle">';
    1847. 

  1847.     print '<input type="radio" name="type" value="1"'.(GETPOST('type')==1?' checked="checked"':'');
    1848. 

  1848.     if (! $options) print ' disabled="disabled"';
    1849. 

  1849.     print '>';
    1850. 

  1850.     print '</td><td valign="middle">';
    1851. 

  1851.     $text=$langs->trans("InvoiceReplacementAsk").' ';
    1852. 

  1852.     $text.='<select class="flat" name="fac_replacement" id="fac_replacement"';
    1853. 

  1853.     if (! $options) $text.=' disabled="disabled"';
    1854. 

  1854.     $text.='>';
    1855. 

  1855.     if ($options)
    1856. 

  1856.     {
    1857. 

  1857.         $text.='<option value="-1"></option>';
    1858. 

  1858.         $text.=$options;
    1859. 

  1859.     }
    1860. 

  1860.     else
    1861. 

  1861.     {
    1862. 

  1862.         $text.='<option value="-1">'.$langs->trans("NoReplacableInvoice").'</option>';
    1863. 

  1863.     }
    1864. 

  1864.     $text.='</select>';
    1865. 

  1865.     $desc=$form->textwithpicto($text,$langs->transnoentities("InvoiceReplacementDesc"),1);
    1866. 

  1866.     print $desc;
    1867. 

  1867.     print '</td></tr>'."\n";
    1868. 

  1868. 

  1869.     // Credit note
    1870. 

  1870.     print '<tr height="18"><td valign="middle">';
    1871. 

  1871.     print '<input type="radio" name="type" value="2"'.(GETPOST('type')==2?' checked=true':'');
    1872. 

  1872.     if (! $optionsav) print ' disabled="disabled"';
    1873. 

  1873.     print '>';
    1874. 

  1874.     print '</td><td valign="middle">';
    1875. 

  1875.     $text=$langs->transnoentities("InvoiceAvoirAsk").' ';
    1876. 

  1876.     //	$text.='<input type="text" value="">';
    1877. 

  1877.     $text.='<select class="flat" name="fac_avoir" id="fac_avoir"';
    1878. 

  1878.     if (! $optionsav) $text.=' disabled="disabled"';
    1879. 

  1879.     $text.='>';
    1880. 

  1880.     if ($optionsav)
    1881. 

  1881.     {
    1882. 

  1882.         $text.='<option value="-1"></option>';
    1883. 

  1883.         $text.=$optionsav;
    1884. 

  1884.     }
    1885. 

  1885.     else
    1886. 

  1886.     {
    1887. 

  1887.         $text.='<option value="-1">'.$langs->trans("NoInvoiceToCorrect").'</option>';
    1888. 

  1888.     }
    1889. 

  1889.     $text.='</select>';
    1890. 

  1890.     $desc=$form->textwithpicto($text,$langs->transnoentities("InvoiceAvoirDesc"),1);
    1891. 

  1891.     print $desc;
    1892. 

  1892.     print '</td></tr>'."\n";
    1893. 

  1893. 

  1894.     print '</table>';
    1895. 

  1895.     print '</td></tr>';
    1896. 

  1896. 

  1897.     // Discounts for third party
    1898. 

  1898.     print '<tr><td>'.$langs->trans('Discounts').'</td><td colspan="2">';
    1899. 

  1899.     if ($soc->remise_client) print $langs->trans("CompanyHasRelativeDiscount",'<a href="'.DOL_URL_ROOT.'/comm/remise.php?id='.$soc->id.'&backtopage='.urlencode($_SERVER["PHP_SELF"].'?socid='.$soc->id.'&action='.$action.'&origin='.GETPOST('origin').'&originid='.GETPOST('originid')).'">'.$soc->remise_client.'</a>');
    1900. 

  1900.     else print $langs->trans("CompanyHasNoRelativeDiscount");
    1901. 

  1901.     print ' <a href="'.DOL_URL_ROOT.'/comm/remise.php?id='.$soc->id.'&backtopage='.urlencode($_SERVER["PHP_SELF"].'?socid='.$soc->id.'&action='.$action.'&origin='.GETPOST('origin').'&originid='.GETPOST('originid')).'">('.$langs->trans("EditRelativeDiscount").')</a>';
    1902. 

  1902.     print '. ';
    1903. 

  1903.     print '<br>';
    1904. 

  1904.     if ($absolute_discount) print $langs->trans("CompanyHasAbsoluteDiscount",'<a href="'.DOL_URL_ROOT.'/comm/remx.php?id='.$soc->id.'&backtopage='.urlencode($_SERVER["PHP_SELF"].'?socid='.$soc->id.'&action='.$action.'&origin='.GETPOST('origin').'&originid='.GETPOST('originid')).'">'.price($absolute_discount).'</a>',$langs->trans("Currency".$conf->currency));
    1905. 

  1905.     else print $langs->trans("CompanyHasNoAbsoluteDiscount");
    1906. 

  1906.     print ' <a href="'.DOL_URL_ROOT.'/comm/remx.php?id='.$soc->id.'&backtopage='.urlencode($_SERVER["PHP_SELF"].'?socid='.$soc->id.'&action='.$action.'&origin='.GETPOST('origin').'&originid='.GETPOST('originid')).'">('.$langs->trans("EditGlobalDiscounts").')</a>';
    1907. 

  1907.     print '.';
    1908. 

  1908.     print '</td></tr>';
    1909. 

  1909. 

  1910.     // Date invoice
    1911. 

  1911.     print '<tr><td class="fieldrequired">'.$langs->trans('Date').'</td><td colspan="2">';
    1912. 

  1912.     $form->select_date($dateinvoice,'','','','',"add",1,1);
    1913. 

  1913.     print '</td></tr>';
    1914. 

  1914. 

  1915.     // Payment term
    1916. 

  1916.     print '<tr><td nowrap>'.$langs->trans('PaymentConditionsShort').'</td><td colspan="2">';
    1917. 

  1917.     $form->select_conditions_paiements(isset($_POST['cond_reglement_id'])?$_POST['cond_reglement_id']:$cond_reglement_id,'cond_reglement_id');
    1918. 

  1918.     print '</td></tr>';
    1919. 

  1919. 

  1920.     // Payment mode
    1921. 

  1921.     print '<tr><td>'.$langs->trans('PaymentMode').'</td><td colspan="2">';
    1922. 

  1922.     $form->select_types_paiements(isset($_POST['mode_reglement_id'])?$_POST['mode_reglement_id']:$mode_reglement_id,'mode_reglement_id');
    1923. 

  1923.     print '</td></tr>';
    1924. 

  1924. 

  1925.     // Project
    1926. 

  1926.     if ($conf->projet->enabled)
    1927. 

  1927.     {
    1928. 

  1928.         $langs->load('projects');
    1929. 

  1929.         print '<tr><td>'.$langs->trans('Project').'</td><td colspan="2">';
    1930. 

  1930.         select_projects($soc->id, $projectid, 'projectid');
    1931. 

  1931.         print '</td></tr>';
    1932. 

  1932.     }
    1933. 

  1933. 

  1934.     // Other attributes
    1935. 

  1935.     $parameters=array('objectsrc' => $objectsrc, 'colspan' => ' colspan="3"');
    1936. 

  1936.     $reshook=$hookmanager->executeHooks('formObjectOptions',$parameters,$object,$action);    // Note that $action and $object may have been modified by hook
    1937. 

  1937.     if (empty($reshook) && ! empty($extrafields->attribute_label))
    1938. 

  1938.     {
    1939. 

  1939.         foreach($extrafields->attribute_label as $key=>$label)
    1940. 

  1940.         {
    1941. 

  1941.             $value=(isset($_POST["options_".$key])?$_POST["options_".$key]:$object->array_options["options_".$key]);
    1942. 

  1942.             print '<tr><td>'.$label.'</td><td colspan="3">';
    1943. 

  1943.             print $extrafields->showInputField($key,$value);
    1944. 

  1944.             print '</td></tr>'."\n";
    1945. 

  1945.         }
    1946. 

  1946.     }
    1947. 

  1947. 

  1948.     // Modele PDF
    1949. 

  1949.     print '<tr><td>'.$langs->trans('Model').'</td>';
    1950. 

  1950.     print '<td>';
    1951. 

  1951.     include_once(DOL_DOCUMENT_ROOT.'/core/modules/facture/modules_facture.php');
    1952. 

  1952.     $liste=ModelePDFFactures::liste_modeles($db);
    1953. 

  1953.     print $form->selectarray('model',$liste,$conf->global->FACTURE_ADDON_PDF);
    1954. 

  1954.     print "</td></tr>";
    1955. 

  1955. 

  1956.     // Public note
    1957. 

  1957.     print '<tr>';
    1958. 

  1958.     print '<td class="border" valign="top">'.$langs->trans('NotePublic').'</td>';
    1959. 

  1959.     print '<td valign="top" colspan="2">';
    1960. 

  1960.     print '<textarea name="note_public" wrap="soft" cols="70" rows="'.ROWS_3.'">';
    1961. 

  1961.     if (is_object($objectsrc))    // Take value from source object
    1962. 

  1962.     {
    1963. 

  1963.         print $objectsrc->note_public;
    1964. 

  1964.     }
    1965. 

  1965.     print '</textarea></td></tr>';
    1966. 

  1966. 

  1967.     // Private note
    1968. 

  1968.     if (! $user->societe_id)
    1969. 

  1969.     {
    1970. 

  1970.         print '<tr>';
    1971. 

  1971.         print '<td class="border" valign="top">'.$langs->trans('NotePrivate').'</td>';
    1972. 

  1972.         print '<td valign="top" colspan="2">';
    1973. 

  1973.         print '<textarea name="note" wrap="soft" cols="70" rows="'.ROWS_3.'">';
    1974. 

  1974.         if (is_object($objectsrc))    // Take value from source object
    1975. 

  1975.         {
    1976. 

  1976.             print $objectsrc->note;
    1977. 

  1977.         }
    1978. 

  1978.         print '</textarea></td></tr>';
    1979. 

  1979.     }
    1980. 

  1980. 

  1981.     if (is_object($objectsrc))
    1982. 

  1982.     {
    1983. 

  1983.         // TODO for compatibility
    1984. 

  1984.         if ($_GET['origin'] == 'contrat')
    1985. 

  1985.         {
    1986. 

  1986.             // Calcul contrat->price (HT), contrat->total (TTC), contrat->tva
    1987. 

  1987.             $objectsrc->remise_absolue=$remise_absolue;
    1988. 

  1988.             $objectsrc->remise_percent=$remise_percent;
    1989. 

  1989.             $objectsrc->update_price(1,-1,1);
    1990. 

  1990.         }
    1991. 

  1991. 

  1992.         print "\n<!-- ".$classname." info -->";
    1993. 

  1993.         print "\n";
    1994. 

  1994.         print '<input type="hidden" name="amount"         value="'.$objectsrc->total_ht.'">'."\n";
    1995. 

  1995.         print '<input type="hidden" name="total"          value="'.$objectsrc->total_ttc.'">'."\n";
    1996. 

  1996.         print '<input type="hidden" name="tva"            value="'.$objectsrc->total_tva.'">'."\n";
    1997. 

  1997.         print '<input type="hidden" name="origin"         value="'.$objectsrc->element.'">';
    1998. 

  1998.         print '<input type="hidden" name="originid"       value="'.$objectsrc->id.'">';
    1999. 

  1999. 

  2000.         $newclassname=$classname;
    2001. 

  2001.         if ($newclassname=='Propal') $newclassname='CommercialProposal';
    2002. 

  2002.         print '<tr><td>'.$langs->trans($newclassname).'</td><td colspan="2">'.$objectsrc->getNomUrl(1).'</td></tr>';
    2003. 

  2003.         print '<tr><td>'.$langs->trans('TotalHT').'</td><td colspan="2">'.price($objectsrc->total_ht).'</td></tr>';
    2004. 

  2004.         print '<tr><td>'.$langs->trans('TotalVAT').'</td><td colspan="2">'.price($objectsrc->total_tva)."</td></tr>";
    2005. 

  2005.         if ($mysoc->pays_code=='ES')
    2006. 

  2006.         {
    2007. 

  2007.             if ($mysoc->localtax1_assuj=="1") //Localtax1 RE
    2008. 

  2008.             {
    2009. 

  2009.                 print '<tr><td>'.$langs->transcountry("AmountLT1",$mysoc->pays_code).'</td><td colspan="2">'.price($objectsrc->total_localtax1)."</td></tr>";
    2010. 

  2010.             }
    2011. 

  2011. 

  2012.             if ($mysoc->localtax2_assuj=="1") //Localtax2 IRPF
    2013. 

  2013.             {
    2014. 

  2014.                 print '<tr><td>'.$langs->transcountry("AmountLT2",$mysoc->pays_code).'</td><td colspan="2">'.price($objectsrc->total_localtax2)."</td></tr>";
    2015. 

  2015.             }
    2016. 

  2016.         }
    2017. 

  2017.         print '<tr><td>'.$langs->trans('TotalTTC').'</td><td colspan="2">'.price($objectsrc->total_ttc)."</td></tr>";
    2018. 

  2018.     }
    2019. 

  2019.     else
    2020. 

  2020.     {
    2021. 

  2021.         // Show deprecated optional form to add product line here
    2022. 

  2022.         if ($conf->global->PRODUCT_SHOW_WHEN_CREATE)
    2023. 

  2023.         {
    2024. 

  2024.             print '<tr><td colspan="3">';
    2025. 

  2025. 

  2026.             // Zone de choix des produits predefinis a la creation
    2027. 

  2027.             print '<table class="noborder" width="100%">';
    2028. 

  2028.             print '<tr>';
    2029. 

  2029.             print '<td>'.$langs->trans('ProductsAndServices').'</td>';
    2030. 

  2030.             print '<td>'.$langs->trans('Qty').'</td>';
    2031. 

  2031.             print '<td>'.$langs->trans('ReductionShort').'</td>';
    2032. 

  2032.             print '<td> &nbsp; &nbsp; </td>';
    2033. 

  2033.             if ($conf->service->enabled)
    2034. 

  2034.             {
    2035. 

  2035.                 print '<td>'.$langs->trans('ServiceLimitedDuration').'</td>';
    2036. 

  2036.             }
    2037. 

  2037.             print '</tr>';
    2038. 

  2038.             for ($i = 1 ; $i <= $NBLINES ; $i++)
    2039. 

  2039.             {
    2040. 

  2040.                 print '<tr>';
    2041. 

  2041.                 print '<td>';
    2042. 

  2042.                 // multiprix
    2043. 

  2043.                 if($conf->global->PRODUIT_MULTIPRICES)
    2044. 

  2044.                 $form->select_produits('','idprod'.$i,'',$conf->product->limit_size,$soc->price_level);
    2045. 

  2045.                 else
    2046. 

  2046.                 $form->select_produits('','idprod'.$i,'',$conf->product->limit_size);
    2047. 

  2047.                 print '</td>';
    2048. 

  2048.                 print '<td><input type="text" size="2" name="qty'.$i.'" value="1"></td>';
    2049. 

  2049.                 print '<td nowrap="nowrap"><input type="text" size="1" name="remise_percent'.$i.'" value="'.$soc->remise_client.'">%</td>';
    2050. 

  2050.                 print '<td>&nbsp;</td>';
    2051. 

  2051.                 // Si le module service est actif, on propose des dates de debut et fin a la ligne
    2052. 

  2052.                 if ($conf->service->enabled)
    2053. 

  2053.                 {
    2054. 

  2054.                     print '<td nowrap="nowrap">';
    2055. 

  2055.                     print '<table class="nobordernopadding"><tr class="nocellnopadd">';
    2056. 

  2056.                     print '<td class="nobordernopadding" nowrap="nowrap">';
    2057. 

  2057.                     print $langs->trans('From').' ';
    2058. 

  2058.                     print '</td><td class="nobordernopadding" nowrap="nowrap">';
    2059. 

  2059.                     print $form->select_date('','date_start'.$i,$usehm,$usehm,1,"add");
    2060. 

  2060.                     print '</td></tr>';
    2061. 

  2061.                     print '<td class="nobordernopadding" nowrap="nowrap">';
    2062. 

  2062.                     print $langs->trans('to').' ';
    2063. 

  2063.                     print '</td><td class="nobordernopadding" nowrap="nowrap">';
    2064. 

  2064.                     print $form->select_date('','date_end'.$i,$usehm,$usehm,1,"add");
    2065. 

  2065.                     print '</td></tr></table>';
    2066. 

  2066.                     print '</td>';
    2067. 

  2067.                 }
    2068. 

  2068.                 print "</tr>\n";
    2069. 

  2069.             }
    2070. 

  2070. 

  2071.             print '</table>';
    2072. 

  2072.             print '</td></tr>';
    2073. 

  2073.         }
    2074. 

  2074.     }
    2075. 

  2075. 

  2076.     print "</table>\n";
    2077. 

  2077. 

  2078.     // Button "Create Draft"
    2079. 

  2079.     print '<br><center><input type="submit" class="button" name="bouton" value="'.$langs->trans('CreateDraft').'"></center>';
    2080. 

  2080. 

  2081.     print "</form>\n";
    2082. 

  2082. 

  2083.     // Show origin lines
    2084. 

  2084.     if (is_object($objectsrc))
    2085. 

  2085.     {
    2086. 

  2086.         print '<br>';
    2087. 

  2087. 

  2088.         $title=$langs->trans('ProductsAndServices');
    2089. 

  2089.         print_titre($title);
    2090. 

  2090. 

  2091.         print '<table class="noborder" width="100%">';
    2092. 

  2092. 

  2093.         $objectsrc->printOriginLinesList($hookmanager);
    2094. 

  2094. 

  2095.         print '</table>';
    2096. 

  2096.     }
    2097. 

  2097. 

  2098. }
    2099. 

  2099. else if ($id > 0 || ! empty($ref))
    2100. 

  2100. {
    2101. 

  2101.     /*
    2102. 

  2102.      * Show object in view mode
    2103. 

  2103.      */
    2104. 

  2104. 

  2105.     $result=$object->fetch($id,$ref);
    2106. 

  2106.     if ($result > 0)
    2107. 

  2107.     {
    2108. 

  2108.         if ($user->societe_id>0 && $user->societe_id!=$object->socid)  accessforbidden('',0);
    2109. 

  2109. 

  2110.         $result=$object->fetch_thirdparty();
    2111. 

  2111. 

  2112.         $soc = new Societe($db);
    2113. 

  2113.         $soc->fetch($object->socid);
    2114. 

  2114. 

  2115.         $totalpaye  = $object->getSommePaiement();
    2116. 

  2116.         $totalcreditnotes = $object->getSumCreditNotesUsed();
    2117. 

  2117.         $totaldeposits = $object->getSumDepositsUsed();
    2118. 

  2118.         //print "totalpaye=".$totalpaye." totalcreditnotes=".$totalcreditnotes." totaldeposts=".$totaldeposits;
    2119. 

  2119. 

  2120.         // We can also use bcadd to avoid pb with floating points
    2121. 

  2121.         // For example print 239.2 - 229.3 - 9.9; does not return 0.
    2122. 

  2122.         //$resteapayer=bcadd($object->total_ttc,$totalpaye,$conf->global->MAIN_MAX_DECIMALS_TOT);
    2123. 

  2123.         //$resteapayer=bcadd($resteapayer,$totalavoir,$conf->global->MAIN_MAX_DECIMALS_TOT);
    2124. 

  2124.         $resteapayer = price2num($object->total_ttc - $totalpaye - $totalcreditnotes - $totaldeposits,'MT');
    2125. 

  2125. 

  2126.         if ($object->paye) $resteapayer=0;
    2127. 

  2127.         $resteapayeraffiche=$resteapayer;
    2128. 

  2128. 

  2129.         if (! empty($conf->global->FACTURE_DEPOSITS_ARE_JUST_PAYMENTS))
    2130. 

  2130.         {
    2131. 

  2131.             $filterabsolutediscount="fk_facture_source IS NULL";  // If we want deposit to be substracted to payments only and not to total of final invoice
    2132. 

  2132.             $filtercreditnote="fk_facture_source IS NOT NULL";    // If we want deposit to be substracted to payments only and not to total of final invoice
    2133. 

  2133.         }
    2134. 

  2134.         else
    2135. 

  2135.         {
    2136. 

  2136.             $filterabsolutediscount="fk_facture_source IS NULL OR (fk_facture_source IS NOT NULL AND description='(DEPOSIT)')";
    2137. 

  2137.             $filtercreditnote="fk_facture_source IS NOT NULL AND description <> '(DEPOSIT)'";
    2138. 

  2138.         }
    2139. 

  2139. 

  2140.         $absolute_discount=$soc->getAvailableDiscounts('',$filterabsolutediscount);
    2141. 

  2141.         $absolute_creditnote=$soc->getAvailableDiscounts('',$filtercreditnote);
    2142. 

  2142.         $absolute_discount=price2num($absolute_discount,'MT');
    2143. 

  2143.         $absolute_creditnote=price2num($absolute_creditnote,'MT');
    2144. 

  2144. 

  2145.         $author = new User($db);
    2146. 

  2146.         if ($object->user_author)
    2147. 

  2147.         {
    2148. 

  2148.             $author->fetch($object->user_author);
    2149. 

  2149.         }
    2150. 

  2150. 

  2151.         $objectidnext=$object->getIdReplacingInvoice();
    2152. 

  2152. 

  2153. 

  2154.         $head = facture_prepare_head($object);
    2155. 

  2155. 

  2156.         dol_fiche_head($head, 'compta', $langs->trans('InvoiceCustomer'), 0, 'bill');
    2157. 

  2157. 

  2158.         $formconfirm='';
    2159. 

  2159. 

  2160.         // Confirmation de la conversion de l'avoir en reduc
    2161. 

  2161.         if ($action == 'converttoreduc')
    2162. 

  2162.         {
    2163. 

  2163.             $text=$langs->trans('ConfirmConvertToReduc');
    2164. 

  2164.             $formconfirm=$form->formconfirm($_SERVER['PHP_SELF'].'?facid='.$object->id,$langs->trans('ConvertToReduc'),$text,'confirm_converttoreduc','',"yes",2);
    2165. 

  2165.         }
    2166. 

  2166. 

  2167.         // Confirmation to delete invoice
    2168. 

  2168.         if ($action == 'delete')
    2169. 

  2169.         {
    2170. 

  2170.             $text=$langs->trans('ConfirmDeleteBill');
    2171. 

  2171.             $formconfirm=$form->formconfirm($_SERVER['PHP_SELF'].'?facid='.$object->id,$langs->trans('DeleteBill'),$text,'confirm_delete','',0,1);
    2172. 

  2172.         }
    2173. 

  2173. 

  2174.         // Confirmation de la validation
    2175. 

  2175.         if ($action == 'valid')
    2176. 

  2176.         {
    2177. 

  2177.             // on verifie si l'objet est en numerotation provisoire
    2178. 

  2178.             $objectref = substr($object->ref, 1, 4);
    2179. 

  2179.             if ($objectref == 'PROV')
    2180. 

  2180.             {
    2181. 

  2181.                 $savdate=$object->date;
    2182. 

  2182.                 if (! empty($conf->global->FAC_FORCE_DATE_VALIDATION))
    2183. 

  2183.                 {
    2184. 

  2184.                     $object->date=dol_now();
    2185. 

  2185.                     $object->date_lim_reglement=$object->calculate_date_lim_reglement();
    2186. 

  2186.                 }
    2187. 

  2187.                 $numref = $object->getNextNumRef($soc);
    2188. 

  2188.                 //$object->date=$savdate;
    2189. 

  2189.             }
    2190. 

  2190.             else
    2191. 

  2191.             {
    2192. 

  2192.                 $numref = $object->ref;
    2193. 

  2193.             }
    2194. 

  2194. 

  2195.             $text=$langs->trans('ConfirmValidateBill',$numref);
    2196. 

  2196.             if ($conf->notification->enabled)
    2197. 

  2197.             {
    2198. 

  2198.                 require_once(DOL_DOCUMENT_ROOT ."/core/class/notify.class.php");
    2199. 

  2199.                 $notify=new Notify($db);
    2200. 

  2200.                 $text.='<br>';
    2201. 

  2201.                 $text.=$notify->confirmMessage('NOTIFY_VAL_FAC',$object->socid);
    2202. 

  2202.             }
    2203. 

  2203.             $formquestion=array();
    2204. 

  2204. 

  2205.             if ($object->type != 3 && ! empty($conf->global->STOCK_CALCULATE_ON_BILL) && $object->hasProductsOrServices(1))
    2206. 

  2206.             {
    2207. 

  2207.                 $langs->load("stocks");
    2208. 

  2208.                 require_once(DOL_DOCUMENT_ROOT."/product/class/html.formproduct.class.php");
    2209. 

  2209.                 $formproduct=new FormProduct($db);
    2210. 

  2210.                 $label=$object->type==2?$langs->trans("SelectWarehouseForStockIncrease"):$langs->trans("SelectWarehouseForStockDecrease");
    2211. 

  2211.                 $formquestion=array(
    2212. 

  2212.                 //'text' => $langs->trans("ConfirmClone"),
    2213. 

  2213.                 //array('type' => 'checkbox', 'name' => 'clone_content',   'label' => $langs->trans("CloneMainAttributes"),   'value' => 1),
    2214. 

  2214.                 //array('type' => 'checkbox', 'name' => 'update_prices',   'label' => $langs->trans("PuttingPricesUpToDate"),   'value' => 1),
    2215. 

  2215.                 array('type' => 'other', 'name' => 'idwarehouse',   'label' => $label,   'value' => $formproduct->selectWarehouses(GETPOST('idwarehouse'),'idwarehouse','',1)));
    2216. 

  2216.             }
    2217. 

  2217.             if ($object->type != 2 && $object->total_ttc < 0)    // Can happen only if $conf->global->FACTURE_ENABLE_NEGATIVE is on
    2218. 

  2218.             {
    2219. 

  2219.                  $text.='<br>'.img_warning().' '.$langs->trans("ErrorInvoiceOfThisTypeMustBePositive");
    2220. 

  2220.             }
    2221. 

  2221.             $formconfirm=$form->formconfirm($_SERVER["PHP_SELF"].'?facid='.$object->id,$langs->trans('ValidateBill'),$text,'confirm_valid',$formquestion,(($object->type != 2 && $object->total_ttc < 0)?"no":"yes"),($conf->notification->enabled?0:2));
    2222. 

  2222.         }
    2223. 

  2223. 

  2224.         // Confirm back to draft status
    2225. 

  2225.         if ($action == 'modif')
    2226. 

  2226.         {
    2227. 

  2227.             $text=$langs->trans('ConfirmUnvalidateBill',$object->ref);
    2228. 

  2228.             $formquestion=array();
    2229. 

  2229.             if ($object->type != 3 && ! empty($conf->global->STOCK_CALCULATE_ON_BILL) && $object->hasProductsOrServices(1))
    2230. 

  2230.             {
    2231. 

  2231.                 $langs->load("stocks");
    2232. 

  2232.                 require_once(DOL_DOCUMENT_ROOT."/product/class/html.formproduct.class.php");
    2233. 

  2233.                 $formproduct=new FormProduct($db);
    2234. 

  2234.                 $label=$object->type==2?$langs->trans("SelectWarehouseForStockDecrease"):$langs->trans("SelectWarehouseForStockIncrease");
    2235. 

  2235.                 $formquestion=array(
    2236. 

  2236.                 //'text' => $langs->trans("ConfirmClone"),
    2237. 

  2237.                 //array('type' => 'checkbox', 'name' => 'clone_content',   'label' => $langs->trans("CloneMainAttributes"),   'value' => 1),
    2238. 

  2238.                 //array('type' => 'checkbox', 'name' => 'update_prices',   'label' => $langs->trans("PuttingPricesUpToDate"),   'value' => 1),
    2239. 

  2239.                 array('type' => 'other', 'name' => 'idwarehouse',   'label' => $label,   'value' => $formproduct->selectWarehouses(GETPOST('idwarehouse'),'idwarehouse','',1)));
    2240. 

  2240.             }
    2241. 

  2241. 

  2242.             $formconfirm=$form->formconfirm($_SERVER["PHP_SELF"].'?facid='.$object->id,$langs->trans('UnvalidateBill'),$text,'confirm_modif',$formquestion,"yes",1);
    2243. 

  2243.         }
    2244. 

  2244. 

  2245.         // Confirmation du classement paye
    2246. 

  2246.         if ($action == 'paid' && $resteapayer <= 0)
    2247. 

  2247.         {
    2248. 

  2248.             $formconfirm=$form->formconfirm($_SERVER["PHP_SELF"].'?facid='.$object->id,$langs->trans('ClassifyPaid'),$langs->trans('ConfirmClassifyPaidBill',$object->ref),'confirm_paid','',"yes",1);
    2249. 

  2249.         }
    2250. 

  2250.         if ($action == 'paid' && $resteapayer > 0)
    2251. 

  2251.         {
    2252. 

  2252.             // Code
    2253. 

  2253.             $i=0;
    2254. 

  2254.             $close[$i]['code']='discount_vat';$i++;
    2255. 

  2255.             $close[$i]['code']='badcustomer';$i++;
    2256. 

  2256.             // Help
    2257. 

  2257.             $i=0;
    2258. 

  2258.             $close[$i]['label']=$langs->trans("HelpEscompte").'<br><br>'.$langs->trans("ConfirmClassifyPaidPartiallyReasonDiscountVatDesc");$i++;
    2259. 

  2259.             $close[$i]['label']=$langs->trans("ConfirmClassifyPaidPartiallyReasonBadCustomerDesc");$i++;
    2260. 

  2260.             // Texte
    2261. 

  2261.             $i=0;
    2262. 

  2262.             $close[$i]['reason']=$form->textwithpicto($langs->transnoentities("ConfirmClassifyPaidPartiallyReasonDiscountVat",$resteapayer,$langs->trans("Currency".$conf->currency)),$close[$i]['label'],1);$i++;
    2263. 

  2263.             $close[$i]['reason']=$form->textwithpicto($langs->transnoentities("ConfirmClassifyPaidPartiallyReasonBadCustomer",$resteapayer,$langs->trans("Currency".$conf->currency)),$close[$i]['label'],1);$i++;
    2264. 

  2264.             // arrayreasons[code]=reason
    2265. 

  2265.             foreach($close as $key => $val)
    2266. 

  2266.             {
    2267. 

  2267.                 $arrayreasons[$close[$key]['code']]=$close[$key]['reason'];
    2268. 

  2268.             }
    2269. 

  2269. 

  2270.             // Cree un tableau formulaire
    2271. 

  2271.             $formquestion=array(
    2272. 

  2272. 			'text' => $langs->trans("ConfirmClassifyPaidPartiallyQuestion"),
    2273. 

  2273.             array('type' => 'radio', 'name' => 'close_code', 'label' => $langs->trans("Reason"),  'values' => $arrayreasons),
    2274. 

  2274.             array('type' => 'text',  'name' => 'close_note', 'label' => $langs->trans("Comment"), 'value' => '', 'size' => '100')
    2275. 

  2275.             );
    2276. 

  2276.             // Paiement incomplet. On demande si motif = escompte ou autre
    2277. 

  2277.             $formconfirm=$form->formconfirm($_SERVER["PHP_SELF"].'?facid='.$object->id,$langs->trans('ClassifyPaid'),$langs->trans('ConfirmClassifyPaidPartially',$object->ref),'confirm_paid_partially',$formquestion,"yes");
    2278. 

  2278.         }
    2279. 

  2279. 

  2280.         // Confirmation du classement abandonne
    2281. 

  2281.         if ($action == 'canceled')
    2282. 

  2282.         {
    2283. 

  2283.             // S'il y a une facture de remplacement pas encore validee (etat brouillon),
    2284. 

  2284.             // on ne permet pas de classer abandonner la facture.
    2285. 

  2285.             if ($objectidnext)
    2286. 

  2286.             {
    2287. 

  2287.                 $facturereplacement=new Facture($db);
    2288. 

  2288.                 $facturereplacement->fetch($objectidnext);
    2289. 

  2289.                 $statusreplacement=$facturereplacement->statut;
    2290. 

  2290.             }
    2291. 

  2291.             if ($objectidnext && $statusreplacement == 0)
    2292. 

  2292.             {
    2293. 

  2293.                 print '<div class="error">'.$langs->trans("ErrorCantCancelIfReplacementInvoiceNotValidated").'</div>';
    2294. 

  2294.             }
    2295. 

  2295.             else
    2296. 

  2296.             {
    2297. 

  2297.                 // Code
    2298. 

  2298.                 $close[1]['code']='badcustomer';
    2299. 

  2299.                 $close[2]['code']='abandon';
    2300. 

  2300.                 // Help
    2301. 

  2301.                 $close[1]['label']=$langs->trans("ConfirmClassifyPaidPartiallyReasonBadCustomerDesc");
    2302. 

  2302.                 $close[2]['label']=$langs->trans("ConfirmClassifyAbandonReasonOtherDesc");
    2303. 

  2303.                 // Texte
    2304. 

  2304.                 $close[1]['reason']=$form->textwithpicto($langs->transnoentities("ConfirmClassifyPaidPartiallyReasonBadCustomer",$object->ref),$close[1]['label'],1);
    2305. 

  2305.                 $close[2]['reason']=$form->textwithpicto($langs->transnoentities("ConfirmClassifyAbandonReasonOther"),$close[2]['label'],1);
    2306. 

  2306.                 // arrayreasons
    2307. 

  2307.                 $arrayreasons[$close[1]['code']]=$close[1]['reason'];
    2308. 

  2308.                 $arrayreasons[$close[2]['code']]=$close[2]['reason'];
    2309. 

  2309. 

  2310.                 // Cree un tableau formulaire
    2311. 

  2311.                 $formquestion=array(
    2312. 

  2312. 				'text' => $langs->trans("ConfirmCancelBillQuestion"),
    2313. 

  2313.                 array('type' => 'radio', 'name' => 'close_code', 'label' => $langs->trans("Reason"),  'values' => $arrayreasons),
    2314. 

  2314.                 array('type' => 'text',  'name' => 'close_note', 'label' => $langs->trans("Comment"), 'value' => '', 'size' => '100')
    2315. 

  2315.                 );
    2316. 

  2316. 

  2317.                 $formconfirm=$form->formconfirm($_SERVER['PHP_SELF'].'?facid='.$object->id,$langs->trans('CancelBill'),$langs->trans('ConfirmCancelBill',$object->ref),'confirm_canceled',$formquestion,"yes");
    2318. 

  2318.             }
    2319. 

  2319.         }
    2320. 

  2320. 

  2321.         // Confirmation de la suppression d'une ligne produit
    2322. 

  2322.         if ($action == 'ask_deleteline')
    2323. 

  2323.         {
    2324. 

  2324.             $formconfirm=$form->formconfirm($_SERVER["PHP_SELF"].'?facid='.$object->id.'&lineid='.$lineid, $langs->trans('DeleteProductLine'), $langs->trans('ConfirmDeleteProductLine'), 'confirm_deleteline', '', 'no', 1);
    2325. 

  2325.         }
    2326. 

  2326. 

  2327.         // Clone confirmation
    2328. 

  2328.         if ($action == 'clone')
    2329. 

  2329.         {
    2330. 

  2330.             // Create an array for form
    2331. 

  2331.             $formquestion=array(
    2332. 

  2332.             //'text' => $langs->trans("ConfirmClone"),
    2333. 

  2333.             //array('type' => 'checkbox', 'name' => 'clone_content',   'label' => $langs->trans("CloneMainAttributes"),   'value' => 1)
    2334. 

  2334.             );
    2335. 

  2335.             // Paiement incomplet. On demande si motif = escompte ou autre
    2336. 

  2336.             $formconfirm=$form->formconfirm($_SERVER["PHP_SELF"].'?facid='.$object->id,$langs->trans('CloneInvoice'),$langs->trans('ConfirmCloneInvoice',$object->ref),'confirm_clone',$formquestion,'yes',1);
    2337. 

  2337.         }
    2338. 

  2338. 

  2339.         if (! $formconfirm)
    2340. 

  2340.         {
    2341. 

  2341.             $parameters=array('lineid'=>$lineid);
    2342. 

  2342.             $formconfirm=$hookmanager->executeHooks('formConfirm',$parameters,$object,$action);    // Note that $action and $object may have been modified by hook
    2343. 

  2343.         }
    2344. 

  2344. 

  2345.         // Print form confirm
    2346. 

  2346.         print $formconfirm;
    2347. 

  2347. 

  2348. 

  2349.         // Invoice content
    2350. 

  2350. 

  2351.         print '<table class="border" width="100%">';
    2352. 

  2352. 

  2353.         $linkback = '<a href="'.DOL_URL_ROOT.'/compta/facture/list.php'.(! empty($socid)?'?socid='.$socid:'').'">'.$langs->trans("BackToList").'</a>';
    2354. 

  2354. 

  2355.         // Ref
    2356. 

  2356.         print '<tr><td width="20%">'.$langs->trans('Ref').'</td>';
    2357. 

  2357.         print '<td colspan="5">';
    2358. 

  2358.         $morehtmlref='';
    2359. 

  2359.         $discount=new DiscountAbsolute($db);
    2360. 

  2360.         $result=$discount->fetch(0,$object->id);
    2361. 

  2361.         if ($result > 0)
    2362. 

  2362.         {
    2363. 

  2363.             $morehtmlref=' ('.$langs->trans("CreditNoteConvertedIntoDiscount",$discount->getNomUrl(1,'discount')).')';
    2364. 

  2364.         }
    2365. 

  2365.         if ($result < 0)
    2366. 

  2366.         {
    2367. 

  2367.             dol_print_error('',$discount->error);
    2368. 

  2368.         }
    2369. 

  2369.         print $form->showrefnav($object, 'ref', $linkback, 1, 'facnumber', 'ref', $morehtmlref);
    2370. 

  2370.         print '</td></tr>';
    2371. 

  2371. 

  2372. 		// Ref customer
    2373. 

  2373.         print '<tr><td width="20%">';
    2374. 

  2374.         print '<table class="nobordernopadding" width="100%"><tr><td>';
    2375. 

  2375.         print $langs->trans('RefCustomer');
    2376. 

  2376.         print '</td>';
    2377. 

  2377.         if ($action != 'refclient' && $object->brouillon) print '<td align="right"><a href="'.$_SERVER['PHP_SELF'].'?action=refclient&amp;id='.$object->id.'">'.img_edit($langs->trans('Modify')).'</a></td>';
    2378. 

  2378.         print '</tr></table>';
    2379. 

  2379.         print '</td>';
    2380. 

  2380.         print '<td colspan="5">';
    2381. 

  2381.        	if ($user->rights->facture->creer && $action == 'refclient')
    2382. 

  2382. 		{
    2383. 

  2383. 			print '<form action="'.$_SERVER["PHP_SELF"].'?id='.$object->id.'" method="post">';
    2384. 

  2384. 			print '<input type="hidden" name="token" value="'.$_SESSION['newtoken'].'">';
    2385. 

  2385. 			print '<input type="hidden" name="action" value="set_ref_client">';
    2386. 

  2386. 			print '<input type="text" class="flat" size="20" name="ref_client" value="'.$object->ref_client.'">';
    2387. 

  2387. 			print ' <input type="submit" class="button" value="'.$langs->trans('Modify').'">';
    2388. 

  2388. 			print '</form>';
    2389. 

  2389. 		}
    2390. 

  2390. 		else
    2391. 

  2391. 		{
    2392. 

  2392. 			print $object->ref_client;
    2393. 

  2393. 		}
    2394. 

  2394. 		print '</td></tr>';
    2395. 

  2395. 

  2396.         // Third party
    2397. 

  2397.         print '<tr><td>';
    2398. 

  2398.         print '<table class="nobordernopadding" width="100%">';
    2399. 

  2399.         print '<tr><td>'.$langs->trans('Company').'</td>';
    2400. 

  2400.         print '</td><td colspan="5">';
    2401. 

  2401.         if (! empty($conf->global->FACTURE_CHANGE_THIRDPARTY) && $action != 'editthirdparty' && $object->brouillon && $user->rights->facture->creer)
    2402. 

  2402.         print '<td align="right"><a href="'.$_SERVER["PHP_SELF"].'?action=editthirdparty&amp;facid='.$object->id.'">'.img_edit($langs->trans('SetLinkToThirdParty'),1).'</a></td>';
    2403. 

  2403.         print '</tr></table>';
    2404. 

  2404.         print '</td><td colspan="5">';
    2405. 

  2405.         if ($action == 'editthirdparty')
    2406. 

  2406.         {
    2407. 

  2407.             $form->form_thirdparty($_SERVER['PHP_SELF'].'?facid='.$object->id,$object->socid,'socid');
    2408. 

  2408.         }
    2409. 

  2409.         else
    2410. 

  2410.         {
    2411. 

  2411.             print ' &nbsp;'.$soc->getNomUrl(1,'compta');
    2412. 

  2412.             print ' &nbsp; (<a href="'.DOL_URL_ROOT.'/compta/facture/list.php?socid='.$object->socid.'">'.$langs->trans('OtherBills').'</a>)';
    2413. 

  2413.         }
    2414. 

  2414.         print '</tr>';
    2415. 

  2415. 

  2416.         // Type
    2417. 

  2417.         print '<tr><td>'.$langs->trans('Type').'</td><td colspan="5">';
    2418. 

  2418.         print $object->getLibType();
    2419. 

  2419.         if ($object->type == 1)
    2420. 

  2420.         {
    2421. 

  2421.             $facreplaced=new Facture($db);
    2422. 

  2422.             $facreplaced->fetch($object->fk_facture_source);
    2423. 

  2423.             print ' ('.$langs->transnoentities("ReplaceInvoice",$facreplaced->getNomUrl(1)).')';
    2424. 

  2424.         }
    2425. 

  2425.         if ($object->type == 2)
    2426. 

  2426.         {
    2427. 

  2427.             $facusing=new Facture($db);
    2428. 

  2428.             $facusing->fetch($object->fk_facture_source);
    2429. 

  2429.             print ' ('.$langs->transnoentities("CorrectInvoice",$facusing->getNomUrl(1)).')';
    2430. 

  2430.         }
    2431. 

  2431. 

  2432.         $facidavoir=$object->getListIdAvoirFromInvoice();
    2433. 

  2433.         if (count($facidavoir) > 0)
    2434. 

  2434.         {
    2435. 

  2435.             print ' ('.$langs->transnoentities("InvoiceHasAvoir");
    2436. 

  2436.             $i=0;
    2437. 

  2437.             foreach($facidavoir as $id)
    2438. 

  2438.             {
    2439. 

  2439.                 if ($i==0) print ' ';
    2440. 

  2440.                 else print ',';
    2441. 

  2441.                 $facavoir=new Facture($db);
    2442. 

  2442.                 $facavoir->fetch($id);
    2443. 

  2443.                 print $facavoir->getNomUrl(1);
    2444. 

  2444.             }
    2445. 

  2445.             print ')';
    2446. 

  2446.         }
    2447. 

  2447.         if ($objectidnext > 0)
    2448. 

  2448.         {
    2449. 

  2449.             $facthatreplace=new Facture($db);
    2450. 

  2450.             $facthatreplace->fetch($objectidnext);
    2451. 

  2451.             print ' ('.$langs->transnoentities("ReplacedByInvoice",$facthatreplace->getNomUrl(1)).')';
    2452. 

  2452.         }
    2453. 

  2453.         print '</td></tr>';
    2454. 

  2454. 

  2455.         // Relative and absolute discounts
    2456. 

  2456.         $addrelativediscount='<a href="'.DOL_URL_ROOT.'/comm/remise.php?id='.$soc->id.'&backtopage='.urlencode($_SERVER["PHP_SELF"]).'?facid='.$object->id.'">'.$langs->trans("EditRelativeDiscounts").'</a>';
    2457. 

  2457.         $addabsolutediscount='<a href="'.DOL_URL_ROOT.'/comm/remx.php?id='.$soc->id.'&backtopage='.urlencode($_SERVER["PHP_SELF"]).'?facid='.$object->id.'">'.$langs->trans("EditGlobalDiscounts").'</a>';
    2458. 

  2458.         $addcreditnote='<a href="'.DOL_URL_ROOT.'/compta/facture.php?action=create&socid='.$soc->id.'&type=2&backtopage='.urlencode($_SERVER["PHP_SELF"]).'?facid='.$object->id.'">'.$langs->trans("AddCreditNote").'</a>';
    2459. 

  2459. 

  2460.         print '<tr><td>'.$langs->trans('Discounts');
    2461. 

  2461.         print '</td><td colspan="5">';
    2462. 

  2462.         if ($soc->remise_client) print $langs->trans("CompanyHasRelativeDiscount",$soc->remise_client);
    2463. 

  2463.         else print $langs->trans("CompanyHasNoRelativeDiscount");
    2464. 

  2464.         //print ' ('.$addrelativediscount.')';
    2465. 

  2465. 

  2466.         if ($absolute_discount > 0)
    2467. 

  2467.         {
    2468. 

  2468.             print '. ';
    2469. 

  2469.             if ($object->statut > 0 || $object->type == 2 || $object->type == 3)
    2470. 

  2470.             {
    2471. 

  2471.                 if ($object->statut == 0)
    2472. 

  2472.                 {
    2473. 

  2473.                     print $langs->trans("CompanyHasAbsoluteDiscount",price($absolute_discount),$langs->transnoentities("Currency".$conf->currency));
    2474. 

  2474.                     print '. ';
    2475. 

  2475.                 }
    2476. 

  2476.                 else
    2477. 

  2477.                 {
    2478. 

  2478.                     if ($object->statut < 1 || $object->type == 2 || $object->type == 3)
    2479. 

  2479.                     {
    2480. 

  2480.                         $text=$langs->trans("CompanyHasAbsoluteDiscount",price($absolute_discount),$langs->transnoentities("Currency".$conf->currency));
    2481. 

  2481.                         print '<br>'.$text.'.<br>';
    2482. 

  2482.                     }
    2483. 

  2483.                     else
    2484. 

  2484.                     {
    2485. 

  2485.                         $text=$langs->trans("CompanyHasAbsoluteDiscount",price($absolute_discount),$langs->transnoentities("Currency".$conf->currency));
    2486. 

  2486.                         $text2=$langs->trans("AbsoluteDiscountUse");
    2487. 

  2487.                         print $form->textwithpicto($text,$text2);
    2488. 

  2488.                     }
    2489. 

  2489.                 }
    2490. 

  2490.             }
    2491. 

  2491.             else
    2492. 

  2492.             {
    2493. 

  2493.                 // Remise dispo de type remise fixe (not credit note)
    2494. 

  2494.                 print '<br>';
    2495. 

  2495.                 $form->form_remise_dispo($_SERVER["PHP_SELF"].'?facid='.$object->id, GETPOST('discountid'), 'remise_id', $soc->id, $absolute_discount, $filterabsolutediscount, $resteapayer, ' ('.$addabsolutediscount.')');
    2496. 

  2496.             }
    2497. 

  2497.         }
    2498. 

  2498.         else
    2499. 

  2499.         {
    2500. 

  2500.             if ($absolute_creditnote > 0)    // If not, link will be added later
    2501. 

  2501.             {
    2502. 

  2502.                 if ($object->statut == 0 && $object->type != 2 && $object->type != 3) print ' ('.$addabsolutediscount.')<br>';
    2503. 

  2503.                 else print '. ';
    2504. 

  2504.             }
    2505. 

  2505.             else print '. ';
    2506. 

  2506.         }
    2507. 

  2507.         if ($absolute_creditnote > 0)
    2508. 

  2508.         {
    2509. 

  2509.             // If validated, we show link "add credit note to payment"
    2510. 

  2510.             if ($object->statut != 1 || $object->type == 2 || $object->type == 3)
    2511. 

  2511.             {
    2512. 

  2512.                 if ($object->statut == 0 && $object->type != 3)
    2513. 

  2513.                 {
    2514. 

  2514.                     $text=$langs->trans("CompanyHasCreditNote",price($absolute_creditnote),$langs->transnoentities("Currency".$conf->currency));
    2515. 

  2515.                     print $form->textwithpicto($text,$langs->trans("CreditNoteDepositUse"));
    2516. 

  2516.                 }
    2517. 

  2517.                 else
    2518. 

  2518.                 {
    2519. 

  2519.                     print $langs->trans("CompanyHasCreditNote",price($absolute_creditnote),$langs->transnoentities("Currency".$conf->currency)).'.';
    2520. 

  2520.                 }
    2521. 

  2521.             }
    2522. 

  2522.             else
    2523. 

  2523.             {
    2524. 

  2524.                 // Remise dispo de type avoir
    2525. 

  2525.                 if (! $absolute_discount) print '<br>';
    2526. 

  2526.                 //$form->form_remise_dispo($_SERVER["PHP_SELF"].'?facid='.$object->id, 0, 'remise_id_for_payment', $soc->id, $absolute_creditnote, $filtercreditnote, $resteapayer);
    2527. 

  2527.                 $form->form_remise_dispo($_SERVER["PHP_SELF"].'?facid='.$object->id, 0, 'remise_id_for_payment', $soc->id, $absolute_creditnote, $filtercreditnote, 0);    // We must allow credit not even if amount is higher
    2528. 

  2528.             }
    2529. 

  2529.         }
    2530. 

  2530.         if (! $absolute_discount && ! $absolute_creditnote)
    2531. 

  2531.         {
    2532. 

  2532.             print $langs->trans("CompanyHasNoAbsoluteDiscount");
    2533. 

  2533.             if ($object->statut == 0 && $object->type != 2 && $object->type != 3) print ' ('.$addabsolutediscount.')<br>';
    2534. 

  2534.             else print '. ';
    2535. 

  2535.         }
    2536. 

  2536.         /*if ($object->statut == 0 && $object->type != 2 && $object->type != 3)
    2537. 

  2537.          {
    2538. 

  2538.          if (! $absolute_discount && ! $absolute_creditnote) print '<br>';
    2539. 

  2539.          //print ' &nbsp; - &nbsp; ';
    2540. 

  2540.          print $addabsolutediscount;
    2541. 

  2541.          //print ' &nbsp; - &nbsp; '.$addcreditnote;      // We disbale link to credit note
    2542. 

  2542.          }*/
    2543. 

  2543.         print '</td></tr>';
    2544. 

  2544. 

  2545.         // Date invoice
    2546. 

  2546.         print '<tr><td>';
    2547. 

  2547.         print '<table class="nobordernopadding" width="100%"><tr><td>';
    2548. 

  2548.         print $langs->trans('Date');
    2549. 

  2549.         print '</td>';
    2550. 

  2550.         if ($object->type != 2 && $action != 'editinvoicedate' && $object->brouillon && $user->rights->facture->creer) print '<td align="right"><a href="'.$_SERVER["PHP_SELF"].'?action=editinvoicedate&amp;facid='.$object->id.'">'.img_edit($langs->trans('SetDate'),1).'</a></td>';
    2551. 

  2551.         print '</tr></table>';
    2552. 

  2552.         print '</td><td colspan="3">';
    2553. 

  2553. 

  2554.         if ($object->type != 2)
    2555. 

  2555.         {
    2556. 

  2556.             if ($action == 'editinvoicedate')
    2557. 

  2557.             {
    2558. 

  2558.                 $form->form_date($_SERVER['PHP_SELF'].'?facid='.$object->id,$object->date,'invoicedate');
    2559. 

  2559.             }
    2560. 

  2560.             else
    2561. 

  2561.             {
    2562. 

  2562.                 print dol_print_date($object->date,'daytext');
    2563. 

  2563.             }
    2564. 

  2564.         }
    2565. 

  2565.         else
    2566. 

  2566.         {
    2567. 

  2567.             print dol_print_date($object->date,'daytext');
    2568. 

  2568.         }
    2569. 

  2569.         print '</td>';
    2570. 

  2570. 

  2571. 

  2572.         /*
    2573. 

  2573.          * List of payments
    2574. 

  2574.          */
    2575. 

  2575. 

  2576.         $nbrows=8; $nbcols=2;
    2577. 

  2577.         if ($conf->projet->enabled) $nbrows++;
    2578. 

  2578.         if ($conf->banque->enabled) $nbcols++;
    2579. 

  2579. 

  2580.         //Local taxes
    2581. 

  2581.         if ($mysoc->pays_code=='ES')
    2582. 

  2582.         {
    2583. 

  2583.             if($mysoc->localtax1_assuj=="1") $nbrows++;
    2584. 

  2584.             if($mysoc->localtax2_assuj=="1") $nbrows++;
    2585. 

  2585.         }
    2586. 

  2586. 

  2587.         print '<td rowspan="'.$nbrows.'" colspan="2" valign="top">';
    2588. 

  2588. 

  2589.         print '<table class="nobordernopadding" width="100%">';
    2590. 

  2590. 

  2591.         // List of payments already done
    2592. 

  2592.         print '<tr class="liste_titre">';
    2593. 

  2593.         print '<td>'.($object->type == 2 ? $langs->trans("PaymentsBack") : $langs->trans('Payments')).'</td>';
    2594. 

  2594.         print '<td>'.$langs->trans('Type').'</td>';
    2595. 

  2595.         if ($conf->banque->enabled) print '<td align="right">'.$langs->trans('BankAccount').'</td>';
    2596. 

  2596.         print '<td align="right">'.$langs->trans('Amount').'</td>';
    2597. 

  2597.         print '<td width="18">&nbsp;</td>';
    2598. 

  2598.         print '</tr>';
    2599. 

  2599. 

  2600.         $var=true;
    2601. 

  2601. 

  2602.         // Payments already done (from payment on this invoice)
    2603. 

  2603.         $sql = 'SELECT p.datep as dp, p.num_paiement, p.rowid, p.fk_bank,';
    2604. 

  2604.         $sql.= ' c.code as payment_code, c.libelle as payment_label,';
    2605. 

  2605.         $sql.= ' pf.amount,';
    2606. 

  2606.         $sql.= ' ba.rowid as baid, ba.ref, ba.label';
    2607. 

  2607.         $sql.= ' FROM '.MAIN_DB_PREFIX.'c_paiement as c, '.MAIN_DB_PREFIX.'paiement_facture as pf, '.MAIN_DB_PREFIX.'paiement as p';
    2608. 

  2608.         $sql.= ' LEFT JOIN '.MAIN_DB_PREFIX.'bank as b ON p.fk_bank = b.rowid';
    2609. 

  2609.         $sql.= ' LEFT JOIN '.MAIN_DB_PREFIX.'bank_account as ba ON b.fk_account = ba.rowid';
    2610. 

  2610.         $sql.= ' WHERE pf.fk_facture = '.$object->id.' AND p.fk_paiement = c.id AND pf.fk_paiement = p.rowid';
    2611. 

  2611.         $sql.= ' ORDER BY p.datep, p.tms';
    2612. 

  2612. 

  2613.         $result = $db->query($sql);
    2614. 

  2614.         if ($result)
    2615. 

  2615.         {
    2616. 

  2616.             $num = $db->num_rows($result);
    2617. 

  2617.             $i = 0;
    2618. 

  2618. 

  2619.             if ($object->type != 2)
    2620. 

  2620.             {
    2621. 

  2621.                 if ($num > 0)
    2622. 

  2622.                 {
    2623. 

  2623.                     while ($i < $num)
    2624. 

  2624.                     {
    2625. 

  2625.                         $objp = $db->fetch_object($result);
    2626. 

  2626.                         $var=!$var;
    2627. 

  2627.                         print '<tr '.$bc[$var].'><td>';
    2628. 

  2628.                         print '<a href="'.DOL_URL_ROOT.'/compta/paiement/fiche.php?id='.$objp->rowid.'">'.img_object($langs->trans('ShowPayment'),'payment').' ';
    2629. 

  2629.                         print dol_print_date($db->jdate($objp->dp),'day').'</a></td>';
    2630. 

  2630.                         $label=($langs->trans("PaymentType".$objp->payment_code)!=("PaymentType".$objp->payment_code))?$langs->trans("PaymentType".$objp->payment_code):$objp->payment_label;
    2631. 

  2631.                         print '<td>'.$label.' '.$objp->num_paiement.'</td>';
    2632. 

  2632.                         if ($conf->banque->enabled)
    2633. 

  2633.                         {
    2634. 

  2634.                             $bankaccountstatic->id=$objp->baid;
    2635. 

  2635.                             $bankaccountstatic->ref=$objp->ref;
    2636. 

  2636.                             $bankaccountstatic->label=$objp->ref;
    2637. 

  2637.                             print '<td align="right">';
    2638. 

  2638.                             if ($bankaccountstatic->id) print $bankaccountstatic->getNomUrl(1,'transactions');
    2639. 

  2639.                             print '</td>';
    2640. 

  2640.                         }
    2641. 

  2641.                         print '<td align="right">'.price($objp->amount).'</td>';
    2642. 

  2642.                         print '<td>&nbsp;</td>';
    2643. 

  2643.                         print '</tr>';
    2644. 

  2644.                         $i++;
    2645. 

  2645.                     }
    2646. 

  2646.                 }
    2647. 

  2647.                 else
    2648. 

  2648.                 {
    2649. 

  2649.                     print '<tr '.$bc[$var].'><td colspan="'.$nbcols.'">'.$langs->trans("None").'</td><td></td><td></td></tr>';
    2650. 

  2650.                 }
    2651. 

  2651.             }
    2652. 

  2652.             $db->free($result);
    2653. 

  2653.         }
    2654. 

  2654.         else
    2655. 

  2655.         {
    2656. 

  2656.             dol_print_error($db);
    2657. 

  2657.         }
    2658. 

  2658. 

  2659.         if ($object->type != 2)
    2660. 

  2660.         {
    2661. 

  2661.             // Total already paid
    2662. 

  2662.             print '<tr><td colspan="'.$nbcols.'" align="right">';
    2663. 

  2663.             if ($object->type != 3) print $langs->trans('AlreadyPaidNoCreditNotesNoDeposits');
    2664. 

  2664.             else print $langs->trans('AlreadyPaid');
    2665. 

  2665.             print ' :</td><td align="right">'.price($totalpaye).'</td><td>&nbsp;</td></tr>';
    2666. 

  2666. 

  2667.             $resteapayeraffiche=$resteapayer;
    2668. 

  2668. 

  2669.             // Loop on each credit note or deposit amount applied
    2670. 

  2670.             $creditnoteamount=0;
    2671. 

  2671.             $depositamount=0;
    2672. 

  2672.             $sql = "SELECT re.rowid, re.amount_ht, re.amount_tva, re.amount_ttc,";
    2673. 

  2673.             $sql.= " re.description, re.fk_facture_source";
    2674. 

  2674.             $sql.= " FROM ".MAIN_DB_PREFIX ."societe_remise_except as re";
    2675. 

  2675.             $sql.= " WHERE fk_facture = ".$object->id;
    2676. 

  2676.             $resql=$db->query($sql);
    2677. 

  2677.             if ($resql)
    2678. 

  2678.             {
    2679. 

  2679.                 $num = $db->num_rows($resql);
    2680. 

  2680.                 $i = 0;
    2681. 

  2681.                 $invoice=new Facture($db);
    2682. 

  2682.                 while ($i < $num)
    2683. 

  2683.                 {
    2684. 

  2684.                     $obj = $db->fetch_object($resql);
    2685. 

  2685.                     $invoice->fetch($obj->fk_facture_source);
    2686. 

  2686.                     print '<tr><td colspan="'.$nbcols.'" align="right">';
    2687. 

  2687.                     if ($invoice->type == 2) print $langs->trans("CreditNote").' ';
    2688. 

  2688.                     if ($invoice->type == 3) print $langs->trans("Deposit").' ';
    2689. 

  2689.                     print $invoice->getNomUrl(0);
    2690. 

  2690.                     print ' :</td>';
    2691. 

  2691.                     print '<td align="right">'.price($obj->amount_ttc).'</td>';
    2692. 

  2692.                     print '<td align="right">';
    2693. 

  2693.                     print '<a href="'.$_SERVER["PHP_SELF"].'?facid='.$object->id.'&action=unlinkdiscount&discountid='.$obj->rowid.'">'.img_delete().'</a>';
    2694. 

  2694.                     print '</td></tr>';
    2695. 

  2695.                     $i++;
    2696. 

  2696.                     if ($invoice->type == 2) $creditnoteamount += $obj->amount_ttc;
    2697. 

  2697.                     if ($invoice->type == 3) $depositamount += $obj->amount_ttc;
    2698. 

  2698.                 }
    2699. 

  2699.             }
    2700. 

  2700.             else
    2701. 

  2701.             {
    2702. 

  2702.                 dol_print_error($db);
    2703. 

  2703.             }
    2704. 

  2704. 

  2705.             // Paye partiellement 'escompte'
    2706. 

  2706.             if (($object->statut == 2 || $object->statut == 3) && $object->close_code == 'discount_vat')
    2707. 

  2707.             {
    2708. 

  2708.                 print '<tr><td colspan="'.$nbcols.'" align="right" nowrap="1">';
    2709. 

  2709.                 print $form->textwithpicto($langs->trans("Escompte").':',$langs->trans("HelpEscompte"),-1);
    2710. 

  2710.                 print '</td><td align="right">'.price($object->total_ttc - $creditnoteamount - $depositamount - $totalpaye).'</td><td>&nbsp;</td></tr>';
    2711. 

  2711.                 $resteapayeraffiche=0;
    2712. 

  2712.             }
    2713. 

  2713.             // Paye partiellement ou Abandon 'badcustomer'
    2714. 

  2714.             if (($object->statut == 2 || $object->statut == 3) && $object->close_code == 'badcustomer')
    2715. 

  2715.             {
    2716. 

  2716.                 print '<tr><td colspan="'.$nbcols.'" align="right" nowrap="1">';
    2717. 

  2717.                 print $form->textwithpicto($langs->trans("Abandoned").':',$langs->trans("HelpAbandonBadCustomer"),-1);
    2718. 

  2718.                 print '</td><td align="right">'.price($object->total_ttc - $creditnoteamount - $depositamount - $totalpaye).'</td><td>&nbsp;</td></tr>';
    2719. 

  2719.                 //$resteapayeraffiche=0;
    2720. 

  2720.             }
    2721. 

  2721.             // Paye partiellement ou Abandon 'product_returned'
    2722. 

  2722.             if (($object->statut == 2 || $object->statut == 3) && $object->close_code == 'product_returned')
    2723. 

  2723.             {
    2724. 

  2724.                 print '<tr><td colspan="'.$nbcols.'" align="right" nowrap="1">';
    2725. 

  2725.                 print $form->textwithpicto($langs->trans("ProductReturned").':',$langs->trans("HelpAbandonProductReturned"),-1);
    2726. 

  2726.                 print '</td><td align="right">'.price($object->total_ttc - $creditnoteamount - $depositamount - $totalpaye).'</td><td>&nbsp;</td></tr>';
    2727. 

  2727.                 $resteapayeraffiche=0;
    2728. 

  2728.             }
    2729. 

  2729.             // Paye partiellement ou Abandon 'abandon'
    2730. 

  2730.             if (($object->statut == 2 || $object->statut == 3) && $object->close_code == 'abandon')
    2731. 

  2731.             {
    2732. 

  2732.                 print '<tr><td colspan="'.$nbcols.'" align="right" nowrap="1">';
    2733. 

  2733.                 $text=$langs->trans("HelpAbandonOther");
    2734. 

  2734.                 if ($object->close_note) $text.='<br><br><b>'.$langs->trans("Reason").'</b>:'.$object->close_note;
    2735. 

  2735.                 print $form->textwithpicto($langs->trans("Abandoned").':',$text,-1);
    2736. 

  2736.                 print '</td><td align="right">'.price($object->total_ttc - $creditnoteamount - $depositamount - $totalpaye).'</td><td>&nbsp;</td></tr>';
    2737. 

  2737.                 $resteapayeraffiche=0;
    2738. 

  2738.             }
    2739. 

  2739. 

  2740.             // Billed
    2741. 

  2741.             print '<tr><td colspan="'.$nbcols.'" align="right">'.$langs->trans("Billed").' :</td><td align="right" style="border: 1px solid;">'.price($object->total_ttc).'</td><td>&nbsp;</td></tr>';
    2742. 

  2742. 

  2743.             // Remainder to pay
    2744. 

  2744.             print '<tr><td colspan="'.$nbcols.'" align="right">';
    2745. 

  2745.             if ($resteapayeraffiche >= 0) print $langs->trans('RemainderToPay');
    2746. 

  2746.             else print $langs->trans('ExcessReceived');
    2747. 

  2747.             print ' :</td>';
    2748. 

  2748.             print '<td align="right" style="border: 1px solid;" bgcolor="#f0f0f0"><b>'.price($resteapayeraffiche).'</b></td>';
    2749. 

  2749.             print '<td nowrap="nowrap">&nbsp;</td></tr>';
    2750. 

  2750.         }
    2751. 

  2751.         else
    2752. 

  2752.         {
    2753. 

  2753.             // Sold credit note
    2754. 

  2754.             print '<tr><td colspan="'.$nbcols.'" align="right">'.$langs->trans('TotalTTC').' :</td>';
    2755. 

  2755.             print '<td align="right" style="border: 1px solid;" bgcolor="#f0f0f0"><b>'.price(abs($object->total_ttc)).'</b></td><td>&nbsp;</td></tr>';
    2756. 

  2756.         }
    2757. 

  2757. 

  2758.         print '</table>';
    2759. 

  2759. 

  2760. 				// Margin Infos
    2761. 

  2761. 				if (! empty($conf->margin->enabled)) {
    2762. 

  2762. 				  print '<br>';
    2763. 

  2763. 				  $object->displayMarginInfos($object->statut > 0);
    2764. 

  2764. 				}
    2765. 

  2765. 

  2766.         print '</td></tr>';
    2767. 

  2767. 

  2768.         // Date payment term
    2769. 

  2769.         print '<tr><td>';
    2770. 

  2770.         print '<table class="nobordernopadding" width="100%"><tr><td>';
    2771. 

  2771.         print $langs->trans('DateMaxPayment');
    2772. 

  2772.         print '</td>';
    2773. 

  2773.         if ($object->type != 2 && $action != 'editpaymentterm' && $object->brouillon && $user->rights->facture->creer) print '<td align="right"><a href="'.$_SERVER["PHP_SELF"].'?action=editpaymentterm&amp;facid='.$object->id.'">'.img_edit($langs->trans('SetDate'),1).'</a></td>';
    2774. 

  2774.         print '</tr></table>';
    2775. 

  2775.         print '</td><td colspan="3">';
    2776. 

  2776.         if ($object->type != 2)
    2777. 

  2777.         {
    2778. 

  2778.             if ($action == 'editpaymentterm')
    2779. 

  2779.             {
    2780. 

  2780.                 $form->form_date($_SERVER['PHP_SELF'].'?facid='.$object->id,$object->date_lim_reglement,'paymentterm');
    2781. 

  2781.             }
    2782. 

  2782.             else
    2783. 

  2783.             {
    2784. 

  2784.                 print dol_print_date($object->date_lim_reglement,'daytext');
    2785. 

  2785.                 if ($object->date_lim_reglement < ($now - $conf->facture->client->warning_delay) && ! $object->paye && $object->statut == 1 && ! $object->am) print img_warning($langs->trans('Late'));
    2786. 

  2786.             }
    2787. 

  2787.         }
    2788. 

  2788.         else
    2789. 

  2789.         {
    2790. 

  2790.             print '&nbsp;';
    2791. 

  2791.         }
    2792. 

  2792.         print '</td></tr>';
    2793. 

  2793. 

  2794.         // Conditions de reglement
    2795. 

  2795.         print '<tr><td>';
    2796. 

  2796.         print '<table class="nobordernopadding" width="100%"><tr><td>';
    2797. 

  2797.         print $langs->trans('PaymentConditionsShort');
    2798. 

  2798.         print '</td>';
    2799. 

  2799.         if ($object->type != 2 && $action != 'editconditions' && $object->brouillon && $user->rights->facture->creer) print '<td align="right"><a href="'.$_SERVER["PHP_SELF"].'?action=editconditions&amp;facid='.$object->id.'">'.img_edit($langs->trans('SetConditions'),1).'</a></td>';
    2800. 

  2800.         print '</tr></table>';
    2801. 

  2801.         print '</td><td colspan="3">';
    2802. 

  2802.         if ($object->type != 2)
    2803. 

  2803.         {
    2804. 

  2804.             if ($action == 'editconditions')
    2805. 

  2805.             {
    2806. 

  2806.                 $form->form_conditions_reglement($_SERVER['PHP_SELF'].'?facid='.$object->id,$object->cond_reglement_id,'cond_reglement_id');
    2807. 

  2807.             }
    2808. 

  2808.             else
    2809. 

  2809.             {
    2810. 

  2810.                 $form->form_conditions_reglement($_SERVER['PHP_SELF'].'?facid='.$object->id,$object->cond_reglement_id,'none');
    2811. 

  2811.             }
    2812. 

  2812.         }
    2813. 

  2813.         else
    2814. 

  2814.         {
    2815. 

  2815.             print '&nbsp;';
    2816. 

  2816.         }
    2817. 

  2817.         print '</td></tr>';
    2818. 

  2818. 

  2819.         // Mode de reglement
    2820. 

  2820.         print '<tr><td>';
    2821. 

  2821.         print '<table class="nobordernopadding" width="100%"><tr><td>';
    2822. 

  2822.         print $langs->trans('PaymentMode');
    2823. 

  2823.         print '</td>';
    2824. 

  2824.         if ($action != 'editmode' && $object->brouillon && $user->rights->facture->creer) print '<td align="right"><a href="'.$_SERVER["PHP_SELF"].'?action=editmode&amp;facid='.$object->id.'">'.img_edit($langs->trans('SetMode'),1).'</a></td>';
    2825. 

  2825.         print '</tr></table>';
    2826. 

  2826.         print '</td><td colspan="3">';
    2827. 

  2827.         if ($action == 'editmode')
    2828. 

  2828.         {
    2829. 

  2829.             $form->form_modes_reglement($_SERVER['PHP_SELF'].'?facid='.$object->id,$object->mode_reglement_id,'mode_reglement_id');
    2830. 

  2830.         }
    2831. 

  2831.         else
    2832. 

  2832.         {
    2833. 

  2833.             $form->form_modes_reglement($_SERVER['PHP_SELF'].'?facid='.$object->id,$object->mode_reglement_id,'none');
    2834. 

  2834.         }
    2835. 

  2835.         print '</td></tr>';
    2836. 

  2836. 

  2837.         // Amount
    2838. 

  2838.         print '<tr><td>'.$langs->trans('AmountHT').'</td>';
    2839. 

  2839.         print '<td align="right" colspan="2" nowrap>'.price($object->total_ht).'</td>';
    2840. 

  2840.         print '<td>'.$langs->trans('Currency'.$conf->currency).'</td></tr>';
    2841. 

  2841.         print '<tr><td>'.$langs->trans('AmountVAT').'</td><td align="right" colspan="2" nowrap>'.price($object->total_tva).'</td>';
    2842. 

  2842.         print '<td>'.$langs->trans('Currency'.$conf->currency).'</td>';
    2843. 

  2843. 

  2844. 				print '</tr>';
    2845. 

  2845. 

  2846.         // Amount Local Taxes
    2847. 

  2847.         if ($mysoc->pays_code=='ES')
    2848. 

  2848.         {
    2849. 

  2849.             if ($mysoc->localtax1_assuj=="1") //Localtax1 RE
    2850. 

  2850.             {
    2851. 

  2851.                 print '<tr><td>'.$langs->transcountry("AmountLT1",$mysoc->pays_code).'</td>';
    2852. 

  2852.                 print '<td align="right" colspan="2" nowrap>'.price($object->total_localtax1).'</td>';
    2853. 

  2853.                 print '<td>'.$langs->trans("Currency".$conf->currency).'</td></tr>';
    2854. 

  2854.             }
    2855. 

  2855.             if ($mysoc->localtax2_assuj=="1") //Localtax2 IRPF
    2856. 

  2856.             {
    2857. 

  2857.                 print '<tr><td>'.$langs->transcountry("AmountLT2",$mysoc->pays_code).'</td>';
    2858. 

  2858.                 print '<td align="right" colspan="2" nowrap>'.price($object->total_localtax2).'</td>';
    2859. 

  2859.                 print '<td>'.$langs->trans("Currency".$conf->currency).'</td></tr>';
    2860. 

  2860.             }
    2861. 

  2861.         }
    2862. 

  2862. 

  2863.         print '<tr><td>'.$langs->trans('AmountTTC').'</td><td align="right" colspan="2" nowrap>'.price($object->total_ttc).'</td>';
    2864. 

  2864.         print '<td>'.$langs->trans('Currency'.$conf->currency).'</td></tr>';
    2865. 

  2865. 

  2866.         // Statut
    2867. 

  2867.         print '<tr><td>'.$langs->trans('Status').'</td>';
    2868. 

  2868.         print '<td align="left" colspan="3">'.($object->getLibStatut(4,$totalpaye)).'</td></tr>';
    2869. 

  2869. 

  2870.         // Project
    2871. 

  2871.         if ($conf->projet->enabled)
    2872. 

  2872.         {
    2873. 

  2873.             $langs->load('projects');
    2874. 

  2874.             print '<tr>';
    2875. 

  2875.             print '<td>';
    2876. 

  2876. 

  2877.             print '<table class="nobordernopadding" width="100%"><tr><td>';
    2878. 

  2878.             print $langs->trans('Project');
    2879. 

  2879.             print '</td>';
    2880. 

  2880.             if ($action != 'classify')
    2881. 

  2881.             {
    2882. 

  2882.                 print '<td align="right"><a href="'.$_SERVER["PHP_SELF"].'?action=classify&amp;facid='.$object->id.'">';
    2883. 

  2883.                 print img_edit($langs->trans('SetProject'),1);
    2884. 

  2884.                 print '</a></td>';
    2885. 

  2885.             }
    2886. 

  2886.             print '</tr></table>';
    2887. 

  2887. 

  2888.             print '</td><td colspan="3">';
    2889. 

  2889.             if ($action == 'classify')
    2890. 

  2890.             {
    2891. 

  2891.                 $form->form_project($_SERVER['PHP_SELF'].'?facid='.$object->id,$object->socid,$object->fk_project,'projectid');
    2892. 

  2892.             }
    2893. 

  2893.             else
    2894. 

  2894.             {
    2895. 

  2895.                 $form->form_project($_SERVER['PHP_SELF'].'?facid='.$object->id,$object->socid,$object->fk_project,'none');
    2896. 

  2896.             }
    2897. 

  2897.             print '</td>';
    2898. 

  2898.             print '</tr>';
    2899. 

  2899.         }
    2900. 

  2900. 

  2901.         // Other attributes
    2902. 

  2902.         $parameters=array('colspan' => ' colspan="3"');
    2903. 

  2903.         $reshook=$hookmanager->executeHooks('formObjectOptions',$parameters,$object,$action);    // Note that $action and $object may have been modified by hook
    2904. 

  2904.         if (empty($reshook) && ! empty($extrafields->attribute_label))
    2905. 

  2905.         {
    2906. 

  2906.             foreach($extrafields->attribute_label as $key=>$label)
    2907. 

  2907.             {
    2908. 

  2908.                 $value=(isset($_POST["options_".$key])?$_POST["options_".$key]:$object->array_options["options_".$key]);
    2909. 

  2909.                 print '<tr><td>'.$label.'</td><td colspan="3">';
    2910. 

  2910.                 print $extrafields->showInputField($key,$value);
    2911. 

  2911.                 print '</td></tr>'."\n";
    2912. 

  2912.             }
    2913. 

  2913.         }
    2914. 

  2914. 

  2915.         print '</table><br>';
    2916. 

  2916. 

  2917.         if (! empty($conf->global->MAIN_DISABLE_CONTACTS_TAB))
    2918. 

  2918.         {
    2919. 

  2919.         	require_once(DOL_DOCUMENT_ROOT."/contact/class/contact.class.php");
    2920. 

  2920.         	require_once(DOL_DOCUMENT_ROOT.'/core/class/html.formcompany.class.php');
    2921. 

  2921.         	$formcompany= new FormCompany($db);
    2922. 

  2922. 

  2923.         	$blocname = 'contacts';
    2924. 

  2924.         	$title = $langs->trans('ContactsAddresses');
    2925. 

  2925.         	include(DOL_DOCUMENT_ROOT.'/core/tpl/bloc_showhide.tpl.php');
    2926. 

  2926.         }
    2927. 

  2927. 

  2928.         if (! empty($conf->global->MAIN_DISABLE_NOTES_TAB))
    2929. 

  2929.         {
    2930. 

  2930.         	$blocname = 'notes';
    2931. 

  2931.         	$title = $langs->trans('Notes');
    2932. 

  2932.         	include(DOL_DOCUMENT_ROOT.'/core/tpl/bloc_showhide.tpl.php');
    2933. 

  2933.         }
    2934. 

  2934. 

  2935.         /*
    2936. 

  2936.          * Lines
    2937. 

  2937.          */
    2938. 

  2938.         $result = $object->getLinesArray();
    2939. 

  2939. 

  2940.         if ($conf->use_javascript_ajax && $object->statut == 0)
    2941. 

  2941.         {
    2942. 

  2942.             include(DOL_DOCUMENT_ROOT.'/core/tpl/ajaxrow.tpl.php');
    2943. 

  2943.         }
    2944. 

  2944. 

  2945.         print '<table id="tablelines" class="noborder noshadow" width="100%">';
    2946. 

  2946. 

  2947.         // Show object lines
    2948. 

  2948.         if (! empty($object->lines)) $object->printObjectLines($action,$mysoc,$soc,$lineid,1,$hookmanager);
    2949. 

  2949. 

  2950.         /*
    2951. 

  2951.          * Form to add new line
    2952. 

  2952.          */
    2953. 

  2953.         if ($object->statut == 0 && $user->rights->facture->creer && $action <> 'valid' && $action <> 'editline')
    2954. 

  2954.         {
    2955. 

  2955.             $var=true;
    2956. 

  2956. 

  2957.             $object->formAddFreeProduct(1,$mysoc,$soc,$hookmanager);
    2958. 

  2958. 

  2959.             // Add predefined products/services
    2960. 

  2960.             if ($conf->product->enabled || $conf->service->enabled)
    2961. 

  2961.             {
    2962. 

  2962.                 $var=!$var;
    2963. 

  2963.                 $object->formAddPredefinedProduct(1,$mysoc,$soc,$hookmanager);
    2964. 

  2964.             }
    2965. 

  2965. 

  2966.             $parameters=array();
    2967. 

  2967.             $reshook=$hookmanager->executeHooks('formAddObject',$parameters,$object,$action);    // Note that $action and $object may have been modified by hook
    2968. 

  2968.         }
    2969. 

  2969. 

  2970.         print "</table>\n";
    2971. 

  2971. 

  2972.         print "</div>\n";
    2973. 

  2973. 

  2974. 

  2975.         /*
    2976. 

  2976.          * Boutons actions
    2977. 

  2977.          */
    2978. 

  2978. 

  2979.         if ($action != 'prerelance' && $action != 'presend')
    2980. 

  2980.         {
    2981. 

  2981.             if ($user->societe_id == 0 && $action <> 'valid' && $action <> 'editline')
    2982. 

  2982.             {
    2983. 

  2983.                 print '<div class="tabsAction">';
    2984. 

  2984. 

  2985.                 // Editer une facture deja validee, sans paiement effectue et pas exporte en compta
    2986. 

  2986.                 if ($object->statut == 1)
    2987. 

  2987.                 {
    2988. 

  2988.                     // On verifie si les lignes de factures ont ete exportees en compta et/ou ventilees
    2989. 

  2989.                     $ventilExportCompta = $object->getVentilExportCompta();
    2990. 

  2990. 

  2991.                     if ($resteapayer == $object->total_ttc	&& $object->paye == 0 && $ventilExportCompta == 0)
    2992. 

  2992.                     {
    2993. 

  2993.                         if (! $objectidnext)
    2994. 

  2994.                         {
    2995. 

  2995.                             if ((empty($conf->global->MAIN_USE_ADVANCED_PERMS) && $user->rights->facture->valider) || $user->rights->facture->invoice_advance->unvalidate)
    2996. 

  2996.                             {
    2997. 

  2997.                                 print '<a class="butAction" href="'.$_SERVER['PHP_SELF'].'?facid='.$object->id.'&amp;action=modif">'.$langs->trans('Modify').'</a>';
    2998. 

  2998.                             }
    2999. 

  2999.                             else
    3000. 

  3000.                             {
    3001. 

  3001.                                 print '<span class="butActionRefused" title="'.$langs->trans("NotEnoughPermissions").'">'.$langs->trans('Modify').'</span>';
    3002. 

  3002.                             }
    3003. 

  3003.                         }
    3004. 

  3004.                         else
    3005. 

  3005.                         {
    3006. 

  3006.                             print '<span class="butActionRefused" title="'.$langs->trans("DisabledBecauseReplacedInvoice").'">'.$langs->trans('Modify').'</span>';
    3007. 

  3007.                         }
    3008. 

  3008.                     }
    3009. 

  3009.                 }
    3010. 

  3010. 

  3011.                 // Reopen a standard paid invoice
    3012. 

  3012.                 if (($object->type == 0 || $object->type == 1) && ($object->statut == 2 || $object->statut == 3))				// A paid invoice (partially or completely)
    3013. 

  3013.                 {
    3014. 

  3014.                     if (! $objectidnext && $object->close_code != 'replaced')	// Not replaced by another invoice
    3015. 

  3015.                     {
    3016. 

  3016.                         print '<a class="butAction" href="'.$_SERVER['PHP_SELF'].'?facid='.$object->id.'&amp;action=reopen">'.$langs->trans('ReOpen').'</a>';
    3017. 

  3017.                     }
    3018. 

  3018.                     else
    3019. 

  3019.                     {
    3020. 

  3020.                         print '<span class="butActionRefused" title="'.$langs->trans("DisabledBecauseReplacedInvoice").'">'.$langs->trans('ReOpen').'</span>';
    3021. 

  3021.                     }
    3022. 

  3022.                 }
    3023. 

  3023. 

  3024.                 // Validate
    3025. 

  3025.                 if ($object->statut == 0 && count($object->lines) > 0 &&
    3026. 

  3026.                 (
    3027. 

  3027.                 (($object->type == 0 || $object->type == 1 || $object->type == 3 || $object->type == 4) && (! empty($conf->global->FACTURE_ENABLE_NEGATIVE) || $object->total_ttc >= 0))
    3028. 

  3028.                 || ($object->type == 2 && $object->total_ttc <= 0))
    3029. 

  3029.                 )
    3030. 

  3030.                 {
    3031. 

  3031.                     if ($user->rights->facture->valider)
    3032. 

  3032.                     {
    3033. 

  3033.                         print '<a class="butAction" href="'.$_SERVER["PHP_SELF"].'?facid='.$object->id.'&amp;action=valid">'.$langs->trans('Validate').'</a>';
    3034. 

  3034.                     }
    3035. 

  3035.                 }
    3036. 

  3036. 

  3037.                 // Send by mail
    3038. 

  3038.                 if (($object->statut == 1 || $object->statut == 2))
    3039. 

  3039.                 {
    3040. 

  3040.                     if ($objectidnext)
    3041. 

  3041.                     {
    3042. 

  3042.                         print '<span class="butActionRefused" title="'.$langs->trans("DisabledBecauseReplacedInvoice").'">'.$langs->trans('SendByMail').'</span>';
    3043. 

  3043.                     }
    3044. 

  3044.                     else
    3045. 

  3045.                     {
    3046. 

  3046.                         if (empty($conf->global->MAIN_USE_ADVANCED_PERMS) || $user->rights->facture->invoice_advance->send)
    3047. 

  3047.                         {
    3048. 

  3048.                             print '<a class="butAction" href="'.$_SERVER['PHP_SELF'].'?facid='.$object->id.'&amp;action=presend&amp;mode=init">'.$langs->trans('SendByMail').'</a>';
    3049. 

  3049.                         }
    3050. 

  3050.                         else print '<a class="butActionRefused" href="#">'.$langs->trans('SendByMail').'</a>';
    3051. 

  3051.                     }
    3052. 

  3052.                 }
    3053. 

  3053. 

  3054.                 if (! empty($conf->global->FACTURE_SHOW_SEND_REMINDER))	// For backward compatibility
    3055. 

  3055.                 {
    3056. 

  3056.                     if (($object->statut == 1 || $object->statut == 2) && $resteapayer > 0)
    3057. 

  3057.                     {
    3058. 

  3058.                         if ($objectidnext)
    3059. 

  3059.                         {
    3060. 

  3060.                             print '<span class="butActionRefused" title="'.$langs->trans("DisabledBecauseReplacedInvoice").'">'.$langs->trans('SendRemindByMail').'</span>';
    3061. 

  3061.                         }
    3062. 

  3062.                         else
    3063. 

  3063.                         {
    3064. 

  3064.                             if (empty($conf->global->MAIN_USE_ADVANCED_PERMS) || $user->rights->facture->invoice_advance->send)
    3065. 

  3065.                             {
    3066. 

  3066.                                 print '<a class="butAction" href="'.$_SERVER['PHP_SELF'].'?facid='.$object->id.'&amp;action=prerelance&amp;mode=init">'.$langs->trans('SendRemindByMail').'</a>';
    3067. 

  3067.                             }
    3068. 

  3068.                             else print '<a class="butActionRefused" href="#">'.$langs->trans('SendRemindByMail').'</a>';
    3069. 

  3069.                         }
    3070. 

  3070.                     }
    3071. 

  3071.                 }
    3072. 

  3072. 

  3073.                 // Create payment
    3074. 

  3074.                 if ($object->type != 2 && $object->statut == 1 && $object->paye == 0 && $user->rights->facture->paiement)
    3075. 

  3075.                 {
    3076. 

  3076.                     if ($objectidnext)
    3077. 

  3077.                     {
    3078. 

  3078.                         print '<span class="butActionRefused" title="'.$langs->trans("DisabledBecauseReplacedInvoice").'">'.$langs->trans('DoPayment').'</span>';
    3079. 

  3079.                     }
    3080. 

  3080.                     else
    3081. 

  3081.                     {
    3082. 

  3082.                         if ($resteapayer == 0)
    3083. 

  3083.                         {
    3084. 

  3084.                             print '<span class="butActionRefused" title="'.$langs->trans("DisabledBecauseRemainderToPayIsZero").'">'.$langs->trans('DoPayment').'</span>';
    3085. 

  3085.                         }
    3086. 

  3086.                         else
    3087. 

  3087.                         {
    3088. 

  3088.                             print '<a class="butAction" href="paiement.php?facid='.$object->id.'&amp;action=create">'.$langs->trans('DoPayment').'</a>';
    3089. 

  3089.                         }
    3090. 

  3090.                     }
    3091. 

  3091.                 }
    3092. 

  3092. 

  3093.                 // Reverse back money or convert to reduction
    3094. 

  3094.                 if ($object->type == 2 || $object->type == 3)
    3095. 

  3095.                 {
    3096. 

  3096.                     // For credit note only
    3097. 

  3097.                     if ($object->type == 2 && $object->statut == 1 && $object->paye == 0 && $user->rights->facture->paiement)
    3098. 

  3098.                     {
    3099. 

  3099.                         print '<a class="butAction" href="paiement.php?facid='.$object->id.'&amp;action=create">'.$langs->trans('DoPaymentBack').'</a>';
    3100. 

  3100.                     }
    3101. 

  3101.                     // For credit note
    3102. 

  3102.                     if ($object->type == 2 && $object->statut == 1 && $object->paye == 0 && $user->rights->facture->creer && $object->getSommePaiement() == 0)
    3103. 

  3103.                     {
    3104. 

  3104.                         print '<a class="butAction" href="'.$_SERVER["PHP_SELF"].'?facid='.$object->id.'&amp;action=converttoreduc">'.$langs->trans('ConvertToReduc').'</a>';
    3105. 

  3105.                     }
    3106. 

  3106.                     // For deposit invoice
    3107. 

  3107.                     if ($object->type == 3 && $object->statut == 1 && $resteapayer == 0 && $user->rights->facture->creer)
    3108. 

  3108.                     {
    3109. 

  3109.                         print '<a class="butAction" href="'.$_SERVER["PHP_SELF"].'?facid='.$object->id.'&amp;action=converttoreduc">'.$langs->trans('ConvertToReduc').'</a>';
    3110. 

  3110.                     }
    3111. 

  3111.                 }
    3112. 

  3112. 

  3113.                 // Classify paid (if not deposit and not credit note. Such invoice are "converted")
    3114. 

  3114.                 if ($object->statut == 1 && $object->paye == 0 && $user->rights->facture->paiement &&
    3115. 

  3115.                 (($object->type != 2 && $object->type != 3 && $resteapayer <= 0) || ($object->type == 2 && $resteapayer >= 0)) )
    3116. 

  3116.                 {
    3117. 

  3117.                     print '<a class="butAction" href="'.$_SERVER['PHP_SELF'].'?facid='.$object->id.'&amp;action=paid">'.$langs->trans('ClassifyPaid').'</a>';
    3118. 

  3118.                 }
    3119. 

  3119. 

  3120.                 // Classify 'closed not completely paid' (possible si validee et pas encore classee payee)
    3121. 

  3121.                 if ($object->statut == 1 && $object->paye == 0 && $resteapayer > 0
    3122. 

  3122.                 && $user->rights->facture->paiement)
    3123. 

  3123.                 {
    3124. 

  3124.                     if ($totalpaye > 0 || $totalcreditnotes > 0)
    3125. 

  3125.                     {
    3126. 

  3126.                         // If one payment or one credit note was linked to this invoice
    3127. 

  3127.                         print '<a class="butAction" href="'.$_SERVER['PHP_SELF'].'?facid='.$object->id.'&amp;action=paid">'.$langs->trans('ClassifyPaidPartially').'</a>';
    3128. 

  3128.                     }
    3129. 

  3129.                     else
    3130. 

  3130.                     {
    3131. 

  3131.                         if ($objectidnext)
    3132. 

  3132.                         {
    3133. 

  3133.                             print '<span class="butActionRefused" title="'.$langs->trans("DisabledBecauseReplacedInvoice").'">'.$langs->trans('ClassifyCanceled').'</span>';
    3134. 

  3134.                         }
    3135. 

  3135.                         else
    3136. 

  3136.                         {
    3137. 

  3137.                             print '<a class="butAction" href="'.$_SERVER['PHP_SELF'].'?facid='.$object->id.'&amp;action=canceled">'.$langs->trans('ClassifyCanceled').'</a>';
    3138. 

  3138.                         }
    3139. 

  3139.                     }
    3140. 

  3140.                 }
    3141. 

  3141. 

  3142.                 // Clone
    3143. 

  3143.                 if (($object->type == 0 || $object->type == 3 || $object->type == 4) && $user->rights->facture->creer)
    3144. 

  3144.                 {
    3145. 

  3145.                     print '<a class="butAction" href="'.$_SERVER['PHP_SELF'].'?facid='.$object->id.'&amp;action=clone&amp;object=invoice">'.$langs->trans("ToClone").'</a>';
    3146. 

  3146.                 }
    3147. 

  3147. 

  3148.                 // Clone as predefined
    3149. 

  3149.                 if (($object->type == 0 || $object->type == 3 || $object->type == 4) && $object->statut == 0 && $user->rights->facture->creer)
    3150. 

  3150.                 {
    3151. 

  3151.                     if (! $objectidnext)
    3152. 

  3152.                     {
    3153. 

  3153.                         print '<a class="butAction" href="facture/fiche-rec.php?facid='.$object->id.'&amp;action=create">'.$langs->trans("ChangeIntoRepeatableInvoice").'</a>';
    3154. 

  3154.                     }
    3155. 

  3155.                 }
    3156. 

  3156. 

  3157.                 // Delete
    3158. 

  3158.                 if ($user->rights->facture->supprimer)
    3159. 

  3159.                 {
    3160. 

  3160.                     if (! $object->is_erasable())
    3161. 

  3161.                     {
    3162. 

  3162.                         print '<a class="butActionRefused" href="#" title="'.$langs->trans("DisabledBecauseNotErasable").'">'.$langs->trans('Delete').'</a>';
    3163. 

  3163.                     }
    3164. 

  3164.                     else if ($objectidnext)
    3165. 

  3165.                     {
    3166. 

  3166.                         print '<a class="butActionRefused" href="#" title="'.$langs->trans("DisabledBecauseReplacedInvoice").'">'.$langs->trans('Delete').'</a>';
    3167. 

  3167.                     }
    3168. 

  3168.                     elseif ($object->getSommePaiement())
    3169. 

  3169.                     {
    3170. 

  3170.                         print '<a class="butActionRefused" href="#" title="'.$langs->trans("DisabledBecausePayments").'">'.$langs->trans('Delete').'</a>';
    3171. 

  3171.                     }
    3172. 

  3172.                     else
    3173. 

  3173.                     {
    3174. 

  3174.                         print '<a class="butActionDelete" href="'.$_SERVER["PHP_SELF"].'?facid='.$object->id.'&amp;action=delete">'.$langs->trans('Delete').'</a>';
    3175. 

  3175.                     }
    3176. 

  3176.                 }
    3177. 

  3177.                 else
    3178. 

  3178.                 {
    3179. 

  3179.                     print '<a class="butActionRefused" href="#" title="'.$langs->trans("NotAllowed").'">'.$langs->trans('Delete').'</a>';
    3180. 

  3180.                 }
    3181. 

  3181. 

  3182.                 print '</div>';
    3183. 

  3183.             }
    3184. 

  3184.         }
    3185. 

  3185. 

  3186. 

  3187.         if ($action != 'prerelance' && $action != 'presend')
    3188. 

  3188.         {
    3189. 

  3189.             print '<table width="100%"><tr><td width="50%" valign="top">';
    3190. 

  3190.             print '<a name="builddoc"></a>'; // ancre
    3191. 

  3191. 

  3192.             /*
    3193. 

  3193.              * Documents generes
    3194. 

  3194.              */
    3195. 

  3195.             $filename=dol_sanitizeFileName($object->ref);
    3196. 

  3196.             $filedir=$conf->facture->dir_output . '/' . dol_sanitizeFileName($object->ref);
    3197. 

  3197.             $urlsource=$_SERVER['PHP_SELF'].'?facid='.$object->id;
    3198. 

  3198.             $genallowed=$user->rights->facture->creer;
    3199. 

  3199.             $delallowed=$user->rights->facture->supprimer;
    3200. 

  3200. 

  3201.             print '<br>';
    3202. 

  3202.             print $formfile->showdocuments('facture',$filename,$filedir,$urlsource,$genallowed,$delallowed,$object->modelpdf,1,0,0,28,0,'','','',$soc->default_lang,$hookmanager);
    3203. 

  3203.             $somethingshown=$formfile->numoffiles;
    3204. 

  3204. 

  3205.             /*
    3206. 

  3206.              * Linked object block
    3207. 

  3207.              */
    3208. 

  3208.             $somethingshown=$object->showLinkedObjectBlock();
    3209. 

  3209. 

  3210.             // Link for paypal payment
    3211. 

  3211.             if ($conf->paypal->enabled && $object->statut != 0)
    3212. 

  3212.             {
    3213. 

  3213.                 include_once(DOL_DOCUMENT_ROOT.'/paypal/lib/paypal.lib.php');
    3214. 

  3214.                 print showPaypalPaymentUrl('invoice',$object->ref);
    3215. 

  3215.             }
    3216. 

  3216. 

  3217.             print '</td><td valign="top" width="50%">';
    3218. 

  3218. 

  3219.             print '<br>';
    3220. 

  3220. 

  3221.             // List of actions on element
    3222. 

  3222.             include_once(DOL_DOCUMENT_ROOT.'/core/class/html.formactions.class.php');
    3223. 

  3223.             $formactions=new FormActions($db);
    3224. 

  3224.             $somethingshown=$formactions->showactions($object,'invoice',$socid);
    3225. 

  3225. 

  3226.             print '</td></tr></table>';
    3227. 

  3227.         }
    3228. 

  3228.         else
    3229. 

  3229.         {
    3230. 

  3230.             /*
    3231. 

  3231.              * Affiche formulaire mail
    3232. 

  3232.              */
    3233. 

  3233. 

  3234.             // By default if $action=='presend'
    3235. 

  3235.             $titreform='SendBillByMail';
    3236. 

  3236.             $topicmail='SendBillRef';
    3237. 

  3237.             $action='send';
    3238. 

  3238.             $modelmail='facture_send';
    3239. 

  3239. 

  3240.             if ($action == 'prerelance')	// For backward compatibility
    3241. 

  3241.             {
    3242. 

  3242.                 $titrefrom='SendReminderBillByMail';
    3243. 

  3243.                 $topicmail='SendReminderBillRef';
    3244. 

  3244.                 $action='relance';
    3245. 

  3245.                 $modelmail='facture_relance';
    3246. 

  3246.             }
    3247. 

  3247. 

  3248.             $ref = dol_sanitizeFileName($object->ref);
    3249. 

  3249.             include_once(DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php');
    3250. 

  3250.             $fileparams = dol_most_recent_file($conf->facture->dir_output . '/' . $ref);
    3251. 

  3251.             $file=$fileparams['fullname'];
    3252. 

  3252. 

  3253.             // Build document if it not exists
    3254. 

  3254.             if (! $file || ! is_readable($file))
    3255. 

  3255.             {
    3256. 

  3256.                 // Define output language
    3257. 

  3257.                 $outputlangs = $langs;
    3258. 

  3258.                 $newlang='';
    3259. 

  3259.                 if ($conf->global->MAIN_MULTILANGS && empty($newlang) && ! empty($_REQUEST['lang_id'])) $newlang=$_REQUEST['lang_id'];
    3260. 

  3260.                 if ($conf->global->MAIN_MULTILANGS && empty($newlang)) $newlang=$object->client->default_lang;
    3261. 

  3261.                 if (! empty($newlang))
    3262. 

  3262.                 {
    3263. 

  3263.                     $outputlangs = new Translate("",$conf);
    3264. 

  3264.                     $outputlangs->setDefaultLang($newlang);
    3265. 

  3265.                 }
    3266. 

  3266. 

  3267.                 $result=facture_pdf_create($db, $object, GETPOST('model')?GETPOST('model'):$object->modelpdf, $outputlangs, $hidedetails, $hidedesc, $hideref, $hookmanager);
    3268. 

  3268.                 if ($result <= 0)
    3269. 

  3269.                 {
    3270. 

  3270.                     dol_print_error($db,$result);
    3271. 

  3271.                     exit;
    3272. 

  3272.                 }
    3273. 

  3273.                 $fileparams = dol_most_recent_file($conf->facture->dir_output . '/' . $ref);
    3274. 

  3274.                 $file=$fileparams['fullname'];
    3275. 

  3275.             }
    3276. 

  3276. 

  3277.             print '<br>';
    3278. 

  3278.             print_titre($langs->trans($titreform));
    3279. 

  3279. 

  3280.             // Cree l'objet formulaire mail
    3281. 

  3281.             include_once(DOL_DOCUMENT_ROOT.'/core/class/html.formmail.class.php');
    3282. 

  3282.             $formmail = new FormMail($db);
    3283. 

  3283.             $formmail->fromtype = 'user';
    3284. 

  3284.             $formmail->fromid   = $user->id;
    3285. 

  3285.             $formmail->fromname = $user->getFullName($langs);
    3286. 

  3286.             $formmail->frommail = $user->email;
    3287. 

  3287.             $formmail->withfrom=1;
    3288. 

  3288.             $formmail->withto=empty($_POST["sendto"])?1:$_POST["sendto"];
    3289. 

  3289.             $formmail->withtosocid=$soc->id;
    3290. 

  3290.             $formmail->withtocc=1;
    3291. 

  3291.             $formmail->withtoccsocid=0;
    3292. 

  3292.             $formmail->withtoccc=$conf->global->MAIN_EMAIL_USECCC;
    3293. 

  3293.             $formmail->withtocccsocid=0;
    3294. 

  3294.             $formmail->withtopic=$langs->transnoentities($topicmail,'__FACREF__');
    3295. 

  3295.             $formmail->withfile=2;
    3296. 

  3296.             $formmail->withbody=1;
    3297. 

  3297.             $formmail->withdeliveryreceipt=1;
    3298. 

  3298.             $formmail->withcancel=1;
    3299. 

  3299.             // Tableau des substitutions
    3300. 

  3300.             $formmail->substit['__FACREF__']=$object->ref;
    3301. 

  3301.             $formmail->substit['__SIGNATURE__']=$user->signature;
    3302. 

  3302.             $formmail->substit['__PERSONALIZED__']='';
    3303. 

  3303.             // Tableau des parametres complementaires du post
    3304. 

  3304.             $formmail->param['action']=$action;
    3305. 

  3305.             $formmail->param['models']=$modelmail;
    3306. 

  3306.             $formmail->param['facid']=$object->id;
    3307. 

  3307.             $formmail->param['returnurl']=$_SERVER["PHP_SELF"].'?id='.$object->id;
    3308. 

  3308. 

  3309.             // Init list of files
    3310. 

  3310.             if (GETPOST("mode")=='init')
    3311. 

  3311.             {
    3312. 

  3312.                 $formmail->clear_attached_files();
    3313. 

  3313.                 $formmail->add_attached_files($file,basename($file),dol_mimetype($file));
    3314. 

  3314.             }
    3315. 

  3315. 

  3316.             $formmail->show_form();
    3317. 

  3317. 

  3318.             print '<br>';
    3319. 

  3319.         }
    3320. 

  3320.     }
    3321. 

  3321.     else
    3322. 

  3322.     {
    3323. 

  3323.         dol_print_error($db,$object->error);
    3324. 

  3324.     }
    3325. 

  3325. }
    3326. 

  3326. 

  3327. dol_htmloutput_mesg('',$mesgs);
    3328. 

  3328. 

  3329. llxFooter();
    3330. 

  3330. $db->close();
    3331. 

  3331. ?>
    3332.