"NOT WORKING" is the worst possible error message. It's only slightly better than silent failure. Why not use DBI's built-in error reporting? You could use the RaiseError attribute at "connect" time, or you could explicitly call the errstr() method:

$DIVDATA->execute($S,$D,$DV,$EDV,$DVD,$DVY,$ES) or die $DIVDATA->errst
+r;
[download]

Then rather than us trying to guess what the problem is, your application can tell you itself.