Files
Database/_UP/DB36to37.src
Erik Groener 537af2bb60 FCLT#57835 *Alle* Flexkenmerk bijlagen in de database opslaan
svn path=/Database/trunk/; revision=43197
2019-07-03 09:11:45 +00:00

454 lines
19 KiB
Plaintext

/* DB36to37.SRC
* Update script van FACILITOR schema
* $Revision$
* $Id$
*/
#include "prologue.inc"
COMMIT;
/////////////////////////////////////////////////////////////////////////////////////////// FCLT#56940
ALTER TABLE fac_email_setting
ADD fac_email_setting_loglevel NUMBER(3)
DEFAULT 0 NOT NULL;
ALTER TABLE fac_email_setting
ADD prs_perslid_key_auth
NUMBER(10)
CONSTRAINT fac_r_prs_perslid_key10 REFERENCES prs_perslid(prs_perslid_key);
ALTER TABLE fac_email_setting
ADD fac_email_setting_opmerking VARCHAR2 (320);
/////////////////////////////////////////////////////////////////////////////////////////// FCLT#xxxxx
ALTER TABLE mld_opdr
ADD mld_opdr_externnr VARCHAR2(30);
ALTER TABLE mld_opdr
ADD mld_opdr_externsyncdate DATE;
/////////////////////////////////////////////////////////////////////////////////////////// HSLE#56503
ALTER TABLE fac_kenmwaarden
ADD fac_kenmwaarden_exprwaarde VARCHAR2 (4000);
/////////////////////////////////////////////////////////////////////////////////////////// STAM#56747
UPDATE fac_setting
SET fac_setting_pvalue = DECODE(UPPER(fac_setting_pvalue), 'FALSE', '0', 'TRUE', '1', '')
WHERE fac_setting_name = 'portalmenu_combine_single';
/////////////////////////////////////////////////////////////////////////////////////////// FCLT#56366
ALTER TABLE fac_usrrap_cols
ADD fac_usrrap_cols_sorting
NUMBER(1)
DEFAULT 3
NOT NULL
CONSTRAINT fac_c_usrrap_cols_sorting CHECK (fac_usrrap_cols_sorting IN (0,1,2,3));
/////////////////////////////////////////////////////////////////////////////////////////// HSLE#55820
ALTER TABLE res_ruimte
ADD res_ruimte_cv
NUMBER(1)
DEFAULT 0
NOT NULL
CONSTRAINT res_c_res_ruimte_cv CHECK(res_ruimte_cv IN (0,1));
/////////////////////////////////////////////////////////////////////////////////////////// FSN#36801
ALTER TABLE ins_srtcontrole
ADD ins_controlemode_key
NUMBER(10)
CONSTRAINT ins_c_ins_controlemode_key REFERENCES ins_controlemode(ins_controlemode_key);
/////////////////////////////////////////////////////////////////////////////////////////// FCLT#57144
ALTER TABLE mld_kenmerk DROP CONSTRAINT mld_r_mld_srtkenmerk_keys;
ALTER TABLE mld_kenmerk DROP CONSTRAINT mld_c_mld_kenmerk_niveau2;
ALTER TABLE mld_kenmerk
ADD CONSTRAINT mld_c_mld_kenmerk_niveau2 CHECK(mld_kenmerk_niveau IN ('T','D','S','O','A','P'));
/////////////////////////////////////////////////////////////////////////////////////////// FCLT#57372
DEF_STATUS('factuur', 5, 'lcl_fin_ter_goedgekeuring');
/////////////////////////////////////////////////////////////////////////////////////////// KFSG#50528
UPDATE fac_setting
SET fac_setting_pvalue = 1
WHERE fac_setting_name = 'qrc_enable'
AND fac_setting_pvalue IS NULL
AND EXISTS
(SELECT ''
FROM fac_setting
WHERE fac_setting_name = 'mobile_enabled'
AND fac_setting_pvalue = 1);
/////////////////////////////////////////////////////////////////////////////////////////// HSLE#57223
UPDATE mld_melding
SET mld_melding_status = 2
WHERE mld_melding_status = 3;
ALTER TABLE mld_melding
DROP CONSTRAINT mld_c_mld_status1;
ALTER TABLE mld_melding
ADD CONSTRAINT mld_c_mld_status1 CHECK(mld_melding_status IN (0,1,2,4,5,6,7,99));
/////////////////////////////////////////////////////////////////////////////////////////// FCLT#57049
DELETE
FROM fac_notificatie_job
WHERE UPPER(fac_notificatie_job_view) = 'FAC_V_NOTI_LICENTIE';
DROP VIEW FAC_V_NOTI_LICENTIE;
DROP VIEW FAC_V_LCRAP_KEY_STATS;
/////////////////////////////////////////////////////////////////////////////////////////// TWYN#55745
ALTER TABLE fac_usrrap
ADD fac_usrrap_parameters VARCHAR2(200);
/////////////////////////////////////////////////////////////////////////////////////////// FSN#34049
ALTER TABLE prs_bedrijfadres
ADD prs_bedrijfadres_error_handler NUMBER (1) DEFAULT 0 NOT NULL;
UPDATE prs_bedrijfadres
SET prs_bedrijfadres_error_handler = 1
WHERE LOWER(prs_bedrijfadres_ext) IN ('cxml', 'xxml');
UPDATE prs_bedrijfadres
SET prs_bedrijfadres_ext = 'xml'
WHERE LOWER(prs_bedrijfadres_ext) = 'xxml';
/////////////////////////////////////////////////////////////////////////////////////////// FSN#57494
CREATE_TABLE(prs_perslid_tabs, 0)
(
prs_perslid_tabs_key
NUMBER(10)
CONSTRAINT prs_k_prs_perslid_tabs_key PRIMARY KEY,
prs_perslid_tabs_code
VARCHAR2(32) NOT NULL,
prs_perslid_tabs_aanmaak
DATE DEFAULT SYSDATE,
prs_perslid_key
NUMBER(10)
CONSTRAINT prs_r_prs_perslid_key20 REFERENCES prs_perslid(prs_perslid_key) ON DELETE CASCADE
);
CREATE SEQUENCE prs_s_prs_perslid_tabs_key MINVALUE 1;
CREATE UNIQUE INDEX prs_i_prs_perslid_tabs1 on prs_perslid_tabs(prs_perslid_key, prs_perslid_tabs_code);
CREATE_TABLE(prs_perslid_cols, 0)
(
prs_perslid_cols_key
NUMBER(10)
CONSTRAINT fac_k_prs_perslid_cols_key PRIMARY KEY,
prs_perslid_tabs_key
NUMBER(10)
CONSTRAINT fac_r_perslid_cols_tabs_key REFERENCES prs_perslid_tabs(prs_perslid_tabs_key)
ON DELETE CASCADE,
prs_perslid_cols_volgnr
NUMBER(10) NOT NULL,
prs_perslid_cols_column_name
VARCHAR2(32) NOT NULL,
prs_perslid_cols_visible /* V;Visible; I;Invisible */
VARCHAR2(1)
DEFAULT 'V'
NOT NULL
CONSTRAINT prs_c_perslid_cols_visible CHECK (prs_perslid_cols_visible IN ('V', 'I')),
prs_perslid_cols_combine /* 0;False 1;True */
NUMBER(1)
DEFAULT 0
NOT NULL
CONSTRAINT prs_c_perslid_cols_combine CHECK (prs_perslid_cols_combine IN (0, 1)),
CONSTRAINT prs_u_prs_perslid_cols1 UNIQUE(prs_perslid_tabs_key, prs_perslid_cols_column_name)
);
CREATE SEQUENCE prs_s_prs_perslid_cols_key MINVALUE 1;
/////////////////////////////////////////////////////////////////////////////////////////// FCLT#57020
UPDATE ins_tab_discipline
SET ins_discipline_kpnverplicht = 0
WHERE ins_discipline_kpnverplicht IS NULL;
ALTER TABLE ins_tab_discipline
MODIFY ins_discipline_kpnverplicht NOT NULL;
/////////////////////////////////////////////////////////////////////////////////////////// TWYN#57586
ALTER TABLE bgt_kostenrubriek
ADD fin_btwtabelwaarde_key
NUMBER(10)
CONSTRAINT bgt_r_fin_btwtabelwaarde_key REFERENCES fin_btwtabelwaarde (fin_btwtabelwaarde_key);
/////////////////////////////////////////////////////////////////////////////////////////// FCLT#57586
ALTER TABLE fac_version
ADD fac_version_upgrading
VARCHAR(64);
/////////////////////////////////////////////////////////////////////////////////////////// PLAT#51673
CREATE OR REPLACE PROCEDURE tmp_insert (n IN VARCHAR2)
AS
stmt VARCHAR2 (1000);
BEGIN
stmt := 'INSERT INTO ' || n;
EXECUTE IMMEDIATE stmt;
DBMS_OUTPUT.put_line ('Successfully created: ' || n);
EXCEPTION
WHEN OTHERS
THEN
DBMS_OUTPUT.put_line ('message allready exists, not created: ' || n);
NULL;
END;
/
BEGIN
tmp_insert('fac_message VALUES (''ALG_M999'', ''Kan onroerendgoed niet verwijderen. Er zijn nog objecten of lopende meldingen.'')');
tmp_insert('fac_message VALUES (''FAC_I_FAC_GEBRUIKERSGROEP1'', ''De combinatie gebruiker/groep is niet uniek.'')');
tmp_insert('fac_message VALUES (''FAC_U_FAC_USRRAP'', ''De rapportomschrijving moet uniek zijn'')');
tmp_insert('fac_message VALUES (''FAC_C_MENU1'', ''De afwijkende URL of de menuoptie bij Standaardgegevens moet ingevuld zijn.'')');
tmp_insert('fac_message VALUES (''BES_I_BES_SRTDEEL2'', ''De combinatie artikelnummer, leverancier en groep is niet uniek.'')');
tmp_insert('fac_message VALUES (''MLD_U_MLD_SRTKENMERK_UPPER'', ''De omschrijving van kenmerksoort is niet uniek.'')');
tmp_insert('fac_message VALUES (''MLD_U_MLD_STDMELDING'', ''De vakgroep en omschrijving moeten uniek zijn.'')');
tmp_insert('fac_message VALUES (''RES_M960'', ''U probeerde ruimte te reserveren met key='')');
tmp_insert('fac_message VALUES (''RES_C_RES_RSV_RUIMTE_KORTING'', ''De korting moet gelijk of groter dan 0 zijn.'')');
tmp_insert('fac_message VALUES (''RES_C_RES_RSV_ARTIKEL_AANTAL'', ''Het aantal artikelen is niet ingevuld.'')');
tmp_insert('fac_message VALUES (''INS_U_INS_DEEL_UPPER2'', ''Het veld ''''Identificatie'''' is niet uniek binnen de combinatie Locatie/Objectsoort.'')');
END;
/
DROP PROCEDURE tmp_insert;
/////////////////////////////////////////////////////////////////////////////////////////// FCLT#57680
ALTER TABLE mld_melding
ADD prs_afdeling_key NUMBER (10)
CONSTRAINT mld_r_prs_afdeling_key
REFERENCES prs_afdeling (prs_afdeling_key);
UPDATE fac_functie
SET fac_functie_min_level = 15
WHERE fac_functie_code = 'WEB_MLDUSE';
/////////////////////////////////////////////////////////////////////////////////////////// FCLT#57650
ALTER TABLE alg_kenmerk ADD alg_kenmerk_show_expr VARCHAR2(4000);
ALTER TABLE bes_kenmerk ADD bes_kenmerk_show_expr VARCHAR2(4000);
ALTER TABLE bez_kenmerk ADD bez_kenmerk_show_expr VARCHAR2(4000);
ALTER TABLE cnt_kenmerk ADD cnt_kenmerk_show_expr VARCHAR2(4000);
ALTER TABLE faq_kenmerk ADD faq_kenmerk_show_expr VARCHAR2(4000);
ALTER TABLE fin_kenmerk ADD fin_kenmerk_show_expr VARCHAR2(4000);
ALTER TABLE ins_kenmerk ADD ins_kenmerk_show_expr VARCHAR2(4000);
ALTER TABLE mld_kenmerk ADD mld_kenmerk_show_expr VARCHAR2(4000);
ALTER TABLE prs_kenmerk ADD prs_kenmerk_show_expr VARCHAR2(4000);
ALTER TABLE res_kenmerk ADD res_kenmerk_show_expr VARCHAR2(4000);
UPDATE alg_kenmerk SET alg_kenmerk_show_expr = alg_kenmerk_default, alg_kenmerk_default = '' WHERE alg_kenmerk_default LIKE '##SHOW##%';
UPDATE bes_kenmerk SET bes_kenmerk_show_expr = bes_kenmerk_default, bes_kenmerk_default = '' WHERE bes_kenmerk_default LIKE '##SHOW##%';
UPDATE bez_kenmerk SET bez_kenmerk_show_expr = bez_kenmerk_default, bez_kenmerk_default = '' WHERE bez_kenmerk_default LIKE '##SHOW##%';
UPDATE cnt_kenmerk SET cnt_kenmerk_show_expr = cnt_kenmerk_default, cnt_kenmerk_default = '' WHERE cnt_kenmerk_default LIKE '##SHOW##%';
UPDATE faq_kenmerk SET faq_kenmerk_show_expr = faq_kenmerk_default, faq_kenmerk_default = '' WHERE faq_kenmerk_default LIKE '##SHOW##%';
UPDATE fin_kenmerk SET fin_kenmerk_show_expr = fin_kenmerk_default, fin_kenmerk_default = '' WHERE fin_kenmerk_default LIKE '##SHOW##%';
UPDATE ins_kenmerk SET ins_kenmerk_show_expr = ins_kenmerk_default, ins_kenmerk_default = '' WHERE ins_kenmerk_default LIKE '##SHOW##%';
UPDATE mld_kenmerk SET mld_kenmerk_show_expr = mld_kenmerk_default, mld_kenmerk_default = '' WHERE mld_kenmerk_default LIKE '##SHOW##%';
UPDATE prs_kenmerk SET prs_kenmerk_show_expr = prs_kenmerk_default, prs_kenmerk_default = '' WHERE prs_kenmerk_default LIKE '##SHOW##%';
UPDATE res_kenmerk SET res_kenmerk_show_expr = res_kenmerk_default, res_kenmerk_default = '' WHERE res_kenmerk_default LIKE '##SHOW##%';
/////////////////////////////////////////////////////////////////////////////////////////// FSN#58075
ALTER TABLE prs_bedrijfadres
ADD prs_bedrijfadres_charset VARCHAR(32);
/////////////////////////////////////////////////////////////////////////////////////////// FCLT#58083
UPDATE fac_menuitems
SET fac_menuitems_url = 'appl/mgt/alg_srtruimte.asp'
WHERE fac_menuitems_label = 'lcl_menu_alg_ruimtefuncties';
/////////////////////////////////////////////////////////////////////////////////////////// FSN#57833
ALTER TABLE mld_typeopdr
ADD mld_typeopdr_uren
NUMBER(1)
DEFAULT 1
NOT NULL
CONSTRAINT ins_c_mld_typeopdr_uren CHECK(mld_typeopdr_uren IN (0, 1, 2, 3, 4, 5));
ALTER TABLE mld_typeopdr
ADD mld_typeopdr_materiaal
NUMBER(1)
DEFAULT 1
NOT NULL
CONSTRAINT ins_c_mld_typeopdr_materiaal CHECK(mld_typeopdr_materiaal IN (0, 1, 2));
ALTER TABLE mld_typeopdr
ADD mld_typeopdr_totaal
NUMBER(1)
DEFAULT 1
NOT NULL
CONSTRAINT ins_c_mld_typeopdr_totaal CHECK(mld_typeopdr_totaal IN (0, 1));
ALTER TABLE mld_typeopdr
ADD mld_typeopdr_factuur
NUMBER(1)
DEFAULT 0
NOT NULL
CONSTRAINT ins_c_mld_typeopdr_factuur CHECK(mld_typeopdr_factuur IN (0, 1, 2, 3, 4));
UPDATE mld_typeopdr
SET mld_typeopdr_uren = 1,
mld_typeopdr_materiaal = 1,
mld_typeopdr_totaal = 1,
mld_typeopdr_factuur = 2
WHERE mld_typeopdr_matchtype = 0;
UPDATE mld_typeopdr
SET mld_typeopdr_uren = 1,
mld_typeopdr_materiaal = 1,
mld_typeopdr_totaal = 1,
mld_typeopdr_factuur = 1
WHERE mld_typeopdr_matchtype = 1;
UPDATE mld_typeopdr
SET mld_typeopdr_uren = 1,
mld_typeopdr_materiaal = 1,
mld_typeopdr_totaal = 1,
mld_typeopdr_factuur = 3
WHERE mld_typeopdr_matchtype = 2;
UPDATE mld_typeopdr
SET mld_typeopdr_uren = 5,
mld_typeopdr_materiaal = 0,
mld_typeopdr_totaal = 0,
mld_typeopdr_factuur = 0
WHERE mld_typeopdr_matchtype = 3;
UPDATE mld_typeopdr
SET mld_typeopdr_uren = 1,
mld_typeopdr_materiaal = 0,
mld_typeopdr_totaal = 0,
mld_typeopdr_factuur = 0
WHERE mld_typeopdr_matchtype = 4;
UPDATE mld_typeopdr
SET mld_typeopdr_uren = 0,
mld_typeopdr_materiaal = 1,
mld_typeopdr_totaal = 0,
mld_typeopdr_factuur = 3
WHERE mld_typeopdr_matchtype = 5;
UPDATE mld_typeopdr
SET mld_typeopdr_uren = 3,
mld_typeopdr_materiaal = 1,
mld_typeopdr_totaal = 1,
mld_typeopdr_factuur = 0
WHERE mld_typeopdr_matchtype = 6;
UPDATE mld_typeopdr
SET mld_typeopdr_uren = 4,
mld_typeopdr_materiaal = 1,
mld_typeopdr_totaal = 1,
mld_typeopdr_factuur = 0
WHERE mld_typeopdr_matchtype = 7;
/////////////////////////////////////////////////////////////////////////////////////////// SVRZ#56758
BEGIN
adm.tryalter('TABLE mld_stdmelding DROP CONSTRAINT mld_c_alg_onrgoed_objniveau');
adm.tryalter('TABLE mld_stdmelding DROP CONSTRAINT mld_c_alg_onrgoed_obj_niveau');
END;
/
ALTER TABLE mld_stdmelding
ADD CONSTRAINT mld_c_alg_onrgoed_obj_niveau CHECK (alg_onrgoed_obj_niveau IN ('A','L','G','V','R'));
/////////////////////////////////////////////////////////////////////////////////////////// FCLT#55795
ALTER TABLE fac_locale_xsl MODIFY fac_locale_xsl_tekst VARCHAR2(4000);
ALTER TABLE fac_locale_xsl MODIFY fac_locale_xsl_cust VARCHAR2(4000);
/////////////////////////////////////////////////////////////////////////////////////////// FCLT#58238
ALTER TABLE ins_srtdiscipline
DROP CONSTRAINT ins_c_ins_srtdiscipline_kk;
ALTER TABLE ins_srtdiscipline
ADD CONSTRAINT ins_c_ins_srtdiscipline_kk CHECK(ins_srtdiscipline_kostenklant IN (0,1,2,4,5,6,8,9,10));
/////////////////////////////////////////////////////////////////////////////////////////// FCLT#57835
CREATE TABLE fac_bijlagen
(
fac_bijlagen_key
NUMBER(10)
CONSTRAINT fac_k_fac_bijlagen_key PRIMARY KEY
, fac_bijlagen_module
VARCHAR2(3) NOT NULL
, fac_bijlagen_disk_directory
VARCHAR2(200) NOT NULL
, fac_bijlagen_disk_filename
VARCHAR2(200)
, fac_bijlagen_filename
VARCHAR2(200) NOT NULL
, fac_bijlagen_description
VARCHAR2(500)
, fac_bijlagen_digest
VARCHAR2(63)
, fac_bijlagen_content_type
VARCHAR2(50)
, fac_bijlagen_file_size
NUMBER(12) NOT NULL
, fac_bijlagen_root_key
NUMBER(10)
, fac_bijlagen_aanmaak
DATE DEFAULT SYSDATE
, fac_bijlagen_verwijder
DATE
, CONSTRAINT fac_r_bijlagen_root_key
FOREIGN KEY (fac_bijlagen_root_key) REFERENCES fac_bijlagen(fac_bijlagen_key)
);
CREATE SEQUENCE fac_s_fac_bijlagen_key MINVALUE 1;
CREATE INDEX fac_i_fac_bijlagen_root_key ON fac_bijlagen(fac_bijlagen_root_key);
BEGIN
adm.tyalter('TABLE alg_onrgoedkenmerk DROP CONSTRAINT alg_u_alg_onrgoedkenmerk_key');
adm.trydrop('INDEX alg_u_alg_onrgoedkenmerk_key');
adm.tyalter('TABLE bes_kenmerkbesteli DROP CONSTRAINT bes_u_bes_kenmerkbesteli');
adm.trydrop('INDEX bes_u_bes_kenmerkbesteli');
adm.tyalter('TABLE bes_kenmerkbestell DROP CONSTRAINT bes_u_bes_kenmerkbestell');
adm.trydrop('INDEX bes_u_bes_kenmerkbestell');
adm.tyalter('TABLE bez_kenmerkwaarde DROP CONSTRAINT bez_u_bez_kenmerkwaarde_key');
adm.trydrop('INDEX bez_u_bez_kenmerkwaarde_key');
adm.tyalter('TABLE cnt_kenmerkcontract DROP CONSTRAINT cnt_u_cnt_kenmerkcontract');
adm.trydrop('INDEX cnt_u_cnt_kenmerkcontract');
adm.tyalter('TABLE faq_kenmerkwaarde DROP CONSTRAINT faq_u_faq_kenmerkwaarde_key');
adm.trydrop('INDEX faq_u_faq_kenmerkwaarde_key');
adm.tyalter('TABLE fin_kenmerkfactregel DROP CONSTRAINT fin_u_kenmerkfactregel_key');
adm.trydrop('INDEX fin_u_kenmerkfactregel_key');
adm.tyalter('TABLE fin_kenmerkfactuur DROP CONSTRAINT fin_u_fin_kenmerkfactuur_key');
adm.trydrop('INDEX fin_u_fin_kenmerkfactuur_key');
adm.tyalter('TABLE ins_kenmerkdeel DROP CONSTRAINT ins_u_ins_kenmerkdeel');
adm.trydrop('INDEX ins_u_ins_kenmerkdeel');
adm.tyalter('TABLE mld_kenmerkmelding DROP CONSTRAINT mld_u_mld_kenmerkmelding');
adm.trydrop('INDEX mld_u_mld_kenmerkmelding');
adm.tyalter('TABLE prs_kenmerklink DROP CONSTRAINT prs_u_prs_kenmerklink_key');
adm.trydrop('INDEX prs_u_prs_kenmerklink_key');
adm.tyalter('TABLE res_kenmerkwaarde DROP CONSTRAINT res_u_res_kenmerkwaarde');
adm.trydrop('INDEX res_u_res_kenmerkwaarde');
END;
/
/////////////////////////////////////////////////////////////////////////////////////////// FCLT#54611
INSERT INTO fac_usrrap (fac_usrrap_omschrijving, fac_usrrap_view_name,fac_usrrap_info, fac_functie_key)
SELECT 'Usage Statistics','FAC_V_USAGE_STATISTICS','Basisrapport voor gebruik statistieken', fac_functie_key
FROM fac_functie WHERE fac_functie_code='WEB_PRSSYS'
AND NOT EXISTS (SELECT '' FROM fac_usrrap WHERE UPPER(fac_usrrap_view_name)='FAC_V_USAGE_STATISTICS');
DEF_MENUITEM(2, 'lcl_menu_about', '', 'FAC', 'appl/fac/about.asp', 0, 0, 'WEB_PRSSYS', 'W', '1', '');
MENU_INS_AFTER('lcl_menu_about', 'lcl_menu_fac_eigen_tabellen', 2);
/////////////////////////////////////////////////////////////////////////////////////////// FCLT#57661
ALTER TABLE mld_workflowstep
ADD mld_workflowstep_attachments NUMBER(3)
DEFAULT 0 NOT NULL;
UPDATE mld_workflowstep
SET mld_workflowstep_attachments = 2
WHERE (SELECT fac_setting_pvalue FROM fac_setting WHERE fac_setting_name = 'fac_reserved_number1') = 1;
UPDATE fac_setting
SET fac_setting_pvalue = NULL
WHERE fac_setting_name = 'fac_reserved_number1';
/////////////////////////////////////////////////////////////////////////////////////////// BLCC#58290
ALTER TABLE cnt_disc_params
ADD cnt_disc_params_fin NUMBER(3)
DEFAULT 1 NOT NULL;
/////////////////////////////////////////////////////////////////////////////////////////// XXXX#nnnnn
///////////////////////////////////////////////////////////////////////////////////////////
REGISTERONCE('$Id$')
#include "epilogue.inc"