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

YKPN#57565 -- Aanpassingen tbv kleding inkoop

Browse Source 
YKPN#56012 -- Taak om de bezoekers die nog binnen zijn aan einde van de dag automatisch uit-te-melden

svn path=/Customer/trunk/; revision=42373
This commit is contained in:
Arthur Egberink
2019-05-02 14:35:09 +00:00
parent 7fcfa3b4ad
commit 5de5410995
1 changed files with 41 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

43
YKPN/ykpn.sql
View File

@@ -106,6 +106,7 @@ BEGIN
RETURN v_value;
END;
PROCEDURE set_bez_pincode (p_bezoekers_key IN NUMBER)
AS
v_count NUMBER;
@@ -919,7 +920,6 @@ CREATE OR REPLACE PROCEDURE ykpn_select_daily_task (
p_applrun IN VARCHAR2
)
AS
CURSOR c
IS
SELECT a.bez_afspraak_key,
@@ -958,6 +958,16 @@ AS
v_oms VARCHAR2 (200);
v_tracking_key NUMBER (10);
CURSOR ykpn_bez_out_c
IS
SELECT b.bez_bezoekers_key, b.bez_afspraak_key, b.bez_bezoekers_done
FROM BEZ_AFSPRAAK ba, BEZ_BEZOEKERS b
WHERE ba.bez_afspraak_key = b.bez_afspraak_key
AND b.bez_bezoekers_done IS NOT NULL
AND b.bez_bezoekers_out IS NULL
AND TRUNC (ba.bez_afspraak_datum) = TRUNC (SYSDATE);
BEGIN
-- bevriezen van contractgegevens
IF TO_CHAR(SYSDATE, 'DD') = '01'
@@ -1058,6 +1068,17 @@ BEGIN
2);
END LOOP;
-- Automatisch buitenmelden bezoekers (moet gepland tussen 22:00 en 0:00 uur). Ticket 56012.
FOR rec IN ykpn_bez_out_c
LOOP
BEGIN
UPDATE bez_bezoekers
SET bez_bezoekers_out = SYSDATE
WHERE bez_bezoekers_key = rec.bez_bezoekers_key;
fac.trackaction ('BEZOUT', rec.bez_bezoekers_key, NULL, NULL, NULL);
END;
END LOOP;
END;
/
@@ -1714,13 +1735,27 @@ BEGIN
INSERT INTO fac_gebruikersgroep (prs_perslid_key, fac_groep_key)
SELECT prs_perslid_key, 1461
FROM prs_perslid p
WHERE p.prs_perslid_oslogin like 'PMF___'
WHERE
-- De lengte van de digits in de loginnaam = 3
LENGTH(REGEXP_SUBSTR (prs_perslid_oslogin, '[[:digit:]]{3}.*')) = 3
-- En de prefix van de loginnaam is KPN of PMF, in dat geval zijn de drie digits account de bo medewerker
-- Of de login eindigt op '600', dit wordt soms voor de XL winkels gebruikt.
AND (SUBSTR(prs_perslid_oslogin,1,3) IN ('KPN', 'PMF')
OR REGEXP_SUBSTR (prs_perslid_oslogin, '[[:digit:]]{3}.*') = '600')
-- We hebben een werkplek onder een Retail regio.
AND p.prs_perslid_key IN (SELECT prs_perslid_key
FROM prs_v_perslidwerkplek_gegevens wpg, alg_locatie l, alg_district d
WHERE wpg.alg_locatie_key = l.alg_locatie_key
AND l.alg_district_key = d.alg_district_key
AND d.alg_regio_key = 21 -- KPN Retail
AND wpg.prs_werkplek_virtueel = 0)
AND NOT EXISTS
(SELECT fac_gebruikersgroep_key
FROM fac_gebruikersgroep gg
WHERE gg.prs_perslid_key = p.prs_perslid_key
AND fac_groep_key = 1461);
END ykpn_update_perslid_sched;
/
@@ -7387,6 +7422,10 @@ AS
v_perslid_key NUMBER(10);
BEGIN
-- als de locatiecode minder dan 3 posities heeft dan moeten we er een voorloopnul aan toevoegen.
UPDATE fac_imp_ins
SET alg_locatie_code = '0' || alg_locatie_code
WHERE LENGTH (alg_locatie_code) = 2;
-- Eerst de standaard import
fac_update_ins (p_import_key);