37 require
'../main.inc.php';
38 require_once DOL_DOCUMENT_ROOT.
'/comm/action/class/actioncomm.class.php';
39 require_once DOL_DOCUMENT_ROOT.
'/contact/class/contact.class.php';
40 require_once DOL_DOCUMENT_ROOT.
'/core/lib/contact.lib.php';
41 require_once DOL_DOCUMENT_ROOT.
'/core/lib/company.lib.php';
42 require_once DOL_DOCUMENT_ROOT.
'/core/lib/images.lib.php';
43 require_once DOL_DOCUMENT_ROOT.
'/core/lib/files.lib.php';
44 require_once DOL_DOCUMENT_ROOT.
'/core/class/html.formcompany.class.php';
45 require_once DOL_DOCUMENT_ROOT.
'/core/class/html.formadmin.class.php';
46 require_once DOL_DOCUMENT_ROOT.
'/core/class/extrafields.class.php';
47 require_once DOL_DOCUMENT_ROOT.
'/core/class/doleditor.class.php';
48 require_once DOL_DOCUMENT_ROOT.
'/core/class/html.form.class.php';
49 require_once DOL_DOCUMENT_ROOT.
'/user/class/user.class.php';
50 require_once DOL_DOCUMENT_ROOT.
'/categories/class/categorie.class.php';
53 $langs->loadLangs(array(
'companies',
'users',
'other',
'commercial'));
55 $mesg =
''; $error = 0; $errors = array();
58 $action = (
GETPOST(
'action',
'alpha') ?
GETPOST(
'action',
'alpha') :
'view');
59 $confirm =
GETPOST(
'confirm',
'alpha');
60 $backtopage =
GETPOST(
'backtopage',
'alpha');
61 $cancel =
GETPOST(
'cancel',
'alpha');
63 $socid =
GETPOST(
'socid',
'int');
70 $extrafields->fetch_name_optionals_label($object->table_element);
75 $object->getCanvas($id);
77 $canvas = (!empty($object->canvas) ? $object->canvas :
GETPOST(
"canvas"));
78 if (!empty($canvas)) {
79 require_once DOL_DOCUMENT_ROOT.
'/core/class/canvas.class.php';
80 $objcanvas =
new Canvas($db, $action);
81 $objcanvas->getCanvas(
'contact',
'contactcard', $canvas);
85 $hookmanager->initHooks(array(
'contactcard',
'globalcard'));
92 if (!($object->id > 0) && $action ==
'view') {
93 $langs->load(
"errors");
94 print($langs->trans(
'ErrorRecordNotFound'));
98 $triggermodname =
'CONTACT_MODIFY';
99 $permissiontoadd = $user->hasRight(
'societe',
'contact',
'creer');
103 $socid = $user->socid;
105 if ($object->priv && $object->user_creation->id != $user->id) {
108 $result =
restrictedArea($user,
'contact', $id,
'socpeople&societe',
'',
'',
'rowid', 0);
115 $parameters = array(
'id'=>$id,
'objcanvas'=>$objcanvas);
116 $reshook = $hookmanager->executeHooks(
'doActions',
$parameters, $object, $action);
121 if (empty($reshook)) {
122 $backurlforlist = DOL_URL_ROOT.
'/contact/list.php';
124 if (empty($backtopage) || ($cancel && empty($id))) {
125 if (empty($backtopage) || ($cancel && strpos($backtopage,
'__ID__'))) {
126 if (empty($id) && (($action !=
'add' && $action !=
'create') || $cancel)) {
127 $backtopage = $backurlforlist;
129 $backtopage = DOL_URL_ROOT.
'/contact/card.php?id='.((!empty($id) && $id > 0) ? $id :
'__ID__');
135 if (!empty($backtopageforcancel)) {
136 header(
"Location: ".$backtopageforcancel);
138 } elseif (!empty($backtopage)) {
139 header(
"Location: ".$backtopage);
146 if ($action ==
'confirm_create_user' && $confirm ==
'yes' && $user->hasRight(
'user',
'user',
'creer')) {
148 $result = $object->fetch($id);
154 $nuser =
new User($db);
155 $result = $nuser->create_from_contact($object,
GETPOST(
"login"));
158 $result2 = $nuser->setPassword($user,
GETPOST(
"password"), 0, 0, 1);
159 if (is_int($result2) && $result2 < 0) {
160 $error = $nuser->error; $errors = $nuser->errors;
166 $error = $nuser->error; $errors = $nuser->errors;
170 $error = $object->error; $errors = $object->errors;
176 if ($action ==
'disable' && !empty($permissiontoadd)) {
178 if ($object->setstatus(0) < 0) {
181 header(
"Location: ".$_SERVER[
'PHP_SELF'].
'?id='.$id);
187 if ($action ==
'enable' && !empty($permissiontoadd)) {
189 if ($object->setstatus(1) < 0) {
192 header(
"Location: ".$_SERVER[
'PHP_SELF'].
'?id='.$id);
198 if ($action ==
'add' && !empty($permissiontoadd)) {
202 $object->canvas = $canvas;
206 $object->socid =
GETPOST(
"socid",
'int');
207 $object->lastname = (string)
GETPOST(
"lastname",
'alpha');
208 $object->firstname = (string)
GETPOST(
"firstname",
'alpha');
209 $object->civility_code = (string)
GETPOST(
"civility_code",
'alpha');
210 $object->poste = (string)
GETPOST(
"poste",
'alpha');
211 $object->address = (string)
GETPOST(
"address",
'alpha');
212 $object->zip = (string)
GETPOST(
"zipcode",
'alpha');
213 $object->town = (string)
GETPOST(
"town",
'alpha');
214 $object->country_id = (int)
GETPOST(
"country_id",
'int');
215 $object->state_id = (int)
GETPOST(
"state_id",
'int');
216 $object->socialnetworks = array();
218 foreach ($socialnetworks as $key => $value) {
220 $object->socialnetworks[$key] = (string)
GETPOST($key,
'alphanohtml');
224 $object->email = (string)
GETPOST(
'email',
'custom', 0, FILTER_SANITIZE_EMAIL);
225 $object->no_email =
GETPOST(
"no_email",
"int");
226 $object->phone_pro = (string)
GETPOST(
"phone_pro",
'alpha');
227 $object->phone_perso = (string)
GETPOST(
"phone_perso",
'alpha');
228 $object->phone_mobile = (string)
GETPOST(
"phone_mobile",
'alpha');
229 $object->fax = (string)
GETPOST(
"fax",
'alpha');
230 $object->priv =
GETPOST(
"priv",
'int');
231 $object->note_public = (string)
GETPOST(
"note_public",
'restricthtml');
232 $object->note_private = (string)
GETPOST(
"note_private",
'restricthtml');
233 $object->roles =
GETPOST(
"roles",
'array');
239 $object->birthday_alert =
GETPOST(
"birthday_alert",
'alpha');
242 $object->default_lang =
GETPOST(
'default_lang');
245 $ret = $extrafields->setOptionalsFromPost(
null, $object);
251 if (
isModEnabled(
'mailing') &&
getDolGlobalInt(
'MAILING_CONTACT_DEFAULT_BULK_STATUS') == 2 && $object->no_email == -1 && !empty($object->email)) {
253 $errors[] = $langs->trans(
"ErrorFieldRequired", $langs->transnoentities(
"No_Email"));
257 if (!empty($object->email) && !isValidEMail($object->email)) {
258 $langs->load(
"errors");
260 $errors[] = $langs->trans(
"ErrorBadEMail",
GETPOST(
'email',
'alpha'));
264 if (empty($object->lastname)) {
266 $errors[] = $langs->trans(
"ErrorFieldRequired", $langs->transnoentities(
"Lastname").
' / '.$langs->transnoentities(
"Label"));
271 $id = $object->create($user);
274 $errors = array_merge($errors, ($object->error ? array($object->error) : $object->errors));
281 $contcats =
GETPOST(
'contcats',
'array');
282 if (count($contcats) > 0) {
283 $result = $object->setCategories($contcats);
286 $errors = array_merge($errors, ($object->error ? array($object->error) : $object->errors));
292 if (empty($error) &&
isModEnabled(
'mailing') && !empty($object->email)) {
294 $result = $object->setNoEmail($object->no_email);
297 $errors = array_merge($errors, ($object->error ? array($object->error) : $object->errors));
302 if (empty($error) && $id > 0) {
304 if (!empty($backtopage)) {
305 $url = str_replace(
'__ID__', $id, $backtopage);
307 $url =
'card.php?id='.$id;
309 header(
"Location: ".$url);
316 if ($action ==
'confirm_delete' && $confirm ==
'yes' && $user->hasRight(
'societe',
'contact',
'supprimer')) {
317 $result = $object->fetch($id);
318 $object->oldcopy = clone $object;
320 $result = $object->delete();
323 if ($backurlforlist) {
324 header(
"Location: ".$backurlforlist);
327 header(
"Location: ".DOL_URL_ROOT.
'/contact/list.php');
335 if ($action ==
'update' && empty($cancel) && !empty($permissiontoadd)) {
336 if (!
GETPOST(
"lastname",
'alpha')) {
337 $error++; $errors = array($langs->trans(
"ErrorFieldRequired", $langs->transnoentities(
"Name").
' / '.$langs->transnoentities(
"Label")));
343 $errors[] = $langs->trans(
"ErrorFieldRequired", $langs->transnoentities(
"No_Email"));
347 if (!empty(
GETPOST(
'email',
'custom', 0, FILTER_SANITIZE_EMAIL)) && !isValidEMail(
GETPOST(
'email',
'custom', 0, FILTER_SANITIZE_EMAIL))) {
348 $langs->load(
"errors");
350 $errors[] = $langs->trans(
"ErrorBadEMail",
GETPOST(
'email',
'alpha'));
355 $contactid =
GETPOST(
"contactid",
'int');
356 $object->fetch($contactid);
357 $object->fetchRoles();
360 $dir = $conf->societe->multidir_output[$object->entity].
"/contact/".$object->id.
"/photos";
361 $file_OK = is_uploaded_file($_FILES[
'photo'][
'tmp_name']);
362 if (
GETPOST(
'deletephoto') && $object->photo) {
363 $fileimg = $dir.
'/'.$object->photo;
364 $dirthumbs = $dir.
'/thumbs';
377 if (!($result > 0)) {
378 $errors[] =
"ErrorFailedToSaveFile";
383 $object->addThumbs($newfile);
387 $errors[] =
"ErrorBadImageFormat";
390 switch ($_FILES[
'photo'][
'error']) {
393 $errors[] =
"ErrorFileSizeTooLarge";
396 $errors[] =
"ErrorFilePartiallyUploaded";
401 $object->oldcopy = clone $object;
403 $object->socid =
GETPOST(
"socid",
'int');
404 $object->lastname = (string)
GETPOST(
"lastname",
'alpha');
405 $object->firstname = (string)
GETPOST(
"firstname",
'alpha');
406 $object->civility_code = (string)
GETPOST(
"civility_code",
'alpha');
407 $object->poste = (string)
GETPOST(
"poste",
'alpha');
409 $object->address = (string)
GETPOST(
"address",
'alpha');
410 $object->zip = (string)
GETPOST(
"zipcode",
'alpha');
411 $object->town = (string)
GETPOST(
"town",
'alpha');
412 $object->state_id =
GETPOST(
"state_id",
'int');
413 $object->country_id =
GETPOST(
"country_id",
'int');
415 $object->email = (string)
GETPOST(
'email',
'custom', 0, FILTER_SANITIZE_EMAIL);
416 $object->no_email =
GETPOST(
"no_email",
"int");
417 $object->socialnetworks = array();
419 foreach ($socialnetworks as $key => $value) {
421 $object->socialnetworks[$key] = (string)
GETPOST($key,
'alphanohtml');
425 $object->phone_pro = (string)
GETPOST(
"phone_pro",
'alpha');
426 $object->phone_perso = (string)
GETPOST(
"phone_perso",
'alpha');
427 $object->phone_mobile = (string)
GETPOST(
"phone_mobile",
'alpha');
428 $object->fax = (string)
GETPOST(
"fax",
'alpha');
429 $object->priv = (string)
GETPOST(
"priv",
'int');
430 $object->note_public = (string)
GETPOST(
"note_public",
'restricthtml');
431 $object->note_private = (string)
GETPOST(
"note_private",
'restricthtml');
433 $object->roles =
GETPOST(
"roles",
'array');
436 $object->default_lang =
GETPOST(
'default_lang');
439 $ret = $extrafields->setOptionalsFromPost(
null, $object,
'@GETPOSTISSET');
445 $result = $object->update($contactid, $user);
449 $categories =
GETPOST(
'contcats',
'array');
450 $object->setCategories($categories);
454 $no_email =
GETPOST(
'no_email',
'int');
455 $result = $object->setNoEmail($no_email);
471 if (!$error && empty($errors)) {
472 if (!empty($backtopage)) {
473 header(
"Location: ".$backtopage);
479 if ($action ==
'setprospectcontactlevel' && !empty($permissiontoadd)) {
481 $object->fk_prospectlevel =
GETPOST(
'prospect_contact_level_id',
'alpha');
482 $result = $object->update($object->id, $user);
489 if ($action ==
'setstcomm' && !empty($permissiontoadd)) {
492 $result = $object->update($object->id, $user);
499 if ($action ==
"update_extras" && !empty($permissiontoadd)) {
500 $object->fetch(
GETPOST(
'id',
'int'));
502 $attributekey =
GETPOST(
'attribute',
'alpha');
503 $attributekeylong =
'options_'.$attributekey;
507 $object->array_options[
'options_'.$attributekey] =
dol_mktime(
GETPOST($attributekeylong.
'hour',
'int'),
GETPOST($attributekeylong.
'min',
'int'),
GETPOST($attributekeylong.
'sec',
'int'),
GETPOST($attributekeylong.
'month',
'int'),
GETPOST($attributekeylong.
'day',
'int'),
GETPOST($attributekeylong.
'year',
'int'));
510 $object->array_options[
'options_'.$attributekey] =
GETPOST($attributekeylong,
'alpha');
513 $result = $object->insertExtraFields(empty($triggermodname) ?
'' : $triggermodname, $user);
519 $action =
'edit_extras';
524 if ($action ==
'update_extras' && !empty($user->rights->societe->contact->creer)) {
528 $ret = $extrafields->setOptionalsFromPost(
null, $object,
GETPOST(
'attribute',
'restricthtml'));
534 $result = $object->insertExtraFields(
'CONTACT_MODIFY');
542 $action =
'edit_extras';
547 $triggersendname =
'CONTACT_SENTBYMAIL';
549 $mode =
'emailfromcontact';
550 include DOL_DOCUMENT_ROOT.
'/core/actions_sendmails.inc.php';
564 $objsoc->fetch($socid);
567 $title = (!empty($conf->global->SOCIETE_ADDRESSES_MANAGEMENT) ? $langs->trans(
"Contacts") : $langs->trans(
"ContactsAddresses"));
568 if (!empty($conf->global->MAIN_HTML_TITLE) && preg_match(
'/contactnameonly/', $conf->global->MAIN_HTML_TITLE) && $object->lastname) {
569 $title = $object->lastname;
571 $help_url =
'EN:Module_Third_Parties|FR:Module_Tiers|ES:Empresas';
572 $title = (!empty($conf->global->SOCIETE_ADDRESSES_MANAGEMENT) ? $langs->trans(
"NewContact") : $langs->trans(
"NewContactAddress"));
576 $countrynotdefined = $langs->trans(
"ErrorSetACountryFirst").
' ('.$langs->trans(
"SeeAbove").
')';
578 if (is_object($objcanvas) && $objcanvas->displayCanvasExists($action)) {
582 if (empty($object->error) && $id) {
584 $result = $object->fetch($id);
589 $objcanvas->assign_values($action, $object->id, $object->ref);
590 $objcanvas->display_canvas($action);
597 if ($user->rights->societe->contact->supprimer) {
598 if ($action ==
'delete') {
599 print
$form->formconfirm($_SERVER[
"PHP_SELF"].
"?id=".$id.($backtopage ?
'&backtopage='.$backtopage :
''), $langs->trans(
"DeleteContact"), $langs->trans(
"ConfirmDeleteContact"),
"confirm_delete",
'', 0, 1);
610 $res = $object->fetch($id, $user);
615 $object->fetchRoles();
621 if ($user->rights->societe->contact->creer) {
622 if ($action ==
'create') {
626 $object->canvas = $canvas;
628 $object->state_id =
GETPOST(
"state_id",
"int");
631 $object->country_id =
GETPOST(
"country_id") ?
GETPOST(
"country_id",
"int") : (empty($objsoc->country_id) ? $mysoc->country_id : $objsoc->country_id);
632 if ($object->country_id) {
633 $tmparray =
getCountry($object->country_id,
'all');
634 $object->country_code = $tmparray[
'code'];
635 $object->country = $tmparray[
'label'];
645 if ($conf->use_javascript_ajax) {
646 print
"\n".
'<script type="text/javascript">'.
"\n";
647 print
'jQuery(document).ready(function () {
648 jQuery("#selectcountry_id").change(function() {
649 document.formsoc.action.value="create";
650 document.formsoc.submit();
653 $("#copyaddressfromsoc").click(function() {
654 $(\'textarea[name="address"]\').val("'.dol_escape_js($objsoc->address).
'");
655 $(\'input[name="zipcode"]\').val("'.
dol_escape_js($objsoc->zip).
'");
656 $(\'input[name="town"]\').val("'.
dol_escape_js($objsoc->town).
'");
657 console.log("Set state_id to '.
dol_escape_js($objsoc->state_id).
'");
658 $(\'select[name="state_id"]\').val("'.
dol_escape_js($objsoc->state_id).
'").trigger("change");
659 /* set country at end because it will trigger page refresh */
660 console.log("Set country id to '.
dol_escape_js($objsoc->country_id).
'");
661 $(\'select[name="country_id"]\').val("'.
dol_escape_js($objsoc->country_id).
'").trigger("change"); /* trigger required to update select2 components */
664 print
'</script>'.
"\n";
667 print
'<form method="post" name="formsoc" action="'.$_SERVER[
"PHP_SELF"].
'">';
668 print
'<input type="hidden" name="token" value="'.newToken().
'">';
669 print
'<input type="hidden" name="action" value="add">';
670 print
'<input type="hidden" name="backtopage" value="'.$backtopage.
'">';
671 if (!empty($objsoc)) {
672 print
'<input type="hidden" name="entity" value="'.$objsoc->entity.
'">';
677 print
'<table class="border centpercent">';
680 print
'<tr><td class="titlefieldcreate fieldrequired"><label for="lastname">'.$langs->trans(
"Lastname").
' / '.$langs->trans(
"Label").
'</label></td>';
681 print
'<td colspan="3"><input name="lastname" id="lastname" type="text" class="maxwidth100onsmartphone" maxlength="80" value="'.dol_escape_htmltag(
GETPOST(
"lastname",
'alpha') ?
GETPOST(
"lastname",
'alpha') : $object->lastname).
'" autofocus="autofocus"></td>';
686 print
'<td><label for="firstname">';
687 print
$form->textwithpicto($langs->trans(
"Firstname"), $langs->trans(
"KeepEmptyIfGenericAddress")).
'</label></td>';
688 print
'<td colspan="3"><input name="firstname" id="firstname"type="text" class="maxwidth100onsmartphone" maxlength="80" value="'.dol_escape_htmltag(
GETPOST(
"firstname",
'alpha') ?
GETPOST(
"firstname",
'alpha') : $object->firstname).
'"></td>';
692 if (empty($conf->global->SOCIETE_DISABLE_CONTACTS)) {
694 print
'<tr><td><label for="socid">'.$langs->trans(
"ThirdParty").
'</label></td>';
695 print
'<td colspan="3" class="maxwidthonsmartphone">';
696 print $objsoc->getNomUrl(1,
'contact');
698 print
'<input type="hidden" name="socid" id="socid" value="'.$objsoc->id.
'">';
701 print
'<tr><td><label for="socid">'.$langs->trans(
"ThirdParty").
'</label></td><td colspan="3" class="maxwidthonsmartphone">';
702 print
img_picto(
'',
'company',
'class="pictofixedwidth"').$form->select_company($socid,
'socid',
'',
'SelectThirdParty', 0, 0,
null, 0,
'minwidth300 maxwidth500 widthcentpercentminusxx');
708 print
'<tr><td><label for="civility_code">'.$langs->trans(
"UserTitle").
'</label></td><td colspan="3">';
709 print $formcompany->select_civility(
GETPOSTISSET(
"civility_code") ?
GETPOST(
"civility_code",
'alpha') : $object->civility_code,
'civility_code');
713 print
'<tr><td><label for="title">'.$langs->trans(
"PostOrFunction").
'</label></td>';
714 print
'<td colspan="3"><input name="poste" id="title" type="text" class="minwidth100" maxlength="255" value="'.dol_escape_htmltag(
GETPOSTISSET(
"poste") ?
GETPOST(
"poste",
'alphanohtml') : $object->poste).
'"></td>';
717 if ($conf->use_javascript_ajax && $socid > 0) {
722 if (((isset($objsoc->typent_code) && $objsoc->typent_code ==
'TE_PRIVATE') || !empty($conf->global->CONTACT_USE_COMPANY_ADDRESS)) &&
dol_strlen(trim($object->address)) == 0) {
723 $object->address = $objsoc->address;
725 print
'<tr><td><label for="address">'.$langs->trans(
"Address").
'</label></td>';
726 print
'<td colspan="'.$colspan.
'"><textarea class="flat quatrevingtpercent" name="address" id="address" rows="'.ROWS_2.
'">'.(
GETPOST(
"address",
'alpha') ?
GETPOST(
"address",
'alpha') : $object->address).
'</textarea></td>';
728 if ($conf->use_javascript_ajax && $socid > 0) {
730 if (empty($conf->global->SOCIETE_DISABLE_STATE)) {
734 print
'<td class="valignmiddle center" rowspan="'.$rowspan.
'">';
735 print
'<a href="#" id="copyaddressfromsoc">'.$langs->trans(
'CopyAddressFromSoc').
'</a>';
741 if (((isset($objsoc->typent_code) && $objsoc->typent_code ==
'TE_PRIVATE') || !empty($conf->global->CONTACT_USE_COMPANY_ADDRESS)) &&
dol_strlen(trim($object->zip)) == 0) {
742 $object->zip = $objsoc->zip;
744 if (((isset($objsoc->typent_code) && $objsoc->typent_code ==
'TE_PRIVATE') || !empty($conf->global->CONTACT_USE_COMPANY_ADDRESS)) &&
dol_strlen(trim($object->town)) == 0) {
745 $object->town = $objsoc->town;
747 print
'<tr><td><label for="zipcode">'.$langs->trans(
"Zip").
'</label> / <label for="town">'.$langs->trans(
"Town").
'</label></td><td colspan="'.$colspan.
'" class="maxwidthonsmartphone">';
748 print $formcompany->select_ziptown((
GETPOST(
"zipcode",
'alpha') ?
GETPOST(
"zipcode",
'alpha') : $object->zip),
'zipcode', array(
'town',
'selectcountry_id',
'state_id'), 6).
' ';
749 print $formcompany->select_ziptown((
GETPOST(
"town",
'alpha') ?
GETPOST(
"town",
'alpha') : $object->town),
'town', array(
'zipcode',
'selectcountry_id',
'state_id'));
753 print
'<tr><td><label for="selectcountry_id">'.$langs->trans(
"Country").
'</label></td><td colspan="'.$colspan.
'" class="maxwidthonsmartphone">';
754 print
img_picto(
'',
'globe-americas',
'class="pictofixedwidth"');
755 print
$form->select_country((
GETPOST(
"country_id",
'alpha') ?
GETPOST(
"country_id",
'alpha') : $object->country_id),
'country_id');
757 print
info_admin($langs->trans(
"YouCanChangeValuesForThisListFromDictionarySetup"), 1);
762 if (empty($conf->global->SOCIETE_DISABLE_STATE)) {
763 if (!empty($conf->global->MAIN_SHOW_REGION_IN_STATE_SELECT) && ($conf->global->MAIN_SHOW_REGION_IN_STATE_SELECT == 1 || $conf->global->MAIN_SHOW_REGION_IN_STATE_SELECT == 2)) {
764 print
'<tr><td><label for="state_id">'.$langs->trans(
'Region-State').
'</label></td><td colspan="'.$colspan.
'" class="maxwidthonsmartphone">';
766 print
'<tr><td><label for="state_id">'.$langs->trans(
'State').
'</label></td><td colspan="'.$colspan.
'" class="maxwidthonsmartphone">';
769 if ($object->country_id) {
770 print
img_picto(
'',
'state',
'class="pictofixedwidth"');
771 print $formcompany->select_state(
GETPOST(
"state_id",
'alpha') ?
GETPOST(
"state_id",
'alpha') : $object->state_id, $object->country_code,
'state_id');
773 print $countrynotdefined;
778 if (((isset($objsoc->typent_code) && $objsoc->typent_code ==
'TE_PRIVATE') || !empty($conf->global->CONTACT_USE_COMPANY_ADDRESS)) &&
dol_strlen(trim($object->phone_pro)) == 0) {
779 $object->phone_pro = $objsoc->phone;
781 if (((isset($objsoc->typent_code) && $objsoc->typent_code ==
'TE_PRIVATE') || !empty($conf->global->CONTACT_USE_COMPANY_ADDRESS)) &&
dol_strlen(trim($object->fax)) == 0) {
782 $object->fax = $objsoc->fax;
786 print
'<tr><td>'.$form->editfieldkey(
'PhonePro',
'phone_pro',
'', $object, 0).
'</td>';
788 print
img_picto(
'',
'object_phoning',
'class="pictofixedwidth"');
789 print
'<input type="text" name="phone_pro" id="phone_pro" class="maxwidth200" value="'.(GETPOSTISSET(
'phone_pro') ?
GETPOST(
'phone_pro',
'alpha') : $object->phone_pro).
'"></td>';
790 if ($conf->browser->layout ==
'phone') {
793 print
'<td>'.$form->editfieldkey(
'PhonePerso',
'phone_perso',
'', $object, 0).
'</td>';
795 print
img_picto(
'',
'object_phoning',
'class="pictofixedwidth"');
796 print
'<input type="text" name="phone_perso" id="phone_perso" class="maxwidth200" value="'.(GETPOSTISSET(
'phone_perso') ?
GETPOST(
'phone_perso',
'alpha') : $object->phone_perso).
'"></td>';
799 print
'<tr><td>'.$form->editfieldkey(
'PhoneMobile',
'phone_mobile',
'', $object, 0).
'</td>';
801 print
img_picto(
'',
'object_phoning_mobile',
'class="pictofixedwidth"');
802 print
'<input type="text" name="phone_mobile" id="phone_mobile" class="maxwidth200" value="'.(GETPOSTISSET(
'phone_mobile') ?
GETPOST(
'phone_mobile',
'alpha') : $object->phone_mobile).
'"></td>';
803 if ($conf->browser->layout ==
'phone') {
806 print
'<td>'.$form->editfieldkey(
'Fax',
'fax',
'', $object, 0).
'</td>';
808 print
img_picto(
'',
'object_phoning_fax',
'class="pictofixedwidth"');
809 print
'<input type="text" name="fax" id="fax" class="maxwidth200" value="'.(GETPOSTISSET(
'fax') ?
GETPOST(
'fax',
'alpha') : $object->fax).
'"></td>';
812 if (((isset($objsoc->typent_code) && $objsoc->typent_code ==
'TE_PRIVATE') || !empty($conf->global->CONTACT_USE_COMPANY_ADDRESS)) &&
dol_strlen(trim($object->email)) == 0) {
813 $object->email = $objsoc->email;
817 print
'<tr><td>'.$form->editfieldkey(
'EMail',
'email',
'', $object, 0,
'string',
'').
'</td>';
819 print
img_picto(
'',
'object_email',
'class="pictofixedwidth"');
820 print
'<input type="text" name="email" id="email" value="'.(GETPOSTISSET(
'email') ?
GETPOST(
'email',
'alpha') : $object->email).
'"></td>';
825 if ($conf->use_javascript_ajax &&
getDolGlobalInt(
'MAILING_CONTACT_DEFAULT_BULK_STATUS') == 2) {
826 print
"\n".
'<script type="text/javascript">'.
"\n";
827 print
'$(document).ready(function () {
828 $("#email").keyup(function() {
829 if ($(this).val()!="") {
830 $(".noemail").addClass("fieldrequired");
832 $(".noemail").removeClass("fieldrequired");
836 print
'</script>'.
"\n";
838 if (!
GETPOSTISSET(
"no_email") && !empty($object->email)) {
839 $result = $object->getNoEmail();
845 print
'<td class="noemail"><label for="no_email">'.$langs->trans(
"No_Email").
'</label></td>';
854 $object->showSocialNetwork($socialnetworks, ($conf->browser->layout ==
'phone' ? 2 : 4));
858 print
'<tr><td><label for="priv">'.$langs->trans(
"ContactVisibility").
'</label></td><td colspan="3">';
859 $selectarray = array(
'0'=>$langs->trans(
"ContactPublic"),
'1'=>$langs->trans(
"ContactPrivate"));
860 print
$form->selectarray(
'priv', $selectarray, (
GETPOST(
"priv",
'alpha') ?
GETPOST(
"priv",
'alpha') : $object->priv), 0);
865 print
'<tr><td>'.$form->editfieldkey(
'DefaultLang',
'default_lang',
'', $object, 0).
'</td><td colspan="3" class="maxwidthonsmartphone">'.
"\n";
866 print
img_picto(
'',
'language',
'class="pictofixedwidth"').$formadmin->select_language(
GETPOST(
'default_lang',
'alpha') ?
GETPOST(
'default_lang',
'alpha') : ($object->default_lang ? $object->default_lang :
''),
'default_lang', 0, 0, 1, 0, 0,
'maxwidth200onsmartphone');
872 if (
isModEnabled(
'categorie') && $user->hasRight(
'categorie',
'lire')) {
873 print
'<tr><td>'.$form->editfieldkey(
'Categories',
'contcats',
'', $object, 0).
'</td><td colspan="3">';
874 $cate_arbo =
$form->select_all_categories(Categorie::TYPE_CONTACT,
null,
'parent',
null,
null, 1);
875 print
img_picto(
'',
'category',
'class="pictofixedwidth"').$form->multiselectarray(
'contcats', $cate_arbo,
GETPOST(
'contcats',
'array'),
null,
null,
null,
null,
'90%');
880 if (!empty($socid)) {
881 print
'<tr><td>'.$langs->trans(
"ContactByDefaultFor").
'</td>';
882 print
'<td colspan="3">';
883 $contactType = $object->listeTypeContacts(
'external',
'', 1);
884 print
$form->multiselectarray(
'roles', $contactType, array(), 0, 0,
'minwidth500');
889 $parameters = array(
'socid' => $socid,
'objsoc' => $objsoc,
'colspan' =>
' colspan="3"',
'cols' => 3,
'colspanvalue' => 3);
890 include DOL_DOCUMENT_ROOT.
'/core/tpl/extrafields_add.tpl.php';
892 print
"</table><br>";
894 print
'<hr style="margin-bottom: 20px">';
897 print
load_fiche_titre(
'<div class="comboperso">'.$langs->trans(
"PersonalInformations").
'</div>',
'',
'');
899 print
'<table class="border centpercent">';
902 print
'<tr><td><label for="birthday">'.$langs->trans(
"DateOfBirth").
'</label></td><td>';
904 if ($object->birthday) {
905 print
$form->selectDate($object->birthday,
'birthday', 0, 0, 0,
"perso", 1, 0);
907 print
$form->selectDate(
'',
'birthday', 0, 0, 1,
"perso", 1, 0);
911 print
'<td><label for="birthday_alert">'.$langs->trans(
"Alert").
'</label>: ';
912 if (!empty($object->birthday_alert)) {
913 print
'<input type="checkbox" name="birthday_alert" id="birthday_alert" checked>';
915 print
'<input type="checkbox" name="birthday_alert" id="birthday_alert">';
924 print
$form->buttonsSaveCancel(
"Add");
927 } elseif ($action ==
'edit' && !empty($id)) {
933 if (
GETPOSTISSET(
"country_id") || $object->country_id) {
934 $tmparray =
getCountry($object->country_id,
'all');
935 $object->country_code = $tmparray[
'code'];
936 $object->country = $tmparray[
'label'];
940 $objsoc->fetch($object->socid);
945 if ($conf->use_javascript_ajax) {
946 print
"\n".
'<script type="text/javascript">'.
"\n";
947 print
'jQuery(document).ready(function () {
948 jQuery("#selectcountry_id").change(function() {
949 document.formsoc.action.value="edit";
950 document.formsoc.submit();
953 $("#copyaddressfromsoc").click(function() {
954 $(\'textarea[name="address"]\').val("'.dol_escape_js($objsoc->address).
'");
955 $(\'input[name="zipcode"]\').val("'.
dol_escape_js($objsoc->zip).
'");
956 $(\'input[name="town"]\').val("'.
dol_escape_js($objsoc->town).
'");
957 console.log("Set state_id to '.
dol_escape_js($objsoc->state_id).
'");
958 $(\'select[name="state_id"]\').val("'.
dol_escape_js($objsoc->state_id).
'").trigger("change");
959 /* set country at end because it will trigger page refresh */
960 console.log("Set country id to '.
dol_escape_js($objsoc->country_id).
'");
961 $(\'select[name="country_id"]\').val("'.
dol_escape_js($objsoc->country_id).
'").trigger("change"); /* trigger required to update select2 components */
964 print
'</script>'.
"\n";
967 print
'<form enctype="multipart/form-data" method="post" action="'.$_SERVER[
"PHP_SELF"].
'?id='.$id.
'" name="formsoc">';
968 print
'<input type="hidden" name="token" value="'.newToken().
'">';
969 print
'<input type="hidden" name="id" value="'.$id.
'">';
970 print
'<input type="hidden" name="action" value="update">';
971 print
'<input type="hidden" name="contactid" value="'.$object->id.
'">';
972 if (!empty($backtopage)) {
973 print
'<input type="hidden" name="backtopage" value="'.$backtopage.
'">';
978 print
'<table class="border centpercent">';
981 if (!empty($conf->global->MAIN_SHOW_TECHNICAL_ID)) {
982 print
'<tr><td>'.$langs->trans(
"ID").
'</td><td colspan="3">';
988 print
'<tr><td class="titlefieldcreate fieldrequired"><label for="lastname">'.$langs->trans(
"Lastname").
' / '.$langs->trans(
"Label").
'</label></td>';
989 print
'<td colspan="3"><input name="lastname" id="lastname" type="text" class="minwidth200" maxlength="80" value="'.(GETPOSTISSET(
"lastname") ?
GETPOST(
"lastname") : $object->lastname).
'" autofocus="autofocus"></td>';
993 print
'<td><label for="firstname">'.$langs->trans(
"Firstname").
'</label></td>';
994 print
'<td colspan="3"><input name="firstname" id="firstname" type="text" class="minwidth200" maxlength="80" value="'.(GETPOSTISSET(
"firstname") ?
GETPOST(
"firstname") : $object->firstname).
'"></td>';
998 if (empty($conf->global->SOCIETE_DISABLE_CONTACTS)) {
999 print
'<tr><td><label for="socid">'.$langs->trans(
"ThirdParty").
'</label></td>';
1000 print
'<td colspan="3" class="maxwidthonsmartphone">';
1001 print
img_picto(
'',
'company',
'class="pictofixedwidth"').$form->select_company(
GETPOST(
'socid',
'int') ?
GETPOST(
'socid',
'int') : ($object->socid ? $object->socid : -1),
'socid',
'', $langs->trans(
"SelectThirdParty"));
1007 print
'<tr><td><label for="civility_code">'.$langs->trans(
"UserTitle").
'</label></td><td colspan="3">';
1008 print $formcompany->select_civility(
GETPOSTISSET(
"civility_code") ?
GETPOST(
"civility_code",
"aZ09") : $object->civility_code,
'civility_code');
1012 print
'<tr><td><label for="title">'.$langs->trans(
"PostOrFunction").
'</label></td>';
1013 print
'<td colspan="3"><input name="poste" id="title" type="text" class="minwidth100" maxlength="255" value="'.dol_escape_htmltag(
GETPOSTISSET(
"poste") ?
GETPOST(
"poste",
'alphanohtml') : $object->poste).
'"></td></tr>';
1016 print
'<tr><td><label for="address">'.$langs->trans(
"Address").
'</label></td>';
1017 print
'<td colspan="3">';
1018 print
'<div class="paddingrightonly valignmiddle inline-block quatrevingtpercent">';
1019 print
'<textarea class="flat minwidth200 centpercent" name="address" id="address">'.(GETPOSTISSET(
"address") ?
GETPOST(
"address",
'alphanohtml') : $object->address).
'</textarea>';
1020 print
'</div><div class="paddingrightonly valignmiddle inline-block">';
1021 if (!empty($conf->use_javascript_ajax)) {
1022 print
'<a href="#" id="copyaddressfromsoc">'.$langs->trans(
'CopyAddressFromSoc').
'</a><br>';
1028 print
'<tr><td><label for="zipcode">'.$langs->trans(
"Zip").
'</label> / <label for="town">'.$langs->trans(
"Town").
'</label></td><td colspan="3" class="maxwidthonsmartphone">';
1029 print $formcompany->select_ziptown((
GETPOSTISSET(
"zipcode") ?
GETPOST(
"zipcode") : $object->zip),
'zipcode', array(
'town',
'selectcountry_id',
'state_id'), 6).
' ';
1030 print $formcompany->select_ziptown((
GETPOSTISSET(
"town") ?
GETPOST(
"town") : $object->town),
'town', array(
'zipcode',
'selectcountry_id',
'state_id'));
1034 print
'<tr><td><label for="selectcountry_id">'.$langs->trans(
"Country").
'</label></td><td colspan="3" class="maxwidthonsmartphone">';
1035 print
img_picto(
'',
'globe-americas',
'class="pictofixedwidth"');
1036 print
$form->select_country(
GETPOSTISSET(
"country_id") ?
GETPOST(
"country_id") : $object->country_id,
'country_id');
1038 print
info_admin($langs->trans(
"YouCanChangeValuesForThisListFromDictionarySetup"), 1);
1043 if (empty($conf->global->SOCIETE_DISABLE_STATE)) {
1044 if (!empty($conf->global->MAIN_SHOW_REGION_IN_STATE_SELECT) && ($conf->global->MAIN_SHOW_REGION_IN_STATE_SELECT == 1 || $conf->global->MAIN_SHOW_REGION_IN_STATE_SELECT == 2)) {
1045 print
'<tr><td><label for="state_id">'.$langs->trans(
'Region-State').
'</label></td><td colspan="3" class="maxwidthonsmartphone">';
1047 print
'<tr><td><label for="state_id">'.$langs->trans(
'State').
'</label></td><td colspan="3" class="maxwidthonsmartphone">';
1050 print
img_picto(
'',
'state',
'class="pictofixedwidth"');
1051 print $formcompany->select_state(
GETPOSTISSET(
'state_id') ?
GETPOST(
'state_id',
'alpha') : $object->state_id, $object->country_code,
'state_id');
1056 print
'<tr><td>'.$form->editfieldkey(
'PhonePro',
'phone_pro',
GETPOST(
'phone_pro',
'alpha'), $object, 0).
'</td>';
1058 print
img_picto(
'',
'object_phoning',
'class="pictofixedwidth"');
1059 print
'<input type="text" name="phone_pro" id="phone_pro" class="maxwidth200" maxlength="80" value="'.(GETPOSTISSET(
'phone_pro') ?
GETPOST(
'phone_pro',
'alpha') : $object->phone_pro).
'"></td>';
1060 if ($conf->browser->layout ==
'phone') {
1063 print
'<td>'.$form->editfieldkey(
'PhonePerso',
'fax',
GETPOST(
'phone_perso',
'alpha'), $object, 0).
'</td>';
1065 print
img_picto(
'',
'object_phoning',
'class="pictofixedwidth"');
1066 print
'<input type="text" name="phone_perso" id="phone_perso" class="maxwidth200" maxlength="80" value="'.(GETPOSTISSET(
'phone_perso') ?
GETPOST(
'phone_perso',
'alpha') : $object->phone_perso).
'"></td></tr>';
1068 print
'<tr><td>'.$form->editfieldkey(
'PhoneMobile',
'phone_mobile',
GETPOST(
'phone_mobile',
'alpha'), $object, 0,
'string',
'').
'</td>';
1070 print
img_picto(
'',
'object_phoning_mobile',
'class="pictofixedwidth"');
1071 print
'<input type="text" name="phone_mobile" id="phone_mobile" class="maxwidth200" maxlength="80" value="'.(GETPOSTISSET(
'phone_mobile') ?
GETPOST(
'phone_mobile',
'alpha') : $object->phone_mobile).
'"></td>';
1072 if ($conf->browser->layout ==
'phone') {
1075 print
'<td>'.$form->editfieldkey(
'Fax',
'fax',
GETPOST(
'fax',
'alpha'), $object, 0).
'</td>';
1077 print
img_picto(
'',
'object_phoning_fax',
'class="pictofixedwidth"');
1078 print
'<input type="text" name="fax" id="fax" class="maxwidth200" maxlength="80" value="'.(GETPOSTISSET(
'phone_fax') ?
GETPOST(
'phone_fax',
'alpha') : $object->fax).
'"></td></tr>';
1081 print
'<tr><td>'.$form->editfieldkey(
'EMail',
'email',
GETPOST(
'email',
'alpha'), $object, 0,
'string',
'', (!empty($conf->global->SOCIETE_EMAIL_MANDATORY))).
'</td>';
1083 print
img_picto(
'',
'object_email',
'class="pictofixedwidth"');
1084 print
'<input type="text" name="email" id="email" class="maxwidth100onsmartphone quatrevingtpercent" value="'.(GETPOSTISSET(
'email') ?
GETPOST(
'email',
'alpha') : $object->email).
'"></td>';
1086 $langs->load(
"mails");
1087 print
'<td class="nowrap">'.$langs->trans(
"NbOfEMailingsSend").
'</td>';
1088 print
'<td>'.$object->getNbOfEMailings().
'</td>';
1090 print
'<td colspan="2"></td>';
1096 if ($conf->use_javascript_ajax &&
getDolGlobalInt(
'MAILING_CONTACT_DEFAULT_BULK_STATUS') == 2) {
1097 print
"\n".
'<script type="text/javascript">'.
"\n";
1100 jQuery(document).ready(function () {
1101 function init_check_no_email(input) {
1102 if (input.val()!="") {
1103 $(".noemail").addClass("fieldrequired");
1105 $(".noemail").removeClass("fieldrequired");
1108 $("#email").keyup(function() {
1109 init_check_no_email($(this));
1111 init_check_no_email($("#email"));
1113 print
'</script>'.
"\n";
1115 if (!
GETPOSTISSET(
"no_email") && !empty($object->email)) {
1116 $result = $object->getNoEmail();
1122 print
'<td class="noemail"><label for="no_email">'.$langs->trans(
"No_Email").
'</label></td>';
1124 $useempty = (
getDolGlobalInt(
'MAILING_CONTACT_DEFAULT_BULK_STATUS') == 2);
1125 print
$form->selectyesno(
'no_email', (
GETPOSTISSET(
"no_email") ?
GETPOST(
"no_email",
'int') : $object->no_email), 1,
false, $useempty);
1132 $object->showSocialNetwork($socialnetworks, ($conf->browser->layout ==
'phone' ? 2 : 4));
1136 print
'<tr><td><label for="priv">'.$langs->trans(
"ContactVisibility").
'</label></td><td colspan="3">';
1137 $selectarray = array(
'0'=>$langs->trans(
"ContactPublic"),
'1'=>$langs->trans(
"ContactPrivate"));
1138 print
$form->selectarray(
'priv', $selectarray, $object->priv, 0, 0, 0,
'', 0, 0, 0,
'',
'maxwidth150');
1143 print
'<tr><td>'.$form->editfieldkey(
'DefaultLang',
'default_lang',
'', $object, 0).
'</td><td colspan="3" class="maxwidthonsmartphone">'.
"\n";
1144 print
img_picto(
'',
'language',
'class="pictofixedwidth"').$formadmin->select_language(
GETPOST(
'default_lang',
'alpha') ?
GETPOST(
'default_lang',
'alpha') : ($object->default_lang ? $object->default_lang :
''),
'default_lang', 0, 0, 1, 0, 0,
'maxwidth200onsmartphone');
1150 print
'<tr><td class="tdtop"><label for="note_public">'.$langs->trans(
"NotePublic").
'</label></td><td colspan="3">';
1151 $doleditor =
new DolEditor(
'note_public', $object->note_public,
'', 80,
'dolibarr_notes',
'In', 0,
false, empty($conf->global->FCKEDITOR_ENABLE_NOTE_PUBLIC) ? 0 : 1, ROWS_3,
'90%');
1152 print $doleditor->Create(1);
1156 print
'<tr><td class="tdtop"><label for="note_private">'.$langs->trans(
"NotePrivate").
'</label></td><td colspan="3">';
1157 $doleditor =
new DolEditor(
'note_private', $object->note_private,
'', 80,
'dolibarr_notes',
'In', 0,
false, empty($conf->global->FCKEDITOR_ENABLE_NOTE_PRIVATE) ? 0 : 1, ROWS_3,
'90%');
1158 print $doleditor->Create(1);
1162 print
'<tr><td>'.$langs->trans(
"Status").
'</td>';
1163 print
'<td colspan="3">';
1164 print $object->getLibStatut(4);
1168 if (
isModEnabled(
'categorie') && $user->hasRight(
'categorie',
'lire')) {
1169 $arrayselected = array();
1170 print
'<tr><td>'.$form->editfieldkey(
'Categories',
'contcats',
'', $object, 0).
'</td>';
1171 print
'<td colspan="3">';
1172 $cate_arbo =
$form->select_all_categories(Categorie::TYPE_CONTACT,
null,
null,
null,
null, 1);
1174 $cats = $c->containing($object->id,
'contact');
1175 foreach ($cats as $cat) {
1176 $arrayselected[] = $cat->id;
1178 print
img_picto(
'',
'category',
'class="pictofixedwidth"').$form->multiselectarray(
'contcats', $cate_arbo, $arrayselected,
'', 0,
'', 0,
'90%');
1183 if (!empty($object->socid)) {
1184 print
'<tr><td>'.$langs->trans(
"ContactByDefaultFor").
'</td>';
1185 print
'<td colspan="3">';
1186 print $formcompany->showRoles(
"roles", $object,
'edit', $object->roles);
1191 $parameters = array(
'colspan' =>
' colspan="3"',
'cols'=>
'3',
'colspanvalue'=>
'3');
1192 include DOL_DOCUMENT_ROOT.
'/core/tpl/extrafields_edit.tpl.php';
1194 $object->load_ref_elements();
1197 print
'<tr><td>'.$langs->trans(
"ContactForOrders").
'</td><td colspan="3">';
1198 print $object->ref_commande ? $object->ref_commande : (
'<span class="opacitymedium">'.$langs->trans(
"NoContactForAnyOrder").
'</span>');
1203 print
'<tr><td>'.$langs->trans(
"ContactForProposals").
'</td><td colspan="3">';
1204 print $object->ref_propal ? $object->ref_propal : (
'<span class="opacitymedium">'.$langs->trans(
"NoContactForAnyProposal").
'</span>');
1209 print
'<tr><td>'.$langs->trans(
"ContactForContracts").
'</td><td colspan="3">';
1210 print $object->ref_contrat ? $object->ref_contrat : (
'<span class="opacitymedium">'.$langs->trans(
"NoContactForAnyContract").
'</span>');
1215 print
'<tr><td>'.$langs->trans(
"ContactForInvoices").
'</td><td colspan="3">';
1216 print $object->ref_facturation ? $object->ref_facturation : (
'<span class="opacitymedium">'.$langs->trans(
"NoContactForAnyInvoice").
'</span>');
1221 print
'<tr><td>'.$langs->trans(
"DolibarrLogin").
'</td><td colspan="3">';
1222 if ($object->user_id) {
1223 $dolibarr_user =
new User($db);
1224 $result = $dolibarr_user->fetch($object->user_id);
1225 print $dolibarr_user->getLoginUrl(1);
1227 print
'<span class="opacitymedium">'.$langs->trans(
"NoDolibarrAccess").
'</span>';
1233 print
'<td>'.$langs->trans(
"PhotoFile").
'</td>';
1234 print
'<td colspan="3">';
1235 if ($object->photo) {
1236 print
$form->showphoto(
'contact', $object);
1239 print
'<table class="nobordernopadding">';
1240 if ($object->photo) {
1241 print
'<tr><td><input type="checkbox" class="flat photodelete" name="deletephoto" id="photodelete"> '.$langs->trans(
"Delete").
'<br><br></td></tr>';
1246 $maxmin = $maxfilesizearray[
'maxmin'];
1248 print
'<input type="hidden" name="MAX_FILE_SIZE" value="'.($maxmin * 1024).
'">';
1250 print
'<input type="file" class="flat maxwidth200" name="photo" id="photoinput">';
1261 print
$form->buttonsSaveCancel();
1268 if (
GETPOST(
'modelselected',
'alpha')) {
1269 $action =
'presend';
1273 if (!empty($id) && $action !=
'edit' && $action !=
'create') {
1281 if ($action ==
'create_user') {
1283 include_once DOL_DOCUMENT_ROOT.
'/core/lib/functions2.lib.php';
1286 $generated_password =
'';
1287 if (empty($ldap_sid)) {
1288 require_once DOL_DOCUMENT_ROOT.
'/core/lib/security2.lib.php';
1291 $password = $generated_password;
1294 $formquestion = array(
1295 array(
'label' => $langs->trans(
"LoginToCreate"),
'type' =>
'text',
'name' =>
'login',
'value' => $login),
1296 array(
'label' => $langs->trans(
"Password"),
'type' =>
'text',
'name' =>
'password',
'value' => $password),
1299 $text = $langs->trans(
"ConfirmCreateContact").
'<br>';
1301 if ($object->socid > 0) {
1302 $text .= $langs->trans(
"UserWillBeExternalUser");
1304 $text .= $langs->trans(
"UserWillBeInternalUser");
1307 print
$form->formconfirm($_SERVER[
"PHP_SELF"].
"?id=".$object->id, $langs->trans(
"CreateDolibarrLogin"), $text,
"confirm_create_user", $formquestion,
'yes');
1310 $linkback =
'<a href="'.DOL_URL_ROOT.
'/contact/list.php?restore_lastsearch_values=1">'.$langs->trans(
"BackToList").
'</a>';
1312 $morehtmlref =
'<a href="'.DOL_URL_ROOT.
'/contact/vcard.php?id='.$object->id.
'" class="refid">';
1313 $morehtmlref .=
img_picto($langs->trans(
"Download").
' '.$langs->trans(
"VCard"),
'vcard.png',
'class="valignmiddle marginleftonly paddingrightonly"');
1314 $morehtmlref .=
'</a>';
1316 $morehtmlref .=
'<div class="refidno">';
1317 if (empty($conf->global->SOCIETE_DISABLE_CONTACTS)) {
1318 $objsoc->fetch($object->socid);
1320 if ($objsoc->id > 0) {
1321 $morehtmlref .= $objsoc->getNomUrl(1,
'contact');
1323 $morehtmlref .=
'<span class="opacitymedium">'.$langs->trans(
"ContactNotLinkedToCompany").
'</span>';
1326 $morehtmlref .=
'</div>';
1328 dol_banner_tab($object,
'id', $linkback, 1,
'rowid',
'ref', $morehtmlref);
1331 print
'<div class="fichecenter">';
1332 print
'<div class="fichehalfleft">';
1334 print
'<div class="underbanner clearboth"></div>';
1335 print
'<table class="border tableforfield" width="100%">';
1338 print
'<tr><td class="titlefield">'.$langs->trans(
"UserTitle").
'</td><td>';
1339 print $object->getCivilityLabel();
1343 print
'<tr><td>'.$langs->trans(
"PostOrFunction").
'</td><td>'.$object->poste.
'</td></tr>';
1347 $langs->load(
"mails");
1348 print
'<tr><td>'.$langs->trans(
"NbOfEMailingsSend").
'</td>';
1349 print
'<td><a href="'.DOL_URL_ROOT.
'/comm/mailing/list.php?filteremail='.urlencode($object->email).
'">'.$object->getNbOfEMailings().
'</a></td></tr>';
1354 $result = $object->getNoEmail();
1358 print
'<tr><td>'.$langs->trans(
"No_Email").
'</td><td>';
1359 if ($object->email) {
1360 print
yn($object->no_email);
1362 print
'<span class="opacitymedium">'.$langs->trans(
"EMailNotDefined").
'</span>';
1369 require_once DOL_DOCUMENT_ROOT.
'/core/lib/functions2.lib.php';
1370 print
'<tr><td>'.$langs->trans(
"DefaultLang").
'</td><td>';
1373 $langs->load(
"languages");
1374 $labellang = ($object->default_lang ? $langs->trans(
'Language_'.$object->default_lang) :
'');
1375 print
picto_from_langcode($object->default_lang,
'class="paddingrightonly saturatemedium opacitylow"');
1380 print
'<tr><td>'.$langs->trans(
"ContactVisibility").
'</td><td>';
1381 print $object->LibPubPriv($object->priv);
1387 $object->fetch_thirdparty();
1390 print
'<div class="fichehalfright">';
1392 print
'<div class="underbanner clearboth"></div>';
1393 print
'<table class="border tableforfield centpercent">';
1396 if (!empty($conf->global->THIRDPARTY_ENABLE_PROSPECTION_ON_ALTERNATIVE_ADRESSES)) {
1397 if ($object->thirdparty->client == 2 || $object->thirdparty->client == 3) {
1399 print
'<tr><td class="titlefield">';
1400 print
'<table width="100%" class="nobordernopadding"><tr><td class="nowrap">';
1401 print $langs->trans(
'ProspectLevel');
1403 if ($action !=
'editlevel' && $user->hasRight(
'societe',
'contact',
'creer')) {
1404 print
'<td align="right"><a href="'.$_SERVER[
"PHP_SELF"].
'?action=editlevel&token='.
newToken().
'&id='.$object->id.
'">'.
img_edit($langs->trans(
'Modify'), 1).
'</a></td>';
1406 print
'</tr></table>';
1408 if ($action ==
'editlevel') {
1409 $formcompany->formProspectContactLevel($_SERVER[
'PHP_SELF'].
'?id='.$object->id, $object->fk_prospectlevel,
'prospect_contact_level_id', 1);
1411 print $object->getLibProspLevel();
1417 $object->loadCacheOfProspStatus();
1418 print
'<tr><td>'.$langs->trans(
"StatusProsp").
'</td><td>'.$object->getLibProspCommStatut(4, $object->cacheprospectstatus[$object->stcomm_id][
'label']);
1419 print
' ';
1420 print
'<div class="floatright">';
1421 foreach ($object->cacheprospectstatus as $key => $val) {
1422 $titlealt =
'default';
1423 if (!empty($val[
'code']) && !in_array($val[
'code'], array(
'ST_NO',
'ST_NEVER',
'ST_TODO',
'ST_PEND',
'ST_DONE'))) {
1424 $titlealt = $val[
'label'];
1426 if ($object->stcomm_id != $val[
'id']) {
1427 print
'<a class="pictosubstatus" href="'.$_SERVER[
"PHP_SELF"].
'?id='.$object->id.
'&stcomm='.urlencode($val[
'code']).
'&action=setstcomm&token='.
newToken().
'">'.
img_action($titlealt, $val[
'code'], $val[
'picto']).
'</a>';
1430 print
'</div></td></tr>';
1435 if (
isModEnabled(
'categorie') && $user->hasRight(
'categorie',
'lire')) {
1436 print
'<tr><td class="titlefield">'.$langs->trans(
"Categories").
'</td>';
1438 print
$form->showCategories($object->id, Categorie::TYPE_CONTACT, 1);
1442 if (!empty($object->socid)) {
1443 print
'<tr><td class="titlefield">'.$langs->trans(
"ContactByDefaultFor").
'</td>';
1445 print $formcompany->showRoles(
"roles", $object,
'view', $object->roles);
1451 include DOL_DOCUMENT_ROOT.
'/core/tpl/extrafields_view.tpl.php';
1453 $object->load_ref_elements();
1456 print
'<tr><td class="titlefield tdoverflow">'.$langs->trans(
"ContactForProposals").
'</td><td>';
1457 print $object->ref_propal ? $object->ref_propal : $langs->trans(
"NoContactForAnyProposal");
1462 print
'<tr><td class="titlefield tdoverflow">';
1464 print $langs->trans(
"ContactForOrdersOrShipments");
1466 print $langs->trans(
"ContactForOrders");
1469 $none = $langs->trans(
"NoContactForAnyOrder");
1471 $none = $langs->trans(
"NoContactForAnyOrderOrShipments");
1473 print $object->ref_commande ? $object->ref_commande : $none;
1478 print
'<tr><td class="tdoverflow">'.$langs->trans(
"ContactForContracts").
'</td><td>';
1479 print $object->ref_contrat ? $object->ref_contrat : $langs->trans(
"NoContactForAnyContract");
1484 print
'<tr><td class="tdoverflow">'.$langs->trans(
"ContactForInvoices").
'</td><td>';
1485 print $object->ref_facturation ? $object->ref_facturation : $langs->trans(
"NoContactForAnyInvoice");
1489 print
'<tr><td>'.$langs->trans(
"DolibarrLogin").
'</td><td>';
1490 if ($object->user_id) {
1491 $dolibarr_user =
new User($db);
1492 $result = $dolibarr_user->fetch($object->user_id);
1493 print $dolibarr_user->getLoginUrl(-1);
1496 if (!$object->user_id && $user->hasRight(
'user',
'user',
'creer')) {
1497 print
'<a class="aaa" href="'.$_SERVER[
'PHP_SELF'].
'?id='.$object->id.
'&action=create_user&token='.
newToken().
'">'.
img_picto($langs->trans(
"CreateDolibarrLogin"),
'add',
'class="pictofixedwidth"').$langs->trans(
"CreateDolibarrLogin").
'</a>';
1504 print
'</div></div>';
1505 print
'<div class="clearboth"></div>';
1512 print
'<div class="tabsAction">';
1515 $reshook = $hookmanager->executeHooks(
'addMoreActionsButtons',
$parameters, $object, $action);
1516 if (empty($reshook) && $action !=
'presend') {
1517 if (empty($user->socid)) {
1518 if (!empty($object->email)) {
1519 $langs->load(
"mails");
1520 print
'<div class="inline-block divButAction"><a class="butAction" href="'.$_SERVER[
'PHP_SELF'].
'?id='.$object->id.
'&action=presend&mode=init#formmailbeforetitle">'.$langs->trans(
'SendMail').
'</a></div>';
1522 $langs->load(
"mails");
1523 print
'<div class="inline-block divButAction"><a class="butActionRefused" href="#" title="'.dol_escape_htmltag($langs->trans(
"NoEMail")).
'">'.$langs->trans(
'SendMail').
'</a></div>';
1527 if ($user->rights->societe->contact->creer) {
1528 print
'<a class="butAction" href="'.$_SERVER[
'PHP_SELF'].
'?id='.$object->id.
'&action=edit&token='.
newToken().
'">'.$langs->trans(
'Modify').
'</a>';
1532 if ($object->statut == 0 && $user->hasRight(
'societe',
'contact',
'creer')) {
1533 print
'<a class="butAction" href="'.$_SERVER[
'PHP_SELF'].
'?id='.$object->id.
'&action=enable&token='.
newToken().
'">'.$langs->trans(
"Reactivate").
'</a>';
1536 if ($object->statut == 1 && $user->hasRight(
'societe',
'contact',
'creer')) {
1537 print
'<a class="butActionDelete" href="'.$_SERVER[
'PHP_SELF'].
'?action=disable&id='.$object->id.
'&token='.
newToken().
'">'.$langs->trans(
"DisableUser").
'</a>';
1541 if ($user->rights->societe->contact->supprimer) {
1542 print
dolGetButtonAction($langs->trans(
"Delete"),
'',
'delete', $_SERVER[
"PHP_SELF"].
'?id='.$object->id.
'&action=delete&token='.
newToken().($backtopage ?
'&backtopage='.urlencode($backtopage) :
''),
'delete', $user->rights->societe->contact->supprimer);
1549 if (
GETPOST(
'modelselected')) {
1550 $action =
'presend';
1553 if ($action !=
'presend') {
1554 print
'<div class="fichecenter"><div class="fichehalfleft">';
1556 print
'</div><div class="fichehalfright">';
1560 $morehtmlright =
dolGetButtonTitle($langs->trans(
'SeeAll'),
'',
'fa fa-bars imgforviewmode', DOL_URL_ROOT.
'/contact/agenda.php?id='.$object->id);
1563 include_once DOL_DOCUMENT_ROOT.
'/core/class/html.formactions.class.php';
1565 $somethingshown =
$formactions->showactions($object,
'contact', $object->socid, 1,
'', $MAXEVENT,
'', $morehtmlright);
1567 print
'</div></div>';
1571 $modelmail =
'contact';
1572 $defaulttopic =
'Information';
1573 $diroutput = $conf->societe->dir_output.
'/contact/';
1574 $trackid =
'ctc'.$object->id;
1576 include DOL_DOCUMENT_ROOT.
'/core/tpl/card_presend.tpl.php';
if(GETPOST('button_removefilter_x', 'alpha')||GETPOST('button_removefilter.x', 'alpha')||GETPOST('button_removefilter', 'alpha')) if(GETPOST('button_search_x', 'alpha')||GETPOST('button_search.x', 'alpha')||GETPOST('button_search', 'alpha')) if($action=="save" &&empty($cancel)) $help_url
View.
if(preg_match('/set_([a-z0-9_\-]+)/i', $action, $reg)) if(preg_match('/del_([a-z0-9_\-]+)/i', $action, $reg)) if($action=='set') elseif($action=='specimen') elseif($action=='setmodel') elseif($action=='del') elseif($action=='setdoc') $formactions
View.
if(!defined('NOREQUIRESOC')) if(!defined('NOREQUIRETRAN')) if(!defined('NOTOKENRENEWAL')) if(!defined('NOREQUIREMENU')) if(!defined('NOREQUIREHTML')) if(!defined('NOREQUIREAJAX')) llxHeader()
Empty header.
Class to manage categories.
Class to manage a WYSIWYG editor.
Class to manage third parties objects (customers, suppliers, prospects...)
Class to manage Dolibarr users.
getCountry($searchkey, $withcode='', $dbtouse=0, $outputlangs='', $entconv=1, $searchlabel='')
Return country label, code or id from an id, code or label.
if($cancel &&! $id) if($action=='add' &&! $cancel) if($action=='delete') if($id) $form
Actions.
dol_delete_dir_recursive($dir, $count=0, $nophperrors=0, $onlysub=0, &$countdeleted=0, $indexdatabase=1, $nolog=0)
Remove a directory $dir and its subdirectories (or only files and subdirectories)
dol_delete_file($file, $disableglob=0, $nophperrors=0, $nohook=0, $object=null, $allowdotdot=false, $indexdatabase=1, $nolog=0)
Remove a file or several files with a mask.
dol_move_uploaded_file($src_file, $dest_file, $allowoverwrite, $disablevirusscan=0, $uploaderrorcode=0, $nohook=0, $varfiles='addedfile', $upload_dir='')
Make control on an uploaded file from an GUI page and move it to final destination.
dol_buildlogin($lastname, $firstname)
Build a login from lastname, firstname.
dol_banner_tab($object, $paramid, $morehtml='', $shownav=1, $fieldid='rowid', $fieldref='ref', $morehtmlref='', $moreparam='', $nodbprefix=0, $morehtmlleft='', $morehtmlstatus='', $onlybanner=0, $morehtmlright='')
Show tab footer of a card.
dol_mktime($hour, $minute, $second, $month, $day, $year, $gm='auto', $check=1)
Return a timestamp date built from detailed informations (by default a local PHP server timestamp) Re...
picto_from_langcode($codelang, $moreatt='', $notitlealt=0)
Return img flag of country for a language code or country code.
load_fiche_titre($titre, $morehtmlright='', $picto='generic', $pictoisfullpath=0, $id='', $morecssontable='', $morehtmlcenter='')
Load a title with picto.
yn($yesno, $case=1, $color=0)
Return yes or no in current language.
dol_get_fiche_head($links=array(), $active='', $title='', $notab=0, $picto='', $pictoisfullpath=0, $morehtmlright='', $morecss='', $limittoshow=0, $moretabssuffix='', $dragdropfile=0)
Show tabs of a record.
dol_print_error($db='', $error='', $errors=null)
Displays error message system with all the information to facilitate the diagnosis and the escalation...
dolGetButtonTitle($label, $helpText='', $iconClass='fa fa-file', $url='', $id='', $status=1, $params=array())
Function dolGetButtonTitle : this kind of buttons are used in title in list.
dol_get_fiche_end($notab=0)
Return tab footer of a card.
img_action($titlealt, $numaction, $picto='', $moreatt='')
Show logo action.
dol_strlen($string, $stringencoding='UTF-8')
Make a strlen call.
getDolGlobalInt($key, $default=0)
Return dolibarr global constant int value.
img_picto($titlealt, $picto, $moreatt='', $pictoisfullpath=false, $srconly=0, $notitle=0, $alt='', $morecss='', $marginleftonlyshort=2)
Show picto whatever it's its name (generic function)
dol_escape_js($stringtoescape, $mode=0, $noescapebackslashn=0)
Returns text escaped for inclusion into javascript code.
dol_getIdFromCode($db, $key, $tablename, $fieldkey='code', $fieldid='id', $entityfilter=0, $filters='')
Return an id or code from a code or id.
newToken()
Return the value of token currently saved into session with name 'newtoken'.
dol_clone($object, $native=0)
Create a clone of instance of object (new instance with same value for each properties) With native =...
dolGetButtonAction($label, $text='', $actionType='default', $url='', $id='', $userRight=1, $params=array())
Function dolGetButtonAction.
getArrayOfSocialNetworks()
Get array of social network dictionary.
GETPOST($paramname, $check='alphanohtml', $method=0, $filter=null, $options=null, $noreplace=0)
Return value of a param into GET or POST supervariable.
info_admin($text, $infoonimgalt=0, $nodiv=0, $admin='1', $morecss='hideonsmartphone', $textfordropdown='')
Show information for admin users or standard users.
setEventMessages($mesg, $mesgs, $style='mesgs', $messagekey='', $noduplicate=0)
Set event messages in dol_events session object.
dol_sanitizeFileName($str, $newstr='_', $unaccent=1)
Clean a string to use it as a file name.
GETPOSTISSET($paramname)
Return true if we are in a context of submitting the parameter $paramname from a POST of a form.
isModEnabled($module)
Is Dolibarr module enabled.
img_edit($titlealt='default', $float=0, $other='')
Show logo editer/modifier fiche.
dol_htmloutput_errors($mesgstring='', $mesgarray=array(), $keepembedded=0)
Print formated error messages to output (Used to show messages on html output).
dol_mkdir($dir, $dataroot='', $newmask='')
Creation of a directory (this can create recursive subdir)
image_format_supported($file, $acceptsvg=0)
Return if a filename is file name of a supported image format.
getRandomPassword($generic=false, $replaceambiguouschars=null, $length=32)
Return a generated password using default module.
getMaxFileSizeArray()
Return the max allowed for file upload.
restrictedArea(User $user, $features, $object=0, $tableandshare='', $feature2='', $dbt_keyfield='fk_soc', $dbt_select='rowid', $isdraft=0, $mode=0)
Check permissions of a user to show a page and an object.
accessforbidden($message='', $printheader=1, $printfooter=1, $showonlymessage=0, $params=null)
Show a message to say access is forbidden and stop program.