Subj : ANNOUNCE:  DDL::Oracle v1.06
To   : All
From : Richard Sutherland
Date : Mon Mar 19 2001 01:19 pm

From: "Richard Sutherland" <rvsutherland@yahoo.com>

===========================================================================
                   Release of DDL::Oracle, Version 1.06
===========================================================================

CHANGES

Added a new instance method -- 'show_space' -- which displays a report such as 
the following:

   Space analysis for: [schema.]<object name>

                                                    BYTES     BLOCKS
                                             ============  =========
   Used BELOW the high water mark                 1325056        647
   Free ABOVE the high water mark                  716800        350
   Free BELOW the high water mark                    6144          3
                                             ------------  ---------
                 TOTAL in segment                 2048000       1000

                                        FILE_ID  BLOCK_ID  BLOCK_NBR
                                        =======  ========  =========
   Last extent having data                    9     10287        150

For partitioned tables, it displays a section for each partition, followed by 
totals for the table/index.  The user must have EXECUTE privileges on package 
sys.DBMS_SPACE for this method to respond.

Fixed bug #408724, by upgrading CREATE TRIGGER statements to distinguish 
between Oracle8i and earlier versions.  THANKS to Martin Drautzburg for 
reporting this error!

SYNOPSIS

use DBI;
use DDL::Oracle;

my $dbh = DBI->connect(
                        "dbi:Oracle:dbname",
                        "username",
                        "password",
                        {
                         PrintError => 0,
                         RaiseError => 1
                        }
                      );

# Use default resizing and schema options.
# query default DBA_xxx tables (could use USER_xxx for non-DBA types)
DDL::Oracle->configure(
                        dbh    => $dbh,
                      );

# Create a list of one or more ob
jects
my $sth = $dbh->prepare(
       "SELECT
               owner
             , name
        FROM
               dba_tables
        WHERE
               tablespace_name = 'MY_TBLSP'    -- your millage may vary
       "
    );
$sth->execute;
my $list = $sth->fetchall_arrayref;

my $obj = DDL::Oracle->new(
                            type  => "table",
                            list  => $list,                          );
                          );

my $ddl = $obj->create;      # or $obj->resize;  or $obj->drop;  etc.

print $ddl;    # Use STDOUT so user can redirect to desired file.

AUTHOR

Richard V. Sutherland
rvsutherland@yahoo.com

COPYRIGHT

Copyright (c) 2000, 2001 Richard V. Sutherland.  All rights reserved. This 
module is free software.  It may be used, redistributed, and/or modified under 
the same terms as Perl itself.  See:

    http://www.perl.com/perl/misc/Artistic.html

===========================================================================
                       AVAILABILITY
===========================================================================

DDL::Oracle is available from the CPAN, and from:

    http://sourceforge.net/projects/ddl-oracle/

--- BBBS/LiI v4.01 Flag-2
 * Origin: Prism bbs (1:2320/38)

.