admin/Facilitor
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

WELK#36978: Bezoeker niet kunnen verwijderen via inline actie.

Browse Source 
svn path=/Website/trunk/; revision=30034
This commit is contained in:
Maykel Geerdink
2016-07-13 07:07:32 +00:00
parent 98bf7ff7b4
commit 303205eeda
1 changed files with 28 additions and 15 deletions
Download Patch File Download Diff File Expand all files Collapse all files

43
APPL/BEZ/bez.inc
View File

@@ -359,19 +359,19 @@ bez =
bresult.canDelete = (bresult.canWrite("WEB_BEZFOF") || bresult.canWrite("WEB_BEZBOF") || bresult.canWrite("WEB_BEZUSE")) && aantaldone == 0;
// Als er parkeerplaatsen aanzitten die PAF nodig hebben gelden soms andere regels
sql = "SELECT count(*) aantal"
+ " FROM bez_bezoekers b"
+ " , res_rsv_deel rrd"
+ " , res_deel rd"
+ " , ins_deel id"
+ " , alg_v_aanwezigterreinsector t"
+ " WHERE b.bez_bezoekers_key = rrd.bez_bezoekers_key"
+ " AND rrd.res_deel_key = rd.res_deel_key"
+ " AND rd.res_ins_deel_key = id.ins_deel_key"
+ " AND id.ins_alg_ruimte_key = t.alg_terreinsector_key"
+ " AND id.ins_alg_ruimte_type = 'T'"
+ " AND t.prs_afdeling_key IS NOT NULL"
+ " AND bez_afspraak_key = " + afspr_key
sql = "SELECT count(*) aantal"
+ " FROM bez_bezoekers b"
+ " , res_rsv_deel rrd"
+ " , res_deel rd"
+ " , ins_deel id"
+ " , alg_v_aanwezigterreinsector t"
+ " WHERE b.bez_bezoekers_key = rrd.bez_bezoekers_key"
+ " AND rrd.res_deel_key = rd.res_deel_key"
+ " AND rd.res_ins_deel_key = id.ins_deel_key"
+ " AND id.ins_alg_ruimte_key = t.alg_terreinsector_key"
+ " AND id.ins_alg_ruimte_type = 'T'"
+ " AND t.prs_afdeling_key IS NOT NULL"
+ " AND bez_afspraak_key = " + afspr_key
var oRs = Oracle.Execute(sql);
bresult.nrPAF = oRs("aantal").Value;
oRs.Close();
@@ -379,10 +379,23 @@ bez =
// je zelf geen PAF rechten hebt laten we je meer niet wijzigen.
// Ander zou je indirect de parkeerplaats langer kunnen claimen.
if (!bresult.canWritePaf && bresult.nrPAF > 0)
bresult.canChange = false;
bresult.canChange = false;
// Bij extern ingevoerde reserveringen mogen we de bezoekers iet veranderen.
if (rsv_ruimte_key > 0)
bresult.canChange = false;
{
sql = "SELECT rr.res_ruimte_extern_id"
+ " FROM res_rsv_ruimte rrr"
+ " , res_ruimte_opstelling ro"
+ " , res_ruimte rr"
+ " WHERE rrr.res_ruimte_opstel_key = ro.res_ruimte_opstel_key"
+ " AND ro.res_ruimte_key = rr.res_ruimte_key"
+ " AND rrr.res_rsv_ruimte_key = " + rsv_ruimte_key;
var oRs = Oracle.Execute(sql);
var res_ruimte_extern_id = oRs("res_ruimte_extern_id").Value;
oRs.Close();
bresult.canChange = res_ruimte_extern_id == null; // Als extern dan niet te wijzigen.
}
bresult.canWriteAny = bresult.canWrite("WEB_BEZFOF") || bresult.canWrite("WEB_BEZBOF") || bresult.canWrite("WEB_BEZUSE");
bresult.canWriteFOF = bresult.canWrite("WEB_BEZFOF");