* * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 3 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ /** * \file /htdocs/margin/admin/margin.php * \ingroup margin * \brief Page to setup margin module */ include '../../main.inc.php'; require_once DOL_DOCUMENT_ROOT.'/margin/lib/margins.lib.php'; require_once DOL_DOCUMENT_ROOT.'/core/lib/admin.lib.php'; require_once(DOL_DOCUMENT_ROOT.'/core/class/html.formcompany.class.php'); require_once(DOL_DOCUMENT_ROOT."/compta/facture/class/facture.class.php"); $langs->load("admin"); $langs->load("bills"); $langs->load("margins"); $langs->load("stocks"); if (! $user->admin) accessforbidden(); $action=GETPOST('action','alpha'); /* * Action */ if (preg_match('/set_(.*)/',$action,$reg)) { $code=$reg[1]; if (dolibarr_set_const($db, $code, 1, 'yesno', 0, '', $conf->entity) > 0) { header("Location: ".$_SERVER["PHP_SELF"]); exit; } else { dol_print_error($db); } } if (preg_match('/del_(.*)/',$action,$reg)) { $code=$reg[1]; if (dolibarr_del_const($db, $code, $conf->entity) > 0) { header("Location: ".$_SERVER["PHP_SELF"]); exit; } else { dol_print_error($db); } } if ($action == 'remises') { if (dolibarr_set_const($db, 'MARGIN_METHODE_FOR_DISCOUNT', $_POST['MARGIN_METHODE_FOR_DISCOUNT'], 'chaine', 0, '', $conf->entity) > 0) { setEventMessage($langs->trans("RecordModifiedSuccessfully")); } else { dol_print_error($db); } } if ($action == 'typemarges') { if (dolibarr_set_const($db, 'MARGIN_TYPE', $_POST['MARGIN_TYPE'], 'chaine', 0, '', $conf->entity) > 0) { setEventMessage($langs->trans("RecordModifiedSuccessfully")); } else { dol_print_error($db); } } if ($action == 'contact') { if (dolibarr_set_const($db, 'AGENT_CONTACT_TYPE', $_POST['AGENT_CONTACT_TYPE'], 'chaine', 0, '', $conf->entity) > 0) { setEventMessage($langs->trans("RecordModifiedSuccessfully")); } else { dol_print_error($db); } } /* * View */ llxHeader('',$langs->trans("margesSetup")); $linkback=''.$langs->trans("BackToModuleList").''; print_fiche_titre($langs->trans("margesSetup"),$linkback,'title_setup'); $head = marges_admin_prepare_head(); dol_fiche_head($head, 'parameters', $langs->trans("Margins"), 0, 'margin'); print_fiche_titre($langs->trans("MemberMainOptions"),'',''); print ''; print ''; print ''; print ''."\n"; print ''."\n"; print ''; $var=true; $form = new Form($db); // GLOBAL DISCOUNT MANAGEMENT $var=!$var; print ''; print ''; print ""; print ''; print ''; print ''; print ''; print ''; print ''; print ''; // DISPLAY MARGIN RATES $var=!$var; print ''; print ''; print ''; print ''; print ''; // DISPLAY MARK RATES $var=!$var; print ''; print ''; print ''; print ''; print ''; $var=!$var; print ''; print ''; print ''; print ''; print ''; // GLOBAL DISCOUNT MANAGEMENT $var=!$var; print ''; print ''; print ""; print ''; print ''; print ''; print ''; print ''; print ''; print ''; // INTERNAL CONTACT TYPE USED AS COMMERCIAL AGENT $var=!$var; print ''; print ''; print ""; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print '
'.$langs->trans("Description").''.$langs->trans("Value").''.$langs->trans("Description").'
'.$langs->trans("MARGIN_TYPE").''; print ' global->MARGIN_TYPE) && $conf->global->MARGIN_TYPE == '1') print 'checked '; print '/> '; print $langs->trans('MargeType1'); print '
'; /*print $langs->trans('MargeNette'); print ' global->MARGIN_TYPE) && $conf->global->MARGIN_TYPE == '2') print 'checked '; print '/>';*/ // TODO Check that PMP is available when stock module is not enabled. If not, make this choice greyed when stock module disabled. //if (! empty($conf->stock->enabled)) //{ print ' global->MARGIN_TYPE) && $conf->global->MARGIN_TYPE == 'pmp') print 'checked '; print '/> '; print $langs->trans('MargeType2'); //} print '		'; print ''; print ''.$langs->trans('MarginTypeDesc'); print ' ('.$langs->trans("PMPValueShort").')'; print '
'.$langs->trans("DisplayMarginRates").''; if (! empty($conf->use_javascript_ajax)) { print ajax_constantonoff('DISPLAY_MARGIN_RATES'); } else { if (empty($conf->global->DISPLAY_MARGIN_RATES)) { print ''.img_picto($langs->trans("Disabled"),'off').''; } else { print ''.img_picto($langs->trans("Enabled"),'on').''; } } print ''.$langs->trans('MarginRate').' = '.$langs->trans('Margin').' / '.$langs->trans('BuyingPrice').'
'.$langs->trans("DisplayMarkRates").''; if (! empty($conf->use_javascript_ajax)) { print ajax_constantonoff('DISPLAY_MARK_RATES'); } else { if (empty($conf->global->DISPLAY_MARK_RATES)) { print ''.img_picto($langs->trans("Disabled"),'off').''; } else { print ''.img_picto($langs->trans("Enabled"),'on').''; } } print ''.$langs->trans('MarkRate').' = '.$langs->trans('Margin').' / '.$langs->trans('SellingPrice').'
'.$langs->trans("ForceBuyingPriceIfNull").''; if (! empty($conf->use_javascript_ajax)) { print ajax_constantonoff('ForceBuyingPriceIfNull'); } else { if (empty($conf->global->ForceBuyingPriceIfNull)) { print ''.img_picto($langs->trans("Disabled"),'off').''; } else { print ''.img_picto($langs->trans("Enabled"),'on').''; } } print ''.$langs->trans('ForceBuyingPriceIfNullDetails').'
'.$langs->trans("MARGIN_METHODE_FOR_DISCOUNT").''; print ''; print ''; print ''; print ''.$langs->trans('MARGIN_METHODE_FOR_DISCOUNT_DETAILS').'
'.$langs->trans("AgentContactType").''; $formcompany = new FormCompany($db); $facture = new Facture($db); print $formcompany->selectTypeContact($facture, $conf->global->AGENT_CONTACT_TYPE, "AGENT_CONTACT_TYPE","internal","code",1); print ''; print ''; print ''.$langs->trans('AgentContactTypeDetails').'
'; dol_fiche_end(); print '
'; llxFooter(); $db->close();