below I have a snippet from a trace file read out for a section of code below. The 
problem seems to be with '$sth->bind_param (2,$rh_row->{prop_str_addr});' The first 
Bind works fine however the next one in the line listed produces a null entry per the 
trace file. I have verified that the data is correct in '$rh_row->{prop_str_addr}' and 
that it is quoted but for some reason myql isn't recieving the data any help would be 
appreciated.

<- dbd_st_execute 0 rows
    <- execute= '0E0' at db_load_1-2.pl line 128
    -> bind_param for DBD::mysql::st (DBI::st=HASH(0x8104f14)~0x8104e3c 1 
''310-673-5515'')
    <- bind_param= 1 at db_load_1-2.pl line 122
    -> execute for DBD::mysql::st (DBI::st=HASH(0x8104f14)~0x8104e3c)
    -> dbd_st_execute for 08104e48
      Binding parameters: UPDATE own_info
                                       SET own_phone_home = '\'310-673-5515\''
                                       WHERE own_str_addr = NULL



###############################CODE SNIPPETTE########################
$dbh = connect_try("******","******");
    foreach $k (keys (%{$ar_info->[1]})){ # retrieves a generic set of fields and uses 
them to assign values for each row.
        if ($table eq "prop_info"){ # checks which table is being used and assigns the 
correct SQL statement
                $sth = $dbh->prepare ("UPDATE prop_info
                                       SET $k = ?
                                       WHERE prop_str_addr = ?") or
                                       err_trap("failed to prepare statement\n");
            }elsif ($table eq "own_info"){
                $sth = $dbh->prepare ("UPDATE own_info
                                       SET $k = ?
                                       WHERE own_str_addr = ?") or
                                       err_trap("failed to prepare statement\n");


            }
        $sth->trace(2, "./trace_data.txt");
        foreach $rh_row (@$ar_info) { # iterates through the list of rows and assigns 
the correct value to the field
            print "::$k=>$rh_row->{$k}"; # this is an internal check to verify what 
values are being inserted
            $sth->bind_param (1,$rh_row->{$k});
            if ($table eq "prop_str_addr") {
                $sth->bind_param (2,$rh_row->{prop_str_addr});
            }elsif  ($table eq "own_str_addr") {
                $sth->bind_param (2,$rh_row->{own_str_addr});
            }
            $sth->execute() or
                err_trap("failed to execute statement\n");

            }
        print "\n===========================\n";

    }
    $sth->finish();
    $dbh->disconnect or
        err_trap("failed to disconnect statement\n");


-- 
MySQL General Mailing List
For list archives: http://lists.mysql.com/mysql
To unsubscribe:    http://lists.mysql.com/[EMAIL PROTECTED]

Reply via email to