33 require
'../../main.inc.php';
34 require_once DOL_DOCUMENT_ROOT .
'/fourn/class/fournisseur.facture-rec.class.php';
35 require_once DOL_DOCUMENT_ROOT .
'/fourn/class/fournisseur.product.class.php';
36 require_once DOL_DOCUMENT_ROOT .
'/product/class/product.class.php';
37 require_once DOL_DOCUMENT_ROOT .
'/core/class/html.formother.class.php';
38 if (! empty($conf->project->enabled)) {
39 include_once DOL_DOCUMENT_ROOT .
'/projet/class/project.class.php';
41 require_once DOL_DOCUMENT_ROOT .
'/core/class/html.formprojet.class.php';
42 require_once DOL_DOCUMENT_ROOT .
'/core/class/doleditor.class.php';
43 require_once DOL_DOCUMENT_ROOT .
'/core/lib/invoice.lib.php';
44 require_once DOL_DOCUMENT_ROOT .
'/core/class/extrafields.class.php';
47 $langs->loadLangs(array(
'bills',
'companies',
'compta',
'admin',
'other',
'products',
'banks',
'suppliers'));
49 $action =
GETPOST(
'action',
'alpha');
50 $massaction =
GETPOST(
'massaction',
'alpha');
51 $show_files =
GETPOST(
'show_files',
'int');
52 $confirm =
GETPOST(
'confirm',
'alpha');
53 $cancel =
GETPOST(
'cancel',
'alpha');
54 $toselect =
GETPOST(
'toselect',
'array');
55 $contextpage =
GETPOST(
'contextpage',
'aZ') ?
GETPOST(
'contextpage',
'aZ') :
'supplierinvoicetemplatelist';
57 $limit =
GETPOST(
'limit',
'int') ?
GETPOST(
'limit',
'int') : $conf->liste_limit;
58 $sortfield =
GETPOST(
"sortfield",
'alpha');
59 $sortorder =
GETPOST(
"sortorder",
'alpha');
64 $lineid =
GETPOST(
'lineid',
'int');
65 $title =
GETPOST(
'title',
'alpha');
66 $libelle =
GETPOST(
'libelle',
'alpha');
67 $ref_supplier =
GETPOST(
'ref_supplier',
'alpha');
68 $projectid =
GETPOST(
'projectid',
'int');
69 $year_date_when =
GETPOST(
'year_date_when');
70 $month_date_when =
GETPOST(
'month_date_when');
72 $socid = $user->socid;
74 $objecttype =
'facturefournisseur_rec';
75 if ($action ==
"create" || $action ==
"add") {
79 if (empty($page) || $page == -1) {
82 $offset = $limit * $page;
87 $sortfield =
'f.titre';
89 $pageprev = $page - 1;
90 $pagenext = $page + 1;
93 if (($id > 0 || $title) && $action !=
'create' && $action !=
'add') {
94 $ret = $object->fetch($id, $title);
101 $hookmanager->initHooks(array(
'supplierinvoicereccard',
'globalcard'));
105 $extrafields->fetch_name_optionals_label($object->table_element);
107 $search_array_options = $extrafields->getOptionalsFromPost($object->table_element,
'',
'search_');
109 $permissionnote = $user->rights->fournisseur->facture->creer || $user->rights->supplier_invoice->creer;
110 $permissiondellink = $user->rights->fournisseur->facture->creer || $user->rights->supplier_invoice->creer;;
111 $permissiontoedit = $user->rights->fournisseur->facture->creer || $user->rights->supplier_invoice->creer;;
113 $usercanread = $user->rights->fournisseur->facture->lire || $user->rights->supplier_invoice->lire;
114 $usercancreate = $user->rights->fournisseur->facture->creer || $user->rights->supplier_invoice->creer;
115 $usercandelete = $user->rights->fournisseur->facture->supprimer || $user->rights->supplier_invoice->supprimer;
116 $usercanvalidate = ((empty($conf->global->MAIN_USE_ADVANCED_PERMS) && ! empty($usercancreate)) || (! empty($conf->global->MAIN_USE_ADVANCED_PERMS) && ! empty($user->rights->fournisseur->supplier_invoice_advance->validate)));
117 $usercansend = (empty($conf->global->MAIN_USE_ADVANCED_PERMS) || $user->rights->fournisseur->supplier_invoice_advance->send);
119 $usercanproductignorepricemin = ((! empty($conf->global->MAIN_USE_ADVANCED_PERMS) && empty($user->rights->produit->ignore_price_min_advance)) || empty($conf->global->MAIN_USE_ADVANCED_PERMS));
120 $usercancreatemargin = $user->rights->margins->creer;
121 $usercanreadallmargin = $user->rights->margins->liretous;
122 $usercancreatewithdrarequest = $user->rights->prelevement->bons->creer;
128 $result =
restrictedArea($user,
'facture', $object->id, $objecttype);
134 if (
GETPOST(
'cancel',
'alpha')) {
138 if (!
GETPOST(
'confirmmassaction',
'alpha') && $massaction !=
'presend' && $massaction !=
'confirm_presend') {
142 $parameters = array(
'socid' => $socid);
143 $reshook = $hookmanager->executeHooks(
'doActions', $parameters, $object, $action);
148 if (empty($reshook)) {
149 if (
GETPOST(
'cancel',
'alpha')) {
154 include DOL_DOCUMENT_ROOT .
'/core/actions_changeselectedfields.inc.php';
157 include DOL_DOCUMENT_ROOT .
'/core/actions_setnotes.inc.php';
159 include DOL_DOCUMENT_ROOT .
'/core/actions_dellink.inc.php';
161 include DOL_DOCUMENT_ROOT .
'/core/actions_lineupdown.inc.php';
164 if ($action ==
'add') {
165 if (!
GETPOST(
'title',
'alphanohtml')) {
166 setEventMessages($langs->transnoentities(
"ErrorFieldRequired", $langs->trans(
"Title")),
null,
'errors');
171 $frequency =
GETPOST(
'frequency',
'int');
172 $reyear =
GETPOST(
'reyear',
'int');
173 $remonth =
GETPOST(
'remonth',
'int');
174 $reday =
GETPOST(
'reday',
'int');
175 $rehour =
GETPOST(
'rehour',
'int');
176 $remin =
GETPOST(
'remin',
'int');
177 $nb_gen_max =
GETPOST(
'nb_gen_max',
'int');
180 if (
GETPOST(
'frequency',
'int')) {
181 if (empty($reyear) || empty($remonth) || empty($reday)) {
182 setEventMessages($langs->transnoentities(
"ErrorFieldRequired", $langs->trans(
"Date")),
null,
'errors');
189 $object->titre =
GETPOST(
'title',
'alphanohtml');
190 $object->title =
GETPOST(
'title',
'alphanohtml');
191 $object->libelle =
GETPOST(
'libelle',
'alpha');
192 $object->fk_project =
GETPOST(
'projectid',
'int');
193 $object->ref_supplier =
GETPOST(
'ref_supplier',
'alphanohtml');
195 $object->note_private =
GETPOST(
'note_private',
'restricthtml');
196 $object->note_public =
GETPOST(
'note_public',
'restricthtml');
197 $object->model_pdf =
GETPOST(
'modelpdf',
'alpha');
198 $object->usenewprice =
GETPOST(
'usenewprice',
'alpha');
200 $object->frequency = $frequency;
201 $object->unit_frequency =
GETPOST(
'unit_frequency',
'alpha');
202 $object->nb_gen_max = $nb_gen_max;
203 $object->auto_validate =
GETPOST(
'auto_validate',
'int');
204 $object->generate_pdf =
GETPOST(
'generate_pdf',
'int');
206 $date_next_execution =
dol_mktime($rehour, $remin, 0, $remonth, $reday, $reyear);
207 $object->date_when = $date_next_execution;
212 $oldinvoice->fetch(
GETPOST(
'facid',
'int'));
214 $object->cond_reglement_id = $oldinvoice->cond_reglement_id;
215 $object->cond_reglement_code = $oldinvoice->cond_reglement_code;
216 $object->cond_reglement_label = $oldinvoice->cond_reglement_label;
217 $object->cond_reglement_doc = $oldinvoice->cond_reglement_doc;
218 $object->mode_reglement_id = $oldinvoice->mode_reglement_id;
219 $object->mode_reglement_code = $oldinvoice->mode_reglement_code;
221 $result = $object->create($user, $oldinvoice->id);
223 $result = $oldinvoice->delete($user, 1);
238 header(
"Location: " . $_SERVER[
'PHP_SELF'] .
'?facid=' . $object->id);
252 if ($action ==
'confirm_deleteinvoice' && $confirm ==
'yes' && ($user->rights->fournisseur->facture->supprimer || $user->rights->supplier_invoice->supprimer)) {
253 $object->delete($user);
255 header(
'Location: ' . DOL_URL_ROOT .
'/fourn/facture/list-rec.php');
261 if ($action ==
'setconditions' && $usercancreate) {
262 $result = $object->setPaymentTerms(
GETPOST(
'cond_reglement_id',
'int'));
263 } elseif ($action ==
'setmode' && $usercancreate) {
265 $result = $object->setPaymentMethods(
GETPOST(
'mode_reglement_id',
'int'));
266 } elseif ($action ==
'classin' && $usercancreate) {
268 $object->setProject(
GETPOST(
'projectid',
'int'));
269 } elseif ($action ==
'setref_supplier' && $usercancreate) {
270 $result = $object->setValueFrom(
'ref_supplier', $ref_supplier,
'',
null,
'text',
'', $user);
274 if ($object->error ==
'DB_ERROR_RECORD_ALREADY_EXISTS') {
275 $langs->load(
"errors");
276 setEventMessages($langs->trans(
'ErrorRefAlreadyExists', $ref_supplier),
null,
'errors');
281 } elseif ($action ==
'settitle' && $usercancreate) {
282 $result = $object->setValueFrom(
'titre', $title,
'',
null,
'text',
'', $user);
285 $object->titre = $title;
286 $object->title = $title;
287 $object->ref = $object->title;
290 if ($object->error ==
'DB_ERROR_RECORD_ALREADY_EXISTS') {
291 $langs->load(
"errors");
292 setEventMessages($langs->trans(
'ErrorTitreAlreadyExists', $title),
null,
'errors');
297 } elseif ($action ==
'setbankaccount' && $usercancreate) {
299 $result = $object->setBankAccount(
GETPOST(
'fk_account',
'int'));
300 } elseif ($action ==
'setfrequency' && $usercancreate) {
302 $object->setFrequencyAndUnit(
GETPOST(
'frequency',
'int'),
GETPOST(
'unit_frequency',
'alpha'));
303 } elseif ($action ==
'setdate_when' && $usercancreate) {
306 if (! empty($date)) {
307 $object->setNextDate($date);
309 } elseif ($action ==
'setnb_gen_max' && $usercancreate) {
311 $object->setMaxPeriod(
GETPOST(
'nb_gen_max',
'int'));
312 } elseif ($action ==
'setauto_validate' && $usercancreate) {
314 $object->setAutoValidate(
GETPOST(
'auto_validate',
'int'));
315 } elseif ($action ==
'setgenerate_pdf' && $usercancreate) {
317 $object->setGeneratepdf(
GETPOST(
'generate_pdf',
'int'));
318 } elseif ($action ==
'setmodelpdf' && $usercancreate) {
320 $object->setModelpdf(
GETPOST(
'modelpdf',
'alpha'));
321 } elseif ($action ==
'disable' && $usercancreate) {
327 $res = $object->setValueFrom(
'suspended', 1);
338 } elseif ($action ==
'enable' && $usercancreate) {
344 $res = $object->setValueFrom(
'suspended', 0);
355 } elseif ($action ==
'setmulticurrencycode' && $usercancreate) {
357 $result = $object->setMulticurrencyCode(
GETPOST(
'multicurrency_code',
'alpha'));
358 } elseif ($action ==
'setmulticurrencyrate' && $usercancreate) {
360 $result = $object->setMulticurrencyRate(
price2num(
GETPOST(
'multicurrency_tx')),
GETPOST(
'calculation_mode',
'int'));
361 } elseif ($action ==
'setlibelle' && $usercancreate) {
364 $object->libelle =
GETPOST(
'libelle');
365 $result = $object->update($user);
373 if ($action ==
'confirm_deleteline' && $confirm ==
'yes' && $usercancreate) {
375 $object->fetch_thirdparty();
384 if ($line->delete($user) > 0) {
385 $result = $object->update_price(1);
389 $object->fetch($object->id);
398 } elseif ($action ==
'update_extras') {
402 $ret = $extrafields->setOptionalsFromPost(
null, $object,
GETPOST(
'attribute',
'restricthtml'));
408 $result = $object->insertExtraFields(
'BILLREC_MODIFY');
417 if ($action ==
'addline' && $usercancreate) {
418 $langs->load(
'errors');
426 $prod_entry_mode =
GETPOST(
'prod_entry_mode',
'alpha');
427 if ($prod_entry_mode ==
'free') {
429 $tva_tx = (
GETPOST(
'tva_tx',
'alpha') ?
GETPOST(
'tva_tx',
'alpha') : 0);
430 $ref_fournisseur = (
GETPOSTISSET(
'fourn_ref') ?
GETPOST(
'fourn_ref',
'restricthtml') :
'');
432 $idprod =
GETPOST(
'idprod',
'int');
440 $extralabelsline = $extrafields->fetch_name_optionals_label($object->table_element_line);
441 $array_options = $extrafields->getOptionalsFromPost($object->table_element_line, $predef);
443 if (is_array($extralabelsline)) {
445 foreach ($extralabelsline as $key => $value) {
446 unset($_POST[
"options_" . $key . $predef]);
450 if ((empty($idprod) || $idprod < 0) && ($price_ht < 0) && ($qty < 0)) {
451 setEventMessages($langs->trans(
'ErrorBothFieldCantBeNegative', $langs->transnoentitiesnoconv(
'UnitPriceHT'), $langs->transnoentitiesnoconv(
'Qty')),
null,
'errors');
454 if ($prod_entry_mode ==
'free' && (empty($idprod) || $idprod < 0) &&
GETPOST(
'type') < 0) {
455 setEventMessages($langs->trans(
'ErrorFieldRequired', $langs->transnoentitiesnoconv(
'Type')),
null,
'errors');
458 if ($prod_entry_mode ==
'free' && (empty($idprod) || $idprod < 0) && (! ($price_ht >= 0) || $price_ht ==
'')) {
459 setEventMessages($langs->trans(
"ErrorFieldRequired", $langs->transnoentitiesnoconv(
"UnitPriceHT")),
null,
'errors');
463 setEventMessages($langs->trans(
'ErrorFieldRequired', $langs->transnoentitiesnoconv(
'Qty')),
null,
'errors');
466 if ($prod_entry_mode ==
'free' && (empty($idprod) || $idprod < 0) && empty($product_desc)) {
467 setEventMessages($langs->trans(
'ErrorFieldRequired', $langs->transnoentitiesnoconv(
'Description')),
null,
'errors');
471 $langs->load(
"errors");
472 setEventMessages($langs->trans(
'ErrorQtyForCustomerInvoiceCantBeNegative'),
null,
'errors');
476 if ($prod_entry_mode !=
'free' && empty($error)) {
480 if (
GETPOST(
'idprodfournprice',
'alpha') == -1 ||
GETPOST(
'idprodfournprice',
'alpha') ==
'') {
484 if (preg_match(
'/^idprod_([0-9]+)$/',
GETPOST(
'idprodfournprice',
'alpha'), $reg)) {
485 $idprod = (int) $reg[1];
486 $res = $productsupplier->fetch($idprod);
489 if (! empty($conf->global->SUPPLIER_TAKE_FIRST_PRICE_IF_NO_PRICE_FOR_CURRENT_SUPPLIER)) {
491 $productsupplier->get_buyprice(0, -1, $idprod,
'none', $fksoctosearch);
492 if ($productsupplier->fourn_socid != $socid) {
493 $productsupplier->ref_supplier =
'';
496 $fksoctosearch = $object->thirdparty->id;
497 $productsupplier->get_buyprice(0, -1, $idprod,
'none', $fksoctosearch);
499 } elseif (
GETPOST(
'idprodfournprice',
'alpha') > 0) {
501 $idprod = $productsupplier->get_buyprice(
GETPOST(
'idprodfournprice',
'alpha'), $qtytosearch);
502 $res = $productsupplier->fetch($idprod);
503 $ref_fournisseur = $productsupplier->ref_supplier;
507 if (! $error && ($qty >= 0) && (! empty($product_desc) || (! empty($idprod) && $idprod > 0))) {
508 $ret = $object->fetch($id);
513 $ret = $object->fetch_thirdparty();
516 $date_start =
dol_mktime(
GETPOST(
'date_start' . $predef .
'hour'),
GETPOST(
'date_start' . $predef .
'min'),
GETPOST(
'date_start' . $predef .
'sec'),
GETPOST(
'date_start' . $predef .
'month'),
GETPOST(
'date_start' . $predef .
'day'),
GETPOST(
'date_start' . $predef .
'year'));
517 $date_end =
dol_mktime(
GETPOST(
'date_end' . $predef .
'hour'),
GETPOST(
'date_end' . $predef .
'min'),
GETPOST(
'date_end' . $predef .
'sec'),
GETPOST(
'date_end' . $predef .
'month'),
GETPOST(
'date_end' . $predef .
'day'),
GETPOST(
'date_end' . $predef .
'year'));
518 $price_base_type = (
GETPOST(
'price_base_type',
'alpha') ?
GETPOST(
'price_base_type',
'alpha') :
'HT');
529 if (! empty($idprod) && $idprod > 0) {
531 $prod->fetch($idprod);
533 $label = ((
GETPOST(
'product_label') &&
GETPOST(
'product_label') != $prod->label) ?
GETPOST(
'product_label') :
'');
538 if (empty($tva_tx)) {
545 $datapriceofproduct = $prod->getSellPrice($mysoc, $object->thirdparty, $pqp);
547 $pu_ht = $datapriceofproduct[
'pu_ht'];
548 $pu_ttc = $datapriceofproduct[
'pu_ttc'];
549 $price_min = $datapriceofproduct[
'price_min'];
550 $price_base_type = empty($datapriceofproduct[
'price_base_type']) ?
'HT' : $datapriceofproduct[
'price_base_type'];
551 $tva_tx = $datapriceofproduct[
'tva_tx'];
552 $tva_npr = $datapriceofproduct[
'tva_npr'];
554 $tmpvat =
price2num(preg_replace(
'/\s*\(.*\)/',
'', $tva_tx));
555 $tmpprodvat =
price2num(preg_replace(
'/\s*\(.*\)/',
'', $prod->tva_tx));
558 if (! empty($price_ht)) {
560 $pu_ttc =
price2num($pu_ht * (1 + ($tmpvat / 100)),
'MU');
561 } elseif ($tmpvat != $tmpprodvat) {
564 if ($price_base_type !=
'HT') {
565 $pu_ht =
price2num($pu_ttc / (1 + ($tmpvat / 100)),
'MU');
567 $pu_ttc =
price2num($pu_ht * (1 + ($tmpvat / 100)),
'MU');
574 if (! empty($conf->global->MAIN_MULTILANGS) && ! empty($conf->global->PRODUIT_TEXTS_IN_THIRDPARTY_LANGUAGE)) {
575 $outputlangs = $langs;
577 if (empty($newlang) &&
GETPOST(
'lang_id',
'aZ09')) {
578 $newlang =
GETPOST(
'lang_id',
'aZ09');
580 if (empty($newlang)) {
581 $newlang = $object->thirdparty->default_lang;
583 if (! empty($newlang)) {
585 $outputlangs->setDefaultLang($newlang);
588 $desc = (! empty($prod->multilangs [$outputlangs->defaultlang] [
"description"])) ? $prod->multilangs [$outputlangs->defaultlang] [
"description"] : $prod->description;
590 $desc = $prod->description;
596 if (empty($conf->global->MAIN_PRODUCT_DISABLE_CUSTOMCOUNTRYCODE) && (! empty($prod->customcode) || ! empty($prod->country_code))) {
599 if (! empty($conf->global->MAIN_MULTILANGS) && ! empty($conf->global->PRODUIT_TEXTS_IN_THIRDPARTY_LANGUAGE)) {
600 $outputlangs = $langs;
602 if (empty($newlang) &&
GETPOST(
'lang_id',
'alpha')) {
603 $newlang =
GETPOST(
'lang_id',
'alpha');
605 if (empty($newlang)) {
606 $newlang = $object->thirdparty->default_lang;
608 if (! empty($newlang)) {
610 $outputlangs->setDefaultLang($newlang);
611 $outputlangs->load(
'products');
613 if (! empty($prod->customcode)) {
614 $tmptxt .= $outputlangs->transnoentitiesnoconv(
"CustomCode") .
': ' . $prod->customcode;
616 if (! empty($prod->customcode) && ! empty($prod->country_code)) {
619 if (! empty($prod->country_code)) {
620 $tmptxt .= $outputlangs->transnoentitiesnoconv(
"CountryOrigin") .
': ' .
getCountry($prod->country_code, 0, $db, $outputlangs, 0);
623 if (! empty($prod->customcode)) {
624 $tmptxt .= $langs->transnoentitiesnoconv(
"CustomCode") .
': ' . $prod->customcode;
626 if (! empty($prod->customcode) && ! empty($prod->country_code)) {
629 if (! empty($prod->country_code)) {
630 $tmptxt .= $langs->transnoentitiesnoconv(
"CountryOrigin") .
': ' .
getCountry($prod->country_code, 0, $db, $langs, 0);
638 $fk_unit = $prod->fk_unit;
642 $tva_npr = (preg_match(
'/\*/', $tva_tx) ? 1 : 0);
643 $tva_tx = str_replace(
'*',
'', $tva_tx);
644 if (empty($tva_tx)) {
647 $desc = $product_desc;
649 $fk_unit =
GETPOST(
'units',
'alpha');
652 $date_start_fill = ! empty(
GETPOST(
'date_start_fill',
'int')) ?
GETPOST(
'date_start_fill',
'int') : null;
653 $date_end_fill = ! empty(
GETPOST(
'date_end_fill',
'int')) ?
GETPOST(
'date_end_fill',
'int') : null;
660 $localtax1_tx =
get_localtax($tva_tx, 1, $object->thirdparty, $mysoc, $tva_npr);
661 $localtax2_tx =
get_localtax($tva_tx, 2, $object->thirdparty, $mysoc, $tva_npr);
672 if ($usercanproductignorepricemin && (! empty($price_min) && ($pu_ht * (1 - $remise_percent / 100) < $price_min))) {
673 $mesg = $langs->trans(
"CantBeLessThanMinPrice",
price(
price2num($price_min,
'MU'), 0, $langs, 0, 0, -1, $conf->currency));
677 $result = $object->addline($idprod, $ref_fournisseur, $label, $desc, $pu_ht, $pu_ttc, $qty, $remise_percent, $tva_tx, $localtax1_tx, $localtax2_tx, $price_base_type, $type, $date_start_fill, $date_end_fill, $info_bits, $special_code, -1, $fk_unit);
680 $object->fetch($object->id);
682 unset($_POST[
'prod_entry_mode']);
683 unset($_POST[
'qty']);
684 unset($_POST[
'type']);
685 unset($_POST[
'remise_percent']);
686 unset($_POST[
'price_ht']);
687 unset($_POST[
'multicurrency_price_ht']);
688 unset($_POST[
'price_ttc']);
689 unset($_POST[
'tva_tx']);
690 unset($_POST[
'product_ref']);
691 unset($_POST[
'product_label']);
692 unset($_POST[
'product_desc']);
693 unset($_POST[
'fournprice']);
694 unset($_POST[
'buying_price']);
695 unset($_POST[
'np_marginRate']);
696 unset($_POST[
'np_markRate']);
697 unset($_POST[
'dp_desc']);
698 unset($_POST[
'idprod']);
699 unset($_POST[
'units']);
700 unset($_POST[
'date_starthour']);
701 unset($_POST[
'date_startmin']);
702 unset($_POST[
'date_startsec']);
703 unset($_POST[
'date_startday']);
704 unset($_POST[
'date_startmonth']);
705 unset($_POST[
'date_startyear']);
706 unset($_POST[
'date_endhour']);
707 unset($_POST[
'date_endmin']);
708 unset($_POST[
'date_endsec']);
709 unset($_POST[
'date_endday']);
710 unset($_POST[
'date_endmonth']);
711 unset($_POST[
'date_endyear']);
712 unset($_POST[
'date_start_fill']);
713 unset($_POST[
'date_end_fill']);
714 unset($_POST[
'situations']);
715 unset($_POST[
'progress']);
723 } elseif ($action ==
'updateline' && $usercancreate && !
GETPOST(
'cancel',
'alpha')) {
724 if (! $object->fetch($id) > 0) {
727 $object->fetch_thirdparty();
733 $ref_fourn =
GETPOST(
'fourn_ref',
'alpha');
741 if (preg_match(
'/\*/', $vat_rate)) {
746 $vat_rate = str_replace(
'*',
'', $vat_rate);
747 $localtax1_rate =
get_localtax($vat_rate, 1, $object->thirdparty);
748 $localtax2_rate =
get_localtax($vat_rate, 2, $object->thirdparty);
751 $extralabelsline = $extrafields->fetch_name_optionals_label($object->table_element_line);
752 $array_options = $extrafields->getOptionalsFromPost($object->table_element_line);
755 if ($objectline->fetch(
GETPOST(
'lineid',
'int'))) {
756 $objectline->array_options = $array_options;
757 $result = $objectline->insertExtraFields();
763 $position = ($objectline->rang >= 0 ? $objectline->rang : 0);
766 if (is_array($extralabelsline)) {
768 foreach ($extralabelsline as $key => $value) {
769 unset($_POST[
"options_" . $key]);
774 $special_code =
GETPOST(
'special_code',
'int');
775 if (!
GETPOST(
'qty',
'alpha')) {
782 $productid =
GETPOST(
'productid',
'int');
783 if (! empty($productid)) {
785 $product->fetch($productid);
787 $type = $product->type;
789 $price_min = $product->price_min;
790 if (! empty($conf->global->PRODUIT_MULTIPRICES) && ! empty($object->thirdparty->price_level)) {
791 $price_min = $product->multiprices_min[$object->thirdparty->price_level];
794 $label = $product->label;
797 if (((! empty($conf->global->MAIN_USE_ADVANCED_PERMS) && empty($user->rights->produit->ignore_price_min_advance)) || empty($conf->global->MAIN_USE_ADVANCED_PERMS)) && $price_min && (
price2num($pu_ht) * (1 - $remise_percent / 100) <
price2num($price_min))) {
798 setEventMessages($langs->trans(
"CantBeLessThanMinPrice",
price(
price2num($price_min,
'MU'), 0, $langs, 0, 0, -1, $conf->currency)),
null,
'errors');
802 $type =
GETPOST(
'type',
'int');
803 $label = (
GETPOST(
'product_label') ?
GETPOST(
'product_label') :
'');
806 if (
GETPOST(
'type',
'int') < 0) {
807 setEventMessages($langs->trans(
"ErrorFieldRequired", $langs->transnoentitiesnoconv(
"Type")),
null,
'errors');
812 $langs->load(
"errors");
813 setEventMessages($langs->trans(
'ErrorQtyForCustomerInvoiceCantBeNegative'),
null,
'errors');
817 $date_start_fill = ! empty(
GETPOST(
'date_start_fill',
'int')) ?
GETPOST(
'date_start_fill',
'int') :
'NULL';
818 $date_end_fill = ! empty(
GETPOST(
'date_end_fill',
'int')) ?
GETPOST(
'date_end_fill',
'int') :
'NULL';
822 $result = $object->updateline(
GETPOST(
'lineid',
'int'),
GETPOST(
'productid',
'int'), $ref_fourn, $label, $description, $pu_ht, $qty, $remise_percent, $vat_rate, $localtax1_rate, $localtax1_rate,
'HT', $type, $date_start_fill, $date_end_fill, $info_bits, $special_code, -1);
824 $object->fetch($object->id);
826 unset($_POST[
'qty']);
827 unset($_POST[
'type']);
828 unset($_POST[
'productid']);
829 unset($_POST[
'remise_percent']);
830 unset($_POST[
'price_ht']);
831 unset($_POST[
'multicurrency_price_ht']);
832 unset($_POST[
'price_ttc']);
833 unset($_POST[
'tva_tx']);
834 unset($_POST[
'product_ref']);
835 unset($_POST[
'product_label']);
836 unset($_POST[
'product_desc']);
837 unset($_POST[
'fournprice']);
838 unset($_POST[
'buying_price']);
839 unset($_POST[
'np_marginRate']);
840 unset($_POST[
'np_markRate']);
841 unset($_POST[
'dp_desc']);
842 unset($_POST[
'idprod']);
843 unset($_POST[
'units']);
844 unset($_POST[
'date_starthour']);
845 unset($_POST[
'date_startmin']);
846 unset($_POST[
'date_startsec']);
847 unset($_POST[
'date_startday']);
848 unset($_POST[
'date_startmonth']);
849 unset($_POST[
'date_startyear']);
850 unset($_POST[
'date_endhour']);
851 unset($_POST[
'date_endmin']);
852 unset($_POST[
'date_endsec']);
853 unset($_POST[
'date_endday']);
854 unset($_POST[
'date_endmonth']);
855 unset($_POST[
'date_endyear']);
856 unset($_POST[
'situations']);
857 unset($_POST[
'progress']);
874 if (! empty($conf->project->enabled)) {
877 $companystatic =
new Societe($db);
886 if ($action ==
'create') {
887 print
load_fiche_titre($langs->trans(
"CreateRepeatableInvoice"),
'',
'bill');
890 $product_static =
new Product($db);
892 if ($object->fetch($id) > 0) {
893 $result = $object->fetch_lines();
895 print
'<form action="' . $_SERVER[
"PHP_SELF"] .
'" method="POST">';
896 print
'<input type="hidden" name="token" value="' .
newToken() .
'">';
897 print
'<input type="hidden" name="action" value="add">';
898 print
'<input type="hidden" name="facid" value="' . $object->id .
'">';
903 if (! empty($conf->project->enabled)) $rowspan++;
904 if ($object->fk_account > 0) $rowspan++;
906 print
'<table class="border centpercent">';
908 $object->fetch_thirdparty();
911 print
'<tr><td class="titlefieldcreate fieldrequired">' . $langs->trans(
"Title") .
'</td><td>';
912 print
'<input class="flat quatrevingtpercent" type="text" name="title" value="' .
dol_escape_htmltag(
GETPOST(
"title",
'alphanohtml')) .
'">';
916 print
'<tr><td class="titlefieldcreate fieldrequired">' . $langs->trans(
"SupplierRef") .
'</td><td>';
917 print
'<input class="flat quatrevingtpercent" type="text" name="ref_supplier" value="' . $object->ref_supplier .
'">';
921 print
'<tr><td class="titlefieldcreate">' . $langs->trans(
"Customer") .
'</td><td>' . $object->thirdparty->getNomUrl(1,
'customer') .
'</td>';
924 $note_public =
GETPOSTISSET(
'note_public') ?
GETPOST(
'note_public',
'restricthtml') : $object->note_public;
925 $note_private =
GETPOSTISSET(
'note_private') ?
GETPOST(
'note_private',
'restricthtml') : $object->note_private;
930 $substitutionarray[
'__INVOICE_PREVIOUS_MONTH__'] = $langs->trans(
"PreviousMonthOfInvoice") .
' (' . $langs->trans(
"Example") .
': ' .
dol_print_date(
dol_time_plus_duree($object->date, -1,
'm'),
'%m') .
')';
931 $substitutionarray[
'__INVOICE_MONTH__'] = $langs->trans(
"MonthOfInvoice") .
' (' . $langs->trans(
"Example") .
': ' .
dol_print_date($object->date,
'%m') .
')';
932 $substitutionarray[
'__INVOICE_NEXT_MONTH__'] = $langs->trans(
"NextMonthOfInvoice") .
' (' . $langs->trans(
"Example") .
': ' .
dol_print_date(
dol_time_plus_duree($object->date, 1,
'm'),
'%m') .
')';
933 $substitutionarray[
'__INVOICE_PREVIOUS_MONTH_TEXT__'] = $langs->trans(
"TextPreviousMonthOfInvoice") .
' (' . $langs->trans(
"Example") .
': ' .
dol_print_date(
dol_time_plus_duree($object->date, -1,
'm'),
'%B') .
')';
934 $substitutionarray[
'__INVOICE_MONTH_TEXT__'] = $langs->trans(
"TextMonthOfInvoice") .
' (' . $langs->trans(
"Example") .
': ' .
dol_print_date($object->date,
'%B') .
')';
935 $substitutionarray[
'__INVOICE_NEXT_MONTH_TEXT__'] = $langs->trans(
"TextNextMonthOfInvoice") .
' (' . $langs->trans(
"Example") .
': ' .
dol_print_date(
dol_time_plus_duree($object->date, 1,
'm'),
'%B') .
')';
936 $substitutionarray[
'__INVOICE_PREVIOUS_YEAR__'] = $langs->trans(
"PreviousYearOfInvoice") .
' (' . $langs->trans(
"Example") .
': ' .
dol_print_date(
dol_time_plus_duree($object->date, -1,
'y'),
'%Y') .
')';
937 $substitutionarray[
'__INVOICE_YEAR__'] = $langs->trans(
"YearOfInvoice") .
' (' . $langs->trans(
"Example") .
': ' .
dol_print_date($object->date,
'%Y') .
')';
938 $substitutionarray[
'__INVOICE_NEXT_YEAR__'] = $langs->trans(
"NextYearOfInvoice") .
' (' . $langs->trans(
"Example") .
': ' .
dol_print_date(
dol_time_plus_duree($object->date, 1,
'y'),
'%Y') .
')';
940 $substitutionarray[
'__INVOICE_DATE_NEXT_INVOICE_BEFORE_GEN__'] = $langs->trans(
"DateNextInvoiceBeforeGen") .
' (' . $langs->trans(
"Example") .
': ' .
dol_print_date($object->date_when,
'dayhour') .
')';
941 $substitutionarray[
'__INVOICE_DATE_NEXT_INVOICE_AFTER_GEN__'] = $langs->trans(
"DateNextInvoiceAfterGen") .
' (' . $langs->trans(
"Example") .
': ' .
dol_print_date(
dol_time_plus_duree($object->date_when, $object->frequency, $object->unit_frequency),
'dayhour') .
')';
942 $substitutionarray[
'__INVOICE_COUNTER_CURRENT__'] = $langs->trans(
"Count");
943 $substitutionarray[
'__INVOICE_COUNTER_MAX__'] = $langs->trans(
"MaxPeriodNumber");
945 $htmltext =
'<i>' . $langs->trans(
"FollowingConstantsWillBeSubstituted") .
':<br>';
946 foreach ($substitutionarray as $key => $val) {
947 $htmltext .= $key .
' = ' . $langs->trans($val) .
'<br>';
952 print
'<tr><td class="titlefieldcreate">' . $langs->trans(
"Label") .
'</td><td>';
953 print
'<input class="flat quatrevingtpercent" type="text" name="libelle" value="' . $object->label .
'">';
958 print
'<td class="tdtop">';
959 print
$form->textwithpicto($langs->trans(
'NotePublic'), $htmltext, 1,
'help',
'', 0, 2,
'notepublic');
962 $doleditor =
new DolEditor(
'note_public', $note_public,
'', 80,
'dolibarr_notes',
'In', 0,
false, empty($conf->global->FCKEDITOR_ENABLE_NOTE_PUBLIC) ? 0 : 1, ROWS_3,
'90%');
963 print $doleditor->Create(1);
966 if (empty($user->socid)) {
968 print
'<td class="tdtop">';
969 print
$form->textwithpicto($langs->trans(
'NotePrivate'), $htmltext, 1,
'help',
'', 0, 2,
'noteprivate');
972 $doleditor =
new DolEditor(
'note_private', $note_private,
'', 80,
'dolibarr_notes',
'In', 0,
false, empty($conf->global->FCKEDITOR_ENABLE_NOTE_PRIVATE) ? 0 : 1, ROWS_3,
'90%');
973 print $doleditor->Create(1);
978 print
"<tr><td>" . $langs->trans(
"Author") .
"</td><td>" . $user->getFullName($langs) .
"</td></tr>";
981 print
"<tr><td>" . $langs->trans(
"PaymentConditions") .
"</td><td>";
982 $form->form_conditions_reglement($_SERVER[
'PHP_SELF'] .
'?id=' . $object->id, $object->cond_reglement_id,
'none');
986 print
"<tr><td>" . $langs->trans(
"PaymentMode") .
"</td><td>";
987 $form->form_modes_reglement($_SERVER[
'PHP_SELF'] .
'?id=' . $object->id, $object->mode_reglement_id,
'none',
'', 1);
991 if (! empty($conf->project->enabled) && is_object($object->thirdparty) && $object->thirdparty->id > 0) {
992 $projectid =
GETPOST(
'projectid') ?
GETPOST(
'projectid') : $object->fk_project;
993 $langs->load(
'projects');
994 print
'<tr><td>' . $langs->trans(
'Project') .
'</td><td>';
995 $numprojet = $formproject->select_projects($object->thirdparty->id, $projectid,
'projectid', 0, 0, 1, 0, 0, 0, 0,
'', 0, 0,
'');
996 print
' <a href="' . DOL_URL_ROOT .
'/projet/card.php?socid=' . $object->thirdparty->id .
'&action=create&status=1&backtopage=' . urlencode($_SERVER[
"PHP_SELF"] .
'?action=create&socid=' . $object->thirdparty->id . (! empty($id) ?
'&id=' . $id :
'')) .
'">' . $langs->trans(
"AddProject") .
'</a>';
1001 if ($object->fk_account > 0) {
1002 print
"<tr><td>" . $langs->trans(
'BankAccount') .
"</td><td>";
1003 $form->formSelectAccount($_SERVER[
'PHP_SELF'] .
'?id=' . $object->id, $object->fk_account,
'none');
1008 print
"<tr><td>" . $langs->trans(
'Model') .
"</td><td>";
1009 include_once DOL_DOCUMENT_ROOT .
'/core/modules/supplier_invoice/modules_facturefournisseur.php';
1011 print
$form->selectarray(
'modelpdf', $list, $conf->global->INVOICE_SUPPLIER_ADDON_PDF);
1019 $title = $langs->trans(
"Recurrence");
1024 print
'<table class="border centpercent">';
1027 print
'<tr><td class="titlefieldcreate">' .
$form->textwithpicto($langs->trans(
"Frequency"), $langs->transnoentitiesnoconv(
'toolTipFrequency')) .
"</td><td>";
1028 print
"<input type='text' name='frequency' value='" .
GETPOST(
'frequency',
'int') .
"' size='4' /> " .
$form->selectarray(
'unit_frequency', array(
'd' => $langs->trans(
'Day'),
'm' => $langs->trans(
'Month'),
'y' => $langs->trans(
'Year')), (
GETPOST(
'unit_frequency') ?
GETPOST(
'unit_frequency') :
'm'));
1032 print
"<tr><td>" . $langs->trans(
'NextDateToExecution') .
"</td><td>";
1034 print
$form->selectDate($date_next_execution,
'', 1, 1,
'',
"add", 1, 1);
1038 print
"<tr><td>" . $langs->trans(
"MaxPeriodNumber") .
"</td><td>";
1039 print
'<input type="text" name="nb_gen_max" value="' .
GETPOST(
'nb_gen_max') .
'" size="5" />';
1043 print
"<tr><td>" . $langs->trans(
"StatusOfGeneratedInvoices") .
"</td><td>";
1044 $select = array(
'0' => $langs->trans(
'BillStatusDraft'),
'1' => $langs->trans(
'BillStatusValidated'));
1045 print
$form->selectarray(
'auto_validate', $select,
GETPOST(
'auto_validate'));
1049 if (! empty($conf->global->INVOICE_REC_CAN_DISABLE_DOCUMENT_FILE_GENERATION)) {
1050 print
"<tr><td>" . $langs->trans(
"StatusOfGeneratedDocuments") .
"</td><td>";
1051 $select = array(
'0' => $langs->trans(
'DoNotGenerateDoc'),
'1' => $langs->trans(
'AutoGenerateDoc'));
1052 print
$form->selectarray(
'generate_pdf', $select,
GETPOST(
'generate_pdf'));
1055 print
'<input type="hidden" name="generate_pdf" value="1">';
1062 $title = $langs->trans(
"ProductsAndServices");
1063 if (empty($conf->service->enabled)) {
1064 $title = $langs->trans(
"Products");
1065 } elseif (empty($conf->product->enabled)) {
1066 $title = $langs->trans(
"Services");
1074 print
'<div class="div-table-responsive-no-min">';
1075 print
'<table id="tablelines" class="noborder noshadow" width="100%">';
1077 if (! empty($object->lines)) {
1081 $object->printObjectLines(
'', $mysoc, $object->thirdparty, $lineid, 0);
1089 print
$form->buttonsSaveCancel(
"Create");
1099 if ($object->id > 0) {
1100 $object->fetch($object->id);
1101 $object->fetch_thirdparty();
1104 if ($action ==
'ask_deleteline') {
1105 $formconfirm =
$form->formconfirm($_SERVER[
"PHP_SELF"] .
'?id=' . $object->id .
'&lineid=' . $lineid, $langs->trans(
'DeleteProductLine'), $langs->trans(
'ConfirmDeleteProductLine'),
'confirm_deleteline',
'',
'no', 1);
1109 if ($action ==
'ask_deleteinvoice') {
1110 $formconfirm =
$form->formconfirm($_SERVER[
"PHP_SELF"] .
'?id=' . $object->id, $langs->trans(
'DeleteRepeatableInvoice'), $langs->trans(
'ConfirmDeleteRepeatableInvoice'),
'confirm_deleteinvoice',
'',
'no', 1);
1115 $author =
new User($db);
1116 $author->fetch($object->user_author);
1120 print
dol_get_fiche_head($head,
'card', $langs->trans(
'RepeatableInvoice'), -1,
'bill');
1124 $linkback =
'<a href="' . DOL_URL_ROOT .
'/fourn/facture/list-rec.php?restore_lastsearch_values=1' . (! empty($socid) ?
'&socid=' . $socid :
'') .
'">' . $langs->trans(
'BackToList') .
'</a>';
1127 if ($action !=
'edittitle') {
1128 $morehtmlref .=
$form->editfieldkey($object->titre,
'title', $object->titre, $object, $usercancreate,
'',
'', 0, 2);
1130 $morehtmlref .=
$form->editfieldval(
'',
'title', $object->titre, $object, $usercancreate,
'string');
1132 $morehtmlref .=
'<div class="refidno">';
1134 $morehtmlref .=
$form->editfieldkey(
"RefSupplier",
'ref_supplier', $object->ref_supplier, $object, $usercancreate,
'string',
'', 0, 1);
1135 $morehtmlref .=
$form->editfieldval(
"RefSupplier",
'ref_supplier', $object->ref_supplier, $object, $usercancreate,
'string',
'',
null,
null,
'', 1);
1137 $morehtmlref .=
'<br>' . $langs->trans(
'ThirdParty') .
' : ' . $object->thirdparty->getNomUrl(1);
1140 if (! empty($conf->project->enabled)) {
1141 $langs->load(
'projects');
1142 $morehtmlref .=
'<br>' . $langs->trans(
'Project') .
' ';
1143 if ($usercancreate) {
1144 if ($action !=
'classify') {
1145 $morehtmlref .=
'<a class="editfielda" href="' . $_SERVER[
'PHP_SELF'] .
'?action=classify&token=' .
newToken() .
'&id=' . $object->id .
'">' .
img_edit($langs->transnoentitiesnoconv(
'SetProject')) .
'</a> : ';
1147 if ($action ==
'classify') {
1148 $morehtmlref .=
'<form method="post" action="' . $_SERVER[
'PHP_SELF'] .
'?id=' . $object->id .
'">';
1149 $morehtmlref .=
'<input type="hidden" name="action" value="classin">';
1150 $morehtmlref .=
'<input type="hidden" name="token" value="' .
newToken() .
'">';
1151 $morehtmlref .= $formproject->select_projects($object->socid, $object->fk_project,
'projectid', $maxlength, 0, 1, 0, 1, 0, 0,
'', 1);
1152 $morehtmlref .=
'<input type="submit" class="button valignmiddle" value="' . $langs->trans(
"Modify") .
'">';
1153 $morehtmlref .=
'</form>';
1155 $morehtmlref .=
$form->form_project($_SERVER[
'PHP_SELF'] .
'?id=' . $object->id, $object->socid, $object->fk_project,
'none', 0, 0, 0, 1);
1158 if (! empty($object->fk_project)) {
1160 $project->fetch($object->fk_project);
1161 $morehtmlref .=
' : ' . $project->getNomUrl(1);
1162 if ($project->title) {
1163 $morehtmlref .=
' - ' . $project->title;
1170 $morehtmlref .=
'</div>';
1172 $morehtmlright =
'';
1174 dol_banner_tab($object,
'ref', $linkback, 1,
'title',
'none', $morehtmlref,
'', 0,
'', $morehtmlright);
1176 print
'<div class="fichecenter">';
1177 print
'<div class="fichehalfleft">';
1178 print
'<div class="underbanner clearboth"></div>';
1180 print
'<table class="border centpercent tableforfield">';
1182 print
'<tr><td class="titlefield">' . $langs->trans(
'Author') .
'</td><td>';
1183 print $author->getNomUrl(-1);
1188 print
'<td>' .
$form->editfieldkey(
"Label",
'libelle', $object->libelle, $object, $usercancreate) .
'</td>';
1189 print
'<td>' .
$form->editfieldval(
"Label",
'libelle', $object->libelle, $object, $usercancreate) .
'</td>';
1192 print
'<tr><td>' . $langs->trans(
'AmountHT') .
'</td>';
1193 print
'<td>' .
price($object->total_ht,
'', $langs, 1, -1, -1, $conf->currency) .
'</td>';
1196 print
'<tr><td>' . $langs->trans(
"AmountVAT") .
'</td><td>' .
price($object->total_tva,
'', $langs, 1, -1, -1, $conf->currency) .
'</td>';
1200 if (($mysoc->localtax1_assuj ==
"1" && $mysoc->useLocalTax(1)) || $object->total_localtax1 != 0) {
1201 print
'<tr><td>' . $langs->transcountry(
"AmountLT1", $mysoc->country_code) .
'</td>';
1202 print
'<td class="nowrap">' .
price($object->total_localtax1, 1,
'', 1, -1, -1, $conf->currency) .
'</td></tr>';
1204 if (($mysoc->localtax2_assuj ==
"1" && $mysoc->useLocalTax(2)) || $object->total_localtax2 != 0) {
1205 print
'<tr><td>' . $langs->transcountry(
"AmountLT2", $mysoc->country_code) .
'</td>';
1206 print
'<td class=nowrap">' .
price($object->total_localtax2, 1,
'', 1, -1, -1, $conf->currency) .
'</td></tr>';
1209 print
'<tr><td>' . $langs->trans(
"AmountTTC") .
'</td><td colspan="3">' .
price($object->total_ttc,
'', $langs, 1, -1, -1, $conf->currency) .
'</td>';
1214 print
'<table class="nobordernopadding centpercent"><tr><td>';
1215 print $langs->trans(
'PaymentConditionsShort');
1217 if ($action !=
'editconditions' && $usercancreate) {
1218 print
'<td class="right"><a class="editfielda" href="' . $_SERVER[
"PHP_SELF"] .
'?action=editconditions&token=' .
newToken() .
'&facid=' . $object->id .
'">' .
img_edit($langs->trans(
'SetConditions'), 1) .
'</a></td>';
1220 print
'</tr></table>';
1222 if ($action ==
'editconditions') {
1223 $form->form_conditions_reglement($_SERVER[
'PHP_SELF'] .
'?facid=' . $object->id, $object->cond_reglement_id,
'cond_reglement_id');
1225 $form->form_conditions_reglement($_SERVER[
'PHP_SELF'] .
'?facid=' . $object->id, $object->cond_reglement_id,
'none');
1232 print
'<table class="nobordernopadding" width="100%"><tr><td>';
1233 print $langs->trans(
'PaymentMode');
1235 if ($action !=
'editmode' && $usercancreate) {
1236 print
'<td class="right"><a class="editfielda" href="' . $_SERVER[
"PHP_SELF"] .
'?action=editmode&token=' .
newToken() .
'&facid=' . $object->id .
'">' .
img_edit($langs->trans(
'SetMode'), 1) .
'</a></td>';
1238 print
'</tr></table>';
1240 if ($action ==
'editmode') {
1241 $form->form_modes_reglement($_SERVER[
'PHP_SELF'] .
'?facid=' . $object->id, $object->mode_reglement_id,
'mode_reglement_id',
'CRDT', 1, 1);
1243 $form->form_modes_reglement($_SERVER[
'PHP_SELF'] .
'?facid=' . $object->id, $object->mode_reglement_id,
'none');
1248 if (! empty($conf->multicurrency->enabled)) {
1252 print
'<table class="nobordernopadding" width="100%"><tr><td>';
1253 print
$form->editfieldkey(
'Currency',
'multicurrency_code',
'', $object, 0);
1255 if ($usercancreate && $action !=
'editmulticurrencycode' && ! empty($object->brouillon)) {
1256 print
'<td class="right"><a class="editfielda" href="' . $_SERVER[
"PHP_SELF"] .
'?action=editmulticurrencycode&token=' .
newToken() .
'&id=' . $object->id .
'">' .
img_edit($langs->transnoentitiesnoconv(
'SetMultiCurrencyCode'), 1) .
'</a></td>';
1258 print
'</tr></table>';
1260 $htmlname = (($usercancreate && $action ==
'editmulticurrencycode') ?
'multicurrency_code' :
'none');
1261 $form->form_multicurrency_code($_SERVER[
'PHP_SELF'] .
'?id=' . $object->id, $object->multicurrency_code, $htmlname);
1265 if ($object->multicurrency_code != $conf->currency || $object->multicurrency_tx != 1) {
1268 print
'<table class="nobordernopadding" width="100%"><tr><td>';
1269 print
$form->editfieldkey(
'CurrencyRate',
'multicurrency_tx',
'', $object, 0);
1271 if ($usercancreate && $action !=
'editmulticurrencyrate' && ! empty($object->brouillon) && $object->multicurrency_code && $object->multicurrency_code != $conf->currency) {
1272 print
'<td class="right"><a class="editfielda" href="' . $_SERVER[
"PHP_SELF"] .
'?action=editmulticurrencyrate&token=' .
newToken() .
'&id=' . $object->id .
'">' .
img_edit($langs->transnoentitiesnoconv(
'SetMultiCurrencyCode'), 1) .
'</a></td>';
1274 print
'</tr></table>';
1276 if ($action ==
'editmulticurrencyrate' || $action ==
'actualizemulticurrencyrate') {
1277 if ($action ==
'actualizemulticurrencyrate') {
1280 $form->form_multicurrency_rate($_SERVER[
'PHP_SELF'] .
'?id=' . $object->id, $object->multicurrency_tx, ($usercancreate ?
'multicurrency_tx' :
'none'), $object->multicurrency_code);
1282 $form->form_multicurrency_rate($_SERVER[
'PHP_SELF'] .
'?id=' . $object->id, $object->multicurrency_tx,
'none', $object->multicurrency_code);
1283 if ($object->statut == $object::STATUS_DRAFT && $object->multicurrency_code && $object->multicurrency_code != $conf->currency) {
1284 print
'<div class="inline-block"> ';
1285 print
'<a href="' . $_SERVER[
"PHP_SELF"] .
'?id=' . $object->id .
'&action=actualizemulticurrencyrate">' . $langs->trans(
"ActualizeCurrency") .
'</a>';
1295 if (! empty($object->frequency) && ! empty($object->date_when)) {
1296 $dateexample = $object->date_when;
1301 $substitutionarray[
'__INVOICE_PREVIOUS_MONTH__'] = $langs->trans(
"PreviousMonthOfInvoice") .
' (' . $langs->trans(
"Example") .
': ' .
dol_print_date(
dol_time_plus_duree($dateexample, -1,
'm'),
'%m') .
')';
1302 $substitutionarray[
'__INVOICE_MONTH__'] = $langs->trans(
"MonthOfInvoice") .
' (' . $langs->trans(
"Example") .
': ' .
dol_print_date($dateexample,
'%m') .
')';
1303 $substitutionarray[
'__INVOICE_NEXT_MONTH__'] = $langs->trans(
"NextMonthOfInvoice") .
' (' . $langs->trans(
"Example") .
': ' .
dol_print_date(
dol_time_plus_duree($dateexample, 1,
'm'),
'%m') .
')';
1304 $substitutionarray[
'__INVOICE_PREVIOUS_MONTH_TEXT__'] = $langs->trans(
"TextPreviousMonthOfInvoice") .
' (' . $langs->trans(
"Example") .
': ' .
dol_print_date(
dol_time_plus_duree($dateexample, -1,
'm'),
'%B') .
')';
1305 $substitutionarray[
'__INVOICE_MONTH_TEXT__'] = $langs->trans(
"TextMonthOfInvoice") .
' (' . $langs->trans(
"Example") .
': ' .
dol_print_date($dateexample,
'%B') .
')';
1306 $substitutionarray[
'__INVOICE_NEXT_MONTH_TEXT__'] = $langs->trans(
"TextNextMonthOfInvoice") .
' (' . $langs->trans(
"Example") .
': ' .
dol_print_date(
dol_time_plus_duree($dateexample, 1,
'm'),
'%B') .
')';
1307 $substitutionarray[
'__INVOICE_PREVIOUS_YEAR__'] = $langs->trans(
"PreviousYearOfInvoice") .
' (' . $langs->trans(
"Example") .
': ' .
dol_print_date(
dol_time_plus_duree($dateexample, -1,
'y'),
'%Y') .
')';
1308 $substitutionarray[
'__INVOICE_YEAR__'] = $langs->trans(
"YearOfInvoice") .
' (' . $langs->trans(
"Example") .
': ' .
dol_print_date($dateexample,
'%Y') .
')';
1309 $substitutionarray[
'__INVOICE_NEXT_YEAR__'] = $langs->trans(
"NextYearOfInvoice") .
' (' . $langs->trans(
"Example") .
': ' .
dol_print_date(
dol_time_plus_duree($dateexample, 1,
'y'),
'%Y') .
')';
1311 $substitutionarray[
'__INVOICE_DATE_NEXT_INVOICE_BEFORE_GEN__'] = $langs->trans(
"DateNextInvoiceBeforeGen") .
' (' . $langs->trans(
"Example") .
': ' .
dol_print_date(($object->date_when ? $object->date_when :
dol_now()),
'dayhour') .
')';
1312 $substitutionarray[
'__INVOICE_DATE_NEXT_INVOICE_AFTER_GEN__'] = $langs->trans(
"DateNextInvoiceAfterGen") .
' (' . $langs->trans(
"Example") .
': ' .
dol_print_date(
dol_time_plus_duree(($object->date_when ? $object->date_when :
dol_now()), $object->frequency, $object->unit_frequency),
'dayhour') .
')';
1313 $substitutionarray[
'__INVOICE_COUNTER_CURRENT__'] = $object->nb_gen_done;
1314 $substitutionarray[
'__INVOICE_COUNTER_MAX__'] = $object->nb_gen_max;
1316 $htmltext =
'<i>' . $langs->trans(
"FollowingConstantsWillBeSubstituted") .
':<br>';
1317 foreach ($substitutionarray as $key => $val) {
1318 $htmltext .= $key .
' = ' . $langs->trans($val) .
'<br>';
1320 $htmltext .=
'</i>';
1324 print
$form->editfieldkey(
$form->textwithpicto($langs->trans(
'NotePublic'), $htmltext, 1,
'help',
'', 0, 2,
'notepublic'),
'note_public', $object->note_public, $object, $usercancreate);
1325 print
'</td><td class="wordbreak">';
1326 print
$form->editfieldval($langs->trans(
"NotePublic"),
'note_public', $object->note_public, $object, $usercancreate,
'textarea:' . ROWS_4 .
':90%',
'',
null,
null,
'', 1);
1332 print
$form->editfieldkey(
$form->textwithpicto($langs->trans(
"NotePrivate"), $htmltext, 1,
'help',
'', 0, 2,
'noteprivate'),
'note_private', $object->note_private, $object, $usercancreate);
1333 print
'</td><td class="wordbreak">';
1334 print
$form->editfieldval($langs->trans(
"NotePrivate"),
'note_private', $object->note_private, $object, $usercancreate,
'textarea:' . ROWS_4 .
':90%',
'',
null,
null,
'', 1);
1339 print
'<tr><td class="nowrap">';
1340 print
'<table width="100%" class="nobordernopadding"><tr><td class="nowrap">';
1341 print $langs->trans(
'BankAccount');
1343 if ($action !=
'editbankaccount' && $usercancreate && $object->statut == FactureFournisseurRec::STATUS_NOTSUSPENDED) {
1344 print
'<td class="right"><a class="editfielda" href="' . $_SERVER[
'PHP_SELF'] .
'?action=editbankaccount&token=' .
newToken() .
'&id=' . $object->id .
'">' .
img_edit($langs->trans(
'SetBankAccount'), 1) .
'</a></td>';
1346 print
'</tr></table>';
1348 if ($action ==
'editbankaccount') {
1349 $form->formSelectAccount($_SERVER[
'PHP_SELF'] .
'?id=' . $object->id, $object->fk_account,
'fk_account', 1);
1351 $form->formSelectAccount($_SERVER[
'PHP_SELF'] .
'?id=' . $object->id, $object->fk_account,
'none');
1357 print
'<tr><td class="nowrap">';
1358 print
'<table width="100%" class="nobordernopadding"><tr><td class="nowrap">';
1359 print $langs->trans(
'Model');
1361 if ($action !=
'editmodelpdf' && $usercancreate && $object->statut == FactureFournisseurRec::STATUS_NOTSUSPENDED) {
1362 print
'<td class="right"><a class="editfielda" href="' . $_SERVER[
'PHP_SELF'] .
'?action=editmodelpdf&token=' .
newToken() .
'&id=' . $object->id .
'">' .
img_edit($langs->trans(
'SetModel'), 1) .
'</a></td>';
1364 print
'</tr></table>';
1366 if ($action ==
'editmodelpdf') {
1367 include_once DOL_DOCUMENT_ROOT .
'/core/modules/supplier_invoice/modules_facturefournisseur.php';
1370 foreach ($models as $k => $model) {
1371 $list[] = str_replace(
':',
'|', $k) .
':' . $model;
1373 $select =
'select;' . implode(
',', $list);
1375 print
$form->editfieldval($langs->trans(
'Model'),
'modelpdf', $object->model_pdf, $object, $usercancreate, $select);
1377 print $object->model_pdf;
1384 include DOL_DOCUMENT_ROOT .
'/core/tpl/extrafields_view.tpl.php';
1389 print
'<div class="fichehalfright">';
1390 print
'<div class="underbanner clearboth"></div>';
1395 $title = $langs->trans(
"Recurrence");
1398 print
'<table class="border centpercent tableforfield">';
1400 print
'<tr><td colspan="2">' .
img_picto(
'',
'recurring',
'class="pictofixedwidth"') . $title .
'</td></tr>';
1403 print
'<tr><td style="width: 50%">';
1404 print
'<table class="nobordernopadding" width="100%"><tr><td>';
1405 print $langs->trans(
'Frequency');
1407 if ($action !=
'editfrequency' && $usercancreate) {
1408 print
'<td class="right"><a class="editfielda" href="' . $_SERVER[
"PHP_SELF"] .
'?action=editfrequency&token=' .
newToken() .
'&facid=' . $object->id .
'">' .
img_edit($langs->trans(
'Edit'), 1) .
'</a></td>';
1410 print
'</tr></table>';
1412 if ($action ==
'editfrequency') {
1413 print
'<form method="post" action="' . $_SERVER[
"PHP_SELF"] .
'?facid=' . $object->id .
'">';
1414 print
'<input type="hidden" name="action" value="setfrequency">';
1415 print
'<input type="hidden" name="token" value="' .
newToken() .
'">';
1416 print
'<table class="nobordernopadding">';
1418 print
"<input type='text' name='frequency' value='" . $object->frequency .
"' size='5' /> " .
$form->selectarray(
'unit_frequency', array(
'd' => $langs->trans(
'Day'),
'm' => $langs->trans(
'Month'),
'y' => $langs->trans(
'Year')), ($object->unit_frequency ? $object->unit_frequency :
'm'));
1420 print
'<td class="left"><input type="submit" class="button button-edit" value="' . $langs->trans(
"Modify") .
'"></td>';
1421 print
'</tr></table></form>';
1423 if ($object->frequency > 0) {
1424 print $langs->trans(
'FrequencyPer_' . $object->unit_frequency, $object->frequency);
1426 print $langs->trans(
"NotARecurringInvoiceTemplate");
1433 if ($action ==
'date_when' || $object->frequency > 0) {
1434 print
$form->editfieldkey($langs->trans(
"NextDateToExecution"),
'date_when', $object->date_when, $object, $usercancreate,
'day');
1436 print $langs->trans(
"NextDateToExecution");
1439 if ($action ==
'date_when' || $object->frequency > 0) {
1440 print
$form->editfieldval($langs->trans(
"NextDateToExecution"),
'date_when', $object->date_when, $object, $usercancreate,
'day', $object->date_when,
null,
'',
'', 0,
'strikeIfMaxNbGenReached');
1443 if (! $object->isMaxNbGenReached()) {
1444 if (! $object->suspended && $action !=
'editdate_when' && $object->frequency > 0 && $object->date_when && $object->date_when < $now) {
1448 print
img_info($langs->trans(
"MaxNumberOfGenerationReached"));
1455 if ($action ==
'nb_gen_max' || $object->frequency > 0) {
1456 print
$form->editfieldkey($langs->trans(
"MaxPeriodNumber"),
'nb_gen_max', $object->nb_gen_max, $object, $usercancreate);
1458 print $langs->trans(
"MaxPeriodNumber");
1461 if ($action ==
'nb_gen_max' || $object->frequency > 0) {
1462 print
$form->editfieldval($langs->trans(
"MaxPeriodNumber"),
'nb_gen_max', $object->nb_gen_max ? $object->nb_gen_max :
'', $object, $usercancreate);
1471 if ($action ==
'auto_validate' || $object->frequency > 0) {
1472 print
$form->editfieldkey($langs->trans(
"StatusOfGeneratedInvoices"),
'auto_validate', $object->auto_validate, $object, $usercancreate);
1474 print $langs->trans(
"StatusOfGeneratedInvoices");
1477 $select =
'select;0:' . $langs->trans(
'BillStatusDraft') .
',1:' . $langs->trans(
'BillStatusValidated');
1478 if ($action ==
'auto_validate' || $object->frequency > 0) {
1479 print
$form->editfieldval($langs->trans(
"StatusOfGeneratedInvoices"),
'auto_validate', $object->auto_validate, $object, $usercancreate, $select);
1483 if (! empty($conf->global->INVOICE_REC_CAN_DISABLE_DOCUMENT_FILE_GENERATION)) {
1486 if ($action ==
'generate_pdf' || $object->frequency > 0) {
1487 print
$form->editfieldkey($langs->trans(
"StatusOfGeneratedDocuments"),
'generate_pdf', $object->generate_pdf, $object, $usercancreate);
1489 print $langs->trans(
"StatusOfGeneratedDocuments");
1493 $select =
'select;0:' . $langs->trans(
'DoNotGenerateDoc') .
',1:' . $langs->trans(
'AutogenerateDoc');
1494 if ($action ==
'generate_pdf' || $object->frequency > 0) {
1495 print
$form->editfieldval($langs->trans(
"StatusOfGeneratedDocuments"),
'generate_pdf', $object->generate_pdf, $object, $usercancreate, $select);
1500 print
'<input type="hidden" name="generate_pdf" value="1">';
1506 if ($object->frequency > 0) {
1509 if (empty($conf->cron->enabled)) {
1510 print
info_admin($langs->trans(
"EnableAndSetupModuleCron", $langs->transnoentitiesnoconv(
"Module2300Name")));
1513 print
'<div class="underbanner clearboth"></div>';
1514 print
'<table class="border centpercent tableforfield">';
1517 print
'<tr><td style="width: 50%">' . $langs->trans(
"NbOfGenerationDone") .
'</td>';
1519 print $object->nb_gen_done ? $object->nb_gen_done :
'0';
1525 print $langs->trans(
"DateLastGeneration");
1539 print
'<div class="clearboth"></div><br>';
1542 print
' <form name="addproduct" id="addproduct" action="' . $_SERVER[
"PHP_SELF"] .
'?id=' . $object->id . (($action !=
'editline') ?
'#add' :
'#line_' .
GETPOST(
'lineid',
'int')) .
'" method="POST">
1543 <input type="hidden" name="token" value="' .
newToken() .
'">
1544 <input type="hidden" name="action" value="' . (($action !=
'editline') ?
'addline' :
'updateline') .
'">
1545 <input type="hidden" name="mode" value="">
1546 <input type="hidden" name="id" value="' . $object->id .
'">
1549 if (! empty($conf->use_javascript_ajax) && $object->statut == 0) {
1550 include DOL_DOCUMENT_ROOT .
'/core/tpl/ajaxrow.tpl.php';
1553 print
'<div class="div-table-responsive-no-min">';
1554 print
'<table id="tablelines" class="noborder noshadow" width="100%">';
1555 $object->fetch_lines();
1557 if (! empty($object->lines)) {
1558 $canchangeproduct = 1;
1560 foreach ($object->lines as $line) {
1561 $line->ref = $line->label;
1562 $line->product_label = $line->label;
1563 $line->subprice = $line->pu_ht;
1566 global $canchangeproduct;
1567 $canchangeproduct = 0;
1569 $object->statut = $object->suspended;
1570 $object->printObjectLines($action, $mysoc, $object->thirdparty, $lineid, 0);
1575 if ($object->statut == $object::STATUS_DRAFT && $usercancreate && $action !=
'valid' && $action !=
'editline') {
1576 if ($action !=
'editline') {
1579 $parameters = array();
1580 $reshook = $hookmanager->executeHooks(
'formAddObjectLine', $parameters, $object, $action);
1581 if ($reshook < 0)
setEventMessages($hookmanager->error, $hookmanager->errors,
'errors');
1582 if (empty($reshook))
1583 global $senderissupplier;
1584 $senderissupplier = 2;
1585 $object->formAddObjectLine(0, $object->thirdparty, $mysoc);
1599 print
'<div class="tabsAction">';
1601 if (empty($object->suspended)) {
1602 if ($usercancreate) {
1603 if (! empty($object->frequency) && $object->nb_gen_max > 0 && ($object->nb_gen_done >= $object->nb_gen_max)) {
1604 print
'<div class="inline-block divButAction"><a class="butActionRefused classfortooltip" href="#" title="' .
dol_escape_htmltag($langs->trans(
"MaxGenerationReached")) .
'">' . $langs->trans(
"CreateBill") .
'</a></div>';
1606 if (empty($object->frequency) || $object->date_when <= $nowlasthour) {
1607 print
'<div class="inline-block divButAction"><a class="butAction" href="' . DOL_URL_ROOT .
'/fourn/facture/card.php?action=create&socid=' . $object->thirdparty->id .
'&fac_rec=' . $object->id .
'">' . $langs->trans(
"CreateBill") .
'</a></div>';
1609 print
'<div class="inline-block divButAction"><a class="butActionRefused classfortooltip" href="#" title="' .
dol_escape_htmltag($langs->trans(
"DateIsNotEnough")) .
'">' . $langs->trans(
"CreateBill") .
'</a></div>';
1613 print
'<div class="inline-block divButAction"><a class="butActionRefused classfortooltip" href="#">' . $langs->trans(
"CreateBill") .
'</a></div>';
1617 if ($usercancreate) {
1618 if (empty($object->suspended)) {
1619 print
'<div class="inline-block divButAction"><a class="butActionDelete" href="' . $_SERVER[
"PHP_SELF"] .
'?action=disable&id=' . $object->id .
'&token=' .
newToken() .
'">' . $langs->trans(
"Disable") .
'</a></div>';
1621 print
'<div class="inline-block divButAction"><a class="butAction" href="' . $_SERVER[
"PHP_SELF"] .
'?action=enable&id=' . $object->id .
'&token=' .
newToken() .
'">' . $langs->trans(
"Enable") .
'</a></div>';
1626 if (($user->rights->fournisseur->facture->supprimer || $user->rights->supplier_invoice->supprimer)) {
1627 print
'<div class="inline-block divButAction"><a class="butActionDelete" href="' . $_SERVER[
'PHP_SELF'] .
'?action=ask_deleteinvoice&id=' . $object->id .
'&token=' .
newToken() .
'">' . $langs->trans(
'Delete') .
'</a></div>';
1632 print
'<div class="fichecenter"><div class="fichehalfleft">';
1633 print
'<a name="builddoc"></a>';
1636 $linktoelem =
$form->showLinkToObjectBlock($object,
null, array(
'invoice'));
1638 $somethingshown =
$form->showLinkedObjectBlock($object, $linktoelem);
1640 print
'</div></div>';