diff options
| author | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2008-11-22 21:38:18 +0000 |
|---|---|---|
| committer | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2008-11-22 21:38:18 +0000 |
| commit | bda04bbe95f0ff8996619a5c2599b070d4a7326f (patch) | |
| tree | 057af110773f9c84f5f7850e8980f1f873241575 /scripts/vouchers.pl | |
| parent | 75a1145585826d7c88eee5fd8d536d62176d1e6d (diff) | |
Batch numbers assigned at batch creation phase. Tests working.
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@2414 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'scripts/vouchers.pl')
| -rw-r--r-- | scripts/vouchers.pl | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/scripts/vouchers.pl b/scripts/vouchers.pl index d6ed9b23..f21d2e42 100644 --- a/scripts/vouchers.pl +++ b/scripts/vouchers.pl @@ -41,6 +41,7 @@ sub create_batch { my $batch = LedgerSMB::Batch->new({base => $request}); $batch->{class_id} = $batch->get_class_id($batch->{batch_type}); + $batch->get_new_info; $batch->get_search_results({mini => 1}); my $template = LedgerSMB::Template->new( |