diff options
| author | levinse <levinse> | 2010-12-21 06:26:12 +0000 |
|---|---|---|
| committer | levinse <levinse> | 2010-12-21 06:26:12 +0000 |
| commit | 46e04077cc22ff9d31e8e9896cbf97e31f1b0e7d (patch) | |
| tree | 24fd7eb75360d3bda1cc8fc535f71ef013b87782 /FS | |
| parent | 1eff7a1cd742bab7a0084d55f74b2f53c1f84e64 (diff) | |
self-service improvements: DIDs, RT10885
Diffstat (limited to 'FS')
| -rw-r--r-- | FS/FS/ClientAPI/MyAccount.pm | 14 | ||||
| -rw-r--r-- | FS/FS/cust_pkg.pm | 7 |
2 files changed, 21 insertions, 0 deletions
diff --git a/FS/FS/ClientAPI/MyAccount.pm b/FS/FS/ClientAPI/MyAccount.pm index f6a71cd9b..e41fe7d56 100644 --- a/FS/FS/ClientAPI/MyAccount.pm +++ b/FS/FS/ClientAPI/MyAccount.pm @@ -1548,6 +1548,20 @@ sub cancel_pkg { } +sub provision_phone { + my $p = shift; + my @bulkdid = @{$p->{'bulkdid'}}; + unless (scalar(@bulkdid)) { + return _provision( 'FS::svc_phone', + [qw(phonenum countrycode)], + [qw(phonenum countrycode)], + $p, + @_ + ); + } +#XXX: finish bulk orders +} + sub provision_acct { my $p = shift; warn "provision_acct called\n" diff --git a/FS/FS/cust_pkg.pm b/FS/FS/cust_pkg.pm index b97bc93a1..5bb07d4ff 100644 --- a/FS/FS/cust_pkg.pm +++ b/FS/FS/cust_pkg.pm @@ -1746,6 +1746,13 @@ sub available_part_svc { my $part_svc = $_->part_svc; $part_svc->{'Hash'}{'num_avail'} = #evil encapsulation-breaking $_->quantity - $self->num_cust_svc($_->svcpart); + + # more evil encapsulation breakage + if($part_svc->{'Hash'}{'num_avail'} > 0) { + my @exports = $part_svc->part_export_did; + $part_svc->{'Hash'}{'can_get_dids'} = scalar(@exports); + } + $part_svc; } $self->part_pkg->pkg_svc; |