Re^4: nested dbi queries question


Syntactic Confectionery Delight
	PerlMonks

Re^4: nested dbi queries question

by philosophia (Sexton)

on Feb 02, 2005 at 00:02 UTC ( [id://427100]=note: print w/replies, xml )

Need Help??

in reply to Re^3: nested dbi queries question
in thread nested dbi queries question

here's my current code. same result still...

# begin fix loop

$sql = "SELECT * FROM sp WHERE NOT EXISTS (SELECT * FROM SP,SUPPLIER WHERE SUPPLIER.snum = SP.snum)";
$sth = $dbh->prepare($sql);
$sth->execute or die "Error: $DBI::errstr\n";

$sth->bind_col(1,\$spnum);
$sth->bind_col(2,\$snum);
$sth->bind_col(3,\$pnum);
$sth->bind_col(4,\$qty);

while($sth->fetch){

$sql2 = "INSERT INTO sp_err SELECT * FROM sp WHERE spnum = $spnum && snum = $snum";
$sth2 = $dbh->prepare($sql2);
$sth2->execute or die "Error: $DBI::errstr\n";
print "deleted row";

}