The trace was a good idea. However I do not understand the log very much. There 
is an error there but there's also an error on my next select which basically 
was to test the update, see if it fetched.

    DBI 1.46-ithread default trace level set to 0x0/4 (pid 2804)
    -> prepare for DBD::ODBC::db (DBI::db=HASH(0x19a40d8)~0x19c5694 'UPDATE 
GLOBALSettings SET Lang = ?') thr#15d4374
    New DBI::st (for DBD::ODBC::st, parent=DBI::db=HASH(0x19c5694), id=)
    dbih_setup_handle(DBI::st=HASH(0x19c5784)=>DBI::st=HASH(0x1974888), 
DBD::ODBC::st, 19c5790, Null!)
    dbih_make_com(DBI::db=HASH(0x19c5694), 19c5c54, DBD::ODBC::st, 208, 0) 
thr#15d4374
    dbd_preparse scanned 1 distinct placeholders
    SQLPrepare returned 0

    dbd_st_prepare'd sql f28514864, ExecDirect=0
        UPDATE GLOBALSettings SET Lang = ?
    <- prepare= DBI::st=HASH(0x19c5784) at OEEMGR_Lang.pl line 116
    -> execute for DBD::ODBC::st (DBI::st=HASH(0x19c5784)~0x1974888 'EN') 
thr#15d4374
bind 1 <== 'EN' (attribs: ), type 0
SQLDescribeParam idx = 1.
    dbd_st_execute (outparams = 0)...
bind 1 <== 'EN' (size 2/3/0, ptype 4, otype 1, sqltype 1)
bind 1 <== 'EN' (len 2/2, null 0)
    bind 1: CTy=1, STy=CHAR, CD=2, Sc=2, VM=2.
    dbd_st_execute (for hstmt 28514864 before)...
dbd_error: err_rc=0 rc=0 s/d/e: 28514864/28513096/28512928
dbd_error: err_rc=0 rc=0 s/d/e: 0/28513096/28512928
dbd_error: err_rc=0 rc=0 s/d/e: 0/0/28512928
    dbd_describe sql 28514864: num_fields=0
    dbd_describe skipped (no result cols) (sql f28514864)
    dbd_st_execute got no rows: resetting ACTIVE, moreResults
    <- execute= 1 at OEEMGR_Lang.pl line 117
    -> prepare for DBD::ODBC::db (DBI::db=HASH(0x19a40d8)~0x19c5694 'SELECT 
Lang FROM GLOBALSettings') thr#15d4374
    New DBI::st (for DBD::ODBC::st, parent=DBI::db=HASH(0x19c5694), id=)
    dbih_setup_handle(DBI::st=HASH(0x19c582c)=>DBI::st=HASH(0x19c585c), 
DBD::ODBC::st, 19c5838, Null!)
    dbih_make_com(DBI::db=HASH(0x19c5694), 19c5c54, DBD::ODBC::st, 208, 0) 
thr#15d4374
    SQLPrepare returned 0

    dbd_st_prepare'd sql f28516032, ExecDirect=0
        SELECT Lang FROM GLOBALSettings
    <- prepare= DBI::st=HASH(0x19c582c) at Functions.pl line 182 via 
C:/oracle/ora92/Apache/Apache/ITTWeb/cgi-bin/OEEMGR/OEEMGR_Lang.pl line 121
    -> execute for DBD::ODBC::st (DBI::st=HASH(0x19c582c)~0x19c585c) thr#15d4374
    dbd_st_execute (outparams = 0)...
    dbd_st_execute (for hstmt 28516032 before)...
dbd_error: err_rc=0 rc=0 s/d/e: 28516032/28513096/28512928
dbd_error: err_rc=0 rc=0 s/d/e: 0/28513096/28512928
dbd_error: err_rc=0 rc=0 s/d/e: 0/0/28512928
    dbd_describe sql 28516032: num_fields=1
      col  1: CHAR     (1) len=  2 disp=  3, prec=  2 scale=0
      col  1: 'Lang' sqltype=CHAR, ctype=SQL_C_CHAR, maxlen=3, (dp = 0, cp = 0)
    <- execute= -1 at Functions.pl line 191 via 
C:/oracle/ora92/Apache/Apache/ITTWeb/cgi-bin/OEEMGR/OEEMGR_Lang.pl line 121
    -> fetchall_arrayref for DBD::ODBC::st (DBI::st=HASH(0x19c582c)~0x19c585c) 
thr#15d4374
       SQLFetch rc 0
    dbih_setup_fbav for 1 fields => 0x19c88a0
fetch num_fields=1
fetch col#0 Lang datalen=2 displ=3
       SQLFetch rc 100
    <- fetchall_arrayref= [ ARRAY(0x19c8900) ] row1 at Functions.pl line 196 
via C:/oracle/ora92/Apache/Apache/ITTWeb/cgi-bin/OEEMGR/OEEMGR_Lang.pl line 121
    <> DESTROY(DBI::st=HASH(0x19c582c)) ignored for outer handle (inner 
DBI::st=HASH(0x19c585c) has ref cnt 1)
    -> DESTROY for DBD::ODBC::st (DBI::st=HASH(0x19c585c)~INNER) thr#15d4374
    <- DESTROY= undef at OEEMGR_Lang.pl line 121
    dbih_clearcom 0x19c582c (com 0x19c941c, type 3) done.

    -> disconnect for DBD::ODBC::db (DBI::db=HASH(0x19a40d8)~0x19c5694) 
thr#15d4374
    <- disconnect= 1 at OEEMGR_Lang.pl line 163
    -- DBI::END
    -> disconnect_all for DBD::ODBC::dr (DBI::dr=HASH(0x18f3a70)~0x19a4108) 
thr#15d4374
    <- disconnect_all= '' at DBI.pm line 671 via 
C:/oracle/ora92/Apache/Apache/ITTWeb/cgi-bin/OEEMGR/OEEMGR_Lang.pl line 0
!   -> DESTROY for DBD::ODBC::db (DBI::db=HASH(0x19c5694)~INNER) thr#15d4374
!   <- DESTROY= undef during global destruction
    dbih_clearcom 0x19a40d8 (com 0x19c5c54, type 2) done.

!   -> DESTROY in DBD::_::common for DBD::ODBC::dr 
(DBI::dr=HASH(0x19a4108)~INNER) thr#15d4374
!   <- DESTROY= undef during global destruction
    dbih_clearcom 0x18f3a70 (com 0x19a5054, type 1) done.

!   -> DESTROY for DBD::ODBC::st (DBI::st=HASH(0x1974888)~INNER) thr#15d4374
!   <- DESTROY= undef during global destruction
    dbih_clearcom 0x19c5784 (com 0x19c8794, type 3) done.

!   <> DESTROY for DBI::st=HASH(0x19c5784) ignored (inner handle gone)
!   <> DESTROY for DBI::db=HASH(0x19a40d8) ignored (inner handle gone)
!   <> DESTROY for DBI::dr=HASH(0x18f3a70) ignored (inner handle gone)

-----Original Message-----
From: Michael A Chase [mailto:[EMAIL PROTECTED]
Sent: Thursday, March 10, 2005 1:52 PM
To: Moreno, Javier
Cc: dbi-users@perl.org
Subject: RE: Value deletion


Quoting "Moreno, Javier" <[EMAIL PROTECTED]>:

> Actually it is now getting worse. It has AutoCommit set to 0 so I am doing
> this:
>
> $::sql = "UPDATE GLOBALSettings SET Lang = ?";
> $::crt = $::lang_code;
> &Debug("About to prepare: $::sql with criteria: $::crt");
> $::sth = $::dbh->prepare($::sql) or &Error("Unable to prepare statement.");
> $::rec = $::sth->execute ($::crt) or &Error("Unable to execute statement");
> $::dbh->commit;

As I recommended before, please add $DBI::errstr to your error messages,
otherwise you get no clues about what went wrong.

> But it is now writing a <NULL> value on the DB. That &Debug line shows:
>
> About to prepare: UPDATE GLOBALSettings SET Lang = ? with criteria: SP
>
> So the value is fine but it is not updating right. What I found was that the
> second field on the SQL table was set to no nulls so the update was failing
> on the webserver log because of that. BTW responding to the "app bombs"
> ambiguity, I use the value for an auto META REFRESH value to find out the
> directory of the language I am running.

The problem may be in placeholder handling in the driver.  Add `DBI->trace( 4,
"log_file.log");` (without the outer quotes) before prepare() to get more
information about what is happening.  Higher numbers up to about 9 give you
more details.

http://search.cpan.org/~timb/DBI/DBI.pm#TRACING

http://search.cpan.org/~timb/DBI/DBI.pm#trace

http://search.cpan.org/~timb/DBI/DBI.pm#Why_doesn't_my_CGI_script_work_right?

--
Mac :})

Reply via email to