INLO#87051 -- Uitbreiding scanproces voor wagens tbv gevangenis haren om prestatie te monitoren - Levering naar PROD tbv uitrol

svn path=/Customer/trunk/; revision=71098
This commit is contained in:
Jos Migo
2025-12-01 12:31:16 +00:00
parent c72ad223df
commit a839e70f8d

View File

@@ -5941,7 +5941,8 @@ AS
-------------------------
-- Zie INLO#87051 - In 2025 helemaal herzien
CREATE OR REPLACE PROCEDURE inlo_import_scan_haren (p_import_key IN NUMBER)
----- BIJ LIVEGANG NOG DROPPEN inlo_import_scan_haren
CREATE OR REPLACE PROCEDURE inlo_import_scan_haren2 (p_import_key IN NUMBER)
AS
c_fielddelimitor VARCHAR2 (1) := ';';
@@ -6362,7 +6363,7 @@ EXCEPTION
'E',
v_errormsg,
v_hint);
END inlo_import_scan_haren;
END inlo_import_scan_haren2;
/
CREATE OR REPLACE PROCEDURE inlo_update_scan_haren (
@@ -6398,7 +6399,7 @@ BEGIN
END inlo_update_scan_haren;
/
-- DEZE KOMT TE VERVALLEN MET INLO#87051
-- DEZE KOMT TE VERVALLEN MET INLO#87051 EN MOET OOK GEDROPT WORDEN
CREATE OR REPLACE VIEW inlo_v_rap_scan_haren
(
ins_deel_key,
@@ -6469,6 +6470,10 @@ CREATE OR REPLACE VIEW inlo_v_rap_scan_haren2
-- extra velden
OBJECTSOORT,
ORGANISATIE_EENHEID,
PRS_ORGANISATIE_KEY,
-- aantallen conform SLA
SLA_AANTAL_GEDETINEERDE, -- aantal gedetineerde per eenheid/unit (contractueel)
AANTAL_EXTRA, -- aantal wat men voor deze eenheid/unit extra levert
-- velden bepaling scan op tijd (conform SLA)
CONTRACTNR,
SLA_CONTRACT_DAG,
@@ -6477,7 +6482,9 @@ CREATE OR REPLACE VIEW inlo_v_rap_scan_haren2
SCANDATUM_DAG_CODE, -- MA = 1 ... ZON = 7
SCANDATUM_TIJD,
OP_TIJD,
AFWIJKING_UITSCAN
AFWIJKING_UITSCAN,
AFWIJKING_AANTAL,
AFWIJKING_TIJD
)
AS
SELECT -- velden uit cust-tabel pps haren
@@ -6506,6 +6513,10 @@ AS
-- extra velden
d.ins_srtdeel_omschrijving objectsoort,
d.prs_afdeling_omschrijving organisatie_eenheid,
d.prs_afdeling_key,
-- aantal conform SLA
CASE WHEN d.prs_afdeling_key IS NULL THEN '' ELSE flx.getflex ('PRS', 1560, d.prs_afdeling_key, 'A') END sla_aantal_gedetineerde,
CASE WHEN d.ins_deel_key IS NULL THEN '' ELSE flx.getflex ('INS', 1662, d.ins_deel_key) END aantal_extra,
-- velden bepaling scan op tijd (conform SLA)
CASE WHEN c.cnt_contract_key IS NOT NULL
THEN c.cnt_contract_nummer_intern || '.' ||DECODE(c.cnt_contract_versie, NULL, '0', cnt_contract_versie)
@@ -6538,7 +6549,9 @@ AS
THEN 'Ruimte/Eenheid: - ' || v.afwijking_ruimte || ' / ' || v.afwijking_eenheid
ELSE ''
END
afwijking_uitscan
afwijking_uitscan,
CASE WHEN INSTR(LOWER(v.afwijking_dag), '(sla aantal)')>0 OR INSTR(LOWER(v.afwijking_ruimte), '(sla aantal)')>0 OR INSTR(LOWER(v.afwijking_eenheid), '(sla aantal)')>0 THEN 'ja' ELSE 'nee' END afwijking_aantal,
CASE WHEN INSTR(LOWER(v.afwijking_dag), '(sla tijd)')>0 OR INSTR(LOWER(v.afwijking_ruimte), '(sla tijd)')>0 OR INSTR(LOWER(v.afwijking_eenheid), '(sla tijd')>0 THEN 'ja' ELSE 'nee' END afwijking_tijd
FROM inlo_imp_scan_haren2 v, ins_v_deel_gegevens d, cnt_contract c, alg_ruimte r,
(SELECT kw.cnt_contract_key, ud.fac_usrdata_code dag_code, ud.fac_usrdata_omschr dag
FROM cnt_contract c, cnt_kenmerkcontract kw, cnt_kenmerk k, cnt_srtkenmerk sk,
@@ -6563,8 +6576,15 @@ AS
AND v.cnt_contract_key = c.cnt_contract_key (+)
AND v.cnt_contract_key = cnt_t.cnt_contract_key (+)
AND v.cnt_contract_key = cnt_d.cnt_contract_key (+)
ORDER BY rownumb
;
ORDER BY rownumb ;
-- DWH om de scandata van PPS-Haren te benaderen inclusief GRANT SELECT to AAFM
CREATE OR REPLACE VIEW inlo_v_dwh_pps_haren_scandata
AS
SELECT *
FROM inlo_v_rap_scan_haren2 ;
GRANT SELECT ON inlo_v_dwh_pps_haren_scandata TO aafm;
-- AFFICHES VOOR DE WASSERIJ - AFGIFTE WAS
---- betreft de eenheden/units die in Facilitor als object zijn opgenomen en waar men op de karren een print van heeft met naast de QRC-code van de scan ook de standaard inhoud van de te leveren goederen
@@ -6577,22 +6597,37 @@ CREATE OR REPLACE VIEW inlo_v_rap_haren_affiche_was
-- overige gegevens van dit deel
AANTAL_EXTRA,
AANTAL_WASZAKKEN,
-- onderdelen
ONDERDEEL_FOTO_KENMERK_KEY,
WASZAKKEN_OMS,
WASZAKKEN_KEY,
WASHANDJES,
WASHANDJES_OMS,
WASHANDJES_KEY,
BADHANDDOEKEN_KLEIN,
BADHANDDOEKEN_KLEIN_OMS,
BADHANDDOEKEN_GROOT,
BADHANDDOEKEN_GROOT_OMS,
DWEIL,
DWEIL_OMS,
KUSSENSLOOP,
LAKEN,HOESLAKEN,
KUSSENSLOOP_OMS,
LAKEN,
LAKEN_OMS,
HOESLAKEN,
HOESLAKEN_OMS,
KEUKENHANDDOEK,
KEUKENHANDDOEK_OMS,
-- nog veel meer kenmerken
-- organisatiegegevens van deze unit inclusief afbeelding
PRS_AFDELING_KEY,
AFDELING_NAAM,
AFDELING_CODE,
AFDELING_THEMA,
AANTAL_CONTRACTUEEL, -- aantal gedetinieerde (standaard)
AANTAL_CONTRACTUEEL, -- aantal gedetineerde (standaard)
EENHEID_SYMBOOL,
KLEURCODE,
KLEURCODE_BALK
KLEURCODE_BALK,
KLEURCODE
)
AS
SELECT v.ins_deel_key,
@@ -6601,36 +6636,54 @@ AS
v.ins_deel_vervaldatum,
flx.getflex ('INS', 1662, v.ins_deel_key) aantal_extra,
flx.getflex ('INS', 1681, v.ins_deel_key) aantal_waszakken,
(SELECT ins_kenmerk_key
FROM ins_kenmerk
WHERE ins_kenmerk_code = 'PPS_HAREN_ONDERDEEL_FOTO_KEY')
onderdeel_foto_kenmerk_key,
(select k.ins_kenmerk_omschrijving || CHR(10) || k.ins_kenmerk_hint from ins_kenmerk k where ins_kenmerk_key = 1681) waszakken_oms,
(select v.ins_deel_key from ins_v_deel_gegevens v where v.ins_srtgroep_key = 561 and UPPER(v.ins_deel_omschrijving) = 'WASZAKKEN') waszakken_key,
flx.getflex ('INS', 1701, v.ins_deel_key) washandjes,
(select k.ins_kenmerk_omschrijving || CHR(10) || k.ins_kenmerk_hint from ins_kenmerk k where ins_kenmerk_key = 1701) washandjes_oms,
(select v.ins_deel_key from ins_v_deel_gegevens v where v.ins_srtgroep_key = 561 and UPPER(v.ins_deel_omschrijving) = 'WASHANDJES') washandjes_key,
flx.getflex ('INS', 1703, v.ins_deel_key) badhanddoeken_klein,
(select k.ins_kenmerk_omschrijving || CHR(10) || k.ins_kenmerk_hint from ins_kenmerk k where ins_kenmerk_key = 1703) badhanddoeken_klein_oms,
flx.getflex ('INS', 1705, v.ins_deel_key) badhanddoeken_groot,
(select k.ins_kenmerk_omschrijving || CHR(10) || k.ins_kenmerk_hint from ins_kenmerk k where ins_kenmerk_key = 1705) badhanddoeken_groot_oms,
flx.getflex ('INS', 1707, v.ins_deel_key) dweil,
(select k.ins_kenmerk_omschrijving || CHR(10) || k.ins_kenmerk_hint from ins_kenmerk k where ins_kenmerk_key = 1707) dweil_oms,
flx.getflex ('INS', 1741, v.ins_deel_key) kussensloop,
(select k.ins_kenmerk_omschrijving || CHR(10) || k.ins_kenmerk_hint from ins_kenmerk k where ins_kenmerk_key = 1741) kussensloop_oms,
flx.getflex ('INS', 1743, v.ins_deel_key) laken,
(select k.ins_kenmerk_omschrijving || CHR(10) || k.ins_kenmerk_hint from ins_kenmerk k where ins_kenmerk_key = 1743) laken_oms,
flx.getflex ('INS', 1746, v.ins_deel_key) hoeslaken,
(select k.ins_kenmerk_omschrijving || CHR(10) || k.ins_kenmerk_hint from ins_kenmerk k where ins_kenmerk_key = 1746) hoeslaken_oms,
flx.getflex ('INS', 1749, v.ins_deel_key) keukenhanddoek,
(select k.ins_kenmerk_omschrijving || CHR(10) || k.ins_kenmerk_hint from ins_kenmerk k where ins_kenmerk_key = 1749) keukenhanddoek_oms,
-- nog veel meer kenmerken
-- organisatiegegevens van deze unit inclusief afbeelding
a.prs_afdeling_key,
v.prs_afdeling_omschrijving afdeling_naam,
a.prs_afdeling_naam afdeling_code,
flx.getdomeinwaarde (1601, flx.getflex ('PRS', 1541, a.prs_afdeling_key, 'A')) afdeling_thema,
flx.getflex ('PRS', 1560, a.prs_afdeling_key, 'A') aantal_contractueel,
1542 eenheid_symbool,
/* (SELECT prs_kenmerk_key
(SELECT prs_kenmerk_key
FROM prs_kenmerk
WHERE prs_kenmerk_niveau = 'A'
AND prs_kenmerk_code = 'PPS_HAREN_SYMBOOL')
eenheid_symbool */
flx.getflex ('PRS', 1544, a.prs_afdeling_key, 'A') kleurcode,
1543 kleurcode_balk
eenheid_symbool,
(SELECT prs_kenmerk_key
FROM prs_kenmerk
WHERE prs_kenmerk_niveau = 'A'
AND prs_kenmerk_code = 'PPS_HAREN_KLEURBALK')
kleurcode_balk,
flx.getflex ('PRS', 1544, a.prs_afdeling_key, 'A') kleurcode
FROM ins_v_deel_gegevens v,
prs_afdeling a
WHERE v.ins_srtgroep_key = 541 -- EENHEDEN/UNITS
AND v.prs_afdeling_key = a.prs_afdeling_key
-- TEST - ALLEEN AFFICHES UNIT 412 TONEN
AND a.prs_afdeling_upper = '412'
;
;
------------------------------
-- EXACT - BUNDEL CATERING ---