35require
'../../main.inc.php';
36require_once DOL_DOCUMENT_ROOT.
'/core/lib/report.lib.php';
37require_once DOL_DOCUMENT_ROOT.
'/core/lib/date.lib.php';
38require_once DOL_DOCUMENT_ROOT.
'/core/lib/accounting.lib.php';
39require_once DOL_DOCUMENT_ROOT.
'/accountancy/class/accountingjournal.class.php';
40require_once DOL_DOCUMENT_ROOT.
'/accountancy/class/accountingaccount.class.php';
41require_once DOL_DOCUMENT_ROOT.
'/compta/facture/class/facture.class.php';
42require_once DOL_DOCUMENT_ROOT.
'/societe/class/client.class.php';
43require_once DOL_DOCUMENT_ROOT.
'/accountancy/class/bookkeeping.class.php';
46$langs->loadLangs(array(
"commercial",
"compta",
"bills",
"other",
"accountancy",
"errors"));
49$action =
GETPOST(
'action',
'aZ09');
51$date_startmonth =
GETPOST(
'date_startmonth');
52$date_startday =
GETPOST(
'date_startday');
53$date_startyear =
GETPOST(
'date_startyear');
54$date_endmonth =
GETPOST(
'date_endmonth');
55$date_endday =
GETPOST(
'date_endday');
56$date_endyear =
GETPOST(
'date_endyear');
57$in_bookkeeping =
GETPOST(
'in_bookkeeping');
58if ($in_bookkeeping ==
'') {
59 $in_bookkeeping =
'notyet';
64$hookmanager->initHooks(array(
'sellsjournal'));
68if (!isModEnabled(
'accounting')) {
71if ($user->socid > 0) {
74if (!$user->hasRight(
'accounting',
'bind',
'write')) {
85$reshook = $hookmanager->executeHooks(
'doActions', $parameters, $user, $action);
91$accountingjournalstatic->fetch($id_journal);
92$journal = $accountingjournalstatic->code;
93$journal_label = $accountingjournalstatic->label;
95$date_start =
dol_mktime(0, 0, 0, $date_startmonth, $date_startday, $date_startyear);
96$date_end =
dol_mktime(23, 59, 59, $date_endmonth, $date_endday, $date_endyear);
98if (empty($date_startmonth)) {
101 $date_start = $dates[
'date_start'];
102 $pastmonthyear = $dates[
'pastmonthyear'];
103 $pastmonth = $dates[
'pastmonth'];
105if (empty($date_endmonth)) {
108 $date_end = $dates[
'date_end'];
109 $pastmonthyear = $dates[
'pastmonthyear'];
110 $pastmonth = $dates[
'pastmonth'];
116if (!GETPOSTISSET(
'date_startmonth') && (empty($date_start) || empty($date_end))) {
121$sql =
"SELECT f.rowid, f.ref, f.type, f.situation_cycle_ref, f.datef as df, f.ref_client, f.date_lim_reglement as dlr, f.close_code, f.retained_warranty, f.revenuestamp,";
122$sql .=
" fd.rowid as fdid, fd.description, fd.product_type, fd.total_ht, fd.total_tva, fd.total_localtax1, fd.total_localtax2, fd.tva_tx, fd.total_ttc, fd.situation_percent, fd.vat_src_code, fd.info_bits,";
123$sql .=
" s.rowid as socid, s.nom as name, s.code_client, s.code_fournisseur,";
125 $sql .=
" spe.accountancy_code_customer as code_compta,";
126 $sql .=
" spe.accountancy_code_supplier as code_compta_fournisseur,";
128 $sql .=
" s.code_compta as code_compta,";
129 $sql .=
" s.code_compta_fournisseur,";
131$sql .=
" p.rowid as pid, p.ref as pref, aa.rowid as fk_compte, aa.account_number as compte, aa.label as label_compte,";
133 $sql .=
" ppe.accountancy_code_sell";
135 $sql .=
" p.accountancy_code_sell";
137$parameters = array();
138$reshook = $hookmanager->executeHooks(
'printFieldListSelect', $parameters);
139$sql .= $hookmanager->resPrint;
140$sql .=
" FROM ".MAIN_DB_PREFIX.
"facturedet as fd";
141$sql .=
" LEFT JOIN ".MAIN_DB_PREFIX.
"product as p ON p.rowid = fd.fk_product";
143 $sql .=
" LEFT JOIN " . MAIN_DB_PREFIX .
"product_perentity as ppe ON ppe.fk_product = p.rowid AND ppe.entity = " . ((int) $conf->entity);
145$sql .=
" LEFT JOIN ".MAIN_DB_PREFIX.
"accounting_account as aa ON aa.rowid = fd.fk_code_ventilation";
146$sql .=
" JOIN ".MAIN_DB_PREFIX.
"facture as f ON f.rowid = fd.fk_facture";
147$sql .=
" JOIN ".MAIN_DB_PREFIX.
"societe as s ON s.rowid = f.fk_soc";
149 $sql .=
" LEFT JOIN " . MAIN_DB_PREFIX .
"societe_perentity as spe ON spe.fk_soc = s.rowid AND spe.entity = " . ((int) $conf->entity);
151$parameters = array();
152$reshook = $hookmanager->executeHooks(
'printFieldListFrom', $parameters);
153$sql .= $hookmanager->resPrint;
154$sql .=
" WHERE fd.fk_code_ventilation > 0";
155$sql .=
" AND f.entity IN (".getEntity(
'invoice', 0).
')';
156$sql .=
" AND f.fk_statut > 0";
162$sql .=
" AND fd.product_type IN (0,1)";
163if ($date_start && $date_end) {
164 $sql .=
" AND f.datef >= '".$db->idate($date_start).
"' AND f.datef <= '".$db->idate($date_end).
"'";
168 $sql .=
" AND f.datef >= '".$db->idate(
getDolGlobalString(
'ACCOUNTING_DATE_START_BINDING')).
"'";
171if ($in_bookkeeping ==
'already') {
172 $sql .=
" AND f.rowid IN (SELECT fk_doc FROM ".MAIN_DB_PREFIX.
"accounting_bookkeeping as ab WHERE ab.doc_type='customer_invoice')";
175if ($in_bookkeeping ==
'notyet') {
176 $sql .=
" AND f.rowid NOT IN (SELECT fk_doc FROM ".MAIN_DB_PREFIX.
"accounting_bookkeeping as ab WHERE ab.doc_type='customer_invoice')";
179$parameters = array();
180$reshook = $hookmanager->executeHooks(
'printFieldListWhere', $parameters);
181$sql .= $hookmanager->resPrint;
182$sql .=
" ORDER BY f.datef, f.ref";
185dol_syslog(
'accountancy/journal/sellsjournal.php', LOG_DEBUG);
186$result = $db->query($sql);
192 $tabwarranty = array();
193 $tabrevenuestamp = array();
195 $tablocaltax1 = array();
196 $tablocaltax2 = array();
197 $tabcompany = array();
198 $vatdata_cache = array();
200 $num = $db->num_rows($result);
208 $obj = $db->fetch_object($result);
211 $compta_soc = (!empty($obj->code_compta)) ? $obj->code_compta : $cptcli;
213 $compta_prod = $obj->compte;
214 if (empty($compta_prod)) {
215 if ($obj->product_type == 0) {
224 $tax_id = $obj->tva_tx . ($obj->vat_src_code ?
' (' . $obj->vat_src_code .
')' :
'');
225 if (array_key_exists($tax_id, $vatdata_cache)) {
226 $vatdata = $vatdata_cache[$tax_id];
231 $buyer->fetch($obj->socid);
237 $vatdata_cache[$tax_id] = $vatdata;
239 $compta_tva = (!empty($vatdata[
'accountancy_code_sell']) ? $vatdata[
'accountancy_code_sell'] : $cpttva);
240 $compta_localtax1 = (!empty($vatdata[
'accountancy_code_sell']) ? $vatdata[
'accountancy_code_sell'] : $cpttva);
241 $compta_localtax2 = (!empty($vatdata[
'accountancy_code_sell']) ? $vatdata[
'accountancy_code_sell'] : $cpttva);
244 if (
price2num($obj->tva_tx) || !empty($obj->vat_src_code)) {
245 $def_tva[$obj->rowid][$compta_tva][
vatrate($obj->tva_tx).($obj->vat_src_code ?
' ('.$obj->vat_src_code.
')' :
'')] = (
vatrate($obj->tva_tx).($obj->vat_src_code ?
' ('.$obj->vat_src_code.
')' :
''));
249 $situation_ratio = 1;
251 if ($obj->situation_cycle_ref) {
253 if ($obj->situation_percent == 0) {
254 $situation_ratio = 0;
257 $line->fetch($obj->fdid);
260 $prev_progress = $line->get_prev_progress($obj->rowid);
262 $situation_ratio = ($obj->situation_percent - $prev_progress) / $obj->situation_percent;
267 $revenuestamp = (float)
price2num($obj->revenuestamp,
'MT');
270 $tabfac[$obj->rowid][
"date"] = $db->jdate($obj->df);
271 $tabfac[$obj->rowid][
"datereg"] = $db->jdate($obj->dlr);
272 $tabfac[$obj->rowid][
"ref"] = $obj->ref;
273 $tabfac[$obj->rowid][
"type"] = $obj->type;
274 $tabfac[$obj->rowid][
"description"] = $obj->label_compte;
275 $tabfac[$obj->rowid][
"close_code"] = $obj->close_code;
276 $tabfac[$obj->rowid][
"revenuestamp"] = $revenuestamp;
280 if (!isset($tabttc[$obj->rowid][$compta_soc])) {
281 $tabttc[$obj->rowid][$compta_soc] = 0;
283 if (!isset($tabht[$obj->rowid][$compta_prod])) {
284 $tabht[$obj->rowid][$compta_prod] = 0;
286 if (!isset($tabtva[$obj->rowid][$compta_tva])) {
287 $tabtva[$obj->rowid][$compta_tva] = 0;
289 if (!isset($tablocaltax1[$obj->rowid][$compta_localtax1])) {
290 $tablocaltax1[$obj->rowid][$compta_localtax1] = 0;
292 if (!isset($tablocaltax2[$obj->rowid][$compta_localtax2])) {
293 $tablocaltax2[$obj->rowid][$compta_localtax2] = 0;
302 $total_ttc = $obj->total_ttc * $situation_ratio;
304 $total_ttc = $obj->total_ttc;
308 if (
getDolGlobalString(
'INVOICE_USE_RETAINED_WARRANTY') && $obj->retained_warranty > 0) {
309 $retained_warranty = (float)
price2num($total_ttc * $obj->retained_warranty / 100,
'MT');
310 $tabwarranty[$obj->rowid][$compta_soc] += $retained_warranty;
311 $total_ttc -= $retained_warranty;
314 $tabttc[$obj->rowid][$compta_soc] += $total_ttc;
315 $tabht[$obj->rowid][$compta_prod] += $obj->total_ht * $situation_ratio;
316 $tva_npr = ((($obj->info_bits & 1) == 1) ? 1 : 0);
319 $tabtva[$obj->rowid][$compta_tva] += $obj->total_tva;
320 $tablocaltax1[$obj->rowid][$compta_localtax1] += $obj->total_localtax1;
321 $tablocaltax2[$obj->rowid][$compta_localtax2] += $obj->total_localtax2;
323 $tabtva[$obj->rowid][$compta_tva] += $obj->total_tva * $situation_ratio;
324 $tablocaltax1[$obj->rowid][$compta_localtax1] += $obj->total_localtax1 * $situation_ratio;
325 $tablocaltax2[$obj->rowid][$compta_localtax2] += $obj->total_localtax2 * $situation_ratio;
329 $compta_revenuestamp =
'NotDefined';
330 if (!empty($revenuestamp)) {
331 $sqlrevenuestamp =
"SELECT accountancy_code_sell FROM ".MAIN_DB_PREFIX.
"c_revenuestamp";
332 $sqlrevenuestamp .=
" WHERE fk_pays = ".((int) $mysoc->country_id);
333 $sqlrevenuestamp .=
" AND taux = ".((float) $revenuestamp);
334 $sqlrevenuestamp .=
" AND active = 1";
335 $resqlrevenuestamp = $db->query($sqlrevenuestamp);
337 if ($resqlrevenuestamp) {
338 $num_rows_revenuestamp = $db->num_rows($resqlrevenuestamp);
339 if ($num_rows_revenuestamp > 1) {
340 dol_print_error($db,
'Failed 2 or more lines for the revenue stamp of your country. Check the dictionary of revenue stamp.');
342 $objrevenuestamp = $db->fetch_object($resqlrevenuestamp);
343 if ($objrevenuestamp) {
344 $compta_revenuestamp = $objrevenuestamp->accountancy_code_sell;
350 if (empty($tabrevenuestamp[$obj->rowid][$compta_revenuestamp]) && !empty($revenuestamp)) {
352 $tabttc[$obj->rowid][$compta_soc] += $obj->revenuestamp;
353 $tabrevenuestamp[$obj->rowid][$compta_revenuestamp] = $obj->revenuestamp;
356 $tabcompany[$obj->rowid] = array(
358 'name' => $obj->name,
359 'code_client' => $obj->code_client,
360 'code_compta' => $compta_soc
366 if ($i >
getDolGlobalInt(
'ACCOUNTANCY_MAX_TOO_MANY_LINES_TO_PROCESS', 10000)) {
368 setEventMessages(
"ErrorTooManyLinesToProcessPleaseUseAMoreSelectiveFilter",
null,
'errors');
379$errorforinvoice = array();
405 COUNT(fd.rowid) as nb
407 ".MAIN_DB_PREFIX.
"facturedet as fd
410 AND fd.fk_code_ventilation <= 0
411 AND fd.total_ttc <> 0
412 AND fk_facture IN (".$db->sanitize(implode(
",", array_keys($tabfac))).
")
415$resql = $db->query($sql);
417 $num = $db->num_rows($resql);
420 $obj = $db->fetch_object($resql);
422 $errorforinvoice[$obj->fk_facture_fourn] =
'somelinesarenotbound';
430if ($action ==
'writebookkeeping' && !$error && $user->hasRight(
'accounting',
'bind',
'write')) {
434 $companystatic =
new Societe($db);
435 $invoicestatic =
new Facture($db);
438 $accountingaccountcustomer->fetch(
null,
getDolGlobalString(
'ACCOUNTING_ACCOUNT_CUSTOMER'),
true);
441 $accountingaccountcustomerwarranty->fetch(
null,
getDolGlobalString(
'ACCOUNTING_ACCOUNT_CUSTOMER_RETAINED_WARRANTY'),
true);
443 foreach ($tabfac as $key => $val) {
451 $companystatic->id = $tabcompany[$key][
'id'];
452 $companystatic->name = $tabcompany[$key][
'name'];
453 $companystatic->code_compta = $tabcompany[$key][
'code_compta'];
454 $companystatic->code_compta_client = $tabcompany[$key][
'code_compta'];
455 $companystatic->code_client = $tabcompany[$key][
'code_client'];
456 $companystatic->client = 3;
458 $invoicestatic->id = $key;
459 $invoicestatic->ref = (string) $val[
"ref"];
460 $invoicestatic->type = $val[
"type"];
461 $invoicestatic->close_code = $val[
"close_code"];
466 $replacedinvoice = 0;
467 if ($invoicestatic->close_code == Facture::CLOSECODE_REPLACED) {
468 $replacedinvoice = 1;
469 $alreadydispatched = $invoicestatic->getVentilExportCompta();
470 if ($alreadydispatched) {
471 $replacedinvoice = 2;
476 if ($replacedinvoice == 1) {
482 if (isset($errorforinvoice[$key]) && $errorforinvoice[$key] ==
'somelinesarenotbound') {
485 setEventMessages($langs->trans(
'ErrorInvoiceContainsLinesNotYetBounded', $val[
'ref']),
null,
'errors');
490 if (isset($tabwarranty[$key]) && is_array($tabwarranty[$key])) {
491 foreach ($tabwarranty[$key] as $k => $mt) {
493 $bookkeeping->doc_date = $val[
"date"];
494 $bookkeeping->date_lim_reglement = $val[
"datereg"];
495 $bookkeeping->doc_ref = $val[
"ref"];
496 $bookkeeping->date_creation = $now;
497 $bookkeeping->doc_type =
'customer_invoice';
498 $bookkeeping->fk_doc = $key;
499 $bookkeeping->fk_docdet = 0;
500 $bookkeeping->thirdparty_code = $companystatic->code_client;
502 $bookkeeping->subledger_account = $tabcompany[$key][
'code_compta'];
503 $bookkeeping->subledger_label = $tabcompany[$key][
'name'];
505 $bookkeeping->numero_compte =
getDolGlobalString(
'ACCOUNTING_ACCOUNT_CUSTOMER_RETAINED_WARRANTY');
506 $bookkeeping->label_compte = $accountingaccountcustomerwarranty->label;
508 $bookkeeping->label_operation =
dol_trunc($companystatic->name, 16) .
' - ' . $invoicestatic->ref .
' - ' . $langs->trans(
"RetainedWarranty");
509 $bookkeeping->montant = $mt;
510 $bookkeeping->sens = ($mt >= 0) ?
'D' :
'C';
511 $bookkeeping->debit = ($mt >= 0) ? $mt : 0;
512 $bookkeeping->credit = ($mt < 0) ? -$mt : 0;
513 $bookkeeping->code_journal = $journal;
514 $bookkeeping->journal_label = $langs->transnoentities($journal_label);
515 $bookkeeping->fk_user_author = $user->id;
516 $bookkeeping->entity = $conf->entity;
518 $totaldebit += $bookkeeping->debit;
519 $totalcredit += $bookkeeping->credit;
521 $result = $bookkeeping->create($user);
523 if ($bookkeeping->error ==
'BookkeepingRecordAlreadyExists') {
526 $errorforinvoice[$key] =
'alreadyjournalized';
531 $errorforinvoice[$key] =
'other';
540 if (!$errorforline) {
541 foreach ($tabttc[$key] as $k => $mt) {
543 $bookkeeping->doc_date = $val[
"date"];
544 $bookkeeping->date_lim_reglement = $val[
"datereg"];
545 $bookkeeping->doc_ref = $val[
"ref"];
546 $bookkeeping->date_creation = $now;
547 $bookkeeping->doc_type =
'customer_invoice';
548 $bookkeeping->fk_doc = $key;
549 $bookkeeping->fk_docdet = 0;
550 $bookkeeping->thirdparty_code = $companystatic->code_client;
552 $bookkeeping->subledger_account = $tabcompany[$key][
'code_compta'];
553 $bookkeeping->subledger_label = $tabcompany[$key][
'name'];
556 $bookkeeping->label_compte = $accountingaccountcustomer->label;
558 $bookkeeping->label_operation =
dol_trunc($companystatic->name, 16).
' - '.$invoicestatic->ref.
' - '.$langs->trans(
"SubledgerAccount");
559 $bookkeeping->montant = $mt;
560 $bookkeeping->sens = ($mt >= 0) ?
'D' :
'C';
561 $bookkeeping->debit = ($mt >= 0) ? $mt : 0;
562 $bookkeeping->credit = ($mt < 0) ? -$mt : 0;
563 $bookkeeping->code_journal = $journal;
564 $bookkeeping->journal_label = $langs->transnoentities($journal_label);
565 $bookkeeping->fk_user_author = $user->id;
566 $bookkeeping->entity = $conf->entity;
568 $totaldebit += $bookkeeping->debit;
569 $totalcredit += $bookkeeping->credit;
571 $result = $bookkeeping->create($user);
573 if ($bookkeeping->error ==
'BookkeepingRecordAlreadyExists') {
576 $errorforinvoice[$key] =
'alreadyjournalized';
581 $errorforinvoice[$key] =
'other';
586 require_once DOL_DOCUMENT_ROOT .
'/accountancy/class/lettering.class.php';
589 $nb_lettering = $lettering_static->bookkeepingLettering(array($bookkeeping->id));
596 if (!$errorforline) {
597 foreach ($tabht[$key] as $k => $mt) {
598 if (empty($conf->cache[
'accountingaccountincurrententity'][$k])) {
600 $accountingaccount->fetch(0, $k,
true);
601 $conf->cache[
'accountingaccountincurrententity'][$k] = $accountingaccount;
603 $accountingaccount = $conf->cache[
'accountingaccountincurrententity'][$k];
606 $label_account = $accountingaccount->label;
609 if ($accountingaccount->id > 0) {
611 $bookkeeping->doc_date = $val[
"date"];
612 $bookkeeping->date_lim_reglement = $val[
"datereg"];
613 $bookkeeping->doc_ref = $val[
"ref"];
614 $bookkeeping->date_creation = $now;
615 $bookkeeping->doc_type =
'customer_invoice';
616 $bookkeeping->fk_doc = $key;
617 $bookkeeping->fk_docdet = 0;
618 $bookkeeping->thirdparty_code = $companystatic->code_client;
622 $bookkeeping->subledger_account = $tabcompany[$key][
'code_compta'];
623 $bookkeeping->subledger_label = $tabcompany[$key][
'name'];
625 $bookkeeping->subledger_account =
'';
626 $bookkeeping->subledger_label =
'';
629 $bookkeeping->subledger_account =
'';
630 $bookkeeping->subledger_label =
'';
633 $bookkeeping->numero_compte = $k;
634 $bookkeeping->label_compte = $label_account;
636 $bookkeeping->label_operation =
dol_trunc($companystatic->name, 16).
' - '.$invoicestatic->ref.
' - '.$label_account;
637 $bookkeeping->montant = $mt;
638 $bookkeeping->sens = ($mt < 0) ?
'D' :
'C';
639 $bookkeeping->debit = ($mt < 0) ? -$mt : 0;
640 $bookkeeping->credit = ($mt >= 0) ? $mt : 0;
641 $bookkeeping->code_journal = $journal;
642 $bookkeeping->journal_label = $langs->transnoentities($journal_label);
643 $bookkeeping->fk_user_author = $user->id;
644 $bookkeeping->entity = $conf->entity;
646 $totaldebit += $bookkeeping->debit;
647 $totalcredit += $bookkeeping->credit;
649 $result = $bookkeeping->create($user);
651 if ($bookkeeping->error ==
'BookkeepingRecordAlreadyExists') {
654 $errorforinvoice[$key] =
'alreadyjournalized';
659 $errorforinvoice[$key] =
'other';
668 if (!$errorforline) {
669 $listoftax = array(0, 1, 2);
670 foreach ($listoftax as $numtax) {
671 $arrayofvat = $tabtva;
673 $arrayofvat = $tablocaltax1;
676 $arrayofvat = $tablocaltax2;
679 foreach ($arrayofvat[$key] as $k => $mt) {
681 $accountingaccount->fetch(
null, $k,
true);
682 $label_account = $accountingaccount->label;
685 $bookkeeping->doc_date = $val[
"date"];
686 $bookkeeping->date_lim_reglement = $val[
"datereg"];
687 $bookkeeping->doc_ref = $val[
"ref"];
688 $bookkeeping->date_creation = $now;
689 $bookkeeping->doc_type =
'customer_invoice';
690 $bookkeeping->fk_doc = $key;
691 $bookkeeping->fk_docdet = 0;
692 $bookkeeping->thirdparty_code = $companystatic->code_client;
694 $bookkeeping->subledger_account =
'';
695 $bookkeeping->subledger_label =
'';
697 $bookkeeping->numero_compte = $k;
698 $bookkeeping->label_compte = $label_account;
701 $bookkeeping->label_operation =
dol_trunc($companystatic->name, 16).
' - '.$invoicestatic->ref;
702 $tmpvatrate = (empty($def_tva[$key][$k]) ? (empty($arrayofvat[$key][$k]) ?
'' : $arrayofvat[$key][$k]) : implode(
', ', $def_tva[$key][$k]));
703 $bookkeeping->label_operation .=
' - '.$langs->trans(
"Taxes").
' '.$tmpvatrate.
' %';
704 $bookkeeping->label_operation .= ($numtax ?
' - Localtax '.$numtax :
'');
706 $bookkeeping->montant = $mt;
707 $bookkeeping->sens = ($mt < 0) ?
'D' :
'C';
708 $bookkeeping->debit = ($mt < 0) ? -$mt : 0;
709 $bookkeeping->credit = ($mt >= 0) ? $mt : 0;
710 $bookkeeping->code_journal = $journal;
711 $bookkeeping->journal_label = $langs->transnoentities($journal_label);
712 $bookkeeping->fk_user_author = $user->id;
713 $bookkeeping->entity = $conf->entity;
715 $totaldebit += $bookkeeping->debit;
716 $totalcredit += $bookkeeping->credit;
718 $result = $bookkeeping->create($user);
720 if ($bookkeeping->error ==
'BookkeepingRecordAlreadyExists') {
723 $errorforinvoice[$key] =
'alreadyjournalized';
728 $errorforinvoice[$key] =
'other';
738 if (!$errorforline) {
739 if (isset($tabrevenuestamp[$key]) && is_array($tabrevenuestamp[$key])) {
740 foreach ($tabrevenuestamp[$key] as $k => $mt) {
742 $accountingaccount->fetch(
null, $k,
true);
743 $label_account = $accountingaccount->label;
746 $bookkeeping->doc_date = $val[
"date"];
747 $bookkeeping->date_lim_reglement = $val[
"datereg"];
748 $bookkeeping->doc_ref = $val[
"ref"];
749 $bookkeeping->date_creation = $now;
750 $bookkeeping->doc_type =
'customer_invoice';
751 $bookkeeping->fk_doc = $key;
752 $bookkeeping->fk_docdet = 0;
753 $bookkeeping->thirdparty_code = $companystatic->code_client;
755 $bookkeeping->subledger_account =
'';
756 $bookkeeping->subledger_label =
'';
758 $bookkeeping->numero_compte = $k;
759 $bookkeeping->label_compte = $label_account;
761 $bookkeeping->label_operation =
dol_trunc($companystatic->name, 16) .
' - ' . $invoicestatic->ref .
' - ' . $langs->trans(
"RevenueStamp");
762 $bookkeeping->montant = $mt;
763 $bookkeeping->sens = ($mt < 0) ?
'D' :
'C';
764 $bookkeeping->debit = ($mt < 0) ? -$mt : 0;
765 $bookkeeping->credit = ($mt >= 0) ? $mt : 0;
766 $bookkeeping->code_journal = $journal;
767 $bookkeeping->journal_label = $langs->transnoentities($journal_label);
768 $bookkeeping->fk_user_author = $user->id;
769 $bookkeeping->entity = $conf->entity;
771 $totaldebit += $bookkeeping->debit;
772 $totalcredit += $bookkeeping->credit;
774 $result = $bookkeeping->create($user);
776 if ($bookkeeping->error ==
'BookkeepingRecordAlreadyExists') {
779 $errorforinvoice[$key] =
'alreadyjournalized';
784 $errorforinvoice[$key] =
'other';
794 if (!$errorforline && (
price2num($totaldebit,
'MT') !=
price2num($totalcredit,
'MT'))) {
797 $errorforinvoice[$key] =
'amountsnotbalanced';
798 setEventMessages(
'We Tried to insert a non balanced transaction in book for '.$invoicestatic->ref.
'. Canceled. Surely a bug.',
null,
'errors');
801 if (!$errorforline) {
807 setEventMessages($langs->trans(
"ErrorTooManyErrorsProcessStopped"),
null,
'errors');
815 if (empty($error) && count($tabpay) > 0) {
817 } elseif (count($tabpay) == $error) {
820 setEventMessages($langs->trans(
"GeneralLedgerSomeRecordWasNotRecorded"),
null,
'warnings');
826 if (count($tabpay) != $error) {
827 $param =
'id_journal='.$id_journal;
828 $param .=
'&date_startday='.$date_startday;
829 $param .=
'&date_startmonth='.$date_startmonth;
830 $param .=
'&date_startyear='.$date_startyear;
831 $param .=
'&date_endday='.$date_endday;
832 $param .=
'&date_endmonth='.$date_endmonth;
833 $param .=
'&date_endyear='.$date_endyear;
834 $param .=
'&in_bookkeeping='.$in_bookkeeping;
835 header(
"Location: ".$_SERVER[
'PHP_SELF'].($param ?
'?'.$param :
''));
846$form =
new Form($db);
849if ($action ==
'exportcsv' && !$error) {
853 $filename =
'journal';
854 $type_export =
'journal';
855 include DOL_DOCUMENT_ROOT.
'/accountancy/tpl/export_journal.tpl.php';
857 $companystatic =
new Client($db);
858 $invoicestatic =
new Facture($db);
860 foreach ($tabfac as $key => $val) {
861 $companystatic->id = $tabcompany[$key][
'id'];
862 $companystatic->name = $tabcompany[$key][
'name'];
863 $companystatic->code_compta = $tabcompany[$key][
'code_compta'];
864 $companystatic->code_compta_client = $tabcompany[$key][
'code_compta'];
865 $companystatic->code_client = $tabcompany[$key][
'code_client'];
866 $companystatic->client = 3;
868 $invoicestatic->id = $key;
869 $invoicestatic->ref = (string) $val[
"ref"];
870 $invoicestatic->type = $val[
"type"];
871 $invoicestatic->close_code = $val[
"close_code"];
876 $replacedinvoice = 0;
877 if ($invoicestatic->close_code == Facture::CLOSECODE_REPLACED) {
878 $replacedinvoice = 1;
879 $alreadydispatched = $invoicestatic->getVentilExportCompta();
880 if ($alreadydispatched) {
881 $replacedinvoice = 2;
886 if ($replacedinvoice == 1) {
891 if (
getDolGlobalString(
'INVOICE_USE_RETAINED_WARRANTY') && isset($tabwarranty[$key])) {
892 foreach ($tabwarranty[$key] as $k => $mt) {
894 print
'"'.$key.
'"'.$sep;
895 print
'"'.$date.
'"'.$sep;
896 print
'"'.$val[
"ref"].
'"'.$sep;
897 print
'"'.mb_convert_encoding(
dol_trunc($companystatic->name, 32),
'ISO-8859-1').
'"'.$sep;
898 print
'"'.length_accounta(html_entity_decode($k)).
'"'.$sep;
899 print
'"'.length_accountg(
getDolGlobalString(
'ACCOUNTING_ACCOUNT_CUSTOMER_RETAINED_WARRANTY')).
'"'.$sep;
900 print
'"'.length_accounta(html_entity_decode($k)).
'"'.$sep;
901 print
'"'.$langs->trans(
"Thirdparty").
'"'.$sep;
902 print
'"'.mb_convert_encoding(
dol_trunc($companystatic->name, 16),
'ISO-8859-1').
' - '.$invoicestatic->ref.
' - '.$langs->trans(
"RetainedWarranty").
'"'.$sep;
903 print
'"'.($mt >= 0 ?
price($mt) :
'').
'"'.$sep;
904 print
'"'.($mt < 0 ?
price(-$mt) :
'').
'"'.$sep;
905 print
'"'.$journal.
'"';
912 foreach ($tabttc[$key] as $k => $mt) {
914 print
'"'.$key.
'"'.$sep;
915 print
'"'.$date.
'"'.$sep;
916 print
'"'.$val[
"ref"].
'"'.$sep;
917 print
'"'.mb_convert_encoding(
dol_trunc($companystatic->name, 32),
'ISO-8859-1').
'"'.$sep;
918 print
'"'.length_accounta(html_entity_decode($k)).
'"'.$sep;
919 print
'"'.length_accountg(
getDolGlobalString(
'ACCOUNTING_ACCOUNT_CUSTOMER')).
'"'.$sep;
920 print
'"'.length_accounta(html_entity_decode($k)).
'"'.$sep;
921 print
'"'.$langs->trans(
"Thirdparty").
'"'.$sep;
922 print
'"'.mb_convert_encoding(
dol_trunc($companystatic->name, 16),
'ISO-8859-1').
' - '.$invoicestatic->ref.
' - '.$langs->trans(
"Thirdparty").
'"'.$sep;
923 print
'"'.($mt >= 0 ?
price($mt) :
'').
'"'.$sep;
924 print
'"'.($mt < 0 ?
price(-$mt) :
'').
'"'.$sep;
925 print
'"'.$journal.
'"';
931 foreach ($tabht[$key] as $k => $mt) {
933 $accountingaccount->fetch(
null, $k,
true);
935 print
'"'.$key.
'"'.$sep;
936 print
'"'.$date.
'"'.$sep;
937 print
'"'.$val[
"ref"].
'"'.$sep;
938 print
'"'.mb_convert_encoding(
dol_trunc($companystatic->name, 32),
'ISO-8859-1').
'"'.$sep;
939 print
'"'.length_accountg(html_entity_decode($k)).
'"'.$sep;
940 print
'"'.length_accountg(html_entity_decode($k)).
'"'.$sep;
942 print
'"'.mb_convert_encoding(
dol_trunc($accountingaccount->label, 32),
'ISO-8859-1').
'"'.$sep;
943 print
'"'.mb_convert_encoding(
dol_trunc($companystatic->name, 16),
'ISO-8859-1').
' - '.
dol_trunc($accountingaccount->label, 32).
'"'.$sep;
944 print
'"'.($mt < 0 ?
price(-$mt) :
'').
'"'.$sep;
945 print
'"'.($mt >= 0 ?
price($mt) :
'').
'"'.$sep;
946 print
'"'.$journal.
'"';
952 $listoftax = array(0, 1, 2);
953 foreach ($listoftax as $numtax) {
954 $arrayofvat = $tabtva;
956 $arrayofvat = $tablocaltax1;
959 $arrayofvat = $tablocaltax2;
962 foreach ($arrayofvat[$key] as $k => $mt) {
964 print
'"'.$key.
'"'.$sep;
965 print
'"'.$date.
'"'.$sep;
966 print
'"'.$val[
"ref"].
'"'.$sep;
967 print
'"'.mb_convert_encoding(
dol_trunc($companystatic->name, 32),
'ISO-8859-1').
'"'.$sep;
968 print
'"'.length_accountg(html_entity_decode($k)).
'"'.$sep;
969 print
'"'.length_accountg(html_entity_decode($k)).
'"'.$sep;
971 print
'"'.$langs->trans(
"VAT").
' - '.implode(
', ', $def_tva[$key][$k]).
' %"'.$sep;
972 print
'"'.mb_convert_encoding(
dol_trunc($companystatic->name, 16),
'ISO-8859-1').
' - '.$invoicestatic->ref.
' - '.$langs->trans(
"VAT").implode(
', ', $def_tva[$key][$k]).
' %'.($numtax ?
' - Localtax '.$numtax :
'').
'"'.$sep;
973 print
'"'.($mt < 0 ?
price(-$mt) :
'').
'"'.$sep;
974 print
'"'.($mt >= 0 ?
price($mt) :
'').
'"'.$sep;
975 print
'"'.$journal.
'"';
982 if (isset($tabrevenuestamp[$key])) {
983 foreach ($tabrevenuestamp[$key] as $k => $mt) {
985 print
'"'.$key.
'"'.$sep;
986 print
'"'.$date.
'"'.$sep;
987 print
'"'.$val[
"ref"].
'"'.$sep;
988 print
'"'.mb_convert_encoding(
dol_trunc($companystatic->name, 32),
'ISO-8859-1').
'"'.$sep;
989 print
'"'.length_accountg(html_entity_decode($k)).
'"'.$sep;
990 print
'"'.length_accountg(html_entity_decode($k)).
'"'.$sep;
992 print
'"'.$langs->trans(
"RevenueStamp").
'"'.$sep;
993 print
'"'.mb_convert_encoding(
dol_trunc($companystatic->name, 16),
'ISO-8859-1').
' - '.$invoicestatic->ref.
' - '.$langs->trans(
"RevenueStamp").
'"'.$sep;
994 print
'"'.($mt < 0 ?
price(-$mt) :
'').
'"'.$sep;
995 print
'"'.($mt >= 0 ?
price($mt) :
'').
'"'.$sep;
996 print
'"'.$journal.
'"';
1006if (empty($action) || $action ==
'view') {
1007 $title = $langs->trans(
"GenerationOfAccountingEntries").
' - '.$accountingjournalstatic->getNomUrl(0, 2, 1,
'', 1);
1008 $help_url =
'EN:Module_Double_Entry_Accounting|FR:Module_Comptabilité_en_Partie_Double#Génération_des_écritures_en_comptabilité';
1016 $description = $langs->trans(
"DescJournalOnlyBindedVisible").
'<br>';
1018 $description .= $langs->trans(
"DepositsAreNotIncluded");
1020 $description .= $langs->trans(
"DepositsAreIncluded");
1023 $listofchoices = array(
'notyet' => $langs->trans(
"NotYetInGeneralLedger"),
'already' => $langs->trans(
"AlreadyInGeneralLedger"));
1024 $period = $form->selectDate($date_start ? $date_start : -1,
'date_start', 0, 0, 0,
'', 1, 0).
' - '.$form->selectDate($date_end ? $date_end : -1,
'date_end', 0, 0, 0,
'', 1, 0);
1025 $period .=
' - '.$langs->trans(
"JournalizationInLedgerStatus").
' '.$form->selectarray(
'in_bookkeeping', $listofchoices, $in_bookkeeping, 1);
1027 $varlink =
'id_journal='.$id_journal;
1029 journalHead($nom, $nomlink, $period, $periodlink, $description, $builddate, $exportlink, array(
'action' =>
''),
'', $varlink);
1034 $sql =
"SELECT COUNT(rowid) as nb FROM ".MAIN_DB_PREFIX.
"accounting_fiscalyear WHERE entity = ".((int) $conf->entity);
1035 $resql = $db->query($sql);
1037 $obj = $db->fetch_object($resql);
1038 if ($obj->nb == 0) {
1039 print
'<br><div class="warning">'.img_warning().
' '.$langs->trans(
"TheFiscalPeriodIsNotDefined");
1040 $desc =
' : '.$langs->trans(
"AccountancyAreaDescFiscalPeriod", 4,
'{link}');
1041 $desc = str_replace(
'{link}',
'<strong>'.$langs->transnoentitiesnoconv(
"MenuAccountancy").
'-'.$langs->transnoentitiesnoconv(
"Setup").
"-".$langs->transnoentitiesnoconv(
"FiscalPeriod").
'</strong>', $desc);
1051 $acctCustomerNotConfigured = in_array(
getDolGlobalString(
'ACCOUNTING_ACCOUNT_CUSTOMER'), [
'',
'-1']);
1052 if ($acctCustomerNotConfigured) {
1053 print
'<br><div class="warning">'.img_warning().
' '.$langs->trans(
"SomeMandatoryStepsOfSetupWereNotDone");
1054 $desc =
' : '.$langs->trans(
"AccountancyAreaDescMisc", 4,
'{link}');
1055 $desc = str_replace(
'{link}',
'<strong>'.$langs->transnoentitiesnoconv(
"MenuAccountancy").
'-'.$langs->transnoentitiesnoconv(
"Setup").
"-".$langs->transnoentitiesnoconv(
"MenuDefaultAccounts").
'</strong>', $desc);
1059 print
'<br><div class="tabsAction tabsActionNoBottom centerimp">';
1060 if (
getDolGlobalString(
'ACCOUNTING_ENABLE_EXPORT_DRAFT_JOURNAL') && $in_bookkeeping ==
'notyet') {
1061 print
'<input type="button" class="butAction" name="exportcsv" value="'.$langs->trans(
"ExportDraftJournal").
'" onclick="launch_export();" />';
1063 if ($acctCustomerNotConfigured) {
1064 print
'<input type="button" class="butActionRefused classfortooltip" title="'.dol_escape_htmltag($langs->trans(
"SomeMandatoryStepsOfSetupWereNotDone")).
'" value="'.$langs->trans(
"WriteBookKeeping").
'" />';
1066 if ($in_bookkeeping ==
'notyet') {
1067 print
'<input type="button" class="butAction" name="writebookkeeping" value="'.$langs->trans(
"WriteBookKeeping").
'" onclick="writebookkeeping();" />';
1069 print
'<a href="#" class="butActionRefused classfortooltip" name="writebookkeeping">'.$langs->trans(
"WriteBookKeeping").
'</a>';
1076 <script type="text/javascript">
1077 function launch_export() {
1078 $("div.fiche form input[name=\"action\"]").val("exportcsv");
1079 $("div.fiche form input[type=\"submit\"]").click();
1080 $("div.fiche form input[name=\"action\"]").val("");
1082 function writebookkeeping() {
1083 console.log("click on writebookkeeping");
1084 $("div.fiche form input[name=\"action\"]").val("writebookkeeping");
1085 $("div.fiche form input[type=\"submit\"]").click();
1086 $("div.fiche form input[name=\"action\"]").val("");
1095 print
'<div class="div-table-responsive">';
1096 print
"<table class=\"noborder\" width=\"100%\">";
1097 print
"<tr class=\"liste_titre\">";
1098 print
"<td>".$langs->trans(
"Date").
"</td>";
1099 print
"<td>".$langs->trans(
"Piece").
' ('.$langs->trans(
"InvoiceRef").
")</td>";
1100 print
"<td>".$langs->trans(
"AccountAccounting").
"</td>";
1101 print
"<td>".$langs->trans(
"SubledgerAccount").
"</td>";
1102 print
"<td>".$langs->trans(
"LabelOperation").
"</td>";
1103 print
'<td class="center">'.$langs->trans(
"AccountingDebit").
"</td>";
1104 print
'<td class="center">'.$langs->trans(
"AccountingCredit").
"</td>";
1109 $companystatic =
new Client($db);
1110 $invoicestatic =
new Facture($db);
1112 foreach ($tabfac as $key => $val) {
1113 $companystatic->id = $tabcompany[$key][
'id'];
1114 $companystatic->name = $tabcompany[$key][
'name'];
1115 $companystatic->code_compta = $tabcompany[$key][
'code_compta'];
1116 $companystatic->code_compta_client = $tabcompany[$key][
'code_compta'];
1117 $companystatic->code_client = $tabcompany[$key][
'code_client'];
1118 $companystatic->client = 3;
1120 $invoicestatic->id = $key;
1121 $invoicestatic->ref = (string) $val[
"ref"];
1122 $invoicestatic->type = $val[
"type"];
1123 $invoicestatic->close_code = $val[
"close_code"];
1128 $replacedinvoice = 0;
1129 if ($invoicestatic->close_code == Facture::CLOSECODE_REPLACED) {
1130 $replacedinvoice = 1;
1131 $alreadydispatched = $invoicestatic->getVentilExportCompta();
1132 if ($alreadydispatched) {
1133 $replacedinvoice = 2;
1138 if ($replacedinvoice == 1) {
1139 print
'<tr class="oddeven">';
1140 print
"<!-- Replaced invoice -->";
1141 print
"<td>".$date.
"</td>";
1142 print
"<td><strike>".$invoicestatic->getNomUrl(1).
"</strike></td>";
1145 print $langs->trans(
"Replaced");
1152 print
'<td class="right"></td>';
1153 print
'<td class="right"></td>';
1159 if (isset($errorforinvoice[$key]) && $errorforinvoice[$key] ==
'somelinesarenotbound') {
1160 print
'<tr class="oddeven">';
1161 print
"<!-- Some lines are not bound -->";
1162 print
"<td>".$date.
"</td>";
1163 print
"<td>".$invoicestatic->getNomUrl(1).
"</td>";
1166 print
'<span class="error">'.$langs->trans(
'ErrorInvoiceContainsLinesNotYetBoundedShort', $val[
'ref']).
'</span>';
1173 print
'<td class="right"></td>';
1174 print
'<td class="right"></td>';
1181 if (
getDolGlobalString(
'INVOICE_USE_RETAINED_WARRANTY') && isset($tabwarranty[$key]) && is_array($tabwarranty[$key])) {
1182 foreach ($tabwarranty[$key] as $k => $mt) {
1183 print
'<tr class="oddeven">';
1184 print
"<!-- Thirdparty warranty -->";
1185 print
"<td>" . $date .
"</td>";
1186 print
"<td>" . $invoicestatic->getNomUrl(1) .
"</td>";
1190 if (($accountoshow ==
"") || $accountoshow ==
'NotDefined') {
1191 print
'<span class="error">' . $langs->trans(
"MainAccountForRetainedWarrantyNotDefined") .
'</span>';
1193 print $accountoshow;
1199 if (($accountoshow ==
"") || $accountoshow ==
'NotDefined') {
1200 print
'<span class="error">' . $langs->trans(
"ThirdpartyAccountNotDefined") .
'</span>';
1202 print $accountoshow;
1205 print
"<td>" . $companystatic->getNomUrl(0,
'customer', 16) .
' - ' . $invoicestatic->ref .
' - ' . $langs->trans(
"RetainedWarranty") .
"</td>";
1206 print
'<td class="right nowraponall amount">' . ($mt >= 0 ?
price($mt) :
'') .
"</td>";
1207 print
'<td class="right nowraponall amount">' . ($mt < 0 ?
price(-$mt) :
'') .
"</td>";
1213 foreach ($tabttc[$key] as $k => $mt) {
1214 print
'<tr class="oddeven">';
1215 print
"<!-- Thirdparty -->";
1216 print
"<td>".$date.
"</td>";
1217 print
"<td>".$invoicestatic->getNomUrl(1).
"</td>";
1221 if (($accountoshow ==
"") || $accountoshow ==
'NotDefined') {
1222 print
'<span class="error">'.$langs->trans(
"MainAccountForCustomersNotDefined").
'</span>';
1224 print $accountoshow;
1230 if (($accountoshow ==
"") || $accountoshow ==
'NotDefined') {
1231 print
'<span class="error">'.$langs->trans(
"ThirdpartyAccountNotDefined").
'</span>';
1233 print $accountoshow;
1236 print
"<td>".$companystatic->getNomUrl(0,
'customer', 16).
' - '.$invoicestatic->ref.
' - '.$langs->trans(
"SubledgerAccount").
"</td>";
1237 print
'<td class="right nowraponall amount">'.($mt >= 0 ?
price($mt) :
'').
"</td>";
1238 print
'<td class="right nowraponall amount">'.($mt < 0 ?
price(-$mt) :
'').
"</td>";
1245 foreach ($tabht[$key] as $k => $mt) {
1246 if (empty($conf->cache[
'accountingaccountincurrententity'][$k])) {
1248 $accountingaccount->fetch(0, $k,
true);
1249 $conf->cache[
'accountingaccountincurrententity'][$k] = $accountingaccount;
1251 $accountingaccount = $conf->cache[
'accountingaccountincurrententity'][$k];
1254 print
'<tr class="oddeven">';
1255 print
"<!-- Product -->";
1256 print
"<td>".$date.
"</td>";
1257 print
"<td>".$invoicestatic->getNomUrl(1).
"</td>";
1261 if (($accountoshow ==
"") || $accountoshow ==
'NotDefined') {
1262 print
'<span class="error">'.$langs->trans(
"ProductNotDefined").
'</span>';
1264 print $accountoshow;
1273 } elseif (($accountoshow ==
"") || $accountoshow ==
'NotDefined') {
1274 print
'<span class="error">' . $langs->trans(
"ThirdpartyAccountNotDefined") .
'</span>';
1277 $companystatic->id = $tabcompany[$key][
'id'];
1278 $companystatic->name = $tabcompany[$key][
'name'];
1279 print
"<td>".$companystatic->getNomUrl(0,
'customer', 16).
' - '.$invoicestatic->ref.
' - '.$accountingaccount->label.
"</td>";
1280 print
'<td class="right nowraponall amount">'.($mt < 0 ?
price(-$mt) :
'').
"</td>";
1281 print
'<td class="right nowraponall amount">'.($mt >= 0 ?
price($mt) :
'').
"</td>";
1288 $listoftax = array(0, 1, 2);
1289 foreach ($listoftax as $numtax) {
1290 $arrayofvat = $tabtva;
1292 $arrayofvat = $tablocaltax1;
1295 $arrayofvat = $tablocaltax2;
1299 foreach ($arrayofvat[$key] as $k => $mt) {
1301 print
'<tr class="oddeven">';
1302 print
"<!-- VAT -->";
1303 print
"<td>".$date.
"</td>";
1304 print
"<td>".$invoicestatic->getNomUrl(1).
"</td>";
1308 if (($accountoshow ==
"") || $accountoshow ==
'NotDefined') {
1309 print
'<span class="error">'.$langs->trans(
"VATAccountNotDefined").
' ('.$langs->trans(
"AccountingJournalType2").
')</span>';
1311 print $accountoshow;
1317 print
"<td>".$companystatic->getNomUrl(0,
'customer', 16).
' - '.$invoicestatic->ref;
1320 $tmpvatrate = (empty($def_tva[$key][$k]) ? (empty($arrayofvat[$key][$k]) ?
'' : $arrayofvat[$key][$k]) : implode(
', ', $def_tva[$key][$k]));
1321 print
' - '.$langs->trans(
"Taxes").
' '.$tmpvatrate.
' %';
1322 print($numtax ?
' - Localtax '.$numtax :
'');
1324 print
'<td class="right nowraponall amount">'.($mt < 0 ?
price(-$mt) :
'').
"</td>";
1325 print
'<td class="right nowraponall amount">'.($mt >= 0 ?
price($mt) :
'').
"</td>";
1334 if (isset($tabrevenuestamp[$key]) && is_array($tabrevenuestamp[$key])) {
1335 foreach ($tabrevenuestamp[$key] as $k => $mt) {
1336 print
'<tr class="oddeven">';
1337 print
"<!-- Thirdparty revenuestamp -->";
1338 print
"<td>" . $date .
"</td>";
1339 print
"<td>" . $invoicestatic->getNomUrl(1) .
"</td>";
1343 if (($accountoshow ==
"") || $accountoshow ==
'NotDefined') {
1344 print
'<span class="error">' . $langs->trans(
"MainAccountForRevenueStampSaleNotDefined") .
'</span>';
1346 print $accountoshow;
1352 print
"<td>" . $companystatic->getNomUrl(0,
'customer', 16) .
' - ' . $invoicestatic->ref .
' - ' . $langs->trans(
"RevenueStamp") .
"</td>";
1353 print
'<td class="right nowraponall amount">' . ($mt < 0 ?
price(-$mt) :
'') .
"</td>";
1354 print
'<td class="right nowraponall amount">' . ($mt >= 0 ?
price($mt) :
'') .
"</td>";
1361 print
'<tr class="oddeven"><td colspan="7"><span class="opacitymedium">'.$langs->trans(
"NoRecordFound").
'</span></td></tr>';
length_accountg($account)
Return General accounting account with defined length (used for product and miscellaneous)
journalHead($nom, $variant, $period, $periodlink, $description, $builddate, $exportlink='', $moreparam=array(), $calcmode='', $varlink='', $moreoptions=array())
Show header of a page used to transfer/dispatch data in accounting.
getDefaultDatesForTransfer()
Return Default dates for transfer based on periodicity option in accountancy setup.
length_accounta($accounta)
Return Auxiliary accounting account of thirdparties with defined length.
if(!defined('NOREQUIRESOC')) if(!defined( 'NOREQUIRETRAN')) if(!defined('NOTOKENRENEWAL')) if(!defined( 'NOREQUIREMENU')) if(!defined('NOREQUIREHTML')) if(!defined( 'NOREQUIREAJAX')) llxHeader()
Empty header.
Class to manage accounting accounts.
Class to manage accounting journals.
Class to manage Ledger (General Ledger and Subledger)
Class to manage customers or prospects.
Class to manage invoices.
const TYPE_REPLACEMENT
Replacement invoice.
const TYPE_SITUATION
Situation invoice.
const TYPE_DEPOSIT
Deposit invoice.
const TYPE_CREDIT_NOTE
Credit note invoice.
Class to manage invoice lines.
Class to manage third parties objects (customers, suppliers, prospects...)
dol_get_first_day($year, $month=1, $gm=false)
Return GMT time for first day of a month or year.
dol_get_last_day($year, $month=12, $gm=false)
Return GMT time for last day of a month or year.
dol_mktime($hour, $minute, $second, $month, $day, $year, $gm='auto', $check=1)
Return a timestamp date built from detailed information (by default a local PHP server timestamp) Rep...
vatrate($rate, $addpercent=false, $info_bits=0, $usestarfornpr=0, $html=0)
Return a string with VAT rate label formatted for view output Used into pdf and HTML pages.
GETPOSTINT($paramname, $method=0)
Return the value of a $_GET or $_POST supervariable, converted into integer.
dol_string_nohtmltag($stringtoclean, $removelinefeed=1, $pagecodeto='UTF-8', $strip_tags=0, $removedoublespaces=1)
Clean a string from all HTML tags and entities.
price2num($amount, $rounding='', $option=0)
Function that return a number with universal decimal format (decimal separator is '.
getTaxesFromId($vatrate, $buyer=null, $seller=null, $firstparamisid=1)
Get tax (VAT) main information from Id.
price($amount, $form=0, $outlangs='', $trunc=1, $rounding=-1, $forcerounding=-1, $currency_code='')
Function to format a value into an amount for visual output Function used into PDF and HTML pages.
dol_now($mode='auto')
Return date for now.
getDolGlobalInt($key, $default=0)
Return a Dolibarr global constant int value.
dol_print_date($time, $format='', $tzoutput='auto', $outputlangs=null, $encodetooutput=false)
Output date in a string format according to outputlangs (or langs if not defined).
GETPOST($paramname, $check='alphanohtml', $method=0, $filter=null, $options=null, $noreplace=0)
Return value of a param into GET or POST supervariable.
setEventMessages($mesg, $mesgs, $style='mesgs', $messagekey='', $noduplicate=0)
Set event messages in dol_events session object.
dol_print_error($db=null, $error='', $errors=null)
Displays error message system with all the information to facilitate the diagnosis and the escalation...
dol_trunc($string, $size=40, $trunc='right', $stringencoding='UTF-8', $nodot=0, $display=0)
Truncate a string to a particular length adding '…' if string larger than length.
getDolGlobalString($key, $default='')
Return dolibarr global constant string value.
dol_syslog($message, $level=LOG_INFO, $ident=0, $suffixinfilename='', $restricttologhandler='', $logcontext=null)
Write log message into outputs.
accessforbidden($message='', $printheader=1, $printfooter=1, $showonlymessage=0, $params=null)
Show a message to say access is forbidden and stop program.