34 require
'../main.inc.php';
35 require_once DOL_DOCUMENT_ROOT.
'/core/lib/company.lib.php';
36 require_once DOL_DOCUMENT_ROOT.
'/core/lib/images.lib.php';
37 require_once DOL_DOCUMENT_ROOT.
'/core/lib/files.lib.php';
38 require_once DOL_DOCUMENT_ROOT.
'/core/lib/functions.lib.php';
39 require_once DOL_DOCUMENT_ROOT.
'/core/class/html.formadmin.class.php';
40 require_once DOL_DOCUMENT_ROOT.
'/core/class/html.formcompany.class.php';
41 require_once DOL_DOCUMENT_ROOT.
'/core/class/html.formfile.class.php';
42 require_once DOL_DOCUMENT_ROOT.
'/core/class/extrafields.class.php';
43 require_once DOL_DOCUMENT_ROOT.
'/contact/class/contact.class.php';
44 require_once DOL_DOCUMENT_ROOT.
'/categories/class/categorie.class.php';
45 if (!empty($conf->adherent->enabled)) require_once DOL_DOCUMENT_ROOT.
'/adherents/class/adherent.class.php';
47 $langs->loadLangs(array(
"companies",
"commercial",
"bills",
"banks",
"users"));
48 if (!empty($conf->categorie->enabled)) $langs->load(
"categories");
49 if (!empty($conf->incoterm->enabled)) $langs->load(
"incoterm");
50 if (!empty($conf->notification->enabled)) $langs->load(
"mails");
52 $mesg =
''; $error = 0; $errors = array();
54 $action = (
GETPOST(
'action',
'aZ09') ?
GETPOST(
'action',
'aZ09') :
'view');
55 $cancel =
GETPOST(
'cancel',
'alpha');
56 $backtopage =
GETPOST(
'backtopage',
'alpha');
59 if ($user->socid) $socid = $user->socid;
60 if (empty($socid) && $action ==
'view') $action =
'create';
66 $extrafields->fetch_name_optionals_label($object->table_element);
69 $hookmanager->initHooks(array(
'thirdpartycontact',
'globalcard'));
71 if ($object->fetch($socid) <= 0 && $action ==
'view')
73 $langs->load(
"errors");
74 print($langs->trans(
'ErrorRecordNotFound'));
79 $canvas = $object->canvas ? $object->canvas :
GETPOST(
"canvas");
83 require_once DOL_DOCUMENT_ROOT.
'/core/class/canvas.class.php';
84 $objcanvas =
new Canvas($db, $action);
85 $objcanvas->getCanvas(
'thirdparty',
'card', $canvas);
89 $result =
restrictedArea($user,
'societe', $socid,
'&societe',
'',
'fk_soc',
'rowid', 0);
97 $parameters = array(
'id'=>$socid,
'objcanvas'=>$objcanvas);
98 $reshook = $hookmanager->executeHooks(
'doActions', $parameters, $object, $action);
99 if ($reshook < 0)
setEventMessages($hookmanager->error, $hookmanager->errors,
'errors');
106 if (!empty($backtopage))
108 header(
"Location: ".$backtopage);
114 include DOL_DOCUMENT_ROOT.
'/core/actions_changeselectedfields.inc.php';
122 $form =
new Form($db);
127 if ($socid > 0 && empty($object->id))
129 $result = $object->fetch($socid);
133 $title = $langs->trans(
"ThirdParty");
134 if (!empty($conf->global->MAIN_HTML_TITLE) && preg_match(
'/thirdpartynameonly/', $conf->global->MAIN_HTML_TITLE) && $object->name) $title = $object->name.
" - ".$langs->trans(
'Card');
135 $help_url =
'EN:Module_Third_Parties|FR:Module_Tiers|ES:Empresas';
138 $countrynotdefined = $langs->trans(
"ErrorSetACountryFirst").
' ('.$langs->trans(
"SeeAbove").
')';
141 if (!empty($object->id)) $res = $object->fetch_optionals();
149 $linkback =
'<a href="'.DOL_URL_ROOT.
'/societe/list.php?restore_lastsearch_values=1">'.$langs->trans(
"BackToList").
'</a>';
151 dol_banner_tab($object,
'socid', $linkback, ($user->socid ? 0 : 1),
'rowid',
'nom',
'',
'', 0,
'',
'',
'arearefnobottom');
157 if ($action !=
'presend')
160 if (empty($conf->global->SOCIETE_DISABLE_CONTACTS))
GETPOST($paramname, $check= 'alphanohtml', $method=0, $filter=null, $options=null, $noreplace=0)
Return value of a param into GET or POST supervariable.
show_contacts($conf, $langs, $db, $object, $backtopage= '')
Show html area for list of contacts.
setEventMessages($mesg, $mesgs, $style= 'mesgs', $messagekey= '')
Set event messages in dol_events session object.
Class to manage third parties objects (customers, suppliers, prospects...)
restrictedArea($user, $features, $objectid=0, $tableandshare= '', $feature2= '', $dbt_keyfield= 'fk_soc', $dbt_select= 'rowid', $isdraft=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 Calling this function terminate execution ...
societe_prepare_head(Societe $object)
Return array of tabs to used on pages for third parties cards.
print $_SERVER["PHP_SELF"]
Edit parameters.
dol_get_fiche_head($links=array(), $active= '', $title= '', $notab=0, $picto= '', $pictoisfullpath=0, $morehtmlright= '', $morecss= '', $limittoshow=0, $moretabssuffix= '')
Show tabs of a record.
print
Draft customers invoices.
dol_print_error($db= '', $error= '', $errors=null)
Displays error message system with all the information to facilitate the diagnosis and the escalation...
dol_get_fiche_end($notab=0)
Return tab footer of a card.
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.