1 package DBIx::Class::Storage::DBI::ODBC::Firebird;
5 use base qw/DBIx::Class::Storage::DBI::InterBase/;
10 DBIx::Class::Storage::DBI::ODBC::Firebird - Driver for using the Firebird RDBMS
15 Most functionality is provided by L<DBIx::Class::Storage::DBI::Interbase>, see
16 that module for details.
18 To build the ODBC driver for Firebird on Linux for unixODBC, see:
20 L<http://www.firebirdnews.org/?p=1324>
24 # XXX seemingly no equivalent to ib_time_all from DBD::InterBase via ODBC
25 sub connect_call_datetime_setup { 1 }
27 # we don't need DBD::InterBase-specific initialization
30 # ODBC uses dialect 3 by default, good
31 sub _set_sql_dialect { 1 }
33 # releasing savepoints doesn't work, but that shouldn't matter
34 sub _svp_release { 1 }
36 sub datetime_parser_type {
37 'DBIx::Class::Storage::DBI::ODBC::Firebird::DateTime::Format'
40 package # hide from PAUSE
41 DBIx::Class::Storage::DBI::ODBC::Firebird::DateTime::Format;
43 # inherit parse/format date
44 our @ISA = 'DBIx::Class::Storage::DBI::InterBase::DateTime::Format';
46 my $timestamp_format = '%Y-%m-%d %H:%M:%S'; # %F %T, no fractional part
51 require DateTime::Format::Strptime;
52 $timestamp_parser ||= DateTime::Format::Strptime->new(
53 pattern => $timestamp_format,
56 return $timestamp_parser->parse_datetime(shift);
61 require DateTime::Format::Strptime;
62 $timestamp_parser ||= DateTime::Format::Strptime->new(
63 pattern => $timestamp_format,
66 return $timestamp_parser->format_datetime(shift);
77 This driver (unlike L<DBD::InterBase>) does not currently support reading or
78 writing C<TIMESTAMP> values with sub-second precision.
84 See L<DBIx::Class/AUTHOR> and L<DBIx::Class/CONTRIBUTORS>.
88 You may distribute this code under the same terms as Perl itself.