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

RABO#56531: NEN2767 meldingen.

Browse Source 
svn path=/Website/trunk/; revision=41165
This commit is contained in:
Maykel Geerdink
2019-02-26 10:28:26 +00:00
parent ae47788e81
commit 199eb34e9c
5 changed files with 19 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
APPL/MLD/mld_forward.asp
View File

@@ -229,6 +229,7 @@ FCLTHeader.Requires({ plugins: ["jQuery", "kenmerk"],
srtdisc_key: S("mld_forward_all") == 1? -1 : mld_melding.srtdisc,
urlAdd: urlAdd,
filtercode: this_mld.canForwardKeten? "VDK" : "VD",
cndfilter : S("cnd_gebreken_srtdisc_key") > 0, // De conditiemetingen vakgroeptype gebreken eruit filteren.
onChange: "onChangeVakgroep",
required: true
});
@@ -245,6 +246,7 @@ FCLTHeader.Requires({ plugins: ["jQuery", "kenmerk"],
srtdisc_key: (S("mld_forward_all") == 1? -1 : mld_melding.srtdisc),
urlAdd: urlAdd,
filtercode: this_mld.canForwardKeten? "VDK" : "",
cndfilter : S("cnd_gebreken_srtdisc_key") > 0, // De conditiemetingen vakgroeptype gebreken eruit filteren.
onChange: "onChangeStdMelding",
required: true
});

10
APPL/Shared/Suggest/SuggestDiscipline.asp
View File

@@ -41,6 +41,7 @@ var room_key = getQParamInt("roomkey", -1);
var extracode = getQParam("extracode", "");
var perslidKey = getQParamInt("perslidKey"); // Voor wie is de melding
var filtcode = getQParam("filtcode", "");
var cndfilter = getQParam("cndfilter", 0) == 1;
function getSql(chars, params, extracode)
{
@@ -59,10 +60,13 @@ function getSql(chars, params, extracode)
+ filtClause.from
+ extraInf.fromstr
+ " WHERE td.ins_srtdiscipline_key = sd.ins_srtdiscipline_key(+)" // Alleen bij MLD is de ins_srtdiscipline_key (altijd) ingevuld
+ " AND td.ins_discipline_verwijder IS NULL"
+ " AND (UPPER(sd.ins_srtdiscipline_prefix || '-' || " + lcl.xsql('td.ins_discipline_omschrijving', 'td.ins_discipline_key') +") LIKE " + safe.quoted_sql_wild2(chars)
+ " OR UPPER(" + lcl.xsql('sd.ins_srtdiscipline_omschrijving', 'sd.ins_srtdiscipline_key') + ") LIKE " + safe.quoted_sql_wild2(chars) +")"
+ " AND td.ins_discipline_verwijder IS NULL"
+ " AND (UPPER(sd.ins_srtdiscipline_prefix || '-' || " + lcl.xsql('td.ins_discipline_omschrijving', 'td.ins_discipline_key') +") LIKE " + safe.quoted_sql_wild2(chars)
+ " OR UPPER(" + lcl.xsql('sd.ins_srtdiscipline_omschrijving', 'sd.ins_srtdiscipline_key') + ") LIKE " + safe.quoted_sql_wild2(chars) +")"
+ filtClause.where
+ (cndfilter
? " AND sd.ins_srtdiscipline_key != " + S("cnd_gebreken_srtdisc_key")
: "")
+ extraInf.wherestr;
}

4
APPL/Shared/Suggest/SuggestStdmelding.asp
View File

@@ -38,6 +38,7 @@ var extracode = getQParam("extracode", "");
var perslidKey = getQParamInt("perslidKey", user_key); // Voor wie is de melding
var show_expired = (getQParamInt("show_expired", 0) == 1); // Vervallen stdmeldingen ook tonen
var filtcode = getQParam("filtcode", "");
var cndfilter = getQParam("cndfilter", 0) == 1;
chars = chars.replace(/\*/g,"%");
@@ -79,6 +80,9 @@ sql = "SELECT sm.mld_stdmelding_key"
+ " AND mld_stdmelding_verwijder is NULL"
+ " AND di.ins_srtdiscipline_key = sd.ins_srtdiscipline_key"
+ filtClause.where
+ (cndfilter
? " AND sd.ins_srtdiscipline_key != " + S("cnd_gebreken_srtdisc_key")
: "")
+ " ORDER BY sm.mld_stdmelding_volgnr, mld_stdmelding_omschrijving";
WriteResult2(sql, { bAll: bAll,

4
APPL/Shared/disciplineselector.inc
View File

@@ -17,6 +17,7 @@
autfunctionKey: verplicht fac_function_key
label: label dat voor het veld wordt weergegeven.
filtercode: extra filtercode voor de query die gebruikt wordt voor de suggest.
cndfilter: filter de conditie gebreken (srtdisc = xx(setting)) eruit.
onChange: onchange op het textveld.
trclass: wordt ook op de <tr> gezet.
autlevel: autorisatie niveau voor de query die gebruikt wordt voor de suggest.
@@ -122,7 +123,8 @@ function FCLTdisciplineselector(fieldName, objectName, params)
+ (params.srtdisc_key? "&srtdisc_key=" + params.srtdisc_key : "")
+ (params.ins_key? "&ins_key=" + params.ins_key : "")
+ (params.extracode? "&extracode=" + params.extracode : "")
+ (params.filtercode? "&filtcode=" + params.filtercode : "");
+ (params.filtercode? "&filtcode=" + params.filtercode : "")
+ (params.cndfilter? "&cndfilter=1" : "");
if (params.label && !params.dohide)
{ %>
<tr <%=params.trclass ? "class='"+params.trclass+"'" : ""%>><td class="label">

4
APPL/Shared/stdmeldingselector.inc
View File

@@ -13,6 +13,7 @@
perslidKey: Verplicht: persoon waarvoor melding is, Kan ook met urlAdd meegegeven worden. De waarden wordt dan uit een veld gehaald.
label: label dat voor het veld wordt weergegeven.
filtercode: extra filtercode voor de query die gebruikt wordt voor de suggest.
cndfilter: filter de conditie gebreken (srtdisc = xx(setting)) eruit.
ins_key: alleen als melding op dit object mogelijk is.
onChange: onchange op het textveld.
extraParamField: veldnaam voor een extra hidden parameter veld.
@@ -92,7 +93,8 @@ function FCLTstdmeldingselector(fieldName, objectName, params)
+ (params.srtdisc_key > 0? "&srtdisc_key=" + params.srtdisc_key : "")
+ (params.ins_key > 0? "&ins_key=" + params.ins_key : "")
+ (params.extracode? "&extracode=" + params.extracode : "")
+ (params.filtercode? "&filtcode=" + params.filtercode : "");
+ (params.filtercode? "&filtcode=" + params.filtercode : "")
+ (params.cndfilter? "&cndfilter=1" : "");
if (params.label)
{ %><tr>
<td class="label">