Jens Rehsack > DBD-Sys-0.102 > DBD::Sys::Table

Download:
DBD-Sys-0.102.tar.gz

Dependencies

Annotate this POD

View/Report Bugs
Module Version: 0.1   Source  

NAME ^

DBD::Sys::Table - abstract base class of tables used in DBD::Sys

DESCRIPTION ^

DBD::Sys::Table provides an abstract base class to wrap the requirements of SQL::Statement and DBD::Sys on a table around the pure data collecting actions.

METHODS ^

get_col_names

This method is called during the construction phase of the table. It must be a static method - the called context is the class name of the constructed object.

collect_data

This method is called when the table is constructed but before the first row shall be delivered via fetch_row().

get_primary_key

This method returns the column name of the primary key column. If not overwritten, the first column name is returned by DBD::Sys::Table.

get_table_name

Returns the name of the table based on it's class name. Override it to return another table name.

get_priority

Returns the default priority of the controlling plugin.

To speed up subsequent get_priority calls, a simple method returning the value is injected into the class name space.

new

Constructor - called from DBD::Sys::PluginManager::get_table when called from SQL::Statement::open_tables for tables with one implementor class. The $attrs argument contains the owner statement instance in the field owner and the owning database handle in the field <database>.

fetch_row

Called by SQL::Statement to fetch the single rows. This method return the rows contained in the data attribute of the individual instance.

AUTHOR ^

    Jens Rehsack                        Alexander Breibach
    CPAN ID: REHSACK
    rehsack@cpan.org                    alexander.breibach@googlemail.com
    http://search.cpan.org/~rehsack/

COPYRIGHT ^

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

The full text of the license can be found in the LICENSE file included with this module.

SUPPORT ^

Free support can be requested via regular CPAN bug-tracking system. There is no guaranteed reaction time or solution time, but it's always tried to give accept or reject a reported ticket within a week. It depends on business load. That doesn't mean that ticket via rt aren't handles as soon as possible, that means that soon depends on how much I have to do.

Business and commercial support should be acquired from the authors via preferred freelancer agencies.

SEE ALSO ^

perl(1), DBI, Module::Build, Module::Pluggable, Params::Util, SQL::Statement.

syntax highlighting: