Merge 5.2.3 Gold C (DB17b) patches

svn path=/Database/trunk/; revision=16550
This commit is contained in:
Jos Groot Lipman
2013-01-17 12:55:59 +00:00
parent ab9728f1b2
commit 13bf173097
8 changed files with 21 additions and 19 deletions

View File

@@ -15,9 +15,8 @@ SET HEADING OFF
SET FEEDBACK OFF
SET ECHO OFF
#define _MKVER(a) STRINGIZE(a)
column fcltlogfile new_value fcltlogfile NOPRINT;
select 'FACILITOR'||_MKVER(_DBV) || '_' || UPPER(USER || '_' || sys_context('USERENV', 'SERVICE_NAME') || '_' || sys_context('USERENV', 'SERVER_HOST')) || '_' || to_char(sysdate,'YYYYMMDD_HH24MISS') || '.lst' as fcltlogfile from dual;
select 'FACILITOR'|| _DBV_STRING || '_' || UPPER(USER || '_' || sys_context('USERENV', 'SERVICE_NAME') || '_' || sys_context('USERENV', 'SERVER_HOST')) || '_' || to_char(sysdate,'YYYYMMDD_HH24MISS') || '.lst' as fcltlogfile from dual;
spool &fcltlogfile
WHENEVER SQLERROR EXIT;
@@ -134,7 +133,7 @@ COMMIT;
///////////////////////////// finally compile all views, triggers etc acc to the latest state ///////
BEGIN DBMS_UTILITY.COMPILE_SCHEMA(USER, FALSE); END;
/
BEGIN fac.registerversion(_VERSIONMAJ, _VERSIONMIN, _VERSIONPATCH, _DBV, 'NL'); END;
BEGIN fac.registerversion(_VERSIONMAJ, _VERSIONMIN, _VERSIONPATCH, _DBV_STRING, 'NL'); END;
/
REGISTERONCE('$Workfile: FCLT.SRC $','$Revision$')
@@ -143,7 +142,7 @@ COMMIT;
SET ECHO OFF
SET LINESIZE 80
PROMPT List of all invalid objects after FACILITOR creation:
SELECT 'OR'||'A-'||'DB'||TO_CHAR(_DBV)||' Warning: ' || object_type || ' ' || object_name || ' is ' || status
SELECT 'OR'||'A-'||'DB'|| _DBV_STRING ||' Warning: ' || object_type || ' ' || object_name || ' is ' || status
FROM user_objects
WHERE object_type IN ('VIEW', 'TRIGGER', 'PACKAGE', 'PROCEDURE', 'FUNCTION', 'PACKAGE BODY')
AND status <> 'VALID'