X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/04f4f1cf1d2b805cda8a24f8b0f7a56513bdecb0..079b834a6728d41dd2c29acc6dbfb066a4707637:/SL/IC.pm diff --git a/SL/IC.pm b/SL/IC.pm index 6942c41c8..970650439 100644 --- a/SL/IC.pm +++ b/SL/IC.pm @@ -1851,8 +1851,11 @@ sub retrieve_accounts { $ref = $sth->fetchrow_hashref(); $sth->finish(); $dbh->disconnect(); - - return $main::lxdebug->leave_sub() unless ($ref); + + unless ($ref) { + $main::lxdebug->leave_sub(); + return; + } $form->{"taxaccounts_$index"} = $ref->{"accno"}; if ($form->{"taxaccounts"} !~ /$ref->{accno}/) {