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

FMHN#65480: Disciplines bij Kennisbank.

Browse Source 
svn path=/Database/trunk/; revision=53643
This commit is contained in:
Maykel Geerdink
2021-11-10 10:56:43 +00:00
parent 827ebf1ed0
commit d603b7d60d
3 changed files with 16 additions and 14 deletions
Download Patch File Download Diff File Expand all files Collapse all files

24
FAC/FAC_PACF.SRC
View File

@@ -17945,7 +17945,7 @@ IS
v_fac_faq_lang VARCHAR2 (255); -- C3
v_fac_faq_hint VARCHAR2 (1000); -- C1000 (Voor import tot 1000 beperkt)
v_fac_faq_vervaldatum VARCHAR2 (255); -- DATE
v_fac_faq_discipline_omschrijving VARCHAR2 (255); -- N10
v_faq_discipline_omschrijving VARCHAR2 (255); -- N10
-- Overig:
v_ins_discipline_key2 VARCHAR2 (255); -- N10
v_mld_stdmelding_key2 VARCHAR2 (255); -- N10
@@ -17990,7 +17990,7 @@ BEGIN
fac.imp_getfield (v_newline, c_delim, v_fac_faq_lang);
fac.imp_getfield (v_newline, c_delim, v_fac_faq_hint);
fac.imp_getfield (v_newline, c_delim, v_fac_faq_vervaldatum);
fac.imp_getfield (v_newline, c_delim, v_fac_faq_discipline_omschrijving);
fac.imp_getfield (v_newline, c_delim, v_faq_discipline_omschrijving);
v_aanduiding := '['
|| SUBSTR (v_fac_faq_question, 1, 500)
@@ -18016,7 +18016,7 @@ BEGIN
AND UPPER (v_fac_faq_lang) = 'TAAL'
AND UPPER (v_fac_faq_hint) = 'HINT'
AND UPPER (v_fac_faq_vervaldatum) = 'VERVALDATUM'
AND UPPER (v_fac_faq_discipline_omschrijving) = 'CATALOGUSNAAM'
AND UPPER (v_faq_discipline_omschrijving) = 'CATALOGUSNAAM'
THEN
header_is_valid := 1;
END IF;
@@ -18217,17 +18217,17 @@ BEGIN
--
v_errormsg := 'Catalogusnaam (FAQ Discipline) ongeldig';
v_fac_faq_discipline_omschrijving := TRIM (v_fac_faq_discipline_omschrijving);
v_faq_discipline_omschrijving := TRIM (v_faq_discipline_omschrijving);
IF LENGTH (v_fac_faq_discipline_omschrijving) > 60
IF LENGTH (v_faq_discipline_omschrijving) > 60
THEN
v_fac_faq_discipline_omschrijving := SUBSTR (TRIM (v_fac_faq_discipline_omschrijving), 1, 60);
v_faq_discipline_omschrijving := SUBSTR (TRIM (v_faq_discipline_omschrijving), 1, 60);
fac.imp_writelog (
p_import_key,
'W',
v_aanduiding || v_errormsg,
'Catalogusnaam wordt afgebroken tot ['
|| v_fac_faq_discipline_omschrijving
|| v_faq_discipline_omschrijving
|| ']'
);
END IF;
@@ -18249,7 +18249,7 @@ BEGIN
fac_faq_lang,
fac_faq_hint,
fac_faq_vervaldatum,
fac_faq_discipline_omschrijving)
faq_discipline_omschrijving)
VALUES (v_fac_faq_question,
v_fac_faq_answer,
v_fac_faq_level,
@@ -18261,7 +18261,7 @@ BEGIN
v_fac_faq_lang,
v_fac_faq_hint,
v_fac_faq_datum_v,
v_fac_faq_discipline_omschrijving);
v_faq_discipline_omschrijving);
v_count_import := v_count_import + 1;
EXCEPTION
WHEN OTHERS
@@ -18377,7 +18377,7 @@ BEGIN
FROM ins_tab_discipline
WHERE ins_discipline_verwijder IS NULL
AND ins_discipline_module = 'FAQ'
AND UPPER(TRIM(ins_discipline_omschrijving)) = UPPER(TRIM(rec_faq.fac_faq_discipline_omschrijving));
AND UPPER(TRIM(ins_discipline_omschrijving)) = UPPER(TRIM(rec_faq.faq_discipline_omschrijving));
IF (v_count = 0)
THEN
@@ -18386,7 +18386,7 @@ BEGIN
ins_discipline_omschrijving
)
VALUES ('FAQ',
TRIM(rec_faq.fac_faq_discipline_omschrijving)
TRIM(rec_faq.faq_discipline_omschrijving)
)
RETURNING ins_discipline_key
INTO v_fac_faq_discipline_key;
@@ -18396,7 +18396,7 @@ BEGIN
FROM ins_tab_discipline
WHERE ins_discipline_verwijder IS NULL
AND ins_discipline_module = 'FAQ'
AND UPPER(TRIM(ins_discipline_omschrijving)) = UPPER(TRIM(rec_faq.fac_faq_discipline_omschrijving));
AND UPPER(TRIM(ins_discipline_omschrijving)) = UPPER(TRIM(rec_faq.faq_discipline_omschrijving));
END IF;
COMMIT;

2
FAC/FAC_TAB.SRC
View File

@@ -1956,7 +1956,7 @@ CREATE_TABLE(fac_imp_faq, 0) (
fac_faq_lang VARCHAR2 (3),
fac_faq_hint VARCHAR2 (1000),
fac_faq_vervaldatum DATE,
fac_faq_discipline_omschrijving VARCHAR2 (60)
faq_discipline_omschrijving VARCHAR2 (60)
);
-- FSN#25952: Generieke contractenimport

4
_UP/DB40to41.src
View File

@@ -309,7 +309,7 @@ ALTER TABLE faq_kenmerk ADD
CONSTRAINT faq_u_faq_kenmerk UNIQUE(faq_discipline_key, faq_kenmerk_omschrijving, faq_kenmerk_groep, faq_kenmerk_verwijder);
ALTER TABLE fac_imp_faq ADD
fac_faq_discipline_omschrijving
faq_discipline_omschrijving
VARCHAR2(60);
CREATE_VIEW(faq_discipline, 0)
@@ -329,6 +329,8 @@ UPDATE fac_functie
-- om aan te geven welke rechten men heeft voor betreffende autorisatie.
-- Dit moet uitgebreid worden voor elke discipline 1 record.
-- Nu is er bij de records geen ins_discipline_key ingevuld. Een record moet vervangen worden door een record voor elke discipline.
ALTER PACKAGE fac COMPILE; // anders (nog) invalid en lukt het volgende niet niet
ALTER PACKAGE fac COMPILE BODY;
DECLARE
CURSOR groeprechten IS
-- Welke groepen hebben de 'WEB_CTRUSE' rechten. Deze rechten moeten in de groep naar de nieuwe rechten 'WEB_CTRSEN' worden gekopieerd.