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

NETS#35845 Wijziging vulling Beheerder en Tactisch inkoper

Browse Source 
svn path=/Customer/trunk/; revision=28726
This commit is contained in:
Maarten van der Heide
2016-03-31 16:11:45 +00:00
parent 96511eddc7
commit b0ad2505bb
1 changed files with 205 additions and 108 deletions
Download Patch File Download Diff File Expand all files Collapse all files

313
NETS/nets.sql
View File

@@ -8,7 +8,7 @@
set echo on
SPOOL xNETS.LST
/* Formatted on 9-1-2014 10:50:10 (QP5 v5.115.810.9015) */
/* Formatted on 29-3-2016 16:45:15 (QP5 v5.136.908.31019) */
CREATE OR REPLACE FORCE VIEW nets_v_noti_cntreminder_rappel
(
code,
@@ -19,52 +19,95 @@ CREATE OR REPLACE FORCE VIEW nets_v_noti_cntreminder_rappel
xkey
)
AS
SELECT 'CUST01',
NULL,
c.prs_perslid_key_beh,
'Beste ' || p.prs_perslid_voornaam
|| DECODE (p.prs_perslid_tussenvoegsel,
NULL, ' ',
' ' || p.prs_perslid_tussenvoegsel || ' ')
|| p.prs_perslid_naam
|| CHR (13)
|| CHR (13)
|| 'Op '
|| TO_CHAR (c.cnt_contract_looptijd_tot, 'dd-mm-yyyy')
|| ' loopt '
|| c.cnt_contract_nummer_intern
|| ' ('
|| c.cnt_contract_omschrijving
|| ') af. Het is raadzaam hierover contact '
|| CHR (13)
|| 'op te nemen met zowel uw leverancier als uw interne organisatie.'
|| CHR (13)
|| CHR (13)
|| 'Raadpleeg het digitale contract in Facilitor om de vervolgstappen te bepalen.'
|| CHR (13)
|| 'Indien het contract verlengd wordt, zorg er dan voor dat de mutaties en de daarbij behorende '
|| CHR (13)
|| 'documenten digitaal worden vastgelegd in Facilitor.'
|| CHR (13)
|| CHR (13)
|| CHR (13)
|| 'Met vriendelijke groet,'
|| CHR (13)
|| CHR (13)
|| 'Applicatiebeheer Facilitor',
c.cnt_contract_key,
NULL
FROM cnt_v_aanwezigcontract c,
prs_bedrijf b,
prs_perslid p,
prs_afdeling a
WHERE b.prs_bedrijf_key = c.CNT_PRS_BEDRIJF_KEY
AND p.prs_afdeling_key = a.prs_afdeling_key
AND (a.prs_afdeling_key IN (41, 42, 43) -- TODO; ter voorkoming mails naar niet
OR a.prs_afdeling_parentkey IN (41, 42, 43)) -- ..ALM/ENS/Borne-personen!
AND c.prs_perslid_key_beh = p.prs_perslid_key
AND TRUNC (SYSDATE) =
TRUNC (cnt.cnt_getRappeldatum (c.cnt_contract_key));
SELECT 'CUST01',
NULL,
c.prs_perslid_key_beh,
'Beste ' || p.prs_perslid_voornaam
|| DECODE (p.prs_perslid_tussenvoegsel,
NULL, ' ',
' ' || p.prs_perslid_tussenvoegsel || ' ')
|| p.prs_perslid_naam
|| CHR (13)
|| CHR (13)
|| 'Op '
|| TO_CHAR (c.cnt_contract_looptijd_tot, 'dd-mm-yyyy')
|| ' loopt '
|| c.cnt_contract_nummer_intern
|| ' ('
|| c.cnt_contract_omschrijving
|| ') af. Het is raadzaam hierover contact '
|| CHR (13)
|| 'op te nemen met zowel uw leverancier als uw interne organisatie.'
|| CHR (13)
|| CHR (13)
|| 'Raadpleeg het digitale contract in Facilitor om de vervolgstappen te bepalen.'
|| CHR (13)
|| 'Indien het contract verlengd wordt, zorg er dan voor dat de mutaties en de daarbij behorende '
|| CHR (13)
|| 'documenten digitaal worden vastgelegd in Facilitor.'
|| CHR (13)
|| CHR (13)
|| CHR (13)
|| 'Met vriendelijke groet,'
|| CHR (13)
|| CHR (13)
|| 'Applicatiebeheer Facilitor',
c.cnt_contract_key,
NULL
FROM cnt_v_aanwezigcontract c,
prs_bedrijf b,
prs_perslid p,
prs_v_afdeling_boom ab
WHERE c.cnt_prs_bedrijf_key = b.prs_bedrijf_key
AND c.prs_perslid_key_beh = p.prs_perslid_key
AND p.prs_afdeling_key = ab.prs_afdeling_key
AND ab.prs_afdeling_key1 IN (41, 42, 43) -- Alleen mails naar ALM/ENS/BOR-beh!
AND TRUNC (SYSDATE) = TRUNC (cnt.cnt_getRappeldatum (c.cnt_contract_key))
UNION ALL
SELECT 'CUST01',
NULL,
c.prs_perslid_key_eig,
'Beste ' || p.prs_perslid_voornaam
|| DECODE (p.prs_perslid_tussenvoegsel,
NULL, ' ',
' ' || p.prs_perslid_tussenvoegsel || ' ')
|| p.prs_perslid_naam
|| CHR (13)
|| CHR (13)
|| 'Op '
|| TO_CHAR (c.cnt_contract_looptijd_tot, 'dd-mm-yyyy')
|| ' loopt '
|| c.cnt_contract_nummer_intern
|| ' ('
|| c.cnt_contract_omschrijving
|| ') af. Het is raadzaam hierover contact '
|| CHR (13)
|| 'op te nemen met zowel uw leverancier als uw interne organisatie.'
|| CHR (13)
|| CHR (13)
|| 'Raadpleeg het digitale contract in Facilitor om de vervolgstappen te bepalen.'
|| CHR (13)
|| 'Indien het contract verlengd wordt, zorg er dan voor dat de mutaties en de daarbij behorende '
|| CHR (13)
|| 'documenten digitaal worden vastgelegd in Facilitor.'
|| CHR (13)
|| CHR (13)
|| CHR (13)
|| 'Met vriendelijke groet,'
|| CHR (13)
|| CHR (13)
|| 'Applicatiebeheer Facilitor',
c.cnt_contract_key,
NULL
FROM cnt_v_aanwezigcontract c,
prs_bedrijf b,
prs_perslid p,
prs_v_afdeling_boom ab
WHERE c.cnt_prs_bedrijf_key = b.prs_bedrijf_key
AND c.prs_perslid_key_eig = p.prs_perslid_key
AND p.prs_afdeling_key = ab.prs_afdeling_key
AND ab.prs_afdeling_key1 = 43 -- Alleen mails naar BOR-eig!
AND TRUNC (SYSDATE) = TRUNC (cnt.cnt_getRappeldatum (c.cnt_contract_key));
-- Staan er bij contracten gesprekken gepland?
@@ -108,7 +151,7 @@ AND kc.cnt_kenmerk_key = k.cnt_kenmerk_key;
-- Contractgesprekken die staan gepland tussen nu en 8 weken (7*8 dagen) in de toekomst.
/* Formatted on 9-1-2014 10:50:40 (QP5 v5.115.810.9015) */
/* Formatted on 29-3-2016 16:58:02 (QP5 v5.136.908.31019) */
CREATE OR REPLACE FORCE VIEW nets_v_noti_cntreminder_gespr
(
code,
@@ -119,67 +162,121 @@ CREATE OR REPLACE FORCE VIEW nets_v_noti_cntreminder_gespr
xkey
)
AS
SELECT 'CUST02',
NULL,
c.prs_perslid_key_beh,
'Beste ' || p.prs_perslid_voornaam
|| DECODE (p.prs_perslid_tussenvoegsel,
NULL, ' ',
' ' || p.prs_perslid_tussenvoegsel || ' ')
|| p.prs_perslid_naam
|| CHR (13)
|| CHR (13)
|| 'U bent beheerder van contract '
|| c.cnt_contract_nummer_intern
|| ' ('
|| c.cnt_contract_omschrijving
|| '). Met uw leverancier is'
|| CHR (13)
|| 'overeengekomen dat u (tussentijds) gaat evalueren. '
|| CHR (13)
|| CHR (13)
|| CHR (13)
|| 'Onderneem de volgende acties:'
|| CHR (13)
|| CHR (13)
|| '- Interne evaluatie;'
|| CHR (13)
|| '- Afspraak leverancier.'
|| CHR (13)
|| CHR (13)
|| 'Wilt u dit realiseren voor '
|| g.cnt_kenmerkcontract_waarde
|| '.'
|| CHR (13)
|| 'Zorg ervoor dat het (tussentijdse) evaluatieverslag digitaal vastgelegd wordt in het dossier van Facilitor.'
|| CHR (13)
|| CHR (13)
|| CHR (13)
|| 'Met vriendelijke groet,'
|| CHR (13)
|| CHR (13)
|| 'Applicatiebeheer Facilitor',
c.cnt_contract_key,
NULL
FROM cnt_v_aanwezigcontract c,
prs_perslid p,
prs_afdeling a,
nets_v_noti_gesprek_tekst g
WHERE c.prs_perslid_key_beh = p.prs_perslid_key
AND p.prs_afdeling_key = a.prs_afdeling_key
AND (a.prs_afdeling_key IN (41, 42, 43) -- TODO; ter voorkoming mails naar niet
OR a.prs_afdeling_parentkey IN (41, 42, 43)) -- ..ALM/ENS/Borne-personen!
AND c.cnt_contract_key = g.cnt_contract_key
AND TRUNC (SYSDATE + (7 * 8)) =
TRUNC(fac.safe_to_date (g.cnt_kenmerkcontract_waarde,
'dd-mm-yyyy'))
AND NOT EXISTS
(SELECT 'x'
FROM nets_v_noti_gesprek_ja x
WHERE x.cnt_srtkenmerk_key = g.cnt_srtkenmerk_key
AND x.cnt_contract_key = g.cnt_contract_key);
SELECT 'CUST02',
NULL,
c.prs_perslid_key_beh,
'Beste ' || p.prs_perslid_voornaam
|| DECODE (p.prs_perslid_tussenvoegsel,
NULL, ' ',
' ' || p.prs_perslid_tussenvoegsel || ' ')
|| p.prs_perslid_naam
|| CHR (13)
|| CHR (13)
|| 'U bent beheerder van contract '
|| c.cnt_contract_nummer_intern
|| ' ('
|| c.cnt_contract_omschrijving
|| '). Met uw leverancier is'
|| CHR (13)
|| 'overeengekomen dat u (tussentijds) gaat evalueren. '
|| CHR (13)
|| CHR (13)
|| CHR (13)
|| 'Onderneem de volgende acties:'
|| CHR (13)
|| CHR (13)
|| '- Interne evaluatie;'
|| CHR (13)
|| '- Afspraak leverancier.'
|| CHR (13)
|| CHR (13)
|| 'Wilt u dit realiseren voor '
|| g.cnt_kenmerkcontract_waarde
|| '.'
|| CHR (13)
|| 'Zorg ervoor dat het (tussentijdse) evaluatieverslag digitaal vastgelegd wordt in het dossier van Facilitor.'
|| CHR (13)
|| CHR (13)
|| CHR (13)
|| 'Met vriendelijke groet,'
|| CHR (13)
|| CHR (13)
|| 'Applicatiebeheer Facilitor',
c.cnt_contract_key,
NULL
FROM cnt_v_aanwezigcontract c,
prs_perslid p,
prs_v_afdeling_boom ab,
nets_v_noti_gesprek_tekst g
WHERE c.prs_perslid_key_beh = p.prs_perslid_key
AND p.prs_afdeling_key = ab.prs_afdeling_key
AND ab.prs_afdeling_key1 IN (41, 42, 43) -- Alleen mails naar ALM/ENS/BOR-beh!
AND c.cnt_contract_key = g.cnt_contract_key
AND TRUNC (SYSDATE + (7 * 8)) = TRUNC(fac.safe_to_date (g.cnt_kenmerkcontract_waarde, 'dd-mm-yyyy'))
AND NOT EXISTS
(SELECT 'x'
FROM nets_v_noti_gesprek_ja x
WHERE x.cnt_srtkenmerk_key = g.cnt_srtkenmerk_key
AND x.cnt_contract_key = g.cnt_contract_key)
UNION ALL
SELECT 'CUST02',
NULL,
c.prs_perslid_key_eig,
'Beste ' || p.prs_perslid_voornaam
|| DECODE (p.prs_perslid_tussenvoegsel,
NULL, ' ',
' ' || p.prs_perslid_tussenvoegsel || ' ')
|| p.prs_perslid_naam
|| CHR (13)
|| CHR (13)
|| 'U bent beheerder van contract '
|| c.cnt_contract_nummer_intern
|| ' ('
|| c.cnt_contract_omschrijving
|| '). Met uw leverancier is'
|| CHR (13)
|| 'overeengekomen dat u (tussentijds) gaat evalueren. '
|| CHR (13)
|| CHR (13)
|| CHR (13)
|| 'Onderneem de volgende acties:'
|| CHR (13)
|| CHR (13)
|| '- Interne evaluatie;'
|| CHR (13)
|| '- Afspraak leverancier.'
|| CHR (13)
|| CHR (13)
|| 'Wilt u dit realiseren voor '
|| g.cnt_kenmerkcontract_waarde
|| '.'
|| CHR (13)
|| 'Zorg ervoor dat het (tussentijdse) evaluatieverslag digitaal vastgelegd wordt in het dossier van Facilitor.'
|| CHR (13)
|| CHR (13)
|| CHR (13)
|| 'Met vriendelijke groet,'
|| CHR (13)
|| CHR (13)
|| 'Applicatiebeheer Facilitor',
c.cnt_contract_key,
NULL
FROM cnt_v_aanwezigcontract c,
prs_perslid p,
prs_v_afdeling_boom ab,
nets_v_noti_gesprek_tekst g
WHERE c.prs_perslid_key_beh = p.prs_perslid_key
AND p.prs_afdeling_key = ab.prs_afdeling_key
AND ab.prs_afdeling_key1 = 43 -- Alleen mails naar BOR-eig!
AND c.cnt_contract_key = g.cnt_contract_key
AND TRUNC (SYSDATE + (7 * 8)) = TRUNC(fac.safe_to_date (g.cnt_kenmerkcontract_waarde, 'dd-mm-yyyy'))
AND NOT EXISTS
(SELECT 'x'
FROM nets_v_noti_gesprek_ja x
WHERE x.cnt_srtkenmerk_key = g.cnt_srtkenmerk_key
AND x.cnt_contract_key = g.cnt_contract_key);
BEGIN fac.registercustversion('NETS', 3); END;
BEGIN fac.registercustversion('NETS', 4); END;
/
BEGIN adm.systrackscriptId('$Id$', 0); END;
/