Most likely, your use of {syb_more_results} is wrong. Most likely, this is because you're not using DBD::Sybase but something else. Reduce your code. Write a real small and short script that only connects to the database and fetches the results, instead of pulling in all your other in-house libraries. Throw out the following modules from your sample program:
use KAP; #internally developed library. use Date::Manip; #internally developed library. use DBAccess; use EQ_Misc; #internally developed library. use DBD::CSV; use MIME::Lite; use Net::SMTP;
Date::Manip likely is not an "internally developed library" anyway. After you've thrown out these, your script should basically look like:
use strict; use DBI; use Data::Dumper; my $dbh = DBI->connect(...); my $sp = 'lv..check_tax_lot'; warn "Preparing [$sp]"; my $sth = $dbh->prepare($sp); warn "Running [$sp]"; my $res = $sth->execute(); warn "Got results ($res):"; if (! $res) { die $sth->errstr; }; my $results = $sth->fetchall_arrayref; print Dumper $results;
Also, your post should have been a reply below Re: Writing Multiple Recordsets into a CSV file, where you already got a good answer and I consider it good courtesy to at least mention that others have helped you already and where they have.
In reply to Re^5: Writing Multiple Recordsets into a CSV file
by Corion
in thread Writing Multiple Recordsets into a CSV file
by sudip_dg77
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |