Perl Error

------=_NextPart_000_0065_01C6C85C.006BD090
Content-Type: text/plain;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable

Hello,

I am trying to execute a procedure in perlscript from MSSQL server =
database.I am using CYGWIN console for executing the perl script. The =
DBI 1.28 is being used with perl5.8.7 here.s=20

Sample code:

my $sth =3D $dbh->prepare("{ call $VIOLATIONS_SP }");
$sth->trace(15);
$sth->execute() || die $sth->errstr;
$sth->finish();

I get the following error/trace. The execution breaks in between.
==================== =====3D=
==================== ====

01000 [Microsoft][ODBC SQL Server Driver][SQL Server]exec =
GetPosValueViolations
506, 505
Numfields == 0, SQLNumResultCols == 0
Numfields == 0, SQLMoreResults == -1
dbd_describe sql 678435632: num_fields=3D0
dbd_describe skipped (no result cols) (sql f678435632)
dbd_st_execute got no rows: resetting ACTIVE, moreResults
<- execute=3D -1 at ./wtcustom.pl line 121
-> finish for DBD::ODBC::st (DBI::st=3DHASH(0x10168c48)~0x1015f43c)
<- finish=3D 1 at ./wtcustom.pl line 122
==================== =====3D=
==================== =====3D=
====

The procedure being executed contains reference of around 45 procedure =
in it. And some of them have cursors implemented in them.
Is it that some truncation is happening as the cursors are fetching =
around 1-2 lakhs of rows sometimes.

Is there any workaround to overcome this problem.


Any help will be graetly appreciated..

SuSon

------=_NextPart_000_0065_01C6C85C.006BD090--