> What version of DBD::Oracle are you using?
DBD Oracle V 1.07
> Are you using dbiproxy?
I don't think so.
> Please show your connect string -
> obviously you can XXX out the
> User Name and Password, and even
> the database name if you want.
Here you are (I changed it back to AutoCommit with the same results):
#! /usr/bin/perl
use DBI;
$dbho = DBI->connect('DBI:Oracle:host=xxx;sid=yyy',
'test_sys', 'test_sys',
{ RaiseError => 1, AutoCommit => 1 });
# ........
$z = 0;
if ($vergleich == 1){
while ($z < $z_max){
$quoteddatum = $dbho->quote( $mydatum[$z] );
$dbho->do("UPDATE Wartungstermine
SET Datum = $quoteddatum
WHERE Lfdnummer = $myid[$z]");
print "Ich aendere Datensatz Nr.: $myid[$z]\n";
$z++;
}
}
# SET Datum = '$quoteddatum' didn't work either
# Here it still recognizes the entry with Datum = NULL:
$stho = $dbho->prepare("SELECT * FROM Wartungstermine WHERE Datum IS
NULL");
$stho->execute;
while ((@stuff) = $stho->fetchrow_array){
push (@system, @stuff[0]);
push (@znummer, @stuff[1]);
push (@tag, @stuff[2]);
push (@von, @stuff[3]);
push (@bis, @stuff[4]);
push (@lfdnummer, @stuff[5]);
push (@datum, @stuff[6]);
}
$stho->finish;
$dbho->disconnect;
exit();
Thanks for your help in advance again
Thomas
> While I am using the following comands to change data in an
Oracle DB
>
> ...
> while ($z < $z_max){
> $quoteddatum = $dbho3->quote( $mydatum[$z] );
> $dbho3->do("UPDATE Wartungstermine
> SET Datum = $quoteddatum
> WHERE Lfdnummer = $myid[$z]");
> $dbho3->commit() or die "Commit hat nicht
geklappt!";
> $z++;
> }
> $dbo3->disconnect;
>
> the changed data could only be read from the Oracle after the
exit();
> of
> the perl-script but not while the program is still running.
>
> I have already tried all the possibilties with AutoCommit and so
on
> but
> nothing helped. But doing the same with our MySQL I don't have
any
> problems with the commit.
>
> Any ideas, what I could have forgotten?
>
> Thomas
