[freeside-commits] freeside/httemplate/misc did_order_confirmed.html, 1.4, 1.5
Erik Levinson
levinse at wavetail.420.am
Wed Jun 8 13:57:58 PDT 2011
Update of /home/cvs/cvsroot/freeside/httemplate/misc
In directory wavetail.420.am:/tmp/cvs-serv822/httemplate/misc
Modified Files:
did_order_confirmed.html
Log Message:
DID inventory/import / bulk DID orders - phase 2, RT12754
Index: did_order_confirmed.html
===================================================================
RCS file: /home/cvs/cvsroot/freeside/httemplate/misc/did_order_confirmed.html,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -w -d -r1.4 -r1.5
--- did_order_confirmed.html 8 Jun 2011 05:37:38 -0000 1.4
+++ did_order_confirmed.html 8 Jun 2011 20:57:56 -0000 1.5
@@ -24,6 +24,17 @@
} );
die "No order $ordernum" unless $did_order;
+sub didprov {
+ my($pkgnum,$svcpart,$phonenum) = (shift,shift,shift);
+ my $svc_phone = new FS::svc_phone({
+ pkgnum => $pkgnum,
+ svcpart => $svcpart,
+ countrycode => 1,
+ phonenum => $phonenum,
+ });
+ $cgi->param('error',$svc_phone->insert);
+}
+
my $action = $cgi->param('action');
if ( $action eq 'confirm' ) {
my $confirmed = '';
@@ -48,6 +59,8 @@
$js = "window.location.href = '${p}browse/did_order.html'";
}
elsif ( $action eq 'provision' ) {
+ # XXX: most of this should move into did_order.pm and become transaction-enabled
+
$header = 'DID order provisioned';
my @dids = qsearch( 'phone_avail', { ordernum => $ordernum } );
die "no DIDs on order" unless scalar(@dids);
@@ -60,20 +73,45 @@
my $pkgnum = $1;
my $svcpart = $2;
if ( $did_order->custnum && $did_order->custnum == $custnum ) {
- # this is our old per-order custnum case
+ # per-order custnum case
foreach my $did ( @dids ) {
- my $svc_phone = new FS::svc_phone({
- pkgnum => $pkgnum,
- svcpart => $svcpart,
- countrycode => 1,
- phonenum => $did->npa.$did->nxx.$did->station,
+ didprov($pkgnum,$svcpart,$did->npa.$did->nxx.$did->station);
+ last if $cgi->param('error');
+ }
+ }
+ elsif(!$did_order->custnum) { # multi-customer/stock case
+
+ # get each order item for this customer for this order
+ my @did_order_item = qsearch('did_order_item', {
+ 'ordernum' => $ordernum,
+ 'custnum' => $custnum,
});
- $cgi->param('error',$svc_phone->insert);
+ foreach my $did_order_item ( @did_order_item ) {
+ # get imported unprovisioned DIDs for this order matching this order item
+ my $didsearch = { 'ordernum' => $ordernum,
+ 'svcnum' => '',
+ };
+ $didsearch->{'npa'} = $did_order_item->npa
+ if $did_order_item->npa;
+ $didsearch->{'state'} = $did_order_item->state
+ if $did_order_item->state;
+ $didsearch->{'name'} = $did_order_item->rate_center->description
+ if $did_order_item->rate_center;
+ $didsearch->{'msanum'} = $did_order_item->msanum
+ if $did_order_item->msanum;
+ $didsearch->{'latanum'} = $did_order_item->latanum
+ if $did_order_item->latanum;
+ @dids = qsearch('phone_avail', $didsearch);
+ my $limit = $did_order_item->quantity;
+ foreach my $did ( @dids ) {
+ didprov($pkgnum,$svcpart,$did->npa.$did->nxx.$did->station);
+ $limit--;
+ last if $cgi->param('error') || $limit == 0;
+ }
last if $cgi->param('error');
}
}
- # XXX: now what do we do for order items? Not clear how to match a DID in an order item
}
$popup = '-popup';
}
More information about the freeside-commits
mailing list