FCLT#54013: Module conditiemetingen implementeren in Facilitor.

svn path=/Database/trunk/; revision=39629
This commit is contained in:
Maykel Geerdink
2018-11-05 11:40:10 +00:00
parent db348143aa
commit a0322e2563
2 changed files with 93 additions and 25 deletions

View File

@@ -502,14 +502,14 @@ AS
addvarchartoclob (v_return);
END;
-- * createxmltagvalueattributes6
-- * createxmltagvalueattributes8
-- * function to return a complex XML node including up to 6 attributes
-- * use the NULL value in the attrnameX argument for empty attributes
-- * used for Kenmerk-nodes; if the fac_kenmerkdomein_key from p_kmdkey
-- * defines a fac_kenmerkdomein_xmlnode the corresponding subnode
-- * is added on the highest level only
-- * Per 5.4.3 empty nodes are skipped here too, unless the value is '#donotsuppress#'
PROCEDURE createxmltagvalueattributes6 (p_tag IN VARCHAR2,
PROCEDURE createxmltagvalueattributes8 (p_tag IN VARCHAR2,
p_attrname1 IN VARCHAR2,
p_attrvalue1 IN VARCHAR2,
p_attrname2 IN VARCHAR2,
@@ -522,6 +522,10 @@ AS
p_attrvalue5 IN VARCHAR2,
p_attrname6 IN VARCHAR2,
p_attrvalue6 IN VARCHAR2,
p_attrname7 IN VARCHAR2,
p_attrvalue7 IN VARCHAR2,
p_attrname8 IN VARCHAR2,
p_attrvalue8 IN VARCHAR2,
p_kmdkey IN VARCHAR2,
p_value IN VARCHAR2)
AS
@@ -608,6 +612,30 @@ AS
END IF;
END IF;
IF p_attrname7 IS NOT NULL AND p_attrvalue7 IS NOT NULL
THEN
v_return := v_return || ' ' || p_attrname7 || '=';
IF p_attrvalue7 IS NOT NULL
THEN
v_return := v_return || '"' || char_to_html (p_attrvalue7) || '"';
ELSE
v_return := v_return || '""';
END IF;
END IF;
IF p_attrname8 IS NOT NULL AND p_attrvalue8 IS NOT NULL
THEN
v_return := v_return || ' ' || p_attrname8 || '=';
IF p_attrvalue8 IS NOT NULL
THEN
v_return := v_return || '"' || char_to_html (p_attrvalue8) || '"';
ELSE
v_return := v_return || '""';
END IF;
END IF;
IF p_kmdkey IS NOT NULL
THEN
-- this domein-reference could be a xmlnode reference
@@ -681,7 +709,7 @@ AS
p_value IN VARCHAR2)
AS
BEGIN
createxmltagvalueattributes6 (p_tag,
createxmltagvalueattributes8 (p_tag,
p_attrname1,
p_attrvalue1,
p_attrname2,
@@ -694,6 +722,10 @@ AS
p_attrvalue5,
NULL,
NULL,
NULL,
NULL,
NULL,
NULL,
p_kmdkey,
p_value);
END;
@@ -3733,6 +3765,8 @@ AS
IS
SELECT DISTINCT
k.mld_kenmerk_key,
k.mld_kenmerk_code,
s.mld_srtkenmerk_code,
lcl.x ('mld_srtkenmerk_omschrijving', s.mld_srtkenmerk_key, mld_srtkenmerk_omschrijving) mld_srtkenmerk_omschrijving,
s.mld_srtkenmerk_kenmerktype,
s.mld_srtkenmerk_systeem,
@@ -3793,7 +3827,11 @@ AS
rec1.mld_srtkenmerk_nmin,
rec1.mld_srtkenmerk_nmax);
createxmltagvalueattributes6('kenmerk',
createxmltagvalueattributes8('kenmerk',
'kenmerkcode',
rec1.mld_kenmerk_code,
'srtkenmerkcode',
rec1.mld_srtkenmerk_code,
'naam',
rec1.mld_srtkenmerk_omschrijving,
'type',
@@ -3848,6 +3886,8 @@ AS
CURSOR c1
IS
SELECT k.mld_kenmerk_key,
k.mld_kenmerk_code,
s.mld_srtkenmerk_code,
lcl.x ('mld_srtkenmerk_omschrijving', s.mld_srtkenmerk_key, mld_srtkenmerk_omschrijving) mld_srtkenmerk_omschrijving,
s.mld_srtkenmerk_kenmerktype,
s.mld_srtkenmerk_systeem,
@@ -3895,21 +3935,25 @@ AS
rec1.mld_srtkenmerk_nmin,
rec1.mld_srtkenmerk_nmax);
createxmltagvalueattributes6 ('kenmerk',
'naam',
rec1.mld_srtkenmerk_omschrijving,
'type',
rec1.mld_srtkenmerk_kenmerktype,
'volgnummer',
rec1.volgnummer,
'key',
rec1.mld_kenmerk_key,
'dimensie',
rec1.dimensie,
'systeem',
rec1.mld_srtkenmerk_systeem,
rec1.fac_kenmerkdomein_key,
v_kenmerk_waarde);
createxmltagvalueattributes8 ('kenmerk',
'kenmerkcode',
rec1.mld_kenmerk_code,
'srtkenmerkcode',
rec1.mld_srtkenmerk_code,
'naam',
rec1.mld_srtkenmerk_omschrijving,
'type',
rec1.mld_srtkenmerk_kenmerktype,
'volgnummer',
rec1.volgnummer,
'key',
rec1.mld_kenmerk_key,
'dimensie',
rec1.dimensie,
'systeem',
rec1.mld_srtkenmerk_systeem,
rec1.fac_kenmerkdomein_key,
v_kenmerk_waarde);
END LOOP;
END;
@@ -4409,6 +4453,7 @@ AS
v_prs_kostensoort_key ins_tab_discipline.prs_kostensoort_key%TYPE;
v_ins_srtdiscipline_key ins_tab_discipline.ins_srtdiscipline_key%TYPE;
v_email ins_tab_discipline.ins_discipline_email%TYPE;
v_code ins_tab_discipline.ins_discipline_code%TYPE;
BEGIN
IF p_key IS NOT NULL
THEN
@@ -4422,13 +4467,15 @@ AS
ins_discipline_min_level,
prs_kostensoort_key,
ins_srtdiscipline_key,
ins_discipline_email
ins_discipline_email,
ins_discipline_code
INTO v_module,
v_omschrijving,
v_min_level,
v_prs_kostensoort_key,
v_ins_srtdiscipline_key,
v_email
v_email,
v_code
FROM ins_tab_discipline
WHERE ins_discipline_key = p_key;
@@ -4437,6 +4484,7 @@ AS
createxmltagvalue ('omschrijving', v_omschrijving);
createxmltagvalue ('min_level', v_min_level);
createxmltagvalue ('email', v_email);
createxmltagvalue ('code', v_code);
IF v_ins_srtdiscipline_key IS NOT NULL
THEN
@@ -4475,6 +4523,7 @@ AS
v_discipline_key mld_stdmelding.mld_ins_discipline_key%TYPE;
v_slabewaken mld_stdmelding.mld_stdmelding_slabewaken%TYPE;
v_image mld_stdmelding.mld_stdmelding_image%TYPE;
v_code mld_stdmelding.mld_stdmelding_code%TYPE;
BEGIN
IF p_key IS NOT NULL
THEN
@@ -4507,7 +4556,8 @@ AS
mld_stdmelding_groep,
mld_ins_discipline_key,
mld_stdmelding_slabewaken,
mld_stdmelding_image
mld_stdmelding_image,
mld_stdmelding_code
INTO v_omschrijving,
v_accepttijd_td,
v_accepttijd_e,
@@ -4526,7 +4576,8 @@ AS
v_groepoms,
v_discipline_key,
v_slabewaken,
v_image
v_image,
v_code,
FROM mld_stdmelding stdm, mld_stdmeldinggroep smg
WHERE stdm.mld_stdmeldinggroep_key = smg.mld_stdmeldinggroep_key(+)
AND mld_stdmelding_key = p_key;
@@ -4592,6 +4643,7 @@ AS
createxmltagvalue ('notfrontend', v_notfrontend);
createxmltagvalue ('slabewaken', v_slabewaken);
createxmltagvalue ('image', v_image);
createxmltagvalue ('code', v_code);
create_prs_kostensoort_node (v_prs_kostensoort_key);
createxmltagvalue ('verwijder', v_verwijder);
createclosetag ('stdmelding');
@@ -6702,7 +6754,7 @@ AS
rec1.bez_kenmerk_nmin,
rec1.bez_kenmerk_nmax);
createxmltagvalueattributes6 ('kenmerk',
createxmltagvalueattributes8 ('kenmerk',
'naam',
rec1.bez_kenmerk_omschrijving,
'type',
@@ -6715,6 +6767,10 @@ AS
rec1.dimensie,
'systeem',
rec1.bez_kenmerk_systeem,
NULL,
NULL,
NULL,
NULL,
rec1.fac_kenmerkdomein_key,
v_kenmerk_waarde);
END LOOP;

View File

@@ -497,6 +497,7 @@ DEFINE_SETTING('INS', 0001, 'WEB_PRSSYS', 'ins_explode_objects'
DEFINE_SETTING('INS', 0001, 'WEB_PRSSYS', 'ins_xcp_active_cost' , 'number' , '15' , 'Active cost fields used/shown {+1=kosten, +2=kosten2, +4=kosten3, +8=materiaal}')
DEFINE_SETTING('INS', 0001, 'WEB_PRSSYS', 'ins_auth_obj_lendout' , 'number' , '0' , 'Authorization scope for objects which are lent out for lending registration (INSFOF/fo) {0=owner(borrower) (default) | 1=basic place/owner}')
DEFINE_SETTING('INS', 0001, 'WEB_PRSSYS', 'ins_attach_obj_cntpers' , 'number' , '0' , 'Een object koppelen aan een contactpersoon {0=Alleen tijdens bezoek(default) | 1=Altijd}')
DEFINE_SETTING('INS', 0001, 'WEB_FACFAC', 'ins_score_enabled' , 'number' , '0' , 'Is conditie meting aanwezig {0 | 1}')
DEFINE_SETTING('INS', 0001, 'WEB_FACFAC', 'mjb_enabled' , 'number' , '0' , 'Is MJOB available {0 | 1}')
DEFINE_SETTING('INS', 0001, 'WEB_PRSSYS', 'mjb_inflation' , 'float' , '1' , 'Default inflation mjob')
DEFINE_SETTING('INS', 0001, 'WEB_PRSSYS', 'mjb_show_years' , 'number' , '5' , 'Default number of years which should be shown in the MJOB console')
@@ -504,7 +505,18 @@ DEFINE_SETTING('INS', 0001, 'WEB_PRSSYS', 'mjb_operation_external'
DEFINE_SETTING('INS', 0001, 'WEB_PRSSYS', 'mjb_start_year' , 'number' , EXTRACT(YEAR FROM SYSDATE) , 'Start/First year of freezing of MJOB')
DEFINE_SETTING('INS', 0001, 'WEB_PRSSYS', 'mjb_freeze_year' , 'number' , EXTRACT(YEAR FROM SYSDATE) , 'Freeze year of MJOB')
DEFINE_SETTING('INS', 0001, 'WEB_FACTAB', 'mjb_show_srt_with_tasks' , 'number' , '0' , 'Show the Columns "Object type", "Object group " and "Discipline" in the MJOB overview when grouping "Tasks" {0=No (default) | 1=Yes}')
DEFINE_SETTING('INS', 0001, 'WEB_FACFAC', 'ins_score_enabled' , 'number' , '0' , 'Is conditie meting aanwezig {0 | 1}')
DEFINE_SETTING('INS', 0001, 'WEB_FACTAB', 'cnd_gebreken_srtdisc_key' , 'number' , '-1' , 'Default key van de srtdiscipline waar de gebreken onder vallen')
DEFINE_SETTING('INS', 0001, 'WEB_FACTAB', 'cnd_geen_gebrek_stdmelding_key' , 'number' , '-1' , 'Default key van de standaardmelding die aangeeft dat er geen gebreken meer zijn')
DEFINE_SETTING('INS', 0001, 'WEB_FACTAB', 'cnd_srtkenmerk_key_ernst' , 'number' , '-1' , 'Default key van het srtkenmerk voor de ernst van het gebrek')
DEFINE_SETTING('INS', 0001, 'WEB_FACTAB', 'cnd_srtkenmerk_key_intensiteit' , 'number' , '-1' , 'Default key van het srtkenmerk voor de intensiteit van het gebrek')
DEFINE_SETTING('INS', 0001, 'WEB_FACTAB', 'cnd_srtkenmerk_key_omvang' , 'number' , '-1' , 'Default key van het srtkenmerk voor de omvang van het gebrek')
DEFINE_SETTING('INS', 0001, 'WEB_FACTAB', 'cnd_srtkenmerk_aspect1' , 'number' , '-1' , 'Default key van het srtkenmerk voor aspect 1 uit de aspecten prioriteit matrix')
DEFINE_SETTING('INS', 0001, 'WEB_FACTAB', 'cnd_srtkenmerk_aspect2' , 'number' , '-1' , 'Default key van het srtkenmerk voor aspect 2 uit de aspecten prioriteit matrix')
DEFINE_SETTING('INS', 0001, 'WEB_FACTAB', 'cnd_srtkenmerk_aspect3' , 'number' , '-1' , 'Default key van het srtkenmerk voor aspect 3 uit de aspecten prioriteit matrix')
DEFINE_SETTING('INS', 0001, 'WEB_FACTAB', 'cnd_srtkenmerk_aspect4' , 'number' , '-1' , 'Default key van het srtkenmerk voor aspect 4 uit de aspecten prioriteit matrix')
DEFINE_SETTING('INS', 0001, 'WEB_FACTAB', 'cnd_srtkenmerk_aspect5' , 'number' , '-1' , 'Default key van het srtkenmerk voor aspect 5 uit de aspecten prioriteit matrix')
DEFINE_SETTING('INS', 0001, 'WEB_FACTAB', 'cnd_srtkenmerk_aspect6' , 'number' , '-1' , 'Default key van het srtkenmerk voor aspect 6 uit de aspecten prioriteit matrix')
DEFINE_SETTING('INS', 0001, 'WEB_FACTAB', 'cnd_srtkenmerk_aspect7' , 'number' , '-1' , 'Default key van het srtkenmerk voor aspect 7 uit de aspecten prioriteit matrix')
DEFINE_SETTING('PRS', 0001, 'WEB_FACTAB', 'badgenum_kenmerk_key' , 'number' , '-1' , 'PRS_KENMERK_KEY of property badge number')
DEFINE_SETTING('QVW', 0001, 'WEB_FACFAC', 'qvw_enabled' , 'number' , '0' , 'Number of licensed Qlikview users {0 | n}')
DEFINE_SETTING('QVW', 0001, 'WEB_FACFAC', 'qvw_ajaxzfcpath' , 'string' , 'https://qv.facilitor.nl/QvAjaxZfc/', 'Root prefix to QlikView Analyzer Zero Footprint Client (must end with /)')