foreach my $payby (@{$signup_info->{payby}}) {
warn "$me checking $payby payment fields\n" if $DEBUG > 1;
my $hide = 0;
- if (FS::payby->realtime($payby)) {
+ if ( FS::payby->realtime($payby) ) {
my $payment_gateway =
$agent->payment_gateway( 'method' => FS::payby->payby2bop($payby) );
- if ($payment_gateway->gateway_namespace eq
- 'Business::OnlineThirdPartyPayment'
+ if ( $payment_gateway
+ && $payment_gateway->gateway_namespace
+ eq 'Business::OnlineThirdPartyPayment'
) {
warn "$me hiding $payby payment fields\n" if $DEBUG > 1;
$hide = 1;
Returns a payment gateway object (see L<FS::payment_gateway>) for this agent.
-Currently available options are I<invnum>, I<method>, and I<payinfo>.
+Currently available options are I<nofatal>, I<invnum>, I<method>, and I<payinfo>.
+
+If I<nofatal> is set, and no gateway is available, then the empty string
+will be returned instead of throwing a fatal exception.
If I<invnum> is set to the number of an invoice (see L<FS::cust_bill>) then
an attempt will be made to select a gateway suited for the taxes paid on
# agent_payment_gateway referenced payment_gateway
my $conf = new FS::Conf;
- die "Real-time processing not enabled\n"
- unless $conf->exists('business-onlinepayment');
+ unless ( $conf->exists('business-onlinepayment') ) {
+ if ( $options{'nofatal'} ) {
+ return '';
+ } else {
+ die "Real-time processing not enabled\n";
+ }
+ }
#load up config
my $bop_config = 'business-onlinepayment';