X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fsearch%2Fphone_avail.html;h=faf354420aa46ba3fad8913a04a97be720ccfe19;hp=e1c264fb662db61636d36d122553b4fef3f2d809;hb=949a80c148a8bbeeeec54c5a0be5d73b292423a5;hpb=87fbaed3903546e36a9ce8da91c609999caf140b

diff --git a/httemplate/search/phone_avail.html b/httemplate/search/phone_avail.html
index e1c264fb6..faf354420 100644
--- a/httemplate/search/phone_avail.html
+++ b/httemplate/search/phone_avail.html
@@ -1,9 +1,9 @@
-<% include( 'elements/search.html',
+<& elements/search.html,
               'title'         => 'Phone Number (DID) Search Results',
               'name_singular' => 'phone number',
               'query'         => {
                                    'table'   => 'phone_avail',
-                                   'hashref' => {},
+                                   'hashref' => $hashref,
                                    'select'  => join(', ',
                                        'phone_avail.*',
                                        'cust_main.custnum',
@@ -29,25 +29,35 @@
                       '+'. $pn->countrycode. ' '.
                         $pn->npa. ' '.  $pn->nxx. '-'. $pn->station;
                     },
-		'name',
+		sub { shift->get('name') },
 		'availbatch',
-                'exportnum', #XXX
-                #sub { },
-                'svcnum', #XXX
+		sub {
+		    my $pa = shift;
+		    return '' unless $pa->part_export;
+		    $pa->part_export->exportname;
+		},
+		sub {
+		    my $pa = shift;
+		    return '' unless $pa->cust_svc;
+		    my($label,$value) = $pa->cust_svc->label; 
+		    $label . ": " . $value;
+		},
                 \&FS::UI::Web::cust_fields,
+		'',
               ],
-              'align'         => 'rllllll'.FS::UI::Web::cust_aligns(),
+              'align'         => 'rllllllc'.FS::UI::Web::cust_aligns(),
               'links'         => [
                 '',
                 '',
 		'',
 		'',
                 '',
-                '', #XXX #$export_link
-                '', #XXX #$svc_link
+                '', #XXX #$export_link - to what exactly?
+                $svc_link,
                 ( map { $_ ne 'Cust. Status' ? $link_cust : '' }
                       FS::UI::Web::cust_header()
                 ),
+		'',
               ],
               'color' => [ 
                            '',
@@ -58,6 +68,7 @@
                            '',
                            '',
                            FS::UI::Web::cust_colors(),
+			   '',
                          ],
               'style' => [ 
                            '',
@@ -68,13 +79,15 @@
                            '',
                            '',
                            FS::UI::Web::cust_styles(),
+			   '',
                          ],
-      )
-%>
+      
+&>
 <%init>
 
 die "access denied"
-  unless $FS::CurrentUser::CurrentUser->access_right('Import');
+  unless ( $FS::CurrentUser::CurrentUser->access_right('List inventory')
+	 );
 
 my @search = ();
 
@@ -112,9 +125,14 @@ my $search = scalar(@search)
 my $addl_from = ' LEFT JOIN cust_svc  USING ( svcnum  ) '.
                 #' LEFT JOIN part_svc  USING ( svcpart ) '.
                 ' LEFT JOIN cust_pkg  USING ( pkgnum  ) '.
-                ' LEFT JOIN cust_main USING ( custnum ) ';
+                FS::UI::Web::join_cust_main('cust_pkg', 'cust_pkg');
 
 my $count_query = "SELECT COUNT(*) FROM phone_avail $search"; #$addl_from?
+# All of these relationships are left joined in the many-to-one direction,
+# so including $addl_from won't affect the count.  Logic!
+
+my $hashref = {};
+$hashref->{'ordernum'} = $1 if $cgi->param('ordernum') =~ /^(\d+)$/;
 
 my $link_cust = sub {
   my $phone_avail = shift;
@@ -128,4 +146,13 @@ my $link_cust = sub {
   '';
 };
 
+my $svc_link = sub {
+    my $phone_avail = shift;
+    my $cust_svc = $phone_avail->cust_svc;
+    if ( $cust_svc ) {
+	return [ "${p}view/svc_phone.cgi?", 'svcnum'];
+    }
+    '';
+};
+
 </%init>