| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175 |
- <?php
- /* Copyright (C) 2005 Patrick Rouillon <patrick@rouillon.net>
- * Copyright (C) 2005-2016 Destailleur Laurent <eldy@users.sourceforge.net>
- * Copyright (C) 2005-2012 Regis Houssin <regis.houssin@inodbox.com>
- * Copyright (C) 2011-2015 Philippe Grand <philippe.grand@atoo-net.com>
- * Copyright (C) 2021 Gauthier VERDOL <gauthier.verdol@atm-consulting.fr>
- *
- * 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 <https://www.gnu.org/licenses/>.
- */
- /**
- * \file htdocs/product/stock/stocktransfer/stocktransfer_contact.php
- * \ingroup propal
- * \brief Tab to manage contacts/adresses of proposal
- */
- // Load Dolibarr environment
- require '../../../main.inc.php';
- require_once DOL_DOCUMENT_ROOT.'/core/class/html.formcompany.class.php';
- require_once DOL_DOCUMENT_ROOT.'/core/class/html.formother.class.php';
- require_once DOL_DOCUMENT_ROOT.'/core/class/html.formprojet.class.php';
- require_once DOL_DOCUMENT_ROOT.'/projet/class/project.class.php';
- require_once DOL_DOCUMENT_ROOT.'/product/stock/stocktransfer/class/stocktransfer.class.php';
- require_once DOL_DOCUMENT_ROOT.'/product/stock/stocktransfer/lib/stocktransfer_stocktransfer.lib.php';
- // Load translation files required by the page
- $langs->loadLangs(array('facture', 'orders', 'sendings', 'companies', 'stocks'));
- $id = GETPOST('id', 'int');
- $ref = GETPOST('ref', 'alpha');
- $lineid = GETPOST('lineid', 'int');
- $action = GETPOST('action', 'alpha');
- $object = new StockTransfer($db);
- // Load object
- if ($id > 0 || !empty($ref)) {
- $ret = $object->fetch($id, $ref);
- if ($ret == 0) {
- $langs->load("errors");
- setEventMessages($langs->trans('ErrorRecordNotFound'), null, 'errors');
- $error++;
- } elseif ($ret < 0) {
- setEventMessages($object->error, $object->errors, 'errors');
- $error++;
- }
- }
- if (!$error) {
- $object->fetch_thirdparty();
- } else {
- header('Location: '.dol_buildpath('/stocktransfer/stocktransfer_list.php', 1));
- exit;
- }
- // Security check
- if ($user->socid) {
- $socid = $user->socid;
- }
- $result = restrictedArea($user, 'stocktransfer', $id, '', 'stocktransfer');
- /*
- * Add a new contact
- */
- if ($action == 'addcontact' && $user->hasRight('stocktransfer', 'stocktransfer', 'write')) {
- if ($object->id > 0) {
- $contactid = (GETPOST('userid', 'int') ? GETPOST('userid', 'int') : GETPOST('contactid', 'int'));
- $result = $object->add_contact($contactid, !empty($_POST["typecontact"]) ? $_POST["typecontact"] : $_POST["type"], $_POST["source"]);
- }
- if ($result >= 0) {
- header("Location: ".$_SERVER['PHP_SELF']."?id=".$object->id);
- exit;
- } else {
- if ($object->error == 'DB_ERROR_RECORD_ALREADY_EXISTS') {
- $langs->load("errors");
- setEventMessages($langs->trans("ErrorThisContactIsAlreadyDefinedAsThisType"), null, 'errors');
- } else {
- setEventMessages($object->error, $object->errors, 'errors');
- }
- }
- } elseif ($action == 'swapstatut' && $user->hasRight('stocktransfer', 'stocktransfer', 'write')) { // Toggle the status of a contact
- if ($object->id > 0) {
- $result = $object->swapContactStatus(GETPOST('ligne'));
- }
- } elseif ($action == 'deletecontact' && $user->hasRight('stocktransfer', 'stocktransfer', 'write')) { // Deletes a contact
- $result = $object->delete_contact($lineid);
- if ($result >= 0) {
- header("Location: ".$_SERVER['PHP_SELF']."?id=".$object->id);
- exit;
- } else {
- dol_print_error($db);
- }
- }
- /*
- elseif ($action == 'setaddress' && $user->rights->stocktransfer->stocktransfer->write)
- {
- $result=$object->setDeliveryAddress($_POST['fk_address']);
- if ($result < 0) dol_print_error($db,$object->error);
- }*/
- /*
- * View
- */
- llxHeader('', $langs->trans('ModuleStockTransferName'), 'EN:Commercial_Proposals|FR:Proposition_commerciale|ES:Presupuestos');
- $form = new Form($db);
- $formcompany = new FormCompany($db);
- $formother = new FormOther($db);
- if ($object->id > 0) {
- $head = stocktransferPrepareHead($object);
- print dol_get_fiche_head($head, 'contact', $langs->trans("StockTransfer"), -1, 'stock');
- // Proposal card
- $linkback = '<a href="'.DOL_URL_ROOT.'/comm/propal/list.php?restore_lastsearch_values=1'.(!empty($socid) ? '&socid='.$socid : '').'">'.$langs->trans("BackToList").'</a>';
- $morehtmlref = '<div class="refidno">';
- // Thirdparty
- $morehtmlref .= empty($object->thirdparty) ? '' : $object->thirdparty->getNomUrl(1, 'customer');
- if (!getDolGlobalInt('MAIN_DISABLE_OTHER_LINK') && $object->thirdparty->id > 0) {
- $morehtmlref .= ' (<a href="'.DOL_URL_ROOT.'/commande/list.php?socid='.$object->thirdparty->id.'&search_societe='.urlencode($object->thirdparty->name).'">'.$langs->trans("OtherOrders").'</a>)';
- }
- // Project
- if (isModEnabled('project')) {
- $langs->load("projects");
- if (!empty($object->fk_project)) {
- $morehtmlref .= '<br>';
- $proj = new Project($db);
- $proj->fetch($object->fk_project);
- $morehtmlref .= $proj->getNomUrl(1);
- if ($proj->title) {
- $morehtmlref .= '<span class="opacitymedium"> - '.dol_escape_htmltag($proj->title).'</span>';
- }
- }
- }
- $morehtmlref .= '</div>';
- dol_banner_tab($object, 'ref', $linkback, 1, 'ref', 'ref', $morehtmlref, '', 0, '', '', 1);
- print dol_get_fiche_end();
- $user->rights->stocktransfer->write = $user->rights->stocktransfer->stocktransfer->write;
- // Contacts lines (modules that overwrite templates must declare this into descriptor)
- $dirtpls = array_merge($conf->modules_parts['tpl'], array('/core/tpl'));
- foreach ($dirtpls as $reldir) {
- $res = @include dol_buildpath($reldir.'/contacts.tpl.php');
- if ($res) {
- break;
- }
- }
- }
- // End of page
- llxFooter();
- $db->close();
|