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

CONN#20979

Browse Source 
svn path=/Customer/trunk/; revision=14852
This commit is contained in:
Maarten van der Heide
2011-06-30 14:27:22 +00:00
parent 3b3d63633a
commit d188da3b23
1 changed files with 22 additions and 49 deletions
Download Patch File Download Diff File Expand all files Collapse all files

71
CONN/conn.sql
View File

@@ -1,7 +1,7 @@
-- Script containing customer specific configuration sql statements for CONN: Connexxion
-- (c) 2005-2010 SG|facilitor bv
-- $Revision: 172 $
-- $Modtime: 23-06-11 10:25 $
-- $Revision: 173 $
-- $Modtime: 30-06-11 16:26 $
--
-- Support: +31 53 4800710
@@ -994,11 +994,13 @@ order by 1,5;
CREATE OR REPLACE VIEW CONN_V_PERSLID_Z_LOGWWMAIL (NAAM,NUMMER,LOGIN,WACHTWOORD,EMAIL) AS
SELECT pf.prs_perslid_naam_full, p.prs_perslid_nr, p.prs_perslid_oslogin,
-- TODO 5.1.2 (instead of next line)!!! '*****',
RPAD (' ', LENGTH (p.prs_perslid_wachtwoord) + 1, '*'),
p.prs_perslid_email
FROM prs_perslid p, prs_v_perslid_fullnames pf
WHERE pf.prs_perslid_key = p.prs_perslid_key
AND ( p.prs_perslid_oslogin IS NULL
-- TODO 5.1.2 (instead of next line)!!! OR p.prs_perslid_wachtwoord_hash IS NULL
OR p.prs_perslid_wachtwoord IS NULL
OR p.prs_perslid_email IS NULL
);
@@ -4444,7 +4446,7 @@ BEGIN
FROM DUAL;
fac.imp_writelog (p_applname, p_applrun, 'S',
'Cxx factuurimport $Revision: 172 $', '');
'Cxx factuurimport $Revision: 173 $', '');
OPEN cfactuur;
IF cfactuur%ISOPEN THEN
@@ -8280,7 +8282,6 @@ CREATE OR REPLACE VIEW conn_v_rap_inspectieobj_expimp
ruimte,
fclt_f_discipline,
fclt_f_groep,
fclt_f_objectsoortcode,
fclt_f_objectsoort,
object_id,
fclt_f_merk,
@@ -8305,7 +8306,6 @@ AS
COALESCE (z1.alg_ruimte_nr, z2.alg_ruimte_nr),
x.ins_discipline_omschrijving,
x.ins_srtgroep_omschrijving,
x.ins_srtdeel_code,
x.ins_srtdeel_omschrijving,
x.ins_deel_omschrijving,
k1.merk,
@@ -8593,7 +8593,7 @@ AS
ON x.ins_alg_ruimte_key = z2.prs_werkplek_key
AND x.ins_alg_ruimte_type = z2.alg_ruimte_type;
/* Formatted on 20-5-2011 17:58:58 (QP5 v5.115.810.9015) */
/* Formatted on 30-6-2011 15:35:15 (QP5 v5.115.810.9015) */
CREATE OR REPLACE PROCEDURE conn_import_inspectieobj (
p_applname IN VARCHAR2,
p_applrun IN VARCHAR2,
@@ -8616,7 +8616,6 @@ IS
v_alg_ruimte_nr VARCHAR2 (255); -- C10
v_ins_discipline_omschrijving VARCHAR2 (255); -- C30
v_ins_srtgroep_omschrijving VARCHAR2 (255); -- C60
v_ins_srtdeel_code VARCHAR2 (255); -- C10
v_ins_srtdeel_omschrijving VARCHAR2 (255); -- C100
v_ins_deel_omschrijving VARCHAR2 (255); -- C60
v_merk VARCHAR2 (255); -- C60
@@ -8669,7 +8668,6 @@ BEGIN
fac.imp_getfield (v_newline, c_delim, v_alg_ruimte_nr);
fac.imp_getfield (v_newline, c_delim, v_ins_discipline_omschrijving);
fac.imp_getfield (v_newline, c_delim, v_ins_srtgroep_omschrijving);
fac.imp_getfield (v_newline, c_delim, v_ins_srtdeel_code);
fac.imp_getfield (v_newline, c_delim, v_ins_srtdeel_omschrijving);
fac.imp_getfield (v_newline, c_delim, v_ins_deel_omschrijving);
fac.imp_getfield (v_newline, c_delim, v_merk);
@@ -8695,8 +8693,6 @@ BEGIN
|| '|'
|| v_ins_srtgroep_omschrijving
|| '|'
|| v_ins_srtdeel_code
|| '|'
|| v_ins_srtdeel_omschrijving
|| '|'
|| v_ins_deel_omschrijving
@@ -8711,7 +8707,6 @@ BEGIN
AND UPPER (v_alg_ruimte_nr) = 'RUIMTE'
AND UPPER (v_ins_discipline_omschrijving) = 'DISCIPLINE'
AND UPPER (v_ins_srtgroep_omschrijving) = 'GROEP'
AND UPPER (v_ins_srtdeel_code) = 'OBJECTSOORTCODE'
AND UPPER (v_ins_srtdeel_omschrijving) = 'OBJECTSOORT'
AND UPPER (v_ins_deel_omschrijving) = 'OBJECT_ID'
AND UPPER (v_merk) = 'MERK'
@@ -8808,23 +8803,7 @@ BEGIN
);
END IF;
--
v_errormsg := 'Objectsoortcode ongeldig';
v_ins_srtdeel_code := TRIM (v_ins_srtdeel_code);
IF LENGTH (v_ins_srtdeel_code) > 10
THEN
v_ins_srtdeel_code := SUBSTR (TRIM (v_ins_srtdeel_code), 1, 10);
fac.imp_writelog (
p_applname,
p_applrun,
'W',
v_aanduiding || v_errormsg,
'Objectsoortcode wordt afgebroken tot ['
|| v_ins_srtdeel_code
|| ']'
);
END IF;
-- VERVALLEN 'Objectsoortcode'
--
v_errormsg := 'Objectsoortomschrijving ongeldig';
@@ -9095,7 +9074,7 @@ BEGIN
alg_ruimte_nr,
ins_discipline_omschrijving,
ins_srtgroep_omschrijving,
ins_srtdeel_code,
--ins_srtdeel_code, -- VERVALLEN
ins_srtdeel_omschrijving,
ins_deel_omschrijving,
merk,
@@ -9116,7 +9095,7 @@ BEGIN
v_alg_ruimte_nr,
v_ins_discipline_omschrijving,
v_ins_srtgroep_omschrijving,
v_ins_srtdeel_code,
--v_ins_srtdeel_code, -- VERVALLEN
v_ins_srtdeel_omschrijving,
v_ins_deel_omschrijving,
v_merk,
@@ -9207,7 +9186,7 @@ EXCEPTION
END conn_import_inspectieobj;
/
/* Formatted on 9-6-2011 15:04:20 (QP5 v5.115.810.9015) */
/* Formatted on 30-6-2011 15:45:15 (QP5 v5.115.810.9015) */
CREATE OR REPLACE PROCEDURE conn_update_inspectieobj (
p_applname IN VARCHAR2,
p_applrun IN VARCHAR2
@@ -9264,7 +9243,7 @@ AS
ins_discipline_min_level,
ins_discipline_kpnverplicht)
VALUES ('INS',
SUBSTR (rec.ins_discipline_omschrijving, 1, 30),
rec.ins_discipline_omschrijving,
1,
0)
RETURNING ins_discipline_key INTO v_discipline_key;
@@ -9381,9 +9360,7 @@ AS
VALUES (
v_discipline_key,
'INS',
SUBSTR (TRIM (rec.ins_srtgroep_omschrijving),
1,
30)
rec.ins_srtgroep_omschrijving
);
COMMIT;
@@ -9434,17 +9411,18 @@ AS
IS
SELECT UPPER (ins_discipline_omschrijving) ins_discipline_upper,
UPPER (ins_srtgroep_omschrijving) ins_srtgroep_upper,
UPPER (ins_srtdeel_code) ins_srtdeel_code_upper,
UPPER (ins_srtdeel_omschrijving) ins_srtdeel_upper,
MAX(UPPER( SUBSTR (ins_srtgroep_omschrijving, 1, 2)
|| '-'
|| SUBSTR (ins_srtdeel_omschrijving, 1, 2)))
new_srtdeel_code_upper,
MAX (ins_discipline_omschrijving)
ins_discipline_omschrijving,
MAX (ins_srtgroep_omschrijving) ins_srtgroep_omschrijving,
MAX (ins_srtdeel_code) ins_srtdeel_code,
MAX (ins_srtdeel_omschrijving) ins_srtdeel_omschrijving
FROM conn_imp_inspectieobj
GROUP BY UPPER (ins_discipline_omschrijving),
UPPER (ins_srtgroep_omschrijving),
UPPER (ins_srtdeel_code),
UPPER (ins_srtdeel_omschrijving);
v_errormsg VARCHAR2 (1024);
@@ -9514,7 +9492,7 @@ AS
ins_srtdeel_binding)
VALUES (v_srtgroep_key,
'INS',
rec.ins_srtdeel_code,
rec.new_srtdeel_code_upper,
rec.ins_srtdeel_omschrijving,
17);
@@ -9567,7 +9545,6 @@ AS
IS
SELECT ins_discipline_omschrijving,
ins_srtgroep_omschrijving,
ins_srtdeel_code,
ins_srtdeel_omschrijving,
ins_deel_omschrijving,
merk,
@@ -9654,8 +9631,6 @@ AS
|| '|'
|| rec.ins_srtgroep_omschrijving
|| '|'
|| rec.ins_srtdeel_code
|| '|'
|| rec.ins_srtdeel_omschrijving
|| '|'
|| rec.ins_deel_omschrijving
@@ -9728,12 +9703,10 @@ AS
ELSE -- Object bestaat nog niet op locatie, dus toevoegen!
v_errormsg := 'Fout bij bepalen default ID';
SELECT FAC_F_FAC_GET_DESCRIPTION (
'LPN_INS_DEEL',
NULL,
UPPER (rec.ins_srtdeel_code),
v_srtdeel_key
)
SELECT FAC_F_FAC_GET_DESCRIPTION ('LPN_INS_DEEL',
NULL,
UPPER (ins_srtdeel_code),
v_srtdeel_key)
INTO v_deel_oms
FROM ins_srtdeel
WHERE ins_srtdeel_key = v_srtdeel_key;
@@ -10729,7 +10702,7 @@ END conn_update_inspectieobj;
BEGIN fac.registercustversion('CONN', 46); END;
/
BEGIN adm.systrackscript('$Workfile: conn.sql $', '$Revision: 172 $', 0); END;
BEGIN adm.systrackscript('$Workfile: conn.sql $', '$Revision: 173 $', 0); END;
/
COMMIT;