VOLK#77515 Uitbesteding Servicedesk Retail locaties SNS
svn path=/Customer/trunk/; revision=59994
This commit is contained in:
Suzan Wiegerinck
197
VOLK/volk.sql
197
VOLK/volk.sql
@@ -11,10 +11,14 @@ SET DEFINE ON
|
||||
COLUMN fcltlogfile NEW_VALUE fcltlogfile NOPRINT;
|
||||
COLUMN fcltcusttxt NEW_VALUE fcltcusttxt NOPRINT;
|
||||
WHENEVER SQLERROR CONTINUE;
|
||||
SELECT adm.getscriptspoolfile('&thisfile') AS fcltlogfile FROM DUAL;
|
||||
|
||||
SELECT adm.getscriptspoolfile ('&thisfile') AS fcltlogfile FROM DUAL;
|
||||
|
||||
SPOOL &fcltlogfile
|
||||
WHENEVER SQLERROR EXIT;
|
||||
SELECT adm.checkscriptcust('&dbuser') AS fcltcusttxt FROM DUAL;
|
||||
|
||||
SELECT adm.checkscriptcust ('&dbuser') AS fcltcusttxt FROM DUAL;
|
||||
|
||||
WHENEVER SQLERROR CONTINUE;
|
||||
---------------------------------------
|
||||
PROMPT &fcltcusttxt
|
||||
@@ -471,11 +475,11 @@ BEGIN
|
||||
END LOOP;
|
||||
|
||||
COMMIT;
|
||||
|
||||
|
||||
FOR rec IN c_persLid
|
||||
LOOP
|
||||
BEGIN
|
||||
volk.movetoruimte(rec.prs_perslid_key);
|
||||
volk.movetoruimte (rec.prs_perslid_key);
|
||||
END;
|
||||
END LOOP;
|
||||
END volk_update_perslid;
|
||||
@@ -653,7 +657,6 @@ AS
|
||||
WHERE b.prs_bedrijf_key = scope.prs_bedrijf_key;
|
||||
|
||||
-- De bron view met gegevens over bezoekers die een parkeerplaats moeten krijgen vandaag of morgen
|
||||
|
||||
CREATE OR REPLACE VIEW VOLK_V_EXP_FIRMBASE
|
||||
(
|
||||
BEZ_BEZOEKER_KEY,
|
||||
@@ -726,7 +729,6 @@ AS
|
||||
AND a.bez_afspraak_datum > TRUNC (SYSDATE) - 1;
|
||||
|
||||
-- !!!!!!!!!!!!!!!!!! tijdelijke view omdat de mail uitgevallen is. !!!!!!!!!!!!!!!!!!!!!!
|
||||
|
||||
CREATE OR REPLACE VIEW volk_v_rap_bezoekers_mutatie
|
||||
AS
|
||||
SELECT DISTINCT
|
||||
@@ -786,7 +788,6 @@ AS
|
||||
TO_DATE ('20190423 16:00', 'yyyymmdd hh24:mi');
|
||||
|
||||
-- Procedure om de bezoekers met een parkeerplaats klaar te zetten voor de export
|
||||
|
||||
CREATE OR REPLACE PROCEDURE VOLK_SELECT_FIRMBASE (p_applname IN VARCHAR2,
|
||||
p_applrun IN VARCHAR2)
|
||||
AS
|
||||
@@ -886,7 +887,10 @@ BEGIN
|
||||
|| NVL (
|
||||
rec.kenteken,
|
||||
'KL-'
|
||||
|| SUBSTR(TO_CHAR (rec.bez_bezoeker_key, 'FM0000000000'), -6))
|
||||
|| SUBSTR (
|
||||
TO_CHAR (rec.bez_bezoeker_key,
|
||||
'FM0000000000'),
|
||||
-6))
|
||||
|| '"'
|
||||
|| ' "'
|
||||
|| NVL (rec.landcode, 'NL')
|
||||
@@ -937,7 +941,6 @@ BEGIN
|
||||
COMMIT;
|
||||
END LOOP;
|
||||
|
||||
|
||||
FOR rec IN IV
|
||||
LOOP
|
||||
v_rap_count := v_rap_count + 1;
|
||||
@@ -973,7 +976,10 @@ BEGIN
|
||||
|| NVL (
|
||||
rec.kenteken,
|
||||
'KL-'
|
||||
|| SUBSTR(TO_CHAR (rec.bez_bezoeker_key, 'FM0000000000'), -6))
|
||||
|| SUBSTR (
|
||||
TO_CHAR (rec.bez_bezoeker_key,
|
||||
'FM0000000000'),
|
||||
-6))
|
||||
|| '"'
|
||||
|| ' "'
|
||||
|| NVL (rec.landcode, 'NL')
|
||||
@@ -1015,9 +1021,7 @@ BEGIN
|
||||
END volk_SELECT_firmbase;
|
||||
/
|
||||
|
||||
|
||||
--- genereert het export bestand voor Firmbase
|
||||
|
||||
CREATE OR REPLACE VIEW VOLK_V_EXPORT_FIRMBASE
|
||||
(
|
||||
RESULT,
|
||||
@@ -1032,14 +1036,13 @@ AS
|
||||
CREATE OR REPLACE PACKAGE VOLK
|
||||
AS
|
||||
PROCEDURE mld_after_insert (p_melding_key IN NUMBER);
|
||||
|
||||
|
||||
PROCEDURE opschonen_registraties_fb;
|
||||
|
||||
|
||||
PROCEDURE movetoruimte (p_perslid_key NUMBER);
|
||||
END;
|
||||
/
|
||||
|
||||
|
||||
CREATE OR REPLACE PACKAGE BODY VOLK
|
||||
AS
|
||||
PROCEDURE mld_after_insert (p_melding_key IN NUMBER)
|
||||
@@ -1069,8 +1072,8 @@ AS
|
||||
WHERE m.mld_melding_key = rec.mld_melding_key;
|
||||
END LOOP;
|
||||
END;
|
||||
|
||||
|
||||
|
||||
|
||||
PROCEDURE opschonen_registraties_fb
|
||||
AS
|
||||
oracle_err_num NUMBER;
|
||||
@@ -1097,7 +1100,7 @@ AS
|
||||
v_errormsg,
|
||||
'');
|
||||
END;
|
||||
|
||||
|
||||
PROCEDURE movetoruimte (p_perslid_key NUMBER)
|
||||
AS
|
||||
v_ruimte_key NUMBER (10);
|
||||
@@ -1107,14 +1110,13 @@ AS
|
||||
INTO v_ruimte_key
|
||||
FROM (SELECT r1.alg_ruimte_key
|
||||
FROM alg_v_aanwezigruimte r1, alg_verdieping v1
|
||||
WHERE r1.alg_srtruimte_key = 21 -- Fictief
|
||||
WHERE r1.alg_srtruimte_key = 21 -- Fictief
|
||||
AND SUBSTR (r1.alg_ruimte_nr, 1, 1) = '_'
|
||||
AND r1.alg_verdieping_key = v1.alg_verdieping_key
|
||||
AND v1.alg_gebouw_key = 124) x
|
||||
LEFT JOIN
|
||||
( SELECT prs_alg_ruimte_key, COUNT (*) aant
|
||||
FROM prs_werkplek wp
|
||||
GROUP BY prs_alg_ruimte_key) wp
|
||||
LEFT JOIN ( SELECT prs_alg_ruimte_key, COUNT (*) aant
|
||||
FROM prs_werkplek wp
|
||||
GROUP BY prs_alg_ruimte_key) wp
|
||||
ON x.alg_ruimte_key = wp.prs_alg_ruimte_key
|
||||
WHERE COALESCE (wp.aant, 0) < 9999;
|
||||
|
||||
@@ -1137,7 +1139,6 @@ AS
|
||||
'A',
|
||||
1);
|
||||
END;
|
||||
|
||||
END;
|
||||
/
|
||||
|
||||
@@ -1157,7 +1158,7 @@ AS
|
||||
l.alg_locatie_omschrijving,
|
||||
COALESCE (bo.fac_usrdata_omschr, 'Onbekend') bedrijfsonderdeel,
|
||||
COUNT (b.bez_bezoekers_key),
|
||||
SUM(bhv.bhv),
|
||||
SUM (bhv.bhv),
|
||||
'<a class="details" onclick=''FcltMgr.openDetail("appl/fac/fac_report.asp?usrrap_key=161&'
|
||||
|| 'mode=list&'
|
||||
|| 'fclt_datum_afspraak='
|
||||
@@ -1175,14 +1176,14 @@ AS
|
||||
|| '</a>' AS html_details
|
||||
FROM bez_bezoekers b,
|
||||
bez_afspraak afs,
|
||||
prs_perslid host,
|
||||
prs_perslid HOST,
|
||||
alg_locatie l,
|
||||
prs_afdeling a,
|
||||
(SELECT kl.prs_link_key,
|
||||
fac.safe_to_number (kl.prs_kenmerklink_waarde) bhv
|
||||
fac.safe_to_number (kl.prs_kenmerklink_waarde) bhv
|
||||
FROM prs_kenmerk k, prs_kenmerklink kl
|
||||
WHERE k.prs_kenmerk_upper LIKE '%BHV%'
|
||||
AND kl.prs_kenmerk_key = k.prs_kenmerk_key) bhv,
|
||||
WHERE k.prs_kenmerk_upper LIKE '%BHV%'
|
||||
AND kl.prs_kenmerk_key = k.prs_kenmerk_key) bhv,
|
||||
(SELECT *
|
||||
FROM fac_usrtab tb, fac_usrdata ud
|
||||
WHERE ud.fac_usrtab_key = tb.fac_usrtab_key
|
||||
@@ -1192,7 +1193,7 @@ AS
|
||||
AND afs.alg_locatie_key = l.alg_locatie_key
|
||||
AND afs.bez_afspraak_host_key = HOST.prs_perslid_key
|
||||
AND b.prs_perslid_key = bhv.prs_link_key(+)
|
||||
AND host.prs_afdeling_key = a.prs_afdeling_key
|
||||
AND HOST.prs_afdeling_key = a.prs_afdeling_key
|
||||
AND bo.fac_usrdata_code(+) = a.prs_afdeling_naam --- op basis van afdelingscode wordt het bedrijfsonderdeel gekoppeld
|
||||
GROUP BY TRUNC (afs.bez_afspraak_datum),
|
||||
l.alg_locatie_key,
|
||||
@@ -1334,7 +1335,7 @@ AS
|
||||
AND rr.res_ruimte_key = rar.res_ruimte_key
|
||||
AND rar.res_alg_ruimte_verwijder IS NULL
|
||||
AND datums.datum = blokkerend.datum(+)
|
||||
AND res_discipline_key = 381 -- Team areas
|
||||
AND res_discipline_key = 381 -- Team areas
|
||||
AND ( rr.res_ruimte_vervaldatum IS NULL
|
||||
OR rr.res_ruimte_vervaldatum > datums.datum))
|
||||
GROUP BY datum,
|
||||
@@ -1344,16 +1345,146 @@ AS
|
||||
|
||||
COMMIT;
|
||||
|
||||
--- VOLK#77515 Uitbesteding Servicedesk Retail locaties SNS
|
||||
--- Meldingen/opdrachten uitgezet naar Colliers mogen direct worden afgemeld
|
||||
CREATE OR REPLACE PROCEDURE volk_select_colliers (p_applname IN VARCHAR2,
|
||||
p_applrun IN VARCHAR2)
|
||||
AS
|
||||
oracle_err_num NUMBER;
|
||||
oracle_err_mes VARCHAR2 (200);
|
||||
v_errorhint VARCHAR2 (100);
|
||||
v_aanduiding VARCHAR2 (100);
|
||||
|
||||
CURSOR coll IS
|
||||
SELECT o.mld_opdr_key,
|
||||
os.mld_statusopdr_key,
|
||||
os.mld_statusopdr_omschrijving,
|
||||
m.mld_melding_key,
|
||||
ms.mld_statuses_key,
|
||||
ms.mld_statuses_omschrijving
|
||||
FROM mld_opdr o,
|
||||
mld_melding m,
|
||||
mld_statuses ms,
|
||||
mld_statusopdr os
|
||||
WHERE o.mld_uitvoerende_keys = 27886 -- Collliers
|
||||
AND m.mld_melding_key = o.mld_melding_key
|
||||
AND ms.mld_statuses_key = m.mld_melding_status
|
||||
AND os.mld_statusopdr_key = o.mld_statusopdr_key;
|
||||
BEGIN
|
||||
v_errorhint := 'init';
|
||||
|
||||
DELETE imp_log
|
||||
WHERE imp_log_applicatie = p_applname;
|
||||
|
||||
FOR rec IN coll
|
||||
LOOP
|
||||
BEGIN
|
||||
mld.setopdrachtstatus (rec.mld_opdr_key, 6, 3);
|
||||
fac.trackaction ('ORDTRK',
|
||||
rec.mld_opdr_key,
|
||||
NULL,
|
||||
NULL,
|
||||
'Opdracht naar Colliers automatisch afgemeld');
|
||||
|
||||
mld.setmeldingstatus (rec.mld_melding_key,
|
||||
5,
|
||||
3,
|
||||
0);
|
||||
|
||||
fac.trackaction ('MLDTRK',
|
||||
rec.mld_melding_key,
|
||||
NULL,
|
||||
NULL,
|
||||
'Melding naar Colliers automatisch afgemeld');
|
||||
|
||||
COMMIT;
|
||||
END;
|
||||
END LOOP;
|
||||
EXCEPTION
|
||||
WHEN OTHERS
|
||||
THEN
|
||||
oracle_err_num := SQLCODE;
|
||||
oracle_err_mes := SUBSTR (SQLERRM, 1, 100);
|
||||
fac.writelog (p_applname,
|
||||
'E',
|
||||
'Error ' || oracle_err_num || '/' || oracle_err_mes,
|
||||
v_errorhint);
|
||||
END;
|
||||
/
|
||||
|
||||
--- VOLK#77515 Uitbesteding Servicedesk Retail locaties SNS
|
||||
--- Colliers moet worden geinformeerd over meldingen die naar CSU zijn uitgezet
|
||||
CREATE OR REPLACE VIEW VOLK_V_NOTI_CSU_ORD
|
||||
(
|
||||
SENDER,
|
||||
RECEIVER,
|
||||
TEXT,
|
||||
CODE,
|
||||
KEY,
|
||||
XKEY,
|
||||
XSENDER,
|
||||
XEMAIL,
|
||||
XMOBILE
|
||||
)
|
||||
BEQUEATH DEFINER
|
||||
AS
|
||||
SELECT 3 sender, --- Facilitor
|
||||
NULL receiver,
|
||||
'Ter informatie: Opdracht '
|
||||
|| TO_CHAR (m.mld_melding_key)
|
||||
|| '/'
|
||||
|| TO_CHAR (o.mld_opdr_bedrijfopdr_volgnr)
|
||||
|| 'is uitgezet naar CSU ' tekst,
|
||||
sn.fac_srtnotificatie_code code,
|
||||
o.mld_opdr_key key,
|
||||
NULL xkey,
|
||||
NULL xsender,
|
||||
ba.prs_bedrijfadres_url xemail,
|
||||
NULL xmobile
|
||||
FROM mld_opdr o,
|
||||
mld_melding m,
|
||||
mld_stdmelding sm,
|
||||
ins_tab_discipline vg,
|
||||
ins_srtdiscipline vgt,
|
||||
fac_tracking t,
|
||||
prs_bedrijfadres ba,
|
||||
fac_srtnotificatie sn
|
||||
WHERE o.mld_uitvoerende_keys = 87 -- CSU
|
||||
AND m.mld_melding_key = o.mld_melding_key
|
||||
AND sm.mld_stdmelding_key = m.mld_stdmelding_key
|
||||
AND vg.ins_discipline_key = sm.mld_ins_discipline_key
|
||||
AND vgt.ins_srtdiscipline_key = vg.ins_srtdiscipline_key
|
||||
AND vgt.ins_srtdiscipline_key IN (4, 5) ---vakgroeptype SNS winkel FN/LD
|
||||
AND t.fac_tracking_refkey = o.mld_opdr_key
|
||||
AND t.fac_srtnotificatie_key = 72 -- ORDNEW
|
||||
AND ba.prs_bedrijf_key = 27886 -- Colliers
|
||||
AND ba.prs_bedrijfadres_type = 'O'
|
||||
AND sn.fac_srtnotificatie_code = 'CUST02'
|
||||
AND t.fac_tracking_datum >
|
||||
(SELECT fac_notificatie_job_lastrun
|
||||
FROM fac_notificatie_job
|
||||
WHERE UPPER (fac_notificatie_job_view) =
|
||||
'VOLK_V_NOTI_CSU_ORD')
|
||||
AND t.fac_tracking_datum <
|
||||
(SELECT fac_notificatie_job_nextrun
|
||||
FROM fac_notificatie_job
|
||||
WHERE UPPER (fac_notificatie_job_view) =
|
||||
'VOLK_V_NOTI_CSU_ORD');
|
||||
|
||||
------ payload end ------
|
||||
|
||||
|
||||
SET DEFINE OFF
|
||||
BEGIN adm.systrackscriptId ('$Id$', 0); END;
|
||||
|
||||
BEGIN
|
||||
adm.systrackscriptId (
|
||||
'$Id$',
|
||||
0);
|
||||
END;
|
||||
/
|
||||
|
||||
COMMIT;
|
||||
SET ECHO OFF
|
||||
SPOOL OFF
|
||||
SET DEFINE ON
|
||||
PROMPT Logfile of this upgrade is: &fcltlogfile
|
||||
PROMPT Logfile of this upgrade is: &fcltlogfile
|
||||
Reference in New Issue
Block a user