Closing bug 1871072

git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@2156 4979c152-3d1c-0410-bac9-87ea11338e46

1 files changed, 2 insertions, 2 deletions

diff --git a/LedgerSMB/GL.pm b/LedgerSMB/GL.pm
index 2009c037..25b0206d 100644
--- a/LedgerSMB/GL.pm
+++ b/LedgerSMB/GL.pm
@@ -80,7 +80,7 @@ sub post_transaction {
 
     my $id = $dbh->quote( $form->{id} );
     if ($form->{separate_duties}){
-        $form->approved = '0';
+        $form->{approved} = '0';
     }
     if ( $form->{id} ) {
 
@@ -135,7 +135,7 @@ sub post_transaction {
         my $query = qq| UPDATE gl SET approved = ? WHERE id = ?|;
         $dbh->prepare($query)->execute($form->{approved}, $form->{id}) 
              || $form->dberror($query);
-        if (!$form->{approved}){
+        if (!$form->{approved} and $form->{batch_id}){
            if (not defined $form->{batch_id}){
                $form->error($locale->text('Batch ID Missing'));
            }