combine ticket notification scrips, #15353
[freeside.git] / httemplate / search / phone_avail.html
index e1c264f..1335379 100644 (file)
@@ -3,7 +3,7 @@
               'name_singular' => 'phone number',
               'query'         => {
                                    'table'   => 'phone_avail',
-                                   'hashref' => {},
+                                   'hashref' => $hashref,
                                    'select'  => join(', ',
                                        'phone_avail.*',
                                        'cust_main.custnum',
                       '+'. $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' => [ 
                            '',
                            '',
                            '',
                            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 = ();
 
@@ -116,6 +129,9 @@ my $addl_from = ' LEFT JOIN cust_svc  USING ( svcnum  ) '.
 
 my $count_query = "SELECT COUNT(*) FROM phone_avail $search"; #$addl_from?
 
+my $hashref = {};
+$hashref->{'ordernum'} = $1 if $cgi->param('ordernum') =~ /^(\d+)$/;
+
 my $link_cust = sub {
   my $phone_avail = shift;
   if ( $phone_avail->svcnum ) {
@@ -128,4 +144,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>