From 7386127aa8ab36be198963a4cbaace1dd6df91b6 Mon Sep 17 00:00:00 2001 From: Koen Reefman Date: Mon, 3 Jun 2024 09:45:23 +0000 Subject: [PATCH] WDKA#80394 kenmerksoort contraints mbt het kenmerktype verwijderd, tevens kenmerktype 'B' referenties verwijderd. svn path=/Database/trunk/; revision=64938 --- ALG/ALG_TAB.SRC | 1 - ALG/ALG_TRI.SRC | 8 ++++---- BES/BES_TAB.SRC | 3 +-- BES/BES_TRI.SRC | 10 +++++----- BEZ/BEZ_TAB.SRC | 2 -- CND/CND_PAC.SRC | 6 +++--- CNT/CNT_TAB.SRC | 3 +-- CNT/CNT_TRI.SRC | 8 ++++---- CNT/CNT_VIE.SRC | 4 +--- FAC/FAC_PACF.SRC | 22 +++++++++++----------- FAC/FAC_PACX.SRC | 6 +++--- FAC/FAC_TAB.SRC | 7 ++----- FAC/FAC_TRI.SRC | 8 ++++---- FAC/FAC_VIE.SRC | 6 +++--- FIN/FIN_TAB.SRC | 1 - FIN/FIN_TRI.SRC | 6 +++--- INS/INS_TAB.SRC | 3 +-- INS/INS_TRI.SRC | 10 +++++----- INS/INS_VIE.SRC | 2 +- MLD/MLD_TAB.SRC | 1 - MLD/MLD_TRI.SRC | 10 +++++----- MLD/MLD_VIE.SRC | 4 ++-- PRS/PRS_PAC.SRC | 4 ++-- PRS/PRS_TAB.SRC | 2 -- PRS/PRS_TRI.SRC | 8 ++++---- RES/RES_TAB.SRC | 3 +-- RES/RES_TRI.SRC | 10 +++++----- _UP/DB47to48.src | 28 ++++++++++++++++++++++------ 28 files changed, 93 insertions(+), 93 deletions(-) diff --git a/ALG/ALG_TAB.SRC b/ALG/ALG_TAB.SRC index e51ea41c..a726ae34 100644 --- a/ALG/ALG_TAB.SRC +++ b/ALG/ALG_TAB.SRC @@ -724,7 +724,6 @@ CREATE_TABLE(alg_kenmerk,0) VARCHAR2(10) ,alg_kenmerk_kenmerktype VARCHAR2(1) - CONSTRAINT alg_c_alg_kenmerk_type1 CHECK(alg_kenmerk_kenmerktype IN ('C','N','D','T','R','X','L','Q','F','M','E','S','l','B','V')) ,alg_kenmerk_systeem NUMBER(2) ,alg_kenmerk_toonbaar diff --git a/ALG/ALG_TRI.SRC b/ALG/ALG_TRI.SRC index 9429e497..f6dacf52 100644 --- a/ALG/ALG_TRI.SRC +++ b/ALG/ALG_TRI.SRC @@ -417,16 +417,16 @@ BEGIN THEN raise_application_error(-20000, 'ALG_M238'); END IF; - IF :new.alg_kenmerk_kenmerktype IN ('C', 'N', 'B') AND :new.alg_kenmerk_lengte IS NULL + IF :new.alg_kenmerk_kenmerktype IN ('C', 'N') AND :new.alg_kenmerk_lengte IS NULL THEN raise_application_error(-20000, 'ALG_C_ALG_KENMERK_LENGTE'); END IF; -- Numeriek mag niet te lang zijn (numeric overflow) - IF :new.alg_kenmerk_kenmerktype IN ('N', 'B') AND :new.alg_kenmerk_lengte > 20 + IF :new.alg_kenmerk_kenmerktype = 'N' AND :new.alg_kenmerk_lengte > 20 THEN :new.alg_kenmerk_lengte := 20; END IF; - IF :new.alg_kenmerk_kenmerktype IN ('N', 'B') AND :old.alg_kenmerk_key IS NOT NULL + IF :new.alg_kenmerk_kenmerktype = 'N' AND :old.alg_kenmerk_key IS NOT NULL THEN IF :old.alg_kenmerk_nmin <> :new.alg_kenmerk_nmin OR :old.alg_kenmerk_nmin IS NULL AND :new.alg_kenmerk_nmin IS NOT NULL @@ -581,7 +581,7 @@ BEGIN APPLICATION_ERROR_GOTO(-20004, 'ALG_M232,'|| KenmerkOmschr ||',' || TO_CHAR(KenmerkLengte)); END IF; - ELSIF KenmerkType IN ('N', 'B') + ELSIF KenmerkType = 'N' /* ** Number */ diff --git a/BES/BES_TAB.SRC b/BES/BES_TAB.SRC index c5d4968d..f3b5e9f8 100644 --- a/BES/BES_TAB.SRC +++ b/BES/BES_TAB.SRC @@ -564,7 +564,6 @@ CREATE_TABLE(bes_srtkenmerk, 0) , CONSTRAINT bes_c_bes_srtkenmerk_omschr CHECK(bes_srtkenmerk_omschrijving IS NOT NULL) , CONSTRAINT bes_srtkenmerk_omschrijving CHECK(bes_srtkenmerk_omschrijving IS NOT NULL) , CONSTRAINT bes_u_bes_srtkenmerk_upper UNIQUE(bes_srtkenmerk_upper, bes_srtkenmerk_verwijder) -, CONSTRAINT bes_c_bes_srtkenmerk_kenmtype CHECK(bes_srtkenmerk_kenmerktype IN ('C','N','D','T','R','X','L','Q','F','M','E','S','l','B','V')) , CONSTRAINT bes_c_bes_srtkenmerk_lengte CHECK(bes_srtkenmerk_lengte >= 1 AND bes_srtkenmerk_lengte <= 4000) , CONSTRAINT bes_c_bes_srtkenmerk_max_min CHECK(bes_srtkenmerk_nmax >= bes_srtkenmerk_nmin) @@ -584,7 +583,7 @@ CREATE_TABLE(bes_kenmerk, 0) , bes_kenmerk_type VARCHAR2(1) CONSTRAINT bes_c_ins_kenmerk_type CHECK - (bes_kenmerk_type is not null and (bes_kenmerk_type IN( 'B', 'I'))) + (bes_kenmerk_type IS NOT NULL AND bes_kenmerk_type IN ('B', 'I'))) , bes_kenmerk_niveau VARCHAR2(1) CONSTRAINT bes_c_ins_kenmerk_niveau2 CHECK diff --git a/BES/BES_TRI.SRC b/BES/BES_TRI.SRC index 9ceb955b..edcbc165 100644 --- a/BES/BES_TRI.SRC +++ b/BES/BES_TRI.SRC @@ -252,17 +252,17 @@ BEGIN raise_application_error(-20000, 'bes_C_bes_SRTKENMERK_SYSTEEM'); END IF; - IF :NEW.bes_srtkenmerk_kenmerktype IN ('C', 'N', 'B') AND :NEW.bes_srtkenmerk_lengte IS NULL + IF :NEW.bes_srtkenmerk_kenmerktype IN ('C', 'N') AND :NEW.bes_srtkenmerk_lengte IS NULL THEN raise_application_error(-20000, 'bes_C_bes_SRTKENMERK_LENGTE'); END IF; -- Numeriek mag niet te lang zijn (numeric overflow) - IF :new.bes_srtkenmerk_kenmerktype IN ('N', 'B') AND :new.bes_srtkenmerk_lengte > 20 + IF :new.bes_srtkenmerk_kenmerktype = 'N' AND :new.bes_srtkenmerk_lengte > 20 THEN :new.bes_srtkenmerk_lengte := 20; END IF; - IF :NEW.bes_srtkenmerk_kenmerktype IN ('N', 'B') AND :OLD.bes_srtkenmerk_key IS NOT NULL + IF :NEW.bes_srtkenmerk_kenmerktype = 'N' AND :OLD.bes_srtkenmerk_key IS NOT NULL THEN IF :OLD.bes_srtkenmerk_nmin <> :NEW.bes_srtkenmerk_nmin OR (:OLD.bes_srtkenmerk_nmin IS NULL AND :NEW.bes_srtkenmerk_nmin IS NOT NULL) @@ -400,7 +400,7 @@ BEGIN THEN APPLICATION_ERROR_GOTO(-20004, 'bes_m241,' || srtkenmerkomschr || ',' || TO_CHAR (srtkenmerklengte)); END IF; - ELSIF srtkenmerktype IN ('N', 'B') + ELSIF srtkenmerktype = 'N' THEN -- NUMBER -- Controleer of er een numerieke waarde ingevuld is. @@ -515,7 +515,7 @@ BEGIN THEN APPLICATION_ERROR_GOTO(-20004, 'bes_m241,' || srtkenmerkomschr || ',' || TO_CHAR (srtkenmerklengte)); END IF; - ELSIF srtkenmerktype IN ('N', 'B') + ELSIF srtkenmerktype = 'N' THEN -- NUMBER -- Controleer of er een numerieke waarde ingevuld is. diff --git a/BEZ/BEZ_TAB.SRC b/BEZ/BEZ_TAB.SRC index f818f7d1..d3e4641a 100644 --- a/BEZ/BEZ_TAB.SRC +++ b/BEZ/BEZ_TAB.SRC @@ -177,8 +177,6 @@ CREATE_TABLE(bez_kenmerk,0) VARCHAR2(10) ,bez_kenmerk_kenmerktype VARCHAR2(1) - CONSTRAINT bez_c_bez_kenmerk_type2 CHECK - (bez_kenmerk_kenmerktype IN ('C','N','D','T','R','X','L','Q','F','M','E','S','l','B','V')) ,bez_kenmerk_systeem -- &1 = systeemkm, &8 = anonimiseren NUMBER(2) DEFAULT 0 NOT NULL diff --git a/CND/CND_PAC.SRC b/CND/CND_PAC.SRC index 1cec1d71..4144cd91 100644 --- a/CND/CND_PAC.SRC +++ b/CND/CND_PAC.SRC @@ -1810,13 +1810,13 @@ AS INTO v_srtkenmerk_key FROM mld_srtkenmerk -- ins_v_aanwezigsrtkenmerk WHERE mld_srtkenmerk_upper = UPPER (v_kw) - AND mld_srtkenmerk_kenmerktype IN ('C', 'D', 'N', 'R', 'S', 'X', 'B', 'V'); + AND mld_srtkenmerk_kenmerktype IN ('C', 'D', 'N', 'R', 'S', 'X', 'V'); ELSE -- kenmerkwaarde is numeriek (dus key)! SELECT mld_srtkenmerk_key INTO v_srtkenmerk_key FROM mld_srtkenmerk -- ins_v_aanwezigsrtkenmerk WHERE mld_srtkenmerk_key = fac.safe_to_number (v_kw) - AND mld_srtkenmerk_kenmerktype IN ('C', 'D', 'N', 'R', 'S', 'X', 'B', 'V'); + AND mld_srtkenmerk_kenmerktype IN ('C', 'D', 'N', 'R', 'S', 'X', 'V'); END IF; RETURN TO_CHAR(v_srtkenmerk_key) || '|' || TO_CHAR(v_kenmerk_groep); @@ -3275,7 +3275,7 @@ BEGIN IF fac.getsetting('cnd_autoaccept') = 1 THEN mld.setmeldingstatus(v_mld_melding_key, 4, v_prs_perslid_key, 0); - -- berekening per gebrek is in principe te vaak, + -- berekening per gebrek is in principe te vaak, -- dat mag per deel, maar dit is nu eenmaal de loop cnd.process_mjb_score_effects (v_mld_melding_key); END IF; diff --git a/CNT/CNT_TAB.SRC b/CNT/CNT_TAB.SRC index a417dde1..8a6f893d 100644 --- a/CNT/CNT_TAB.SRC +++ b/CNT/CNT_TAB.SRC @@ -189,7 +189,7 @@ CREATE_TABLE(cnt_contract,0) NUMBER(1) DEFAULT 2 CONSTRAINT cnt_r_cnt_contract_verlenging CHECK(cnt_contract_verlenging IN (0,1,2,3,4,5,6,7)) -, cnt_contract_verleng_termijn +, cnt_contract_verleng_termijn NUMBER(10) CONSTRAINT cnt_r_cnt_termijn_key5 REFERENCES cnt_termijn(cnt_termijn_key) , cnt_contract_approved @@ -328,7 +328,6 @@ CREATE_TABLE(cnt_srtkenmerk, 0) , CONSTRAINT cnt_c_cnt_srtkenmerk_omschr CHECK(cnt_srtkenmerk_omschrijving IS NOT NULL) , CONSTRAINT cnt_srtkenmerk_omschrijving CHECK(cnt_srtkenmerk_omschrijving IS NOT NULL) , CONSTRAINT cnt_u_cnt_srtkenmerk_upper UNIQUE(cnt_srtkenmerk_upper, cnt_srtkenmerk_verwijder) -, CONSTRAINT cnt_c_cnt_srtkenmerk_kenmtype CHECK(cnt_srtkenmerk_kenmerktype IN ('C','N','D','T','R','X','L','Q','F','M','E','S','l','B','V')) , CONSTRAINT cnt_c_cnt_srtkenmerk_systeem CHECK(cnt_srtkenmerk_systeem IS NULL OR cnt_srtkenmerk_systeem = 1) , CONSTRAINT cnt_c_cnt_srtkenmerk_lengte CHECK(cnt_srtkenmerk_lengte >= 1 diff --git a/CNT/CNT_TRI.SRC b/CNT/CNT_TRI.SRC index d54f8bdf..1d929080 100644 --- a/CNT/CNT_TRI.SRC +++ b/CNT/CNT_TRI.SRC @@ -143,18 +143,18 @@ BEGIN raise_application_error(-20000, 'CNT_C_CNT_SRTKENMERK_SYSTEEM'); END IF; -- - IF :new.cnt_srtkenmerk_kenmerktype IN ('C', 'N', 'B') AND :new.cnt_srtkenmerk_lengte IS NULL + IF :new.cnt_srtkenmerk_kenmerktype IN ('C', 'N') AND :new.cnt_srtkenmerk_lengte IS NULL THEN raise_application_error(-20000, 'CNT_C_CNT_SRTKENMERK_LENGTE'); END IF; -- Numeriek mag niet te lang zijn (numeric overflow) - IF :new.cnt_srtkenmerk_kenmerktype IN ('N', 'B') + IF :new.cnt_srtkenmerk_kenmerktype = 'N' AND :new.cnt_srtkenmerk_lengte > 20 THEN :new.cnt_srtkenmerk_lengte := 20; END IF; -- - IF :new.cnt_srtkenmerk_kenmerktype IN ('N', 'B') + IF :new.cnt_srtkenmerk_kenmerktype = 'N' AND :old.cnt_srtkenmerk_key IS NOT NULL THEN IF :old.cnt_srtkenmerk_nmin <> :new.cnt_srtkenmerk_nmin @@ -280,7 +280,7 @@ BEGIN THEN APPLICATION_ERROR_GOTO(-20004, 'cnt_m241,'||SrtKenmerkOmschr||','||TO_CHAR(SrtKenmerkLengte)); END IF; - ELSIF SrtKenmerkType IN ('N', 'B') + ELSIF SrtKenmerkType = 'N' THEN -- NUMBER -- Controleer of er een numerieke waarde ingevuld is. diff --git a/CNT/CNT_VIE.SRC b/CNT/CNT_VIE.SRC index 45fc615b..921f320d 100644 --- a/CNT/CNT_VIE.SRC +++ b/CNT/CNT_VIE.SRC @@ -137,8 +137,7 @@ AS 'N', 'R', 'S', - 'X', - 'B') + 'X') AND EXISTS (SELECT 1 FROM cnt_kenmerk k @@ -780,7 +779,6 @@ AS waarde_c, CASE WHEN skm.cnt_srtkenmerk_kenmerktype = 'N' - OR skm.cnt_srtkenmerk_kenmerktype = 'B' THEN TO_NUMBER (km.cnt_kenmerkcontract_waarde) ELSE diff --git a/FAC/FAC_PACF.SRC b/FAC/FAC_PACF.SRC index ae0680d7..c846ffa2 100644 --- a/FAC/FAC_PACF.SRC +++ b/FAC/FAC_PACF.SRC @@ -142,7 +142,7 @@ CREATE OR REPLACE PROCEDURE fac_import_genericcsv ( IS BEGIN -- Het import csv-bestand wordt nu ingelezen met /imp/imp_inlezen.asp (en imp/imp_shared.js). - -- Van daaruit worden de gegevens in de tabel fac_imp_csv gezet. + -- Van daaruit worden de gegevens in de tabel fac_imp_csv gezet. -- fac_import_file2csv(p_import_key); NULL; END; @@ -1921,7 +1921,7 @@ AS WHERE alg_kenmerk_verwijder IS NULL AND alg_kenmerk_niveau IN ('L', 'G') AND alg_kenmerk_upper = UPPER (ok) - AND alg_kenmerk_kenmerktype IN ('C', 'D', 'N', 'R', 'S', 'X', 'B', 'V'); + AND alg_kenmerk_kenmerktype IN ('C', 'D', 'N', 'R', 'S', 'X', 'V'); ELSE -- Kenmerkwaarde is numeriek (dus key)! SELECT alg_kenmerk_key INTO v_kenmerk_key @@ -1929,7 +1929,7 @@ AS WHERE alg_kenmerk_verwijder IS NULL AND alg_kenmerk_niveau IN ('L', 'G') AND alg_kenmerk_key = fac.safe_to_number (ok) - AND alg_kenmerk_kenmerktype IN ('C', 'D', 'N', 'R', 'S', 'X', 'B', 'V'); + AND alg_kenmerk_kenmerktype IN ('C', 'D', 'N', 'R', 'S', 'X', 'V'); END IF; RETURN v_kenmerk_key; @@ -3385,7 +3385,7 @@ AS WHERE alg_kenmerk_upper = UPPER (kw) AND alg_kenmerk_verwijder IS NULL AND alg_kenmerk_niveau = 'R' - AND alg_kenmerk_kenmerktype IN ('C', 'D', 'N', 'R', 'S', 'X', 'B', 'V'); + AND alg_kenmerk_kenmerktype IN ('C', 'D', 'N', 'R', 'S', 'X', 'V'); ELSE -- kenmerkwaarde is numeriek (dus key)! SELECT alg_kenmerk_key INTO v_kenmerk_key @@ -3393,7 +3393,7 @@ AS WHERE alg_kenmerk_key = fac.safe_to_number (kw) AND alg_kenmerk_verwijder IS NULL AND alg_kenmerk_niveau = 'R' - AND alg_kenmerk_kenmerktype IN ('C', 'D', 'N', 'R', 'S', 'X', 'B', 'V'); + AND alg_kenmerk_kenmerktype IN ('C', 'D', 'N', 'R', 'S', 'X', 'V'); END IF; RETURN v_kenmerk_key; @@ -8585,7 +8585,7 @@ IS WHERE k.ins_srtkenmerk_key = sk.ins_srtkenmerk_key AND k.ins_kenmerk_groep = v_kenmerk_groep AND COALESCE(UPPER(k.ins_kenmerk_omschrijving), sk.ins_srtkenmerk_upper) = UPPER(v_kw) - AND sk.ins_srtkenmerk_kenmerktype IN ('C', 'D', 'N', 'R', 'S', 'X', 'B', 'V'); + AND sk.ins_srtkenmerk_kenmerktype IN ('C', 'D', 'N', 'R', 'S', 'X', 'V'); ELSE -- kenmerkwaarde is numeriek (dus key)! SELECT k.ins_kenmerk_key INTO v_kenmerk_key @@ -8594,7 +8594,7 @@ IS WHERE k.ins_srtkenmerk_key = sk.ins_srtkenmerk_key AND k.ins_kenmerk_groep = v_kenmerk_groep AND k.ins_kenmerk_key = fac.safe_to_number (v_kw) - AND sk.ins_srtkenmerk_kenmerktype IN ('C', 'D', 'N', 'R', 'S', 'X', 'B', 'V'); + AND sk.ins_srtkenmerk_kenmerktype IN ('C', 'D', 'N', 'R', 'S', 'X', 'V'); END IF; IF v_kenmerk_key IS NULL @@ -9882,7 +9882,7 @@ AS OR (k.ins_srtinstallatie_key = sg.ins_discipline_key AND k.ins_kenmerk_niveau = 'D')) AND COALESCE(UPPER(k.ins_kenmerk_omschrijving), sk.ins_srtkenmerk_upper) = UPPER(v_kenmerk) - AND sk.ins_srtkenmerk_kenmerktype IN ('C', 'D', 'N', 'R', 'S', 'X', 'B', 'V') + AND sk.ins_srtkenmerk_kenmerktype IN ('C', 'D', 'N', 'R', 'S', 'X', 'V') ORDER BY k.ins_kenmerk_volgnummer) WHERE ROWNUM = 1; ELSE @@ -9897,7 +9897,7 @@ AS WHERE k.ins_srtkenmerk_key = sk.ins_srtkenmerk_key AND k.ins_kenmerk_groep = v_groep AND k.ins_kenmerk_key = v_kenmerk - AND sk.ins_srtkenmerk_kenmerktype IN ('C', 'D', 'N', 'R', 'S', 'X', 'B', 'V') + AND sk.ins_srtkenmerk_kenmerktype IN ('C', 'D', 'N', 'R', 'S', 'X', 'V') ORDER BY k.ins_kenmerk_volgnummer; END IF; @@ -20248,7 +20248,7 @@ AS WHERE k.cnt_srtkenmerk_key = sk.cnt_srtkenmerk_key AND k.cnt_kenmerk_groep = v_kenmerk_groep AND COALESCE(UPPER(k.cnt_kenmerk_omschrijving), sk.cnt_srtkenmerk_upper) = UPPER(v_kw) - AND sk.cnt_srtkenmerk_kenmerktype IN ('C', 'D', 'N', 'R', 'S', 'X', 'B', 'V') + AND sk.cnt_srtkenmerk_kenmerktype IN ('C', 'D', 'N', 'R', 'S', 'X', 'V') AND k.cnt_kenmerk_verwijder IS NULL AND sk.cnt_srtkenmerk_verwijder IS NULL; ELSE -- kenmerkwaarde is numeriek (dus key)! @@ -20259,7 +20259,7 @@ AS WHERE k.cnt_srtkenmerk_key = sk.cnt_srtkenmerk_key AND k.cnt_kenmerk_groep = v_kenmerk_groep AND k.cnt_kenmerk_key = fac.safe_to_number (v_kw) - AND sk.cnt_srtkenmerk_kenmerktype IN ('C', 'D', 'N', 'R', 'S', 'X', 'B', 'V') + AND sk.cnt_srtkenmerk_kenmerktype IN ('C', 'D', 'N', 'R', 'S', 'X', 'V') AND k.cnt_kenmerk_verwijder IS NULL AND sk.cnt_srtkenmerk_verwijder IS NULL; END IF; diff --git a/FAC/FAC_PACX.SRC b/FAC/FAC_PACX.SRC index 9aeee5df..470d7841 100644 --- a/FAC/FAC_PACX.SRC +++ b/FAC/FAC_PACX.SRC @@ -922,13 +922,13 @@ AS IF (p_kenmerk_type = 'R' OR p_kenmerk_type = 'S') THEN RETURN flx.getdomeinwaarde (p_kenmerkdomein_key, p_kenmerk_waarde, CASE WHEN xmlnode_depth = 0 THEN 1 ELSE 0 END); - ELSIF ( p_kenmerk_type = 'B' + ELSIF ( p_kenmerk_type = 'N' AND srtkenmerk_nmin = 0 AND srtkenmerk_nmax = 1 AND p_kenmerk_waarde = 0) THEN RETURN lcl.L ('lcl_check_xml_0'); - ELSIF ( p_kenmerk_type = 'B' + ELSIF ( p_kenmerk_type = 'N' AND srtkenmerk_nmin = 0 AND srtkenmerk_nmax = 1 AND p_kenmerk_waarde = 1) @@ -8885,7 +8885,7 @@ AS createopentag ('rsv_artikel'); SELECT ra.res_artikel_key, - ra.res_rsv_artikel_omschrijving, + ra.res_rsv_artikel_omschrijving, raa.res_artikel_omschrijving, res_rsv_artikel_aantal, res_rsv_artikel_levering, diff --git a/FAC/FAC_TAB.SRC b/FAC/FAC_TAB.SRC index 387b750a..9c26d6aa 100644 --- a/FAC/FAC_TAB.SRC +++ b/FAC/FAC_TAB.SRC @@ -1835,8 +1835,7 @@ CREATE_TABLE (fac_kenmwaarden, 0) fac_kenmwaarden_exprwaarde VARCHAR2 (4000), fac_kenmwaarden_kenmerktype - VARCHAR2(1) - CONSTRAINT fac_c_fac_kenmwaarden_kenmtype CHECK(fac_kenmwaarden_kenmerktype IN ('C','N','D','T','R','S','X','F','E','M','L','l','b','Q','B','V')), + VARCHAR2(1), fac_kenmwaarden_kenmerklen NUMBER(4), fac_kenmwaarden_kenmerkdec @@ -2294,9 +2293,7 @@ CREATE_TABLE(faq_kenmerk,0) faq_kenmerk_default VARCHAR2(4000), faq_kenmerk_show_expr VARCHAR2(4000), faq_kenmerk_dimensie VARCHAR2(10), - faq_kenmerk_kenmerktype VARCHAR2(1) - CONSTRAINT faq_c_faq_kenmerk_type1 - CHECK(faq_kenmerk_kenmerktype IN ('C','N','D','T','R','X','L','Q','F','M','E','S','l','B','V')), + faq_kenmerk_kenmerktype VARCHAR2(1), faq_kenmerk_systeem NUMBER(2), faq_kenmerk_toonbaar NUMBER(1), faq_kenmerk_inlijst NUMBER(1) DEFAULT 0 NOT NULL, diff --git a/FAC/FAC_TRI.SRC b/FAC/FAC_TRI.SRC index 2a6569f3..fc289052 100644 --- a/FAC/FAC_TRI.SRC +++ b/FAC/FAC_TRI.SRC @@ -851,7 +851,7 @@ BEGIN APPLICATION_ERROR_GOTO(-20004, 'faq_m232,'|| KenmerkOmschr ||',' || TO_CHAR(KenmerkLengte)); END IF; - ELSIF KenmerkType IN ('N', 'B') + ELSIF KenmerkType 'N' /* ** Number */ @@ -937,15 +937,15 @@ BEGIN THEN raise_application_error(-20000, 'faq_m238'); END IF; - IF :new.faq_kenmerk_kenmerktype IN ('C','N', 'B') AND :new.faq_kenmerk_lengte IS NULL + IF :new.faq_kenmerk_kenmerktype IN ('C','N') AND :new.faq_kenmerk_lengte IS NULL THEN raise_application_error(-20000, 'FAQ_C_FAQ_KENMERK_LENGTE'); END IF; - IF :new.faq_kenmerk_kenmerktype IN ('N', 'B') AND :new.faq_kenmerk_lengte > 20 + IF :new.faq_kenmerk_kenmerktype = 'N' AND :new.faq_kenmerk_lengte > 20 THEN :new.faq_kenmerk_lengte := 20; END IF; - IF :new.faq_kenmerk_kenmerktype IN ('N', 'B') AND :old.faq_kenmerk_key IS NOT NULL + IF :new.faq_kenmerk_kenmerktype = 'N' AND :old.faq_kenmerk_key IS NOT NULL THEN IF :old.faq_kenmerk_nmin <> :new.faq_kenmerk_nmin OR :old.faq_kenmerk_nmin IS NULL AND :new.faq_kenmerk_nmin IS NOT NULL diff --git a/FAC/FAC_VIE.SRC b/FAC/FAC_VIE.SRC index 0412df37..8bb98546 100644 --- a/FAC/FAC_VIE.SRC +++ b/FAC/FAC_VIE.SRC @@ -791,7 +791,7 @@ AS -- (bestel)opdrachten UNION ALL -- reserveringen, res_rsv_ruimte_key komt in extrakey SELECT b.prs_bedrijf_key, l.alg_locatie_key, 'reservering', rrr.res_rsv_ruimte_key, rrr.res_reservering_key || '/' || rrr.res_rsv_ruimte_volgnr, NULL sender, NULL teverzenden_datum - FROM prs_bedrijf b, res_rsv_ruimte rrr, alg_locatie l, alg_v_ruimte_gegevens_all ruimte_geg + FROM prs_bedrijf b, res_rsv_ruimte rrr, alg_locatie l, alg_v_ruimte_gegevens_all ruimte_geg , (SELECT res_ruimte_opstel_key, rr.res_ruimte_nr res_ruimte_nr , rr.res_ruimte_key , MIN (alg_ruimte_key) alg_ruimte_key @@ -833,7 +833,7 @@ SELECT op.*, WHERE op.mld_melding_key = pk.mld_melding_key) prijs FROM (SELECT m.mld_melding_key, MIN (s.mld_statuses_omschrijving) mld_statuses_omschrijving, MIN (std.mld_stdmelding_omschrijving) mld_stdmelding_omschrijving, - MIN (TO_CHAR (SUBSTR (mld_melding_omschrijving, 0, 4000))) mld_melding_omschrijving, + MIN (TO_CHAR (SUBSTR (mld_melding_omschrijving, 0, 4000))) mld_melding_omschrijving, MIN (m.mld_melding_datum) mld_melding_datum, MIN (l.alg_locatie_code) alg_locatie_code, MIN (v.alg_gebouw_key) alg_gebouw_key, MIN (v.alg_gebouw_naam) alg_gebouw_naam, @@ -2685,7 +2685,7 @@ AS END waarde_c, CASE - WHEN km.faq_kenmerk_kenmerktype IN ('N', 'B') + WHEN km.faq_kenmerk_kenmerktype = 'N' THEN TO_NUMBER (kw.faq_kenmerkwaarde_waarde) ELSE diff --git a/FIN/FIN_TAB.SRC b/FIN/FIN_TAB.SRC index a008e7b8..86ed7ad4 100644 --- a/FIN/FIN_TAB.SRC +++ b/FIN/FIN_TAB.SRC @@ -209,7 +209,6 @@ CREATE_TABLE(fin_kenmerk,0) VARCHAR2(10) ,fin_kenmerk_kenmerktype VARCHAR2(1) - CONSTRAINT fin_c_fin_kenmerk_type1 CHECK(fin_kenmerk_kenmerktype IN ('C','N','D','T','R','X','L','Q','F','M','E','S','l','B','V')) ,fin_kenmerk_systeem NUMBER(2) ,fin_kenmerk_toonbaar diff --git a/FIN/FIN_TRI.SRC b/FIN/FIN_TRI.SRC index 1e4187fc..9ce8a30b 100644 --- a/FIN/FIN_TRI.SRC +++ b/FIN/FIN_TRI.SRC @@ -84,7 +84,7 @@ BEGIN APPLICATION_ERROR_GOTO(-20004, 'fin_M232,'|| KenmerkOmschr ||',' || TO_CHAR(KenmerkLengte)); END IF; - ELSIF KenmerkType IN ('N', 'B') + ELSIF KenmerkType = 'N' /* ** Number */ @@ -304,12 +304,12 @@ BEGIN THEN raise_application_error(-20000, 'fin_M238'); END IF; - IF :new.fin_kenmerk_kenmerktype IN ('C','N', 'B') AND :new.fin_kenmerk_lengte IS NULL + IF :new.fin_kenmerk_kenmerktype IN ('C','N') AND :new.fin_kenmerk_lengte IS NULL THEN raise_application_error(-20000, 'fin_C_fin_KENMERK_LENGTE'); END IF; -- Numeriek mag niet te lang zijn (numeric overflow) - IF :new.fin_kenmerk_kenmerktype IN ('N', 'B') AND :new.fin_kenmerk_lengte > 20 + IF :new.fin_kenmerk_kenmerktype = 'N' AND :new.fin_kenmerk_lengte > 20 THEN :new.fin_kenmerk_lengte := 20; END IF; diff --git a/INS/INS_TAB.SRC b/INS/INS_TAB.SRC index a6af068e..6628c4bf 100644 --- a/INS/INS_TAB.SRC +++ b/INS/INS_TAB.SRC @@ -773,8 +773,7 @@ CREATE_TABLE(ins_srtkenmerk, 0) ins_srtkenmerk_dimensie VARCHAR2(10), ins_srtkenmerk_kenmerktype - VARCHAR2(1) - CONSTRAINT ins_c_ins_srtkenmerk_kenmtype CHECK(ins_srtkenmerk_kenmerktype IN ('C','N','D','T','R','X','L','Q','F','M','E','S','l','B','V')), + VARCHAR2(1), ins_srtkenmerk_systeem -- &1 = systeemkm, &2 = primary, show in list NUMBER(2) DEFAULT 0 NOT NULL, diff --git a/INS/INS_TRI.SRC b/INS/INS_TRI.SRC index dac45cd5..3c7898bc 100644 --- a/INS/INS_TRI.SRC +++ b/INS/INS_TRI.SRC @@ -802,17 +802,17 @@ BEGIN raise_application_error(-20000, 'INS_M156'); END IF; - IF :new.ins_srtkenmerk_kenmerktype IN ('C', 'N', 'B') AND :new.ins_srtkenmerk_lengte IS NULL + IF :new.ins_srtkenmerk_kenmerktype IN ('C', 'N') AND :new.ins_srtkenmerk_lengte IS NULL THEN raise_application_error(-20000, 'INS_C_INS_SRTKENMERK_LENGTE'); END IF; -- Numeriek mag niet te lang zijn (numeric overflow) - IF :new.ins_srtkenmerk_kenmerktype IN ('N', 'B') AND :new.ins_srtkenmerk_lengte > 20 + IF :new.ins_srtkenmerk_kenmerktype = 'N' AND :new.ins_srtkenmerk_lengte > 20 THEN :new.ins_srtkenmerk_lengte := 20; END IF; - IF :new.ins_srtkenmerk_kenmerktype IN ('N', 'B') AND :old.ins_srtkenmerk_key IS NOT NULL + IF :new.ins_srtkenmerk_kenmerktype = 'N' AND :old.ins_srtkenmerk_key IS NOT NULL THEN IF :old.ins_srtkenmerk_nmin <> :new.ins_srtkenmerk_nmin OR (:old.ins_srtkenmerk_nmin IS NULL AND :new.ins_srtkenmerk_nmin IS NOT NULL) @@ -928,7 +928,7 @@ BEGIN THEN APPLICATION_ERROR_GOTO(-20004, 'ins_m143,'||SrtKenmerkOmschr||','||TO_CHAR(SrtKenmerkLengte)); END IF; - ELSIF SrtKenmerkType IN ('N', 'B') /* Number */ + ELSIF SrtKenmerkType = 'N' /* Number */ THEN /* Controleer of er een numerieke waarde ingevuld is */ IF SrtKenmerkDec IS NULL OR SrtKenmerkDec = 0 @@ -1037,7 +1037,7 @@ BEGIN THEN APPLICATION_ERROR_GOTO(-20004, 'ins_m143,'||SrtKenmerkOmschr||','||TO_CHAR(SrtKenmerkLengte)); END IF; - ELSIF SrtKenmerkType IN ('N', 'B') /* Number */ + ELSIF SrtKenmerkType = 'N' /* Number */ THEN /* Controleer of er een numerieke waarde ingevuld is */ IF SrtKenmerkDec IS NULL OR SrtKenmerkDec = 0 diff --git a/INS/INS_VIE.SRC b/INS/INS_VIE.SRC index 54cb403b..628207a5 100644 --- a/INS/INS_VIE.SRC +++ b/INS/INS_VIE.SRC @@ -2164,7 +2164,7 @@ AS END waarde_c, CASE - WHEN skm.ins_srtkenmerk_kenmerktype = 'N' OR skm.ins_srtkenmerk_kenmerktype = 'B' + WHEN skm.ins_srtkenmerk_kenmerktype = 'N' THEN TO_NUMBER (km.ins_kenmerkdeel_waarde) ELSE TO_NUMBER (NULL) END diff --git a/MLD/MLD_TAB.SRC b/MLD/MLD_TAB.SRC index fb77a989..94c5dcd0 100644 --- a/MLD/MLD_TAB.SRC +++ b/MLD/MLD_TAB.SRC @@ -1371,7 +1371,6 @@ CREATE_TABLE(mld_srtkenmerk, 0) , CONSTRAINT mld_c_mld_srtkenmerk_omschr CHECK(mld_srtkenmerk_omschrijving IS NOT NULL) , CONSTRAINT mld_srtkenmerk_omschrijving CHECK(mld_srtkenmerk_omschrijving IS NOT NULL) , CONSTRAINT mld_u_mld_srtkenmerk_upper UNIQUE(mld_srtkenmerk_upper, mld_srtkenmerk_verwijder) -, CONSTRAINT mld_c_mld_srtkenmerk_kenmtype CHECK(mld_srtkenmerk_kenmerktype IN ('C','N','D','T','R','S','X','F','E','M','L','l','b','Q','B','V')) , CONSTRAINT mld_c_mld_srtkenmerk_lengte CHECK(mld_srtkenmerk_lengte >= 1 AND mld_srtkenmerk_lengte <= 4000) , CONSTRAINT mld_c_mld_srtkenmerk_max_min CHECK(mld_srtkenmerk_nmax >= mld_srtkenmerk_nmin) diff --git a/MLD/MLD_TRI.SRC b/MLD/MLD_TRI.SRC index 02c0bcbf..40364eea 100644 --- a/MLD/MLD_TRI.SRC +++ b/MLD/MLD_TRI.SRC @@ -440,16 +440,16 @@ BEGIN raise_application_error(-20000, 'MLD_C_MLD_SRTKENMERK_SYSTEEM'); END IF; -- - IF :new.mld_srtkenmerk_kenmerktype IN ('C', 'N', 'B') AND :new.mld_srtkenmerk_lengte IS NULL + IF :new.mld_srtkenmerk_kenmerktype IN ('C', 'N') AND :new.mld_srtkenmerk_lengte IS NULL THEN raise_application_error(-20000, 'MLD_C_MLD_SRTKENMERK_LENGTE'); END IF; - IF :new.mld_srtkenmerk_kenmerktype IN ('N', 'B') AND :new.mld_srtkenmerk_lengte > 20 + IF :new.mld_srtkenmerk_kenmerktype = 'N' AND :new.mld_srtkenmerk_lengte > 20 THEN :new.mld_srtkenmerk_lengte := 20; END IF; -- - IF :new.mld_srtkenmerk_kenmerktype IN ('N', 'B') AND :old.mld_srtkenmerk_key IS NOT NULL + IF :new.mld_srtkenmerk_kenmerktype = 'N' AND :old.mld_srtkenmerk_key IS NOT NULL THEN IF :old.mld_srtkenmerk_nmin <> :new.mld_srtkenmerk_nmin OR (:old.mld_srtkenmerk_nmin IS NULL AND :new.mld_srtkenmerk_nmin IS NOT NULL) @@ -581,7 +581,7 @@ BEGIN THEN APPLICATION_ERROR_GOTO(-20004, 'mld_m241,'||SrtKenmerkOmschr||','||TO_CHAR(SrtKenmerkLengte)); END IF; - ELSIF SrtKenmerkType IN ('N', 'B') + ELSIF SrtKenmerkType = 'N' THEN -- NUMBER -- Controleer of er een numerieke waarde ingevuld is. @@ -710,7 +710,7 @@ BEGIN THEN APPLICATION_ERROR_GOTO(-20004, 'mld_m241,'||SrtKenmerkOmschr||','||TO_CHAR(SrtKenmerkLengte)); END IF; - ELSIF SrtKenmerkType IN ('N', 'B') + ELSIF SrtKenmerkType = 'N' THEN -- NUMBER -- Controleer of er een numerieke waarde ingevuld is. diff --git a/MLD/MLD_VIE.SRC b/MLD/MLD_VIE.SRC index e0574aad..70de5d06 100644 --- a/MLD/MLD_VIE.SRC +++ b/MLD/MLD_VIE.SRC @@ -1653,7 +1653,7 @@ AS END waarde_c, CASE - WHEN skm.mld_srtkenmerk_kenmerktype IN ('N', 'B') + WHEN skm.mld_srtkenmerk_kenmerktype = 'N' THEN TO_NUMBER (km.mld_kenmerkmelding_waarde) ELSE TO_NUMBER (NULL) END @@ -1705,7 +1705,7 @@ SELECT o.*, END waarde_c, CASE - WHEN skm.mld_srtkenmerk_kenmerktype IN ('N', 'B') + WHEN skm.mld_srtkenmerk_kenmerktype = 'N' THEN TO_NUMBER (ko.mld_kenmerkopdr_waarde) ELSE TO_NUMBER (NULL) END diff --git a/PRS/PRS_PAC.SRC b/PRS/PRS_PAC.SRC index d511acc5..74e9330e 100644 --- a/PRS/PRS_PAC.SRC +++ b/PRS/PRS_PAC.SRC @@ -986,7 +986,7 @@ AS WHERE prs_kenmerk_upper = UPPER (kw) AND prs_kenmerk_verwijder IS NULL AND prs_kenmerk_niveau = 'P' - AND prs_kenmerk_kenmerktype IN ('C', 'D', 'N', 'R', 'S', 'X', 'B', 'V'); + AND prs_kenmerk_kenmerktype IN ('C', 'D', 'N', 'R', 'S', 'X', 'V'); ELSE -- kenmerkwaarde is numeriek (dus key)! SELECT prs_kenmerk_key INTO v_kenmerk_key @@ -994,7 +994,7 @@ AS WHERE prs_kenmerk_key = fac.safe_to_number (kw) AND prs_kenmerk_verwijder IS NULL AND prs_kenmerk_niveau = 'P' - AND prs_kenmerk_kenmerktype IN ('C', 'D', 'N', 'R', 'S', 'X', 'B', 'V'); + AND prs_kenmerk_kenmerktype IN ('C', 'D', 'N', 'R', 'S', 'X', 'V'); END IF; RETURN v_kenmerk_key; diff --git a/PRS/PRS_TAB.SRC b/PRS/PRS_TAB.SRC index 81bdccad..678c682a 100644 --- a/PRS/PRS_TAB.SRC +++ b/PRS/PRS_TAB.SRC @@ -1126,8 +1126,6 @@ CREATE_TABLE(prs_kenmerk,0) VARCHAR2(10) ,prs_kenmerk_kenmerktype VARCHAR2(1) - CONSTRAINT prs_c_prs_kenmerk_type2 CHECK - (prs_kenmerk_kenmerktype IN ('C','N','D','T','R','X','L','Q','F','M','E','S','l','B','V')) ,prs_kenmerk_systeem -- &1 = systeemkm, &8 = anonimiseren NUMBER(2) DEFAULT 0 diff --git a/PRS/PRS_TRI.SRC b/PRS/PRS_TRI.SRC index a9137ada..57c98a1d 100644 --- a/PRS/PRS_TRI.SRC +++ b/PRS/PRS_TRI.SRC @@ -475,15 +475,15 @@ BEGIN raise_application_error(-20000, 'ALG_M238'); END IF; - IF :new.prs_kenmerk_kenmerktype IN ('C', 'N', 'B') AND :new.prs_kenmerk_lengte IS NULL + IF :new.prs_kenmerk_kenmerktype IN ('C', 'N') AND :new.prs_kenmerk_lengte IS NULL THEN raise_application_error(-20000, 'ALG_C_ALG_KENMERK_LENGTE'); END IF; - IF :new.prs_kenmerk_kenmerktype IN ('N', 'B') AND :new.prs_kenmerk_lengte > 20 + IF :new.prs_kenmerk_kenmerktype = 'N' AND :new.prs_kenmerk_lengte > 20 THEN :new.prs_kenmerk_lengte := 20; END IF; - IF :new.prs_kenmerk_kenmerktype IN ('N', 'B') AND :old.prs_kenmerk_key IS NOT NULL + IF :new.prs_kenmerk_kenmerktype = 'N' AND :old.prs_kenmerk_key IS NOT NULL THEN -- An existing property of type N IF :old.prs_kenmerk_nmin <> :new.prs_kenmerk_nmin OR @@ -643,7 +643,7 @@ BEGIN APPLICATION_ERROR_GOTO(-20004, 'ALG_M232,'|| KenmerkOmschr ||',' || TO_CHAR(KenmerkLengte)); END IF; - ELSIF KenmerkType IN ('N', 'B') + ELSIF KenmerkType = 'N' /* ** Number */ diff --git a/RES/RES_TAB.SRC b/RES/RES_TAB.SRC index 0597741e..8836e3f3 100644 --- a/RES/RES_TAB.SRC +++ b/RES/RES_TAB.SRC @@ -629,7 +629,7 @@ CREATE_TABLE(res_rsv_ruimte, 0) NUMBER(1) DEFAULT 0 NOT NULL -, res_rsv_ruimte_verzonden +, res_rsv_ruimte_verzonden DATE , res_rsv_ruimte_cat_appr /* Catalogus artikelen dienen gefiatteerd te worden 0=Nee, 1=Ja */ NUMBER(1) @@ -814,7 +814,6 @@ CREATE_TABLE(res_srtkenmerk, 0) , CONSTRAINT res_c_res_srtkenmerk_omschr CHECK(res_srtkenmerk_omschrijving IS NOT NULL) , CONSTRAINT res_srtkenmerk_omschrijving CHECK(res_srtkenmerk_omschrijving IS NOT NULL) , CONSTRAINT res_u_res_srtkenmerk_upper UNIQUE(res_srtkenmerk_upper, res_srtkenmerk_verwijder) -, CONSTRAINT res_c_res_srtkenmerk_kenmtype CHECK(res_srtkenmerk_kenmerktype IN ('C','N','D','T','R','X','L','Q','F','M','E','S','l','B','V')) , CONSTRAINT res_c_res_srtkenmerk_lengte CHECK(res_srtkenmerk_lengte >= 1 AND res_srtkenmerk_lengte <= 4000) , CONSTRAINT res_c_res_srtkenmerk_max_min CHECK(res_srtkenmerk_nmax >= res_srtkenmerk_nmin) diff --git a/RES/RES_TRI.SRC b/RES/RES_TRI.SRC index b9a96f28..e00a0b58 100644 --- a/RES/RES_TRI.SRC +++ b/RES/RES_TRI.SRC @@ -312,17 +312,17 @@ BEGIN raise_application_error(-20000, 'RES_C_RES_SRTKENMERK_SYSTEEM'); END IF; -- - IF :new.res_srtkenmerk_kenmerktype IN ('C', 'N', 'B') AND :new.res_srtkenmerk_lengte IS NULL + IF :new.res_srtkenmerk_kenmerktype IN ('C', 'N') AND :new.res_srtkenmerk_lengte IS NULL THEN raise_application_error(-20000, 'res_C_res_SRTKENMERK_LENGTE'); END IF; -- Numeriek mag niet te lang zijn (numeric overflow) - IF :new.res_srtkenmerk_kenmerktype IN ('N', 'B') AND :new.res_srtkenmerk_lengte > 20 + IF :new.res_srtkenmerk_kenmerktype = 'N' AND :new.res_srtkenmerk_lengte > 20 THEN :new.res_srtkenmerk_lengte := 20; END IF; -- - IF :new.res_srtkenmerk_kenmerktype IN ('N', 'B') AND :old.res_srtkenmerk_key IS NOT NULL + IF :new.res_srtkenmerk_kenmerktype = 'N' AND :old.res_srtkenmerk_key IS NOT NULL THEN IF :old.res_srtkenmerk_nmin <> :new.res_srtkenmerk_nmin OR (:old.res_srtkenmerk_nmin IS NULL AND :new.res_srtkenmerk_nmin IS NOT NULL) @@ -501,7 +501,7 @@ BEGIN -20004, 'res_m241,' || srtkenmerkomschr || ',' || TO_CHAR (srtkenmerklengte)); END IF; - ELSIF srtkenmerktype IN ('N', 'B') + ELSIF srtkenmerktype = 'N' THEN -- NUMBER -- Controleer of er een numerieke waarde ingevuld is. @@ -636,7 +636,7 @@ BEGIN -20004, 'res_m245,' || srtkenmerkomschr || ',' || TO_CHAR (srtkenmerklengte)); END IF; - ELSIF srtkenmerktype IN ('N', 'B') + ELSIF srtkenmerktype = 'N' THEN -- NUMBER -- Controleer of er een numerieke waarde ingevuld is. diff --git a/_UP/DB47to48.src b/_UP/DB47to48.src index 07f502b1..18d5f3e3 100644 --- a/_UP/DB47to48.src +++ b/_UP/DB47to48.src @@ -92,12 +92,14 @@ ALTER TABLE mld_kenmerk ADD CONSTRAINT mld_r_ins_discipline_key7 REFERENCES ins_tab_discipline(ins_discipline_key); ALTER TABLE mld_srtkenmerk DROP CONSTRAINT mld_c_mld_srtkenmerk_kenmtype; -ALTER TABLE mld_srtkenmerk ADD - CONSTRAINT mld_c_mld_srtkenmerk_kenmtype CHECK(mld_srtkenmerk_kenmerktype IN ('C','N','D','T','R','S','X','F','E','M','L','l','b','Q','B','V')); +-- Onderstaan wordt met WDKA#80394 definitief verwijderd, dus hier niet opnieuw aanmaken +-- ALTER TABLE mld_srtkenmerk ADD +-- CONSTRAINT mld_c_mld_srtkenmerk_kenmtype CHECK(mld_srtkenmerk_kenmerktype IN ('C','N','D','T','R','S','X','F','E','M','L','l','b','Q','B','V')); ALTER TABLE fac_kenmwaarden DROP CONSTRAINT fac_c_fac_kenmwaarden_kenmtype; -ALTER TABLE fac_kenmwaarden ADD - CONSTRAINT fac_c_fac_kenmwaarden_kenmtype CHECK(fac_kenmwaarden_kenmerktype IN ('C','N','D','T','R','S','X','F','E','M','L','l','b','Q','B','V')); +-- Onderstaan wordt met WDKA#80394 definitief verwijderd, dus hier niet opnieuw aanmaken +-- ALTER TABLE fac_kenmwaarden ADD +-- CONSTRAINT fac_c_fac_kenmwaarden_kenmtype CHECK(fac_kenmwaarden_kenmerktype IN ('C','N','D','T','R','S','X','F','E','M','L','l','b','Q','B','V')); /////////////////////////////////////////////////////////////////////////////////////////// FCLT#83243 @@ -127,7 +129,7 @@ BEGIN EXECUTE IMMEDIATE 'ALTER TRIGGER mld_t_mld_melding_B_IU DISABLE'; LOOP LOCK TABLE mld_melding IN EXCLUSIVE MODE; -- Wordt door COMMIT ongedaan gemaakt - UPDATE mld_melding + UPDATE mld_melding SET mld_melding_omschrijving = mld_melding_omschrijving_old WHERE mld_melding_omschrijving IS NULL AND mld_melding_omschrijving_old IS NOT NULL @@ -139,7 +141,7 @@ BEGIN EXCEPTION WHEN OTHERS THEN EXECUTE IMMEDIATE 'ALTER TRIGGER fin_t_fin_factuur_B_IU ENABLE'; - RAISE; + RAISE; END; / COMMIT; @@ -321,6 +323,20 @@ END; /////////////////////////////////////////////////////////////////////////////////////////// MARX#82611 ALTER TABLE fac_api ADD fac_api_errorhandling NUMBER (10) DEFAULT 1 NOT NULL; // 0=200 on error, 1=400 on error +/////////////////////////////////////////////////////////////////////////////////////////// WDKA#80394 +ALTER TABLE alg_kenmerk DROP CONSTRAINT alg_c_alg_kenmerk_type1; +ALTER TABLE bes_srtkenmerk DROP CONSTRAINT bes_c_bes_srtkenmerk_kenmtype; +ALTER TABLE bez_kenmerk DROP CONSTRAINT bez_c_bez_kenmerk_type2; +ALTER TABLE cnt_srtkenmerk DROP CONSTRAINT cnt_c_cnt_srtkenmerk_kenmtype; +-- ALTER TABLE fac_kenmwaarden DROP CONSTRAINT fac_c_fac_kenmwaarden_kenmtype; Reeds met FCLT#82594 verwijderd (hierboven) +ALTER TABLE faq_kenmerk DROP CONSTRAINT faq_kenmerk_kenmerktype; +ALTER TABLE faq_kenmerk DROP CONSTRAINT faq_c_faq_kenmerk_type1; +ALTER TABLE fin_kenmerk DROP CONSTRAINT fin_c_fin_kenmerk_type1; +ALTER TABLE ins_srtkenmerk DROP CONSTRAINT ins_c_ins_srtkenmerk_kenmtype; +-- ALTER TABLE mld_srtkenmerk DROP CONSTRAINT mld_c_mld_srtkenmerk_kenmtype; Reeds met FCLT#82594 verwijderd (hierboven) +ALTER TABLE prs_kenmerk DROP CONSTRAINT prs_c_prs_kenmerk_type2; +ALTER TABLE res_srtkenmerk DROP CONSTRAINT res_c_res_srtkenmerk_kenmtype; + /////////////////////////////////////////////////////////////////////////////////////////// FCLT#00000 REGISTERONCE('$Id$')