From 428f6a8085fdef7360473a4c9328766064475324 Mon Sep 17 00:00:00 2001
From: einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>
Date: Wed, 9 Jan 2008 22:35:21 +0000
Subject: Correcting trial balance and gl report not to pull unapproved
 transactions

git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@2031 4979c152-3d1c-0410-bac9-87ea11338e46
---
 LedgerSMB/RP.pm | 7 +++++++
 1 file changed, 7 insertions(+)

(limited to 'LedgerSMB/RP.pm')

diff --git a/LedgerSMB/RP.pm b/LedgerSMB/RP.pm
index bd27677f..b51d7290 100644
--- a/LedgerSMB/RP.pm
+++ b/LedgerSMB/RP.pm
@@ -925,6 +925,13 @@ sub get_accounts {
         $project = qq|
 			AND ac.project_id = $project_id|;
     }
+    if (!defined $form->{approved}){
+        $approved = 'true';
+    } elsif ($form->{approved} eq 'all')  {
+        $approved = 'NULL';
+    } else {
+        $approved = $dbh->quote($form->{approved});
+    }
 
     if ( $form->{accounttype} eq 'gifi' ) {
 
-- 
cgit v1.2.3