PEPPLER.ORG
Michael Peppler
Sybase Consulting
Menu
Home
Sybase on Linux
Install Guide for Sybase on Linux
General Sybase Resources
General Perl Resources
Freeware
Sybperl
Sybase::Simple
DBD::Sybase
BCP Tool
Bug Tracker
Mailing List Archive
Downloads Directory
FAQs
Sybase on Linux FAQ
Sybperl FAQ
Personal
Michael Peppler's resume

sybperl-l Archive

Up    Prev    Next    

From: Michael Peppler <michael dot peppler at gmail dot com>
Subject: Fwd: DBlib to CTlib migration question
Date: Apr 12 2005 11:09AM

---------- Forwarded message ----------
From: Debkumar Chakraverty 
Date: Apr 12, 2005 9:57 AM
Subject: DBlib to CTlib migration question
To: mpeppler@peppler.org


 
Hi,
 
I am migrating DBlib calls to CTlib & am facing the following concern... 
There is a call to "dbretstatus()" for which i am not able to get the
corresponding call in CTlib as below...
 
 
*************************************************Sample
Code*************************************************
....... 
sub sql_print 
{ 
    my $arg; 
    my $type; 
    
    while ($arg = shift) { 
        if ($type = ref ($arg)) { 
            if ($type eq 'ARRAY')   { print STDERR "@$arg\n" } 
            else                    { print STDERR "Can't display type
$type\n" }
        } 
        else { 
            chomp $arg; 
            print STDERR "$arg\n"; 
        } 
    } 
} 
....... 
my $query        = "exec $proc $parms"; 
........ 
sql_print ($dbh->doSql ($query)); 
my $ret = $dbh->dbretstatus(); 
 
print   STDOUT  $ret; 
  
if ($ret < 0){ 
        exit 1; 
} 
  
exit 0 
 
*************************************************Sample
Code*************************************************
 
Any help for the corresponding CTlib call would be appreciated...
 Thanks in advance...
 
--------
 Cheers,
 - Debkumar Chakraverty
 
 
 
 ______________________________________________________________________