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

MARX#39100 relatietabel woco x aannemer kan nu gebruikt worden in beperkingen van uitvoerenden/facturen

Browse Source 
svn path=/Website/trunk/; revision=32639
This commit is contained in:
Peter Feij
2017-01-31 16:13:25 +00:00
parent 0d464ba117
commit 4260ba762e
2 changed files with 23 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
APPL/FIN/fin_list.inc
View File

@@ -575,6 +575,18 @@ function fin_list (params)
if (handler_key)
sql += " AND COALESCE (o.mld_uitvoerende_keys, c.cnt_prs_bedrijf_key, bo.prs_bedrijf_key) = " + handler_key;
// maak ik deel uit van een bedrijf 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)
{
sql += " AND COALESCE (o.mld_uitvoerende_keys, c.cnt_prs_bedrijf_key, bo.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() + ")";
}
loRs.close();
if (goedkeur_key)
sql += " AND f.prs_perslid_key_goedkeur = " + goedkeur_key;

11
APPL/Shared/Suggest/bedrijfFilter.inc
View File

@@ -124,6 +124,17 @@ function getFiltClauseBedrijf(pfiltcode, params)
case 'H': lfiltClause = " AND b.prs_bedrijf_huurder = 1";
break;
case 'X': lfiltClause = " AND b.prs_bedrijf_intern IS NULL";
// maak ik deel uit van een bedrijf 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 += " 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() + ")";
}
loRs.close();
break;
}
}