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

FSN#26427 Numerieke flexvelden hebben lengtebeperking (20)

Browse Source 
svn path=/Database/trunk/; revision=18311
This commit is contained in:
Peter Feij
2013-07-01 13:10:41 +00:00
parent 173e4f70ce
commit dde501abe9
11 changed files with 32 additions and 34 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
ALG/ALG_TAB.SRC
View File

@@ -286,8 +286,8 @@ CREATE_TABLE(alg_gebouw,0)
NUMBER(5,2),
alg_gebouw_werkdagen
NUMBER(1)
NOT_NULL(alg_gebouw_werkdagen, alg_c_gebouw_werkdagen)
DEFAULT 1
NOT_NULL(alg_gebouw_werkdagen, alg_c_gebouw_werkdagen)
CONSTRAINT alg_c_alg_gebouw_werk CHECK(alg_gebouw_werkdagen IN (0,1)),
alg_gebouw_bez
NUMBER(1)
@@ -475,7 +475,7 @@ CREATE_TABLE(alg_ruimte,0)
alg_ruimte_werkdagen
NUMBER(1)
-- DEFAULT NULL op gebouw terugvallen
CONSTRAINT alg_c_alg_ruimte_werk CHECK(alg_ruimte_werkdagen IN (0,1));
CONSTRAINT alg_c_alg_ruimte_werk CHECK(alg_ruimte_werkdagen IN (0,1)),
-- in MLD_TAB.SRC:
-- mld_dienstniveau_key
-- NUMBER(10)

6
ALG/ALG_TRI.SRC
View File

@@ -457,9 +457,9 @@ BEGIN
END IF;
-- Numeriek mag niet te lang zijn (numeric overflow)
IF :new.alg_kenmerk_kenmerktype = 'N'
AND :new.alg_kenmerk_lengte > 38
AND :new.alg_kenmerk_lengte > 20
THEN
:new.alg_kenmerk_lengte := 38;
:new.alg_kenmerk_lengte := 20;
END IF;
IF :new.alg_kenmerk_kenmerktype = 'N' AND :old.alg_kenmerk_key IS NOT NULL
THEN
@@ -555,7 +555,7 @@ BEGIN
KenmerkNMin alg_kenmerk.alg_kenmerk_nmin%TYPE;
KenmerkNMax alg_kenmerk.alg_kenmerk_nmax%TYPE;
RefKenmerkKey NUMBER(10);
NumberWaarde NUMBER(15,5);
NumberWaarde NUMBER(25,5);
FormatMask VARCHAR2(60);
KenmerkWaarde alg_onrgoedkenmerk.alg_onrgoedkenmerk_waarde%TYPE;
BEGIN

8
BES/BES_TRI.SRC
View File

@@ -176,9 +176,9 @@ BEGIN
END IF;
-- Numeriek mag niet te lang zijn (numeric overflow)
IF :new.bes_srtkenmerk_kenmerktype = 'N'
AND :new.bes_srtkenmerk_lengte > 38
AND :new.bes_srtkenmerk_lengte > 20
THEN
:new.bes_srtkenmerk_lengte := 38;
:new.bes_srtkenmerk_lengte := 20;
END IF;
IF :NEW.bes_srtkenmerk_kenmerktype = 'N' AND :OLD.bes_srtkenmerk_key IS NOT NULL
@@ -284,7 +284,7 @@ BEGIN
srtkenmerknmin bes_srtkenmerk.bes_srtkenmerk_nmin%TYPE;
srtkenmerknmax bes_srtkenmerk.bes_srtkenmerk_nmax%TYPE;
kenmerkverplicht bes_kenmerk.bes_kenmerk_verplicht%TYPE;
numberwaarde NUMBER (15, 5);
numberwaarde NUMBER (25,5);
formatmask VARCHAR2 (60);
kenmerkbestellingwaarde bes_kenmerkbestell.bes_kenmerkbestell_waarde%TYPE;
BEGIN
@@ -399,7 +399,7 @@ BEGIN
srtkenmerknmin bes_srtkenmerk.bes_srtkenmerk_nmin%TYPE;
srtkenmerknmax bes_srtkenmerk.bes_srtkenmerk_nmax%TYPE;
kenmerkverplicht bes_kenmerk.bes_kenmerk_verplicht%TYPE;
numberwaarde NUMBER (15, 5);
numberwaarde NUMBER (25,5);
formatmask VARCHAR2 (60);
kenmerkbestelitemwaarde bes_kenmerkbesteli.bes_kenmerkbesteli_waarde%TYPE;
BEGIN

6
BEZ/BEZ_TRI.SRC
View File

@@ -106,9 +106,9 @@ BEGIN
APPLICATION_ERROR(-20000, 'ALG_C_ALG_KENMERK_LENGTE');
END IF;
IF :new.bez_kenmerk_kenmerktype = 'N'
AND :new.bez_kenmerk_lengte > 38
AND :new.bez_kenmerk_lengte > 20
THEN
:new.bez_kenmerk_lengte := 38;
:new.bez_kenmerk_lengte := 20;
END IF;
IF :new.bez_kenmerk_kenmerktype = 'N' AND :old.bez_kenmerk_key IS NOT NULL
@@ -182,7 +182,7 @@ BEGIN
KenmerkDec bez_kenmerk.bez_kenmerk_dec%TYPE;
KenmerkNMin bez_kenmerk.bez_kenmerk_nmin%TYPE;
KenmerkNMax bez_kenmerk.bez_kenmerk_nmax%TYPE;
NumberWaarde NUMBER(15,5);
NumberWaarde NUMBER(25,5);
FormatMask VARCHAR2(60);
KenmerkWaarde bez_kenmerkwaarde.bez_kenmerkwaarde_waarde%TYPE;
BEGIN

6
CNT/CNT_TRI.SRC
View File

@@ -142,9 +142,9 @@ BEGIN
END IF;
-- Numeriek mag niet te lang zijn (numeric overflow)
IF :new.cnt_srtkenmerk_kenmerktype = 'N'
AND :new.cnt_srtkenmerk_lengte > 38
AND :new.cnt_srtkenmerk_lengte > 20
THEN
:new.cnt_srtkenmerk_lengte := 38;
:new.cnt_srtkenmerk_lengte := 20;
END IF;
--
IF :new.cnt_srtkenmerk_kenmerktype = 'N'
@@ -229,7 +229,7 @@ BEGIN
SrtKenmerkNMin cnt_srtkenmerk.cnt_srtkenmerk_nmin%TYPE;
SrtKenmerkNMax cnt_srtkenmerk.cnt_srtkenmerk_nmax%TYPE;
KenmerkVerplicht cnt_kenmerk.cnt_kenmerk_verplicht%TYPE;
NumberWaarde NUMBER(15,5);
NumberWaarde NUMBER(25,5);
FormatMask VARCHAR2(60);
KenmerkContractWaarde cnt_kenmerkcontract.cnt_kenmerkcontract_waarde%TYPE;
BEGIN

6
FIN/FIN_TRI.SRC
View File

@@ -40,7 +40,7 @@ BEGIN
KenmerkDec fin_kenmerk.fin_kenmerk_dec%TYPE;
KenmerkNMin fin_kenmerk.fin_kenmerk_nmin%TYPE;
KenmerkNMax fin_kenmerk.fin_kenmerk_nmax%TYPE;
NumberWaarde NUMBER(15,5);
NumberWaarde NUMBER(25,5);
FormatMask VARCHAR2(60);
KenmerkWaarde fin_kenmerkfactuur.fin_kenmerkfactuur_waarde%TYPE;
BEGIN
@@ -174,9 +174,9 @@ BEGIN
END IF;
-- Numeriek mag niet te lang zijn (numeric overflow)
IF :new.fin_kenmerk_kenmerktype = 'N'
AND :new.fin_kenmerk_lengte > 38
AND :new.fin_kenmerk_lengte > 20
THEN
:new.fin_kenmerk_lengte := 38;
:new.fin_kenmerk_lengte := 20;
END IF;
IF :new.fin_kenmerk_kenmerktype = 'N' AND :old.fin_kenmerk_key IS NOT NULL
THEN

6
INS/INS_TAB.SRC
View File

@@ -303,7 +303,6 @@ CREATE_TABLE(ins_deel,0)
ins_deel_aantal
NUMBER(6)
DEFAULT 1
/* NOT_NULL(ins_deel_aantal, ins_c_ins_deel_aantal1) */
CONSTRAINT ins_c_ins_deel_aantal2 CHECK
(ins_deel_aantal is not null and ins_deel_aantal > 0),
ins_deel_omschrijving
@@ -327,13 +326,10 @@ CREATE_TABLE(ins_deel,0)
DEFAULT NULLDATUM,
ins_discipline_key
NUMBER(10)
/* I.o.m. MB is deze constraint verwijderd
NOT_NULL(ins_discipline_key, ins_r_ins_deel_discipline1) */
CONSTRAINT ins_r_ins_deel_discipline2 REFERENCES ins_tab_discipline(ins_discipline_key),
ins_alg_locatie_key
NUMBER(10)
CONSTRAINT ins_r_ins_deel_locatie2 REFERENCES alg_locatie(alg_locatie_key),
/* 03/09/1988/BIV - # 1993 */
ins_deel_parent_key
NUMBER(10)
CONSTRAINT ins_r_ins_deel_key REFERENCES ins_deel(ins_deel_key),
@@ -359,6 +355,8 @@ CREATE_TABLE(ins_deel,0)
NUMBER(10),
ins_alg_ruimte_type_org
VARCHAR2(1),
ins_deel_state
VARCHAR2(128),
CONSTRAINT ins_u_ins_deel_upper2 UNIQUE(ins_alg_locatie_key,
ins_deel_parent_key, ins_srtdeel_key, ins_deel_upper,
ins_deel_verwijder)

6
INS/INS_TRI.SRC
View File

@@ -473,9 +473,9 @@ BEGIN
END IF;
-- Numeriek mag niet te lang zijn (numeric overflow)
IF :new.ins_srtkenmerk_kenmerktype = 'N'
AND :new.ins_srtkenmerk_lengte > 38
AND :new.ins_srtkenmerk_lengte > 20
THEN
:new.ins_srtkenmerk_lengte := 38;
:new.ins_srtkenmerk_lengte := 20;
END IF;
IF :new.ins_srtkenmerk_kenmerktype = 'N' AND :old.ins_srtkenmerk_key IS NOT NULL
@@ -555,7 +555,7 @@ DECLARE
SrtKenmerkNMin ins_srtkenmerk.ins_srtkenmerk_nmin%TYPE;
SrtKenmerkNMax ins_srtkenmerk.ins_srtkenmerk_nmax%TYPE;
KenmerkVerplicht ins_kenmerk.ins_kenmerk_verplicht%TYPE;
NumberWaarde NUMBER(15,5);
NumberWaarde NUMBER(25,5);
FormatMask VARCHAR2(60);
KenmerkDeelWaarde ins_kenmerkdeel.ins_kenmerkdeel_waarde%TYPE;
BEGIN

4
MLD/MLD_TAB.SRC
View File

@@ -290,7 +290,7 @@ CREATE_TABLE(mld_stdmelding,0)
CONSTRAINT mld_c_alg_onrgoed_niveau CHECK (alg_onrgoed_niveau IN ('L','G','V','R')),
alg_onrgoed_obj_niveau -- level of onrgoed which should be selected before chosing objects
VARCHAR2(1)
CONSTRAINT mld_c_alg_onrgoed_niveau CHECK (alg_onrgoed_niveau IN ('L','G','V','R')),
CONSTRAINT mld_c_alg_onrgoed_objniveau CHECK (alg_onrgoed_obj_niveau IN ('L','G','V','R')),
mld_stdmelding_freetext -- 0:geen omschrijving, 1:optionele omschrijving, 2:verplichte omschrijving
NUMBER(1)
DEFAULT 1,
@@ -527,7 +527,7 @@ CREATE_TABLE(mld_melding,0)
mld_melding_einddatum -- geplande einddatum, trigger vult eventueel
DATE,
mld_melding_respijt
NUMBER(4,2) -- tijdsduur in uren die van de doorlooptijd afgetrokken wordt
NUMBER(4,2), -- tijdsduur in uren die van de doorlooptijd afgetrokken wordt
mld_melding_einddatum_std -- SLA freeze einddatum, trigger vult eventueel
DATE,
mld_melding_acceptdatum_std -- sla freeze acceptatie

8
MLD/MLD_TRI.SRC
View File

@@ -322,9 +322,9 @@ BEGIN
raise_application_error(-20000, 'MLD_C_MLD_SRTKENMERK_LENGTE');
END IF;
IF :new.mld_srtkenmerk_kenmerktype = 'N'
AND :new.mld_srtkenmerk_lengte > 38
AND :new.mld_srtkenmerk_lengte > 20
THEN
:new.mld_srtkenmerk_lengte := 38;
:new.mld_srtkenmerk_lengte := 20;
END IF;
--
IF :new.mld_srtkenmerk_kenmerktype = 'N'
@@ -409,7 +409,7 @@ BEGIN
SrtKenmerkNMin mld_srtkenmerk.mld_srtkenmerk_nmin%TYPE;
SrtKenmerkNMax mld_srtkenmerk.mld_srtkenmerk_nmax%TYPE;
KenmerkVerplicht mld_kenmerk.mld_kenmerk_verplicht%TYPE;
NumberWaarde NUMBER(15,5);
NumberWaarde NUMBER(25,5);
FormatMask VARCHAR2(60);
KenmerkMeldingWaarde mld_kenmerkmelding.mld_kenmerkmelding_waarde%TYPE;
BEGIN
@@ -523,7 +523,7 @@ BEGIN
SrtKenmerkNMin mld_srtkenmerk.mld_srtkenmerk_nmin%TYPE;
SrtKenmerkNMax mld_srtkenmerk.mld_srtkenmerk_nmax%TYPE;
KenmerkVerplicht mld_kenmerk.mld_kenmerk_verplicht%TYPE;
NumberWaarde NUMBER(15,5);
NumberWaarde NUMBER(25,5);
FormatMask VARCHAR2(60);
KenmerkOpdrWaarde mld_kenmerkopdr.mld_kenmerkopdr_waarde%TYPE;
BEGIN

6
PRS/PRS_TRI.SRC
View File

@@ -356,9 +356,9 @@ BEGIN
APPLICATION_ERROR(-20000, 'ALG_C_ALG_KENMERK_LENGTE');
END IF;
IF :new.prs_kenmerk_kenmerktype = 'N'
AND :new.prs_kenmerk_lengte > 38
AND :new.prs_kenmerk_lengte > 20
THEN
:new.prs_kenmerk_lengte := 38;
:new.prs_kenmerk_lengte := 20;
END IF;
IF :new.prs_kenmerk_kenmerktype = 'N' AND :old.prs_kenmerk_key IS NOT NULL
THEN
@@ -447,7 +447,7 @@ BEGIN
KenmerkDec prs_kenmerk.prs_kenmerk_dec%TYPE;
KenmerkNMin prs_kenmerk.prs_kenmerk_nmin%TYPE;
KenmerkNMax prs_kenmerk.prs_kenmerk_nmax%TYPE;
NumberWaarde NUMBER(15,5);
NumberWaarde NUMBER(25,5);
FormatMask VARCHAR2(60);
KenmerkWaarde prs_kenmerklink.prs_kenmerklink_waarde%TYPE;
BEGIN