diff options
| author | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2008-10-24 22:03:29 +0000 |
|---|---|---|
| committer | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2008-10-24 22:03:29 +0000 |
| commit | ef73d20d3a666622b884941f49a0b7cefbb0ac70 (patch) | |
| tree | 1fb8de9d702a75351c50e9c63a45a8f1404c18a5 /LedgerSMB | |
| parent | 27b2c2caf5ea455663253189c797bbbf4ab0807f (diff) | |
Adds add_co_code and moves to RAISE EXCEPTION for errors which prevent going forward
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@2378 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'LedgerSMB')
| -rw-r--r-- | LedgerSMB/GL.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/LedgerSMB/GL.pm b/LedgerSMB/GL.pm index 22976c2d..c399b1cf 100644 --- a/LedgerSMB/GL.pm +++ b/LedgerSMB/GL.pm @@ -564,6 +564,7 @@ sub transaction { my $results = $sth->fetchall_hashref('setting_key'); $form->{closedto} = $results->{'closedto'}->{'value'}; $form->{revtrans} = $results->{'revtrans'}->{'value'}; + #$form->{separate_duties} = $results->{'separate_duties'}->{'value'}; $sth->finish; $query = qq|SELECT g.*, d.description AS department |