ORA- prefix
svn path=/Database/trunk/; revision=10505
This commit is contained in:
13
FCLT.SRC
13
FCLT.SRC
@@ -4,8 +4,8 @@
|
||||
-- Copyright 1996-2010 SG|facilitor bv.
|
||||
-- All rights reserved!
|
||||
/*
|
||||
* $Revision: 62 $
|
||||
* $Modtime: 21-09-10 13:27 $
|
||||
* $Revision: 63 $
|
||||
* $Modtime: 11-11-10 19:04 $
|
||||
*/
|
||||
#include "modules.h"
|
||||
#include "comsql.h"
|
||||
@@ -165,14 +165,15 @@ BEGIN DBMS_UTILITY.COMPILE_SCHEMA(USER, FALSE); END;
|
||||
/
|
||||
BEGIN fac.registerversion(_VERSIONMAJ, _VERSIONMIN, _VERSIONPATCH, _DBVERSION, NULL); END;
|
||||
/
|
||||
REGISTERONCE('$Workfile: FCLT.SRC $','$Revision: 62 $')
|
||||
REGISTERONCE('$Workfile: FCLT.SRC $','$Revision: 63 $')
|
||||
|
||||
COMMIT;
|
||||
///////////////////////////// Report invalid objects, if any ///////
|
||||
SET ECHO OFF
|
||||
SET LINESIZE 120
|
||||
PROMPT List of all invalid objects after Facilitor upgrade:
|
||||
SELECT _VERSION||' Warning: ' || object_type || ' ' || object_name || ' is ' || status
|
||||
SET HEADING OFF
|
||||
SET LINESIZE 80
|
||||
PROMPT List of all invalid objects after Facilitor creation:
|
||||
SELECT 'OR'||'A-'||'DB'||TO_CHAR(_DBVERSION)||' Warning: ' || object_type || ' ' || object_name || ' is ' || status
|
||||
FROM user_objects
|
||||
WHERE object_type IN ('VIEW', 'TRIGGER', 'PACKAGE', 'PROCEDURE', 'FUNCTION', 'PACKAGE BODY')
|
||||
AND status <> 'VALID'
|
||||
|
||||
Reference in New Issue
Block a user