Select Code to Download

U:\2004_2005\Development\Perl_development\20_October_2004>perl 20_Octo
+ber_2004_E.pl
...
Couldn't execute query: [Microsoft][ODBC SQL Server Driver]Invalid cur
+sor state
(SQL-24000)(DBD: dbd_describe/SQLNumResultCols err=-1) at 20_October_2
+004_E.pl line 290.

#! perl -w scipt

...

my $dbh = DBI->connect( "DBI:ODBC:$conn_string" ) or die $DBI::errstr;

  my $sthB_A =  $dbh->prepare("$Query_A") or die "Couldn't prepare que
+ry: ".$dbh->errstr;
  
  $sthB_A->execute() or die "Couldn't execute query: ".$sthB_A->errstr
+;