my $rc = $db2->Sql($sql2);
  die sprintf "Query error!! RC: %s ; Error: %s ; SQL: %s", $rc, $Sql-
+>Error(), $sql2;