SF.net SVN: ledger-smb:[5827] trunk/LedgerSMB/Report/GL.pm

[..hidden..]

Revision: 5827
          http://sourceforge.net/p/ledger-smb/code/5827
Author:   einhverfr
Date:     2013-05-19 02:16:53 +0000 (Sun, 19 May 2013)
Log Message:
-----------
Fixing bug 827, gl reports by account do not show records

Modified Paths:
--------------
    trunk/LedgerSMB/Report/GL.pm

Modified: trunk/LedgerSMB/Report/GL.pm
===================================================================
--- trunk/LedgerSMB/Report/GL.pm	2013-05-19 02:09:01 UTC (rev 5826)
+++ trunk/LedgerSMB/Report/GL.pm	2013-05-19 02:16:53 UTC (rev 5827)
@@ -343,6 +343,9 @@
 
 sub run_report{
     my ($self) = @_;
+    my $accno = $self->accno;
+    $accno =~ s/--.*//;
+    $self->accno($accno);
     my @rows = $self->exec_method({funcname => 'report__gl'});
     for my $ref(@rows){
         if ($ref->{amount} < 0){

This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.