Article 0

                                      Query to know about the DB information.


This script will give the information about the Database Parameter Settings,PARALLELISM Settings ,Tables with NOLOGGING attribute,List of Objects by Schema Owner Primarily for informational purposes,Tablespace Info,Database size Info,Redo Log Files and Sizing,Redolog Switch Rate by Date and Hour,Tablespaces with Transparent Data Encryption,Listing of Index Organized Tables etc..

Query:

-- Script Name:         Cust_DBInfo_v921.sql

set termout on
set verify off;
set linesize 300;
set pagesize 1000;
set trimspool on
define user_exclusion="('SYS','SYSTEM','MDSYS','ORDSYS','EXFSYS','DMSYS','WMSYS','CTXSYS','SYSMAN','OLAPSYS','DBSNMP','TSMSYS','SCOTT','OUTLN','RMAN','XDB','PERFSTAT','SPLEX')"
column chain_cnt format 999G999G999G999
column num_rows format 999G999G999G999
timing start 'Total Duration';
set heading off;

COLUMN defdbname NEW_VAL dbname
COLUMN defdbuser NEW_VAL dbuser
COLUMN deflogmode NEW_VAL log_mode
COLUMN defcreated NEW_VAL crdate
COLUMN defversion new_val version
COLUMN defbanner NEW_VAL banner
COLUMN defcompatible NEW_VAL compatible
COLUMN defstartuptime NEW_VAL inststartup
COLUMN defsysdate NEW_VAL sysdatum
COLUMN defhostname NEW_VAL host
COLUMN defplatform NEW_VAL platform
COLUMN defcharset NEW_VAL charset
COLUMN defncharset NEW_VAL ncharset
COLUMN defrac NEW_VAL rac

SELECT name AS defdbname,
       TO_CHAR(created,'DD.MM.YYYY HH24:MI:SS') AS defcreated,
       log_mode AS deflogmode
FROM   v$database;

SELECT USER AS defdbuser
FROM   dual;

SELECT version AS defversion,
       TO_CHAR(startup_time,'DD.MM.YYYY HH24:MI:SS') as defstartuptime
FROM   v$instance;

SELECT banner AS defbanner
FROM   v$version
WHERE  ROWNUM = 1;

SELECT value AS defcompatible
FROM   v$parameter
WHERE  name = 'compatible';

SELECT TO_CHAR(SYSDATE,'DD.MM.YYYY HH24:MI:SS') AS defsysdate
FROM   dual;

SELECT host_name AS defhostname
FROM   v$instance;

SELECT platform_name AS defplatform
FROM   v$database;

SELECT value AS defcharset
FROM   nls_database_parameters
WHERE  parameter = 'NLS_CHARACTERSET';

SELECT value AS defncharset
FROM   nls_database_parameters
WHERE  parameter = 'NLS_NCHAR_CHARACTERSET';

SELECT DECODE(value,'TRUE','YES','NO') AS defrac
FROM   v$parameter
WHERE  name = 'cluster_database';

spool &dbname..lst

PROMPT *********************************************************************
PROMPT ****     Report Date                             : &sysdatum     ****
PROMPT ****     Report for Database                     : &dbname       ****
PROMPT ****     User                                    : &dbuser       ****
PROMPT ****     Software Version                        : &version      ****
PROMPT ****     Effective Version (compatible parameter): &compatible   ****
PROMPT ****     Banner                                  : &banner       ****
PROMPT ****     Platform name                           : &platform     ****
PROMPT ****     Server name                             : &host         ****
PROMPT ****     Database logging mode                   : &log_mode     ****
PROMPT ****     Database creation date                  : &crdate       ****
PROMPT ****     Instance startup time                   : &inststartup  ****
PROMPT ****     Database characterset                   : &charset      ****
PROMPT ****     Database national characterset          : &ncharset     ****
PROMPT ****     RAC (9.0.1 +)                           : &rac          ****
PROMPT *********************************************************************
PROMPT
PROMPT

set heading on;
timing start 'SuppLog';

PROMPT
PROMPT
PROMPT *********************************************************************
PROMPT ****     Check for supplemental logging                          ****
PROMPT ****     (for Oracle 9/10: should be at least MIN level;         ****
PROMPT ****     for SP6.0 and higher: PK/UI level is even better;       ****
PROMPT ****     for Oracle 8i: not applicable)                          ****
PROMPT *********************************************************************
SET HEADING OFF

SET SERVEROUTPUT ON
DECLARE
  suplog_min_avail NUMBER;
  suplog_pk_avail NUMBER;
  suplog_ui_avail NUMBER;
  suplog_fk_avail NUMBER;
  suplog_all_avail NUMBER;
  suplog_pl_avail NUMBER;
  suplog_min VARCHAR2(20);
  suplog_pk VARCHAR2(20);
  suplog_ui VARCHAR2(20);
  suplog_fk VARCHAR2(20);
  suplog_all VARCHAR2(20);
  suplog_pl VARCHAR2(20);
BEGIN
  SELECT SUM(DECODE(column_name,'SUPPLEMENTAL_LOG_DATA_MIN',1,0)),
         SUM(DECODE(column_name,'SUPPLEMENTAL_LOG_DATA_PK',1,0)),
         SUM(DECODE(column_name,'SUPPLEMENTAL_LOG_DATA_UI',1,0)),
         SUM(DECODE(column_name,'SUPPLEMENTAL_LOG_DATA_FK',1,0)),
         SUM(DECODE(column_name,'SUPPLEMENTAL_LOG_DATA_ALL',1,0)),
         SUM(DECODE(column_name,'SUPPLEMENTAL_LOG_DATA_PL',1,0))
  INTO suplog_min_avail,suplog_pk_avail,suplog_ui_avail,suplog_fk_avail,suplog_all_avail,suplog_pl_avail
  FROM dba_tab_columns
  WHERE owner = 'SYS'
  AND table_name = 'V_$DATABASE';

  IF suplog_min_avail = 1 THEN
    EXECUTE IMMEDIATE 'SELECT supplemental_log_data_min FROM v$database' INTO suplog_min;
  ELSE
    suplog_min := 'N.A.';
  END IF;

  IF suplog_pk_avail = 1 THEN
    EXECUTE IMMEDIATE 'SELECT supplemental_log_data_pk FROM v$database' INTO suplog_pk ;
  ELSE
    suplog_pk := 'N.A.';
  END IF;

  IF suplog_ui_avail = 1 THEN
    EXECUTE IMMEDIATE 'SELECT supplemental_log_data_ui FROM v$database' INTO suplog_ui ;
  ELSE
    suplog_ui := 'N.A.';
  END IF;

  IF suplog_fk_avail = 1 THEN
    EXECUTE IMMEDIATE 'SELECT supplemental_log_data_fk FROM v$database' INTO suplog_fk ;
  ELSE
    suplog_fk := 'N.A.';
  END IF;

  IF suplog_all_avail = 1 THEN
    EXECUTE IMMEDIATE 'SELECT supplemental_log_data_all FROM v$database' INTO suplog_all ;
  ELSE
    suplog_all := 'N.A.';
  END IF;

  IF suplog_pl_avail = 1 THEN
    EXECUTE IMMEDIATE 'SELECT supplemental_log_data_pl FROM v$database' INTO suplog_pl ;
  ELSE
    suplog_pl := 'N.A.';
  END IF;

  DBMS_OUTPUT.PUT_LINE('MIN       PK        UI        FK        ALL       PL');
  DBMS_OUTPUT.PUT_LINE('----------------------------------------------------');
  DBMS_OUTPUT.PUT_LINE(RPAD(suplog_min,10) || RPAD(suplog_pk,10) || RPAD(suplog_ui,10) || RPAD(suplog_fk,10) || RPAD(suplog_all,10) || RPAD(suplog_pl,10));
END;
/

prompt *********************************************************************
prompt ****     Database Parameter Settings                             ****
prompt ****     Looking for things out of the norm or                   ****
prompt ****     inconsistent for a healthy database                     ****
prompt *********************************************************************
set heading on;
col Parameter for a35;
col Setting for a50;
select substr(name,1,35) as "Parameter", substr(value,1,50) as "Setting" from v$parameter order by name;
timing stop Params;
timing stop 'Total Duration';

set heading off;
prompt *********************************************************************
prompt ****     PARALLELISM Settings                                    ****
prompt ****     SPLEX does not support PARALLELISM                      ****
prompt *********************************************************************
timing start Params;
select decode(value,1,'LOG PARALLELISM OK','LOG PARALLELISM IS NOT 1') from v$parameter where name = 'log_parallelism';
select decode(value,0,'RECOVERY PARALLELISM OK','RECOVERY PARALLELISM IS NOT 0') from v$parameter where name = 'recovery_parallelism';


PROMPT *********************************************************************
PROMPT ****     Tables with NOLOGGING attribute set                     ****
PROMPT ****     (please doublecheck if FORCELOGGING is set              ****
PROMPT ****     at either tablespace or database level                  ****
PROMPT ****     and whether these tables should be replicated at all    ****
PROMPT *********************************************************************

COLUMN table_name FORMAT A30

SELECT owner, table_name, NULL AS partition_name, NULL AS subpartition_name
FROM   dba_tables
WHERE  logging = 'NO' AND temporary = 'N'
AND    owner NOT IN &user_exclusion
UNION
SELECT table_owner AS owner, table_name, partition_name, NULL AS subpartition_name
FROM   dba_tab_partitions
WHERE  logging = 'NO'
AND    table_owner NOT IN &user_exclusion
UNION
SELECT table_owner AS owner, table_name, partition_name, subpartition_name
FROM   dba_tab_subpartitions
WHERE  logging = 'NO'
AND    table_owner NOT IN &user_exclusion;
timing stop 'SuppLog';

set heading off;
prompt *********************************************************************
prompt ****     List of Objects by Schema Owner                         ****
prompt ****     Primarily for informational purposes                    ****
prompt *********************************************************************
timing start 'Schema Obj';
set heading on;
col username for a30
col Tabs  format 999999
col Indx  format 999999
col Syns  format 999999
col Views format 999999
col Seqs  format 999999
col Procs format 999999
col Funcs format 999999
col Pkgs  format 999999
col Trigs format 999999
col Deps  format 999999


compute sum of "Tabs"  on report
compute sum of "Indx" on report
compute sum of "Syns" on report
compute sum of "Views" on report
compute sum of "Seqs" on report
compute sum of "Procs" on report
compute sum of "Funcs" on report
compute sum of "Pkgs" on report
compute sum of "Trigs" on report
compute sum of "Deps" on report
break on report
select   USERNAME,
         count(decode(o.TYPE#, 2,o.OBJ#,'')) as "Tabs",
         count(decode(o.TYPE#, 1,o.OBJ#,'')) as "Indx",
         count(decode(o.TYPE#, 5,o.OBJ#,'')) as "Syns",
         count(decode(o.TYPE#, 4,o.OBJ#,'')) as "Views",
         count(decode(o.TYPE#, 6,o.OBJ#,'')) as "Seqs",
         count(decode(o.TYPE#, 7,o.OBJ#,'')) as "Procs",
         count(decode(o.TYPE#, 8,o.OBJ#,'')) as "Funcs",
         count(decode(o.TYPE#, 9,o.OBJ#,'')) as "Pkgs",
         count(decode(o.TYPE#,12,o.OBJ#,'')) as "Trigs",
         count(decode(o.TYPE#,10,o.OBJ#,'')) as "Deps"
from     sys.obj$ o, dba_users u
where    u.USER_ID = o.OWNER# (+)
and      o.TYPE# is NOT NULL
and      u.username not in &user_exclusion
group by USERNAME
order by USERNAME;
clear breaks;
timing stop 'Schema Obj';

set heading off;
prompt *********************************************************************
prompt ****     Tablespace Info                                         ****
prompt ****     mostly informational                                    ****
prompt *********************************************************************
timing start 'Tablespace Info';

set heading on;
break on report
compute sum of "total MB" on report
col "total MB" format 999G999G990
compute sum of "Free MB" on report
col "Free MB" format 999G999G990
compute sum of "Used MB" on report
col "Used MB" format 999G999G990
column tablespace_name format a30
column "Datafile name" format a50
select
 d.tablespace_name,
 SUBSTR(d.file_name,1,50) "Datafile name",
 ROUND(MAX(d.bytes)/1024/1024,2) as "total MB",
 DECODE(SUM(f.bytes), null, 0, ROUND(SUM(f.Bytes)/1024/1024,2)) as "Free MB" ,
 DECODE( SUM(f.Bytes), null, 0, ROUND((MAX(d.bytes)/1024/1024) - (SUM(f.bytes)/1024/1024),2)) as "Used MB"
from
  DBA_FREE_SPACE f , DBA_DATA_FILES d
where
 f.tablespace_name = d.tablespace_name
 and f.file_id = d.file_id
group by
d.tablespace_name,d.file_name;

clear breaks

prompt *********************************************************************
prompt ****     Database size Info                                      ****
prompt *********************************************************************


col "Database Size" format a20
col "Free space" format a20
col "Used space" format a20
select round(sum(used.bytes) / 1024 / 1024) || ' MB'"Database Size"
, round(sum(used.bytes) / 1024 / 1024 ) -
round(free.p / 1024 / 1024) || ' MB'"Used space"
, round(free.p / 1024 / 1024) || ' MB'"Free space"
from (select bytes
from v$datafile
union all
select bytes
from v$tempfile
union all
select bytes
from v$log) used
, (select sum(bytes) as p
from dba_free_space) free
group by free.p;

timing stop 'Tablespace Info';

set heading off;
prompt *********************************************************************
prompt ****     Redo Log Files and Sizing                               ****
prompt *********************************************************************
timing start 'Redo Sizing';

set heading on;
col "File Name" for a80;
col "Size in MB" format 999G999G999G999G990
select substr(a.member,1,80) as "File Name",b.bytes/1024/1024 as "Size in MB"
from v$logfile a,v$log b where a.group#=b.group#;
timing stop 'Redo Sizing';

set heading off;
prompt *********************************************************************
prompt ****     Redolog Switch Rate by Date and Hour                    ****
prompt *********************************************************************
timing start 'Redo Switch Rate';

set heading on;
column day format a3
col Total for 99G990;
col h00 for 999;
col h01 for 999;
col h02 for 999;
col h03 for 999;
col h04 for 999;
col h05 for 999;
col h06 for 999;
col h07 for 999;
col h08 for 999;
col h09 for 999;
col h10 for 999;
col h11 for 999;
col h12 for 999;
col h13 for 999;
col h14 for 999;
col h15 for 999;
col h16 for 999;
col h17 for 999;
col h18 for 999;
col h19 for 999;
col h20 for 999;
col h21 for 999;
col h22 for 999;
col h23 for 999;
col h24 for 999;


break on report
compute max of "Total" on report
compute max of "h00" on report
compute max of "h01" on report
compute max of "h02" on report
compute max of "h03" on report
compute max of "h04" on report
compute max of "h05" on report
compute max of "h06" on report
compute max of "h07" on report
compute max of "h08" on report
compute max of "h09" on report
compute max of "h10" on report
compute max of "h11" on report
compute max of "h12" on report
compute max of "h13" on report
compute max of "h14" on report
compute max of "h15" on report
compute max of "h16" on report
compute max of "h17" on report
compute max of "h18" on report
compute max of "h19" on report
compute max of "h20" on report
compute max of "h21" on report
compute max of "h22" on report
compute max of "h23" on report

SELECT  trunc(first_time) "Date",
        to_char(first_time, 'Dy') "Day",
        count(1) as "Total",
        SUM(decode(to_char(first_time, 'hh24'),'00',1,0)) as "h00",
        SUM(decode(to_char(first_time, 'hh24'),'01',1,0)) as "h01",
        SUM(decode(to_char(first_time, 'hh24'),'02',1,0)) as "h02",
        SUM(decode(to_char(first_time, 'hh24'),'03',1,0)) as "h03",
        SUM(decode(to_char(first_time, 'hh24'),'04',1,0)) as "h04",
        SUM(decode(to_char(first_time, 'hh24'),'05',1,0)) as "h05",
        SUM(decode(to_char(first_time, 'hh24'),'06',1,0)) as "h06",
        SUM(decode(to_char(first_time, 'hh24'),'07',1,0)) as "h07",
        SUM(decode(to_char(first_time, 'hh24'),'08',1,0)) as "h08",
        SUM(decode(to_char(first_time, 'hh24'),'09',1,0)) as "h09",
        SUM(decode(to_char(first_time, 'hh24'),'10',1,0)) as "h10",
        SUM(decode(to_char(first_time, 'hh24'),'11',1,0)) as "h11",
        SUM(decode(to_char(first_time, 'hh24'),'12',1,0)) as "h12",
        SUM(decode(to_char(first_time, 'hh24'),'13',1,0)) as "h13",
        SUM(decode(to_char(first_time, 'hh24'),'14',1,0)) as "h14",
        SUM(decode(to_char(first_time, 'hh24'),'15',1,0)) as "h15",
        SUM(decode(to_char(first_time, 'hh24'),'16',1,0)) as "h16",
        SUM(decode(to_char(first_time, 'hh24'),'17',1,0)) as "h17",
        SUM(decode(to_char(first_time, 'hh24'),'18',1,0)) as "h18",
        SUM(decode(to_char(first_time, 'hh24'),'19',1,0)) as "h19",
        SUM(decode(to_char(first_time, 'hh24'),'20',1,0)) as "h20",
        SUM(decode(to_char(first_time, 'hh24'),'21',1,0)) as "h21",
        SUM(decode(to_char(first_time, 'hh24'),'22',1,0)) as "h22",
        SUM(decode(to_char(first_time, 'hh24'),'23',1,0)) as "h23"
FROM    V$log_history
group by trunc(first_time), to_char(first_time, 'Dy')
Order by 1;

clear breaks
timing stop 'Redo Switch Rate';

set heading off;
prompt *********************************************************************
prompt ****     Redolog Daily and Hourly volume calculated              ****
prompt *********************************************************************

timing start Redovol;

--##########################################################################
--##  PL/SQL used here to gather and display average redo volumes         ##
--##########################################################################

set serveroutput on;
set feedback off
declare

v_log    number;
v_days   number;
v_logsz  number;
v_adsw   number;
V_advol  number;
v_ahsw   number;
v_ahvol  number;


begin

select count(first_time) into v_log from v$log_history;
select count(distinct(to_char(first_time,'dd-mon-rrrr'))) into v_days from v$log_history;
select max(bytes)/1024/1024 into v_logsz from v$log;

v_adsw := round(v_log / v_days);
v_advol := round(v_adsw * v_logsz);
v_ahsw := round(v_adsw / 24);
v_ahvol := round((v_adsw / 24 )) * v_logsz;

dbms_output.put_line('');
dbms_output.put ('Total Switches' || ''||v_log||'  ==>  ');
dbms_output.put ('Total Days' || ''|| v_days||'  ==>  ');
dbms_output.put_line ('Redo Size' || '' || v_logsz);
dbms_output.put ('Avg Daily Switches' || '' || v_adsw||'  ==>  ');
dbms_output.put_line ('Avg Daily Volume in Meg' || '' || v_advol);
dbms_output.put ('Avg Hourly Switches' || '' || v_ahsw||'  ==>  ');
dbms_output.put_line ('Avg Hourly Volume in Meg' || '' || v_ahvol);
dbms_output.put_line('');


end;

/

timing stop Redovol;
set heading off;
PROMPT *********************************************************************
PROMPT ****  The above is to help you compute the amount of disk space  ****
PROMPT ****  needed for the SharePlex queues. Use the below formula.    ****
PROMPT ****                                                             ****
PROMPT ****  [size of a redo log] x [# of log switches in 1 hour]       ****
PROMPT ****  x 1/3  x [number of hours downtime]                        ****
PROMPT ****  = amount of disk space needed for the queues on each system****
PROMPT ****                                                             ****
PROMPT ****  For example,                                               ****
PROMPT ****  if you expect to recover from 8 hours of downtime,         ****
PROMPT ****  and your redo logs are 500 MB in size                      ****
PROMPT ****  and switch five times an hour,                             ****
PROMPT ****  then you could need 6.5 GB of                              ****
PROMPT ****  space on both the source and target machines               ****
PROMPT ****  for the SharePlex queues.                                  ****
PROMPT ****  [500 MB redo log] x [5 switches/hour] x [1/3] x [8 hours]  ****
PROMPT ****  = 6.5 GB disk space                                        ****
PROMPT *********************************************************************
PROMPT
PROMPT
PROMPT
PROMPT
PROMPT
PROMPT *********************************************************************
PROMPT ****     CLUSTERED TABLES                                        ****
PROMPT ****     NOT SUPPORTED                                           ****
PROMPT *********************************************************************
timing start Cluster;
set heading on;
SELECT owner, cluster_name, cluster_type, single_table
FROM   dba_clusters
WHERE  owner NOT IN &user_exclusion
ORDER BY owner, cluster_name;
timing stop Cluster;

set heading off;
PROMPT
PROMPT
PROMPT *********************************************************************
PROMPT ****     Tablespaces with Transparent Data Encryption            ****
PROMPT ****     Prior to SP 8.0: NOT SUPPORTED                          ****
PROMPT *********************************************************************
timing start TS_TDE;
set heading on;

SELECT t.name
FROM   v$encrypted_tablespaces e, sys.ts$ t
WHERE  e.ts# = t.ts#
AND    e.encryptedts = 'YES';
timing stop TS_TDE;

set heading off;

PROMPT
PROMPT
PROMPT *********************************************************************
PROMPT ****     Compressed tables, partitions or subpartitions          ****
PROMPT ****     Supported only for Oracle 11gR2+ and SP 7.6+            ****
PROMPT ****     If that not applies and partitioned table, then         ****
PROMPT ****     doublecheck if partitions are actually compressed       ****
PROMPT ****     - If yes: NOT SUPPORTED                                 ****
PROMPT ****     - If no:  Check to just change default compression      ****
PROMPT ****     -         attribute of the table                        ****
PROMPT *********************************************************************
timing start compress_table;
set heading on;
SELECT owner, table_name,compression,compress_for, NULL AS partition_name, NULL AS subpartition_name,
  CASE WHEN compress_for IN ('BASIC','DIRECT LOAD ONLY') THEN 'Yes (for 11gR2+ and SP7.6+)'
       WHEN compress_for IN ('OLTP','FOR ALL OPERATIONS') THEN 'Yes (for 11gR2+ and SP7.6+)'
       WHEN compress_for IN ('QUERY LOW','QUERY HIGH','ARCHIVE LOW','ARCHIVE HIGH') THEN 'No (Exadata HCC)'
       ELSE 'Please doublecheck! (Unknown compression type: ' || compress_for || ')'
  END AS "Supported?"
FROM dba_tables
WHERE compression = 'ENABLED'
AND   owner NOT IN &user_exclusion
UNION
SELECT table_owner AS owner, table_name,compression,compress_for, partition_name, NULL AS subpartition_name,
  CASE WHEN compress_for IN ('BASIC','DIRECT LOAD ONLY') THEN 'Yes (for 11gR2+ and SP7.6+)'
       WHEN compress_for IN ('OLTP','FOR ALL OPERATIONS') THEN 'Yes (for 11gR2+ and SP7.6+)'
       WHEN compress_for IN ('QUERY LOW','QUERY HIGH','ARCHIVE LOW','ARCHIVE HIGH') THEN 'No (Exadata HCC)'
       ELSE 'Please doublecheck! (Unknown compression type: ' || compress_for || ')'
  END AS "Supported?"
FROM dba_tab_partitions
WHERE compression = 'ENABLED'
AND   table_owner NOT IN &user_exclusion
UNION
SELECT table_owner AS owner, table_name,compression,compress_for, partition_name, subpartition_name,
  CASE WHEN compress_for IN ('BASIC','DIRECT LOAD ONLY') THEN 'Yes (for 11gR2+ and SP7.6+)'
       WHEN compress_for IN ('OLTP','FOR ALL OPERATIONS') THEN 'Yes (for 11gR2+ and SP7.6+)'
       WHEN compress_for IN ('QUERY LOW','QUERY HIGH','ARCHIVE LOW','ARCHIVE HIGH') THEN 'No (Exadata HCC)'
       ELSE 'Please doublecheck! (Unknown compression type: ' || compress_for || ')'
  END AS "Supported?"
FROM dba_tab_subpartitions
WHERE compression = 'ENABLED'
AND   table_owner NOT IN &user_exclusion
ORDER BY owner, table_name, partition_name, subpartition_name;


set heading off;
PROMPT
PROMPT
PROMPT *********************************************************************
PROMPT ****     Columns with Transparent Data Encryption                ****
PROMPT ****     Prior to SP 7.6: NOT SUPPORTED                          ****
PROMPT ****     Starting with SP 7.6: Supported for some datatypes      ****
PROMPT ****     Not supported for Shareplex key columns!                ****
PROMPT ****     Column on target database has to be nullable!           ****
PROMPT *********************************************************************
timing start TDE;
set heading on;
COLUMN owner FORMAT A20
COLUMN table_name FORMAT A30
COLUMN column_name FORMAT A20
COLUMN "Datatype supported?" FORMAT A30
COLUMN "Part ok Shareplex Key?" FORMAT A40
COLUMN nullable FORMAT A8
SELECT tc.owner, tc.table_name, tc.column_name,
  CASE WHEN tc.data_type IN ('CHAR', 'NCHAR', 'VARCHAR2', 'NVARCHAR2', 'NUMBER', 'DATE', 'RAW') THEN 'Yes with SP7.6+ ('
       ELSE 'No ('
  END || data_type || ')' AS "Datatype supported?",
  CASE WHEN c.constraint_name IS NULL THEN 'No PK (check for Shareplex key!)'
       WHEN c.constraint_name IS NOT NULL AND cc.column_name IS NULL THEN 'Yes'
           ELSE 'No (different Shareplex key?)'
  END AS "Outside of Primary Key?" ,
  tc.nullable
FROM   dba_encrypted_columns ec
       INNER JOIN dba_tab_cols tc ON (tc.owner = ec.owner AND tc.table_name = ec.table_name AND tc.column_name = ec.column_name)
       LEFT OUTER JOIN dba_constraints c ON (tc.owner = c.owner AND tc.table_name = c.table_name AND c.constraint_type = 'P')
       LEFT OUTER JOIN dba_cons_columns cc ON (c.owner = cc.owner AND c.constraint_name = cc.constraint_name AND tc.column_name = cc.column_name)
WHERE  ec.owner NOT IN &user_exclusion
ORDER BY SUBSTR("Datatype supported?",1,1) ASC,
         SUBSTR("Outside of Primary Key?",1,1) ASC,
                 nullable ASC,
                 owner, table_name, column_name;

timing stop TDE;

set heading off;
PROMPT
PROMPT
PROMPT *********************************************************************
PROMPT ****     SecuredFile LOBs                                        ****
PROMPT ****     Prior to SP 7.6: Not supported                          ****
PROMPT ****     SP 7.6 or higher: SecureFile LOBs with LOGGING and      ****
PROMPT ****     without encryption, compression                         ****
PROMPT ****     and dedup are supported                                 ****
PROMPT *********************************************************************

COLUMN owner FORMAT A20
COLUMN table_name FORMAT A30
COLUMN column_name FORMAT A20
COLUMN partition_name FORMAT A20
COLUMN subpartition_name FORMAT A20
COLUMN "ENC,COMPR,DEDUP,LOGGING" FORMAT A25
SELECT owner, table_name, column_name, partition_name, subpartition_name,
       encrypt || ',' || compression  || ',' || deduplication  || ',' || logging AS "ENC,COMPR,DEDUP,LOGGING",
       CASE
             WHEN encrypt IN ('NO','NONE') AND compression IN ('NO','NONE') AND deduplication IN ('NO','NONE') AND logging IN ('YES','NONE') THEN 'Yes (with SP7.6+)'
                 ELSE 'No'
           END AS "Supported?"
FROM (
  SELECT owner, table_name, column_name, NULL AS partition_name, NULL AS subpartition_name, encrypt, compression, deduplication, logging
  FROM   dba_lobs
  WHERE  securefile='YES'
  AND    owner NOT IN &user_exclusion
  UNION
  SELECT table_owner, table_name, column_name, partition_name, NULL AS subpartition_name, encrypt, compression, deduplication, logging
  FROM   dba_lob_partitions
  WHERE  securefile='YES'
  AND    table_owner NOT IN &user_exclusion
  UNION
  SELECT table_owner, table_name, column_name, lob_partition_name AS partition_name, subpartition_name, encrypt, compression, deduplication, logging
  FROM   dba_lob_subpartitions
  WHERE  securefile='YES'
  AND    table_owner NOT IN &user_exclusion)
ORDER BY owner, table_name, column_name, partition_name, subpartition_name;
timing stop 'Lobdef';

set heading off;
PROMPT
PROMPT
PROMPT
PROMPT
PROMPT
prompt *********************************************************************
prompt ****     NOTE                                                    ****
prompt ****     THE Next 2 sections should be looked at                 ****
prompt ****     Check NonBasic Datatypes for any unsopported data types ****
prompt ****     Check if the Schema owners of of the nested objects are ****
prompt ****     the same on source and target.                          ****
prompt *********************************************************************
PROMPT
PROMPT
set heading off;
prompt *********************************************************************
prompt ****     List of non-basic Data Types Contained in the Database  ****
prompt ****     Check NonBasic Datatypes for any unsopported data types ****
prompt *********************************************************************
timing start 'NonBasic Datatypes';

set heading on;
select a.owner, a.table_name, a.column_name,a.data_type from dba_tab_columns a, dba_objects b
where data_type not in ('VARCHAR','VARCHAR2','DATE','NUMBER','NVARCHAR2','TIMESTAMP%','LOB','BLOB','CLOB','LONG','LONG RAW','CHAR','ROWID','RAW','FLOAT','NCLOB') and
a.owner not in &user_exclusion
and a.table_name = b.object_name
and b.object_type = 'TABLE'
order by a.owner;
timing stop 'NonBasic Datatypes';

set heading off;
prompt *********************************************************************
prompt ****      List of Nested Arrays                                  ****
prompt ****      For UDTs Only                                          ****
prompt ****      Check if the Schema owners of of the nested            ****
prompt ****      objects are the same on source and target.             ****
prompt *********************************************************************
timing start 'NestArray';

Set heading on;
select b.owner,b.attr_type_name as "Nested Array", b.type_name as "Nested In Type", b.attr_name as "Nested in Column"
from dba_type_attrs b
where b.attr_type_name in (select a.type_name from dba_types a where a.owner
not in &user_exclusion and typecode = 'COLLECTION')
order by b.owner;
timing stop 'NestArray';

set heading off;
PROMPT
PROMPT
PROMPT
PROMPT
PROMPT
prompt *********************************************************************
prompt ****     NOTE                                                    ****
prompt ****     THE REMAINING OUTPUT IS IMFORMATIONAL AND               ****
prompt ****     USED FOR IMPLEMENTATION AND PLANNING PURPOSES           ****
prompt ****     ESMs may ignore                                         ****
prompt *********************************************************************
PROMPT
PROMPT
PROMPT
PROMPT
PROMPT
set heading off;
prompt *********************************************************************
prompt ****     List of Tables with more than 254 columns               ****
prompt *********************************************************************
timing start '254ormore';

set heading on;
column owner format a30
column table_name format a30
column numcols format 999G999G999

select owner,table_name,count(table_name) as "NumCols"
from dba_tab_columns where owner not in &user_exclusion
group by owner,table_name having count(table_name) > 254
order by owner;
timing stop '254ormore';

set heading off;
prompt *********************************************************************
prompt ****     List of Tables that contain LONG data types             ****
prompt *********************************************************************
timing start 'Long Lob';

set heading on;
column column_name format a30
column table_name format A30
column data_type format a30
select owner,table_name,column_name,data_type from dba_tab_columns where data_type in ('LONG')
and owner not in &user_exclusion
order by owner;
timing stop 'Long Lob';

prompt *********************************************************************
prompt ****     Listing of Index Organized Tables                       ****
prompt *********************************************************************
timing start IOTs;

set heading on;
select owner,table_name,iot_type
from dba_tables
where iot_type = 'IOT'
and owner not in &user_exclusion
order by owner;
timing stop IOTs;

set heading off;
prompt *********************************************************************
prompt ****     Listing of Bitmap Indexes                               ****
prompt *********************************************************************
timing start Bitmaps;

set heading on;
select owner,index_name,table_owner,table_name
from dba_indexes where index_type = 'BITMAP'
order by owner;
timing stop Bitmaps;

set heading off;
prompt *********************************************************************
prompt ****     List of Data Types Contained in the Database            ****
prompt *********************************************************************
timing start Datatypes;

set heading on;
select distinct data_type from dba_tab_columns
where owner not in &user_exclusion;
timing stop Datatypes;

set heading off;
prompt *********************************************************************
prompt ****     List of Tables with size > 100 MB                       ****
prompt *********************************************************************
timing start Largetable;

set heading on;
column MBYTE format 999G999G990
column PCT_FREE format 999
column PCT_USED format 999
select t.owner, t.table_name, t.tablespace_name, s.bytes/1024/1024 MBYTE, t.pct_free, t.pct_used, t.num_rows, t.chain_cnt, t.blocks
from dba_tables t, dba_segments s
where t.owner = s.owner
and t.table_name = s.segment_name
and t.owner not in &user_exclusion
and s.bytes > 100000000
order by t.owner, t.table_name;
timing stop Largetable;


set heading off;
prompt *********************************************************************
prompt ****     list of tables not analysed for the last 30 days        ****
prompt *********************************************************************
timing start Analyzed;

set heading on;
select owner, table_name, to_char(last_analyzed,'DD-MON-RR') as "Analyzed"
from dba_tables
where last_analyzed is not NULL
and last_analyzed < sysdate-30
and owner not in &user_exclusion
order by 1,2,3;
timing stop Analyzed;

set heading off;
prompt *********************************************************************
prompt ****     List of Tables Created in the last 60 Days              ****
prompt *********************************************************************
timing start Created;

set heading on;
col "Table_Nm" for a30;
select owner, substr(object_name,1,30) as "Table_Nm",created
from dba_objects where object_type = 'TABLE'
and created > sysdate-60
and owner not in &user_exclusion
order by 1,2;

timing stop Created;

set heading off;
prompt *********************************************************************
prompt ****     Count of triggers by Row Level and then Statement Level ****
prompt *********************************************************************
timing start Triggers;

set heading on;
select count(trigger_type) as "Row Level"
from dba_triggers
where trigger_type like '%ROW%'
and owner not in &user_exclusion;

set heading off;
prompt *** Statement Level ****
set heading on;
select owner,trigger_name,trigger_type,table_owner,table_name
from dba_triggers
where trigger_type not like '%ROW%'
and owner not in &user_exclusion
order by owner;

timing stop Triggers;

set heading off;
prompt *********************************************************************
prompt ****     List Constraints with On-Delete Cascades                ****
prompt *********************************************************************
timing start OnDelCasc;

set heading on;

select owner,constraint_name,table_name from dba_constraints
where delete_rule = 'CASCADE'
and owner not in &user_exclusion
order by owner;
timing stop OnDelCasc;




set heading off;

--##########################################################################
--##                                     END of PL/SQL routine            ##
--##########################################################################
set heading on;


spool off;

prompt *********************************************************************
prompt ****     &dbname..lst has been generated.                        ****
prompt ****     Please send it to Quest Software                        ****
prompt *********************************************************************


set verify on;