$Debug = 0;
-my @payby = qw(CARD);
+my @payby = qw(CARD PREPAY);
my $user = shift or die &usage;
&adminsuidsetup( $user );
$_->state,
$_->ac,
$_->exch,
+ $_->loc,
} @svc_acct_pop
), "\n";
warn "[fs_signup_server] $data\n" if $Debug > 2;
my $part_pkg = qsearchs( 'part_pkg', { 'pkgpart' => $pkgpart } )
or $error ||= "WARNING: unknown pkgpart $pkgpart";
- my $svcpart = $part_pkg->svcpart;
+ my $svcpart = $part_pkg->svcpart unless $error;
# this should wind up in FS::cust_pkg!
my $agent = qsearchs( 'agent', { 'agentnum' => $agentnum } );