>  -----Original Message-----
> From:         Sokolowski, Gwen (G.)  
> Sent: Monday, July 16, 2001 10:06 AM
> To:   Sterin, Ilya (I.)
> Subject:      RE: Disposal PRojects -  
> 
> > 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]"); 


Are you sure that Datum should not be quoted, is it a number??


> 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: 


Why shouldn't it.  Where do you update the NULLs???

Ilya


> $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 
> 
> 

Reply via email to