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

DJIN#41120 -- meerdere rapportage + aanpassingen in personenimport

Browse Source 
svn path=/Customer/trunk/; revision=38228
This commit is contained in:
Robin Stoker
2018-06-15 16:09:46 +00:00
parent 965c319ff5
commit d0b470e702
1 changed files with 108 additions and 61 deletions
Download Patch File Download Diff File Expand all files Collapse all files

169
DVON/dvon.sql
View File

@@ -16,7 +16,7 @@ SET DEFINE OFF
------ payload begin ------
CREATE OR REPLACE PROCEDURE dvon_import_perslid (p_import_key IN NUMBER)
CREATE OR REPLACE PROCEDURE dvon_import_prs (p_import_key IN NUMBER)
AS
oracle_err_num NUMBER;
oracle_err_mes VARCHAR2 (200);
@@ -87,10 +87,10 @@ EXCEPTION
oracle_err_mes := SUBSTR (SQLERRM, 1, 100);
v_errormsg := 'Error ' || oracle_err_num || '/' || oracle_err_mes;
fac.imp_writelog (p_import_key, 'E', v_errormsg, v_errorhint);
END dvon_import_perslid;
END dvon_import_prs;
/
CREATE OR REPLACE PROCEDURE dvon_update_perslid (
CREATE OR REPLACE PROCEDURE dvon_update_prs (
p_import_key IN NUMBER
) IS
-- Alle personen verwijderen die niet meer in import bestand voorkomen.
@@ -139,7 +139,7 @@ BEGIN
END;
END LOOP;
END dvon_update_perslid;
END dvon_update_prs;
/
-- Vanaf hier rapportages
@@ -159,7 +159,7 @@ AS
SELECT iv.groep,
iv.soort,
maat.fac_usrdata_omschr,
COUNT (maat.fac_usrdata_omschr),
COALESCE (COUNT (maat.fac_usrdata_omschr), 0),
iv.locatie_omschrijving,
iv.gebouw,
iv.verdiepingcode,
@@ -171,7 +171,7 @@ SELECT iv.groep,
AND ik.ins_srtkenmerk_key = isk.ins_srtkenmerk_key
AND iv.ins_kenmerk_key = ik.ins_kenmerk_key
AND isk.ins_srtkenmerk_upper LIKE '%MAAT%') maat
WHERE iv.deel_key = maat.ins_deel_key
WHERE iv.deel_key = maat.ins_deel_key(+)
GROUP BY maat.fac_usrdata_omschr,
iv.groep,
iv.soort,
@@ -209,96 +209,143 @@ GROUP BY iv.groep,
CREATE OR REPLACE VIEW dvon_v_rap_bes_voorraad
(
bestelling_key,
bestelopdrachtnummer,
bestellingkey,
bestelaanvraagnr,
besteldatum,
leverancier,
status,
besteller,
invoerder,
kostensoortgroep,
kostensoort,
kpn,
kpn_omschrijving,
fclt_3d_afdeling_key,
afdeling_code,
afdeling_omschrijving,
fclt_3d_locatie_key,
locatie_code,
regio_omschrijving,
district_omschrijving,
afleveradres,
mandaat,
fclt_3d_discipline_key,
catalogus,
groep,
productomschrijving,
productcode,
afleverdatum,
doorlooptijd_werkdgn,
sla_tijd,
prijs,
inkoopprijs,
status,
gefiatteerddoor,
bestelopdrachtnummer,
aantal,
itemprijs,
iteminkoopprijs,
itemposnr,
maat,
aantal,
kleurbolletje,
op_voorraad,
voorraad_locatie,
opmerking,
besteld_voor,
bestelopdr_key
bestopdr_key
)
AS
SELECT bvu.*,
SELECT DISTINCT
bo.bes_bestelopdr_id,
b.bes_bestelling_key,
'A-' || b.bes_bestelling_key bestelaanvraagnr,
b.bes_bestelling_datum besteldatum,
(SELECT bes_bestellingstatuses_omschr
FROM bes_bestellingstatuses bs
WHERE bs.bes_bestellingstatuses_key = b.bes_bestelling_status)
status,
(SELECT prs_perslid_naam_full
FROM prs_v_perslid_fullnames_all pf
WHERE pf.prs_perslid_key = b.prs_perslid_key)
besteller,
d.ins_discipline_omschrijving catalogus,
sg.bes_srtgroep_omschrijving groep,
sd.bes_srtdeel_omschrijving productomschrijving,
sd.bes_srtdeel_nr productcode,
COALESCE (
(SELECT f.fac_usrdata_omschr
FROM fac_usrdata f, bes_srtkenmerk bsk
WHERE f.fac_usrdata_key = bki.bes_kenmerkbesteli_waarde
WHERE f.fac_usrdata_key =
fac.safe_to_number (bki.bes_kenmerkbesteli_waarde)
AND BK.BES_SRTKENMERK_KEY = bsk.bes_srtkenmerk_key
AND bsk.bes_srtkenmerk_upper LIKE '%MAAT%'),
'NVT')
maat,
lcl.l('lcl_bestelopdr_flag' || bo.bes_bestelopdr_flag),
COALESCE (dv.aantal, 0) op_voorraad,
bi.bes_bestelling_item_aantal aantal,
lcl.l ('lcl_bestelopdr_flag' || bo.bes_bestelopdr_flag),
dv.aantal op_voorraad,
COALESCE (dv.locatie, 'Niet opgegeven') voorraad_locatie,
bo.bes_bestelopdr_opmerking,
(SELECT prs_perslid_naam_full
FROM prs_v_perslid_fullnames_all pf
WHERE pf.prs_perslid_key = b.prs_perslid_key_voor)
besteld_voor,
bo.bes_bestelopdr_key
FROM bes_v_udr_bestelling bvu,
bes_bestelling b,
WHERE pf.prs_perslid_key = b.prs_perslid_key_voor)
besteld_voor,
bo.bes_bestelopdr_key
FROM bes_bestelling b,
bes_bestelling_item bi,
bes_bestelopdr_item boi,
bes_bestelopdr bo,
bes_kenmerkbesteli bki,
bes_kenmerk bk,
dvon_v_rap_voorraad dv
dvon_v_rap_voorraad dv,
ins_tab_discipline d,
bes_srtdeel sd,
bes_srtgroep sg
WHERE b.bes_bestelling_key = bi.bes_bestelling_key
AND bi.bes_bestelopdr_item_key = boi.bes_bestelopdr_item_key(+)
AND boi.bes_bestelopdr_key = bo.bes_bestelopdr_key(+)
AND b.bes_bestelling_key = bvu.bestelling_key
AND bi.bes_bestelopdr_item_key = boi.bes_bestelopdr_item_key
AND boi.bes_bestelopdr_key = bo.bes_bestelopdr_key
AND bki.bes_bestelling_item_key = bi.bes_bestelling_item_key
AND bki.bes_kenmerk_key = bk.bes_kenmerk_key
AND dv.object_soort = bvu.productomschrijving
AND bi.bes_srtdeel_key = sd.bes_srtdeel_key
AND sd.bes_srtgroep_key = sg.bes_srtgroep_key
AND sg.ins_discipline_key = d.ins_discipline_key
AND dv.object_soort(+) = sd.bes_srtdeel_omschrijving
AND bo.bes_bestelopdr_key IS NOT NULL
AND dv.ruimtenr = 'MAGAZIJN'
AND dv.maat =
COALESCE (
(SELECT f.fac_usrdata_omschr
FROM fac_usrdata f, bes_srtkenmerk bsk
WHERE f.fac_usrdata_key = bki.bes_kenmerkbesteli_waarde
AND BK.BES_SRTKENMERK_KEY = bsk.bes_srtkenmerk_key
AND bsk.bes_srtkenmerk_upper LIKE '%MAAT%'),
'NVT');
CREATE OR REPLACE VIEW DVON_V_NOTI_BES_DEEL
AND (dv.maat IS NULL
OR dv.maat =
COALESCE (
(SELECT f.fac_usrdata_omschr
FROM fac_usrdata f, bes_srtkenmerk bsk
WHERE f.fac_usrdata_key =
fac.safe_to_number (
bki.bes_kenmerkbesteli_waarde)
AND BK.BES_SRTKENMERK_KEY =
bsk.bes_srtkenmerk_key
AND bsk.bes_srtkenmerk_upper LIKE '%MAAT%'),
'NVT'));
CREATE OR REPLACE VIEW dvon_v_rap_gelev_nbev
(
bestelling_key,
bestelaanvraagnr,
besteld_voor,
bestelling_status,
kostenplaats,
datum_laatste_lev,
email_besteld_voor,
fiatteur,
email_fiatteur
)
AS
SELECT DISTINCT
b.bes_bestelling_key,
'A-' || b.bes_bestelling_key bestelaanvraagnr,
(SELECT prs_perslid_naam_full
FROM prs_v_perslid_fullnames_all pf
WHERE pf.prs_perslid_key = b.prs_perslid_key_voor)
besteld_voor,
(SELECT bes_bestellingstatuses_omschr
FROM bes_bestellingstatuses bs
WHERE bs.bes_bestellingstatuses_key = b.bes_bestelling_status)
status,
pk.prs_kostenplaats_omschrijving,
b.bes_bestelling_leverdatum,
(SELECT p.prs_perslid_email
FROM prs_perslid p
WHERE p.prs_perslid_key = b.prs_perslid_key_voor)
email_voor,
(SELECT prs_perslid_naam_full
FROM prs_v_perslid_fullnames_all pf
WHERE pf.prs_perslid_key = b.bes_bestelling_fiat_user)
fiatteur,
(SELECT p.prs_perslid_email
FROM prs_perslid p
WHERE p.prs_perslid_key = b.bes_bestelling_fiat_user)
email_fiat
FROM bes_bestelling b,
prs_v_perslid_fullnames pf,
prs_kostenplaats pk,
prs_perslid p
WHERE b.prs_kostenplaats_key = pk.prs_kostenplaats_key
AND b.bes_bestelling_leverdatum IS NOT NULL
AND b.bes_bestelling_status = 6;
CREATE OR REPLACE VIEW DVON_V_NOTI_BES_DEEL
(
CODE,
SENDER,
@@ -331,7 +378,7 @@ AS
AND fa.fac_tracking_refkey = bo.bes_bestelopdr_key
AND fa.fac_srtnotificatie_key = 25 -- BESUPD er is iets geleverd
AND b.bes_bestelling_key = substr(bo.bes_bestelopdr_id, 1, instr(bo.bes_bestelopdr_id, '/')-1)
AND TRUNC (fa.fac_tracking_datum) = TRUNC (sysdate) -1;
AND TRUNC (fa.fac_tracking_datum) = TRUNC (sysdate);
------ payload end ------