diff options
| -rw-r--r-- | httemplate/elements/menu.html | 4 | ||||
| -rw-r--r-- | httemplate/search/phone_avail.html | 37 | ||||
| -rwxr-xr-x | httemplate/search/report_phone_avail.html | 92 |
3 files changed, 127 insertions, 6 deletions
diff --git a/httemplate/elements/menu.html b/httemplate/elements/menu.html index 1909d909d..19cd2d8d1 100644 --- a/httemplate/elements/menu.html +++ b/httemplate/elements/menu.html @@ -191,8 +191,8 @@ foreach my $svcdb ( FS::part_svc->svc_tables() ) { } if ( $svcdb eq 'svc_phone' ) { - $report_svc{"Avaialble phone numbers (DIDs)"} = - [ $fsurl."search/phone_avail.html", '' ]; + $report_svc{"Phone number (DID) availability"} = + [ $fsurl."search/report_phone_avail.html", '' ]; } $report_services{$name} = [ \%report_svc, $longname ]; diff --git a/httemplate/search/phone_avail.html b/httemplate/search/phone_avail.html index 2388d25ff..2ef3dcd8c 100644 --- a/httemplate/search/phone_avail.html +++ b/httemplate/search/phone_avail.html @@ -16,6 +16,8 @@ 'header' => [ '#', 'State', 'Phone Number', + 'Rate Center', + 'Batch', 'Export', 'Service', FS::UI::Web::cust_header(), @@ -27,15 +29,19 @@ '+'. $pn->countrycode. ' '. $pn->npa. ' '. $pn->nxx. '-'. $pn->station; }, + 'name', + 'availbatch', 'exportnum', #XXX #sub { }, 'svcnum', #XXX \&FS::UI::Web::cust_fields, ], - 'align' => 'rllll'.FS::UI::Web::cust_aligns(), + 'align' => 'rllllll'.FS::UI::Web::cust_aligns(), 'links' => [ '', '', + '', + '', '', '', #XXX #$export_link '', #XXX #$svc_link @@ -46,6 +52,8 @@ 'color' => [ '', '', + '', + '', '', '', '', @@ -54,6 +62,8 @@ 'style' => [ '', '', + '', + '', '', '', '', @@ -68,9 +78,28 @@ die "access denied" my @search = (); -if ( $cgi->param('availbatch') =~ /^([\w\/\:\-\.]+)$/ ) { - push @search, "availbatch = '$1'"; -} +push @search, "availbatch = '$1'" + if ( $cgi->param('availbatch') =~ /^([\w\d \/\:\-\.]+)$/ ); + +push @search, "countrycode = '$1'" + if ( $cgi->param('countrycode') =~ /^(\d{1,3})$/ ); + +push @search, "phone_avail.state = '$1'" + if ( $cgi->param('state') =~ /^(\w{2})$/ ); + +# i know that the regexps match more than NPA/NXX, but this is good enough now +push @search, "npa = '$1'" + if ( $cgi->param('npa') =~ /^(\d{3})$/ ); +push @search, "nxx = '$1'" + if ( $cgi->param('npa') =~ /^\d{3}$/ && $cgi->param('nxx') =~ /^(\d{3})$/ ); + +push @search, "name = '$1'" + if ( $cgi->param('ratecenter') =~ /^([\w \-\.]+)$/ ); + +push @search, "svcnum is null" + if ( $cgi->param('avail_status') eq 'AVAIL' ); +push @search, "svcnum is not null" + if ( $cgi->param('avail_status') eq 'UNAVAIL' ); # #here is the agent virtualization # push @search, $FS::CurrentUser::CurrentUser->agentnums_sql; diff --git a/httemplate/search/report_phone_avail.html b/httemplate/search/report_phone_avail.html new file mode 100755 index 000000000..c81206afc --- /dev/null +++ b/httemplate/search/report_phone_avail.html @@ -0,0 +1,92 @@ +<% include('/elements/header.html', 'Phone number (DID) Availability Report' ) %> + +<FORM ACTION="phone_avail.html" METHOD="GET"> + + <TABLE BGCOLOR="#cccccc" CELLSPACING=0> + + <TR> + <TH CLASS="background" COLSPAN=2 ALIGN="left"><FONT SIZE="+1">Search options</FONT></TH> + </TR> + + <% include( '/elements/tr-input-text.html', + 'id' => 'countrycode', + 'field' => 'countrycode', + 'label' => 'Country Code', + 'maxlength' => 3, + 'size' => 3, + ) + %> + + <% include( '/elements/tr-input-text.html', + 'id' => 'state', + 'field' => 'state', + 'label' => 'State', + 'maxlength' => 2, + 'size' => 2, + ) + %> + + <% include( '/elements/tr-input-text.html', + 'id' => 'npa', + 'field' => 'npa', + 'label' => 'NPA', + 'maxlength' => 3, + 'size' => 3, + ) + %> + + <% include( '/elements/tr-input-text.html', + 'id' => 'nxx', + 'field' => 'nxx', + 'label' => 'NXX', + 'maxlength' => 3, + 'size' => 3, + ) + %> + + <% include( '/elements/tr-input-text.html', + 'id' => 'ratecenter', + 'field' => 'ratecenter', + 'label' => 'Rate Center', + 'size' => 80, + ) + %> + + + <% include( '/elements/tr-input-text.html', + 'id' => 'availbatch', + 'field' => 'availbatch', + 'label' => 'Batch Name', + 'size' => 80, + ) + %> + + <TR> + <TD ALIGN="RIGHT">Status</TD> + <TD> + <INPUT TYPE="RADIO" NAME="avail_status" value="BOTH" CHECKED>Available & Unavailable + Numbers + <INPUT TYPE="RADIO" NAME="avail_status" value="AVAIL">Available Numbers Only + <INPUT TYPE="RADIO" NAME="avail_status" value="UNAVAIL">Unavailable Numbers Only + </TD> + </TR> + + + </TABLE> + +<BR> +<INPUT TYPE="submit" VALUE="Get Report"> + +</FORM> + +<% include('/elements/footer.html') %> +<%init> + +die "access denied" + unless ( $FS::CurrentUser::CurrentUser->access_right('List customers') && + $FS::CurrentUser::CurrentUser->access_right('List packages') + ); + +my $conf = new FS::Conf; + +</%init> |