summaryrefslogtreecommitdiff
path: root/scripts
diff options
context:
space:
mode:
Diffstat (limited to 'scripts')
-rw-r--r--scripts/payment.pl3
1 files changed, 3 insertions, 0 deletions
diff --git a/scripts/payment.pl b/scripts/payment.pl
index 905c89c8..3c5b6671 100644
--- a/scripts/payment.pl
+++ b/scripts/payment.pl
@@ -74,6 +74,9 @@ sub payments {
my ($request) = @_;
my $payment = LedgerSMB::DBObject::Payment->new({'base' => $request});
$payment->get_metadata();
+ if (!defined $payment->{batch_date}){
+ $payment->error("No Batch Date!");
+ }
my $template = LedgerSMB::Template->new(
user => $request->{_user},
locale => $request->{_locale},