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

YKPN#84338- Mail to Evenementmelding inrichting

Browse Source 
svn path=/Customer/trunk/; revision=70261
This commit is contained in:
Norbert Wassink
2025-09-10 06:19:56 +00:00
parent b3268c5d01
commit 74ec9775ad
1 changed files with 2 additions and 74 deletions
Download Patch File Download Diff File Expand all files Collapse all files

76
YKPN/ykpn.sql
View File

@@ -122,9 +122,7 @@ AS
p_applrun IN VARCHAR2);
PROCEDURE tsk_mld_keuring (p_applname IN VARCHAR2,
p_applrun IN VARCHAR2);
PROCEDURE tsk_mail_retail (p_applname IN VARCHAR2,
p_applrun IN VARCHAR2);
PROCEDURE tsk_bes_geleverd(p_applname IN VARCHAR2,
p_applrun IN VARCHAR2);
@@ -2942,77 +2940,7 @@ AS
END;
-- OBSOLTE mag verwijderd worden aangezien de rapportaer nu door PowerBI worden opgehaald
PROCEDURE tsk_mail_retail (p_applname IN VARCHAR2,
p_applrun IN VARCHAR2)
AS
v_errorhint VARCHAR2 (1000);
v_errormsg VARCHAR2 (1000);
oracle_err_num NUMBER;
oracle_err_mes VARCHAR2 (200);
v_today VARCHAR2 (10);
v_bijlage VARCHAR2(4000);
v_lastRun VARCHAR2 (20);
v_notiKey NUMBER;
v_day VARCHAR2(10);
BEGIN
v_errorhint :='Aanmaken notificatie retail export';
SELECT TO_CHAR(SYSDATE,'d') INTO v_today FROM DUAL;
IF v_today = '2' --op iedere maandag vd week
THEN
SELECT TO_CHAR(fac_export_app_datum,'DD-MM-YYYY') INTO v_lastRun FROM fac_export_app WHERE fac_export_app_code='RETAIL_RAPPORT';
SELECT fac_srtnotificatie_key INTO v_notiKey FROM fac_srtnotificatie WHERE fac_srtnotificatie_code='CUST22';
IF v_LastRun = TO_CHAR(SYSDATE-1,'DD-MM-YYYY') -- export heeft zondag gedraaid
THEN
v_bijlage := '/../../YKPN/CUST/YKPN/export/retail/Retail_53W_'||to_char(SYSDATE, 'yyyymmdd')||'.csv';
INSERT INTO fac_notificatie (fac_srtnotificatie_key,prs_perslid_key_sender,fac_notificatie_status,fac_notificatie_receiver_email,fac_notificatie_oms,fac_notificatie_refkey,fac_notificatie_prioriteit,fac_notificatie_attachments)
VALUES (v_notiKey,3,2,'sander.mn.duijn@kpn.com','Facilitor meldingen',2,2,v_bijlage);
INSERT INTO fac_notificatie (fac_srtnotificatie_key,prs_perslid_key_sender,fac_notificatie_status,fac_notificatie_receiver_email,fac_notificatie_oms,fac_notificatie_refkey,fac_notificatie_prioriteit,fac_notificatie_attachments)
VALUES (v_notiKey,3,2,'simone.vanbijnen@kpn.com','Facilitor meldingen',2,2,v_bijlage);
INSERT INTO fac_notificatie (fac_srtnotificatie_key,prs_perslid_key_sender,fac_notificatie_status,fac_notificatie_receiver_email,fac_notificatie_oms,fac_notificatie_refkey,fac_notificatie_prioriteit,fac_notificatie_attachments)
VALUES (v_notiKey,3,2,'kpnretailsupport@kpn.com','Facilitor meldingen',2,2,v_bijlage);
v_bijlage := '/../../YKPN/CUST/YKPN/export/retail/Retail_106W_'||to_char(SYSDATE, 'yyyymmdd')||'.csv';
INSERT INTO fac_notificatie (fac_srtnotificatie_key,prs_perslid_key_sender,fac_notificatie_status,fac_notificatie_receiver_email,fac_notificatie_oms,fac_notificatie_refkey,fac_notificatie_prioriteit,fac_notificatie_attachments)
VALUES (v_notiKey,3,2,'sander.mn.duijn@kpn.com','Facilitor meldingen',2,2,v_bijlage);
INSERT INTO fac_notificatie (fac_srtnotificatie_key,prs_perslid_key_sender,fac_notificatie_status,fac_notificatie_receiver_email,fac_notificatie_oms,fac_notificatie_refkey,fac_notificatie_prioriteit,fac_notificatie_attachments)
VALUES (v_notiKey,3,2,'simone.vanbijnen@kpn.com','Facilitor meldingen',2,2,v_bijlage);
INSERT INTO fac_notificatie (fac_srtnotificatie_key,prs_perslid_key_sender,fac_notificatie_status,fac_notificatie_receiver_email,fac_notificatie_oms,fac_notificatie_refkey,fac_notificatie_prioriteit,fac_notificatie_attachments)
VALUES (v_notiKey,3,2,'kpnretailsupport@kpn.com','Facilitor meldingen',2,2,v_bijlage);
v_bijlage := '/../../YKPN/CUST/YKPN/export/retail/Retail_OPD_53W_'||to_char(SYSDATE, 'yyyymmdd')||'.csv';
INSERT INTO fac_notificatie (fac_srtnotificatie_key,prs_perslid_key_sender,fac_notificatie_status,fac_notificatie_receiver_email,fac_notificatie_oms,fac_notificatie_refkey,fac_notificatie_prioriteit,fac_notificatie_attachments)
VALUES (v_notiKey,3,2,'sander.mn.duijn@kpn.com','Facilitor opdrachten',2,2,v_bijlage);
INSERT INTO fac_notificatie (fac_srtnotificatie_key,prs_perslid_key_sender,fac_notificatie_status,fac_notificatie_receiver_email,fac_notificatie_oms,fac_notificatie_refkey,fac_notificatie_prioriteit,fac_notificatie_attachments)
VALUES (v_notiKey,3,2,'simone.vanbijnen@kpn.com','Facilitor opdrachten',2,2,v_bijlage);
INSERT INTO fac_notificatie (fac_srtnotificatie_key,prs_perslid_key_sender,fac_notificatie_status,fac_notificatie_receiver_email,fac_notificatie_oms,fac_notificatie_refkey,fac_notificatie_prioriteit,fac_notificatie_attachments)
VALUES (v_notiKey,3,2,'kpnretailsupport@kpn.com','Facilitor opdrachten',2,2,v_bijlage);
v_bijlage := '/../../YKPN/CUST/YKPN/export/retail/Retail_OPD_106W_'||to_char(SYSDATE, 'yyyymmdd')||'.csv';
INSERT INTO fac_notificatie (fac_srtnotificatie_key,prs_perslid_key_sender,fac_notificatie_status,fac_notificatie_receiver_email,fac_notificatie_oms,fac_notificatie_refkey,fac_notificatie_prioriteit,fac_notificatie_attachments)
VALUES (v_notiKey,3,2,'sander.mn.duijn@kpn.com','Facilitor opdrachten',2,2,v_bijlage);
INSERT INTO fac_notificatie (fac_srtnotificatie_key,prs_perslid_key_sender,fac_notificatie_status,fac_notificatie_receiver_email,fac_notificatie_oms,fac_notificatie_refkey,fac_notificatie_prioriteit,fac_notificatie_attachments)
VALUES (v_notiKey,3,2,'simone.vanbijnen@kpn.com','Facilitor opdrachten',2,2,v_bijlage);
INSERT INTO fac_notificatie (fac_srtnotificatie_key,prs_perslid_key_sender,fac_notificatie_status,fac_notificatie_receiver_email,fac_notificatie_oms,fac_notificatie_refkey,fac_notificatie_prioriteit,fac_notificatie_attachments)
VALUES (v_notiKey,3,2,'kpnretailsupport@kpn.com','Facilitor opdrachten',2,2,v_bijlage);
COMMIT;
END IF;
END IF;
EXCEPTION
WHEN OTHERS
THEN
oracle_err_num := SQLCODE;
oracle_err_mes := SUBSTR (SQLERRM, 1, 200);
v_errormsg := v_errormsg || ' ORACLE (error ' || oracle_err_num || '/' || oracle_err_mes || ')';
fac.writelog (p_applname,
'E',
'Daily task afgebroken!: ' || v_errormsg,
v_errorhint);
COMMIT;
END;
PROCEDURE tsk_bes_geleverd(p_applname IN VARCHAR2,
p_applrun IN VARCHAR2)