/ 
DBIx-BlackBox-0.01
River stage zero No dependents
/ DBIx::BlackBox::Result

NAME

DBIx::BlackBox::Result - result of executed stored procedure.

SYNOPSIS

my $rs = $dbbb->exec('ListCatalogs',
        root_id => $root_id,
        org_id => $org_id,
    );
}

ATTRIBUTES

db_driver

Database driver object.

isa: DBIx::BlackBox::Driver.

sth

Statement handle for current result.

isa: DBI::st.

resultsets

print "$_\n" for @{ $rs->resultsets };

Names of the resultsets classes.

isa: ArrayRef.

idx

if ( $rs->idx == 1 ) {
    ...
}

Index of the current resultset.

isa: Int.

METHODS

next_resultset

do {
    ...
} while ( $rs->next_resultset );

Returns true if database statement has more resultsets and it is a row result (SELECT query).

next_row

while ( my $row = $rs->next_row ) {
    ...
}

Tries to fetch next row and returns instance of an object of the current resultset (provided by "resultsets".

Returns undef if there are no rows.

procedure_result

Returns return value of executed stored procedure.

all

my ( $catalogs, $data, $rv ) = $rs->all;

Helper method to get all rows of all resultsets at once.

AUTHOR

Alex J. G. Burzyński, <ajgb at cpan.org>

LICENSE AND COPYRIGHT

Copyright 2010 Alex J. G. Burzyński.

This program is free software; you can redistribute it and/or modify it under the terms of either: the GNU General Public License as published by the Free Software Foundation; or the Artistic License.

See http://dev.perl.org/licenses/ for more information.