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

YKPN#55980 Goedkeuring facturen op basis van contractscope

Browse Source 
svn path=/Website/trunk/; revision=41322
This commit is contained in:
Alex Tiehuis
2019-03-05 14:29:04 +00:00
parent cafd8750c2
commit ef3b259c36
1 changed files with 22 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

23
APPL/FIN/fin_list.inc
View File

@@ -400,6 +400,27 @@ function fin_list (params)
+ " ))"
+ ")";
// 1c) Heb ik ALG write rechten (WEB_FINBOF) op de plaats van het bijbehorende contract?
sql1c = " (f.cnt_contract_plaats_key IS NOT NULL"
+ " AND EXISTS"
+ " (SELECT cp.CNT_ALG_PLAATS_KEY, cp.CNT_ALG_PLAATS_CODE"
+ " FROM cnt_v_aanwezigcontract_plaats cp"
+ " WHERE cp.cnt_contract_key = f.cnt_contract_key"
+ " AND ( ( cp.cnt_alg_plaats_code = 'G'"
+ " AND cp.cnt_alg_plaats_key IN"
+ " (SELECT alg_gebouw_key"
+ " FROM fac_v_my_buildings"
+ " WHERE prs_perslid_key IN (" + prsKeys + ")"
+ " AND niveau = " + authparamsFINBOF.ALGreadlevel + "))"
+ " OR ( cp.cnt_alg_plaats_code = 'L'"
+ " AND cp.cnt_alg_plaats_key IN"
+ " (SELECT alg_locatie_key"
+ " FROM fac_v_my_locations"
+ " WHERE prs_perslid_key IN (" + prsKeys + ")"
+ " AND niveau = " + authparamsFINBOF.ALGreadlevel + "))"
+ " ))"
+ " )";
// 2) Ben ik contracteigenaar van het contract?
sql2 = " (f.cnt_contract_key IS NOT NULL "
+ " AND c.prs_perslid_key_eig IN (" + prsKeys + "))";
@@ -410,7 +431,7 @@ function fin_list (params)
// 4) Als type (mld-cnt-bes) niet bekend/gekozen is, dan moet ik volledig rechten hebben
// sql4 = " (f.mld_opdr_key IS NOT NULL OR f.cnt_contract_key IS NOT NULL OR f.bes_bestelopdr_key IS NOT NULL)";
sql += " AND (" + sql1a + " OR " + sql1b + " OR " + sql2 + " OR " + sql3 + ")";
sql += " AND (" + sql1a + " OR " + sql1b + " OR " + sql1c + " OR " + sql2 + " OR " + sql3 + ")";
}
// Als bld_key een geldige waarde heeft, hebben loc_key en dis_key ook een geldige waarde