FreeTDS Development Group

[Brian Bruns <camber AT ais.org>]

I believe this is fixed in 0.53pre1, let's see why it's not working for 
you.  Can you set the TDSDUMP variable like:

export TDSDUMP=/tmp/freetds.log

and send it (after removing your password!)

Brian

On Fri, 9 Nov 2001, Scott Cain wrote:

> Brian,
> 
> It appears that it is a truncation problem.  I ran with DBI->trace(3) on, 
> and the
> value there was truncated as well.
> 
> Unfortunately, when I tried to install 0.53pre1, it appeared to go 
> smoothly, but now I
> am getting "connect: Network unreachable" from DBI. I am using an interface 
> file in
> /usr/local/freetds that is identical to the interface file that used to be 
> there.
> Also, if it matters, I upgraded DBI to 1.20 (thinking that may be the 
> source of the
> problem); no luck.
> 
> Any suggestions?
> 
> Scott
> 
> Brian Bruns wrote:
> 
> > Hi,
> >
> > I thought we had squished all the truncation bugs, can you try 0.53pre1
> > (or CVS) and let me know if it shows up there as well?
> >
> > Brian
> >
> > > Hello,
> > >
> > > I am writing Perl (5.6.1) on a linux box (RH 7.1) with FreeTDS (0.51) 
> > > and
> > > DBI (1.19) to talk to a MSSQL server on a win2000 box.  I want to get
> > > @@IDENTITY from the last insert I made (@@IDENTITY contains that value 
> > > of
> > > the last autoincrement on a primary key).
> > >
> > > Here is test code I created:
> > >
> > > #!/usr/local/bin/perl -w
> > >    use DBI;
> > >    use strict;
> > >
> > >    $ENV{'SYBASE'} = '/usr/local/freetds';
> > >    $ENV{'TDSVER'} = 70;
> > >
> > >    my $server = "server";
> > >    my $db = "db";
> > >    my $user = "sqluser";
> > >    my $passwd = "sqluserpasswd";
> > >
> > >    my $dbh =
> > > DBI->connect("dbi:Sybase:server=$server;database=$db",$user,$passwd)
> > >      or die "--$!--\n";
> > >
> > >    my $sth = $dbh->prepare(' insert into sctemp (scratch) values (42)
> > > select @@IDENTITY as foo');
> > >    $sth->execute;
> > >
> > >    my $data =  $sth->fetchrow_hashref;
> > >    my $seqid=  $$data{foo};
> > >    my $err  =  $sth->errstr;
> > >    print "$seqid, $err\n";
> > >
> > > The problem I have is that $seqid seems to be getting truncated, ie, the
> > > value of @@IDENTITY is about 20, but the value of $seqid that gets 
> > > printed
> > > out is 2.  The query works fine as written in the Query Analyzer on
> > > Windows.  At this point, it feels like a problem with FreeTDS.  In
> > > addition to fetchrow_hashref, I tried fetch and fetchrow_array.  Any
> > > ideas?
> > >
> > > Thanks,
> > > Scott
> >
> > ---
> > You are currently subscribed to freetds as: [scain AT athersys.com]
> > To unsubscribe, forward this message to $subst('Email.Unsub')
> 
> --
> _____________________________________________________________
> This message is for the sole use of the intended recipient(s)
> and may contain confidential and privileged information.  Any
> unauthorized  review,   use,  disclosure or  distribution is
> prohibited.  If you are not the intended recipient,  please
> contact the sender by reply e-mail and destroy all copies of
> the original message.
> _____________________________________________________________
> Scott Cain, Ph. D.                      Ph :(216) 431-9900
> Bioinformatics Specialist               Fax:(216) 361-9596
> Athersys, Inc.
> 3201 Carnegie Avenue
> Cleveland, OH 44115-2634
> _____________________________________________________________
> 
> 
> 
> ---
> You are currently subscribed to freetds as: [camber AT ais.org]
> To unsubscribe, forward this message to $subst('Email.Unsub')
>