60 lines
1.7 KiB
Plaintext
60 lines
1.7 KiB
Plaintext
-- [CARE*.SQL]
|
|
--
|
|
-- Script tbv het initialiseren van de Facilitor Care-Webb omgeving in Oracle
|
|
-- Copyright 2010 SG|facilitor bv.
|
|
-- All rights reserved!
|
|
/*
|
|
* $Revision$
|
|
* $Id$
|
|
*/
|
|
#include "modules.h"
|
|
#include "comsql.h"
|
|
|
|
SET TIME ON
|
|
SET DEFINE OFF
|
|
SPOOL xcarewebb
|
|
PROMPT [carewebb.lst]
|
|
PROMPT
|
|
PROMPT Copyright 2013 SG|facilitor bv. ALL RIGHTS RESERVED.
|
|
PROMPT
|
|
PROMPT Dit is de gegenereerde list-file van CARExxxx.sql welke
|
|
PROMPT is gebruikt om de Facilitor(r) Care-Webb _VERSION omgeving in Oracle aan te
|
|
PROMPT maken.
|
|
PROMPT
|
|
PROMPT Dit script is gerund in user:
|
|
SHOW USER
|
|
PROMPT
|
|
PROMPT
|
|
|
|
SET LINESIZE 1000
|
|
SET ECHO ON
|
|
#include "care\care_tab.src"
|
|
#include "care\care_ind.src"
|
|
#include "care\care_vie.src"
|
|
#include "care\care_pac.src"
|
|
#include "care\care_ini.src"
|
|
|
|
COMMIT;
|
|
|
|
///////////////////////////// finally compile all views, triggers etc acc to the latest state ///////
|
|
BEGIN DBMS_UTILITY.COMPILE_SCHEMA(USER, FALSE); END;
|
|
/
|
|
REGISTERONCE('$Id$')
|
|
|
|
COMMIT;
|
|
///////////////////////////// Report invalid objects, if any ///////
|
|
SET ECHO OFF
|
|
SET LINESIZE 132
|
|
PROMPT List of all invalid objects after Facilitor Care-Webb 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'
|
|
AND UPPER(object_name) LIKE 'CARE%'
|
|
ORDER BY object_name;
|
|
|
|
SELECT 'Care-Webb/' || 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
|