X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fsearch%2Fphone_avail.html;h=8dec7b247531f3e5bc81ebab2afb1acf51662a89;hb=5c0d47bfe554a35c8906d97b9fabd9999be4f67e;hp=2ef3dcd8c6e87dc804446d06f2c644641d081505;hpb=9ab5259d95fafee083cd377b03f4ffdc37bd137a;p=freeside.git diff --git a/httemplate/search/phone_avail.html b/httemplate/search/phone_avail.html index 2ef3dcd8c..8dec7b247 100644 --- a/httemplate/search/phone_avail.html +++ b/httemplate/search/phone_avail.html @@ -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 = (); @@ -119,7 +132,7 @@ my $count_query = "SELECT COUNT(*) FROM phone_avail $search"; #$addl_from? my $link_cust = sub { my $phone_avail = shift; if ( $phone_avail->svcnum ) { - my $cust_svc = $phone_avail->svc_phone->cust_svc; + my $cust_svc = $phone_avail->cust_svc; if ( $cust_svc->pkgnum ) { #my $cust_main = $cust_svc->cust_pkg->cust_main; return [ "${p}view/cust_main.cgi?", 'custnum' ]; @@ -128,4 +141,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']; + } + ''; +}; +