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

VENR#32252 Ook interne bedrijven kunnen nu Dienstenscope krijgen

Browse Source 
svn path=/Website/trunk/; revision=31339
This commit is contained in:
Peter Feij
2016-11-03 09:35:52 +00:00
parent 02b457671d
commit 0e6ce01f57
4 changed files with 30 additions and 29 deletions
Download Patch File Download Diff File Expand all files Collapse all files

31
APPL/PRS/prs_bedrijf.asp
View File

@@ -25,6 +25,7 @@ var bedrijf_key = getQParamInt("bedrijf_key", -1);
var isIntern = getQParamInt("intern", 0) == 1; // alleen te gebruiken bij NEW
var bnaam = "";
var canHaveAddresses = false;
var isUitvoerende = false;
if (bedrijf_key > 0)
{
@@ -41,6 +42,7 @@ if (bedrijf_key > 0)
isIntern = oRs("prs_bedrijf_intern").value==1;
bnaam = oRs("prs_bedrijf_naam").value;
canHaveAddresses = (oRs('prs_bedrijf_contract').value == 1 || oRs('prs_bedrijf_uitvoerende').value ==1 || oRs('prs_bedrijf_leverancier').value ==1);
isUitvoerende = oRs('prs_bedrijf_uitvoerende').value == 1;
}
}
if (isIntern)
@@ -108,21 +110,20 @@ var dienstauthparams = user.checkAutorisation("WEB_PRSMSU", true);
if ( bedrijf_key > -1 && !isIntern)
{ // 2. De contactpersonen
page = "prs_contactpersoon_search_list.asp?embedded=1&bedrijf_key=" + bedrijf_key;
IFRAMER("prscontactpersonen", page, { refreshOnClose: true, initHide: true } );
if (dienstauthparams)
{
// 3. De dienstenxlocatie
page = "prs_dienstloc_list.asp?embedded=1&bedrijf_key=" + bedrijf_key;
IFRAMER("prsdiensten", page, { refreshOnClose: true, initHide: true } );
}
if( canHaveAddresses && (user.checkAutorisation("WEB_PRSSYS", true) || user.checkAutorisation("WEB_PRSMGT", true)))
{
// 4. De technische adressen
page = "prs_bedrijfadres_list.asp?bedrijf_key=" + bedrijf_key;
IFRAMER("prsadressen", page, { refreshOnClose: true } );
}
page = "prs_contactpersoon_search_list.asp?embedded=1&bedrijf_key=" + bedrijf_key;
IFRAMER("prscontactpersonen", page, { refreshOnClose: true, initHide: true } );
}
if ( bedrijf_key > -1 && isUitvoerende && dienstauthparams)
{
// 3. De dienstenxlocatie
page = "prs_dienstloc_list.asp?embedded=1&bedrijf_key=" + bedrijf_key;
IFRAMER("prsdiensten", page, { refreshOnClose: true, initHide: true } );
}
if ( bedrijf_key > -1 && canHaveAddresses && (user.checkAutorisation("WEB_PRSSYS", true) || user.checkAutorisation("WEB_PRSMGT", true)))
{
// 4. De technische adressen
page = "prs_bedrijfadres_list.asp?bedrijf_key=" + bedrijf_key;
IFRAMER("prsadressen", page, { refreshOnClose: true } );
}
%>

17
APPL/PRS/prs_dienst.asp
View File

@@ -9,7 +9,7 @@
Parameters: dloc_key, bedrijf_key, dienst_key
Context:
Note:
Note: intern is only for authorisationchecck, options are equal for internal and external companies from now on
*/ %>
<!--#include file="../Shared/common.inc" -->
<!--#include file="../Shared/iface.inc" -->
@@ -28,10 +28,15 @@ FCLTHeader.Requires({plugins:["suggest","jQuery"], js: ["jQuery-ui.js"]})
var authparams = user.checkAutorisation(autfunction);
var dloc_title = "";
if (dloc_key > -1)
if (bedrijf_key > -1)
{
dloc_title = String(dloc_key);
var sql = "SELECT prs_bedrijf_naam FROM prs_bedrijf WHERE prs_bedrijf_key=" + bedrijf_key;
oRs = Oracle.Execute(sql);
if (!oRs.eof)
{
dloc_title = oRs("prs_bedrijf_naam").value;
}
oRs.close();
}
// dit lijkt mij de enige gehele readonlyverklaring, de rest is localer
@@ -80,8 +85,8 @@ IFRAMER("prsFrame", page, { title: L("lcl_prs_dienst_frame"),
initHeight: "450px",
FcltClose: "prsClose" } );
if ( (dloc_key > -1 && intern != 1) || (dienst_key > -1 && bedrijf_key > -1 && intern !=1)) {
if ( (dloc_key > -1) || (dienst_key > -1 && bedrijf_key > -1))
{
page="prs_locdienst_list.asp?embedded=1&bedrijf_key="+bedrijf_key+"&dienst_key="+dienst_key+"&dloc_key="+dloc_key;
IFRAMER("prsdiensten", page, { refreshOnClose: true, initHide: false } );
}

4
APPL/PRS/prs_edit_dienst.asp
View File

@@ -40,8 +40,7 @@ if (dloc_key > -1)
+ " FROM prs_bedrijf b, "
+ " prs_bedrijfdienstlocatie dl, "
+ " prs_dienst d "
+ " WHERE b.prs_bedrijf_intern IS NULL "
+ " AND b.prs_bedrijf_verwijder IS NULL "
+ " WHERE b.prs_bedrijf_verwijder IS NULL "
+ " AND b.prs_bedrijf_key = dl.prs_bedrijf_key "
+ " AND dl.prs_dienst_key = d.prs_dienst_key "
+ " AND prs_bedrijfdienstlocatie_key = " + dloc_key
@@ -91,7 +90,6 @@ if (dloc_key > -1)
sql = "SELECT prs_bedrijf_key, "
+ " prs_bedrijf_naam "
+ " FROM prs_v_aanwezigbedrijf "
+ " WHERE prs_bedrijf_intern IS NULL "
+ "ORDER BY prs_bedrijf_naam_upper "
FCLTselector("prs_bdrkey2", sql,

7
APPL/PRS/prs_show_dienst.asp
View File

@@ -41,8 +41,7 @@ if (dloc_key > -1)
+ " FROM prs_bedrijf b"
+ " , prs_bedrijfdienstlocatie dl"
+ " , prs_dienst d"
+ " WHERE b.prs_bedrijf_intern IS NULL"
+ " AND b.prs_bedrijf_verwijder IS NULL"
+ " WHERE b.prs_bedrijf_verwijder IS NULL"
+ " AND b.prs_bedrijf_key = dl.prs_bedrijf_key"
+ " AND dl.prs_dienst_key = d.prs_dienst_key"
+ " AND prs_bedrijfdienstlocatie_key = " + dloc_key
@@ -58,8 +57,7 @@ else
+ " FROM prs_bedrijf b"
+ " , prs_bedrijfdienstlocatie dl"
+ " , prs_dienst d"
+ " WHERE b.prs_bedrijf_intern IS NULL"
+ " AND b.prs_bedrijf_verwijder IS NULL"
+ " WHERE b.prs_bedrijf_verwijder IS NULL"
+ " AND b.prs_bedrijf_key = dl.prs_bedrijf_key"
+ " AND dl.prs_dienst_key = d.prs_dienst_key"
+ " AND dl.prs_bedrijf_key = " + bedrijf_key
@@ -119,7 +117,6 @@ oRs.Close();
sql = "SELECT prs_bedrijf_key, "
+ " prs_bedrijf_naam "
+ " FROM prs_v_aanwezigbedrijf "
+ " WHERE prs_bedrijf_intern IS NULL "
+ "ORDER BY prs_bedrijf_naam_upper "
FCLTselector("prs_bdrkey", sql,
{ label: L("lcl_prs_dept_company"),