26require
'../main.inc.php';
35require_once DOL_DOCUMENT_ROOT.
'/core/lib/admin.lib.php';
36require_once DOL_DOCUMENT_ROOT.
'/core/lib/company.lib.php';
37require_once DOL_DOCUMENT_ROOT.
'/core/lib/functions2.lib.php';
38require_once DOL_DOCUMENT_ROOT.
'/core/class/html.formother.class.php';
39require_once DOL_DOCUMENT_ROOT.
'/core/class/html.formcompany.class.php';
41$action =
GETPOST(
'action',
'aZ09');
42$contextpage =
GETPOST(
'contextpage',
'aZ') ?
GETPOST(
'contextpage',
'aZ') :
'adminsubcontractors';
45$langs->loadLangs(array(
'admin',
'companies'));
59$reshook = $hookmanager->executeHooks(
'doActions', $parameters, $object, $action);
64if (($action ==
'update' && !
GETPOST(
"cancel",
'alpha')) || ($action ==
'updateedit')) {
72 $country_code_itprovider = $country_code_itprovider_array[
'code'];
74 $tmpthirdparty->country_code = $country_code_itprovider;
75 $tmpthirdparty->country_id =
getCountry($country_code_itprovider,
'3',
$db, $langs, 0);
76 $tmpthirdparty->idprof1 =
GETPOST(
"itprovider_idprof1");
77 $tmpthirdparty->idprof2 =
GETPOST(
"itprovider_idprof2");
79 if (
$mysoc->country_code ==
'FR') {
80 if (empty($tmpthirdparty->country_code)) {
81 $langs->loadLangs(array(
"errors",
"companies"));
82 setEventMessages($langs->trans(
"ErrorBadValueForParameter", $tmpthirdparty->country_code, $langs->trans(
"Country")),
null,
'errors');
85 if ($tmpthirdparty->idprof1 &&
isValidProfIds(1, $tmpthirdparty) <= 0) {
86 $langs->loadLangs(array(
"errors",
"companies"));
87 setEventMessages($langs->trans(
"ErrorBadValueForParameter", $tmpthirdparty->idprof1, $langs->transcountry(
"ProfId1Short", $tmpthirdparty->country_code)),
null,
'errors');
90 if ($tmpthirdparty->idprof2 &&
isValidProfIds(2, $tmpthirdparty) <= 0) {
91 $langs->loadLangs(array(
"errors",
"companies"));
92 setEventMessages($langs->trans(
"ErrorBadValueForParameter", $tmpthirdparty->idprof2, $langs->transcountry(
"ProfId2Short", $tmpthirdparty->country_code)),
null,
'errors');
130 if ($action !=
'updateedit') {
142llxHeader(
'', $langs->trans(
"CompanyFoundation"), $help_url,
'', 0, 0,
'',
'',
'',
'mod-admin page-subcontractors');
144print
load_fiche_titre($langs->trans(
"CompanyFoundation"),
'',
'title_setup');
154$countrynotdefined =
'<span class="error">'.$langs->trans(
"ErrorSetACountryFirst").
' ('.$langs->trans(
"SeeAbove").
')</span>';
156print
'<span class="opacitymedium">'.$langs->trans(
"SubcontractorsDesc").
"</span><br>\n";
162if (!empty(
$conf->use_javascript_ajax)) {
163 print
"\n".
'<script type="text/javascript">';
164 print
'$(document).ready(function () {
165 $("#selectcountry_id").change(function() {
166 console.log("selectcountry_id change");
167 document.form_index.action.value="updateedit";
168 document.form_index.submit();
170 $("#selectitprovider_country_id").change(function() {
171 console.log("selectitprovider_country_id change");
172 document.form_index.action.value="updateedit";
173 document.form_index.submit();
176 print
'</script>'.
"\n";
179print
'<form method="POST" action="'.dolBuildUrl($_SERVER[
"PHP_SELF"]).
'" name="form_index">';
180print
'<input type="hidden" name="token" value="'.newToken().
'">';
181print
'<input type="hidden" name="action" value="update">';
182print
'<input type="hidden" name="page_y" value="">';
184print
load_fiche_titre($langs->trans(
"AccountingProvider"),
'',
'accounting', 0,
'',
'',
'',
'');
186print
'<table class="noborder centpercent editmode">';
187print
'<tr class="liste_titre"><th class="titlefieldcreate wordbreak">'.$langs->trans(
"CompanyInfo").
'</th><th></th></tr>'.
"\n";
190print
'<tr class="oddeven"><td><label for="name">'.$langs->trans(
"CompanyName").
'</label></td><td>';
191print
'<input name="nom" id="name" class="minwidth200" value="'.dol_escape_htmltag(GETPOSTISSET(
'nom') ?
GETPOST(
'nom',
'alphanohtml') :
getDolGlobalString(
'MAIN_INFO_ACCOUNTANT_NAME')).
'"'.(!
getDolGlobalString(
'MAIN_INFO_ACCOUNTANT_NAME') ?
' autofocus="autofocus"' :
'').
'></td></tr>'.
"\n";
194print
'<tr class="oddeven"><td><label for="address">'.$langs->trans(
"CompanyAddress").
'</label></td><td>';
195print
'<textarea name="address" id="address" class="quatrevingtpercent" rows="'.ROWS_2.
'">';
197print
'</textarea></td></tr>'.
"\n";
200print
'<tr class="oddeven"><td><label for="zipcode">'.$langs->trans(
"CompanyZip").
'</label></td><td>';
201print
'<input class="width100" name="zipcode" id="zipcode" value="'.dol_escape_htmltag(GETPOSTISSET(
'zipcode') ?
GETPOST(
'zipcode',
'alphanohtml') :
getDolGlobalString(
'MAIN_INFO_ACCOUNTANT_ZIP')).
'"></td></tr>'.
"\n";
204print
'<tr class="oddeven"><td><label for="town">'.$langs->trans(
"CompanyTown").
'</label></td><td>';
205print
'<input name="town" class="minwidth100" id="town" value="'.dol_escape_htmltag(GETPOSTISSET(
'town') ?
GETPOST(
'town',
'alphanohtml') :
getDolGlobalString(
'MAIN_INFO_ACCOUNTANT_TOWN')).
'"></td></tr>'.
"\n";
208print
'<tr class="oddeven"><td><label for="selectcountry_id">'.$langs->trans(
"Country").
'</label></td><td class="maxwidthonsmartphone">';
209print
img_picto(
'',
'globe-americas',
'class="pictofixedwidth"');
210print $form->select_country((GETPOSTISSET(
'country_id') ?
GETPOSTINT(
'country_id') :
getDolGlobalString(
'MAIN_INFO_ACCOUNTANT_COUNTRY')),
'country_id');
211print
info_admin($langs->trans(
"YouCanChangeValuesForThisListFromDictionarySetup"), 1);
212print
'</td></tr>'.
"\n";
215print
'<tr class="oddeven"><td><label for="state_id">'.$langs->trans(
"State").
'</label></td><td class="maxwidthonsmartphone">';
216print
img_picto(
'',
'state',
'class="pictofixedwidth"');
218print
'</td></tr>'.
"\n";
221print
'<tr class="oddeven"><td><label for="phone">'.$langs->trans(
"Phone").
'</label></td><td>';
222print
img_picto(
'',
'object_phoning',
'', 0, 0, 0,
'',
'pictofixedwidth');
223print
'<input name="phone" id="phone" class="maxwidth150 widthcentpercentminusx" value="'.dol_escape_htmltag(GETPOSTISSET(
'phone') ?
GETPOST(
'phone',
'alphanohtml') :
getDolGlobalString(
'MAIN_INFO_ACCOUNTANT_PHONE')).
'"></td></tr>';
224print
'</td></tr>'.
"\n";
235print
'<tr class="oddeven"><td><label for="email">'.$langs->trans(
"EMail").
'</label></td><td>';
236print
img_picto(
'',
'object_email',
'', 0, 0, 0,
'',
'pictofixedwidth');
237print
'<input name="mail" id="email" class="maxwidth300 widthcentpercentminusx" value="'.dol_escape_htmltag(GETPOSTISSET(
'mail') ?
GETPOST(
'mail',
'alphanohtml') :
getDolGlobalString(
'MAIN_INFO_ACCOUNTANT_MAIL')).
'"></td></tr>';
238print
'</td></tr>'.
"\n";
241print
'<tr class="oddeven"><td><label for="web">'.$langs->trans(
"Web").
'</label></td><td>';
242print
img_picto(
'',
'globe',
'', 0, 0, 0,
'',
'pictofixedwidth');
243print
'<input name="web" id="web" class="maxwidth300 widthcentpercentminusx" value="'.dol_escape_htmltag(GETPOSTISSET(
'web') ?
GETPOST(
'web',
'alphanohtml') :
getDolGlobalString(
'MAIN_INFO_ACCOUNTANT_WEB')).
'"></td></tr>';
244print
'</td></tr>'.
"\n";
247print
'<tr class="oddeven"><td><label for="idprof1">'.$langs->transcountry(
"ProfId1",
$mysoc->country_code).
'</label></td><td>';
248print
'<input name="idprof1" id="idprof1" class="minwidth100" value="'.dol_escape_htmltag(GETPOSTISSET(
'idprof1') ?
GETPOST(
'idprof1',
'alphanohtml') :
getDolGlobalString(
'MAIN_INFO_ACCOUNTANT_IDPROF1')).
'"></td></tr>'.
"\n";
251print
'<tr class="oddeven"><td><label for="idprof2">'.$langs->transcountry(
"ProfId2",
$mysoc->country_code).
'</label></td><td>';
252print
'<input name="idprof2" id="idprof2" class="minwidth100" value="'.dol_escape_htmltag(GETPOSTISSET(
'idprof2') ?
GETPOST(
'idprof2',
'alphanohtml') :
getDolGlobalString(
'MAIN_INFO_ACCOUNTANT_IDPROF2')).
'"></td></tr>'.
"\n";
255print
'<tr class="oddeven"><td><label for="code">'.$langs->trans(
"AccountantFileNumber").
'</label></td><td>';
256print
'<input name="code" id="code" class="minwidth100" value="'.dol_escape_htmltag(GETPOSTISSET(
'code') ?
GETPOST(
'code',
'alphanohtml') :
getDolGlobalString(
'MAIN_INFO_ACCOUNTANT_CODE')).
'"></td></tr>'.
"\n";
259print
'<tr class="oddeven"><td class="tdtop"><label for="note">'.$langs->trans(
"Note").
'</label></td><td>';
260print
'<textarea class="flat quatrevingtpercent" name="note" id="note" rows="'.ROWS_2.
'">'.(GETPOSTISSET(
'note') ?
GETPOST(
'note',
'restricthtml') :
getDolGlobalString(
'MAIN_INFO_ACCOUNTANT_NOTE')).
'</textarea></td></tr>';
265print $form->buttonsSaveCancel(
"Save",
'', array(),
false,
'reposition');
272print
load_fiche_titre($langs->trans(
"ITProvider"),
'',
'hdd', 0,
'',
'',
'',
'');
274print
'<table class="noborder centpercent editmode">';
275print
'<tr class="liste_titre"><th class="titlefieldcreate wordbreak">'.$langs->trans(
"CompanyInfo").
'</th><th></th></tr>'.
"\n";
278print
'<tr class="oddeven"><td><label for="name">'.$langs->trans(
"CompanyName").
'</label></td><td>';
279print
'<input name="itprovider_nom" id="itprovider_name" class="minwidth200" value="'.dol_escape_htmltag(GETPOSTISSET(
'itprovider_nom') ?
GETPOST(
'itprovider_nom',
'alphanohtml') :
getDolGlobalString(
'MAIN_INFO_ITPROVIDER_NAME')).
'"></td></tr>'.
"\n";
282print
'<tr class="oddeven"><td><label for="address">'.$langs->trans(
"CompanyAddress").
'</label></td><td>';
283print
'<textarea name="itprovider_address" id="itprovider_address" class="quatrevingtpercent" rows="'.ROWS_2.
'">';
285print
'</textarea></td></tr>'.
"\n";
288print
'<tr class="oddeven"><td><label for="zipcode">'.$langs->trans(
"CompanyZip").
'</label></td><td>';
289print
'<input class="width100" name="itprovider_zipcode" id="itprovider_zipcode" value="'.dol_escape_htmltag(GETPOSTISSET(
'itprovider_zipcode') ?
GETPOST(
'itprovider_zipcode',
'alphanohtml') :
getDolGlobalString(
'MAIN_INFO_ITPROVIDER_ZIP')).
'"></td></tr>'.
"\n";
292print
'<tr class="oddeven"><td><label for="itprovider_town">'.$langs->trans(
"CompanyTown").
'</label></td><td>';
293print
'<input name="itprovider_town" class="minwidth100" id="itprovider_town" value="'.dol_escape_htmltag(GETPOSTISSET(
'itprovider_town') ?
GETPOST(
'itprovider_town',
'alphanohtml') :
getDolGlobalString(
'MAIN_INFO_ITPROVIDER_TOWN')).
'"></td></tr>'.
"\n";
296print
'<tr class="oddeven"><td><label for="selectitprovider_country_id">'.$langs->trans(
"Country").
'</label></td><td class="maxwidthonsmartphone">';
297print
img_picto(
'',
'globe-americas',
'class="pictofixedwidth"');
298print $form->select_country((GETPOSTISSET(
'itprovider_country_id') ?
GETPOSTINT(
'itprovider_country_id') :
getDolGlobalString(
'MAIN_INFO_ITPROVIDER_COUNTRY')),
'itprovider_country_id');
299print
info_admin($langs->trans(
"YouCanChangeValuesForThisListFromDictionarySetup"), 1);
300print
'</td></tr>'.
"\n";
303print
'<tr class="oddeven"><td><label for="itprovider_state_id">'.$langs->trans(
"State").
'</label></td><td class="maxwidthonsmartphone">';
304print
img_picto(
'',
'state',
'class="pictofixedwidth"');
305print $formcompany->select_state((GETPOSTISSET(
'itprovider_state_id') ?
GETPOSTINT(
'itprovider_state_id') :
getDolGlobalString(
'MAIN_INFO_ITPROVIDER_STATE')), (GETPOSTISSET(
'itprovider_country_id') ?
GETPOSTINT(
'itprovider_country_id') :
getDolGlobalString(
'MAIN_INFO_ITPROVIDER_COUNTRY')),
'itprovider_state_id');
306print
'</td></tr>'.
"\n";
309print
'<tr class="oddeven"><td><label for="itprovider_phone">'.$langs->trans(
"Phone").
'</label></td><td>';
310print
img_picto(
'',
'object_phoning',
'', 0, 0, 0,
'',
'pictofixedwidth');
311print
'<input name="itprovider_phone" id="itprovider_phone" class="maxwidth150 widthcentpercentminusx" value="'.dol_escape_htmltag(GETPOSTISSET(
'itprovider_phone') ?
GETPOST(
'itprovider_phone',
'alphanohtml') :
getDolGlobalString(
'MAIN_INFO_ITPROVIDER_PHONE')).
'"></td></tr>';
312print
'</td></tr>'.
"\n";
323print
'<tr class="oddeven"><td><label for="itprovider_email">'.$langs->trans(
"EMail").
'</label></td><td>';
324print
img_picto(
'',
'object_email',
'', 0, 0, 0,
'',
'pictofixedwidth');
325print
'<input name="itprovider_mail" id="itprovider_email" class="maxwidth300 widthcentpercentminusx" value="'.dol_escape_htmltag(GETPOSTISSET(
'itprovider_mail') ?
GETPOST(
'itprovider_mail',
'alphanohtml') :
getDolGlobalString(
'MAIN_INFO_ITPROVIDER_MAIL')).
'"></td></tr>';
326print
'</td></tr>'.
"\n";
329print
'<tr class="oddeven"><td><label for="itprovider_web">'.$langs->trans(
"Web").
'</label></td><td>';
330print
img_picto(
'',
'globe',
'', 0, 0, 0,
'',
'pictofixedwidth');
331print
'<input name="itprovider_web" id="itprovider_web" class="maxwidth300 widthcentpercentminusx" value="'.dol_escape_htmltag(GETPOSTISSET(
'itprovider_web') ?
GETPOST(
'itprovider_web',
'alphanohtml') :
getDolGlobalString(
'MAIN_INFO_ITPROVIDER_WEB')).
'"></td></tr>';
332print
'</td></tr>'.
"\n";
335print
'<tr class="oddeven"><td><label for="itprovider_idprof1">'.$langs->transcountry(
"ProfId1",
$mysoc->country_code).
'</label></td><td>';
336print
'<input name="itprovider_idprof1" id="itprovider_idprof1" class="minwidth100" value="'.dol_escape_htmltag(GETPOSTISSET(
'itprovider_idprof1') ?
GETPOST(
'itprovider_idprof1',
'alphanohtml') :
getDolGlobalString(
'MAIN_INFO_ITPROVIDER_IDPROF1')).
'"></td></tr>'.
"\n";
339print
'<tr class="oddeven"><td><label for="itprovider_idprof2">'.$langs->transcountry(
"ProfId2",
$mysoc->country_code).
'</label></td><td>';
340print
'<input name="itprovider_idprof2" id="itprovider_idprof2" class="minwidth100" value="'.dol_escape_htmltag(GETPOSTISSET(
'itprovider_idprof2') ?
GETPOST(
'itprovider_idprof2',
'alphanohtml') :
getDolGlobalString(
'MAIN_INFO_ITPROVIDER_IDPROF2')).
'"></td></tr>'.
"\n";
343print
'<tr class="oddeven"><td><label for="itprovider_code">'.$langs->trans(
"AccountantFileNumber").
'</label></td><td>';
344print
'<input name="itprovider_code" id="itprovider_code" class="minwidth100" value="'.dol_escape_htmltag(GETPOSTISSET(
'itprovider_code') ?
GETPOST(
'itprovider_code',
'alphanohtml') :
getDolGlobalString(
'MAIN_INFO_ITPROVIDER_CODE')).
'"></td></tr>'.
"\n";
347print
'<tr class="oddeven"><td class="tdtop"><label for="itprovider_note">'.$langs->trans(
"Note").
'</label></td><td>';
348print
'<textarea class="flat quatrevingtpercent" name="itprovider_note" id="itprovider_note" rows="'.ROWS_2.
'">'.(GETPOSTISSET(
'itprovider_note') ?
GETPOST(
'itprovider_note',
'restricthtml') :
getDolGlobalString(
'MAIN_INFO_ITPROVIDER_NOTE')).
'</textarea></td></tr>';
353print $form->buttonsSaveCancel(
"Save",
'', array(),
false,
'reposition');
if(! $sortfield) if(! $sortorder) $object
dolibarr_set_const($db, $name, $value, $type='chaine', $visible=0, $note='', $entity=1)
Insert a parameter (key,value) into database (delete old key then insert it again).
company_admin_prepare_head()
Return array head with list of tabs to view object information.
llxFooter($comment='', $zone='private', $disabledoutputofmessages=0)
Empty footer.
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 third parties objects (customers, suppliers, prospects...)
getCountry($searchkey, $withcode='', $dbtouse=null, $outputlangs=null, $entconv=1, $searchlabel='')
Return country label, code or id from an id, code or label.
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, $allowothertags=array())
Show picto whatever it's its name (generic function)
info_admin($text, $infoonimgalt=0, $nodiv=0, $admin='1', $morecss='hideonsmartphone', $textfordropdown='', $picto='', $textonpictotooltip='')
Show information in HTML for admin users or standard users.
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, $morecssdiv='')
Show tabs of a record.
dolPrintText($s)
Return a string label (possible on several lines and that should not contains any HTML) ready to be o...
GETPOST($paramname, $check='alphanohtml', $method=0, $filter=null, $options=null, $noreplace=0)
Return value of a param into GET or POST supervariable.
load_fiche_titre($title, $morehtmlright='', $picto='generic', $pictoisfullpath=0, $id='', $morecssontable='', $morehtmlcenter='', $morecssonpicto='widthpictotitle')
Load a title with picto.
getDolGlobalString($key, $default='')
Return a Dolibarr global constant string value.
isValidProfIds($idprof, $thirdparty, $lenghtonly=0)
Check the validity of a professional identifier according to the properties (country) of the company ...
accessforbidden($message='', $printheader=1, $printfooter=1, $showonlymessage=0, $params=null)
Show a message to say access is forbidden and stop program.