MARX#39100 relatietabel woco x aannemer kan nu gebruikt worden in beperkingen van uitvoerenden
svn path=/Website/trunk/; revision=32638
This commit is contained in:
@@ -663,6 +663,17 @@ function opdr_list (params)
|
||||
if (handler_key)
|
||||
sql = sql + " AND o.mld_uitvoerende_keys = " + handler_key;
|
||||
|
||||
// Als er multicompany-achtige relatiebeperkingen gelden, dan moet dat ook hier worden afgedwongen
|
||||
var lsql = "SELECT '' FROM prs_bedrijf_bedrijf pbb "
|
||||
+ " WHERE prs_bedrijf_key1 = " + user.afdeling().prs_bedrijf_key()
|
||||
+ " OR prs_bedrijf_key2 = "+ user.afdeling().prs_bedrijf_key();
|
||||
var loRs = Oracle.Execute(lsql);
|
||||
if (!loRs.eof)
|
||||
{
|
||||
sql += " AND o.mld_uitvoerende_keys IN (SELECT prs_bedrijf_key2 FROM prs_bedrijf_bedrijf WHERE prs_bedrijf_key1 = "+ user.afdeling().prs_bedrijf_key()
|
||||
+ " UNION SELECT prs_bedrijf_key1 FROM prs_bedrijf_bedrijf WHERE prs_bedrijf_key2 = "+ user.afdeling().prs_bedrijf_key() + ")";
|
||||
}
|
||||
|
||||
|
||||
sql += getKenmerkSql("OPD", "o.mld_opdr_key");
|
||||
|
||||
|
||||
@@ -229,6 +229,16 @@ function getFiltClauseUitvoerende(pfiltcode, params)
|
||||
{
|
||||
case 'M': lfiltClause.perslid += " AND p.prs_perslid_key IN (SELECT mld_uitvoerende_keys from mld_opdr)";
|
||||
lfiltClause.bedrijf += " AND b.prs_bedrijf_key IN (SELECT mld_uitvoerende_keys from mld_opdr)";
|
||||
// maak ik deel uit van een berijf met beperkte relaties?
|
||||
var lsql = "SELECT '' FROM prs_bedrijf_bedrijf pbb "
|
||||
+ " WHERE prs_bedrijf_key1 = " + user.afdeling().prs_bedrijf_key()
|
||||
+ " OR prs_bedrijf_key2 = "+ user.afdeling().prs_bedrijf_key();
|
||||
var loRs = Oracle.Execute(lsql);
|
||||
if (!loRs.eof)
|
||||
{
|
||||
lfiltClause.bedrijf += " AND b.prs_bedrijf_key IN (SELECT prs_bedrijf_key2 FROM prs_bedrijf_bedrijf WHERE prs_bedrijf_key1 = "+ user.afdeling().prs_bedrijf_key()
|
||||
+ " UNION SELECT prs_bedrijf_key1 FROM prs_bedrijf_bedrijf WHERE prs_bedrijf_key2 = "+ user.afdeling().prs_bedrijf_key() + ")";
|
||||
}
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user