35 require
'../../main.inc.php';
36 require_once DOL_DOCUMENT_ROOT.
'/core/class/html.formadmin.class.php';
37 require_once DOL_DOCUMENT_ROOT.
'/core/class/html.formcompany.class.php';
38 require_once DOL_DOCUMENT_ROOT.
'/core/lib/admin.lib.php';
39 require_once DOL_DOCUMENT_ROOT.
'/core/lib/functions2.lib.php';
40 require_once DOL_DOCUMENT_ROOT.
'/core/class/doleditor.class.php';
41 require_once DOL_DOCUMENT_ROOT.
'/core/lib/accounting.lib.php';
43 require_once DOL_DOCUMENT_ROOT.
'/core/class/html.formaccounting.class.php';
47 $langs->loadLangs(array(
"errors",
"admin",
"companies",
"resource",
"holiday",
"compta",
"accountancy",
"hrm"));
49 $action =
GETPOST(
'action',
'aZ09') ?
GETPOST(
'action',
'aZ09') :
'view';
50 $confirm =
GETPOST(
'confirm',
'alpha');
52 $rowid =
GETPOST(
'rowid',
'alpha');
53 $code =
GETPOST(
'code',
'alpha');
55 $acts[0] =
"activate";
57 $actl[0] =
img_picto($langs->trans(
"Disabled"),
'switch_off',
'class="size15x"');
58 $actl[1] =
img_picto($langs->trans(
"Activated"),
'switch_on',
'class="size15x"');
60 $listoffset =
GETPOST(
'listoffset',
'alpha');
61 $listlimit =
GETPOST(
'listlimit',
'int') > 0 ?
GETPOST(
'listlimit',
'int') : 1000;
64 $sortfield =
GETPOST(
"sortfield",
'aZ09comma');
65 $sortorder =
GETPOST(
"sortorder",
'aZ09comma');
67 if (empty($page) || $page == -1) {
70 $offset = $listlimit * $page;
71 $pageprev = $page - 1;
72 $pagenext = $page + 1;
74 $search_country_id =
GETPOST(
'search_country_id',
'int');
78 if ($user->socid > 0) {
81 if (empty($user->rights->accounting->chartofaccount)) {
87 $hookmanager->initHooks(array(
'admin'));
95 $tabname[31] = MAIN_DB_PREFIX.
"accounting_system";
99 $tablib[31] =
"Pcg_version";
103 $tabsql[31] =
"SELECT s.rowid as rowid, pcg_version, s.label, s.fk_country as country_id, c.code as country_code, c.label as country, s.active FROM ".MAIN_DB_PREFIX.
"accounting_system as s, ".MAIN_DB_PREFIX.
"c_country as c WHERE s.fk_country=c.rowid and c.active=1";
106 $tabsqlsort = array();
107 $tabsqlsort[31] =
"pcg_version ASC";
111 $tabfield[31] =
"pcg_version,label,country_id,country";
114 $tabfieldvalue = array();
115 $tabfieldvalue[31] =
"pcg_version,label,country";
118 $tabfieldinsert = array();
119 $tabfieldinsert[31] =
"pcg_version,label,fk_country";
133 $tabhelp[31] = array(
'pcg_version'=>$langs->trans(
"EnterAnyCode"));
136 $tabfieldcheck = array();
137 $tabfieldcheck[31] = array();
141 $elementList = array();
142 $sourceList = array();
150 if (
GETPOST(
'button_removefilter',
'alpha') ||
GETPOST(
'button_removefilter.x',
'alpha') ||
GETPOST(
'button_removefilter_x',
'alpha')) {
151 $search_country_id =
'';
155 if (
GETPOST(
'actionadd',
'alpha') ||
GETPOST(
'actionmodify',
'alpha')) {
156 $listfield = explode(
',', str_replace(
' ',
'', $tabfield[$id]));
157 $listfieldinsert = explode(
',', $tabfieldinsert[$id]);
158 $listfieldmodify = explode(
',', $tabfieldinsert[$id]);
159 $listfieldvalue = explode(
',', $tabfieldvalue[$id]);
163 foreach ($listfield as $f => $value) {
164 if ($value ==
'country_id' && in_array($tablib[$id], array(
'Pcg_version'))) {
169 $fieldnamekey = $listfield[$f];
172 if ($fieldnamekey ==
'pcg_version') {
173 $fieldnamekey =
'Pcg_version';
175 if ($fieldnamekey ==
'libelle' || ($fieldnamekey ==
'label')) {
176 $fieldnamekey =
'Label';
179 setEventMessages($langs->transnoentities(
"ErrorFieldRequired", $langs->transnoentities($fieldnamekey)),
null,
'errors');
184 if (
GETPOST(
"pcg_version") ==
'0') {
186 setEventMessages($langs->transnoentities(
'ErrorCodeCantContainZero'),
null,
'errors');
191 setEventMessages($langs->transnoentities(
"ErrorFieldRequired", $langs->transnoentities(
"Country")),
null,
'errors');
195 if ($ok &&
GETPOST(
'actionadd',
'alpha')) {
196 if ($tabrowid[$id]) {
199 $sql =
"SELECT max(".$tabrowid[$id].
") newid from ".$tabname[$id];
200 $result = $db->query($sql);
202 $obj = $db->fetch_object($result);
203 $newid = ($obj->newid + 1);
210 $sql =
"INSERT INTO ".$tabname[$id].
" (";
212 if ($tabrowid[$id] && !in_array($tabrowid[$id], $listfieldinsert)) {
213 $sql .= $tabrowid[$id].
",";
215 $sql .= $tabfieldinsert[$id];
220 if ($tabrowid[$id] && !in_array($tabrowid[$id], $listfieldinsert)) {
224 foreach ($listfieldinsert as $f => $value) {
225 if ($value ==
'price' || preg_match(
'/^amount/i', $value) || $value ==
'taux') {
226 $_POST[$listfieldvalue[$i]] =
price2num(
GETPOST($listfieldvalue[$i]),
'MU');
227 } elseif ($value ==
'entity') {
228 $_POST[$listfieldvalue[$i]] = $conf->entity;
233 if (
GETPOST($listfieldvalue[$i]) ==
'') {
236 $sql .=
"'".$db->escape(
GETPOST($listfieldvalue[$i])).
"'";
243 $result = $db->query($sql);
246 $_POST = array(
'id'=>$id);
248 if ($db->errno() ==
'DB_ERROR_RECORD_ALREADY_EXISTS') {
249 setEventMessages($langs->transnoentities(
"ErrorRecordAlreadyExists"),
null,
'errors');
257 if ($ok &&
GETPOST(
'actionmodify',
'alpha')) {
258 if ($tabrowid[$id]) {
259 $rowidcol = $tabrowid[$id];
265 $sql =
"UPDATE ".$tabname[$id].
" SET ";
267 if ($tabrowid[$id] && !in_array($tabrowid[$id], $listfieldmodify)) {
268 $sql .= $tabrowid[$id].
"=";
269 $sql .=
"'".$db->escape($rowid).
"', ";
272 foreach ($listfieldmodify as $field) {
273 if ($field ==
'price' || preg_match(
'/^amount/i', $field) || $field ==
'taux') {
274 $_POST[$listfieldvalue[$i]] =
price2num(
GETPOST($listfieldvalue[$i]),
'MU');
275 } elseif ($field ==
'entity') {
276 $_POST[$listfieldvalue[$i]] = $conf->entity;
282 if (
GETPOST($listfieldvalue[$i]) ==
'') {
285 $sql .=
"'".$db->escape(
GETPOST($listfieldvalue[$i])).
"'";
289 $sql .=
" WHERE ".$rowidcol.
" = ".((int) $rowid);
293 $resql = $db->query($sql);
301 if (
GETPOST(
'actioncancel',
'alpha')) {
305 if ($action ==
'confirm_delete' && $confirm ==
'yes') {
306 if ($tabrowid[$id]) {
307 $rowidcol = $tabrowid[$id];
312 $sql =
"DELETE from ".$tabname[$id].
" WHERE ".$rowidcol.
" = ".((int) $rowid);
315 $result = $db->query($sql);
317 if ($db->errno() ==
'DB_ERROR_CHILD_EXISTS') {
318 setEventMessages($langs->transnoentities(
"ErrorRecordIsUsedByChild"),
null,
'errors');
326 if ($action == $acts[0]) {
327 if ($tabrowid[$id]) {
328 $rowidcol = $tabrowid[$id];
334 $sql =
"UPDATE ".$tabname[$id].
" SET active = 1 WHERE ".$rowidcol.
" = ".((int) $rowid);
336 $sql =
"UPDATE ".$tabname[$id].
" SET active = 1 WHERE code='".$db->escape($code).
"'";
339 $result = $db->query($sql);
346 if ($action == $acts[1]) {
347 if ($tabrowid[$id]) {
348 $rowidcol = $tabrowid[$id];
354 $sql =
"UPDATE ".$tabname[$id].
" SET active = 0 WHERE ".$rowidcol.
" = ".((int) $rowid);
356 $sql =
"UPDATE ".$tabname[$id].
" SET active = 0 WHERE code='".$db->escape($code).
"'";
359 $result = $db->query($sql);
366 if ($action ==
'activate_favorite') {
367 if ($tabrowid[$id]) {
368 $rowidcol = $tabrowid[$id];
374 $sql =
"UPDATE ".$tabname[$id].
" SET favorite = 1 WHERE ".$rowidcol.
" = ".((int) $rowid);
376 $sql =
"UPDATE ".$tabname[$id].
" SET favorite = 1 WHERE code='".$db->escape($code).
"'";
379 $result = $db->query($sql);
386 if ($action ==
'disable_favorite') {
387 if ($tabrowid[$id]) {
388 $rowidcol = $tabrowid[$id];
394 $sql =
"UPDATE ".$tabname[$id].
" SET favorite = 0 WHERE ".$rowidcol.
" = ".((int) $rowid);
396 $sql =
"UPDATE ".$tabname[$id].
" SET favorite = 0 WHERE code='".$db->escape($code).
"'";
399 $result = $db->query($sql);
415 $titre = $langs->trans($tablib[$id]);
422 if ($action ==
'delete') {
423 print
$form->formconfirm($_SERVER[
"PHP_SELF"].
'?'.($page ?
'page='.urlencode($page).
'&' :
'').
'sortfield='.urlencode($sortfield).
'&sortorder='.urlencode($sortorder).
'&rowid='.urlencode($rowid).
'&code='.urlencode($code).
'&id='.urlencode($id), $langs->trans(
'DeleteLine'), $langs->trans(
'ConfirmDeleteLine'),
'confirm_delete',
'', 0, 1);
434 if ($search_country_id > 0) {
435 if (preg_match(
'/ WHERE /', $sql)) {
440 $sql .=
" c.rowid = ".((int) $search_country_id);
444 if ($sortfield ==
'country') {
445 $sortfield =
'country_code';
447 $sql .= $db->order($sortfield, $sortorder);
448 $sql .= $db->plimit($listlimit + 1, $offset);
451 $fieldlist = explode(
',', $tabfield[$id]);
453 print
'<form action="'.$_SERVER[
'PHP_SELF'].
'?id='.$id.
'" method="POST">';
454 print
'<input type="hidden" name="token" value="'.newToken().
'">';
456 print
'<div class="div-table-responsive">';
457 print
'<table class="noborder centpercent">';
461 $fieldlist = explode(
',', $tabfield[$id]);
464 print
'<tr class="liste_titre">';
465 foreach ($fieldlist as $field => $value) {
468 $valuetoshow = ucfirst($fieldlist[$field]);
469 $valuetoshow = $langs->trans($valuetoshow);
471 if ($fieldlist[$field] ==
'code') {
472 $valuetoshow = $langs->trans(
"Code");
474 if ($fieldlist[$field] ==
'libelle' || $fieldlist[$field] ==
'label') {
475 $valuetoshow = $langs->trans(
"Label");
477 if ($fieldlist[$field] ==
'country') {
478 if (in_array(
'region_id', $fieldlist)) {
479 print
'<td> </td>';
continue;
481 $valuetoshow = $langs->trans(
"Country");
483 if ($fieldlist[$field] ==
'country_id') {
486 if ($fieldlist[$field] ==
'pcg_version' || $fieldlist[$field] ==
'fk_pcg_version') {
487 $valuetoshow = $langs->trans(
"Pcg_version");
490 if ($valuetoshow !=
'') {
491 print
'<td class="'.$class.
'">';
492 if (!empty($tabhelp[$id][$value]) && preg_match(
'/^http(s*):/i', $tabhelp[$id][$value])) {
493 print
'<a href="'.$tabhelp[$id][$value].
'">'.$valuetoshow.
' '.
img_help(1, $valuetoshow).
'</a>';
494 } elseif (!empty($tabhelp[$id][$value])) {
495 print
$form->textwithpicto($valuetoshow, $tabhelp[$id][$value]);
504 print
'<input type="hidden" name="id" value="'.$id.
'">';
506 print
'<td style="min-width: 26px;"></td>';
507 print
'<td style="min-width: 26px;"></td>';
511 print
'<tr class="oddeven">';
513 $obj =
new stdClass();
515 if (
GETPOST(
'actionadd',
'alpha')) {
516 foreach ($fieldlist as $key => $val) {
523 $tmpaction =
'create';
524 $parameters = array(
'fieldlist'=>$fieldlist,
'tabname'=>$tabname[$id]);
525 $reshook = $hookmanager->executeHooks(
'createDictionaryFieldlist', $parameters, $obj, $tmpaction);
526 $error = $hookmanager->error; $errors = $hookmanager->errors;
528 if (empty($reshook)) {
532 print
'<td colspan="3" class="right">';
533 print
'<input type="submit" class="button button-add" name="actionadd" value="'.$langs->trans(
"Add").
'">';
537 $colspan = count($fieldlist) + 3;
539 print
'<tr><td colspan="'.$colspan.
'"> </td></tr>';
546 $resql = $db->query($sql);
548 $num = $db->num_rows(
$resql);
551 $param =
'&id='.urlencode($id);
552 if ($search_country_id > 0) {
553 $param .=
'&search_country_id='.urlencode($search_country_id);
555 $paramwithsearch = $param;
557 $paramwithsearch .=
'&sortorder='.urlencode($sortorder);
560 $paramwithsearch .=
'&sortfield='.urlencode($sortfield);
564 if ($num > $listlimit) {
565 print
'<tr class="none"><td class="right" colspan="'.(3 + count($fieldlist)).
'">';
566 print_fleche_navigation($page, $_SERVER[
"PHP_SELF"], $paramwithsearch, ($num > $listlimit),
'<li class="pagination"><span>'.$langs->trans(
"Page").
' '.($page + 1).
'</span></li>');
571 print
'<tr class="liste_titre liste_titre_add">';
572 foreach ($fieldlist as $field => $value) {
575 if ($fieldlist[$field] ==
'region_id' || $fieldlist[$field] ==
'country_id') {
580 if ($value ==
'country') {
581 print
'<td class="liste_titre">';
582 print
$form->select_country($search_country_id,
'search_country_id',
'', 28,
'maxwidth200 maxwidthonsmartphone');
585 print
'<td class="liste_titre"></td>';
589 print
'<td class="liste_titre"></td>';
590 print
'<td class="liste_titre right" colspan="2">';
591 $searchpicto =
$form->showFilterAndCheckAddButtons(0);
597 print
'<tr class="liste_titre">';
598 print
getTitleFieldOfList($langs->trans(
"Pcg_version"), 0, $_SERVER[
"PHP_SELF"],
"pcg_version", ($page ?
'page='.$page.
'&' :
''), $param,
'', $sortfield, $sortorder,
'');
599 print
getTitleFieldOfList($langs->trans(
"Label"), 0, $_SERVER[
"PHP_SELF"],
"label", ($page ?
'page='.$page.
'&' :
''), $param,
'', $sortfield, $sortorder,
'');
600 print
getTitleFieldOfList($langs->trans(
"Country"), 0, $_SERVER[
"PHP_SELF"],
"country_code", ($page ?
'page='.$page.
'&' :
''), $param,
'', $sortfield, $sortorder,
'');
601 print
getTitleFieldOfList($langs->trans(
"Status"), 0, $_SERVER[
"PHP_SELF"],
"active", ($page ?
'page='.$page.
'&' :
''), $param,
'', $sortfield, $sortorder,
'center ');
610 $obj = $db->fetch_object(
$resql);
613 print
'<tr class="oddeven" id="rowid-'.$obj->rowid.
'">';
614 if ($action ==
'edit' && ($rowid == (!empty($obj->rowid) ? $obj->rowid : $obj->code))) {
615 print
'<form action="'.$_SERVER[
'PHP_SELF'].
'?id='.$id.
'" method="POST">';
616 print
'<input type="hidden" name="token" value="'.newToken().
'">';
617 print
'<input type="hidden" name="page" value="'.$page.
'">';
618 print
'<input type="hidden" name="rowid" value="'.$rowid.
'">';
621 $parameters = array(
'fieldlist'=>$fieldlist,
'tabname'=>$tabname[$id]);
622 $reshook = $hookmanager->executeHooks(
'editDictionaryFieldlist', $parameters, $obj, $tmpaction);
623 $error = $hookmanager->error; $errors = $hookmanager->errors;
625 if (empty($reshook)) {
629 print
'<td colspan="3" class="right"><a name="'.(!empty($obj->rowid) ? $obj->rowid : $obj->code).
'"> </a><input type="submit" class="button button-edit" name="actionmodify" value="'.$langs->trans(
"Modify").
'">';
630 print
' <input type="submit" class="button button-cancel" name="actioncancel" value="'.$langs->trans(
"Cancel").
'"></td>';
633 $parameters = array(
'fieldlist'=>$fieldlist,
'tabname'=>$tabname[$id]);
634 $reshook = $hookmanager->executeHooks(
'viewDictionaryFieldlist', $parameters, $obj, $tmpaction);
636 $error = $hookmanager->error; $errors = $hookmanager->errors;
638 if (empty($reshook)) {
639 foreach ($fieldlist as $field => $value) {
642 $valuetoshow = $obj->{$fieldlist[$field]};
643 if ($value ==
'type_template') {
644 $valuetoshow = isset($elementList[$valuetoshow]) ? $elementList[$valuetoshow] : $valuetoshow;
646 if ($value ==
'element') {
647 $valuetoshow = isset($elementList[$valuetoshow]) ? $elementList[$valuetoshow] : $valuetoshow;
648 } elseif ($value ==
'source') {
649 $valuetoshow = isset($sourceList[$valuetoshow]) ? $sourceList[$valuetoshow] : $valuetoshow;
650 } elseif ($valuetoshow ==
'all') {
651 $valuetoshow = $langs->trans(
'All');
652 } elseif ($fieldlist[$field] ==
'country') {
653 if (empty($obj->country_code)) {
656 $key = $langs->trans(
"Country".strtoupper($obj->country_code));
657 $valuetoshow = ($key !=
"Country".strtoupper($obj->country_code) ? $obj->country_code.
" - ".$key : $obj->country);
659 } elseif ($fieldlist[$field] ==
'country_id') {
664 if ($fieldlist[$field] ==
'tracking') {
665 $class .=
' tdoverflowauto';
669 print
'<!-- '.$fieldlist[$field].
' --><td class="'.$class.
'">'.$valuetoshow.
'</td>';
675 $iserasable = 1; $canbedisabled = 1; $canbemodified = 1;
677 $url = $_SERVER[
"PHP_SELF"].
'?token='.
newToken().($page ?
'&page='.$page :
'').
'&sortfield='.$sortfield.
'&sortorder='.$sortorder.
'&rowid='.(!empty($obj->rowid) ? $obj->rowid : (!empty($obj->code) ? $obj->code :
'')).
'&code='.(!empty($obj->code) ?urlencode($obj->code) :
'');
684 print
'<td class="center nowrap">';
685 if ($canbedisabled) {
686 print
'<a href="'.$url.
'action='.$acts[$obj->active].
'">'.$actl[$obj->active].
'</a>';
688 print $langs->trans(
"AlwaysActive");
693 if ($canbemodified) {
694 print
'<td class="center"><a class="reposition editfielda" href="'.$url.
'action=edit&token='.
newToken().
'">'.
img_edit().
'</a></td>';
696 print
'<td> </td>';
701 print
'<td class="center"><a href="'.$url.
'action=delete&token='.
newToken().
'">'.
img_delete().
'</a></td>';
703 print
'<td> </td>';
740 global $conf, $langs, $db;
743 global $elementList, $sourceList;
749 foreach ($fieldlist as $field => $value) {
750 if ($fieldlist[$field] ==
'country') {
751 if (in_array(
'region_id', $fieldlist)) {
758 $fieldname =
'country';
759 print
$form->select_country((!empty($obj->country_code) ? $obj->country_code : (!empty($obj->country) ? $obj->country :
'')), $fieldname,
'', 28,
'maxwidth200 maxwidthonsmartphone');
761 } elseif ($fieldlist[$field] ==
'country_id') {
762 if (!in_array(
'country', $fieldlist)) {
763 $country_id = (!empty($obj->{$fieldlist[$field]}) ? $obj->{$fieldlist[$field]} : 0);
765 print
'<input type="hidden" name="'.$fieldlist[$field].
'" value="'.$country_id.
'">';
768 } elseif ($fieldlist[$field] ==
'type_cdr') {
769 if ($fieldlist[$field] ==
'type_cdr') {
770 print
'<td class="center">';
774 if ($fieldlist[$field] ==
'type_cdr') {
775 print
$form->selectarray($fieldlist[$field], array(0=>$langs->trans(
'None'), 1=>$langs->trans(
'AtEndOfMonth'), 2=>$langs->trans(
'CurrentNext')), (!empty($obj->{$fieldlist[$field]}) ? $obj->{$fieldlist[$field]}:
''));
777 print
$form->selectyesno($fieldlist[$field], (!empty($obj->{$fieldlist[$field]}) ? $obj->{$fieldlist[$field]}:
''), 1);
780 } elseif ($fieldlist[$field] ==
'code' && isset($obj->{$fieldlist[$field]})) {
781 print
'<td><input type="text" class="flat" value="'.(!empty($obj->{$fieldlist[$field]}) ? $obj->{$fieldlist[$field]}:
'').
'" size="10" name="'.$fieldlist[$field].
'"></td>';
784 $size =
''; $class =
'';
785 if ($fieldlist[$field] ==
'code') {
788 if ($fieldlist[$field] ==
'position') {
791 if ($fieldlist[$field] ==
'libelle') {
792 $size =
'centpercent';
794 if ($fieldlist[$field] ==
'sortorder' || $fieldlist[$field] ==
'sens' || $fieldlist[$field] ==
'category_type') {
797 print
'<input type="text" '.$size.
' class="flat'.($class ?
' '.$class :
'').
'" value="'.(isset($obj->{$fieldlist[$field]}) ? $obj->{$fieldlist[$field]}:
'').
'" name="'.$fieldlist[$field].
'">';