X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fbrowse%2Fpart_svc.cgi;h=f1b2836381c25804cc242b67f9a4601ac3f4cc3a;hb=fb548ac8da2cc0b87b7b3dcd7172097d930c6f4a;hp=84d8a356644f71318a0f60b0b8c49aad07d42f89;hpb=51984ac3d3da3006809c6866fdecd4ad83610731;p=freeside.git
diff --git a/httemplate/browse/part_svc.cgi b/httemplate/browse/part_svc.cgi
index 84d8a3566..f1b283638 100755
--- a/httemplate/browse/part_svc.cgi
+++ b/httemplate/browse/part_svc.cgi
@@ -1,60 +1,215 @@
-
-<%= header('Service Part Listing', menubar( 'Main Menu' => $p) ) %>
+<% include('/elements/header.html', 'Service Definition Listing') %>
- Services are items you offer to your customers.
-
Service | -Table | -Field | -Modifier | -|||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|
> - <%= $hashref->{svcpart} %> | -> - <%= $hashref->{svc} %> | -> - <%= $hashref->{svcdb} %> | - -<% my($n1)=''; - my($row); - foreach $row ( @rows ) { - my($flag)=$part_svc->getfield($svcdb.'__'.$row.'_flag'); -%> - <%= $n1 %>$row | -<% if ( $flag eq "D" ) { print "Default"; } - elsif ( $flag eq "F" ) { print "Fixed"; } - else { print "(Unknown!)"; } -%> - | <%= $part_svc->getfield($svcdb."__".$row) %> | -<% $n1="|||||||
# | + +% if ( $cgi->param('showdisabled') ) { +Status | +% } + +Service | + +Table | + +Customer Services |
+
+ Export | + +Field | + +Modifier | +|||||
Add new service | + +CLASS="grid" BGCOLOR="<% $bgcolor %>"> + <% $part_svc->svcpart %> + | + +% if ( $cgi->param('showdisabled') ) { +CLASS="grid" BGCOLOR="<% $bgcolor %>"> + <% $part_svc->disabled + ? 'Disabled' + : 'Enabled' + %> + | +% } + +CLASS="grid" BGCOLOR="<% $bgcolor %>"> + <% $part_svc->svc %> | + +CLASS="grid" BGCOLOR="<% $bgcolor %>"> + <% $svcdb %> | + + CLASS="grid" BGCOLOR="<% $bgcolor %>">
+ <% $num_active_cust_svc{$part_svc->svcpart} %> <% $num_active_cust_svc{$part_svc->svcpart} ? svc_url( 'ahref' => 1, 'm' => $m, 'action' => 'search', 'part_svc' => $part_svc, 'query' => "svcpart=". $part_svc->svcpart ) : '' %>active
+
+% if ( $num_active_cust_svc{$part_svc->svcpart} ) {
+ [ change ] +% } + + |
+
+ CLASS="inv" BGCOLOR="<% $bgcolor %>">
+
|
+
+% unless ( @fields ) {
+% for ( 1..3 ) {
+ +% } +% } +% +% my($n1)=''; +% foreach my $field ( @fields ) { +% my $formatter = +% FS::part_svc->svc_table_fields($svcdb)->{$field}->{format} +% || sub { shift }; +% my $flag = $part_svc->part_svc_column($field)->columnflag; +% + + <% $n1 %> + | <% $field %> | +<% $flag{$flag} %> | + ++% my $value = &$formatter($part_svc->part_svc_column($field)->columnvalue); +% if ( $flag =~ /^[MA]$/ ) { +% $inventory_class{$value} +% ||= qsearchs('inventory_class', { 'classnum' => $value } ); +% + + <% $inventory_class{$value} + ? $inventory_class{$value}->classname + : "WARNING: inventory_class.classnum $value not found" %> +% } else { + + <% $value %> +% } + + | +% $n1="||