diff --git a/CONN/Once/CONN44.sql b/CONN/Once/CONN44.sql index eacdbd271..898242ee7 100644 --- a/CONN/Once/CONN44.sql +++ b/CONN/Once/CONN44.sql @@ -1,8 +1,8 @@ -- Customer specific once-script CONN44. -- -- (c) 2011 SG|facilitor bv --- $Revision: 1 $ --- $Modtime: 1-06-11 16:26 $ +-- $Revision: 2 $ +-- $Modtime: 7-06-11 14:40 $ -- -- Support: +31 53 4800700 SET ECHO ON @@ -87,29 +87,49 @@ INSERT INTO fac_usrrap (fac_usrrap_omschrijving, 0); -- reanimeer oude huur/verhuurcontracten omdat de einddatum nooit aangepast is. +-- WHERE ins_discipline_key IN (1564, 1565) betreft: inhuur en verhuurcontracten UPDATE cnt_contract SET cnt_contract_looptijd_tot = TO_DATE ('20200101', 'yyyymmdd') - WHERE ins_discipline_key IN (1564, 1565) -- inhuur en verhuurcontracten + WHERE ins_discipline_key IN (1564, 1565) AND cnt_contract_looptijd_tot < SYSDATE; COMMIT; --- Converteer last/next keurdatum -/* Formatted on 1-6-2011 16:10:30 (QP5 v5.115.810.9015) */ +-- verwijder ooit eens achtergebleven contract-object-koppeling! +-- WHERE cnt_ins_srtdeel_key = 27846 betreft: objectsoort '.' +UPDATE cnt_contract_object + SET cnt_contract_object_verwijder = SYSDATE + WHERE cnt_ins_srtdeel_key = 27846 + AND cnt_contract_object_verwijder IS NULL; + +-- verwijder deel-onderdeel-koppeling! +-- WHERE ins_deel_key = 93556 betreft: object 'OVERIG001' +UPDATE ins_deel + SET ins_deel_verwijder = SYSDATE + WHERE ins_deel_key = 93556 + AND ins_deel_verwijder IS NULL; + +COMMIT; + +-- Converteer Datum gekeurd, Datum volgende keuring en - voor objectsoort +-- 27844='Slipvangers en OBAS' - Bouwjaar +/* Formatted on 7-6-2011 10:32:16 (QP5 v5.115.810.9015) */ DECLARE - v_errormsg VARCHAR2 (1024); - c_controle_soort VARCHAR2 (60) := '_DEFAULT'; - c_controle_periode NUMBER (10) := 360; - v_srtcontrole_id VARCHAR2 (20); - v_controlemode_key NUMBER (10); - laatste DATE; - ccount NUMBER (10); - oracle_err_num NUMBER; - oracle_err_mes VARCHAR2 (200); - v_count_tot NUMBER (10) := 0; - v_count_1 NUMBER (10) := 0; - v_count_2 NUMBER (10) := 0; - v_aanduiding VARCHAR (200); + v_errormsg VARCHAR2 (1024); + c_controle_soort VARCHAR2 (60) := '_DEFAULT'; + c_controle_periode_1 NUMBER (10) := 365; + --XXc_controle_periode_5 NUMBER (10) := 1826; + c_controle_periode_15 NUMBER (10) := 5478; + v_srtcontrole_id VARCHAR2 (20); + v_controlemode_key NUMBER (10); + laatste DATE; + ccount NUMBER (10); + oracle_err_num NUMBER; + oracle_err_mes VARCHAR2 (200); + v_count_tot NUMBER (10) := 0; + v_count_1 NUMBER (10) := 0; + v_count_2 NUMBER (10) := 0; + v_aanduiding VARCHAR (200); BEGIN FOR rc IN ( SELECT z1.discipline_key, @@ -124,224 +144,321 @@ BEGIN z1.next_keur, fac.safe_to_date (z3.waarde, 'dd-mm-yyyy') b, z1.keuringsinstantie, - z6.waarde e - FROM (SELECT l.alg_locatie_omschrijving werkplaats, - td.ins_discipline_omschrijving discipline, - td.ins_discipline_key discipline_key, - sg.ins_srtgroep_omschrijving groep, - sg.ins_srtgroep_key groep_key, - sd.ins_srtdeel_code objectsoortcode, - sd.ins_srtdeel_omschrijving objectsoort, - sd.ins_srtdeel_key objectsoort_key, - d.ins_deel_key, - d.ins_deel_omschrijving, - d.ins_deel_verwijder, - y.keur_datum, - y.next_keur, - y.keuringsinstantie - FROM ( SELECT DISTINCT - x.ins_srtdeel_key, - MAX (x.k2) keur_datum, - MAX (x.k3) next_keur, - MAX (x.k6) keuringsinstantie - FROM (SELECT sd.ins_srtdeel_key, - k.ins_kenmerk_key k2, - NULL k3, - NULL k6 - FROM ins_v_aanwezigsrtkenmerk sk, - ins_v_aanwezigkenmerk k, - ins_srtgroep sg, - ins_srtdeel sd - WHERE sk.ins_srtkenmerk_key = - 52 -- Datum gekeurd/discipline - AND sk.ins_srtkenmerk_key = - k.ins_srtkenmerk_key - AND k.ins_kenmerk_niveau = - 'D' - AND k.ins_srtinstallatie_key = - sg.ins_discipline_key - AND sg.ins_srtgroep_key = - sd.ins_srtgroep_key - UNION ALL - SELECT sd.ins_srtdeel_key, - k.ins_kenmerk_key k2, - NULL k3, - NULL k6 - FROM ins_v_aanwezigsrtkenmerk sk, - ins_v_aanwezigkenmerk k, - ins_srtgroep sg, - ins_srtdeel sd - WHERE sk.ins_srtkenmerk_key = - 52 -- Datum gekeurd/groep - AND sk.ins_srtkenmerk_key = - k.ins_srtkenmerk_key - AND k.ins_kenmerk_niveau = - 'G' - AND k.ins_srtinstallatie_key = - sg.ins_srtgroep_key - AND sg.ins_srtgroep_key = - sd.ins_srtgroep_key - UNION ALL - SELECT sd.ins_srtdeel_key, - k.ins_kenmerk_key k2, - NULL k3, - NULL k6 - FROM ins_v_aanwezigsrtkenmerk sk, - ins_v_aanwezigkenmerk k, - ins_srtdeel sd - WHERE sk.ins_srtkenmerk_key = - 52 -- Datum gekeurd/objectsoort - AND sk.ins_srtkenmerk_key = - k.ins_srtkenmerk_key - AND k.ins_kenmerk_niveau = - 'S' - AND k.ins_srtinstallatie_key = - sd.ins_srtdeel_key - UNION ALL -- Datum volgende keuring - SELECT sd.ins_srtdeel_key, - NULL k2, - k.ins_kenmerk_key k3, - NULL k6 - FROM ins_v_aanwezigsrtkenmerk sk, - ins_v_aanwezigkenmerk k, - ins_srtgroep sg, - ins_srtdeel sd - WHERE sk.ins_srtkenmerk_key = - 75 -- Datum volgende keuring/discipline - AND sk.ins_srtkenmerk_key = - k.ins_srtkenmerk_key - AND k.ins_kenmerk_niveau = - 'D' - AND k.ins_srtinstallatie_key = - sg.ins_discipline_key - AND sg.ins_srtgroep_key = - sd.ins_srtgroep_key - UNION ALL - SELECT sd.ins_srtdeel_key, - NULL k2, - k.ins_kenmerk_key k3, - NULL k6 - FROM ins_v_aanwezigsrtkenmerk sk, - ins_v_aanwezigkenmerk k, - ins_srtgroep sg, - ins_srtdeel sd - WHERE sk.ins_srtkenmerk_key = - 75 -- Datum volgende keuring/groep - AND sk.ins_srtkenmerk_key = - k.ins_srtkenmerk_key - AND k.ins_kenmerk_niveau = - 'G' - AND k.ins_srtinstallatie_key = - sg.ins_srtgroep_key - AND sg.ins_srtgroep_key = - sd.ins_srtgroep_key - UNION ALL - SELECT sd.ins_srtdeel_key, - NULL k2, - k.ins_kenmerk_key k3, - NULL k6 - FROM ins_v_aanwezigsrtkenmerk sk, - ins_v_aanwezigkenmerk k, - ins_srtdeel sd - WHERE sk.ins_srtkenmerk_key = - 75 -- Datum volgende keuring/soort - AND sk.ins_srtkenmerk_key = - k.ins_srtkenmerk_key - AND k.ins_kenmerk_niveau = - 'S' - AND k.ins_srtinstallatie_key = - sd.ins_srtdeel_key - UNION ALL -- Keuringsinstantie - SELECT sd.ins_srtdeel_key, - NULL k2, - NULL k3, - k.ins_kenmerk_key k6 - FROM ins_v_aanwezigsrtkenmerk sk, - ins_v_aanwezigkenmerk k, - ins_srtgroep sg, - ins_srtdeel sd - WHERE sk.ins_srtkenmerk_key IN - (1153, 1325) -- Keuringsinstantie/discipline - AND sk.ins_srtkenmerk_key = - k.ins_srtkenmerk_key - AND k.ins_kenmerk_niveau = - 'D' - AND k.ins_srtinstallatie_key = - sg.ins_discipline_key - AND sg.ins_srtgroep_key = - sd.ins_srtgroep_key - UNION ALL - SELECT sd.ins_srtdeel_key, - NULL k2, - NULL k3, - k.ins_kenmerk_key k6 - FROM ins_v_aanwezigsrtkenmerk sk, - ins_v_aanwezigkenmerk k, - ins_srtgroep sg, - ins_srtdeel sd - WHERE sk.ins_srtkenmerk_key IN - (1153, 1325) -- Keuringsinstantie/groep - AND sk.ins_srtkenmerk_key = - k.ins_srtkenmerk_key - AND k.ins_kenmerk_niveau = - 'G' - AND k.ins_srtinstallatie_key = - sg.ins_srtgroep_key - AND sg.ins_srtgroep_key = - sd.ins_srtgroep_key - UNION ALL - SELECT sd.ins_srtdeel_key, - NULL k2, - NULL k3, - k.ins_kenmerk_key k6 - FROM ins_v_aanwezigsrtkenmerk sk, - ins_v_aanwezigkenmerk k, - ins_srtdeel sd - WHERE sk.ins_srtkenmerk_key IN - (1153, 1325) -- Keuringsinstantie/soort - AND sk.ins_srtkenmerk_key = - k.ins_srtkenmerk_key - AND k.ins_kenmerk_niveau = - 'S' - AND k.ins_srtinstallatie_key = - sd.ins_srtdeel_key) - x - GROUP BY x.ins_srtdeel_key) y, - ins_deel d, - ins_srtdeel sd, - ins_srtgroep sg, - ins_tab_discipline td, - alg_locatie l - WHERE y.ins_srtdeel_key = d.ins_srtdeel_key - AND d.ins_srtdeel_key = sd.ins_srtdeel_key - AND sd.ins_srtgroep_key = - sg.ins_srtgroep_key - AND sg.ins_discipline_key = - td.ins_discipline_key - AND d.ins_alg_locatie_key = - l.alg_locatie_key(+)) z1 + z6.waarde e, + z1.bouwjaar, + fac.safe_to_number (z7.waarde) f + FROM (SELECT td.ins_discipline_omschrijving + discipline, + td.ins_discipline_key discipline_key, + sg.ins_srtgroep_omschrijving groep, + sg.ins_srtgroep_key groep_key, + sd.ins_srtdeel_code objectsoortcode, + sd.ins_srtdeel_omschrijving + objectsoort, + sd.ins_srtdeel_key objectsoort_key, + d.ins_deel_key, + d.ins_deel_omschrijving, + d.ins_deel_verwijder, + l.alg_locatie_key, + y.keur_datum, + y.next_keur, + y.keuringsinstantie, + y.bouwjaar + FROM ( SELECT DISTINCT + x.ins_srtdeel_key, + MAX (x.k2) keur_datum, + MAX (x.k3) next_keur, + MAX (x.k6) + keuringsinstantie, + MAX (x.k7) bouwjaar + FROM (SELECT sd.ins_srtdeel_key, + k.ins_kenmerk_key + k2, + NULL k3, + NULL k6, + NULL k7 + FROM ins_v_aanwezigsrtkenmerk sk, + ins_v_aanwezigkenmerk k, + ins_srtgroep sg, + ins_srtdeel sd + WHERE sk.ins_srtkenmerk_key = + 52 -- Datum gekeurd/discipline + AND sk.ins_srtkenmerk_key = + k.ins_srtkenmerk_key + AND k.ins_kenmerk_niveau = + 'D' + AND k.ins_srtinstallatie_key = + sg.ins_discipline_key + AND sg.ins_srtgroep_key = + sd.ins_srtgroep_key + UNION ALL + SELECT sd.ins_srtdeel_key, + k.ins_kenmerk_key + k2, + NULL k3, + NULL k6, + NULL k7 + FROM ins_v_aanwezigsrtkenmerk sk, + ins_v_aanwezigkenmerk k, + ins_srtgroep sg, + ins_srtdeel sd + WHERE sk.ins_srtkenmerk_key = + 52 -- Datum gekeurd/groep + AND sk.ins_srtkenmerk_key = + k.ins_srtkenmerk_key + AND k.ins_kenmerk_niveau = + 'G' + AND k.ins_srtinstallatie_key = + sg.ins_srtgroep_key + AND sg.ins_srtgroep_key = + sd.ins_srtgroep_key + UNION ALL + SELECT sd.ins_srtdeel_key, + k.ins_kenmerk_key + k2, + NULL k3, + NULL k6, + NULL k7 + FROM ins_v_aanwezigsrtkenmerk sk, + ins_v_aanwezigkenmerk k, + ins_srtdeel sd + WHERE sk.ins_srtkenmerk_key = + 52 -- Datum gekeurd/objectsoort + AND sk.ins_srtkenmerk_key = + k.ins_srtkenmerk_key + AND k.ins_kenmerk_niveau = + 'S' + AND k.ins_srtinstallatie_key = + sd.ins_srtdeel_key + UNION ALL -- Datum volgende keuring + SELECT sd.ins_srtdeel_key, + NULL k2, + k.ins_kenmerk_key + k3, + NULL k6, + NULL k7 + FROM ins_v_aanwezigsrtkenmerk sk, + ins_v_aanwezigkenmerk k, + ins_srtgroep sg, + ins_srtdeel sd + WHERE sk.ins_srtkenmerk_key = + 75 -- Datum volgende keuring/discipline + AND sk.ins_srtkenmerk_key = + k.ins_srtkenmerk_key + AND k.ins_kenmerk_niveau = + 'D' + AND k.ins_srtinstallatie_key = + sg.ins_discipline_key + AND sg.ins_srtgroep_key = + sd.ins_srtgroep_key + UNION ALL + SELECT sd.ins_srtdeel_key, + NULL k2, + k.ins_kenmerk_key + k3, + NULL k6, + NULL k7 + FROM ins_v_aanwezigsrtkenmerk sk, + ins_v_aanwezigkenmerk k, + ins_srtgroep sg, + ins_srtdeel sd + WHERE sk.ins_srtkenmerk_key = + 75 -- Datum volgende keuring/groep + AND sk.ins_srtkenmerk_key = + k.ins_srtkenmerk_key + AND k.ins_kenmerk_niveau = + 'G' + AND k.ins_srtinstallatie_key = + sg.ins_srtgroep_key + AND sg.ins_srtgroep_key = + sd.ins_srtgroep_key + UNION ALL + SELECT sd.ins_srtdeel_key, + NULL k2, + k.ins_kenmerk_key + k3, + NULL k6, + NULL k7 + FROM ins_v_aanwezigsrtkenmerk sk, + ins_v_aanwezigkenmerk k, + ins_srtdeel sd + WHERE sk.ins_srtkenmerk_key = + 75 -- Datum volgende keuring/soort + AND sk.ins_srtkenmerk_key = + k.ins_srtkenmerk_key + AND k.ins_kenmerk_niveau = + 'S' + AND k.ins_srtinstallatie_key = + sd.ins_srtdeel_key + UNION ALL -- Keuringsinstantie + SELECT sd.ins_srtdeel_key, + NULL k2, + NULL k3, + k.ins_kenmerk_key + k6, + NULL k7 + FROM ins_v_aanwezigsrtkenmerk sk, + ins_v_aanwezigkenmerk k, + ins_srtgroep sg, + ins_srtdeel sd + WHERE sk.ins_srtkenmerk_key IN + (1153, + 1325) -- Keuringsinstantie/discipline + AND sk.ins_srtkenmerk_key = + k.ins_srtkenmerk_key + AND k.ins_kenmerk_niveau = + 'D' + AND k.ins_srtinstallatie_key = + sg.ins_discipline_key + AND sg.ins_srtgroep_key = + sd.ins_srtgroep_key + UNION ALL + SELECT sd.ins_srtdeel_key, + NULL k2, + NULL k3, + k.ins_kenmerk_key + k6, + NULL k7 + FROM ins_v_aanwezigsrtkenmerk sk, + ins_v_aanwezigkenmerk k, + ins_srtgroep sg, + ins_srtdeel sd + WHERE sk.ins_srtkenmerk_key IN + (1153, + 1325) -- Keuringsinstantie/groep + AND sk.ins_srtkenmerk_key = + k.ins_srtkenmerk_key + AND k.ins_kenmerk_niveau = + 'G' + AND k.ins_srtinstallatie_key = + sg.ins_srtgroep_key + AND sg.ins_srtgroep_key = + sd.ins_srtgroep_key + UNION ALL + SELECT sd.ins_srtdeel_key, + NULL k2, + NULL k3, + k.ins_kenmerk_key + k6, + NULL k7 + FROM ins_v_aanwezigsrtkenmerk sk, + ins_v_aanwezigkenmerk k, + ins_srtdeel sd + WHERE sk.ins_srtkenmerk_key IN + (1153, + 1325) -- Keuringsinstantie/soort + AND sk.ins_srtkenmerk_key = + k.ins_srtkenmerk_key + AND k.ins_kenmerk_niveau = + 'S' + AND k.ins_srtinstallatie_key = + sd.ins_srtdeel_key + UNION ALL -- Bouwjaar + SELECT sd.ins_srtdeel_key, + NULL k2, + NULL k3, + NULL k6, + k.ins_kenmerk_key + k7 + FROM ins_v_aanwezigsrtkenmerk sk, + ins_v_aanwezigkenmerk k, + ins_srtdeel sd + WHERE sk.ins_srtkenmerk_key = + 44 -- Bouwjaar/soort + AND sk.ins_srtkenmerk_key = + k.ins_srtkenmerk_key + AND k.ins_kenmerk_niveau = + 'S' + AND k.ins_srtinstallatie_key = + sd.ins_srtdeel_key + AND sd.ins_srtdeel_key = + 27844) x + GROUP BY x.ins_srtdeel_key) y, + ins_deel d, + ins_srtdeel sd, + ins_srtgroep sg, + ins_tab_discipline td, + alg_v_aanweziglocatie l + WHERE y.ins_srtdeel_key NOT IN + (27846, 37101) -- . en Afvalverwerking + AND y.ins_srtdeel_key = + d.ins_srtdeel_key + AND d.ins_srtdeel_key = + sd.ins_srtdeel_key + AND sd.ins_srtgroep_key = + sg.ins_srtgroep_key + AND sg.ins_discipline_key = + td.ins_discipline_key + AND d.ins_alg_locatie_key = + l.alg_locatie_key(+) + UNION ALL + SELECT td.ins_discipline_omschrijving + discipline, + td.ins_discipline_key discipline_key, + sg.ins_srtgroep_omschrijving groep, + sg.ins_srtgroep_key groep_key, + sd.ins_srtdeel_code objectsoortcode, + sd.ins_srtdeel_omschrijving + objectsoort, + sd.ins_srtdeel_key objectsoort_key, + NULL, + NULL, + NULL, + NULL, + NULL, + NULL, + NULL, + NULL + FROM ins_srtdeel sd, + ins_srtgroep sg, + ins_tab_discipline td + WHERE sd.ins_srtdeel_key IN + (27829, 27841, 37082) + AND sd.ins_srtgroep_key = + sg.ins_srtgroep_key + AND sg.ins_discipline_key = + td.ins_discipline_key) z1 + LEFT JOIN + (SELECT ok.alg_onrgoed_key, + fac.safe_to_date ( + ok.alg_onrgoedkenmerk_waarde, + 'dd-mm-yyyy' + ) + datum + FROM alg_v_aanwezigonrgoedkenmerk ok + WHERE ok.alg_kenmerk_key = 22 -- Uit beheer + AND ok.alg_onrgoed_niveau = 'L') + uitbeheer + ON z1.alg_locatie_key = uitbeheer.alg_onrgoed_key + LEFT JOIN + (SELECT kd.ins_deel_key, + kd.ins_kenmerk_key, + kd.ins_kenmerkdeel_waarde waarde + FROM ins_v_aanwezigkenmerkdeel kd) z2 + ON z1.ins_deel_key = z2.ins_deel_key + AND z1.keur_datum = z2.ins_kenmerk_key LEFT JOIN (SELECT kd.ins_deel_key, kd.ins_kenmerk_key, kd.ins_kenmerkdeel_waarde waarde - FROM ins_v_aanwezigkenmerkdeel kd) z2 - ON z1.ins_deel_key = z2.ins_deel_key - AND z1.keur_datum = z2.ins_kenmerk_key + FROM ins_v_aanwezigkenmerkdeel kd) z3 + ON z1.ins_deel_key = z3.ins_deel_key + AND z1.next_keur = z3.ins_kenmerk_key LEFT JOIN (SELECT kd.ins_deel_key, kd.ins_kenmerk_key, kd.ins_kenmerkdeel_waarde waarde - FROM ins_v_aanwezigkenmerkdeel kd) z3 - ON z1.ins_deel_key = z3.ins_deel_key - AND z1.next_keur = z3.ins_kenmerk_key + FROM ins_v_aanwezigkenmerkdeel kd) z6 + ON z1.ins_deel_key = z6.ins_deel_key + AND z1.keuringsinstantie = z6.ins_kenmerk_key LEFT JOIN (SELECT kd.ins_deel_key, kd.ins_kenmerk_key, kd.ins_kenmerkdeel_waarde waarde - FROM ins_v_aanwezigkenmerkdeel kd) z6 - ON z1.ins_deel_key = z6.ins_deel_key - AND z1.keuringsinstantie = z6.ins_kenmerk_key - WHERE z1.ins_deel_verwijder IS NULL + FROM ins_v_aanwezigkenmerkdeel kd) z7 + ON z1.ins_deel_key = z7.ins_deel_key + AND z1.bouwjaar = z7.ins_kenmerk_key + WHERE z1.ins_deel_verwijder IS NULL AND uitbeheer.datum IS NULL ORDER BY 1, 2, 3, @@ -400,7 +517,12 @@ BEGIN 1, 60 ), - c_controle_periode -- Default een jaar! + DECODE (rc.objectsoort_key, + 27844, -- Objectsoort 'Slipvangers en OBAS' + c_controle_periode_15, -- 15 jaar! + --XX97781, -- Objectsoort 'Tank' + --XX c_controle_periode_5, -- 5 jaar! + c_controle_periode_1) -- Default 1 jaar ) RETURNING ins_srtcontrole_key INTO v_srtcontrole_id; @@ -443,13 +565,33 @@ BEGIN AND sc.ins_srtcontrole_niveau = 'D')); END IF; - -- Als volgende in toekomst, dan laatste=volgende - 1 jaar; anders is laatste=laatste + --XX Als volgende in toekomst, dan laatste=volgende - 1 jaar (behalve voor + --XX objectsoort 'Tank', waarvoor geldt laatste=volgende - 5 jaar); anders + --XX is laatste=laatste (behalve voor objectsoort 'Slipvangers en OBAS' met + --XX een bouwjaar >15 jaar oud, waarvoor geldt laatste=bouwjaar + 15 jaar)! + -- Als volgende in toekomst, dan laatste=volgende - 1 jaar; anders is + -- laatste=laatste (behalve voor objectsoort 'Slipvangers en OBAS' met + -- een bouwjaar >15 jaar oud, waarvoor geldt laatste=bouwjaar + 15)! IF rc.b > SYSDATE THEN laatste := TO_DATE (TO_CHAR (rc.b, 'dd-mm') || '-2010', 'dd-mm-yyyy'); + --XXIF rc.objectsoort_key = 97781 -- Objectsoort 'Tank' + --XXTHEN + --XX laatste := + --XX TO_DATE (TO_CHAR (rc.b, 'dd-mm') || '-2010', 'dd-mm-yyyy'); + --XXELSE + --XX laatste := + --XX TO_DATE (TO_CHAR (rc.b, 'dd-mm') || '-2010', 'dd-mm-yyyy'); + --XXEND IF; ELSE -- b <= SYSDATE - laatste := rc.a; + IF rc.f + 15 < 2011 -- Alleen objectsoort 27844='Slipvangers en OBAS' + THEN + laatste := + TO_DATE ('01-01-' || TO_CHAR (rc.f + 15), 'dd-mm-yyyy'); + ELSE + laatste := rc.a; + END IF; END IF; IF (laatste IS NOT NULL) @@ -522,7 +664,7 @@ BEGIN END; / -BEGIN adm.systrackscript('$Workfile: CONN44.sql $', '$Revision: 1 $', 1); END; +BEGIN adm.systrackscript('$Workfile: CONN44.sql $', '$Revision: 2 $', 1); END; / SPOOL OFF