" SELECT IssueNo , SUBSTRING(IssueDescription,0,DATALENGTH(IssueDescription)+1) AS IssueText FROM Issues WHERE AccountNo = '1036' ORDER BY IssueNO ASC " #### $stmt = $source_dbh->prepare($self->get_T3_issue_ids_sql($T3_account_id)); $status = $stmt->execute(); if ($status) { $res = $stmt->fetchall_hashref('IssueText'); } debug(20,qq|Sql to get_issues for account,$T3_account_id : \"|.$self->get_T3_issue_ids_sql($T3_account_id).qq|\"\n|); #debug more... foreach my $elem(%{$res}) { if (defined($res->{$elem}->{'IssueText'})) { debug (20,qq|$res->{$elem}->{'IssueNo'}:Current IssueText-\"|.$res->{$elem}->{'IssueText'}.qq|\"\n|); } }