UWVA#34519 Views voor rapportages tbv wagenparkbeheer

svn path=/Customer/; revision=28328
2016-03-02 13:40:13 +00:00
parent e1e477cf1e
commit c205d9a820
1 changed files with 102 additions and 0 deletions
--- a/onces/UWVA/uwva#34519.sql
+++ b/onces/UWVA/uwva#34519.sql
@@ -0,0 +1,102 @@
+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_BETA.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