diff options
author | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-12-13 00:13:37 +0000 |
---|---|---|
committer | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-12-13 00:13:37 +0000 |
commit | 1208d15943738e80e267609aa88f16ec722aaba9 (patch) | |
tree | e38c43c70a173dd6f2549f2468bf8198214a780c /scripts | |
parent | 8f62103e122793ebe3db93819417e688ce5b1e18 (diff) |
More payment fixes
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@1976 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'scripts')
-rw-r--r-- | scripts/payment.pl | 32 |
1 files changed, 29 insertions, 3 deletions
diff --git a/scripts/payment.pl b/scripts/payment.pl index f11a06c7..4f13e395 100644 --- a/scripts/payment.pl +++ b/scripts/payment.pl @@ -82,20 +82,46 @@ sub payments { $template->render($payment); } -sub post_payments_bulk { +sub check_job { my ($request) = @_; my $payment = LedgerSMB::DBObject::Payment->new({'base' => $request}); - $payment->post_bulk(); + $payment->check_job; my $template = LedgerSMB::Template->new( user => $request->{_user}, locale => $request->{_locale}, path => 'UI/payments', - template => 'payments_filter', + template => 'check_job', format => 'HTML', ); $template->render($payment); } +sub post_payments_bulk { + my ($request) = @_; + my $payment = LedgerSMB::DBObject::Payment->new({'base' => $request}); + $payment->post_bulk(); + my $template; + if ($payment->{queue_payments}){ + $payment->{job_label} = 'Payments'; + $template = LedgerSMB::Template->new( + user => $request->{_user}, + locale => $request->{_locale}, + path => 'UI/payments', + template => 'check_job', + format => 'HTML', + ); + } else { + $template = LedgerSMB::Template->new( + user => $request->{_user}, + locale => $request->{_locale}, + path => 'UI/payments', + template => 'payments_filter', + format => 'HTML', + ); + } + $template->render($payment); +} + sub display_payments { my ($request) = @_; my $payment = LedgerSMB::DBObject::Payment->new({'base' => $request}); |