31require
'../main.inc.php';
32require_once DOL_DOCUMENT_ROOT.
'/core/lib/contract.lib.php';
33require_once DOL_DOCUMENT_ROOT.
'/contrat/class/contrat.class.php';
34require_once DOL_DOCUMENT_ROOT.
'/contact/class/contact.class.php';
35require_once DOL_DOCUMENT_ROOT.
'/core/class/html.formcompany.class.php';
36if (isModEnabled(
'project')) {
37 require_once DOL_DOCUMENT_ROOT.
'/projet/class/project.class.php';
41$langs->loadLangs(array(
'contracts',
'companies'));
43$action =
GETPOST(
'action',
'aZ09');
44$confirm =
GETPOST(
'confirm',
'alpha');
51 $socid = $user->socid;
57$hookmanager->initHooks(array(
'contractcontactcard',
'globalcard'));
59$permissiontoadd = $user->hasRight(
'contrat',
'creer');
68$parameters = array(
'id'=>$id);
69$reshook = $hookmanager->executeHooks(
'doActions', $parameters, $object, $action);
76 if ($action ==
'addcontact' && $user->hasRight(
'contrat',
'creer')) {
79 if ($result > 0 && $id > 0) {
82 $result =
$object->add_contact($contactid, $typeid,
GETPOST(
"source",
'aZ09'));
86 header(
"Location: ".$_SERVER[
'PHP_SELF'].
"?id=".
$object->id);
89 if (
$object->error ==
'DB_ERROR_RECORD_ALREADY_EXISTS') {
90 $langs->load(
"errors");
91 $msg = $langs->trans(
"ErrorThisContactIsAlreadyDefinedAsThisType");
101 if ($action ==
'swapstatut' && $user->hasRight(
'contrat',
'creer')) {
110 if ($action ==
'deletecontact' && $user->hasRight(
'contrat',
'creer')) {
115 header(
"Location: ".$_SERVER[
'PHP_SELF'].
"?id=".
$object->id);
125$title = $langs->trans(
"Contract");
126$help_url =
'EN:Module_Contracts|FR:Module_Contrat|ES:Contratos_de_servicio';
128llxHeader(
'', $title, $help_url,
'', 0, 0,
'',
'',
'',
'mod-contrat page-card_contact');
130$form =
new Form($db);
132$contactstatic =
new Contact($db);
133$userstatic =
new User($db);
141if ($id > 0 || !empty($ref)) {
142 if (
$object->fetch($id, $ref) > 0) {
149 print
dol_get_fiche_head($head, $hselected, $langs->trans(
"Contract"), -1,
'contract');
153 $linkback =
'<a href="'.DOL_URL_ROOT.
'/contrat/list.php?restore_lastsearch_values=1'.(!empty($socid) ?
'&socid='.$socid :
'').
'">'.$langs->trans(
"BackToList").
'</a>';
164 $morehtmlref .=
'<div class="refidno">';
166 $morehtmlref .= $form->editfieldkey(
"RefCustomer",
'ref_customer',
$object->ref_customer, $object, 0,
'string',
'', 0, 1);
167 $morehtmlref .= $form->editfieldval(
"RefCustomer",
'ref_customer',
$object->ref_customer, $object, 0,
'string',
'',
null,
null,
'', 1,
'getFormatedCustomerRef');
169 $morehtmlref .=
'<br>';
170 $morehtmlref .= $form->editfieldkey(
"RefSupplier",
'ref_supplier',
$object->ref_supplier, $object, 0,
'string',
'', 0, 1);
171 $morehtmlref .= $form->editfieldval(
"RefSupplier",
'ref_supplier',
$object->ref_supplier, $object, 0,
'string',
'',
null,
null,
'', 1,
'getFormatedSupplierRef');
173 $morehtmlref .=
'<br>'.$object->thirdparty->getNomUrl(1);
175 $morehtmlref .=
' <span class="otherlink">(<a href="'.DOL_URL_ROOT.
'/contrat/list.php?socid='.
$object->thirdparty->id.
'&search_name='.urlencode(
$object->thirdparty->name).
'">'.$langs->trans(
"OtherContracts").
'</a>)</span>';
178 if (isModEnabled(
'project')) {
179 $langs->load(
"projects");
180 $morehtmlref .=
'<br>';
182 $morehtmlref .=
img_picto($langs->trans(
"Project"),
'project',
'class="pictofixedwidth"');
183 if ($action !=
'classify') {
184 $morehtmlref .=
'<a class="editfielda" href="'.$_SERVER[
'PHP_SELF'].
'?action=classify&token='.
newToken().
'&id='.
$object->id.
'">'.
img_edit($langs->transnoentitiesnoconv(
'SetProject')).
'</a> ';
186 $morehtmlref .= $form->form_project($_SERVER[
'PHP_SELF'].
'?id='.
$object->id,
$object->socid,
$object->fk_project, ($action ==
'classify' ?
'projectid' :
'none'), 0, 0, 0, 1,
'',
'maxwidth300');
188 if (!empty(
$object->fk_project)) {
190 $proj->fetch(
$object->fk_project);
191 $morehtmlref .= $proj->getNomUrl(1);
193 $morehtmlref .=
'<span class="opacitymedium"> - '.dol_escape_htmltag($proj->title).
'</span>';
198 $morehtmlref .=
'</div>';
201 dol_banner_tab($object,
'ref', $linkback, 1,
'ref',
'none', $morehtmlref);
204 print
'<div class="fichecenter">';
205 print
'<div class="underbanner clearboth"></div>';
207 print
'<table class="border tableforfield" width="100%">';
211 print
'<tr><td class="titlefield">'.$langs->trans(
'Discount').
'</td><td colspan="3">';
212 if (
$object->thirdparty->remise_percent) {
213 print $langs->trans(
"CompanyHasRelativeDiscount",
$object->thirdparty->remise_percent);
215 print $langs->trans(
"CompanyHasNoRelativeDiscount");
217 $absolute_discount =
$object->thirdparty->getAvailableDiscounts();
219 if ($absolute_discount) {
220 print $langs->trans(
"CompanyHasAbsoluteDiscount",
price($absolute_discount), $langs->trans(
"Currency".$conf->currency));
222 print $langs->trans(
"CompanyHasNoAbsoluteDiscount");
229 print
'<td class="titlefield">';
230 print $form->editfieldkey(
"Date",
'date_contrat',
$object->date_contrat, $object, 0);
232 print $form->editfieldval(
"Date",
'date_contrat',
$object->date_contrat, $object, 0,
'datehourpicker');
245 include DOL_DOCUMENT_ROOT.
'/core/tpl/contacts.tpl.php';
247 print
"ErrorRecordNotFound";
if( $user->socid > 0) if(! $user->hasRight('accounting', 'chartofaccount')) $object
if(!defined('NOREQUIRESOC')) if(!defined( 'NOREQUIRETRAN')) if(!defined('NOTOKENRENEWAL')) if(!defined( 'NOREQUIREMENU')) if(!defined('NOREQUIREHTML')) if(!defined( 'NOREQUIREAJAX')) llxHeader($head='', $title='', $help_url='', $target='', $disablejs=0, $disablehead=0, $arrayofjs='', $arrayofcss='', $morequerystring='', $morecssonbody='', $replacemainareaby='', $disablenofollow=0, $disablenoindex=0)
Empty header.
Class to manage projects.
Class to manage Dolibarr users.
contract_prepare_head(Contrat $object)
Prepare array with list of tabs.
setEventMessages($mesg, $mesgs, $style='mesgs', $messagekey='', $noduplicate=0, $attop=0)
Set event messages in dol_events session object.
img_picto($titlealt, $picto, $moreatt='', $pictoisfullpath=0, $srconly=0, $notitle=0, $alt='', $morecss='', $marginleftonlyshort=2)
Show picto whatever it's its name (generic function)
GETPOSTINT($paramname, $method=0)
Return the value of a $_GET or $_POST supervariable, converted into integer.
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_get_fiche_end($notab=0)
Return tab footer of a card.
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.
newToken()
Return the value of token currently saved into session with name 'newtoken'.
GETPOST($paramname, $check='alphanohtml', $method=0, $filter=null, $options=null, $noreplace=0)
Return value of a param into GET or POST supervariable.
dol_print_error($db=null, $error='', $errors=null)
Displays error message system with all the information to facilitate the diagnosis and the escalation...
getDolGlobalString($key, $default='')
Return a Dolibarr global constant string value.
img_edit($titlealt='default', $float=0, $other='')
Show logo edit/modify fiche.
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.