NAME
Plibwrap - module which wraps DBD::Plibdata to emulate Plibdata
SYNOPSIS
use strict;
use Plibwrap;
my $db1 = Plibwrap->connect("dbi:Informix:cars",
$USERNAME, $PASSWORD, {PrintError => 0});
my $dbh = Plibwrap->connect("dbi:Plibdata:host=$HOSTNAME;port=$PORT",
$USERNAME, $PASSWORD, {PrintError => 0});
my ($status,$err);
my $sql = 'SELECT tabname, tabid FROM systables';
if (($status = $dbh->SQLExecSQL($sql)) < 0)
{
$err = $dbh->GetError();
die "$err\n";
}
else
{
while ( ($status = $dbh->SQLFetch()) == $Plibdata::RET_OK)
{
$tabname = $dbh->{Row}->GetCharValue('tabname');
$tabid = $dbh->{Row}->GetCharValue('tabid');
print "ID: $tabid\t\tName: $tabname\n";
}
}
$sql = "SELECT fullname FROM id_rec WHERE id = 1";
my ($name) = $dbh->selectrow_array($sql);
DESCRIPTION
A lot of code, Jenzabar and local, relies on Plibdata's interface -- especially the Row object. The goal of Plibwrap is to emulate the most used client functionality in Plibdata.
As Plibwrap wraps DBD::Plibdata, you can use the database handle like any other DBI handle.
UNSUPPORTED
. Server functionality
. Anything not used in the standard CX code
AUTHOR
Stephen Olander-Waters < stephenw AT stedwards.edu >
LICENSE
Copyright (c) 2005-2007 by Stephen Olander-Waters, all rights reserved.
You may freely distribute and/or modify this module under the terms of either the GNU General Public License (GPL) or the Artistic License, as specified in the Perl README file.
No Jenzabar code or intellectual property was used or misappropriated in the making of this module.