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

svn path=/Customer/; revision=28660

Browse Source
This commit is contained in:
Suzan Wiegerinck
2016-03-29 07:21:38 +00:00
parent bc9f64003d
commit aa1e4c34bf
3 changed files with 0 additions and 219 deletions
Download Patch File Download Diff File Expand all files Collapse all files

34
onces/UWVA/UWVA#34519_IMP_AUTO.SQL
View File

@@ -1,34 +0,0 @@
SET ECHO ON
SPOOL uwva#34519_IMP_AUTO.lst
SET DEFINE OFF
-- AUTO'S
--- Alle ge<67>mporteerde auto's moeten als eigenaar Facilitair bedrijf Inkoop krijgen
--- Afdelingsnaam=420601 Afdelingskey=1153
UPDATE ins_deel o
SET ins_alg_ruimte_type = 'A', ins_alg_ruimte_key = 1153
WHERE O.INS_SRTDEEL_KEY = 258658;
--- Verwijder de koppeltekens uit de kentekens van de auto's
UPDATE INS_DEEL O
SET INS_DEEL_OMSCHRIJVING = REPLACE (INS_DEEL_OMSCHRIJVING, '-'),
INS_DEEL_UPPER = REPLACE (INS_DEEL_UPPER, '-')
WHERE O.INS_SRTDEEL_KEY = 258658
AND INS_DEEL_OMSCHRIJVING LIKE '%-%'
AND INS_DEEL_UPPER LIKE '%-%';
-- Als de vervaldatum van de auto in het verleden ligt, dan moet deze worden toegevoegd aan het object auto
-- Waarde ins_kenmerk_waarde14 uit FAC_IMP_INS moet naar ins_deel_vervaldatum uit INS_DEEL
update ins_deel O
set O.INS_DEEL_VERVALDATUM = (select fac.safe_to_date(K.INS_KENMERKDEEL_WAARDE, 'DD-MM-YYYY') from ins_kenmerkdeel k
where K.INS_KENMERK_KEY = 475
and fac.safe_to_date(K.INS_KENMERKDEEL_WAARDE, 'DD-MM-YYYY') <= SYSDATE
and K.INS_DEEL_KEY=O.INS_DEEL_KEY)
where O.INS_SRTDEEL_KEY=258658;
COMMIT;
BEGIN adm.systrackscriptId('$Id$'); END;
/
COMMIT;
SPOOL OFF

83
onces/UWVA/UWVA#34519_IMP_GO.SQL
View File

@@ -1,83 +0,0 @@
SET ECHO ON
SPOOL uwva#34519_IMP_GO.lst
SET DEFINE OFF
-- GEBRUIKERSOVEREENKOMSTEN
-- Na het importeren van gebruikersovereenkomsten moet de opzegtermijn op <geen> gezet worden en de rappeltermijn op 3 maanden gezet worden.
UPDATE CNT_CONTRACT C
SET C.CNT_CONTRACT_OPZEGTERMIJN = 1, C.CNT_CONTRACT_RAPPELTERMIJN = 5
WHERE c.INS_DISCIPLINE_KEY = 426;
-- Het ge<67>mporteerde personeelsnummer uit de gebruikersovereenkomst moet worden aangevuld met I- en voorloopnullen
UPDATE cnt_kenmerkcontract k
SET k.cnt_kenmerkcontract_waarde =
CONCAT ('I-', LPAD (k.cnt_kenmerkcontract_waarde, 6, '0'))
WHERE cnt_kenmerkcontract_key IN
(SELECT K.CNT_KENMERKCONTRACT_key
FROM cnt_contract c, cnt_kenmerkcontract k, cnt_kenmerk m
WHERE c.ins_discipline_key = 426
AND C.CNT_CONTRACT_KEY = K.CNT_CONTRACT_KEY
AND K.CNT_KENMERK_KEY = M.CNT_KENMERK_KEY
AND M.CNT_SRTKENMERK_KEY = 652);
--- In het testbestand zitten contracten met ongeldige persnummers, deze moeten uitgesloten worden van de update
-- Alle andere gebruikerssovereenkomsten kunnen aan het juiste perslid gekoppeld worden
UPDATE cnt_contract c
SET CNT_PRS_BEDRIJF_KEY = NULL,
cnt_prs_perslid_key =
(SELECT p.prs_perslid_key
FROM cnt_kenmerkcontract k, cnt_kenmerk m, prs_perslid p
WHERE c.ins_discipline_key = 426
AND C.CNT_CONTRACT_KEY = K.CNT_CONTRACT_KEY
AND K.CNT_KENMERK_KEY = M.CNT_KENMERK_KEY
AND M.CNT_SRTKENMERK_KEY = 652
AND p.prs_perslid_verwijder IS NULL
AND P.PRS_PERSLID_NR = K.CNT_KENMERKCONTRACT_WAARDE)
WHERE c.ins_discipline_key = 426
AND c.CNT_contract_key NOT IN (
SELECT C.CNT_CONTRACT_KEY
FROM cnt_contract c
WHERE cnt_contract_key NOT IN
(SELECT c.cnt_contract_key
FROM cnt_kenmerkcontract k,
cnt_kenmerk m,
prs_perslid p,
cnt_contract c
WHERE c.ins_discipline_key = 426
AND C.CNT_CONTRACT_KEY = K.CNT_CONTRACT_KEY
AND K.CNT_KENMERK_KEY = M.CNT_KENMERK_KEY
AND M.CNT_SRTKENMERK_KEY = 652
and p.prs_perslid_verwijder is null
AND P.PRS_PERSLID_NR = K.CNT_KENMERKCONTRACT_WAARDE)
AND c.ins_discipline_key = 426
);
-- Vervolgens kunnen de juiste auto's aan de gebruikersovereenkomsten gekoppeld worden obv het kenteken (zonder koppeltekens)
INSERT INTO cnt_contract_object (CNT_CONTRACT_KEY, CNT_INS_SRTDEEL_KEY, CNT_INS_DEEL_KEY)
SELECT C.CNT_CONTRACT_KEY, O.INS_SRTDEEL_KEY, o.INS_DEEL_KEY
FROM CNT_CONTRACT c, INS_DEEL o
WHERE C.CNT_CONTRACT_OMSCHRIJVING = O.INS_DEEL_OMSCHRIJVING
AND C.INS_DISCIPLINE_KEY = 426
AND O.INS_SRTDEEL_KEY = 258658;
-- Het contractnummer en de contractomschrijving van de berijdersovereenkomst moet uit het kenteken, / en het persnr van de berijder bestaan
UPDATE CNT_CONTRACT C
SET c.cnt_contract_nummer_intern=(SELECT CONCAT(C.CNT_CONTRACT_OMSCHRIJVING, '/')
FROM PRS_PERSlid P WHERE C.CNT_PRS_PERSLID_KEY=P.PRS_PERSLID_KEY)
WHERE c.INS_DISCIPLINE_KEY = 426;
UPDATE CNT_CONTRACT C
SET c.cnt_contract_nummer_intern=(SELECT CONCAT(C.CNT_CONTRACT_NUMMER_INTERN, P.prs_perslid_NR)
FROM PRS_PERSlid P WHERE C.CNT_PRS_PERSLID_KEY=P.PRS_PERSLID_KEY)
WHERE c.INS_DISCIPLINE_KEY = 426;
UPDATE CNT_CONTRACT C
SET c.cnt_contract_omschrijving=CONCAT('GO ', C.CNT_CONTRACT_NUMMER_INTERN)
WHERE c.INS_DISCIPLINE_KEY = 426;
COMMIT;
BEGIN adm.systrackscriptId('$Id$'); END;
/
COMMIT;
SPOOL OFF

102
onces/UWVA/uwva#34519.sql
View File

@@ -1,102 +0,0 @@
SET ECHO ON
SPOOL uwva#34519.lst
SET DEFINE OFF
CREATE OR REPLACE FORCE VIEW UWVA_V_RAP_CONTR_KPL
(
LEASECONTRACT,
KP_LEASECONTRACT,
KP_OMSCHRIJVING_LC,
GEBRUIKERSOVEREENKOMST,
KP_GEBRUIKERSOVEREENKOMST,
KP_OMSCHRIJVING_GO,
MEDEWERKER_ID,
NAAM,
KP_MEDEWERKER,
KP_OMSCHRIJVING_MDW,
CONTROLE_KPL
)
AS
SELECT L.CNT_CONTRACT_NUMMER_INTERN,
KL.PRS_KOSTENPLAATS_UPPER,
KL.PRS_KOSTENPLAATS_OMSCHRIJVING,
G.CNT_CONTRACT_NUMMER_INTERN,
KG.PRS_KOSTENPLAATS_UPPER,
KG.PRS_KOSTENPLAATS_OMSCHRIJVING,
P.PRS_PERSLID_NR,
N.PRS_PERSLID_NAAM_FRIENDLY,
KP.PRS_KOSTENPLAATS_UPPER,
KP.PRS_KOSTENPLAATS_OMSCHRIJVING,
CASE
WHEN ( KL.PRS_KOSTENPLAATS_UPPER <> KG.PRS_KOSTENPLAATS_UPPER
OR KG.PRS_KOSTENPLAATS_UPPER <> KP.PRS_KOSTENPLAATS_UPPER
OR KL.PRS_KOSTENPLAATS_UPPER <> KP.PRS_KOSTENPLAATS_UPPER)
THEN
'Onjuist'
ELSE
'Juist'
END
AS Controle_KPL
FROM cnt_contract l,
prs_kostenplaats kl,
cnt_contract g,
prs_kostenplaats kg,
prs_perslid p,
PRS_V_PERSLID_FULLNAMES_ALL n,
prs_afdeling a,
prs_kostenplaats kp
WHERE L.INS_DISCIPLINE_KEY = 426
AND G.INS_DISCIPLINE_KEY = 430
AND L.PRS_KOSTENPLAATS_KEY = KL.PRS_KOSTENPLAATS_KEY
AND G.PRS_KOSTENPLAATS_KEY = KG.PRS_KOSTENPLAATS_KEY
AND L.CNT_CONTRACT_NUMMER_INTERN =
LPAD (G.CNT_CONTRACT_NUMMER_INTERN, 6)
AND G.CNT_PRS_PERSLID_KEY = P.PRS_PERSLID_KEY
AND P.PRS_PERSLID_KEY = N.PRS_PERSLID_KEY
AND P.PRS_AFDELING_KEY = A.PRS_AFDELING_KEY
AND A.PRS_KOSTENPLAATS_KEY = KP.PRS_KOSTENPLAATS_KEY
AND L.CNT_CONTRACT_LOOPTIJD_TOT > CURRENT_DATE
AND G.CNT_CONTRACT_LOOPTIJD_VAN <= CURRENT_DATE
AND G.CNT_CONTRACT_LOOPTIJD_TOT > CURRENT_DATE;
CREATE OR REPLACE FORCE VIEW UWVA_RAP_SALARIS_INH
(
JAAR,
PERIODE,
PNR,
NAAM,
OMSCHRIJVING,
BEDRAG,
REKENINGNR,
KENTEKEN
)
AS
SELECT (TO_CHAR (f.fin_factuur_datum, 'yyyy')) AS JAAR,
(TO_CHAR (f.fin_factuur_datum, 'mm')) AS PERIODE,
P.PRS_PERSLID_NR,
N.PRS_PERSLID_NAAM_FULL,
K.PRS_KOSTENSOORT_REFCODE,
F.FIN_FACTUUR_TOTAAL,
K.PRS_KOSTENSOORT_OMS,
O.INS_DEEL_OMSCHRIJVING
FROM fin_factuur f,
cnt_contract c,
prs_perslid p,
PRS_V_PERSLID_FULLNAMES_ALL n,
prs_kostensoort k,
cnt_contract_object a,
ins_deel o
WHERE F.PRS_KOSTENSOORT_KEY = 382
AND F.CNT_CONTRACT_KEY = C.CNT_CONTRACT_KEY
AND C.CNT_PRS_PERSLID_KEY = P.PRS_PERSLID_KEY
AND P.PRS_PERSLID_KEY = N.PRS_PERSLID_KEY
AND F.PRS_KOSTENSOORT_KEY = K.PRS_KOSTENSOORT_KEY
AND C.CNT_CONTRACT_KEY = A.CNT_CONTRACT_KEY
AND A.CNT_INS_DEEL_KEY = O.INS_DEEL_KEY;
COMMIT;
BEGIN adm.systrackscript('$Workfile: uwva#25567.sql $', '$Revision$', 1); END;
/
COMMIT;
SPOOL OF