From fda372ea3d82601724eb4fd064ba95fbfdd68bdb Mon Sep 17 00:00:00 2001 From: levinse Date: Tue, 21 Dec 2010 23:44:54 +0000 Subject: self-service improvements: DIDs, RT10885; re-do all of my changes which were undone by Mark --- FS/FS/ClientAPI/MyAccount.pm | 20 +++++++++++++++++++- 1 file changed, 19 insertions(+), 1 deletion(-) (limited to 'FS') diff --git a/FS/FS/ClientAPI/MyAccount.pm b/FS/FS/ClientAPI/MyAccount.pm index ecabe31c7..fb445e555 100644 --- a/FS/FS/ClientAPI/MyAccount.pm +++ b/FS/FS/ClientAPI/MyAccount.pm @@ -1577,7 +1577,25 @@ sub provision_phone { @_ ); } -#XXX: finish bulk orders + +# bulk case + my $error; + foreach my $did ( @bulkdid ) { + $did =~ s/[^0-9]//g; + $error = _provision( 'FS::svc_phone', + [qw(phonenum countrycode)], + [qw(phonenum countrycode)], + { + 'pkgnum' => $p->{'pkgnum'}, + 'svcpart' => $p->{'svcpart'}, + 'phonenum' => $did, + 'countrycode' => $p->{'countrycode'}, + 'session_id' => $p->{'session_id'}, + } + ); + return $error if ($error->{'error'} && length($error->{'error'}) > 1); + } + { 'bulkdid' => [ @bulkdid ], 'svc' => $error->{'svc'} } } sub provision_acct { -- cgit v1.2.1