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

ALLI#48067 object/bes rapport uitgebreid

Browse Source 
svn path=/Customer/trunk/; revision=36054
This commit is contained in:
Ruud Lipper
2017-11-20 11:44:08 +00:00
parent f1e115e10f
commit d950b1568f
1 changed files with 50 additions and 17 deletions
Download Patch File Download Diff File Expand all files Collapse all files

67
ALLI/alli.sql
View File

@@ -79,7 +79,7 @@ BEGIN
v_errorhint := 'Fout bij opvragen te importeren rij';
v_ongeldig := 0;
-- Lees alle veldwaarden
-- 01 - Usernaam/login
fac.imp_getfield (v_newline, c_fielddelimitor, v_prs_perslid_oslogin);
@@ -111,7 +111,7 @@ BEGIN
-- 12 - Bedrijfsonderdeel van medewerker
fac.imp_getfield (v_newline, c_fielddelimitor, v_prs_perslid_bedrijfsdeel);
-- 13 - Leidinggevende van medewerker
fac.imp_getfield (v_newline, c_fielddelimitor, v_prs_perslid_leidinggevende);
@@ -119,7 +119,7 @@ BEGIN
fac.imp_getfield (v_newline, c_fielddelimitor, v_prs_perslid_voorletters);
-------------------------------------------------------------------------
-- xx - Locatiecode werkplek van medewerker
--fac.imp_getfield (v_newline, c_fielddelimitor, v_alg_locatie_code);
v_alg_locatie_code := NULL;
@@ -752,7 +752,7 @@ BEGIN
)
THEN
-- Geldig importbestand wat betreft aantal personen
-- Personen verwijderen/inactiveren
FOR recdelprs IN cdelprs
LOOP
@@ -1116,7 +1116,7 @@ BEGIN
FROM prs_perslid
WHERE prs_perslid_verwijder IS NULL
AND UPPER (prs_perslid_nr) = UPPER (recperslid.prs_perslid_nr);
-- Meerdere personen met hetzelfde nummer; loggen en overslaan
IF (v_count > 1)
THEN
@@ -1127,18 +1127,18 @@ BEGIN
v_errorhint
);
CONTINUE;
-- Nog niemand met dit nummer; voeg toe
ELSIF (v_count = 0)
THEN
v_errorhint := 'Fout bij toevoegen persoon';
-- Checken of er al een persoon met dezelfde oslogin bestaat
SELECT COUNT(*)
INTO v_count
FROM prs_perslid
WHERE UPPER(prs_perslid_oslogin) = UPPER(recperslid.prs_perslid_oslogin);
-- Er bestaat al iemand met deze oslogin. Loggen en overslaan.
IF (v_count != 0)
THEN
@@ -1176,9 +1176,9 @@ BEGIN
)
RETURNING prs_perslid_key INTO v_perslid_key;
END IF;
COMMIT;
-- E<>n persoon met dit nummer; werk bij
ELSE
@@ -1190,7 +1190,7 @@ BEGIN
FROM prs_perslid
WHERE UPPER(prs_perslid_oslogin) = UPPER(recperslid.prs_perslid_oslogin)
AND UPPER( COALESCE(prs_perslid_nr,'apekool') ) != UPPER(recperslid.prs_perslid_nr);
-- Er bestaat al iemand anders met deze oslogin. Loggen en overslaan.
IF (v_count != 0)
THEN
@@ -1290,7 +1290,7 @@ BEGIN
|| TO_CHAR (v_count_error),
''
);
-- ALLI#33108: telefoonnummers opmaken voor de visitekaartjes
-- (moet worden 0612345678)
UPDATE prs_perslid
@@ -1309,7 +1309,7 @@ BEGIN
UPDATE prs_perslid
SET prs_perslid_mobiel = NULL
WHERE prs_perslid_mobiel = '0';
-- Ongeldige nummers rapporteren
FOR rectel IN (
SELECT prs_perslid_key, prs_perslid_nr, prs_perslid_naam, prs_perslid_voornaam, prs_perslid_mobiel
@@ -1328,7 +1328,7 @@ BEGIN
|| rectel.prs_perslid_mobiel || ']'
);
END LOOP;
COMMIT;
v_count_tot := 0;
@@ -2824,23 +2824,28 @@ AS
WHERE b.fac_bookmark_id = 'BhIEFEoAItbkuYJL'
AND g.alg_gebouw_key = rg.alg_gebouw_key
AND l.alg_locatie_key = rg.alg_locatie_key;
-- rapport met ICT objecten (key 321) gekoppeld aan de bij behorende bestellingen (key 221
-- groep_key 1623 = Telefoons
-- srtdeel_key 9202 = notebooks, srtdeel_key 9201 = telefonie
-- srtdeel_key 9202 = notebooks, srtdeel_key 9201 = telefonie
CREATE OR REPLACE VIEW alli_v_rap_ict_insbes
(
ins_deel_key,
ins_gekoppeld_aan,
ins_eigenaar,
ins_naam,
ins_email,
ins_afdeling,
ins_identificatie,
ins_beschrijving,
ins_aanmaakdatum,
ins_objectsoort,
ins_groep,
artikel_groep,
artikel,
merk,
type,
specificatie,
artikelnummer,
bes_aantal,
bes_item_prijs,
@@ -2849,6 +2854,7 @@ CREATE OR REPLACE VIEW alli_v_rap_ict_insbes
ins_artikelnummer,
ins_serienummer,
ins_aanschafdatum,
ins_aanschafdatum_exp,
ins_imei
)
AS
@@ -2867,14 +2873,31 @@ AS
'??')
eigenaar,
pf.prs_perslid_naam_full naam,
pf.prs_perslid_email,
a.prs_afdeling_omschrijving || ' (' || a.prs_afdeling_naam || ')'
afdeling,
ins_deel_omschrijving,
ins_deel_opmerking beschrijving,
ins_deel_aanmaak,
ins_srtdeel_omschrijving,
ins_srtgroep_omschrijving,
cyod.bes_srtgroep_omschrijving,
cyod.bes_srtdeel_omschrijving,
REGEXP_SUBSTR (cyod.bes_srtdeel_omschrijving,
'[^**]+',
1,
1)
merk,
REGEXP_SUBSTR (cyod.bes_srtdeel_omschrijving,
'[^**]+',
1,
2)
TYPE,
REGEXP_SUBSTR (cyod.bes_srtdeel_omschrijving,
'[^**]+',
1,
3)
specificatie,
cyod.bes_srtdeel_nr,
cyod.aantal,
cyod.item_prijs,
@@ -2898,6 +2921,12 @@ AS
AND ikd.ins_kenmerk_key = k.ins_kenmerk_key
AND k.ins_srtkenmerk_key = 5)
aanschafdatum,
(SELECT to_char(fac.safe_to_date (ins_kenmerkdeel_waarde, 'dd-mm-yyyy'), 'YYYYMMDD')
FROM ins_kenmerkdeel ikd, ins_kenmerk k
WHERE ins_deel_key = d.ins_deel_key
AND ikd.ins_kenmerk_key = k.ins_kenmerk_key
AND k.ins_srtkenmerk_key = 5)
aanschafdatum_exp,
(SELECT ins_kenmerkdeel_waarde
FROM ins_kenmerkdeel ikd, ins_kenmerk k
WHERE ins_deel_key = d.ins_deel_key
@@ -2906,7 +2935,11 @@ AS
imei
FROM ins_v_aanwezigdeel d,
ins_v_deel_gegevens_keys idg,
prs_v_perslid_fullnames_all pf,
(SELECT pf1.prs_perslid_key,
pf1.prs_perslid_naam_full,
p.prs_perslid_email
FROM prs_v_perslid_fullnames_all pf1, prs_perslid p
WHERE p.prs_perslid_key = pf1.prs_perslid_key) pf,
prs_afdeling a,
ins_srtdeel sd,
ins_srtgroep sg,