WDKA#80394 kenmerksoort contraints mbt het kenmerktype verwijderd, tevens kenmerktype 'B' referenties verwijderd.

svn path=/Database/trunk/; revision=64938

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

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
          */

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

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.

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

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);

CNT/CNT_TAB.SRC

@@ -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

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.

CNT/CNT_VIE.SRC

@@ -137,8 +137,7 @@ AS
                                                           'N',
                                                           'R',
                                                           'S',
-                                                          'X',
+                                                          'X')
-                                                          'B')
                                                 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

FAC/FAC_PACF.SRC

@@ -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;

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)

FAC/FAC_TAB.SRC

@@ -1835,8 +1835,7 @@ CREATE_TABLE (fac_kenmwaarden, 0)
     fac_kenmwaarden_exprwaarde
         VARCHAR2 (4000),
     fac_kenmwaarden_kenmerktype
-        VARCHAR2(1)
+        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')),
     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)
+   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_systeem      NUMBER(2),
    faq_kenmerk_toonbaar     NUMBER(1),
    faq_kenmerk_inlijst      NUMBER(1) DEFAULT 0 NOT NULL,

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

FAC/FAC_VIE.SRC

@@ -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

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

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;

INS/INS_TAB.SRC

@@ -773,8 +773,7 @@ CREATE_TABLE(ins_srtkenmerk, 0)
    ins_srtkenmerk_dimensie
       VARCHAR2(10),
    ins_srtkenmerk_kenmerktype
-      VARCHAR2(1)
+      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')),
    ins_srtkenmerk_systeem -- &1 = systeemkm, &2 = primary, show in list
       NUMBER(2)
       DEFAULT 0 NOT NULL,

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

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

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)

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.

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

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;

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

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
          */

RES/RES_TAB.SRC

@@ -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)

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.

_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
+-- Onderstaan wordt met WDKA#80394 definitief verwijderd, dus hier niet opnieuw aanmaken
-   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 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
+-- Onderstaan wordt met WDKA#80394 definitief verwijderd, dus hier niet opnieuw aanmaken
-   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'));
+-- 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
 
@@ -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$')