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

svn path=/Database/trunk/; revision=64938
This commit is contained in:
2024-06-03 09:45:23 +00:00
parent 624d0c34e9
commit 7386127aa8
28 changed files with 93 additions and 93 deletions

View File

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

View File

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

View File

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