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

FSN#30748: Functionaliteit budgetmutaties.

Browse Source 
svn path=/Website/trunk/; revision=23658
This commit is contained in:
Maykel Geerdink
2014-12-11 17:49:05 +00:00
parent ae11cf90cc
commit 28c972bcba
10 changed files with 58 additions and 55 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
APPL/PRS/kpn_edit_kpn.asp
View File

@@ -67,7 +67,7 @@ else
// Wijzigen van de kostenplaats(groep)? Setting prs_restrict_kpedit {0=volgens autorisatie (default) | 1=alleen eigen kp/kpg wijzigen}.
// WEB_FINMSU rechten of budgethouder.
var authparams = user.checkAutorisation("WEB_FINMSU");
var authparams = user.checkAutorisation("WEB_FINMSU", true);
var canChange = ((authparams && authparams.ALGwritelevel < 9) ||
(S("prs_restrict_kpedit") == 1 && (kpn_prs_key == user_key || kpngrp_prs_key == user_key))) // Alleen eigen kp/kpg wijzigen
user.auth_required_or_abort(canChange);

2
APPL/PRS/kpn_edit_kpn_save.asp
View File

@@ -37,7 +37,7 @@ else
// Wijzigen van de kostenplaats(groep)? Setting prs_restrict_kpedit {0=volgens autorisatie (default) | 1=alleen eigen kp/kpg wijzigen}.
// WEB_FINMSU rechten of budgethouder.
var authparams = user.checkAutorisation("WEB_FINMSU");
var authparams = user.checkAutorisation("WEB_FINMSU", true);
var canChange = ((authparams && authparams.ALGwritelevel < 9) ||
(S("prs_restrict_kpedit") == 1 && (kpn_prs_key == user_key || kpngrp_prs_key == user_key))) // Alleen eigen kp/kpg wijzigen
user.auth_required_or_abort(canChange);

2
APPL/PRS/kpn_edit_kpngroep.asp
View File

@@ -47,7 +47,7 @@ else
// Wijzigen van de kostenplaats(groep)? Setting prs_restrict_kpedit {0=volgens autorisatie (default) | 1=alleen eigen kp/kpg wijzigen}.
// WEB_FINMSU rechten of budgethouder.
var authparams = user.checkAutorisation("WEB_FINMSU");
var authparams = user.checkAutorisation("WEB_FINMSU", true);
var canChange = ((authparams && authparams.ALGwritelevel < 9) ||
(S("prs_restrict_kpedit") == 1 && (prs_key == user_key))) // Alleen eigen kp/kpg wijzigen
user.auth_required_or_abort(canChange);

2
APPL/PRS/kpn_edit_kpngroep_save.asp
View File

@@ -27,7 +27,7 @@ if (kpngroep_key > 0)
// Wijzigen van de kostenplaats(groep)? Setting prs_restrict_kpedit {0=volgens autorisatie (default) | 1=alleen eigen kp/kpg wijzigen}.
// WEB_FINMSU rechten of budgethouder.
var authparams = user.checkAutorisation("WEB_FINMSU");
var authparams = user.checkAutorisation("WEB_FINMSU", true);
var canChange = ((authparams && authparams.ALGwritelevel < 9) ||
(S("prs_restrict_kpedit") == 1 && (budgethouder_old_key == user_key))) // Alleen eigen kp/kpg wijzigen
user.auth_required_or_abort(canChange);

7
APPL/PRS/kpn_kpn.asp
View File

@@ -4,7 +4,6 @@
$Id$
File: kpn_kpn.asp
Status: 95%
Description: dit is de grote 'wrapper' voor de diverse andere schermen
Parameters: kpn_key
@@ -63,9 +62,11 @@ else
page += "?kpn_key="+kpn_key;
IFRAMER("kpnFrame", page, { initHeight: "200px", FcltClose: "kpnClose" } );
if (kpn_key > -1)
var authparams = user.checkAutorisation("WEB_FINMSU", true);
if (authparams && authparams.ALGwritelevel < 9 && kpn_key > -1)
{
page = "kpn_kpncat_list.asp?kpn_key="+kpn_key;
page = "kpn_kpncat_list.asp?kpn_key=" + kpn_key;
IFRAMER("kpncatlist", page, { refreshOnClose: true} );
}

7
APPL/PRS/kpn_kpngroep.asp
View File

@@ -23,18 +23,13 @@ FCLTHeader.Requires({plugins:["suggest","jQuery"],
var kpngroep_key = getQParamInt("key", -1);
var autfunction = "WEB_FINMSU";
var authparams = user.checkAutorisation(autfunction);
var authparams = user.checkAutorisation("WEB_FINMSU", true);
var kpngroep_title = "";
if (kpngroep_key > -1)
{
kpngroep_title = kpngroep_key;
}
// dit lijkt mij de enige gehele readonlyverklaring, de rest is localer
var readonly = !(authparams.PRSwritelevel< 9 || authparams.ALGwritelevel < 9);
%>
<html>

11
APPL/PRS/kpn_list.inc
View File

@@ -65,10 +65,8 @@ function kpn_list(pautfunction, params)
// De functie checkAutorisation(autfunction) geeft een Response.End indien er geen autorisatie voor autfunction wordt gevonden
var addButton = [];
var autfunction = "WEB_FINMSU";
var authparams = user.checkAutorisation(autfunction);
var canAdd = (authparams.ALGwritelevel < 9);
var authparams = user.checkAutorisation("WEB_FINMSU", true);
var canAdd = (authparams && authparams.ALGwritelevel < 9);
// Voor resulttable de globalen zetten; zou ng anders moeten.
var outputmode = params.outputmode; // print to 0 = screen, 1 = printer, 2 = excel, etc.
@@ -103,7 +101,10 @@ function kpn_list(pautfunction, params)
if ( authparams.PRSwritelevel== 0 )
if (!(authparams && authparams.ALGreadlevel < 9 && authparams.ALGwritelevel < 9)) // Geen WEB_FINMSU. Dan ben ik budgedhouder en mag ik alleen mijn kostenplaatsen zien.
sqln += "AND k.prs_perslid_key = " + user_key;
if ( authparams && authparams.PRSwritelevel== 0 )
{ sqln += " AND p.prs_afdeling_key IN "
+ "(SELECT a.prs_afdeling_key FROM prs_v_afdeling a "
+ "WHERE a.prs_bedrijf_key = " + user.afdeling().prs_bedrijf_key() + ")"

19
APPL/PRS/kpn_search.asp
View File

@@ -22,10 +22,7 @@ FCLTHeader.Requires({ plugins:["jQuery"],
});
var prs_key = getQParamInt("prs_key", -1);
var autfunction = "WEB_FINMSU";
var authparams = user.checkAutorisation(autfunction);
var authparams = user.checkAutorisation("WEB_FINMSU", true);
%>
<html>
<head>
@@ -48,18 +45,22 @@ FCLTHeader.Requires({ plugins:["jQuery"],
+ " FROM prs_kostenplaats pk, "
+ " prs_perslid p "
+ " WHERE pk.prs_perslid_key = p.prs_perslid_key "
+ (!(authparams && authparams.ALGreadlevel)
? " AND pk.prs_perslid_key = " + user_key
: "")
+ " ORDER BY " + S("prs_pers_string")
FCLTselector("budgeth", sql,
{ label: L("lcl_prs_budgethouder"),
emptyOption: "",
whenEmpty: L("lcl_search_generic")
whenEmpty: L("lcl_search_generic"),
selectjustone: !(authparams && authparams.ALGreadlevel)
});
sql = "SELECT prs_kostenplaatsgrp_key, "
+ " prs_kostenplaatsgrp_oms "
+ " FROM prs_kostenplaatsgrp "
+ "ORDER BY 2 ";
sql = "SELECT prs_kostenplaatsgrp_key"
+ " , prs_kostenplaatsgrp_oms"
+ " FROM prs_kostenplaatsgrp"
+ " ORDER BY 2 ";
FCLTselector("kstplgr", sql,
{ label: L("lcl_prs_kostenpl_group"),

47
APPL/PRS/kpn_show_kpn.asp
View File

@@ -22,26 +22,22 @@ FCLTHeader.Requires({plugins:["suggest", "jQuery"]})
var kpn_key = getQParamInt("kpn_key", "-1");
var autfunction = "WEB_FINMSU";
var authparams = user.checkAutorisation(autfunction);
// Ik heb nu enige WEB_FINMSU rechten.
sql = "SELECT k.prs_kostenplaats_key"
+ " , k.prs_kostenplaats_nr"
+ " , k.prs_kostenplaats_omschrijving"
+ " , k.prs_perslid_key kpn_prs_key"
+ " , k.prs_kostenplaats_module"
+ " , k.prs_kostenplaatsgrp_key"
+ " , k.prs_kostenplaats_eind"
+ " , k.prs_kostenplaats_limiet"
+ " , COALESCE(kpg.prs_kostenplaatsgrp_limperiode, k.prs_kostenplaats_limietperiode) limietperiode"
+ " , k.prs_kostenplaats_extern"
+ " , kpg.prs_kostenplaatsgrp_limiet"
+ " , kpg.prs_perslid_key kpngrp_prs_key"
+ " FROM prs_kostenplaats k"
+ " , prs_kostenplaatsgrp kpg"
+ " WHERE kpg.prs_kostenplaatsgrp_key(+) = k.prs_kostenplaatsgrp_key"
+ " AND k.prs_kostenplaats_key = " + kpn_key
var sql = "SELECT k.prs_kostenplaats_key"
+ " , k.prs_kostenplaats_nr"
+ " , k.prs_kostenplaats_omschrijving"
+ " , k.prs_perslid_key kpn_prs_key"
+ " , k.prs_kostenplaats_module"
+ " , k.prs_kostenplaatsgrp_key"
+ " , k.prs_kostenplaats_eind"
+ " , k.prs_kostenplaats_limiet"
+ " , COALESCE(kpg.prs_kostenplaatsgrp_limperiode, k.prs_kostenplaats_limietperiode) limietperiode"
+ " , k.prs_kostenplaats_extern"
+ " , kpg.prs_kostenplaatsgrp_limiet"
+ " , kpg.prs_perslid_key kpngrp_prs_key"
+ " FROM prs_kostenplaats k"
+ " , prs_kostenplaatsgrp kpg"
+ " WHERE kpg.prs_kostenplaatsgrp_key(+) = k.prs_kostenplaatsgrp_key"
+ " AND k.prs_kostenplaats_key = " + kpn_key
oRsMes = Oracle.Execute(sql);
@@ -74,6 +70,14 @@ else
Response.write("internal error or message deleted");
Response.End;
}
var authparams = user.checkAutorisation("WEB_FINMSU", true);
var canShow = ((authparams && authparams.ALGreadlevel < 9) ||
(S("prs_restrict_kpedit") == 1 && (kpn_prs_key == user_key || kpngrp_prs_key == user_key))) // Alleen eigen kp/kpg wijzigen
var canChange = ((authparams && authparams.ALGwritelevel < 9) ||
(S("prs_restrict_kpedit") == 1 && (kpn_prs_key == user_key || kpngrp_prs_key == user_key))) // Alleen eigen kp/kpg wijzigen
user.auth_required_or_abort(canShow);
%>
<html>
@@ -108,8 +112,7 @@ else
<%
var buttons = [];
// Wijzigen van de kostenplaats(groep)? Setting prs_restrict_kpedit {0=volgens autorisatie (default) | 1=alleen eigen kp/kpg wijzigen}
if ((S("prs_restrict_kpedit") == 0 && authparams.ALGwritelevel < 9) ||
(S("prs_restrict_kpedit") == 1 && (kpn_prs_key == user_key || kpngrp_prs_key == user_key || (kpn_prs_key == -1 && kpngrp_prs_key == -1 && authparams.ALGwritelevel < 9))))
if (canChange)
{
var buttons = [ {title: L("lcl_change"), action:"kpn_change()", icon: "wijzigen.png" },
{title: L("lcl_delete"), action:"kpn_delete()", icon: "delete.png" } ];

14
APPL/PRS/kpn_show_kpngroep.asp
View File

@@ -21,10 +21,6 @@ FCLTHeader.Requires({plugins:["suggest","jQuery"]})
var kpngroep_key = getQParamInt("kpngroep_key", "-1");
var autfunction = "WEB_FINMSU";
var authparams = user.checkAutorisation(autfunction);
// Ik heb nu enige WEB_FINMSU rechten.
var sql = "SELECT prs_kostenplaatsgrp_key"
+ " , prs_kostenplaatsgrp_oms"
+ " , prs_kostenplaatsgrp_nr"
@@ -42,6 +38,13 @@ var kpngrp_limiet = oRsMes("prs_kostenplaatsgrp_limiet").Value;
var kpngrp_limperiode = oRsMes("prs_kostenplaatsgrp_limperiode").Value;
oRsMes.Close();
var authparams = user.checkAutorisation("WEB_FINMSU", true);
var canShow = ((authparams && authparams.ALGreadlevel < 9) ||
(S("prs_restrict_kpedit") == 1 && (prs_key == user_key))) // Alleen eigen kp/kpg wijzigen
var canChange = ((authparams && authparams.ALGwritelevel < 9) ||
(S("prs_restrict_kpedit") == 1 && (prs_key == user_key))) // Alleen eigen kp/kpg wijzigen
user.auth_required_or_abort(canShow);
%>
<html>
@@ -75,8 +78,7 @@ oRsMes.Close();
<%
var buttons = [];
// Wijzigen van de kostenplaats(groep)? Setting prs_restrict_kpedit {0=volgens autorisatie (default) | 1=alleen eigen kp/kpg wijzigen}
if ((S("prs_restrict_kpedit") == 0 && authparams.ALGwritelevel < 9) ||
(S("prs_restrict_kpedit") == 1 && (prs_key == user_key || (prs_key == -1 && authparams.ALGwritelevel < 9))))
if (canChange)
{
var buttons = [ {title: L("lcl_change"), action:"kpngrp_change()", icon: "wijzigen.png" },
{title: L("lcl_delete"), action:"kpngrp_delete()", icon: "delete.png" } ];