Tim Bunce wrote:
>
> On Wed, Mar 20, 2002 at 12:46:39PM +0100, Steffen Goeldner wrote:
> > Tim Bunce wrote:
> > >
> > > On Wed, Mar 20, 2002 at 10:36:47AM +0100, Steffen Goeldner wrote:
> > > > Should I add 'PUBLIC' to the enumeration of schemas, e.g.:
> > >
> > > Probably. Especially if Oracle's own ODBC driver does.
> >
> > No, it doesn't. Should I add 'PUBLIC' nevertheless?
> > It may be useful for some generic applications.
>
> Yes (though I'm reluctant to be incompatible with Oracle's own ODBC
> driver, but maybe we're just better than it is :-).
Done.
Steffen
*** DBD-Oracle-1.12.orig/Oracle.pm Fri Aug 31 18:27:18 2001
--- Oracle.pm Wed Mar 20 21:09:12 2002
***************
*** 336,348 ****
}
elsif ( $SchVal eq '%' && $CatVal eq '' && $TblVal eq '') { # Rule 19b
$Sql = <<'SQL';
! SELECT NULL TABLE_CAT
! , USERNAME TABLE_SCHEM
! , NULL TABLE_NAME
! , NULL TABLE_TYPE
! , NULL REMARKS
! FROM ALL_USERS
! ORDER BY 2
SQL
}
elsif ( $TypVal eq '%' && $CatVal eq '' && $SchVal eq '' && $TblVal eq '') { #
Rule 19c
--- 336,353 ----
}
elsif ( $SchVal eq '%' && $CatVal eq '' && $TblVal eq '') { # Rule 19b
$Sql = <<'SQL';
! SELECT NULL TABLE_CAT
! , s TABLE_SCHEM
! , NULL TABLE_NAME
! , NULL TABLE_TYPE
! , NULL REMARKS
! FROM
! (
! SELECT USERNAME s FROM ALL_USERS
! UNION
! SELECT 'PUBLIC' s FROM DUAL
! )
! ORDER BY TABLE_SCHEM
SQL
}
elsif ( $TypVal eq '%' && $CatVal eq '' && $SchVal eq '' && $TblVal eq '') { #
Rule 19c