HPJI#90559 Updaten notificatiesysteem voor contracten en verantwoordelijkheden
svn path=/Customer/trunk/; revision=70429
This commit is contained in:
Sander Schepers
644
HPJI/hpji.sql
644
HPJI/hpji.sql
@@ -312,269 +312,233 @@ AS
|
|||||||
v_buscontr NUMBER;
|
v_buscontr NUMBER;
|
||||||
|
|
||||||
CURSOR c IS
|
CURSOR c IS
|
||||||
--bespreek contract (Subsidie en Detachering)
|
-- bespreek contract (Subsidie en Detachering)
|
||||||
SELECT c.ins_discipline_key,
|
SELECT c.ins_discipline_key,
|
||||||
c.cnt_contract_key,
|
c.cnt_contract_key,
|
||||||
c.cnt_contract_nummer_intern,
|
c.cnt_contract_nummer_intern,
|
||||||
c.cnt_contract_omschrijving,
|
c.cnt_contract_omschrijving,
|
||||||
b.prs_bedrijf_naam,
|
b.prs_bedrijf_naam,
|
||||||
NULL AS accountmanager,
|
c.prs_perslid_key_beh AS accountmanager, -- was NULL
|
||||||
c.prs_perslid_key_eig AS teamleider,
|
c.prs_perslid_key_eig AS teamleider,
|
||||||
NULL AS business_controller,
|
NULL AS business_controller,
|
||||||
1421 AS stdmelding,
|
1421 AS stdmelding,
|
||||||
'Bespreek contract' AS taak
|
'Bespreek contract' AS taak
|
||||||
FROM cnt_contract c,
|
FROM cnt_contract c,
|
||||||
cnt_kenmerkcontract d,
|
cnt_kenmerkcontract d,
|
||||||
cnt_kenmerk ck,
|
cnt_kenmerk ck,
|
||||||
prs_bedrijf b
|
prs_bedrijf b
|
||||||
WHERE c.ins_discipline_key IN (1821, 1842)
|
WHERE c.ins_discipline_key IN (1821, 1842)
|
||||||
AND c.cnt_contract_key = d.cnt_contract_key
|
AND c.cnt_contract_key = d.cnt_contract_key
|
||||||
AND d.cnt_kenmerk_key = ck.cnt_kenmerk_key
|
AND d.cnt_kenmerk_key = ck.cnt_kenmerk_key
|
||||||
AND c.cnt_prs_bedrijf_key = b.prs_bedrijf_key
|
AND c.cnt_prs_bedrijf_key = b.prs_bedrijf_key
|
||||||
AND TRUNC (
|
AND TRUNC (
|
||||||
ADD_MONTHS (
|
ADD_MONTHS (
|
||||||
fac.safe_to_date (
|
fac.safe_to_date (d.cnt_kenmerkcontract_waarde,'dd-mm-yyyy'),
|
||||||
d.cnt_kenmerkcontract_waarde,
|
-1)) = TRUNC (SYSDATE)
|
||||||
'dd-mm-yyyy'),
|
AND ck.cnt_srtkenmerk_key = 570 -- bespreek contract
|
||||||
-1)) =
|
|
||||||
TRUNC (SYSDATE)
|
|
||||||
AND ck.cnt_srtkenmerk_key = 570 --bespreek contract
|
|
||||||
UNION ALL
|
UNION ALL
|
||||||
--bespreek contract (Onderaanneming en Raamovereenkomst)
|
-- bespreek contract (Onderaanneming en Raamovereenkomst)
|
||||||
SELECT c.ins_discipline_key,
|
SELECT c.ins_discipline_key,
|
||||||
c.cnt_contract_key,
|
c.cnt_contract_key,
|
||||||
c.cnt_contract_nummer_intern,
|
c.cnt_contract_nummer_intern,
|
||||||
c.cnt_contract_omschrijving,
|
c.cnt_contract_omschrijving,
|
||||||
b.prs_bedrijf_naam,
|
b.prs_bedrijf_naam,
|
||||||
c.prs_perslid_key_beh AS accountmanager,
|
c.prs_perslid_key_beh AS accountmanager,
|
||||||
NULL AS teamleider,
|
c.prs_perslid_key_eig AS teamleider, -- was NULL
|
||||||
NULL AS business_controller,
|
NULL AS business_controller,
|
||||||
1403 AS stdmelding,
|
1403 AS stdmelding,
|
||||||
'Bespreek contract' AS taak
|
'Bespreek contract' AS taak
|
||||||
FROM cnt_contract c,
|
FROM cnt_contract c,
|
||||||
cnt_kenmerkcontract d,
|
cnt_kenmerkcontract d,
|
||||||
cnt_kenmerk ck,
|
cnt_kenmerk ck,
|
||||||
prs_bedrijf b
|
prs_bedrijf b
|
||||||
WHERE c.ins_discipline_key IN (1822, 1901)
|
WHERE c.ins_discipline_key IN (1822, 1901)
|
||||||
AND c.cnt_contract_key = d.cnt_contract_key
|
AND c.cnt_contract_key = d.cnt_contract_key
|
||||||
AND d.cnt_kenmerk_key = ck.cnt_kenmerk_key
|
AND d.cnt_kenmerk_key = ck.cnt_kenmerk_key
|
||||||
AND c.cnt_prs_bedrijf_key = b.prs_bedrijf_key
|
AND c.cnt_prs_bedrijf_key = b.prs_bedrijf_key
|
||||||
AND TRUNC (
|
AND TRUNC (
|
||||||
ADD_MONTHS (
|
ADD_MONTHS (
|
||||||
fac.safe_to_date (
|
fac.safe_to_date (d.cnt_kenmerkcontract_waarde,'dd-mm-yyyy'),
|
||||||
d.cnt_kenmerkcontract_waarde,
|
-1)) = TRUNC (SYSDATE)
|
||||||
'dd-mm-yyyy'),
|
AND ck.cnt_srtkenmerk_key = 570 -- bespreek contract
|
||||||
-1)) =
|
|
||||||
TRUNC (SYSDATE)
|
|
||||||
AND ck.cnt_srtkenmerk_key = 570 --bespreek contract
|
|
||||||
UNION ALL
|
UNION ALL
|
||||||
--Indienen aanvraag
|
-- Indienen aanvraag (Subsidies)
|
||||||
SELECT c.ins_discipline_key,
|
SELECT c.ins_discipline_key,
|
||||||
c.cnt_contract_key,
|
c.cnt_contract_key,
|
||||||
c.cnt_contract_nummer_intern,
|
c.cnt_contract_nummer_intern,
|
||||||
c.cnt_contract_omschrijving,
|
c.cnt_contract_omschrijving,
|
||||||
b.prs_bedrijf_naam,
|
b.prs_bedrijf_naam,
|
||||||
NULL AS accountmanager,
|
c.prs_perslid_key_beh AS accountmanager, -- was NULL
|
||||||
c.prs_perslid_key_eig AS teamleider,
|
c.prs_perslid_key_eig AS teamleider,
|
||||||
109570 AS business_controller,
|
109570 AS business_controller,
|
||||||
1404 AS stdmelding,
|
1404 AS stdmelding,
|
||||||
'Indienen aanvraag' AS taak
|
'Indienen aanvraag' AS taak
|
||||||
FROM cnt_contract c,
|
FROM cnt_contract c,
|
||||||
cnt_kenmerkcontract d,
|
cnt_kenmerkcontract d,
|
||||||
cnt_kenmerk ck,
|
cnt_kenmerk ck,
|
||||||
prs_bedrijf b
|
prs_bedrijf b
|
||||||
WHERE c.ins_discipline_key IN (1821)--, --Subsidies
|
WHERE c.ins_discipline_key IN (1821)
|
||||||
--1822, --Raamovereenkomst (moet deze ook?)
|
AND c.cnt_contract_key = d.cnt_contract_key
|
||||||
--1842, --Detacheringen (moet deze ook?)
|
AND d.cnt_kenmerk_key = ck.cnt_kenmerk_key
|
||||||
--1901) --Onderaannemers (moet deze ook?)
|
AND c.cnt_prs_bedrijf_key = b.prs_bedrijf_key
|
||||||
AND c.cnt_contract_key = d.cnt_contract_key
|
AND TRUNC (
|
||||||
AND d.cnt_kenmerk_key = ck.cnt_kenmerk_key
|
ADD_MONTHS (
|
||||||
AND c.cnt_prs_bedrijf_key = b.prs_bedrijf_key
|
fac.safe_to_date (d.cnt_kenmerkcontract_waarde,'dd-mm-yyyy'),
|
||||||
AND TRUNC (
|
-2)) = TRUNC (SYSDATE)
|
||||||
ADD_MONTHS (
|
AND ck.cnt_srtkenmerk_key = 571 -- Indienen aanvraag
|
||||||
fac.safe_to_date (
|
|
||||||
d.cnt_kenmerkcontract_waarde,
|
|
||||||
'dd-mm-yyyy'),
|
|
||||||
-2)) =
|
|
||||||
TRUNC (SYSDATE)
|
|
||||||
AND ck.cnt_srtkenmerk_key = 571 --Indienen aanvraag
|
|
||||||
UNION ALL
|
UNION ALL
|
||||||
-- Tussentijdse verantwoording (Subsidie)
|
-- Tussentijdse verantwoording (Subsidie)
|
||||||
SELECT c.ins_discipline_key,
|
SELECT c.ins_discipline_key,
|
||||||
c.cnt_contract_key,
|
c.cnt_contract_key,
|
||||||
c.cnt_contract_nummer_intern,
|
c.cnt_contract_nummer_intern,
|
||||||
c.cnt_contract_omschrijving,
|
c.cnt_contract_omschrijving,
|
||||||
b.prs_bedrijf_naam,
|
b.prs_bedrijf_naam,
|
||||||
NULL AS accountmanager,
|
c.prs_perslid_key_beh AS accountmanager, -- was NULL
|
||||||
c.prs_perslid_key_eig AS teamleider,
|
c.prs_perslid_key_eig AS teamleider,
|
||||||
NULL AS business_controller,
|
109570 AS business_controller, -- was NULL (nu JA bij subsidies)
|
||||||
1406 AS stdmelding,
|
1406 AS stdmelding,
|
||||||
'Tussentijdse verantwoording' AS taak
|
'Tussentijdse verantwoording' AS taak
|
||||||
FROM cnt_contract c,
|
FROM cnt_contract c,
|
||||||
cnt_kenmerkcontract d,
|
cnt_kenmerkcontract d,
|
||||||
cnt_kenmerk ck,
|
cnt_kenmerk ck,
|
||||||
prs_bedrijf b
|
prs_bedrijf b
|
||||||
WHERE c.ins_discipline_key IN (1821) --Contractsoort Subsidie
|
WHERE c.ins_discipline_key IN (1821) -- Subsidie
|
||||||
AND c.cnt_contract_key = d.cnt_contract_key
|
AND c.cnt_contract_key = d.cnt_contract_key
|
||||||
AND d.cnt_kenmerk_key = ck.cnt_kenmerk_key
|
AND d.cnt_kenmerk_key = ck.cnt_kenmerk_key
|
||||||
AND c.cnt_prs_bedrijf_key = b.prs_bedrijf_key
|
AND c.cnt_prs_bedrijf_key = b.prs_bedrijf_key
|
||||||
AND TRUNC (
|
AND TRUNC (
|
||||||
ADD_MONTHS (
|
ADD_MONTHS (
|
||||||
fac.safe_to_date (
|
fac.safe_to_date (d.cnt_kenmerkcontract_waarde,'dd-mm-yyyy'),
|
||||||
d.cnt_kenmerkcontract_waarde,
|
-2)) = TRUNC (SYSDATE)
|
||||||
'dd-mm-yyyy'),
|
AND ck.cnt_srtkenmerk_key = 572 -- Tussentijdse verantwoording
|
||||||
-2)) =
|
|
||||||
TRUNC (SYSDATE)
|
|
||||||
AND ck.cnt_srtkenmerk_key = 572 --Tussentijdse verantwoording
|
|
||||||
UNION ALL
|
UNION ALL
|
||||||
-- Tussentijdse verantwoording (Raamovereenkomst)
|
-- Tussentijdse verantwoording (Raamovereenkomst)
|
||||||
SELECT c.ins_discipline_key,
|
SELECT c.ins_discipline_key,
|
||||||
c.cnt_contract_key,
|
c.cnt_contract_key,
|
||||||
c.cnt_contract_nummer_intern,
|
c.cnt_contract_nummer_intern,
|
||||||
c.cnt_contract_omschrijving,
|
c.cnt_contract_omschrijving,
|
||||||
b.prs_bedrijf_naam,
|
b.prs_bedrijf_naam,
|
||||||
c.prs_perslid_key_beh AS accountmanager,
|
c.prs_perslid_key_beh AS accountmanager,
|
||||||
NULL AS teamleider,
|
c.prs_perslid_key_eig AS teamleider, -- was NULL
|
||||||
NULL AS business_controller,
|
NULL AS business_controller,
|
||||||
1601 AS stdmelding,
|
1601 AS stdmelding,
|
||||||
'Tussentijdse verantwoording' AS taak
|
'Tussentijdse verantwoording' AS taak
|
||||||
FROM cnt_contract c,
|
FROM cnt_contract c,
|
||||||
cnt_kenmerkcontract d,
|
cnt_kenmerkcontract d,
|
||||||
cnt_kenmerk ck,
|
cnt_kenmerk ck,
|
||||||
prs_bedrijf b
|
prs_bedrijf b
|
||||||
WHERE c.ins_discipline_key IN (1822) --Contractsoort Raamovereenkomst
|
WHERE c.ins_discipline_key IN (1822) -- Raamovereenkomst
|
||||||
AND c.cnt_contract_key = d.cnt_contract_key
|
AND c.cnt_contract_key = d.cnt_contract_key
|
||||||
AND d.cnt_kenmerk_key = ck.cnt_kenmerk_key
|
AND d.cnt_kenmerk_key = ck.cnt_kenmerk_key
|
||||||
AND c.cnt_prs_bedrijf_key = b.prs_bedrijf_key
|
AND c.cnt_prs_bedrijf_key = b.prs_bedrijf_key
|
||||||
AND TRUNC (
|
AND TRUNC (
|
||||||
ADD_MONTHS (
|
ADD_MONTHS (
|
||||||
fac.safe_to_date (
|
fac.safe_to_date (d.cnt_kenmerkcontract_waarde,'dd-mm-yyyy'),
|
||||||
d.cnt_kenmerkcontract_waarde,
|
-2)) = TRUNC (SYSDATE)
|
||||||
'dd-mm-yyyy'),
|
AND ck.cnt_srtkenmerk_key = 572 -- Tussentijdse verantwoording
|
||||||
-2)) =
|
|
||||||
TRUNC (SYSDATE)
|
|
||||||
AND ck.cnt_srtkenmerk_key = 572 --Tussentijdse verantwoording
|
|
||||||
UNION ALL
|
UNION ALL
|
||||||
--Indienen vaststelling
|
-- Indienen vaststelling (Subsidies)
|
||||||
SELECT c.ins_discipline_key,
|
SELECT c.ins_discipline_key,
|
||||||
c.cnt_contract_key,
|
c.cnt_contract_key,
|
||||||
c.cnt_contract_nummer_intern,
|
c.cnt_contract_nummer_intern,
|
||||||
c.cnt_contract_omschrijving,
|
c.cnt_contract_omschrijving,
|
||||||
b.prs_bedrijf_naam,
|
b.prs_bedrijf_naam,
|
||||||
NULL AS accountmanager,
|
c.prs_perslid_key_beh AS accountmanager, -- was NULL
|
||||||
c.prs_perslid_key_eig AS teamleider,
|
c.prs_perslid_key_eig AS teamleider,
|
||||||
109570 AS business_controller,
|
109570 AS business_controller,
|
||||||
1405 AS stdmelding,
|
1405 AS stdmelding,
|
||||||
'Indienen vaststelling' AS taak
|
'Indienen vaststelling' AS taak
|
||||||
FROM cnt_contract c,
|
FROM cnt_contract c,
|
||||||
cnt_kenmerkcontract d,
|
cnt_kenmerkcontract d,
|
||||||
cnt_kenmerk ck,
|
cnt_kenmerk ck,
|
||||||
prs_bedrijf b
|
prs_bedrijf b
|
||||||
WHERE c.ins_discipline_key IN (1821)--, --Subsidies
|
WHERE c.ins_discipline_key IN (1821)
|
||||||
--1822, --Raamovereenkomst (moet deze ook?)
|
AND c.cnt_contract_key = d.cnt_contract_key
|
||||||
--1842, --Detacheringen (moet deze ook?)
|
AND d.cnt_kenmerk_key = ck.cnt_kenmerk_key
|
||||||
--1901) --Onderaannemers (moet deze ook?)
|
AND c.cnt_prs_bedrijf_key = b.prs_bedrijf_key
|
||||||
AND c.cnt_contract_key = d.cnt_contract_key
|
AND TRUNC (
|
||||||
AND d.cnt_kenmerk_key = ck.cnt_kenmerk_key
|
ADD_MONTHS (
|
||||||
AND c.cnt_prs_bedrijf_key = b.prs_bedrijf_key
|
fac.safe_to_date (d.cnt_kenmerkcontract_waarde,'dd-mm-yyyy'),
|
||||||
AND TRUNC (
|
-2)) = TRUNC (SYSDATE)
|
||||||
ADD_MONTHS (
|
AND ck.cnt_srtkenmerk_key = 567 -- Indienen vaststelling
|
||||||
fac.safe_to_date (
|
|
||||||
d.cnt_kenmerkcontract_waarde,
|
|
||||||
'dd-mm-yyyy'),
|
|
||||||
-2)) =
|
|
||||||
TRUNC (SYSDATE)
|
|
||||||
AND ck.cnt_srtkenmerk_key = 567 --Indienen vaststelling
|
|
||||||
UNION ALL
|
UNION ALL
|
||||||
--contract loopt af (Subsidie en Detachering)
|
-- contract loopt af (Subsidie en Detachering)
|
||||||
SELECT c.ins_discipline_key,
|
SELECT c.ins_discipline_key,
|
||||||
c.cnt_contract_key,
|
c.cnt_contract_key,
|
||||||
c.cnt_contract_nummer_intern,
|
c.cnt_contract_nummer_intern,
|
||||||
c.cnt_contract_omschrijving,
|
c.cnt_contract_omschrijving,
|
||||||
b.prs_bedrijf_naam,
|
b.prs_bedrijf_naam,
|
||||||
NULL AS accountmanager,
|
c.prs_perslid_key_beh AS accountmanager, -- was NULL
|
||||||
c.prs_perslid_key_eig AS teamleider,
|
c.prs_perslid_key_eig AS teamleider,
|
||||||
NULL AS business_controller,
|
NULL AS business_controller,
|
||||||
1402 AS stdmelding,
|
1402 AS stdmelding,
|
||||||
'Contract loopt af' AS taak
|
'Contract loopt af' AS taak
|
||||||
FROM cnt_contract c,
|
FROM cnt_contract c,
|
||||||
cnt_kenmerkcontract d,
|
cnt_kenmerkcontract d,
|
||||||
cnt_kenmerk ck,
|
cnt_kenmerk ck,
|
||||||
prs_bedrijf b
|
prs_bedrijf b
|
||||||
WHERE c.ins_discipline_key IN (1821, 1842) --Subsidies & Detacheringen
|
WHERE c.ins_discipline_key IN (1821, 1842)
|
||||||
AND c.cnt_contract_key = d.cnt_contract_key
|
AND c.cnt_contract_key = d.cnt_contract_key
|
||||||
AND d.cnt_kenmerk_key = ck.cnt_kenmerk_key
|
AND d.cnt_kenmerk_key = ck.cnt_kenmerk_key
|
||||||
AND c.cnt_prs_bedrijf_key = b.prs_bedrijf_key
|
AND c.cnt_prs_bedrijf_key = b.prs_bedrijf_key
|
||||||
AND TRUNC (
|
AND TRUNC (
|
||||||
ADD_MONTHS (
|
ADD_MONTHS (
|
||||||
fac.safe_to_date (
|
fac.safe_to_date (d.cnt_kenmerkcontract_waarde,'dd-mm-yyyy'),
|
||||||
d.cnt_kenmerkcontract_waarde,
|
-2)) = TRUNC (SYSDATE)
|
||||||
'dd-mm-yyyy'),
|
AND ck.cnt_srtkenmerk_key = 569 -- contract loopt af
|
||||||
-2)) =
|
|
||||||
TRUNC (SYSDATE)
|
|
||||||
AND ck.cnt_srtkenmerk_key = 569 --contract loopt af
|
|
||||||
UNION ALL
|
UNION ALL
|
||||||
--contract loopt af (Raamovereenkomst & onderaanneming)
|
-- contract loopt af (Raamovereenkomst & Onderaanneming)
|
||||||
SELECT c.ins_discipline_key,
|
SELECT c.ins_discipline_key,
|
||||||
c.cnt_contract_key,
|
c.cnt_contract_key,
|
||||||
c.cnt_contract_nummer_intern,
|
c.cnt_contract_nummer_intern,
|
||||||
c.cnt_contract_omschrijving,
|
c.cnt_contract_omschrijving,
|
||||||
b.prs_bedrijf_naam,
|
b.prs_bedrijf_naam,
|
||||||
c.prs_perslid_key_beh AS accountmanager,
|
c.prs_perslid_key_beh AS accountmanager,
|
||||||
NULL AS teamleider,
|
c.prs_perslid_key_eig AS teamleider, -- was NULL
|
||||||
NULL AS business_controller,
|
NULL AS business_controller,
|
||||||
1423 AS stdmelding,
|
1423 AS stdmelding,
|
||||||
'Contract loopt af' AS taak
|
'Contract loopt af' AS taak
|
||||||
FROM cnt_contract c,
|
FROM cnt_contract c,
|
||||||
cnt_kenmerkcontract d,
|
cnt_kenmerkcontract d,
|
||||||
cnt_kenmerk ck,
|
cnt_kenmerk ck,
|
||||||
prs_bedrijf b
|
prs_bedrijf b
|
||||||
WHERE c.ins_discipline_key IN (1822, 1901) -- Raamovereenkomst & Onderaanneming
|
WHERE c.ins_discipline_key IN (1822, 1901)
|
||||||
AND c.cnt_contract_key = d.cnt_contract_key
|
AND c.cnt_contract_key = d.cnt_contract_key
|
||||||
AND d.cnt_kenmerk_key = ck.cnt_kenmerk_key
|
AND d.cnt_kenmerk_key = ck.cnt_kenmerk_key
|
||||||
AND c.cnt_prs_bedrijf_key = b.prs_bedrijf_key
|
AND c.cnt_prs_bedrijf_key = b.prs_bedrijf_key
|
||||||
AND TRUNC (
|
AND TRUNC (
|
||||||
ADD_MONTHS (
|
ADD_MONTHS (
|
||||||
fac.safe_to_date (
|
fac.safe_to_date (d.cnt_kenmerkcontract_waarde,'dd-mm-yyyy'),
|
||||||
d.cnt_kenmerkcontract_waarde,
|
-3)) = TRUNC (SYSDATE)
|
||||||
'dd-mm-yyyy'),
|
AND ck.cnt_srtkenmerk_key = 569 -- contract loopt af
|
||||||
-3)) =
|
|
||||||
TRUNC (SYSDATE)
|
|
||||||
AND ck.cnt_srtkenmerk_key = 569 --contract loopt af
|
|
||||||
UNION ALL
|
UNION ALL
|
||||||
--Accountantsverklaring
|
-- Accountantsverklaring (Subsidies) << TL blijft NIET aangezet
|
||||||
SELECT c.ins_discipline_key,
|
SELECT c.ins_discipline_key,
|
||||||
c.cnt_contract_key,
|
c.cnt_contract_key,
|
||||||
c.cnt_contract_nummer_intern,
|
c.cnt_contract_nummer_intern,
|
||||||
c.cnt_contract_omschrijving,
|
c.cnt_contract_omschrijving,
|
||||||
b.prs_bedrijf_naam,
|
b.prs_bedrijf_naam,
|
||||||
NULL AS accountmanager,
|
c.prs_perslid_key_beh AS accountmanager, -- was NULL
|
||||||
NULL AS teamleider,
|
NULL AS teamleider, -- blijft NULL i.v.m. uitzondering
|
||||||
109570 AS business_controller,
|
109570 AS business_controller,
|
||||||
1401 AS stdmelding,
|
1401 AS stdmelding,
|
||||||
'Accountantsverklaring' AS taak
|
'Accountantsverklaring' AS taak
|
||||||
FROM cnt_contract c,
|
FROM cnt_contract c,
|
||||||
cnt_kenmerkcontract d,
|
cnt_kenmerkcontract d,
|
||||||
cnt_kenmerk ck,
|
cnt_kenmerk ck,
|
||||||
prs_bedrijf b
|
prs_bedrijf b
|
||||||
WHERE c.ins_discipline_key IN (1821)--, --Subsidies
|
WHERE c.ins_discipline_key IN (1821)
|
||||||
--1822, --Raamovereenkomst (moet deze ook?)
|
AND c.cnt_contract_key = d.cnt_contract_key
|
||||||
--1842, --Detacheringen (moet deze ook?)
|
AND d.cnt_kenmerk_key = ck.cnt_kenmerk_key
|
||||||
--1901) --Onderaannemers (moet deze ook?)
|
AND c.cnt_prs_bedrijf_key = b.prs_bedrijf_key
|
||||||
AND c.cnt_contract_key = d.cnt_contract_key
|
AND TRUNC (
|
||||||
AND d.cnt_kenmerk_key = ck.cnt_kenmerk_key
|
ADD_MONTHS (
|
||||||
AND c.cnt_prs_bedrijf_key = b.prs_bedrijf_key
|
fac.safe_to_date (d.cnt_kenmerkcontract_waarde,'dd-mm-yyyy'),
|
||||||
AND TRUNC (
|
-3)) = TRUNC (SYSDATE)
|
||||||
ADD_MONTHS (
|
AND ck.cnt_srtkenmerk_key = 568; -- Accountantsverklaring
|
||||||
fac.safe_to_date (
|
|
||||||
d.cnt_kenmerkcontract_waarde,
|
|
||||||
'dd-mm-yyyy'),
|
|
||||||
-3)) =
|
|
||||||
TRUNC (SYSDATE)
|
|
||||||
AND ck.cnt_srtkenmerk_key = 568; --Accountantsverklaring
|
|
||||||
BEGIN
|
BEGIN
|
||||||
v_uitvoerder := 4; --Standaard de persoon Facilitor
|
v_uitvoerder := 4; -- Standaard de persoon Facilitor
|
||||||
v_kostenplaats := 1910; --Standaard Facilitair
|
v_kostenplaats := 1910; -- Standaard Facilitair
|
||||||
|
|
||||||
FOR rec IN c
|
FOR rec IN c
|
||||||
LOOP
|
LOOP
|
||||||
@@ -589,34 +553,33 @@ AS
|
|||||||
v_errorhint := 'Bepalen uitvoerder en kostenplaats';
|
v_errorhint := 'Bepalen uitvoerder en kostenplaats';
|
||||||
|
|
||||||
SELECT NVL(MIN (p.prs_perslid_key),4), NVL(MIN (d.prs_kostenplaats_key),1910)
|
SELECT NVL(MIN (p.prs_perslid_key),4), NVL(MIN (d.prs_kostenplaats_key),1910)
|
||||||
INTO v_uitvoerder, v_kostenplaats
|
INTO v_uitvoerder, v_kostenplaats
|
||||||
FROM prs_perslid p, prs_afdeling d
|
FROM prs_perslid p, prs_afdeling d
|
||||||
WHERE p.prs_afdeling_key = d.prs_afdeling_key
|
WHERE p.prs_afdeling_key = d.prs_afdeling_key
|
||||||
AND p.prs_perslid_verwijder IS NULL
|
AND p.prs_perslid_verwijder IS NULL
|
||||||
AND prs_perslid_key =
|
AND prs_perslid_key =
|
||||||
DECODE (rec.stdmelding,
|
DECODE (rec.stdmelding,
|
||||||
1401, rec.business_controller,
|
1401, rec.business_controller,
|
||||||
1402, rec.teamleider,
|
1402, rec.teamleider,
|
||||||
1403, rec.accountmanager,
|
1403, rec.accountmanager,
|
||||||
1404, rec.teamleider,
|
1404, rec.teamleider,
|
||||||
1405, rec.teamleider,
|
1405, rec.teamleider,
|
||||||
1406, rec.teamleider,
|
1406, rec.teamleider,
|
||||||
1421, rec.teamleider,
|
1421, rec.teamleider,
|
||||||
1423, rec.accountmanager,
|
1423, rec.accountmanager,
|
||||||
1601, rec.accountmanager);
|
1601, rec.accountmanager);
|
||||||
|
|
||||||
-- Notificaties aanmaken tbv accountmanagers
|
-- Notificaties accountmanager
|
||||||
v_errorhint := 'notificatie_accountmanager';
|
v_errorhint := 'notificatie_accountmanager';
|
||||||
v_accm := rec.accountmanager;
|
v_accm := rec.accountmanager;
|
||||||
|
|
||||||
IF v_accm IS NOT NULL
|
IF v_accm IS NOT NULL THEN
|
||||||
THEN
|
|
||||||
FAC.trackaction (
|
FAC.trackaction (
|
||||||
'CNTMAI',
|
'CNTMAI',
|
||||||
rec.cnt_contract_key,
|
rec.cnt_contract_key,
|
||||||
NULL,
|
NULL,
|
||||||
NULL,
|
NULL,
|
||||||
'Notificatie naar accountmanager, taak: '
|
'Notificatie naar accountmanager, taak: '
|
||||||
|| rec.taak
|
|| rec.taak
|
||||||
|| ' bij contract '
|
|| ' bij contract '
|
||||||
|| rec.cnt_contract_key
|
|| rec.cnt_contract_key
|
||||||
@@ -635,37 +598,24 @@ AS
|
|||||||
fac_notificatie_refkey,
|
fac_notificatie_refkey,
|
||||||
fac_notificatie_extrakey,
|
fac_notificatie_extrakey,
|
||||||
fac_notificatie_prioriteit)
|
fac_notificatie_prioriteit)
|
||||||
VALUES (
|
VALUES (53, 2, NULL, v_accm,
|
||||||
53, -- CNTMAI
|
'Notificatie naar accountmanager, taak: '
|
||||||
2, -- mail
|
|| rec.taak || ' bij contract ' || rec.cnt_contract_key
|
||||||
NULL,
|
|| '(' || rec.prs_bedrijf_naam || ' - ' || rec.cnt_contract_omschrijving || ')',
|
||||||
v_accm,
|
rec.cnt_contract_key, NULL, 2);
|
||||||
'Notificatie naar accountmanager, taak: '
|
|
||||||
|| rec.taak
|
|
||||||
|| ' bij contract '
|
|
||||||
|| rec.cnt_contract_key
|
|
||||||
|| '('
|
|
||||||
|| rec.prs_bedrijf_naam
|
|
||||||
|| ' - '
|
|
||||||
|| rec.cnt_contract_omschrijving
|
|
||||||
|| ')',
|
|
||||||
rec.cnt_contract_key,
|
|
||||||
NULL,
|
|
||||||
2);
|
|
||||||
END IF;
|
END IF;
|
||||||
|
|
||||||
-- Notificaties aanmaken tbv teamleiders
|
-- Notificaties teamleider
|
||||||
v_errorhint := 'notificatie_teamleider';
|
v_errorhint := 'notificatie_teamleider';
|
||||||
v_teaml := rec.teamleider;
|
v_teaml := rec.teamleider;
|
||||||
|
|
||||||
IF v_teaml IS NOT NULL
|
IF v_teaml IS NOT NULL THEN
|
||||||
THEN
|
|
||||||
FAC.trackaction (
|
FAC.trackaction (
|
||||||
'CNTMAI',
|
'CNTMAI',
|
||||||
rec.cnt_contract_key,
|
rec.cnt_contract_key,
|
||||||
NULL,
|
NULL,
|
||||||
NULL,
|
NULL,
|
||||||
'Notificatie naar teamleider/clustermanager, taak: '
|
'Notificatie naar teamleider/clustermanager, taak: '
|
||||||
|| rec.taak
|
|| rec.taak
|
||||||
|| ' bij contract '
|
|| ' bij contract '
|
||||||
|| rec.cnt_contract_key
|
|| rec.cnt_contract_key
|
||||||
@@ -684,37 +634,24 @@ AS
|
|||||||
fac_notificatie_refkey,
|
fac_notificatie_refkey,
|
||||||
fac_notificatie_extrakey,
|
fac_notificatie_extrakey,
|
||||||
fac_notificatie_prioriteit)
|
fac_notificatie_prioriteit)
|
||||||
VALUES (
|
VALUES (53, 2, NULL, v_teaml,
|
||||||
53, -- CNTMAI
|
'Notificatie naar teamleider/clustermanager, taak: '
|
||||||
2, -- mail
|
|| rec.taak || ' bij contract ' || rec.cnt_contract_key
|
||||||
NULL,
|
|| '(' || rec.prs_bedrijf_naam || ' - ' || rec.cnt_contract_omschrijving || ')',
|
||||||
v_teaml,
|
rec.cnt_contract_key, NULL, 2);
|
||||||
'Notificatie naar teamleider/clustermanager, taak: '
|
|
||||||
|| rec.taak
|
|
||||||
|| ' bij contract '
|
|
||||||
|| rec.cnt_contract_key
|
|
||||||
|| '('
|
|
||||||
|| rec.prs_bedrijf_naam
|
|
||||||
|| ' - '
|
|
||||||
|| rec.cnt_contract_omschrijving
|
|
||||||
|| ')',
|
|
||||||
rec.cnt_contract_key,
|
|
||||||
NULL,
|
|
||||||
2);
|
|
||||||
END IF;
|
END IF;
|
||||||
|
|
||||||
-- Notificaties aanmaken tbv de business controller
|
-- Notificaties business controller
|
||||||
v_errorhint := 'notificatie_businesscontrol';
|
v_errorhint := 'notificatie_businesscontrol';
|
||||||
v_buscontr := rec.business_controller;
|
v_buscontr := rec.business_controller;
|
||||||
|
|
||||||
IF v_buscontr IS NOT NULL
|
IF v_buscontr IS NOT NULL THEN
|
||||||
THEN
|
|
||||||
FAC.trackaction (
|
FAC.trackaction (
|
||||||
'CNTMAI',
|
'CNTMAI',
|
||||||
rec.cnt_contract_key,
|
rec.cnt_contract_key,
|
||||||
NULL,
|
NULL,
|
||||||
NULL,
|
NULL,
|
||||||
'Notificatie naar Business Controller, taak: '
|
'Notificatie naar Business Controller, taak: '
|
||||||
|| rec.taak
|
|| rec.taak
|
||||||
|| ' bij contract '
|
|| ' bij contract '
|
||||||
|| rec.cnt_contract_key
|
|| rec.cnt_contract_key
|
||||||
@@ -733,67 +670,44 @@ AS
|
|||||||
fac_notificatie_refkey,
|
fac_notificatie_refkey,
|
||||||
fac_notificatie_extrakey,
|
fac_notificatie_extrakey,
|
||||||
fac_notificatie_prioriteit)
|
fac_notificatie_prioriteit)
|
||||||
VALUES (
|
VALUES (53, 2, NULL, v_buscontr,
|
||||||
53, -- CNTMAI
|
'Notificatie naar Business Controller, taak: '
|
||||||
2, -- mail
|
|| rec.taak || ' bij contract ' || rec.cnt_contract_key
|
||||||
NULL,
|
|| '(' || rec.prs_bedrijf_naam || ' - ' || rec.cnt_contract_omschrijving || ')',
|
||||||
v_buscontr,
|
rec.cnt_contract_key, NULL, 2);
|
||||||
'Notificatie naar Business Controller, taak: '
|
|
||||||
|| rec.taak
|
|
||||||
|| ' bij contract '
|
|
||||||
|| rec.cnt_contract_key
|
|
||||||
|| '('
|
|
||||||
|| rec.prs_bedrijf_naam
|
|
||||||
|| ' - '
|
|
||||||
|| rec.cnt_contract_omschrijving
|
|
||||||
|| ')',
|
|
||||||
rec.cnt_contract_key,
|
|
||||||
NULL,
|
|
||||||
2);
|
|
||||||
END IF;
|
END IF;
|
||||||
|
|
||||||
-- Melding aanmaken
|
-- Melding aanmaken
|
||||||
v_errorhint :=
|
v_errorhint := 'Melding aanmaken vanuit contract ' || rec.cnt_contract_key || ' met taak ' || rec.taak;
|
||||||
'Melding aanmaken vanuit contract '
|
|
||||||
|| rec.cnt_contract_key
|
|
||||||
|| ' met taak '
|
|
||||||
|| rec.taak;
|
|
||||||
|
|
||||||
INSERT INTO mld_melding (mld_melding_module,
|
INSERT INTO mld_melding (mld_melding_module,
|
||||||
mld_meldbron_key,
|
mld_meldbron_key,
|
||||||
mld_melding_datum,
|
mld_melding_datum,
|
||||||
mld_melding_onderwerp,
|
mld_melding_onderwerp,
|
||||||
mld_melding_omschrijving,
|
mld_melding_omschrijving,
|
||||||
mld_melding_status,
|
mld_melding_status,
|
||||||
mld_melding_t_uitvoertijd,
|
mld_melding_t_uitvoertijd,
|
||||||
mld_stdmelding_key,
|
mld_stdmelding_key,
|
||||||
mld_alg_locatie_key,
|
mld_alg_locatie_key,
|
||||||
mld_melding_externnr,
|
mld_melding_externnr,
|
||||||
prs_perslid_key,
|
prs_perslid_key,
|
||||||
prs_perslid_key_voor,
|
prs_perslid_key_voor,
|
||||||
prs_kostenplaats_key,
|
prs_kostenplaats_key,
|
||||||
mld_melding_behandelaar_key,
|
mld_melding_behandelaar_key,
|
||||||
mld_melding_spoed,
|
mld_melding_spoed,
|
||||||
mld_melding_kto_type,
|
mld_melding_kto_type,
|
||||||
mld_melding_kto_key)
|
mld_melding_kto_key)
|
||||||
VALUES (
|
VALUES (
|
||||||
'MLD',
|
'MLD',
|
||||||
6, -- system
|
6, -- system
|
||||||
SYSDATE,
|
SYSDATE,
|
||||||
SUBSTR (
|
SUBSTR('Contract ' || rec.cnt_contract_key || ': ' || rec.prs_bedrijf_naam
|
||||||
'Contract '
|
|| ' - ' || rec.cnt_contract_omschrijving,1,80),
|
||||||
|| rec.cnt_contract_key
|
|
||||||
|| ': '
|
|
||||||
|| rec.prs_bedrijf_naam
|
|
||||||
|| ' - '
|
|
||||||
|| rec.cnt_contract_omschrijving,
|
|
||||||
1,
|
|
||||||
80),
|
|
||||||
NULL,
|
NULL,
|
||||||
2, -- Nieuw
|
2, -- Nieuw
|
||||||
NULL, -- stduitvoer
|
NULL, -- stduitvoer
|
||||||
rec.stdmelding,
|
rec.stdmelding,
|
||||||
NULL, -- Locatie onbekend
|
NULL, -- Locatie onbekend
|
||||||
NULL,
|
NULL,
|
||||||
v_uitvoerder,
|
v_uitvoerder,
|
||||||
v_uitvoerder,
|
v_uitvoerder,
|
||||||
@@ -802,25 +716,15 @@ AS
|
|||||||
3,
|
3,
|
||||||
'C',
|
'C',
|
||||||
rec.cnt_contract_key)
|
rec.cnt_contract_key)
|
||||||
RETURNING mld_melding_key
|
RETURNING mld_melding_key INTO v_mldkey;
|
||||||
INTO v_mldkey;
|
|
||||||
END;
|
END;
|
||||||
END LOOP;
|
END LOOP;
|
||||||
EXCEPTION
|
EXCEPTION
|
||||||
WHEN OTHERS
|
WHEN OTHERS THEN
|
||||||
THEN
|
|
||||||
oracle_err_num := SQLCODE;
|
oracle_err_num := SQLCODE;
|
||||||
oracle_err_mes := SUBSTR (SQLERRM, 1, 200);
|
oracle_err_mes := SUBSTR (SQLERRM, 1, 200);
|
||||||
v_errorhint :=
|
v_errorhint := 'ORACLE (error ' || oracle_err_num || '/' || oracle_err_mes || ')';
|
||||||
'ORACLE (error '
|
fac.writelog (p_applname, 'E', 'Proces afgebroken!', v_errorhint);
|
||||||
|| oracle_err_num
|
|
||||||
|| '/'
|
|
||||||
|| oracle_err_mes
|
|
||||||
|| ')';
|
|
||||||
fac.writelog (p_applname,
|
|
||||||
'E',
|
|
||||||
'Proces afgebroken!',
|
|
||||||
v_errorhint);
|
|
||||||
END hpji_acties_verkoopcontracten;
|
END hpji_acties_verkoopcontracten;
|
||||||
END;
|
END;
|
||||||
/
|
/
|
||||||
|
|||||||
Reference in New Issue
Block a user