print a message & exit when there are no tickets to do.
This commit is contained in:
parent
4b0cdad67e
commit
90618aba6a
1 changed files with 5 additions and 0 deletions
|
@ -55,6 +55,11 @@ $INTERACTIVE = 0 if not defined $INTERACTIVE;
|
||||||
|
|
||||||
my @ticketSpecs = TicketIDsReadyForPayment();
|
my @ticketSpecs = TicketIDsReadyForPayment();
|
||||||
|
|
||||||
|
if (@ticketSpecs <= 0) {
|
||||||
|
print "No tickets found that are ready for payment at this time\n";
|
||||||
|
exit 0;
|
||||||
|
}
|
||||||
|
|
||||||
my %payments;
|
my %payments;
|
||||||
foreach my $ticketSpec (@ticketSpecs) {
|
foreach my $ticketSpec (@ticketSpecs) {
|
||||||
my $paymentMethod = FindMostRecentPaymentMethodForTicket($ticketSpec);
|
my $paymentMethod = FindMostRecentPaymentMethodForTicket($ticketSpec);
|
||||||
|
|
Loading…
Reference in a new issue