Overgang naar SQL Server compatible versie van de software

Tevens een en ander opgeschoond

svn path=/Database/trunk/; revision=8275
This commit is contained in:
Jos Groot Lipman
2003-07-16 09:47:22 +00:00
parent 6fdbee78da
commit 5fbdfa03ac
53 changed files with 4964 additions and 5170 deletions

File diff suppressed because it is too large Load Diff

View File

@@ -1,6 +1,8 @@
#ifdef CAD // 22-05-1998 KTH
/* REVISIONS:
*
* 19-03-2003 RL cad_c_cad_tekening_type2 united with "not null" constraint
*
* 27-04-1999 EGR CAD-tabellen worden op de module FAC afgebeeld met bijbehorende privileges.
* --- 01.43 ---
@@ -41,9 +43,11 @@ CREATE_TABLE(cad_tekening, FAC_NORMAAL_PRIVILEGE)
NOT_NULL(cad_tekening_filenaam, cad_c_cad_tekening_filenaam),
cad_tekening_type
VARCHAR2(3)
NOT_NULL (cad_tekening_type, cad_c_cad_tekening_type)
CONSTRAINT cad_c_cad_tekening_type2 CHECK(cad_tekening_type = 'P' OR cad_tekening_type = 'C'
OR cad_tekening_type = 'D'),
/* NOT_NULL (cad_tekening_type, cad_c_cad_tekening_type) */
CONSTRAINT cad_c_cad_tekening_type2 CHECK
(cad_tekening_type is not null and
(cad_tekening_type = 'P' OR cad_tekening_type = 'C'
OR cad_tekening_type = 'D')),
cad_tekening_geimporteerd /* geeft aan of de tekening al is geimporteerd: */
DATE /* NULL indien niet, anders datum van importeren */
DEFAULT NULLDATUM,

View File

@@ -1,20 +1,5 @@
#ifdef CAD // 22-05-1998 KTH
/* REVISIONS:
*
* --- 03.11 ---
* 03-11-1999 BIV B#92 :Bij een Plattegrond- en/of contourtekening mag men niet
* een discipline opgeven.
* --- 03.10 ---
* --- 01.43 ---
* 26-02-1999 BIV LOG #2278: Trigger toegevoegd t.b.v. tabel CAD_SYMBOOL.
* --- 01.42 ---
* --- 01.41 ---
* --- 01.40 ---
* --- 01.39 ---
* --- 01.38 ---
* --- 01.37 ---
* 22-05-1998 KTH LOG#1821: Wijzigingen tbv tabel CAD_TEKENING geintroduceerd
*/
#include "comsql.h"
@@ -23,14 +8,22 @@ CREATE_TRIGGER(cad_t_cad_tekening_B_IU)
BEFORE INSERT OR UPDATE ON cad_tekening
FOR EACH ROW
BEGIN
-- Deze trigger is ook gedefinieerd in PRJ !!
UPDATE_PRIMARY_KEY(cad_tekening_key, cad_s_cad_tekening_key);
UPDATE_AANMAAKDATUM(cad_tekening, cad_tekening_aanmaak);
-- Deze trigger is ook gedefinieerd in CAD !!
UPDATE_PRIMARY_KEY(cad_tekening_key
,cad_s_cad_tekening_key);
UPDATE_AANMAAKDATUM(cad_tekening
,cad_tekening_aanmaak);
IF :new.cad_tekening_type IN ('P', 'C') AND
:new.ins_discipline_key IS NOT NULL
THEN
RAISE_APPLICATION_ERROR(-20000, 'CAD_M010');
APPLICATION_ERROR(-20000, 'CAD_M010');
END IF;
#ifdef PRJ
IF :new.prj_project_key IS NOT NULL
THEN
:new.cad_tekening_filenaam := :new.cad_tekening_key ||'.DWG';
END IF;
#endif
END;
/
@@ -41,5 +34,3 @@ BEGIN
UPDATE_PRIMARY_KEY(cad_symbool_key, cad_s_cad_symbool_key);
END;
/
#endif // CAD