BAMG#73334 AiAi timeout bij starten nieuw melding

svn path=/Customer/; revision=56523

onces/BAMG/BAMG#73334.sql

@@ -0,0 +1,87 @@
+--
+-- $Id$
+--
+-- Met FCLT#72122 is een optimalisatie in de view PRS_V_AFDELING_FAMILIE gedaan
+-- Die (b)lijkt alleen/vooral bij BAMG en FMHN met enorm veel afdelingen
+-- aanroepen van aut.fac_get_prs_same_level heel traag te maken
+-- Herstel hier de oude PRS_V_AFDELING_FAMILIE (de onderliggende views
+-- waren er nog allemaal)
+--
+DEFINE thisfile = 'BAMG#73334.SQL'
+DEFINE dbuser   = '*'
+
+SET ECHO ON
+SET DEFINE ON
+COLUMN fcltlogfile NEW_VALUE fcltlogfile NOPRINT;
+COLUMN fcltcusterr NEW_VALUE fcltcusterr NOPRINT;
+WHENEVER SQLERROR CONTINUE;
+SELECT adm.getscriptspoolfile('&thisfile') AS fcltlogfile FROM DUAL;
+SPOOL &fcltlogfile
+WHENEVER SQLERROR EXIT;
+SELECT adm.checkscriptcust('&dbuser') AS fcltcusterr FROM DUAL;
+WHENEVER SQLERROR CONTINUE;
+PROMPT &fcltcusterr
+SET DEFINE OFF
+
+------ payload begin ------
+
+CREATE OR REPLACE FORCE VIEW prs_v_afdeling_familie
+(PRS_AFDELING_KEY, PRS_AFDELING_ELDER_KEY, NIVEAU)
+AS
+SELECT prs_afdeling_key5 prs_afdeling_key,
+          prs_afdeling_key5 prs_afdeling_elder_key, 5 niveau
+     FROM prs_v_afdeling_boom25
+   UNION ALL
+   SELECT prs_afdeling_key5, prs_afdeling_key4, 4
+     FROM prs_v_afdeling_boom25
+   UNION ALL
+   SELECT prs_afdeling_key5, prs_afdeling_key3, 3
+     FROM prs_v_afdeling_boom25
+   UNION ALL
+   SELECT prs_afdeling_key5, prs_afdeling_key2, 2
+     FROM prs_v_afdeling_boom25
+   UNION ALL
+   SELECT prs_afdeling_key5, prs_afdeling_key1, 1
+     FROM prs_v_afdeling_boom25
+   UNION ALL
+   SELECT prs_afdeling_key4, prs_afdeling_key4, 4
+     FROM prs_v_afdeling_boom24
+   UNION ALL
+   SELECT prs_afdeling_key4, prs_afdeling_key3, 3
+     FROM prs_v_afdeling_boom24
+   UNION ALL
+   SELECT prs_afdeling_key4, prs_afdeling_key2, 2
+     FROM prs_v_afdeling_boom24
+   UNION ALL
+   SELECT prs_afdeling_key4, prs_afdeling_key1, 1
+     FROM prs_v_afdeling_boom24
+   UNION ALL
+   SELECT prs_afdeling_key3, prs_afdeling_key3, 3
+     FROM prs_v_afdeling_boom23
+   UNION ALL
+   SELECT prs_afdeling_key3, prs_afdeling_key2, 2
+     FROM prs_v_afdeling_boom23
+   UNION ALL
+   SELECT prs_afdeling_key3, prs_afdeling_key1, 1
+     FROM prs_v_afdeling_boom23
+   UNION ALL
+   SELECT prs_afdeling_key2, prs_afdeling_key2, 2
+     FROM prs_v_afdeling_boom22
+   UNION ALL
+   SELECT prs_afdeling_key2, prs_afdeling_key1, 1
+     FROM prs_v_afdeling_boom22
+   UNION ALL
+   SELECT prs_afdeling_key1, prs_afdeling_key1, 1
+     FROM prs_v_afdeling_boom21 ;
+
+------ payload end   ------
+
+SET DEFINE OFF
+BEGIN adm.systrackscriptId ('$Id$', 1); END;
+/
+
+COMMIT;
+SET ECHO OFF
+SPOOL OFF
+SET DEFINE ON
+PROMPT Logfile of this upgrade is: &fcltlogfile