diff options
Diffstat (limited to 'LedgerSMB/DBObject')
-rw-r--r-- | LedgerSMB/DBObject/Payment.pm | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/LedgerSMB/DBObject/Payment.pm b/LedgerSMB/DBObject/Payment.pm index abd45de3..8bf22ee9 100644 --- a/LedgerSMB/DBObject/Payment.pm +++ b/LedgerSMB/DBObject/Payment.pm @@ -416,7 +416,7 @@ sub post_bulk { if ($queue_payments){ my ($job_ref) = $self->exec_method( funcname => 'job__create' - ) + ); $self->{job_id} = $job_ref->{job__create}; $self->exec_method( funcname => 'payment_bulk_queue_entry' @@ -429,4 +429,9 @@ sub post_bulk { return $self->{dbh}->commit; } +sub check_job { + my ($self) = @_; + ($self->{job}) = $self->exec_method(funcname => 'job__status'); +} + 1; |