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

svn path=/Database/trunk/; revision=10216

Browse Source
This commit is contained in:
Peter Feij
2010-01-28 15:51:00 +00:00
parent c06c9cd37b
commit 54c7e1f7f1
1 changed files with 21 additions and 39 deletions
Download Patch File Download Diff File Expand all files Collapse all files

60
FCLT.SRC
View File

@@ -4,8 +4,8 @@
-- Copyright 1996-2010 SG|facilitor bv.
-- All rights reserved!
/*
* $Revision: 58 $
* $Modtime: 5-11-09 19:22 $
* $Revision: 59 $
* $Modtime: 28-01-10 16:43 $
*/
#include "modules.h"
@@ -88,14 +88,6 @@ SET LINESIZE 500
#include "prj_vie.src"
#include "msg_vie.src"
/* PACKAGES */
/* 22-05-96/KTH
* Let op: Packages komen voor triggers want er zijn triggers
* die refereren naar packages. Ze komen na tables etc. want packages
* zullen refereren naar tables en views.
* PF: door FORCE te gebruiken is de volgorde minder belangrijk geworden
*/
#include "cnt_pac.src"
#include "mld_pac.src"
#include "mrk_pac.src"
@@ -174,35 +166,25 @@ COMMIT;
///////////////////////////// finally compile all views, triggers etc acc to the latest state ///////
SET FEEDBACK OFF
PROMPT Recompiling invalid objects...
SPOOL xcompileall.sql
-- Temporary script generated by Facilitor createscript to compile all invalid objects
SET TERMOUT OFF
PROMPT SET LINESIZE 80
PROMPT SET HEADING OFF
PROMPT SET ECHO ON
PROMPT SET FEEDBACK ON
PROMPT SET PAGESIZE 0
PROMPT SET DEFINE OFF
SET LINESIZE 80
PROMPT SPOOL xxcompileall
SELECT 'ALTER '||object_type||' '||object_name||' compile;' FROM user_objects
WHERE object_type IN ('VIEW', 'TRIGGER', 'PACKAGE', 'PROCEDURE', 'FUNCTION')
AND status <> 'VALID'
ORDER BY object_name;
SELECT 'ALTER PACKAGE '||object_name||' compile body;' FROM user_objects
WHERE object_type IN ('PACKAGE BODY')
AND status <> 'VALID'
ORDER BY object_name;
PROMPT SPOOL OFF
PROMPT SET ECHO OFF
SPOOL OFF
///////////////////////////// now compile all views, triggers etc acc to the latest state ///////
[skip]
BEGIN DBMS_UTILITY.COMPILE_SCHEMA(USER, FALSE); END;
/
BEGIN fac.registerversion(_VERSIONMAJ, _VERSIONMIN, _VERSIONPATCH, '$Revision: 59 $', NULL); END;
/
[/skip]
COMMIT;
///////////////////////////// Report invalid objects, if any ///////
SET LINESIZE 120
SET FEEDBACK ON
PROMPT List of all invalid objects after Facilitor upgrade:
SELECT _VERSION||' Warning: ' || object_type || ' ' || object_name || ' is ' || status
FROM user_objects
WHERE object_type IN ('VIEW', 'TRIGGER', 'PACKAGE', 'PROCEDURE', 'FUNCTION', 'PACKAGE BODY')
AND status <> 'VALID'
ORDER BY object_name;
START xcompileall
/////////////////////////////////////////////////////////////////////////////////////////////////
SELECT 'Facilitor/' || USER || ' is now ' || fac.getdbversion() FROM DUAL;
PROMPT De upgrade is gereed, controleer de LST-files.
PROMPT Neem bij vragen, twijfels of problemen contact op met Facilitor.
SPOOL OFF
SET DEFINE ON
SET ECHO OFF
PROMPT -- Creatie van Facilitor-user gereed; bekijk facilitor.LST voor evt. errors!!