* Copyright (C) 2004-2009 Laurent Destailleur * Copyright (C) 2013 Marcos García * * 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/fourn/paiement/info.php * \ingroup facture, fournisseur * \brief Tab for Supplier Payment Information */ // Load Dolibarr environment require '../../main.inc.php'; require_once DOL_DOCUMENT_ROOT.'/core/lib/functions2.lib.php'; require_once DOL_DOCUMENT_ROOT.'/core/lib/payments.lib.php'; require_once DOL_DOCUMENT_ROOT.'/fourn/class/paiementfourn.class.php'; // Load translation files required by the page $langs->loadLangs(array("bills", "suppliers", "companies")); // Get Parameters $id = GETPOST('id', 'int'); // Initialize Objects $object = new PaiementFourn($db); // Load object include DOL_DOCUMENT_ROOT.'/core/actions_fetchobject.inc.php'; // Must be include, not include_once. $result = restrictedArea($user, $object->element, $object->id, 'paiementfourn', ''); // Security check if ($user->socid) { $socid = $user->socid; } // Now check also permission on thirdparty of invoices of payments. Thirdparty were loaded by the fetch_object before based on first invoice. // It should be enough because all payments are done on invoices of the same thirdparty. if ($socid && $socid != $object->thirdparty->id) { accessforbidden(); } /* * Actions */ // None /* * View */ llxHeader(); $object->info($id); $head = payment_supplier_prepare_head($object); print dol_get_fiche_head($head, 'info', $langs->trans("SupplierPayment"), 0, 'payment'); $linkback = ''.$langs->trans("BackToList").''; dol_banner_tab($object, 'id', $linkback, -1, 'rowid', 'ref'); print dol_get_fiche_end(); print '

'; dol_print_object_info($object); print '

'; // End of page llxFooter(); $db->close();