Ron,
I have AutoCommit set on.
With DBI 1.42
this program just works if I use this, otherwise it not UPDATE the table:
$query = "update mensagem set mens_stat = 2 where mens_codigo = 343520291 and
mens_stat = 1"; prepare($query);
With DBI 1.30 it works just it is:
@param = (2, 343520291, 1);
$query = "update mensagem set mens_stat = ? where mens_codigo = ? and mens_stat
if (!$sth->execute(@param))
The diference is the way I am passing the values to the $query
>-----MENSAGEM ORIGINAL-----
>De: "Reidy, Ron" <[EMAIL PROTECTED]>
>Enviada em: Sex, 14 Mai 2004 16:19:10
>Assunto: Res: RE: RE: Problems changing from 1.30 to 1.42
>
>
>>Sorry for the last faux pas. I misread your code.
>
>Where do you commit? Or, is AutoCommit => 1?
>
>Is the behavior the same with both versions of DBI? Did something else change?
>
>-----------------
>Ron Reidy
>Senior DBA
>Array BioPharma, Inc.
>
>-----Original Message-----
>From: Reidy, Ron
>Sent: Friday, May 14, 2004 1:14 PM
>To: Pedro Anisio; [EMAIL PROTECTED]
>Subject: RE: RE: Problems changing from 1.30 to 1.42
>
>So, does this mean $msg is undef? What is the value of $sth->err or $sth->errstr?
>
>-----------------
>Ron Reidy
>Senior DBA
>Array BioPharma, Inc.
>
>-----Original Message-----
>From: Pedro Anisio [mailto:[EMAIL PROTECTED]
>Sent: Friday, May 14, 2004 1:02 PM
>To: [EMAIL PROTECTED]
>Subject: Res: RE: Problems changing from 1.30 to 1.42
>
>I dont get any error on $msg but the UPDATE is not executed and the values on my
>database dont' change.
>
>Pedro
>
>>-----MENSAGEM ORIGINAL-----
>>De: "Reidy, Ron"
>>Enviada em: Sex, 14 Mai 2004 15:59:25
>>Assunto: Res: RE: Problems changing from 1.30 to 1.42
>>
>>
>>>What is your error?
>>
>>-----------------
>>Ron Reidy
>>Senior DBA
>>Array BioPharma, Inc.
>>
>>-----Original Message-----
>>From: Pedro Anisio [mailto:[EMAIL PROTECTED]
>>Sent: Friday, May 14, 2004 12:57 PM
>>To: [EMAIL PROTECTED]
>>Subject: Problems changing from 1.30 to 1.42
>>
>>Guys,
>>
>> I'm migrating my system from DBI 1.30 to 1.42 but I found onte little problem,
>> this piece off code used to worked at 1.30 but now it simple don't do this update,
>> unless I pass the update values directlty on the $query. What is causing this?
>> Anyone can help-me?
>>
>>#!/usr/bin/perl
>>
>>use DBI;
>>
>>$query = "update mensagem set mens_stat = ? where mens_codigo = ? and mens_stat =
>>?";
>>#$query = "update mensagem set mens_stat = 2 where mens_codigo = 343520291 and
>>mens_stat = 1"; prepare($query);
>>
>> if (!$sth->execute(@param))
>> {
>> $msg = $sth->errstr;
>> $msg =~ s/\n|\r/ /g;
>> $msg .= "[$query], ".join(",",@param);
>> }
>>
>>print "$msg\n";
>>
>>$sth->finish;
>>$dbh->disconnect;
>>
>>exit;
>>
>>Abra�os,
>>
>>Pedro An�sio
>>
>>* iBest. Internet gr�tis com qualidade de internet paga.
>>
>>Clique abaixo para conectar-se � internet gratuitamente:
>>http://discador.ibest.com.br/mail.html
>>
>>This electronic message transmission is a PRIVATE communication which contains
>>information which may be confidential or privileged. The information is intended
>>to be for the use of the individual or entity named above. If you are not the
>>intended recipient, please be aware that any disclosure, copying, distribution
>>or use of the contents of this information is prohibited. Please notify the
>>sender of the delivery error by replying to this message, or notify us by
>>telephone (877-633-2436, ext. 0), and then delete it from your system.
>>
>>
>
>Abra�os,
>
>Pedro An�sio
>
>* iBest. Internet gr�tis com qualidade de internet paga.
>
>Clique abaixo para conectar-se � internet gratuitamente:
>http://discador.ibest.com.br/mail.html
>
>This electronic message transmission is a PRIVATE communication which contains
>information which may be confidential or privileged. The information is intended
>to be for the use of the individual or entity named above. If you are not the
>intended recipient, please be aware that any disclosure, copying, distribution
>or use of the contents of this information is prohibited. Please notify the
>sender of the delivery error by replying to this message, or notify us by
>telephone (877-633-2436, ext. 0), and then delete it from your system.
>
>This electronic message transmission is a PRIVATE communication which contains
>information which may be confidential or privileged. The information is intended
>to be for the use of the individual or entity named above. If you are not the
>intended recipient, please be aware that any disclosure, copying, distribution
>or use of the contents of this information is prohibited. Please notify the
>sender of the delivery error by replying to this message, or notify us by
>telephone (877-633-2436, ext. 0), and then delete it from your system.
>
>
Abra�os,
Pedro An�sio
* iBest. Internet gr�tis com qualidade de internet paga.
Clique abaixo para conectar-se � internet gratuitamente:
http://discador.ibest.com.br/mail.html
