lainwir3d/dolibarr
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

FIX deletion of direct debit or credit transfer

Browse Source
This commit is contained in:
Laurent Destailleur 2021-12-09 12:54:08 +01:00
parent ecf98530bb
commit 6b9636c3b8
2 changed files with 11 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
htdocs/compta/prelevement/card.php
View File

@ -67,6 +67,7 @@ include DOL_DOCUMENT_ROOT.'/core/actions_fetchobject.inc.php'; // Must be includ
$hookmanager->initHooks(array('directdebitprevcard', 'globalcard', 'directdebitprevlist'));
$type = $object->type;
if ($type == 'bank-transfer') {
$result = restrictedArea($user, 'paymentbybanktransfer', '', '', '');
} else {
@ -86,9 +87,10 @@ if ($reshook < 0) {
if (empty($reshook)) {
if ($action == 'confirm_delete') {
$savtype = $object->type;
$res = $object->delete($user);
if ($res > 0) {
if ($object->type == 'bank-transfer') {
if ($savtype == 'bank-transfer') {
header("Location: ".DOL_URL_ROOT.'/compta/paymentbybanktransfer/index.php');
} else {
header("Location: ".DOL_URL_ROOT.'/compta/prelevement/index.php');

8
htdocs/core/lib/security.lib.php
View File

@ -566,6 +566,14 @@ function restrictedArea($user, $features, $objectid = 0, $tableandshare = '', $f
if (empty($user->rights->adherent->supprimer)) {
$deleteok = 0;
}
} elseif ($feature == 'paymentbybanktransfer') {
if (empty($user->rights->paymentbybanktransfer->create)) { // There is no delete permission
$deleteok = 0;
}
} elseif ($feature == 'prelevement') {
if (empty($user->rights->prelevement->bons->creer)) { // There is no delete permission
$deleteok = 0;
}
} elseif (!empty($feature2)) { // This is for permissions on 2 levels
foreach ($feature2 as $subfeature) {
if (empty($user->rights->$feature->$subfeature->supprimer) && empty($user->rights->$feature->$subfeature->delete)) {