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

Merge 2015.2 Gold D patches

Browse Source 
svn path=/Website/trunk/; revision=26978
This commit is contained in:
Jos Groot Lipman
2015-11-11 16:30:24 +00:00
parent 8d62f32505
commit ebac8b5c9d
16 changed files with 224 additions and 122 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
APPL/API2/api2.inc
View File

@@ -1149,7 +1149,10 @@ function generic_REST_GET(model, gparams)
// dan maar (veel) te veel records ophalen.
}
else
var sql = "SELECT * FROM (" + sql + ") WHERE ROWNUM <= " + (maxcnt + 1); // Eentje extra om overflow-melding te triggeren in resultsettable
{
if (!params.filter.nolimit) // Dan niet (Excel, CSV)
var sql = "SELECT * FROM (" + sql + ") WHERE ROWNUM <= " + (maxcnt + 1); // Eentje extra om overflow-melding te triggeren in resultsettable
}
var json = api2.sql2json (params, sql, model);

8
APPL/API2/model_ins_kenmerk.inc
View File

@@ -217,10 +217,10 @@ function model_ins_kenmerk(fnparams)
this.record_title = L("ins_kenmerk");
this.records_title = L("ins_kenmerk_m");
gparams.GET = {tables: ["ins_v_allsrtinstallatie"],
wheres: [ "ins_kenmerk.ins_kenmerk_niveau <> 'C'",
"ins_kenmerk.ins_srtinstallatie_key = ins_v_allsrtinstallatie.ins_srtinstallatie_key",
"ins_kenmerk.ins_kenmerk_niveau = ins_v_allsrtinstallatie.niveau"
]
wheres: [ "ins_kenmerk.ins_kenmerk_niveau <> 'C'",
"ins_kenmerk.ins_srtinstallatie_key = ins_v_allsrtinstallatie.ins_srtinstallatie_key",
"ins_kenmerk.ins_kenmerk_niveau = ins_v_allsrtinstallatie.niveau"
]
};
}

58
APPL/API2/model_res_srtartikel_onrgoed.inc
View File

@@ -19,6 +19,10 @@ function model_res_srtartikel_onrgoed()
this.primary = "res_srtartikel_onrgoed_key";
this.records_name = "articlescopes";
this.record_name = "articlescope";
this.soft_delete = "res_srtartikel_og_verwijder";
this.autfunction = "WEB_RESMSU";
this.record_title = L("res_srtartikel_onrgoed");
this.records_title = L("res_srtartikel_onrgoed_m");
this.fields = {
@@ -72,63 +76,13 @@ function model_res_srtartikel_onrgoed()
}
};
this.list = {
"columns": [
"id",
"alg_onrgoed_niveau",
"alg_onrgoed_key",
"res_discipline_key",
"ruimtekey"
]
};
this.search = {
"autosearch": true,
"filters": [
"res_discipline_key",
"ruimtekey"
]
};
this.edit = {
modal: true
modal: true // In asp zetten werkt niet ?
};
this.soft_delete = "res_srtartikel_og_verwijder";
this.autfunction = "WEB_RESMSU";
this.record_title = L("res_srtartikel_onrgoed");
this.records_title = L("res_srtartikel_onrgoed_m");
this.REST_GET = generic_REST_GET(this, this.gparams);
this.REST_GET = generic_REST_GET(this);
this.REST_POST = generic_REST_POST(this);
this.REST_PUT = generic_REST_PUT(this);
this.REST_DELETE = generic_REST_DELETE(this, {});
this.hook_pre_post = function(params, jsondata)
{
var locatie_key = getFParamInt("locatiekey");
var gebouw_key = getFParamInt("gebouwkey");
var verdieping_key = getFParamInt("verdiepingkey");
var ruimte_key = getFParamInt("ruimtekey");
if (ruimte_key != -1)
{ jsondata.alg_onrgoed_niveau = "R";
jsondata.ruimtekey = ruimte_key;
}
else if (verdieping_key != -1 || gebouw_key != -1) // Als verdieping is geselecteerd, sla dan gebouw op: Niveau V wordt niet ondersteund.
{ jsondata.alg_onrgoed_niveau = "G";
jsondata.ruimtekey = gebouw_key;
}
else if (locatie_key != -1)
{ jsondata.alg_onrgoed_niveau = "L";
jsondata.ruimtekey = locatie_key;
}
}
function fill_og_niveau_LOV()
{
return "L;"+L("lcl_location")
+ ";G;"+L("lcl_building")
+ ";R;"+L("lcl_room");
}
}
%>

4
APPL/MGT/res_ruimte.asp
View File

@@ -15,11 +15,11 @@
},
"show": {
js: ["./mgt_tools.js"],
buttons: [{ title: "lcl_photos", action: safe.htmlattr(fotoaction), icon: "folder.png" }]
buttons: [{ title: L("lcl_photos"), action: safe.htmlattr(fotoaction), icon: "folder.png" }]
},
"edit": {
js: ["./mgt_tools.js"],
buttons: [{ title: "lcl_photos", action: safe.htmlattr(fotoaction), icon: "folder.png" }]
buttons: [{ title: L("lcl_photos"), action: safe.htmlattr(fotoaction), icon: "folder.png" }]
}
});
%>

124
APPL/MGT/res_srtartikel_onrgoed.asp
View File

@@ -4,16 +4,120 @@
<!-- #include file="../api2/model_res_srtartikel_onrgoed.inc" -->
<%
scaffolding(new model_res_srtartikel_onrgoed(),
var this_model = new model_res_srtartikel_onrgoed();
this_model.hook_pre_post = function(params, jsondata)
{
var locatie_key = getFParamInt("locatiekey");
var gebouw_key = getFParamInt("gebouwkey");
var verdieping_key = getFParamInt("verdiepingkey");
var ruimte_key = getFParamInt("ruimtekey");
if (ruimte_key != -1)
{ jsondata.alg_onrgoed_niveau = "R";
jsondata.ruimtekey = ruimte_key;
}
else if (verdieping_key != -1 || gebouw_key != -1) // Als verdieping is geselecteerd, sla dan gebouw op: Niveau V wordt niet ondersteund.
{ jsondata.alg_onrgoed_niveau = "G";
jsondata.ruimtekey = gebouw_key;
}
else if (locatie_key != -1)
{ jsondata.alg_onrgoed_niveau = "L";
jsondata.ruimtekey = locatie_key;
}
}
if (mode == "list") // mode is een GLOBAL.
{
var locatie_key = getQParamInt("locatiekey");
var gebouw_key = getQParamInt("gebouwkey");
var verdieping_key = getQParamInt("verdiepingkey");
var ruimte_key = getQParamInt("ruimtekey");
var onrgoed_key = -1;
var niveau = "";
if (ruimte_key > -1)
{
niveau = "ruimte";
onrgoed_key = ruimte_key;
}
else if (verdieping_key > -1)
{
niveau = "verdieping";
onrgoed_key = verdieping_key;
}
else if (gebouw_key > -1)
{
niveau = "gebouw";
onrgoed_key = gebouw_key;
}
else if (locatie_key > -1)
{
niveau = "locatie";
onrgoed_key = locatie_key;
}
if (niveau == "locatie") // alg_v_allonroerendgoed.alg_type=='L' is er niet
{
this_model.gparams.GET = {
tables: ["alg_v_allonroerendgoed"],
wheres: ["res_srtartikel_onrgoed.alg_onrgoed_key = alg_v_allonroerendgoed.alg_onroerendgoed_keys(+)",
"res_srtartikel_onrgoed.alg_onrgoed_niveau = alg_v_allonroerendgoed.alg_type(+)",
"alg_v_allonroerendgoed.alg_"+niveau+"_key(+) = " + onrgoed_key,
"(alg_v_allonroerendgoed.alg_"+niveau+"_key IS NOT NULL OR " +
"res_srtartikel_onrgoed.alg_onrgoed_niveau = 'L' AND res_srtartikel_onrgoed.alg_onrgoed_key = " + onrgoed_key + ")"
]
}
}
else if (niveau != "")
{
this_model.gparams.GET = {
tables: ["alg_v_allonroerendgoed"],
wheres: ["res_srtartikel_onrgoed.alg_onrgoed_key = alg_v_allonroerendgoed.alg_onroerendgoed_keys",
"res_srtartikel_onrgoed.alg_onrgoed_niveau = alg_v_allonroerendgoed.alg_type",
"alg_v_allonroerendgoed.alg_"+niveau+"_key = " + onrgoed_key
]
}
}
}
scaffolding(this_model,
{
"search": {
autosearch: false
},
"show": {
js: ["./mgt_tools.js"]
},
"edit": {
js: ["./mgt_tools.js"]
}
});
"autosearch": false,
"filters": [
"res_discipline_key",
"ruimtekey"
]
},
"list": {
"columns": [
"id",
"alg_onrgoed_niveau",
"alg_onrgoed_key",
"res_discipline_key",
"ruimtekey"
]
},
"show": {
"requires": {
"js": ["./mgt_tools.js"]
}
},
"edit": {
"requires": {
"js": ["./mgt_tools.js"]
}
}
});
function fill_og_niveau_LOV()
{
return "L;"+L("lcl_location")
+ ";G;"+L("lcl_building")
+ ";R;"+L("lcl_room");
}
%>

29
APPL/MGT/srtinstallatieselector.js
View File

@@ -111,20 +111,23 @@ function pre_submit()
var srtgroep_key = $("#ins_srtgroep_key").val();
var srtdeel_key = $("#ins_srtdeel_key").val();
if (srtdeel_key != -1)
if (discipline_key) // discipline_key, srtgroep_key en srtdeel_key zijn readonly, dan srtinstallatiekey laen staan.
{
$("#ins_kenmerk_niveau").val("S");
$("#ref_srtinstallatie_key").val(srtdeel_key);
}
else if (srtgroep_key != -1)
{
$("#ins_kenmerk_niveau").val("G");
$("#ref_srtinstallatie_key").val(srtgroep_key);
}
else
{
$("#ins_kenmerk_niveau").val("D");
$("#ref_srtinstallatie_key").val(discipline_key);
if (srtdeel_key != -1)
{
$("#ins_kenmerk_niveau").val("S");
$("#ref_srtinstallatie_key").val(srtdeel_key);
}
else if (srtgroep_key != -1)
{
$("#ins_kenmerk_niveau").val("G");
$("#ref_srtinstallatie_key").val(srtgroep_key);
}
else
{
$("#ins_kenmerk_niveau").val("D");
$("#ref_srtinstallatie_key").val(discipline_key);
}
}
return true;

8
APPL/MLD/mld.inc
View File

@@ -3014,6 +3014,7 @@ mld = {setmeldingstatus:
mresult.canKostChange = false; // Kostenplaats: !this_opdr.canVeldChange && S("mld_ord_show_kostenplaats") == 1
mresult.canOpmChange = false; // Opmerking: (opdr_status!=6 || authparamsORDFIN). Met ORDBO2 rechten mag je dit veld ook aanpassen
mresult.canUrenMatChange = false; // Uren en materialen: (opdr_status!=6 || authparamsORDFIN). Met ORDBO2 en MLDORD rechten mag je dit veld ook aanpassen
mresult.hadUrenMatChange = false; // Had ik in status "Technisch Voltooid/Afgemeld(6)" de rechten om Uren en materialen te wijzigen.
mresult.canOpdrTypeChange = false; // Opdrachttype: canVeldChange maar van offertopdrachten mag je het opdrachttype niet aanpassen (!isofferte).
mresult.iamBedrijfContact = false; // Aan bedrijf toegekend en ik ben contactpersoon van dat bedrijf? Bijv. vertaaldiensten UWVA
@@ -3167,6 +3168,13 @@ mld = {setmeldingstatus:
mresult.canFlexChange = (mresult.haveORDFINrights || mresult.haveORDSUPrights);
mresult.canKostChange = (mresult.haveORDFINrights && S("mld_ord_show_kostenplaats") == 1);
mresult.canUrenMatChange = (mresult.haveORDFINrights);
mresult.hadUrenMatChange = (mresult.canFinish || mresult.haveORDFINrights) ||
(myBO2Change && mresult.canWrite("WEB_ORDAFR"));
if (mresult.iamBedrijfContact && mresult.hadUrenMatChange)
{
if (t_cost > S("mld_max_kosten_extern"))
mresult.hadUrenMatChange = false;
}
mresult.canSeeARFlex = (isofferte && (mresult.haveORDSUPrights || (mresult.canRead("WEB_ORDBOF") && mresult.haveORDOAPrights)));
mresult.canChangeARFlex = (isofferte && (mresult.haveORDSUPrights || (mresult.canRead("WEB_ORDBOF") && mresult.haveORDOAPrights)));
break;

2
APPL/MLD/mld_edit_opdr.js
View File

@@ -278,7 +278,7 @@ function mld_submit(json)
function opdr_edit_finish()
{
var opdr_kosten = parseFloat($("#tot_kosten").val());
var opdr_kosten = parseFloat(String($("#tot_kosten").val()).replace(',', '.'));
if (kosten_verplicht_afr && opdr_kosten == 0)
{
alert(L("lcl_mld_opdr_kosten_verpl_afr"));

2
APPL/MLD/mld_edit_opdr_save.asp
View File

@@ -471,7 +471,7 @@ for (var u = 0; u < uitvkeyArray.length; u++)
user.auth_required_or_abort(finish? this_opdr.hadFinishRights : this_opdr.canChange);
if (this_opdr.iamBedrijfContact &&
this_opdr.canUrenMatChange &&
((!finish && this_opdr.canUrenMatChange) || (finish && this_opdr.hadUrenMatChange)) &&
tot_kosten > S("mld_max_kosten_extern"))
{
abort_with_warning(L("lcl_opdr_cost_exceed") + S("mld_max_kosten_extern"));

8
APPL/MLD/opdr_finish.asp
View File

@@ -33,9 +33,17 @@ var ingesloten = [];
for (var i = 0; i < opdr_key_arr.length; i++)
{
var this_opdr = mld.func_enabled_opdracht(opdr_key_arr[i]); // Wat heb ik zoal aan rechten op deze specifieke opdracht
var costExceedsBC = this_opdr.iamBedrijfContact && this_opdr.canUrenMatChange && opdr_kosten > S("mld_max_kosten_extern");
// Controleren of de contractpersoon van de uitvoerder de maximale kosten heeft overschreden.
// Dan stoppen en een melding/warning geven. Alleen bij 1 opdracht een melding/warning geven.
user.anything_todo_or_abort(multi || !costExceedsBC, L("lcl_opdr_cost_exceed") + S("mld_max_kosten_extern"));
var mld_opdr = mld.mld_opdr_info(opdr_key_arr[i]);
var kosten_verplicht_afr = mld_opdr.typeopdr_matchtype != 4 && (mld_opdr.typeopdr_kosten_verplicht & 4 || (mld_opdr.typeopdr_kosten_verplicht == 0 && mld_opdr.opdrkosten_verplicht & 4));
var opdr_kosten = opdr_kosten > 0? opdr_kosten : mld_opdr.t_cost;
// Bij multi worden er geen bedragen aangepast door de contractpersoon van de uitvoerder.
// Als het bedrag van de opdracht dan hoger is dan de setting "mld_max_kosten_extern" dan is het ook legaal op dat bedrag gezet door een persoon.
// Dan mag de opdracht dus kostenklaar gemeld worden door de contactpersoon van de uitvoerden en hoeft de opdracht niet uitgesloten te worden.
if (this_opdr.canFinish && !(kosten_verplicht_afr && opdr_kosten == 0))
{
ingesloten.push(opdr_key_arr[i]);

2
APPL/MLD/opdr_search_list_xd.asp
View File

@@ -60,7 +60,7 @@ FCLTHeader.Title(L("lcl_xd_orders"));
var lKey = row.getAttribute("ROWKEY");
var lData = eval("(" + row.getAttribute("ROWDATA") + ")");
var name = $(row).find("span.xdcustname").text()||"";
url = sd[lData.custid].deeplinkurl +"appl/mld/mld_opdr.asp?opdr_key==" + lKey + "<%=S("xd_add2deeplinkurl")%>";
url = sd[lData.custid].deeplinkurl + "appl/mld/mld_opdr.asp?opdr_key=" + lKey + "<%=S("xd_add2deeplinkurl")%>";
FcltMgr.openDetail(url, { reuse: true, titel: name });
}
</script>

4
APPL/PDA/ins_list.asp
View File

@@ -212,9 +212,11 @@ else
+ " , ins_srtdeel sd"
+ " , ins_srtgroep sg"
+ " , prs_v_afdeling a"
+ " , prs_v_afdeling_boom boom"
+ " , prs_bedrijf b"
+ " WHERE id.ins_alg_ruimte_key = a.prs_afdeling_key"
+ " AND a.prs_bedrijf_key = b.prs_bedrijf_key"
+ " AND a.prs_afdeling_key = boom.prs_afdeling_key"
+ " AND id.ins_alg_ruimte_type = 'A'"
+ " AND id.ins_deel_parent_key " + ((ins_parent_key > -1)? " = " + ins_parent_key : "IS NULL")
+ " AND sd.ins_srtdeel_key = id.ins_srtdeel_key"
@@ -233,7 +235,7 @@ else
"", //"aog.alg_verdieping_key",
"", //"aog.alg_ruimte_key",
"b.prs_bedrijf_key",
"a.prs_afdeling_key",
"boom.prs_afdeling_key",
autfunction,
"", // disc_key
1);

68
APPL/RES/res_bez_oproep.asp
View File

@@ -46,18 +46,26 @@ if (bez_key < 0)
oRs.Close();
}
// Nu heeft bez_key een waarde. Onder welke pool-reservering valt hij?
// Nu heeft bez_key een waarde. Onder welke (pool)-reservering valt hij?
var sql = "SELECT bez_afspraak_naam,"
+ " bez_bezoekers_pasnr,"
+ " bez_bezoekers_done,"
+ " bez_bezoekers_oproep,"
+ " bez_bezoekers_out,"
+ " res_reservering_key"
+ " FROM res_rsv_ruimte rrr,"
+ " rrr.res_reservering_key,"
+ " res_reservering_ispool,"
+ lcl.xsqla('rr.res_ruimte_nr', 'rr.res_ruimte_key')
+ " FROM res_ruimte rr,"
+ " res_ruimte_opstelling rro,"
+ " res_rsv_ruimte rrr,"
+ " res_reservering r,"
+ " bez_afspraak a,"
+ " bez_bezoekers bb"
+ " WHERE bez_bezoekers_key = " + bez_key
+ " AND rr.res_ruimte_key = rro.res_ruimte_key"
+ " AND rro.res_ruimte_opstel_key = rrr.res_ruimte_opstel_key"
+ " AND rrr.res_rsv_ruimte_key = a.res_rsv_ruimte_key"
+ " AND rrr.res_reservering_key = r.res_reservering_key"
+ " AND a.bez_afspraak_key = bb.bez_afspraak_key";
var oRs = Oracle.Execute(sql);
if (oRs.Eof)
@@ -68,38 +76,46 @@ if (oRs("bez_bezoekers_oproep").Value != null && opnieuw == -1)
abort_with_warning(L("lcl_res_bez_wascalled").format(toTimeString(oRs("bez_bezoekers_oproep").Value)));
var res_key = oRs("res_reservering_key").Value;
var ispool = oRs("res_reservering_ispool").Value == 1;
var ruimtenr = oRs("res_ruimte_nr").Value; // Bij ispool is dit de ruimte waaronder de bezoeker
// oorspronkelijk is aangemeld.
// Dat passen we straks nog aan
var bez_naam = oRs("bez_afspraak_naam").Value;
var bez_badge = oRs("bez_bezoekers_pasnr").Value||"";
var aangemeld = new Date(oRs("bez_bezoekers_done").Value);
var wachttijd = Math.floor((new Date() - aangemeld) / 1000 / 60);
oRs.Close()
// Nu uitzoeken achter welke balie *ik* zit
var sql = "SELECT rrr.res_rsv_ruimte_key"
+ " , a.bez_afspraak_key"
+ " , " + lcl.xsqla('rr.res_ruimte_nr', 'rr.res_ruimte_key')
+ " FROM res_ruimte rr"
+ " , res_ruimte_opstelling rro"
+ " , res_v_aanwezigrsv_ruimte rrr"
+ " , bez_afspraak a"
+ " WHERE rrr.res_rsv_ruimte_key = a.res_rsv_ruimte_key(+)"
+ " AND rr.res_ruimte_key = rro.res_ruimte_key"
+ " AND rro.res_ruimte_opstel_key = rrr.res_ruimte_opstel_key"
+ " AND rrr.res_reservering_key = " + res_key
+ " AND rrr.res_rsv_ruimte_host_key = " + user_key;
var oRs = Oracle.Execute(sql);
// Kan niet falen: als ik niet achter een balie zit had ik de lijst al nooit gezien
if (ispool)
{ // Nu uitzoeken achter welke balie *ik* zit
var sql = "SELECT rrr.res_rsv_ruimte_key"
+ " , a.bez_afspraak_key"
+ " , " + lcl.xsqla('rr.res_ruimte_nr', 'rr.res_ruimte_key')
+ " FROM res_ruimte rr"
+ " , res_ruimte_opstelling rro"
+ " , res_v_aanwezigrsv_ruimte rrr"
+ " , bez_afspraak a"
+ " WHERE rrr.res_rsv_ruimte_key = a.res_rsv_ruimte_key(+)"
+ " AND rr.res_ruimte_key = rro.res_ruimte_key"
+ " AND rro.res_ruimte_opstel_key = rrr.res_ruimte_opstel_key"
+ " AND rrr.res_reservering_key = " + res_key
+ " AND rrr.res_rsv_ruimte_host_key = " + user_key;
var oRs = Oracle.Execute(sql);
// Kan niet falen: als ik niet achter een balie zit had ik de lijst al nooit gezien
var rsv_ruimte_key = oRs("res_rsv_ruimte_key").Value;
var afs_key = oRs("bez_afspraak_key").Value;
var ruimtenr = oRs("res_ruimte_nr").Value;
oRs.Close()
if (!afs_key)
afs_key = createAfspraak(rsv_ruimte_key);
var rsv_ruimte_key = oRs("res_rsv_ruimte_key").Value;
var afs_key = oRs("bez_afspraak_key").Value;
var ruimtenr = oRs("res_ruimte_nr").Value;
oRs.Close()
if (!afs_key)
afs_key = createAfspraak(rsv_ruimte_key);
}
// Alleen bij pool reserveringen verplaatsen we de bezoeker naar de
// afspraak bij de deelreservering voor de balie waar ik zit
sql = "UPDATE bez_bezoekers bb"
+ " SET bez_bezoekers_oproep = SYSDATE,"
+ " bez_afspraak_key = " + afs_key
+ " SET bez_bezoekers_oproep = SYSDATE"
+ (ispool?" , bez_afspraak_key = " + afs_key:"")
+ " WHERE bez_bezoekers_key = " + bez_key
+ " AND bb.bez_bezoekers_done IS NOT NULL" // Moet binnen zijn
+ " AND bb.bez_bezoekers_oproep " + (opnieuw == -1 ? "IS NULL" : "IS NOT NULL") // Moet binnen zijn

14
APPL/Shared/Suggest/SuggestReferentie.asp
View File

@@ -48,22 +48,16 @@ chars = chars.replace(/\*/g,"%");
var ikBenVerantwoordelijke = (perslidKey == user_key || user.isCollega(perslidKey));
// Heb ik dan FO of BO rechten om meldingen te lezen? Dan mag ik ook alle referenties ophalen.
var authparams = user.checkAutorisation(["WEB_MLDFOF", "WEB_MLDBOF"], true /* isOptional */, (stdm_info? stdm_info.ins_discipline_key : null));
var authparams = user.checkAutorisation(["WEB_MLDFOF", "WEB_MLDBOF", "WEB_MLDBAC"], true /* isOptional */, (stdm_info? stdm_info.ins_discipline_key : null));
var mld_read = authparams && (authparams.PRSreadlevel < 9 && authparams.ALGreadlevel < 9);
var func_keys = authparams && authparams.autfunctionkeys;
// Heb ik dan FO of MI rechten om meldingen aan te maken? Dan mag ik ook referenties ophalen.
// JGL: MLDBAC schrijfrechten bestaan helemaal niet. Volgens mij is *lees*rechten veel logischer
// en volgens mij is een paar regels terug al wel de goede mld_read bepaald? Ooit aanpassen
var authparams = user.checkAutorisation(["WEB_MLDFOF", "WEB_MLDBAC"], true /* isOptional */, (stdm_info? stdm_info.ins_discipline_key : null));
var mld_write = authparams && (authparams.PRSwritelevel < 9 && authparams.ALGwritelevel < 9);
var filt_params = { perslidKey: perslidKey,
funcKeys: func_keys };
var filtClause = getFiltClauseReferentie(filtercode, filt_params);
if (ikBenVerantwoordelijke || mld_write)
if (ikBenVerantwoordelijke || mld_read)
{ // Ik heb rechten om referenties op te halen.
var sql = "";
if ((kanverwijzen & 1) == 1)
@@ -112,7 +106,7 @@ if (ikBenVerantwoordelijke || mld_write)
+ " , mld_melding m"
+ " , mld_discipline md"
+ " , ins_srtdiscipline sd"
+ (!mld_write
+ (!mld_read
? " , mld_typeopdr t"
: "")
// Zoektekst op melding, vakgroep, uitvoerende of meldingnummer.
@@ -124,7 +118,7 @@ if (ikBenVerantwoordelijke || mld_write)
+ " AND m.mld_stdmelding_key = std.mld_stdmelding_key"
+ " AND TRUNC(o.mld_opdr_datumbegin, 'DD') >= SYSDATE - " + S("mld_reference_days")
+ filtClause.O
+ (!mld_write
+ (!mld_read
? " AND o.mld_typeopdr_key = t.mld_typeopdr_key"
+ " AND t.mld_typeopdr_zichtbaarfe = 1"
: "");

9
APPL/Shared/UploadForm_save.asp
View File

@@ -251,7 +251,16 @@ Public Function VB_savefile(regFilter, fullpath, doEncrypt)
Exit Function
End If
on error resume next
CreateFullPath(fullpath)
myErr = Err.Description
on error goto 0
If myErr <> "" Then
result.add "message", myErr
Set VB_savefile = result
Exit Function
End If
If doEncrypt = "1" Then ''Encrypting
Set oZip = Server.CreateObject("SLNKDWF.Zip")
oZip.New(fullpath & safefilename & ".encrypted")

1
UTILS/PutOrders/puo_connector.js
View File

@@ -91,6 +91,7 @@ function ConnectorCls()
{
if (!URLParts.protocol && this.url.indexOf("@") > 0)
{
this.url = "mailto:" + this.url;
URLParts.protocol = "mailto";
Log2File(1, "Configuration error: missing protocol in url. Assuming mailto:");
}