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')) {
66 dolibarr_set_const($db,
"MAIN_INFO_ACCOUNTANT_ADDRESS",
GETPOST(
"address",
'alphanohtml'),
'chaine', 0,
'', $conf->entity);
70 dolibarr_set_const($db,
"MAIN_INFO_ACCOUNTANT_REGION",
GETPOST(
"region_code",
'alphanohtml'),
'chaine', 0,
'', $conf->entity);
76 dolibarr_set_const($db,
"MAIN_INFO_ACCOUNTANT_IDPROF1",
GETPOST(
"idprof1",
'alphanohtml'),
'chaine', 0,
'', $conf->entity);
80 dolibarr_set_const($db,
"MAIN_INFO_ITPROVIDER_NAME",
GETPOST(
"itprovider_nom",
'alphanohtml'),
'chaine', 0,
'', $conf->entity);
81 dolibarr_set_const($db,
"MAIN_INFO_ITPROVIDER_ADDRESS",
GETPOST(
"itprovider_address",
'alphanohtml'),
'chaine', 0,
'', $conf->entity);
82 dolibarr_set_const($db,
"MAIN_INFO_ITPROVIDER_TOWN",
GETPOST(
"itprovider_town",
'alphanohtml'),
'chaine', 0,
'', $conf->entity);
83 dolibarr_set_const($db,
"MAIN_INFO_ITPROVIDER_ZIP",
GETPOST(
"itprovider_zipcode",
'alphanohtml'),
'chaine', 0,
'', $conf->entity);
85 dolibarr_set_const($db,
"MAIN_INFO_ITPROVIDER_REGION",
GETPOST(
"itprovider_region_code",
'alphanohtml'),
'chaine', 0,
'', $conf->entity);
87 dolibarr_set_const($db,
"MAIN_INFO_ITPROVIDER_PHONE",
GETPOST(
"itprovider_phone",
'alphanohtml'),
'chaine', 0,
'', $conf->entity);
89 dolibarr_set_const($db,
"MAIN_INFO_ITPROVIDER_MAIL",
GETPOST(
"itprovider_mail",
'alphanohtml'),
'chaine', 0,
'', $conf->entity);
90 dolibarr_set_const($db,
"MAIN_INFO_ITPROVIDER_WEB",
GETPOST(
"itprovider_web",
'alphanohtml'),
'chaine', 0,
'', $conf->entity);
91 dolibarr_set_const($db,
"MAIN_INFO_ITPROVIDER_IDPROF1",
GETPOST(
"itprovider_idprof1",
'alphanohtml'),
'chaine', 0,
'', $conf->entity);
92 dolibarr_set_const($db,
"MAIN_INFO_ITPROVIDER_CODE",
GETPOST(
"itprovider_code",
'alphanohtml'),
'chaine', 0,
'', $conf->entity);
93 dolibarr_set_const($db,
"MAIN_INFO_ITPROVIDER_NOTE",
GETPOST(
"itprovider_note",
'restricthtml'),
'chaine', 0,
'', $conf->entity);
95 if ($action !=
'updateedit') {
106llxHeader(
'', $langs->trans(
"CompanyFoundation"), $help_url,
'', 0, 0,
'',
'',
'',
'mod-admin page-subcontractors');
108print
load_fiche_titre($langs->trans(
"CompanyFoundation"),
'',
'title_setup');
114$form =
new Form($db);
118$countrynotdefined =
'<span class="error">'.$langs->trans(
"ErrorSetACountryFirst").
' ('.$langs->trans(
"SeeAbove").
')</span>';
120print
'<span class="opacitymedium">'.$langs->trans(
"SubcontractorsDesc").
"</span><br>\n";
126if (!empty($conf->use_javascript_ajax)) {
127 print
"\n".
'<script type="text/javascript">';
128 print
'$(document).ready(function () {
129 $("#selectcountry_id").change(function() {
130 console.log("selectcountry_id change");
131 document.form_index.action.value="updateedit";
132 document.form_index.submit();
134 $("#selectitprovider_country_id").change(function() {
135 console.log("selectitprovider_country_id change");
136 document.form_index.action.value="updateedit";
137 document.form_index.submit();
140 print
'</script>'.
"\n";
143print
'<form method="POST" action="'.dolBuildUrl($_SERVER[
"PHP_SELF"]).
'" name="form_index">';
144print
'<input type="hidden" name="token" value="'.newToken().
'">';
145print
'<input type="hidden" name="action" value="update">';
146print
'<input type="hidden" name="page_y" value="">';
148print
load_fiche_titre($langs->trans(
"AccountingProvider"),
'',
'accounting', 0,
'',
'',
'',
'');
150print
'<table class="noborder centpercent editmode">';
151print
'<tr class="liste_titre"><th class="titlefieldcreate wordbreak">'.$langs->trans(
"CompanyInfo").
'</th><th></th></tr>'.
"\n";
154print
'<tr class="oddeven"><td><label for="name">'.$langs->trans(
"CompanyName").
'</label></td><td>';
155print
'<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";
158print
'<tr class="oddeven"><td><label for="address">'.$langs->trans(
"CompanyAddress").
'</label></td><td>';
159print
'<textarea name="address" id="address" class="quatrevingtpercent" rows="'.ROWS_2.
'">';
161print
'</textarea></td></tr>'.
"\n";
164print
'<tr class="oddeven"><td><label for="zipcode">'.$langs->trans(
"CompanyZip").
'</label></td><td>';
165print
'<input class="width100" name="zipcode" id="zipcode" value="'.dol_escape_htmltag(GETPOSTISSET(
'zipcode') ?
GETPOST(
'zipcode',
'alphanohtml') :
getDolGlobalString(
'MAIN_INFO_ACCOUNTANT_ZIP')).
'"></td></tr>'.
"\n";
168print
'<tr class="oddeven"><td><label for="town">'.$langs->trans(
"CompanyTown").
'</label></td><td>';
169print
'<input name="town" class="minwidth100" id="town" value="'.dol_escape_htmltag(GETPOSTISSET(
'town') ?
GETPOST(
'town',
'alphanohtml') :
getDolGlobalString(
'MAIN_INFO_ACCOUNTANT_TOWN')).
'"></td></tr>'.
"\n";
172print
'<tr class="oddeven"><td><label for="selectcountry_id">'.$langs->trans(
"Country").
'</label></td><td class="maxwidthonsmartphone">';
173print
img_picto(
'',
'globe-americas',
'class="pictofixedwidth"');
174print $form->select_country((GETPOSTISSET(
'country_id') ?
GETPOSTINT(
'country_id') :
getDolGlobalString(
'MAIN_INFO_ACCOUNTANT_COUNTRY')),
'country_id');
175print
info_admin($langs->trans(
"YouCanChangeValuesForThisListFromDictionarySetup"), 1);
176print
'</td></tr>'.
"\n";
179print
'<tr class="oddeven"><td><label for="state_id">'.$langs->trans(
"State").
'</label></td><td class="maxwidthonsmartphone">';
180print
img_picto(
'',
'state',
'class="pictofixedwidth"');
182print
'</td></tr>'.
"\n";
185print
'<tr class="oddeven"><td><label for="phone">'.$langs->trans(
"Phone").
'</label></td><td>';
186print
img_picto(
'',
'object_phoning',
'', 0, 0, 0,
'',
'pictofixedwidth');
187print
'<input name="phone" id="phone" class="maxwidth150 widthcentpercentminusx" value="'.dol_escape_htmltag(GETPOSTISSET(
'phone') ?
GETPOST(
'phone',
'alphanohtml') :
getDolGlobalString(
'MAIN_INFO_ACCOUNTANT_PHONE')).
'"></td></tr>';
188print
'</td></tr>'.
"\n";
199print
'<tr class="oddeven"><td><label for="email">'.$langs->trans(
"EMail").
'</label></td><td>';
200print
img_picto(
'',
'object_email',
'', 0, 0, 0,
'',
'pictofixedwidth');
201print
'<input name="mail" id="email" class="maxwidth300 widthcentpercentminusx" value="'.dol_escape_htmltag(GETPOSTISSET(
'mail') ?
GETPOST(
'mail',
'alphanohtml') :
getDolGlobalString(
'MAIN_INFO_ACCOUNTANT_MAIL')).
'"></td></tr>';
202print
'</td></tr>'.
"\n";
205print
'<tr class="oddeven"><td><label for="web">'.$langs->trans(
"Web").
'</label></td><td>';
206print
img_picto(
'',
'globe',
'', 0, 0, 0,
'',
'pictofixedwidth');
207print
'<input name="web" id="web" class="maxwidth300 widthcentpercentminusx" value="'.dol_escape_htmltag(GETPOSTISSET(
'web') ?
GETPOST(
'web',
'alphanohtml') :
getDolGlobalString(
'MAIN_INFO_ACCOUNTANT_WEB')).
'"></td></tr>';
208print
'</td></tr>'.
"\n";
211print
'<tr class="oddeven"><td><label for="idprof1">'.$langs->transcountry(
"ProfId1",
$mysoc->country_code).
'</label></td><td>';
212print
'<input name="idprof1" id="idprof1" class="minwidth100" value="'.dol_escape_htmltag(GETPOSTISSET(
'idprof1') ?
GETPOST(
'idprof1',
'alphanohtml') :
getDolGlobalString(
'MAIN_INFO_ACCOUNTANT_IDPROF1')).
'"></td></tr>'.
"\n";
215print
'<tr class="oddeven"><td><label for="code">'.$langs->trans(
"AccountantFileNumber").
'</label></td><td>';
216print
'<input name="code" id="code" class="minwidth100" value="'.dol_escape_htmltag(GETPOSTISSET(
'code') ?
GETPOST(
'code',
'alphanohtml') :
getDolGlobalString(
'MAIN_INFO_ACCOUNTANT_CODE')).
'"></td></tr>'.
"\n";
219print
'<tr class="oddeven"><td class="tdtop"><label for="note">'.$langs->trans(
"Note").
'</label></td><td>';
220print
'<textarea class="flat quatrevingtpercent" name="note" id="note" rows="'.ROWS_2.
'">'.(GETPOSTISSET(
'note') ?
GETPOST(
'note',
'restricthtml') :
getDolGlobalString(
'MAIN_INFO_ACCOUNTANT_NOTE')).
'</textarea></td></tr>';
225print $form->buttonsSaveCancel(
"Save",
'', array(),
false,
'reposition');
232print
load_fiche_titre($langs->trans(
"ITProvider"),
'',
'hdd', 0,
'',
'',
'',
'');
234print
'<table class="noborder centpercent editmode">';
235print
'<tr class="liste_titre"><th class="titlefieldcreate wordbreak">'.$langs->trans(
"CompanyInfo").
'</th><th></th></tr>'.
"\n";
238print
'<tr class="oddeven"><td><label for="name">'.$langs->trans(
"CompanyName").
'</label></td><td>';
239print
'<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";
242print
'<tr class="oddeven"><td><label for="address">'.$langs->trans(
"CompanyAddress").
'</label></td><td>';
243print
'<textarea name="itprovider_address" id="itprovider_address" class="quatrevingtpercent" rows="'.ROWS_2.
'">';
245print
'</textarea></td></tr>'.
"\n";
248print
'<tr class="oddeven"><td><label for="zipcode">'.$langs->trans(
"CompanyZip").
'</label></td><td>';
249print
'<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";
252print
'<tr class="oddeven"><td><label for="itprovider_town">'.$langs->trans(
"CompanyTown").
'</label></td><td>';
253print
'<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";
256print
'<tr class="oddeven"><td><label for="selectitprovider_country_id">'.$langs->trans(
"Country").
'</label></td><td class="maxwidthonsmartphone">';
257print
img_picto(
'',
'globe-americas',
'class="pictofixedwidth"');
258print $form->select_country((GETPOSTISSET(
'itprovider_country_id') ?
GETPOSTINT(
'itprovider_country_id') :
getDolGlobalString(
'MAIN_INFO_ITPROVIDER_COUNTRY')),
'itprovider_country_id');
259print
info_admin($langs->trans(
"YouCanChangeValuesForThisListFromDictionarySetup"), 1);
260print
'</td></tr>'.
"\n";
263print
'<tr class="oddeven"><td><label for="itprovider_state_id">'.$langs->trans(
"State").
'</label></td><td class="maxwidthonsmartphone">';
264print
img_picto(
'',
'state',
'class="pictofixedwidth"');
265print $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');
266print
'</td></tr>'.
"\n";
269print
'<tr class="oddeven"><td><label for="itprovider_phone">'.$langs->trans(
"Phone").
'</label></td><td>';
270print
img_picto(
'',
'object_phoning',
'', 0, 0, 0,
'',
'pictofixedwidth');
271print
'<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>';
272print
'</td></tr>'.
"\n";
283print
'<tr class="oddeven"><td><label for="itprovider_email">'.$langs->trans(
"EMail").
'</label></td><td>';
284print
img_picto(
'',
'object_email',
'', 0, 0, 0,
'',
'pictofixedwidth');
285print
'<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>';
286print
'</td></tr>'.
"\n";
289print
'<tr class="oddeven"><td><label for="itprovider_web">'.$langs->trans(
"Web").
'</label></td><td>';
290print
img_picto(
'',
'globe',
'', 0, 0, 0,
'',
'pictofixedwidth');
291print
'<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>';
292print
'</td></tr>'.
"\n";
295print
'<tr class="oddeven"><td><label for="itprovider_idprof1">'.$langs->transcountry(
"ProfId1",
$mysoc->country_code).
'</label></td><td>';
296print
'<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";
299print
'<tr class="oddeven"><td><label for="itprovider_code">'.$langs->trans(
"AccountantFileNumber").
'</label></td><td>';
300print
'<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";
303print
'<tr class="oddeven"><td class="tdtop"><label for="itprovider_note">'.$langs->trans(
"Note").
'</label></td><td>';
304print
'<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>';
309print $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.
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)
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.
info_admin($text, $infoonimgalt=0, $nodiv=0, $admin='1', $morecss='hideonsmartphone', $textfordropdown='', $picto='')
Show information in HTML for admin users or standard users.
accessforbidden($message='', $printheader=1, $printfooter=1, $showonlymessage=0, $params=null)
Show a message to say access is forbidden and stop program.